Forum

CS2D

Scripts

Lua Scripts/Questions/Help

Forums overview CS2D overview Scripts overview Log in to reply

Lua Scripts/Questions/Help

6,770 replies

1 2 … 196 197 198 … 338 339

Re: Lua Scripts/Questions/Help

Cure Pikachu
User Off

Offline

01.05.10 09:42:48 am

KINGGOLDrus has written

How to open the website on LUA?

Let me guess: Not possible?

Re: Lua Scripts/Questions/Help

Flacko
User Off

Offline

01.05.10 02:45:02 pm

Pikachu xD has written

KINGGOLDrus has written

How to open the website on LUA?

Let me guess: Not possible?

It's possible, I managed to mess around with the WinInet library until I got it to download the main page of this website

Re: Lua Scripts/Questions/Help

Lee
Moderator Off

Offline

01.05.10 05:53:56 pm

Pikachu xD has written

KINGGOLDrus has written

How to open the website on LUA?

Let me guess: Not possible?

Nothing's impossible :P, as Flacko stated before, it's possible to interact with the OS via Lua's C API:

IMG:https://i560.photobucket.com/albums/ss44/leegao/de_dust_00000.jpg

IMG:https://i560.photobucket.com/albums/ss44/leegao/de_dust_00000.jpg

And Flacko wrote a wonderful tutorial on how to integrate third part libraries with CS2D's Lua runtime.

http://cs2d.org/questions/7/[Tut]-How-to-write-a-binary-module

The real magic happens after step 6.

Re: Lua Scripts/Questions/Help

Heartless Soldier
User Off

Offline

01.05.10 06:13:01 pm

Spoiler

What does it do?

Re: Lua Scripts/Questions/Help

Soja1997
User Off

Offline

01.05.10 06:38:03 pm

Who can make script. Admin give works

Works Menu

Worker - 1000$/Minute
Miner - 2000$/Minute
Barman - 3000$/Minute
Soldier - 4000$/Minute
Doctor - 5000$/Minute
Dealer - 6000/Minute
Banker - 7000$/Minute

If admin say : give_work ID Worker
Miner,Barman,Solider,DOctor,Dealer,Banker etc.

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17

addhook("minute","RPminute")
function RPminute()
local p = function(id)
if player(id,"exists") then return true end
return nil
end
local give = function(id,ammount)
                    msg2(id,"©150100255 Pay Day!@C")
                                        msg2(id,"©150100255 Wyplata!@C")
addmoney(id, 5000)
end
for id=1,32 do
if p(id) then
give(id,5000)
end
end
end

i use this script you must remake it ;s

Re: Lua Scripts/Questions/Help

gabpro
User Off

Offline

01.05.10 07:41:55 pm

@Soja1997
I make it for you

You need to say !givework <ID> <WORKNUMBER>

Work Numbers :
0 - No Work
1 - Worker
2 - Miner
3 - Barman
4 - Soldier
5 - Doctor
6 - Dealer
7 - Banker

PS : Remember to edit your USGN or NAME at line 74

if (player(id,"usgn")==01234 then--IMPORTANT : INPUT YOUR USGN HERE!!!!OR YOU NAME WITH if (player(id,"name")=="YOURNAMEHERE" then

Spoiler

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157

function totable(t,match)
     local cmd = {}
     if not match then match = "[^%s]+" end
     for word in string.gmatch(t, match) do
          table.insert(cmd, word)
     end
     return cmd
end

function initArray(m)
	local array = {}
	for i = 1, m do
		array[i]=0
	end
	return array
end
givework=initArray(32)

addhook("minute","WorkPay") --PAYMENTS PER MINUTE
function WorkPay()
msg("©150150150PAYDAY!!!")
local id = 0
	while (id<32) do
		id = id+1
		if player(id, "exists") then
			--WORKER
			if givework[id]==1 then
				msg2(id,"©200200200You receive $1000!")
				parse("setmoney "..id.." "..player(id,"money")+1000)
			end
			--MINER
			if givework[id]==2 then
				msg2(id,"©200200200You receive $2000!")
				parse("setmoney "..id.." "..player(id,"money")+2000)
			end
			--BARMAN
			if givework[id]==3 then
				msg2(id,"©200200200You receive $3000!")
				parse("setmoney "..id.." "..player(id,"money")+3000)
			end
			--SOLDIER
			if givework[id]==4 then
				msg2(id,"©200200200You receive $4000!")
				parse("setmoney "..id.." "..player(id,"money")+4000)
			end
			--DOCTOR
			if givework[id]==5 then
				msg2(id,"©200200200You receive $5000!")
				parse("setmoney "..id.." "..player(id,"money")+5000)
			end
			--DEALER
			if givework[id]==6 then
				msg2(id,"©200200200You receive $6000!")
				parse("setmoney "..id.." "..player(id,"money")+6000)
			end
			--BANKER
			if givework[id]==7 then
				msg2(id,"©200200200You receive $7000!")
				parse("setmoney "..id.." "..player(id,"money")+7000)
			end
			if givework[id]==nil or givework[id]>7 then
				givework[id] = 0
				msg2(id,"©200200200You dont has a Job!")
			end
			if givework[id]==0 then
				msg2(id,"©200200200You dont has a Job!")
			end
		end
	end
end

addhook("say","AdminWork")
function AdminWork(id,txt)
	if (player(id,"usgn")==01234 then--IMPORTANT : INPUT YOUR USGN HERE!!!!OR YOU NAME WITH if (player(id,"name")=="YOURNAMEHERE" then
		_msg=totable(txt)
		_t1=tostring(_msg[1])
		if (_t1=="!givework") then --!givework <ID> <WORK>
			_t2=tonumber(_msg[2])  --_t1 = !givework => _t2 = <ID> => _t3 = <WORK>
			_t3=tonumber(_msg[3])
			if (_t2 ~= nil) then
				if player(_t2,"exists") then
					if (_t3 ~= nil)then
						if (_t3>=0) and (_t3<=7) then
							--NOTHING
							if (_t3==0) then
								givework[_t2]=_t3
								msg2(id,"©255255255"..player(_t2,"name").." no has a Work!@C")
								msg2(_t2,"©255255255Now you no has a Work!@C")
								end
							--WORKER
							if (_t3==1) then
								givework[_t2]=_t3
								msg2(id,"©255255255"..player(_t2,"name").." is now a Worker!@C")
								msg2(_t2,"©255255255Now you are a Worker!@C")
								end
							--MINER
							if (_t3==2) then
								givework[_t2]=_t3
								msg2(id,"©255255255"..player(_t2,"name").." is now a MINER!@C")
								msg2(_t2,"©255255255Now you are a MINER!@C")
								end
							--BARMAN
							if (_t3==3) then
								givework[_t2]=_t3
								msg2(id,"©255255255"..player(_t2,"name").." is now a BARMAN!@C")
								msg2(_t2,"©255255255Now you are a BARMAN!@C")
								end
							--SOLDIER
							if (_t3==4) then
								givework[_t2]=_t3
								msg2(id,"©255255255"..player(_t2,"name").." is now a SOLDIER!@C")
								msg2(_t2,"©255255255Now you are a SOLDIER!@C")
								end
							--DOCTOR
							if (_t3==5) then
								givework[_t2]=_t3
								msg2(id,"©255255255"..player(_t2,"name").." is now a DOCTOR!@C")
								msg2(_t2,"©255255255Now you are a DOCTOR!@C")
								end
							--DEALER
							if (_t3==6) then
								givework[_t2]=_t3
								msg2(id,"©255255255"..player(_t2,"name").." is now a DEALER!@C")
								msg2(_t2,"©255255255Now you are a DEALER!@C")
								end
							--BANKER
							if (_t3==7) then
								givework[_t2]=_t3
								msg2(id,"©255255255"..player(_t2,"name").." is now a BANKER!@C")
								msg2(_t2,"©255255255Now you are a BANKER!@C")
								end
						else
							msg2(id,"©255255255Input the Work Number(0~7)!@C")
							end
					else
						msg2(id,"©255255255Input the Work Number(0~7)!@C")
						end
				else
					msg2(id,"©255255255".._t2.." is not a valid ID!@C")
					end
			else
				msg2(id,"©255255255You need to input the ID!@C")
				end
		return 1
		end
	end
end

addhook("join","WorkCleanJoin")
function WorkCleanJoin(id)
	givework[id] = 0
end

addhook("leave","WorkCleanLeave")
function WorkCleanLeave(id)
	givework[id] = 0
end

Re: Lua Scripts/Questions/Help

Soja1997
User Off

Offline

01.05.10 09:56:19 pm

Hey Gabpro i have one problem
http://img202.imageshack.us/i/errorli.png/

Spoiler

Re: Lua Scripts/Questions/Help

DRoNe
User Off

Offline

01.05.10 10:19:36 pm

what is bad ?

if tile(x,y,"wall") or tile(x,y,"obstacle") or tile(x,y,"deadly") then ...

Re: Lua Scripts/Questions/Help

Heartless Soldier
User Off

Offline

01.05.10 10:23:29 pm

DRoNe has written

what is bad ?

if tile(x,y,"wall") or tile(x,y,"obstacle") or tile(x,y,"deadly") then ...

Maybe x and y are pixels, and they have to be tiles.

Re: Lua Scripts/Questions/Help

Soja1997
User Off

Offline

01.05.10 10:24:28 pm

Hey nbK Help me

Re: Lua Scripts/Questions/Help

DRoNe
User Off

Offline

01.05.10 10:45:57 pm

maybe

----------------------------------------------------------------
i don't want spawn item at wall,obstacle,deadly tile = he can be spawned at wall,obstacle,deadly...
omg i dont know it !

Can somebody help? thanks

Re: Lua Scripts/Questions/Help

gabpro
User Off

Offline

02.05.10 12:11:40 am

@Soja1997
Thats easy!

1
2

if (player(id,"usgn")==16001 then
if (player(id,"name")=="pD# Soja_PL" then

Erase the firsts "("

1
2

if player(id,"usgn")==16001 then
if player(id,"name")=="pD# Soja_PL" then

PS:You dont need to do the 2 "if"s,only one is good

Re: Lua Scripts/Questions/Help

Mirash
User Off

Offline

02.05.10 04:33:04 am

Can you help me I want to make a script to obtain the experience and the preservation and classes. the more experience the better you klass.Ya do not know much English and I use a translator.

Re: Lua Scripts/Questions/Help

Heartless Soldier
User Off

Offline

02.05.10 05:01:21 am

DRoNe has written

maybe

Omg i answered you X and Y have to be the coordinates of a tile. How do u obtain those values?

Re: Lua Scripts/Questions/Help

YellowBanana
BANNED Off

Offline

02.05.10 03:08:53 pm

Lee has written

Pikachu xD has written

KINGGOLDrus has written

How to open the website on LUA?

Let me guess: Not possible?

Nothing's impossible :P, as Flacko stated before, it's possible to interact with the OS via Lua's C API:

IMG:https://i560.photobucket.com/albums/ss44/leegao/de_dust_00000.jpg

It kinda is impossible tho.
You can't FORCE people to open a webbrowser on their own computer.
You can however try to make your own webbrowser inside cs2d to show them the html code, but this will be very hard.

Help!

craza424
User Off

Offline

02.05.10 06:42:47 pm

Is there anyway someone can make me a script for admin colour when they speak, I need to for a dedicated server AND for more then 1 person, as many as needed.
Thanks!

Re: Lua Scripts/Questions/Help

Crazyx
User Off

Offline

02.05.10 06:54:03 pm

I had the idea to create a Lua USP map, that all players started with silenced USP or when they grab the USP it comes already silenced.
Is it possible?

I don't care if it allows the player to turn back to normal or it has to be always silenced.

Re: Lua Scripts/Questions/Help

DRoNe
User Off

Offline

02.05.10 07:47:55 pm

i think yea.

Re: Lua Scripts/Questions/Help

Crazyx
User Off

Offline

02.05.10 07:56:53 pm

Please give me the full code. Anyone?

Re: Lua Scripts/Questions/Help

Soja1997
User Off

Offline

02.05.10 09:43:41 pm

Gabpro Hey, you can do so that when you press the F3 menu included
1st Quit Job
2nd Jobs Offer
3th Go to Job
When you press the 2 displays the inscription No. jobs offer
When you type admin! joboffer 1
and press 2 again displays the inscription Jobs offer: Worker
When you press a leave from work if you have it

1 2 … 196 197 198 … 338 339