Guest User

Armas catalogo

a guest
Mar 10th, 2012
665
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 5.29 KB | None | 0 0
  1. #include <a_samp>
  2. new Text:Menu, Text:Info, qarma[MAX_PLAYERS], menuarmas[MAX_PLAYERS], pickup[6];
  3. forward Arma(playerid);
  4.  
  5. public OnGameModeInit()
  6. {
  7. Menu = TextDrawCreate(112.000000, 113.000000, "~n~Menu de armas~n~~n~9mm~n~Escopeta~n~MP5~n~AK-47~n~M4~n~Recortada~n~_");
  8. TextDrawAlignment(Menu, 2);
  9. TextDrawBackgroundColor(Menu, 255);
  10. TextDrawFont(Menu, 2);
  11. TextDrawLetterSize(Menu, 0.360000, 1.000000);
  12. TextDrawColor(Menu, -1);
  13. TextDrawSetOutline(Menu, 1);
  14. TextDrawSetProportional(Menu, 1);
  15. TextDrawUseBox(Menu, 1);
  16. TextDrawBoxColor(Menu, 336870460);
  17. TextDrawTextSize(Menu, 856.000000, 178.000000);
  18.  
  19. Info = TextDrawCreate(256.000000, 127.000000, "INFORMACION~n~~n~Nombre X~n~ID X~n~Precio $X");
  20. TextDrawAlignment(Info, 2);
  21. TextDrawBackgroundColor(Info, 255);
  22. TextDrawFont(Info, 2);
  23. TextDrawLetterSize(Info, 0.330000, 0.899999);
  24. TextDrawColor(Info, -1);
  25. TextDrawSetOutline(Info, 1);
  26. TextDrawSetProportional(Info, 1);
  27. TextDrawUseBox(Info, 1);
  28. TextDrawBoxColor(Info, 336870460);
  29. TextDrawTextSize(Info, 42.000000, -110.000000);return 1;}
  30. public OnPlayerCommandText(playerid, cmdtext[])
  31. {
  32. if(strcmp("/armas", cmdtext, true) == 0)
  33. {
  34. qarma[playerid] = 0;menuarmas[playerid] = 1;TextDrawShowForPlayer(playerid, Menu);TextDrawShowForPlayer(playerid, Info);
  35. return 1;}return 0;}
  36. public Arma(playerid)
  37. {
  38. new Float:X,Float:Y,Float:Z;
  39. GetPlayerPos(playerid,X,Y,Z);
  40. if(qarma[playerid] == 1)
  41. {
  42. DestroyPickup(pickup[1]);DestroyPickup(pickup[2]);DestroyPickup(pickup[3]);DestroyPickup(pickup[4]);DestroyPickup(pickup[5]);
  43. pickup[0] = CreatePickup(348, 2, X+2,Y+2,Z, GetPlayerVirtualWorld(playerid));
  44. TextDrawSetString(Menu, "~n~Menu de armas~n~~n~~g~9mm~n~~w~Escopeta~n~MP5~n~AK-47~n~M4~n~Recortada~n~_");
  45. TextDrawSetString(Info,"INFORMACION~n~~n~Nombre 9MM~n~ID 22~n~Precio $50");
  46. }
  47. if(qarma[playerid] == 2)
  48. {
  49. DestroyPickup(pickup[0]);DestroyPickup(pickup[2]);DestroyPickup(pickup[3]);DestroyPickup(pickup[4]);DestroyPickup(pickup[5]);
  50. pickup[1] = CreatePickup(349, 2, X+2,Y+2,Z,GetPlayerVirtualWorld(playerid));
  51. TextDrawSetString(Menu, "~n~Menu de armas~n~~n~9mm~n~~g~Escopeta~n~~w~MP5~n~AK-47~n~M4~n~Recortada~n~_");
  52. TextDrawSetString(Info,"INFORMACION~n~~n~Nombre Escopeta~n~ID 25~n~Precio $250");
  53. }
  54. if(qarma[playerid] == 3)
  55. {
  56. DestroyPickup(pickup[1]);DestroyPickup(pickup[0]);DestroyPickup(pickup[3]);DestroyPickup(pickup[4]);DestroyPickup(pickup[5]);
  57. pickup[2] = CreatePickup(353, 2, X+2,Y+2,Z,GetPlayerVirtualWorld(playerid));
  58. TextDrawSetString(Menu, "~n~Menu de armas~n~~n~9mm~n~Escopeta~n~~g~MP5~n~~w~AK-47~n~M4~n~Recortada~n~_");
  59. TextDrawSetString(Info,"INFORMACION~n~~n~Nombre MP5~n~ID 29~n~Precio $260");
  60. }
  61. if(qarma[playerid] == 4)
  62. {
  63. DestroyPickup(pickup[1]);DestroyPickup(pickup[2]);DestroyPickup(pickup[0]);DestroyPickup(pickup[4]);DestroyPickup(pickup[5]);
  64. pickup[3] = CreatePickup(355, 2, X+2,Y+2,Z,GetPlayerVirtualWorld(playerid));
  65. TextDrawSetString(Menu, "~n~Menu de armas~n~~n~9mm~n~Escopeta~n~MP5~n~~g~AK-47~n~~w~M4~n~Recortada~n~_");
  66. TextDrawSetString(Info,"INFORMACION~n~~n~Nombre AK-47~n~ID 30~n~Precio $350");
  67. }
  68. if(qarma[playerid] == 5)
  69. {
  70. DestroyPickup(pickup[1]);DestroyPickup(pickup[2]);DestroyPickup(pickup[3]);DestroyPickup(pickup[0]);DestroyPickup(pickup[5]);
  71. pickup[4] = CreatePickup(356, 2, X+2,Y+2,Z,GetPlayerVirtualWorld(playerid));
  72. TextDrawSetString(Menu, "~n~Menu de armas~n~~n~9mm~n~Escopeta~n~MP5~n~AK-47~n~~g~M4~n~~w~Recortada~n~_");
  73. TextDrawSetString(Info,"INFORMACION~n~~n~Nombre M4~n~ID 31~n~Precio $360");
  74. }
  75. if(qarma[playerid] == 6)
  76. {
  77. DestroyPickup(pickup[1]);DestroyPickup(pickup[2]);DestroyPickup(pickup[3]);DestroyPickup(pickup[4]);DestroyPickup(pickup[0]);
  78. pickup[5] = CreatePickup(350, 2, X+2,Y+2,Z,GetPlayerVirtualWorld(playerid));
  79. TextDrawSetString(Menu, "~n~Menu de armas~n~~n~9mm~n~Escopeta~n~MP5~n~AK-47~n~M4~n~~g~Recortada~n~_~w~");
  80. TextDrawSetString(Info,"INFORMACION~n~~n~Nombre Recortada~n~ID 26~n~Precio $150");}return 1;}
  81. public OnPlayerKeyStateChange(playerid, newkeys, oldkeys)
  82. {
  83. if(menuarmas[playerid] == 1)
  84. {
  85. if (newkeys & KEY_YES){qarma[playerid] ++;Arma(playerid);if(qarma[playerid] == 7){qarma[playerid] = 1;Arma(playerid);}}
  86. else if (newkeys & KEY_NO){qarma[playerid] --;Arma(playerid);if(qarma[playerid] == 0){qarma[playerid] = 6;Arma(playerid);}}
  87. else if (newkeys & 16)
  88. {
  89. if(qarma[playerid] == 1){GivePlayerMoney(playerid, -50);GivePlayerWeapon(playerid,22,500);}
  90. if(qarma[playerid] == 2){GivePlayerMoney(playerid, -250);GivePlayerWeapon(playerid,25,500);}
  91. if(qarma[playerid] == 3){GivePlayerMoney(playerid, -260);GivePlayerWeapon(playerid,29,500);}
  92. if(qarma[playerid] == 4){GivePlayerMoney(playerid, -350);GivePlayerWeapon(playerid,30,500);}
  93. if(qarma[playerid] == 5){GivePlayerMoney(playerid, -360);GivePlayerWeapon(playerid,31,500);}
  94. if(qarma[playerid] == 6){GivePlayerMoney(playerid, -50);GivePlayerWeapon(playerid,26,500);}
  95. }
  96. else if (newkeys & 8)
  97. {
  98. TextDrawHideForPlayer(playerid, Menu);
  99. TextDrawHideForPlayer(playerid, Info);
  100. qarma[playerid] = 0;
  101. menuarmas[playerid] = 0;
  102. DestroyPickup(pickup[0]);DestroyPickup(pickup[1]);DestroyPickup(pickup[2]);DestroyPickup(pickup[3]);DestroyPickup(pickup[4]);DestroyPickup(pickup[5]);
  103. }}return 1;}
Advertisement
Add Comment
Please, Sign In to add comment