API tools faq
paste
Guest User

Weapons System By Yagel (c) 2012-2013

a guest
May 22nd, 2012
383
0
Never
Add comment
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
Pawn 10.43 KB | None | 0 0
raw download clone embed print report
  1. //המערכת נבנתה ע''י יגל!!!!! By Yagel! :D
  2.  
  3. #include <a_samp>
  4. #include <cpstream>
  5. #include <Double-O-Files 2>
  6.  
  7. #define DIALOG_WEAPONS 100
  8.  
  9. #define red 0xFF0000FF
  10. #define golden 0xFFD700FF
  11. //======== Weapon Price ======//
  12. #define Sawn           10000
  13. #define Micro          5000
  14. #define TEC9           6000
  15. #define M4             20000
  16. #define MP5            6000
  17. #define AK47           15000
  18. #define Knife          2000
  19. #define Katana         20000
  20. #define Combat         12000
  21. #define Shotgun        6000
  22. #define Sniper         35000
  23. #define Pistol         5000
  24. //============================//
  25.  
  26. new CP_Weapons;
  27.  
  28. public OnGameModeInit()
  29. {
  30.     print("Weapons System By Yagel (c) 2012-2013\n");
  31.     print("Please don't remove credits!! [By Yagel]");
  32.  
  33.     SetGameModeText("Weapon System By Yagel");UsePlayerPedAnims(), EnableStuntBonusForAll(false);
  34.     CP_Weapons = CPS_AddCheckpoint(290.9623, -83.9879, 1001.5156, 2.5, 100);
  35.     return 1;
  36. }
  37. //==============================================================================
  38. public OnGameModeExit()
  39. {
  40.     DOF2_SaveFile(); DOF2_Exit();
  41.     return 1;
  42. }
  43. //==============================================================================
  44. public OnPlayerSpawn(playerid)
  45. {
  46.     if(!DOF2_FileExists(wFile(playerid)))
  47.     {
  48.     DOF2_CreateFile(wFile(playerid));
  49.     DOF2_SetInt(wFile(playerid), "SawnOff", 0);
  50.     DOF2_SetInt(wFile(playerid), "MicroSMG", 0);
  51.     DOF2_SetInt(wFile(playerid), "TEC9", 0);
  52.     DOF2_SetInt(wFile(playerid), "M4", 0);
  53.     DOF2_SetInt(wFile(playerid), "MP5", 0);
  54.     DOF2_SetInt(wFile(playerid), "AK47", 0);
  55.     DOF2_SetInt(wFile(playerid), "Knife", 0);
  56.     DOF2_SetInt(wFile(playerid), "Katana", 0);
  57.     DOF2_SetInt(wFile(playerid), "Combat", 0);
  58.     DOF2_SetInt(wFile(playerid), "Shotgun", 0);
  59.     DOF2_SetInt(wFile(playerid), "Sniper", 0);
  60.     DOF2_SetInt(wFile(playerid), "Pistol", 0);
  61.     DOF2_SaveFile();
  62.     }
  63.     else if(DOF2_FileExists(wFile(playerid)))
  64.     {
  65.     if(DOF2_GetInt(wFile(playerid), "SawnOff") != 0) GivePlayerWeapon(playerid, 26, DOF2_GetInt(wFile(playerid), "SawnOff"));
  66.     if(DOF2_GetInt(wFile(playerid), "MicroSMG") != 0) GivePlayerWeapon(playerid, 28, DOF2_GetInt(wFile(playerid), "MicroSMG"));
  67.     if(DOF2_GetInt(wFile(playerid), "TEC9") != 0) GivePlayerWeapon(playerid, 32, DOF2_GetInt(wFile(playerid), "TEC9"));
  68.     if(DOF2_GetInt(wFile(playerid), "M4") != 0) GivePlayerWeapon(playerid, 31, DOF2_GetInt(wFile(playerid), "M4"));
  69.     if(DOF2_GetInt(wFile(playerid), "MP5") != 0) GivePlayerWeapon(playerid, 29, DOF2_GetInt(wFile(playerid), "MP5"));
  70.     if(DOF2_GetInt(wFile(playerid), "AK47") != 0) GivePlayerWeapon(playerid, 30, DOF2_GetInt(wFile(playerid), "AK47"));
  71.     if(DOF2_GetInt(wFile(playerid), "Knife") != 0) GivePlayerWeapon(playerid, 4, DOF2_GetInt(wFile(playerid), "Knife"));
  72.     if(DOF2_GetInt(wFile(playerid), "Katana") != 0) GivePlayerWeapon(playerid, 8, DOF2_GetInt(wFile(playerid), "Katana"));
  73.     if(DOF2_GetInt(wFile(playerid), "Combat") != 0) GivePlayerWeapon(playerid, 27, DOF2_GetInt(wFile(playerid), "Combat"));
  74.     if(DOF2_GetInt(wFile(playerid), "Shotgun") != 0) GivePlayerWeapon(playerid, 25, DOF2_GetInt(wFile(playerid), "Shotgun"));
  75.     if(DOF2_GetInt(wFile(playerid), "Sniper") != 0) GivePlayerWeapon(playerid, 34, DOF2_GetInt(wFile(playerid), "Sniper"));
  76.     if(DOF2_GetInt(wFile(playerid), "Pistol") != 0) GivePlayerWeapon(playerid, 22, DOF2_GetInt(wFile(playerid), "Pistol"));
  77.     }
  78.     return 1;
  79. }
  80. //==============================================================================
  81. public OnPlayerCommandText(playerid, cmdtext[])
  82. {
  83.     if(!strcmp(cmdtext, "/Ammo", true))
  84.     {
  85.     SetPlayerPos(playerid, 285.8010,-84.5476,1001.5156);
  86.     SetPlayerFacingAngle(playerid, 359.9000);
  87.     SetPlayerInterior(playerid, 6);
  88.     SendClientMessage(playerid, golden, "!áøåê äáà ìçðåú äðù÷éí");
  89.     GameTextForPlayer(playerid, "~r~Ammo-Nation", 3000, 1);
  90.     return 1;
  91.     }
  92.     return 0;
  93. }
  94. //==============================================================================
  95. public OnPlayerEnterCheckpoint(playerid)
  96. {
  97.     if(CPS_IsPlayerInCheckpoint(playerid, CP_Weapons))
  98.     {
  99.     ShowPlayerDialog(playerid, DIALOG_WEAPONS, DIALOG_STYLE_LIST, "Weapons Options","1.  Sawn Off Shotgun - (10,000$)\n2.  MicroSMG - (5,000$)\n3.  TEC9 - (6,000$)\n4.  M4 - (20,000$)\n5.  MP5 - (6,000$)\n6.  AK47 - (15,000$)\n7.  Knife - (2,000$)\n8.  Katana - (20,000$)\n9.  Combat Shotgun - (12,000$)\n10. Shotgun - (6,000$)\n11. Sniper - (35,000$)\n12. Pistol - (5,000$)", "÷ðä", "éöéàä");
  100.     }
  101.     return 1;
  102. }
  103. //==============================================================================
  104. public OnDialogResponse(playerid, dialogid, response, listitem, inputtext[])
  105. {
  106.     if(dialogid == DIALOG_WEAPONS)
  107.     {
  108.     if(!response) return 0;
  109.     if(response)
  110.     {
  111.     if(listitem == 0) // SawnOff Shotgun
  112.     {
  113.     if(GetPlayerMoney(playerid) < Sawn) return SendClientMessage(playerid, red, "!àéï ìê îñôé÷ ëñó");
  114.     GivePlayerMoney(playerid, -Sawn), SendClientMessage(playerid, golden, ".Sawn Off Shotgun ÷ðéú àú äðù÷");
  115.     DOF2_SetInt(wFile(playerid), "SawnOff", DOF2_GetInt(wFile(playerid), "SawnOff")+100); DOF2_SetInt(wFile(playerid), "Combat", 0); DOF2_SetInt(wFile(playerid), "Shotgun", 0); DOF2_SaveFile();
  116.     GivePlayerWeapon(playerid, 26, DOF2_GetInt(wFile(playerid), "SawnOff"));
  117.     }
  118.     if(listitem == 1) // MicroSMG
  119.     {
  120.     if(GetPlayerMoney(playerid) < Micro) return SendClientMessage(playerid, red, "!àéï ìê îñôé÷ ëñó");
  121.     GivePlayerMoney(playerid, -Micro), SendClientMessage(playerid, golden, ".MicroSMG ÷ðéú àú äðù÷");
  122.     DOF2_SetInt(wFile(playerid), "MicroSMG", DOF2_GetInt(wFile(playerid), "MicroSMG")+100); DOF2_SetInt(wFile(playerid), "TEC9", 0); DOF2_SaveFile();
  123.     GivePlayerWeapon(playerid, 28, DOF2_GetInt(wFile(playerid), "MicroSMG"));
  124.     }
  125.     if(listitem == 2) // TEC9
  126.     {
  127.     if(GetPlayerMoney(playerid) < TEC9) return SendClientMessage(playerid, red, "!àéï ìê îñôé÷ ëñó");
  128.     GivePlayerMoney(playerid, -TEC9), SendClientMessage(playerid, golden, ".TEC9 ÷ðéú àú äðù÷");
  129.     DOF2_SetInt(wFile(playerid), "TEC9", DOF2_GetInt(wFile(playerid), "TEC9")+100); DOF2_SetInt(wFile(playerid), "MicroSMG", 0); DOF2_SaveFile();
  130.     GivePlayerWeapon(playerid, 32, DOF2_GetInt(wFile(playerid), "TEC9"));
  131.     }
  132.     if(listitem == 3) // M4
  133.     {
  134.     if(GetPlayerMoney(playerid) < M4) return SendClientMessage(playerid, red, "!àéï ìê îñôé÷ ëñó");
  135.     GivePlayerMoney(playerid, -M4), SendClientMessage(playerid, golden, ".M4 ÷ðéú àú äðù÷");
  136.     DOF2_SetInt(wFile(playerid), "M4", DOF2_GetInt(wFile(playerid), "M4")+100); DOF2_SetInt(wFile(playerid), "AK47", 0); DOF2_SaveFile();
  137.     GivePlayerWeapon(playerid, 31, DOF2_GetInt(wFile(playerid), "M4"));
  138.     }
  139.     if(listitem == 4) // MP5
  140.     {
  141.     if(GetPlayerMoney(playerid) < MP5) return SendClientMessage(playerid, red, "!àéï ìê îñôé÷ ëñó");
  142.     GivePlayerMoney(playerid, -MP5), SendClientMessage(playerid, golden, ".MP5 ÷ðéú àú äðù÷");
  143.     DOF2_SetInt(wFile(playerid), "MP5", DOF2_GetInt(wFile(playerid), "MP5")+100); DOF2_SaveFile();
  144.     GivePlayerWeapon(playerid, 29, DOF2_GetInt(wFile(playerid), "MP5"));
  145.     }
  146.     if(listitem == 5) // AK47
  147.     {
  148.     if(GetPlayerMoney(playerid) < AK47) return SendClientMessage(playerid, red, "!àéï ìê îñôé÷ ëñó");
  149.     GivePlayerMoney(playerid, -AK47), SendClientMessage(playerid, golden, ".Ak47 ÷ðéú àú äðù÷");
  150.     DOF2_SetInt(wFile(playerid), "AK47", DOF2_GetInt(wFile(playerid), "AK47")+100); DOF2_SetInt(wFile(playerid), "M4", 0); DOF2_SaveFile();
  151.     GivePlayerWeapon(playerid, 30, DOF2_GetInt(wFile(playerid), "AK47"));
  152.     }
  153.     if(listitem == 6) // Knife
  154.     {
  155.     if(GetPlayerMoney(playerid) < Knife) return SendClientMessage(playerid, red, "!àéï ìê îñôé÷ ëñó");
  156.     GivePlayerMoney(playerid, -Knife), SendClientMessage(playerid, golden, ".Knife ÷ðéú àú äðù÷");
  157.     DOF2_SetInt(wFile(playerid), "Knife", 1); DOF2_SetInt(wFile(playerid), "Katana", 0); DOF2_SaveFile();
  158.     GivePlayerWeapon(playerid, 4, 1);
  159.     }
  160.     if(listitem == 7) // Katana
  161.     {
  162.     if(GetPlayerMoney(playerid) < Katana) return SendClientMessage(playerid, red, "!àéï ìê îñôé÷ ëñó");
  163.     GivePlayerMoney(playerid, -Katana), SendClientMessage(playerid, golden, ".Katana ÷ðéú àú äðù÷");
  164.     DOF2_SetInt(wFile(playerid), "Katana", 1); DOF2_SetInt(wFile(playerid), "Knife", 0); DOF2_SaveFile();
  165.     GivePlayerWeapon(playerid, 8, 1);
  166.     }
  167.     if(listitem == 8) // Combat
  168.     {
  169.     if(GetPlayerMoney(playerid) < Combat) return SendClientMessage(playerid, red, "!àéï ìê îñôé÷ ëñó");
  170.     GivePlayerMoney(playerid, -Combat), SendClientMessage(playerid, golden, ".Combat Shotgun ÷ðéú àú äðù÷");
  171.     DOF2_SetInt(wFile(playerid), "Combat", DOF2_GetInt(wFile(playerid), "Combat")+100); DOF2_SetInt(wFile(playerid), "SawnOff", 0); DOF2_SetInt(wFile(playerid), "Shotgun", 0); DOF2_SaveFile();
  172.     GivePlayerWeapon(playerid, 27, DOF2_GetInt(wFile(playerid), "Combat"));
  173.     }
  174.     if(listitem == 9) // Shotgun
  175.     {
  176.     if(GetPlayerMoney(playerid) < Shotgun) return SendClientMessage(playerid, red, "!àéï ìê îñôé÷ ëñó");
  177.     GivePlayerMoney(playerid, -Shotgun), SendClientMessage(playerid, golden, ".Shotgun ÷ðéú àú äðù÷");
  178.     DOF2_SetInt(wFile(playerid), "Shotgun", DOF2_GetInt(wFile(playerid), "Shotgun")+100); DOF2_SetInt(wFile(playerid), "SawnOff", 0); DOF2_SetInt(wFile(playerid), "Combat", 0); DOF2_SaveFile();
  179.     GivePlayerWeapon(playerid, 25, DOF2_GetInt(wFile(playerid), "Shotgun"));
  180.     }
  181.     if(listitem == 10) // Sniper
  182.     {
  183.     if(GetPlayerMoney(playerid) < Sniper) return SendClientMessage(playerid, red, "!àéï ìê îñôé÷ ëñó");
  184.     GivePlayerMoney(playerid, -Sniper), SendClientMessage(playerid, golden, ".Sniper ÷ðéú àú äðù÷");
  185.     DOF2_SetInt(wFile(playerid), "Sniper", DOF2_GetInt(wFile(playerid), "Sniper")+100); DOF2_SaveFile();
  186.     GivePlayerWeapon(playerid, 34, DOF2_GetInt(wFile(playerid), "Sniper"));
  187.     }
  188.     if(listitem == 11) // Pistol
  189.     {
  190.     if(GetPlayerMoney(playerid) < Pistol) return SendClientMessage(playerid, red, "!àéï ìê îñôé÷ ëñó");
  191.     GivePlayerMoney(playerid, -Pistol), SendClientMessage(playerid, golden, ".Pistol ÷ðéú àú äðù÷");
  192.     DOF2_SetInt(wFile(playerid), "Pistol", DOF2_GetInt(wFile(playerid), "Pistol")+100); DOF2_SaveFile();
  193.     GivePlayerWeapon(playerid, 22, DOF2_GetInt(wFile(playerid), "Pistol"));
  194.     }
  195.   }
  196. }
  197.     return 1;
  198. }
  199. //==============================================================================
  200. stock wFile(playerid)
  201. {
  202.     new file[256];
  203.     format(file, sizeof(file), "WeaponSysByYagel/%s.ini", GetName(playerid));
  204.     return file;
  205. }
  206. stock GetName(playerid){ new name[MAX_PLAYER_NAME]; GetPlayerName(playerid, name, sizeof(name)); return name;}
Advertisement
Add Comment
Please, Sign In to add comment
Public Pastes
We use cookies for various purposes including analytics. By continuing to use Pastebin, you agree to our use of cookies as described in the Cookies Policy.  OK, I Understand
Not a member of Pastebin yet?
Sign Up, it unlocks many cool features!