Forum

CS2D

Scripts

Weapon Script

Forums overview CS2D overview Scripts overview Log in to reply

Weapon Script

5 replies

Weapon Script

Blunt
User Off

Offline

21.12.11 09:25:47 pm

Hey,

Can you make me this script?

PS: shit english

About the script:
it is a weapon script

It should look like this:

The user of the server and join and have Kevlar helmet and a HE!

There is a menu with two choices.
1.New Weapons
2.Save and Weapons:

1.New Weapons:
Then, a menu
3 Select or Open with matters with
with (rifle) and pistol.
I write only once the
Rifle as weapons on the 2nd
Pistolwaffen.
of 3.) Sub Machine Guns
of 4. Machine Gun

The rifle weapons should
with these numbers on the keyboard
to his company (as listed)

(Rifels)

1.M4A1
2.AK-47
3.Galil
4.Famas
5.AUG
6.SG552
7.Scout

(In this case should stand on 8cht Pistols)

At the Pistols:
1.Deagle
2.Fiveseven
3.Glock
4.USP
5.P228
6.Elite

and Sub Machine Gun:
First P90
2.tmp
3.MAC 10
4.UMP 45
5.MP5

Machine Gun
1.M249
_____________________________

Second Save Weapons:
This function should be there for
saveweaopons

(This script is designed for team deathmatch game mode and the map is de_dust2

Make Me a Scripter script this? i hope
Posted questions when they. ^ ^

Re: Weapon Script

Jynxxx
User Off

Offline

21.12.11 11:50:05 pm

I'll just post what i have right now. The menu is all messed up i cant find the problem. As for the Save Weapons Menu, i dont know how to make a save file. Hope this helps you and hope that this is what you wanted

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

addhook("spawn","spawnequip")
function spawnequip(id)
	return "51,58"
end

addhook("serveraction","WeaponsMenu")
function WeaponsMenu(id,action)
	if action == 1 then
		menu(id,"Weapons Menu,New Weapons,Save Weapons")
	end
end

addhook("menu", "NMenu")
function NMenu(id,title,button)
	if (title=="Weapons Menu") then
		if button == 1 then
			menu(id,"New Weapons,Rifles,Pistols,Sub-Machine Guns,Machine Guns")
		end
		elseif button == 2 then
			menu(id,"Save Weapons,Yes,No")
		end
	end
	if (title=="New Weapons") then
		if button == 1 then
			menu(id,"Rifles,M4A1,Ak-47,Galil,Famas,AUG,SG552,Scout")
		end
		if button == 2 then
			menu(id,"Pistols,Deagle,Five-7,Glock,USP,P228,Elite")
		end
		if button == 3 then
			menu(id,"Sub-Machine Guns,P90,MAC 10,UMP 45,MP5")
		end
		if button == 4 then
			menu(id,"Machine Guns,M249")
		end
	if (title=="Rifles") then
		if button == 1 then
			parse("equip "..id.." 32")
		end
		if button == 2 then
			parse("equip "..id.." 30")
		end
		if button == 3 then
			parse("equip "..id.." 38")
		end
		if button == 4 then
			parse("equip "..id.." 39")
		end
		if button == 5 then
			parse("equip "..id.." 33")
		end
		if button == 6 then
			parse("equip "..id.." 31")
		end
		if button == 7 then
			parse("equip "..id.." 34")
		end
	end
	if (title=="Pistols") then
		if button == 1 then
			parse("equip " ..id.." 3")
		end
		if button == 2 then
			parse("equip "..id.." 6")
		end
		if button == 3 then
			parse("equip "..id.." 2")
		end
		if button == 4 then
			parse("equip "..id.." 1")
		end
		if button == 5 then
			parse("equip "..id.." 4")
		end
		if button == 6 then
			parse("equip "..id.." 5")
		end
	end
	if (title=="Sub-Machine Guns") then
		if button == 1 then
			parse("equip "..id.." 22")
		end
		if button == 2 then
			parse("equip "..id.." 21")
		end
		if button == 3 then
			parse("equip "..id.." 23")
		end
		if button == 4 then
			parse("equip "..id.." 24")
		end
		if button == 5 then
			parse("equip "..id.." 20")
		end
	end
	if (title=="Machine Guns") then
		if button == 1 then
			parse("equip "..id.." 40")
		end
	end
end

Re: Weapon Script

Blunt
User Off

Offline

22.12.11 04:17:08 pm

the weapons load not

and i press of Psitols and come Save Weapons yes/no
please fixx the Script

thanks

Re: Weapon Script

Jynxxx
User Off

Offline

22.12.11 05:47:52 pm

ok ima give you a say script because i think it is easier

Spoiler

addhook("minute","help")
function help()
	msg("use ![nameofweapon] to get a weapon")
end

function equip(id,wid)
	parse('equip '..id..' '..wid)
end

addhook("spawn","spawnequip")
function spawnequip(id)
     return "51,58"
end

addhook("say", "_say")
function _say(id,txt)
	if string.sub(txt,1,5) == "!m4a1" then
		equip(id,32)
		parse ("sv_msg ©000000000"..player(id,"name").." used !m4a1")
		return 1
	end
	if string.sub(txt,1,6) == "!ak-47" then
		equip(id,30)
		parse ("sv_msg ©000000000"..player(id,"name").." used !ak-47")
		return 1 
	end
	if string.sub(txt,1,6) == "!galil" then
		equip(id,38)
		parse ("sv_msg ©000000000"..player(id,"name").." used !galil")
		return 1
	end
	if string.sub(txt,1,6) == "!famas" then
		equip(id,39)
		parse ("sv_msg ©000000000"..player(id,"name").." used !famas")
		return 1
	end
	if string.sub(txt,1,4) == "!aug" then
		equip(id,33)
		parse ("sv_msg ©000000000"..player(id,"name").." used !aug")
		return 1
	end
	if string.sub(txt,1,6) == "!sg552" then
		equip(id,31)
		parse ("sv_msg ©000000000"..player(id,"name").." used !sg552")
		return 1
	end
	if string.sub(txt,1,6) == "!scout" then
		equip(id,34)
		parse ("sv_msg ©000000000"..player(id,"name").." used !scout")
		return 1
	end
	if string.sub(txt,1,7) == "!deagle" then
		equip(id,3)
		parse ("sv_msg ©000000000"..player(id,"name").." used !deagle")
		return 1
	end
	if string.sub(txt,1,7) == "!five-7" then
		equip(id,6)
		parse ("sv_msg ©000000000"..player(id,"name").." used !five-7")
		return 1
	end
	if string.sub(txt,1,6) == "!glock" then
		equip(id,2)
		parse ("sv_msg ©000000000"..player(id,"name").." used !glock")
		return 1
	end
	if string.sub(txt,1,4) == "!usp" then
		equip(id,1)
		parse ("sv_msg ©000000000"..player(id,"name").." used !usp")
		return 1
	end
	if string.sub(txt,1,5) == "!p228" then
		equip(id,4)
		parse ("sv_msg ©000000000"..player(id,"name").." used !p228")
		return 1
	end
	if string.sub(txt,1,6) == "!elite" then
		equip(id,5)
		parse ("sv_msg ©000000000"..player(id,"name").." used !elite")
		return 1
	end
	if string.sub(txt,1,4) == "!p90" then
		equip(id,22)
		parse ("sv_msg ©000000000"..player(id,"name").." used !p90")
		return 1
	end
	if string.sub(txt,1,4) == "!tmp" then
		equip(id,21)
		parse ("sv_msg ©000000000"..player(id,"name").." used !tmp")
		return 1
	end
	if string.sub(txt,1,6) == "!mac10" then
		equip(id,23)
		parse ("sv_msg ©000000000"..player(id,"name").." used !mac10")
		return 1
	end
	if string.sub(txt,1,4) == "!mp5" then
		equip(id,20)
		parse ("sv_msg ©000000000"..player(id,"name").." used !mp5")
		return 1
	end
	if string.sub(txt,1,6) == "!ump45" then
		equip(id,24)
		parse ("sv_msg ©000000000"..player(id,"name").." used !ump45")
		return 1
	end
	if string.sub(txt,1,5) == "!m249" then
		equip(id,40)
		parse ("sv_msg ©000000000"..player(id,"name").." used !m249")
		return 1
	end
end

Re: Weapon Script

Blunt
User Off

Offline

22.12.11 06:08:29 pm

the Script have not a Menü

How?

imtheshamman
User Off

Offline

23.12.11 03:07:21 am

Hey how can i edit a lua? when i open with note pad or whatever then all of the lua files are notepad so i cant use it with my server please help me