Advertisement
leingod

Leingod's Team Chooser System. v.1.0 (DCMD)

Aug 14th, 2011
92
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
Pawn 4.16 KB | None | 0 0
  1. /*
  2.                         Copyright(c), leingod - 2011
  3. ________________________________________________________________________________
  4.  
  5.                    ##     ##### ## ###  #  #####   ##  ###
  6.                    ##     ##    ## ###  # ##      #  # #  #
  7.                    ##     ####  ## ## # # ##  ### #  # #   #
  8.                    ##     ##    ## ##  ## ##    # #  # #  #
  9.                    ############ ## ##   #  #####   ##  ###
  10.  
  11.                            Team Chooser System v1.0
  12.                          ---------------------------
  13. ________________________________________________________________________________
  14.  
  15. FORUM SA:MP PROFILE: http://forum.sa-mp.com/member.php?u=120914
  16.  
  17. Credits:
  18. -ME FOR CODING
  19. -SAMP TEAM
  20. -DCMD
  21. -DINI
  22. -SSCANF
  23.  
  24. ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
  25. */
  26.  
  27. #include <a_samp>
  28. #include <dini>
  29. #include <sscanf>
  30.  
  31. #define dcmd(%1,%2,%3) if ((strcmp((%3)[1], #%1, true, (%2)) == 0) && ((((%3)[(%2) + 1] == 0) && (dcmd_%1(playerid, "")))||(((%3)[(%2) + 1] == 32) && (dcmd_%1(playerid, (%3)[(%2) + 2]))))) return 1
  32.  
  33.  
  34. // COLORS
  35. #define usage 0xFFEEC1AA
  36. #define error 0xFF3434AA
  37. #define lancar 0x34C6FFAA
  38.  
  39. // DEFINES
  40. #define version_team_chooser        "1.0"
  41.  
  42. enum LData
  43. {
  44.     Team
  45. };
  46.  
  47. new TeamInfo[MAX_PLAYERS][LData];
  48. new LGDTeam[MAX_PLAYERS];
  49.  
  50.  
  51. public OnFilterScriptInit()
  52. {
  53.     print("\n----------------------------------------------------");
  54.     print(" Running FilterScript Leingod's team chooser v"#version_team_chooser"");
  55.     print("----------------------------------------------------\n");
  56.     return 1;
  57. }
  58.  
  59. public OnPlayerConnect(playerid)
  60. {
  61.     new LName[MAX_PLAYER_NAME], file[128];
  62.     GetPlayerName(playerid,LName,sizeof(LName));
  63.     format(file,sizeof(file),"Teams/%s.ini",LName);
  64.     if(!dini_Exists(file))
  65.     {
  66.         dini_Create(file);
  67.         dini_IntSet(file,"Team",TeamInfo[playerid][Team]);
  68.         new rteam = random(-999999999999);
  69.         LGDTeam[playerid] = rteam;
  70.     }
  71.     if(dini_Exists(file))
  72.     {
  73.         TeamInfo[playerid][Team] = dini_Int(file,"Team");
  74.         LGDTeam[playerid] = dini_Int(file,"Team");
  75.     }
  76.     return 1;
  77. }
  78.  
  79.  
  80. // DCMD COMMANDS
  81.  
  82. public OnPlayerCommandText(playerid, cmdtext[])
  83. {
  84.     dcmd(setteam, 7, cmdtext);
  85.     dcmd(myteam, 6, cmdtext);
  86.     dcmd(resetteam, 9, cmdtext);
  87.     dcmd(teamhelp, 8, cmdtext);
  88.     return 0;
  89. }
  90.  
  91. dcmd_setteam(playerid, params[])
  92. {
  93.     new LTeam;
  94.     #pragma unused params
  95.     if(sscanf(params, "d", LTeam)) return SendClientMessage(playerid, usage, "[USAGE]: /setteam [1-999,999]");
  96.     else if (LTeam >= 999999 || LTeam == 0) return SendClientMessage(playerid, error, "[ERROR]: Team id must between 1 and 999,999");
  97.     else
  98.     {
  99.         new string[128], LName[MAX_PLAYER_NAME], file[128];
  100.         format(string, sizeof(string), "[SERVER]: Success choosing team id -> '%d'.", LTeam);
  101.         SendClientMessage(playerid, lancar, string);
  102.         LGDTeam[playerid] = LTeam;
  103.         SetPlayerTeam(playerid, LGDTeam[playerid]);
  104.         SetPlayerTeam(playerid, LTeam);
  105.         GetPlayerName(playerid,LName,sizeof(LName));
  106.         format(file,sizeof(file),"Teams/%s.ini",LName);
  107.         dini_IntSet(file,"Team",LGDTeam[playerid]);
  108.     }
  109.     return 1;
  110. }
  111.  
  112. dcmd_myteam(playerid, params[])
  113. {
  114.     new str[256];
  115.     #pragma unused params
  116.     format(str, sizeof(str), "[SERVER]: Your team id -> '%d'.", LGDTeam);
  117.     SendClientMessage(playerid, lancar, str);
  118.     return 1;
  119. }
  120.  
  121. dcmd_resetteam(playerid, params[])
  122. {
  123.     new rteam = random(-999999999999), LName[MAX_PLAYER_NAME], file[128];
  124.     #pragma unused params
  125.     LGDTeam[playerid] = rteam;
  126.     SetPlayerTeam(playerid, LGDTeam[playerid]);
  127.     SendClientMessage(playerid, usage, "[SERVER]: Success make your team to netral, Everybody are enemy!.");
  128.     GetPlayerName(playerid,LName,sizeof(LName));
  129.     format(file,sizeof(file),"Teams/%s.ini",LName);
  130.     dini_IntSet(file,"Team",LGDTeam[playerid]);
  131.     return 1;
  132. }
  133.  
  134. dcmd_teamhelp(playerid, params[])
  135. {
  136.     #pragma unused params
  137.     SendClientMessage(playerid, usage, "Team Set Helps:");
  138.     SendClientMessage(playerid, lancar, "/setteam = for selecting teams with the numbered id");
  139.     SendClientMessage(playerid, lancar, "/myteam = for see your team id");
  140.     SendClientMessage(playerid, lancar, "/resetteam = for setting your team to netral");
  141.     SendClientMessage(playerid, error, "TeamChooser credits: leingod the creator of this command");
  142.     return 1;
  143. }
  144.  
  145. // ©leingod 2011 - All rights Reserved
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement