Advertisement
Guest User

Untitled

a guest
Aug 15th, 2012
61
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 8.39 KB | None | 0 0
  1. /*
  2. ||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||
  3. || FegyverVásárlás ||
  4. || By:RolePlay ||
  5. || 0.1V ||
  6. || Mentést nem tartalmaz! ||
  7. ||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||
  8. */
  9.  
  10. #include <a_samp>
  11. #include <zcmd>
  12. #include <sscanf2>
  13.  
  14. #define COLOR_F1 0x2c8a29AA
  15. #define COLOR_F2 0xc71a1aAA
  16. #define COLOR_F3 0x1a20c7AA
  17. #define FBOLT 1
  18.  
  19. CMD:buyweapon(playerid, params[])
  20. {
  21. if(!IsPlayerInRangeOfPoint(playerid, 1,1,1,1)) return SendClientMessage(playerid, COLOR_F3,"Nem vagy a fegyver boltbann!"); /// a koordikat rátok bízom
  22. ShowPlayerDialog(playerid, FBOLT, DIALOG_STYLE_LIST, "Fegyverbolt", "{9FE4AA}Pisztolyok \nPuskák \n{9FE4AA}Gépfegyverek \nFélatuómaták", "Tovább", "Kilépés");
  23. return 1;
  24. }
  25. public OnDialogResponse(playerid, dialogid, response, listitem, inputtext[])
  26. {
  27. if(dialogid == FBOLT)
  28. {
  29. if(response)
  30. {
  31. if(listitem == 0)
  32. {
  33. ShowPlayerDialog(playerid, FBOLT+1, DIALOG_STYLE_LIST, "Pisztolyok", "9mm 14 lőszer\t\t\t12.000$ \nHantompítós 9mm 14 lőszer\t\t\t13.000$ \nDesert Eagle 14 lőszer\t\t\t17.000$", "Kiválaszt", "Kilépés");
  34. }
  35. if(listitem == 1)
  36. {
  37. ShowPlayerDialog(playerid, FBOLT+2, DIALOG_STYLE_LIST, "Puskák", "Country Rifle 25 lőszer\t\t\t20.000$ \nSörétes 25 lőszer\t\t\t24.000$ \nCombat Shotgun\t\t\t30.000$", "Kiválaszt", "Kilépés");
  38. }
  39. if(listitem == 2)
  40. {
  41. ShowPlayerDialog(playerid, FBOLT+3, DIALOG_STYLE_LIST, "Gépfegyverek", "AK-47 90 lőszer\t\t\t35.500$ \nM4 90 lőszer\t\t\t32.000$", "Kiválaszt", "Kilépés");
  42. }
  43. if(listitem == 3)
  44. {
  45. ShowPlayerDialog(playerid, FBOLT+4, DIALOG_STYLE_LIST, "Félatuómaták", "Tec-9 120 lőszer\t\t\t15.500$ \nSMG/Uzi 120 lőszer\t\t\t12.000$ \nMP5 120 lőszer\t\t\t17.000$", "Kiválaszt", "Kilépés");
  46. }
  47. }
  48. }
  49. if(dialogid == FBOLT+1)
  50. {
  51. if(response)
  52. {
  53. if(listitem == 0)
  54. {
  55. if(GetPlayerMoney(playerid) <12000) return SendClientMessage(playerid, COLOR_F2, "Nincs pénzed erre a fegyverre!");
  56. GivePlayerMoney(playerid, -12000);
  57. GivePlayerWeapon(playerid,22,14);
  58. SendClientMessage(playerid, COLOR_F3, "Vásároltál 9mm-est 14 lőszerrel!");
  59. ShowPlayerDialog(playerid, FBOLT, DIALOG_STYLE_LIST, "Fegyverbolt", "{9FE4AA}Pisztolyok \nPuskák \n{9FE4AA}Gépfegyverek \nFélatuómaták", "Tovább", "Kilépés");
  60. }
  61. if(listitem == 1)
  62. {
  63. if(GetPlayerMoney(playerid) <13000) return SendClientMessage(playerid,COLOR_F1, "Nincs pénzed erre a fegyverre!");
  64. GivePlayerMoney(playerid, -13000);
  65. GivePlayerWeapon(playerid,23,14);
  66. SendClientMessage(playerid, COLOR_F2, "Vásároltál Hangtompítós 9mm-est 14 lőszerrel!");
  67. ShowPlayerDialog(playerid, FBOLT, DIALOG_STYLE_LIST, "Fegyverbolt", "{9FE4AA}Pisztolyok \nPuskák \n{9FE4AA}Gépfegyverek \nFélatuómaták", "Tovább", "Kilépés");
  68. }
  69. if(listitem == 2)
  70. {
  71. if(GetPlayerMoney(playerid) <17000) return SendClientMessage(playerid,COLOR_F1, "Nincs pénzed erre a fegyverre!");
  72. GivePlayerMoney(playerid, -17000);
  73. GivePlayerWeapon(playerid,24,14);
  74. SendClientMessage(playerid,COLOR_F2, "Vásároltál Desert Eaglet 14 lőszerrel!");
  75. ShowPlayerDialog(playerid, FBOLT, DIALOG_STYLE_LIST, "Fegyverbolt", "{9FE4AA}Pisztolyok \nPuskák \n{9FE4AA}Gépfegyverek \nFélatuómaták", "Tovább", "Kilépés");
  76. }
  77. }
  78. }
  79. if(dialogid == FBOLT+2)
  80. {
  81. if(response)
  82. {
  83. if(listitem == 0)
  84. {
  85. if(GetPlayerMoney(playerid) <20000) return SendClientMessage(playerid, COLOR_F1, "Nincs pénzed erre a fegyverre!");
  86. GivePlayerMoney(playerid, -20000);
  87. GivePlayerWeapon(playerid,33,25);
  88. SendClientMessage(playerid,COLOR_F1, "Vásároltál Country Rifle-t 25 lőszerrel!");
  89. ShowPlayerDialog(playerid, FBOLT, DIALOG_STYLE_LIST, "Fegyverbolt", "{9FE4AA}Pisztolyok \nPuskák \n{9FE4AA}Gépfegyverek \nFélatuómaták", "Tovább", "Kilépés");
  90. }
  91. if(listitem == 1)
  92. {
  93. if(GetPlayerMoney(playerid) <25000) return SendClientMessage(playerid, COLOR_F1, "Nincs pénzed erre a fegyverre!");
  94. GivePlayerMoney(playerid, -25000);
  95. GivePlayerWeapon(playerid,25,25);
  96. SendClientMessage(playerid,COLOR_F3, "Vásároltál Sörétest 25 lőszerrel!");
  97. ShowPlayerDialog(playerid, FBOLT, DIALOG_STYLE_LIST, "Fegyverbolt", "{9FE4AA}Pisztolyok \nPuskák \n{9FE4AA}Gépfegyverek \nFélatuómaták", "Tovább", "Kilépés");
  98. }
  99. if(listitem == 2)
  100. {
  101. if(GetPlayerMoney(playerid) <30000) return SendClientMessage(playerid, COLOR_F1, "Nincs pénzed erre a fegyverre!");
  102. GivePlayerMoney(playerid, -30000);
  103. GivePlayerWeapon(playerid,27,25);
  104. SendClientMessage(playerid,COLOR_F3, "Vásároltál Combat Shotgun-t 25 lőszerrel!");
  105. ShowPlayerDialog(playerid, FBOLT, DIALOG_STYLE_LIST, "Fegyverbolt", "{9FE4AA}Pisztolyok \nPuskák \n{9FE4AA}Gépfegyverek \nFélatuómaták", "Tovább", "Kilépés");
  106. }
  107. }
  108. }
  109. if(dialogid == FBOLT+3)
  110. {
  111. if(response)
  112. {
  113. if(listitem == 0)
  114. {
  115. if(GetPlayerMoney(playerid) <35500) return SendClientMessage(playerid, COLOR_F1, "Nincs pénzed erre a fegyverre!");
  116. GivePlayerMoney(playerid, -35500);
  117. GivePlayerWeapon(playerid,30,90);
  118. SendClientMessage(playerid,COLOR_F3, "Vásároltál AK-47-t 90 lőszerrel!");
  119. ShowPlayerDialog(playerid, FBOLT, DIALOG_STYLE_LIST, "Fegyverbolt", "{9FE4AA}Pisztolyok \nPuskák \n{9FE4AA}Gépfegyverek \nFélatuómaták", "Tovább", "Kilépés");
  120. }
  121. if(listitem == 1)
  122. {
  123. if(GetPlayerMoney(playerid) <32000) return SendClientMessage(playerid, COLOR_F1, "Nincs pénzed erre a fegyverre!");
  124. GivePlayerMoney(playerid, -32000);
  125. GivePlayerWeapon(playerid,31,90);
  126. SendClientMessage(playerid,COLOR_F3, "Vásároltál M4-et 90 lőszerrel!");
  127. ShowPlayerDialog(playerid, FBOLT, DIALOG_STYLE_LIST, "Fegyverbolt", "{9FE4AA}Pisztolyok \nPuskák \n{9FE4AA}Gépfegyverek \nFélatuómaták", "Tovább", "Kilépés");
  128. }
  129. }
  130. }
  131. if(dialogid == FBOLT+4)
  132. {
  133. if(response)
  134. {
  135. if(listitem == 0)
  136. {
  137. if(GetPlayerMoney(playerid) <15500) return SendClientMessage(playerid, COLOR_F1, "Nincs pénzed erre a fegyverre!");
  138. GivePlayerMoney(playerid, -15500);
  139. GivePlayerWeapon(playerid,32,120);
  140. SendClientMessage(playerid,COLOR_F3, "Vásároltál Tec9-et 120 lőszerrel!");
  141. ShowPlayerDialog(playerid, FBOLT, DIALOG_STYLE_LIST, "Fegyverbolt", "{9FE4AA}Pisztolyok \nPuskák \n{9FE4AA}Gépfegyverek \nFélatuómaták", "Tovább", "Kilépés");
  142. }
  143. if(listitem == 1)
  144. {
  145. if(GetPlayerMoney(playerid) <12000) return SendClientMessage(playerid, COLOR_F1, "Nincs pénzed erre a fegyverre!");
  146. GivePlayerMoney(playerid, -12000);
  147. GivePlayerWeapon(playerid,28,120);
  148. SendClientMessage(playerid,COLOR_F3, "Vásároltál Uzi-t 120 lőszerrel!");
  149. ShowPlayerDialog(playerid, FBOLT, DIALOG_STYLE_LIST, "Fegyverbolt", "{9FE4AA}Pisztolyok \nPuskák \n{9FE4AA}Gépfegyverek \nFélatuómaták", "Tovább", "Kilépés");
  150. }
  151. if(listitem == 2)
  152. {
  153. if(GetPlayerMoney(playerid) <17000) return SendClientMessage(playerid, COLOR_F1, "Nincs pénzed erre a fegyverre!");
  154. GivePlayerMoney(playerid, -17000);
  155. GivePlayerWeapon(playerid,29,120);
  156. SendClientMessage(playerid,COLOR_F3, "Vásároltál MP5-t 120 lőszerrel!");
  157. ShowPlayerDialog(playerid, FBOLT, DIALOG_STYLE_LIST, "Fegyverbolt", "{9FE4AA}Pisztolyok \nPuskák \n{9FE4AA}Gépfegyverek \nFélatuómaták", "Tovább", "Kilépés");
  158. }
  159. }
  160. }
  161. return 1;
  162. }
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement