Forum
Scripts
kick menu
kick menu
7 replies
1

edited 2×, last 05.07.13 04:56:20 pm
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
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
admin = {56395}
addhook ("serveraction","_serveraction")
function _serveraction(id,Active)
for _, usgn in ipairs(admin) do
if player(id,'usgn') == usgn then
if Active==1 then
menu(id,"Player Page 1,Kick")
end
end
end
end
addhook ("menu","_menu")
function _menu(id,Server,buton)
	if Server=="Player Page 1" then
if buton==1 then
	menu(id,"Kick Page 1,"..exist(1).."|1,"..exist(2).."|2,"..exist(3).."|3,"..exist(4).."|4,"..exist(5).."|5,"..exist(6).."|6,"..exist(7).."|7,"..exist(8).."|8,Next")
end
--- KICK ---
elseif Server=="Kick Page 1" then
if buton==9 then
menu(id,"Kick Page 2,"..exist(9).."|9,"..exist(10).."|10,"..exist(11).."|11,"..exist(12).."|12,"..exist(13).."|13,"..exist(14).."|14,"..exist(15).."|15,"..exist(16).."|16,Next")
elseif buton~=0 then
ki(buton)
end
elseif Server=="Kick Page 2" then
if buton==9 then
menu(id,"Kick Page 3,"..exist(17).."|17,"..exist(18).."|18,"..exist(19).."|19,"..exist(20).."|20,"..exist(21).."|21,"..exist(22).."|22,"..exist(23).."|23,"..exist(24).."|24,Next")
elseif buton~=0 then
ki(buton+8)
end
elseif Server=="Kick Page 3" then
if buton==9 then
menu(id,"Kick Page 4,"..exist(25).."|25,"..exist(26).."|26,"..exist(27).."|27,"..exist(28).."|28,"..exist(29).."|29,"..exist(30).."|30,"..exist(31).."|31,"..exist(32).."|32,Back")
elseif buton~=0 then
ki(buton+16)
end
elseif Server=="Kick Page 4" then
if buton~=0 then
ki(buton+24)
end
end
function ki(pl)
parse("kick "..pl.." \" YOU Kicked \" ")
end
not tested
let me know if any error
pbeloto has written1
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
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
admin = {56395}
addhook ("serveraction","_serveraction")
function _serveraction(id,Active)
for _, usgn in ipairs(admin) do
if player(id,'usgn') == usgn then
if Active==1 then
menu(id,"Player Page 1,Kick")
end
end
end
end
addhook ("menu","_menu")
function _menu(id,Server,buton)
	if Server=="Player Page 1" then
if buton==1 then
	menu(id,"Kick Page 1,"..exist(1).."|1,"..exist(2).."|2,"..exist(3).."|3,"..exist(4).."|4,"..exist(5).."|5,"..exist(6).."|6,"..exist(7).."|7,"..exist(8).."|8,Next")
end
--- KICK ---
elseif Server=="Kick Page 1" then
if buton==9 then
menu(id,"Kick Page 2,"..exist(9).."|9,"..exist(10).."|10,"..exist(11).."|11,"..exist(12).."|12,"..exist(13).."|13,"..exist(14).."|14,"..exist(15).."|15,"..exist(16).."|16,Next")
elseif buton~=0 then
ki(buton)
end
elseif Server=="Kick Page 2" then
if buton==9 then
menu(id,"Kick Page 3,"..exist(17).."|17,"..exist(18).."|18,"..exist(19).."|19,"..exist(20).."|20,"..exist(21).."|21,"..exist(22).."|22,"..exist(23).."|23,"..exist(24).."|24,Next")
elseif buton~=0 then
ki(buton+8)
end
elseif Server=="Kick Page 3" then
if buton==9 then
menu(id,"Kick Page 4,"..exist(25).."|25,"..exist(26).."|26,"..exist(27).."|27,"..exist(28).."|28,"..exist(29).."|29,"..exist(30).."|30,"..exist(31).."|31,"..exist(32).."|32,Back")
elseif buton~=0 then
ki(buton+16)
end
elseif Server=="Kick Page 4" then
if buton~=0 then
ki(buton+24)
end
end
function ki(pl)
parse("kick "..pl.." \" YOU Kicked \" ")
end
not tested
let me know if any error
LUA ERROR: sys/lua/server.lua:18: attemp to call global 'exists' (a nil value)
1
2
3
4
5
6
7
2
3
4
5
6
7
function exist(param) if player(param,"exists") then return player(param,"name") else return "(None)" end end
sheeL has written1
2
3
4
5
6
7
2
3
4
5
6
7
function exist(param) if player(param,"exists") then return player(param,"name") else return "(None)" end end
Thenks Shell!!
superpegamento: sorry @
sheeL: Tanks
Pickabu: Quote
I am not lua skripter and don't know what is that.
If you aren't a lua scripter why you are posting a comment here?
STOP , making stupid comments. If you know how to help this guy then do it otherwise don't make any stupid comment.
1

Offline
