Advertisement
Guest User

Untitled

a guest
Jul 30th, 2014
464
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 13.09 KB | None | 0 0
  1. //Simple Weapon Shop By : ~WhiteAngels
  2. //Please do not remove my credits...
  3. #define FILTERSCRIPT
  4.  
  5. #include <a_samp>
  6. #include <zcmd>
  7.  
  8. //============================WEAPON DIALOG=====================================
  9. #define DIALOG_WEAPONS 111
  10.  
  11. #define DIALOG_WEAPONS_PISTOL 112
  12. #define DIALOG_WEAPONS_MELEE 113
  13. #define DIALOG_WEAPONS_SHOTGUNS 114
  14. #define DIALOG_WEAPONS_SMG 115
  15. #define DIALOG_WEAPONS_RIFLE 116
  16. #define DIALOG_WEAPONS_SPECIAL 117
  17. //==============================================================================
  18.  
  19. public OnFilterScriptInit()
  20. {
  21. print("\n--------------------------------------");
  22. print(" Simple Weapon Shop By : ~WhiteAngels ");
  23. print("--------------------------------------\n");
  24. return 1;
  25. }
  26.  
  27. public OnPlayerConnect(playerid)
  28. {
  29. SendClientMessage(playerid,-1,"This Server is Using SWS Filterscript By : WhiteAngels");
  30. return 1;
  31. }
  32.  
  33. public OnDialogResponse(playerid, dialogid, response, listitem, inputtext[])
  34. {
  35. //=======================WEAPONS DIALOG=====================================
  36. if(dialogid == DIALOG_WEAPONS)
  37. {
  38. if(response) // If they clicked 'Select' or double-clicked a weapon
  39. {
  40. // Give them the weapon
  41. switch(listitem)
  42. {
  43. case 0:
  44. {
  45. ShowPlayerDialog(playerid, DIALOG_WEAPONS_MELEE, DIALOG_STYLE_LIST, "Melee [$10.000]", "Knife\nKatana\nChainsaw", "Buy", "Cancel");
  46. }
  47. case 1:
  48. {
  49. ShowPlayerDialog(playerid, DIALOG_WEAPONS_PISTOL, DIALOG_STYLE_LIST, "Pistol [$15.000]", "9mm\nDesert Eagle\nSilenced Pistol", "Buy", "Cancel");
  50. }
  51. case 2:
  52. {
  53. ShowPlayerDialog(playerid, DIALOG_WEAPONS_SHOTGUNS, DIALOG_STYLE_LIST, "Shotguns [$35.000]", "Shotguns\nSawn-Off Shotguns\nCombat Shotguns", "Buy", "Cancel");
  54. }
  55. case 3:
  56. {
  57. ShowPlayerDialog(playerid, DIALOG_WEAPONS_SMG, DIALOG_STYLE_LIST, "SMG [$25.000]", "Micro Uzi\nTec-9\nMP5", "Buy", "Cancel");
  58. }
  59. case 4:
  60. {
  61. ShowPlayerDialog(playerid, DIALOG_WEAPONS_RIFLE, DIALOG_STYLE_LIST, "Rifle [$30.000]", "Ak-47\nM4\nCountry Rifle\nSniper Rifle", "Buy", "Cancel");
  62. }
  63. case 5:
  64. {
  65. ShowPlayerDialog(playerid, DIALOG_WEAPONS_SPECIAL, DIALOG_STYLE_LIST, "Special [$50.000]", "Health\nArmour\nParachute\nCamera", "Buy", "Cancel");
  66. }
  67. }
  68. }
  69. return 1; // We handled a dialog, so return 1. Just like OnPlayerCommandText.
  70. }
  71. if(dialogid == DIALOG_WEAPONS_MELEE)
  72. {
  73. if(response) // If they clicked 'Select' or double-clicked a weapon
  74. {
  75. // Give them the weapon
  76. switch(listitem)
  77. {
  78. case 0:
  79. {
  80. if(GetPlayerMoney(playerid) < 10000) return SendClientMessage(playerid, 0xFF0000AA, "[ERROR]: You don't have enough cash to buy this weapon!");
  81. GivePlayerWeapon(playerid, 4, 128);
  82. GivePlayerMoney(playerid, -10000);
  83. SendClientMessage(playerid,-1,"You have Bought 'Knife' for $10.000.");
  84. }
  85. case 1:
  86. {
  87. if(GetPlayerMoney(playerid) < 10000) return SendClientMessage(playerid, 0xFF0000AA, "[ERROR]: You don't have enough cash to buy this weapon!");
  88. GivePlayerWeapon(playerid, 8, 128);
  89. GivePlayerMoney(playerid, -10000);
  90. SendClientMessage(playerid,-1,"You have Bought 'Katana' for $10.000.");
  91. }
  92. case 2:
  93. {
  94. if(GetPlayerMoney(playerid) < 10000) return SendClientMessage(playerid, 0xFF0000AA, "[ERROR]: You don't have enough cash to buy this weapon!");
  95. GivePlayerWeapon(playerid, 9, 128);
  96. GivePlayerMoney(playerid, -10000);
  97. SendClientMessage(playerid,-1,"You have Bought 'Chainsaw' for $10.000.");
  98. }
  99. }
  100. }
  101. return 1; // We handled a dialog, so return 1. Just like OnPlayerCommandText.
  102. }
  103. if(dialogid == DIALOG_WEAPONS_PISTOL)
  104. {
  105. if(response) // If they clicked 'Select' or double-clicked a weapon
  106. {
  107. // Give them the weapon
  108. switch(listitem)
  109. {
  110. case 0:
  111. {
  112. if(GetPlayerMoney(playerid) < 15000) return SendClientMessage(playerid, 0xFF0000AA, "[ERROR]: You don't have enough cash to buy this weapon!");
  113. GivePlayerWeapon(playerid, 22, 128);
  114. GivePlayerMoney(playerid, -15000);
  115. SendClientMessage(playerid,-1,"You have Bought '9mm Pistol' for $15.000.");
  116. }
  117. case 1:
  118. {
  119. if(GetPlayerMoney(playerid) < 15000) return SendClientMessage(playerid, 0xFF0000AA, "[ERROR]: You don't have enough cash to buy this weapon!");
  120. GivePlayerWeapon(playerid, 24, 128);
  121. GivePlayerMoney(playerid, -15000);\
  122. SendClientMessage(playerid,-1,"You have Bought 'Desert Eagle' for $15.000.");
  123. }
  124. case 2:
  125. {
  126. if(GetPlayerMoney(playerid) < 15000) return SendClientMessage(playerid, 0xFF0000AA, "[ERROR]: You don't have enough cash to buy this weapon!");
  127. GivePlayerWeapon(playerid, 23, 128);
  128. GivePlayerMoney(playerid, -15000);
  129. SendClientMessage(playerid,-1,"You have Bought 'Silenced Pistol' for $15.000.");
  130. }
  131. }
  132. }
  133. return 1; // We handled a dialog, so return 1. Just like OnPlayerCommandText.
  134. }
  135. if(dialogid == DIALOG_WEAPONS_SHOTGUNS)
  136. {
  137. if(response) // If they clicked 'Select' or double-clicked a weapon
  138. {
  139. // Give them the weapon
  140. switch(listitem)
  141. {
  142. case 0:
  143. {
  144. if(GetPlayerMoney(playerid) < 35000) return SendClientMessage(playerid, 0xFF0000AA, "[ERROR]: You don't have enough cash to buy this weapon!");
  145. GivePlayerWeapon(playerid, 25, 128);
  146. GivePlayerMoney(playerid, -35000);
  147. SendClientMessage(playerid,-1,"You have Bought 'Shotguns' for $35.000.");
  148. }
  149. case 1:
  150. {
  151. if(GetPlayerMoney(playerid) < 35000) return SendClientMessage(playerid, 0xFF0000AA, "[ERROR]: You don't have enough cash to buy this weapon!");
  152. GivePlayerWeapon(playerid, 26, 128);
  153. GivePlayerMoney(playerid, -35000);
  154. SendClientMessage(playerid,-1,"You have Bought 'Sawn-Off Shotguns' for $35.000.");
  155. }
  156. case 2:
  157. {
  158. if(GetPlayerMoney(playerid) < 35000) return SendClientMessage(playerid, 0xFF0000AA, "[ERROR]: You don't have enough cash to buy this weapon!");
  159. GivePlayerWeapon(playerid, 27, 128);
  160. GivePlayerMoney(playerid, -35000);
  161. SendClientMessage(playerid,-1,"You have Bought 'Combat Shotguns' for $35.000.");
  162. }
  163. }
  164. }
  165. return 1; // We handled a dialog, so return 1. Just like OnPlayerCommandText.
  166. }
  167. if(dialogid == DIALOG_WEAPONS_SMG)
  168. {
  169. if(response) // If they clicked 'Select' or double-clicked a weapon
  170. {
  171. // Give them the weapon
  172. switch(listitem)
  173. {
  174. case 0:
  175. {
  176. if(GetPlayerMoney(playerid) < 25000) return SendClientMessage(playerid, 0xFF0000AA, "[ERROR]: You don't have enough cash to buy this weapon!");
  177. GivePlayerWeapon(playerid, 28, 128);
  178. GivePlayerMoney(playerid, -25000);
  179. SendClientMessage(playerid,-1,"You have Bought 'Micro Uzi' for $25.000.");
  180. }
  181. case 1:
  182. {
  183. if(GetPlayerMoney(playerid) < 25000) return SendClientMessage(playerid, 0xFF0000AA, "[ERROR]: You don't have enough cash to buy this weapon!");
  184. GivePlayerWeapon(playerid, 32, 128);
  185. GivePlayerMoney(playerid, -25000);
  186. SendClientMessage(playerid,-1,"You have Bought 'Tec-9' for $25.000.");
  187. }
  188. case 2:
  189. {
  190. if(GetPlayerMoney(playerid) < 25000) return SendClientMessage(playerid, 0xFF0000AA, "[ERROR]: You don't have enough cash to buy this weapon!");
  191. GivePlayerWeapon(playerid, 29, 128);
  192. GivePlayerMoney(playerid, -25000);
  193. SendClientMessage(playerid,-1,"You have Bought 'MP5' for $25.000.");
  194. }
  195. }
  196. }
  197. return 1; // We handled a dialog, so return 1. Just like OnPlayerCommandText.
  198. }
  199. if(dialogid == DIALOG_WEAPONS_RIFLE)
  200. {
  201. if(response) // If they clicked 'Select' or double-clicked a weapon
  202. {
  203. // Give them the weapon
  204. switch(listitem)
  205. {
  206. case 0:
  207. {
  208. if(GetPlayerMoney(playerid) < 30000) return SendClientMessage(playerid, 0xFF0000AA, "[ERROR]: You don't have enough cash to buy this weapon!");
  209. GivePlayerWeapon(playerid, 30, 256);
  210. GivePlayerMoney(playerid, -30000);
  211. SendClientMessage(playerid,-1,"You have Bought 'Ak-47' for $30.000.");
  212. }
  213. case 1:
  214. {
  215. if(GetPlayerMoney(playerid) < 25000) return SendClientMessage(playerid, 0xFF0000AA, "[ERROR]: You don't have enough cash to buy this weapon!");
  216. GivePlayerWeapon(playerid, 31, 256);
  217. GivePlayerMoney(playerid, -30000);
  218. SendClientMessage(playerid,-1,"You have Bought 'm4' for $30.000.");
  219. }
  220. case 2:
  221. {
  222. if(GetPlayerMoney(playerid) < 25000) return SendClientMessage(playerid, 0xFF0000AA, "[ERROR]: You don't have enough cash to buy this weapon!");
  223. GivePlayerWeapon(playerid, 33, 256);
  224. GivePlayerMoney(playerid, -30000);
  225. SendClientMessage(playerid,-1,"You have Bought 'Country Rifles' for $30.000.");
  226. }
  227. case 3:
  228. {
  229. if(GetPlayerMoney(playerid) < 25000) return SendClientMessage(playerid, 0xFF0000AA, "[ERROR]: You don't have enough cash to buy this weapon!");
  230. GivePlayerWeapon(playerid, 34, 300);
  231. GivePlayerMoney(playerid, -30000);
  232. SendClientMessage(playerid,-1,"You have Bought 'Sniper Rifles' for $30.000.");
  233. }
  234. }
  235. }
  236. return 1; // We handled a dialog, so return 1. Just like OnPlayerCommandText.
  237. }
  238. if(dialogid == DIALOG_WEAPONS_SPECIAL)
  239. {
  240. if(response) // If they clicked 'Select' or double-clicked a weapon
  241. {
  242. // Give them the weapon
  243. switch(listitem)
  244. {
  245. case 0:
  246. {
  247. if(GetPlayerMoney(playerid) < 50000) return SendClientMessage(playerid, 0xFF0000AA, "[ERROR]: You don't have enough cash to buy this weapon!");
  248. SetPlayerHealth(playerid, 100);
  249. GivePlayerMoney(playerid, -50000);
  250. SendClientMessage(playerid,-1,"You have Bought 'Health' for $50.000.");
  251. }
  252. case 1:
  253. {
  254. if(GetPlayerMoney(playerid) < 50000) return SendClientMessage(playerid, 0xFF0000AA, "[ERROR]: You don't have enough cash to buy this weapon!");
  255. SetPlayerArmour(playerid, 100);
  256. GivePlayerMoney(playerid, -50000);
  257. SendClientMessage(playerid,-1,"You have Bought 'Armour' for $50.000.");
  258. }
  259. case 2:
  260. {
  261. if(GetPlayerMoney(playerid) < 50000) return SendClientMessage(playerid, 0xFF0000AA, "[ERROR]: You don't have enough cash to buy this weapon!");
  262. GivePlayerWeapon(playerid, 46, 1);
  263. GivePlayerMoney(playerid, -50000);
  264. SendClientMessage(playerid,-1,"You have Bought 'Parachute' for $50.000.");
  265. }
  266. case 3:
  267. {
  268. if(GetPlayerMoney(playerid) < 50000) return SendClientMessage(playerid, 0xFF0000AA, "[ERROR]: You don't have enough cash to buy this weapon!");
  269. GivePlayerWeapon(playerid, 43, 300);
  270. GivePlayerMoney(playerid, -50000);
  271. SendClientMessage(playerid,-1,"You have Bought 'Camera' for $50.000.");
  272. }
  273. }
  274. }
  275. return 1; // We handled a dialog, so return 1. Just like OnPlayerCommandText.
  276. }
  277. return 1;
  278. }
  279.  
  280. CMD:w(playerid,params[]) {
  281. ShowPlayerDialog(playerid, DIALOG_WEAPONS, DIALOG_STYLE_LIST, "{FFFF00}Weapons", "Melee\nPistol\nShotguns\nSub Machine Guns\nRifle\nSpecial", "Select", "Cancel");
  282. return 1;
  283. }
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement