API tools faq
paste
DevilDev

CTC(v1.3) link revised

DevilDev
Mar 5th, 2015
698
0
Never
Add comment
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
Pawn 51.71 KB | None | 0 0
raw download clone embed print report
  1. //============================================================================//
  2. /*
  3. Credits goes to :-
  4. *YSI
  5. *Zcmd
  6. *sscanf2
  7. *Samp Team
  8. *Lux Admin For Their 2nd Rcon Pass
  9. *Incongnito (Streamer)
  10. *Progressbarcreator
  11. *Those who help me to create it & Check it(Heiu & Corandus)
  12. *tedit to edit textdraws quickly
  13. */
  14. //----------------------------------------------------------------------------//
  15. //============================================================================//
  16. //---------------------------CLAN-Tag-CREATOR(v1.3)---------------------------//
  17. //===================Scripted By SagarDev(A.K.A. Prince Kumar/Sagar Dewani)================//
  18. //---------------===========-----------------================----------=======//
  19. /*
  20. ################################################################################
  21.                                 --New Updates(v1.2)--
  22. ################################################################################
  23. - 3D text label added to (Clan Member & Clan Leaders Heade)
  24. - Rectangle Area Added Max(x) - +150, Max(y) - +150; Min(x) - Player Pos, Min(y) - Player Pos;
  25. - New 4 cmds:::-(Every Cmd Work For Rcon Admin)
  26.                   /teleclan- To tele clan members To leader or Admin
  27.                  /GiveOrder- To give order to clan members
  28.                 /CreateClanArea - It Will Create Clan Area(Allow Clan Members To Enter Otherwise Kill Players)
  29.                /DestroyClanArea - To Destroy Clan Area
  30. -When You Create Clan Area It will creates an Area to player position in yellow color
  31. -When clan Members will enter/exit in clan area they will get msg.. That They are in clan area or not.
  32. -On Player login in Rcon you will get a dialog to do login for second security To secure your server !
  33. -You can enable or disable a few features using true & false !
  34. -Don't forget to change rcon second security password ( #define SECOND_RCON_PASS "your_password")
  35. -You can do anything with it like changing script & launch your version similiar it without any permission
  36. -Don't forget to give +rep if you like it :D
  37. ################################################################################
  38. ================================== New =========================================
  39. ################################################################################
  40. *Huh, my exams are over .. now its time to script for you my friends..* :D
  41. *Again Saying that don't forget to suggest me about your new ideas for this script .
  42. *I wanna to make your gaming more easy & intresting..
  43. *I have some problems so I need your help <<please donate me max.(10$)>>. I will be thankfull to you :D
  44. *Here I have added **New CMDS** you can check them using <</Newlist>>
  45. *You can donate us here (https://www.paypal.com/cgi-bin/webscr?cmd=_s-xclick&hosted_button_id=JTFLQ57L2YKHL).
  46. ********************************************************************************
  47. *************************** Uses of new Commands(v1.3) *******************************
  48. ********************************************************************************
  49. Only for Admin(s)/Clan Member(s)/Clan Leader(s)
  50. /Lock - it can lock your vehicle when you will be inside of vehicle(Driver Seat)
  51. /Unlock - it can unlock your vehicle when you will be inside of vehicle(Driver Seat)
  52. /Clancars - it have one options :-
  53.     1)Clan Zone - Will create vehicles near to you, condition:- when you are inside of clan area & clan leader/Admin
  54. /membercar [playerid] [modelid] - It will create a car for member  & there is 1-3 modelid which you can use
  55. /Clanweapons - Will give weapons to clan members
  56. /Clangps - Will track all members of clan(clan leaders also) and create a icon on your map , condition:- clanleader/Admin
  57. /Membergps [playerid] - Will track only a member of clan
  58. /Sct - Will stop tracking clan member players
  59. /Smt [playerid] - Will stop tracking a member of clan
  60. /Leaders - Will show you online clan leaders
  61. ((((*Now you can create only one clan area)))
  62. @@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@
  63.                             OTHER INFORMATION:-
  64. @@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@
  65. **If you found any bug then you can inform me via facebook or msg me on samp forum
  66. *My Email id is : [email protected](On Facebook,Twitter)
  67. *You can also follow me !
  68. *For donating information you can also personally msg me !
  69. *Your donation will used for creating new forum/website & purchansing VPN(will host your server for free)
  70. *You can donate via Paypal/CreditCard/DebitCard
  71. *For more information contact me
  72. @@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@
  73. ################################################################################
  74.                                     ------End-----
  75. ################################################################################
  76. */
  77.  
  78.  
  79. //---Includes-----
  80. #include    <a_samp>
  81. #include    <YSI\y_ini>
  82. #include    <zcmd>
  83. #include    <sscanf2>
  84. #include    <Streamer>
  85. #include    <foreach>
  86. #include    <progress>
  87.  
  88. //-------------------
  89. new AutoMessages[][] =
  90. {
  91.     "New commands added to commands list to check them Use : /Newlist",
  92.     "To Donate Us Visit Here :https://www.paypal.com/cgi-bin/webscr?cmd=_s-xclick&hosted_button_id=JTFLQ57L2YKHL",
  93.     "Don't you know Commands? Use /cmds",
  94.     "Don't you know Clan Commands? Use /Clancmds",
  95.     "Are you not able to wear server Clan Tag([Test]) ? Visit on our Server Website and apply their for Clan Tag([Test]) !",
  96.     "Don't you know Server Website? Visit now: *http://samppawnscripter.freeforums.net*"
  97. };
  98.  
  99.  
  100. //--Define Paths----
  101. #define     ClanFile    "Clan/Users/%s.ini"
  102. //-------Define Login Dialogs----
  103. #define DIALOG_REGISTER     1
  104. #define DIALOG_LOGIN        2
  105. //------------Define Server Website & F.S. Version----
  106. #define     SERVER_WEBSITE  "www.xxxxxxx.com"
  107. #define     CTC_VERSION     "1.3"
  108. //-----------------
  109. #define Random_Time      100000
  110. #define MAX_RCON_ATTEMPS   3// Max Rcon Attemps
  111. //-----Enable Disable Define------
  112. #define     SECOND_RCON_SECURITY    true//true - Enable & false - Disable
  113. #define     ATTACH_3D_LABEL         true//true - Enable & false - Disable
  114. //---Second_Security_Rcon_Pass(CHANGE IT)----
  115. #define SECOND_RCON_PASS "changeme" // change it !
  116. //------Define Colours--------
  117. #define     COL_WHITE       "{FFFFFF}"
  118. #define     COL_BLACK       "{0E0101}"
  119. #define     COL_GREY        "{C3C3C3}"
  120. #define     COL_GREEN       "{6EF83C}"
  121. #define     COL_RED         "{F81414}"
  122. #define     COL_YELLOW      "{F3FF02}"
  123. #define     COL_LIME        "{B7FF00}"
  124. #define     COL_CYAN        "{00FFEE}"
  125. #define     COL_BLUE        "{0049FF}"
  126.  
  127. #define     COLOR_GREY      0xAFAFAFAA
  128. #define     COLOR_GREY      0xAFAFAFAA
  129. #define     COLOR_GREEN     0x33AA33AA
  130. #define     COLOR_RED       0xAA3333AA
  131. #define     COLOR_YELLOW    0xFFFF00AA
  132. #define     COLOR_WHITE     0xFFFFFFAA
  133. #define     COLOR_CLAN      0xB7FF00AA
  134. //------Define CarModels-------------
  135. #define     Infernus    411
  136. #define     Turismo     451
  137. #define     Bullet      541
  138. //-----Define SendClientMessage(s)----------
  139. #define     SCM             SendClientMessage
  140. #define     SCMToAll        SendClientMessageToAll
  141. #define     CPL_DISTANCE            20.0
  142. #define     CPL_TESTLOS             0
  143. //----Clan Define(s)----
  144. #define SECOND_SECURITY_DIALOG 36
  145. #define Choose 99
  146. #define Weaponlist 94
  147. #define GPS 21
  148. #define GPS1 22
  149. //---------------------------------End Of Define(s)---------------------------//
  150. //============================================================================//
  151. //----------------------------------------------------------------------------//
  152.  
  153. //---------New(s)-------------
  154. new IsLogged[MAX_PLAYERS];
  155. new Text3D:ClanMemberLabel[MAX_PLAYERS];
  156. new Text3D:ClanLeaderLabel[MAX_PLAYERS];
  157. new Text:textdraw0;
  158. new Text:textdraw1;
  159. new Bar:Tracking[MAX_PLAYERS];
  160. new ClanArea;
  161. new ClanZone;
  162. new bool:InClanZone;
  163. new Inf[11],Inf1;
  164. new Bul[11],Buf1;
  165. new Tur[11],Tur1;
  166. new bool:Lock[MAX_PLAYERS];
  167. new TrackingClan[MAX_PLAYERS];
  168. static pvehicleid[MAX_PLAYERS];
  169. static pmodelid[MAX_PLAYERS];
  170. new IsOnline[MAX_PLAYERS];
  171. new Welcomemessage[MAX_PLAYERS];
  172. new MapIcons[MAX_PLAYERS];
  173. new zone;
  174. new area;
  175. new renew[MAX_PLAYERS];
  176. new freeze[MAX_PLAYERS];
  177. new showing[MAX_PLAYERS];
  178. new progressing[MAX_PLAYERS];
  179. new Infer;
  180. new Bull;
  181. new Turi;
  182. new reaching[MAX_PLAYERS];
  183. new GPSusedrecently[MAX_PLAYERS] = 0;
  184. //======================================Natives===============================//
  185. native      WP_Hash(buffer[],len,const str[]);
  186. //----------------------------------------------------------------------------//
  187.  
  188. main()
  189. {
  190.     print("\n|==============================================|");
  191.     print("|            CLAN TAG CREATOR BY DEV           |");
  192.     print("|                  NEW VERSION(1.3)            |");
  193.     print("|==============================================|\n");
  194. }
  195.  
  196. enum PlayerInfo
  197. {
  198.     pPass[129],
  199.     pClan,
  200.     pClanleader[4],
  201.     #if SECOND_RCON_SECURITY == true
  202.     pMaxRconPassAttempt
  203.     #endif
  204. }
  205. new pInfo[MAX_PLAYERS][PlayerInfo];
  206.  
  207. public OnFilterScriptInit()
  208. {
  209.     print("\n ___________________________________________________");
  210.     print(" ");
  211.     printf("                   C.T.C. %s                         ", CTC_VERSION);
  212.     print("                 ---------------");
  213.     print("              CLAN TAG CREATOR WITH NEW FEATURES      ");
  214.     print(" ___________________________________________________\n");
  215.     print(" -> Wait Please Till Loading...");
  216.    
  217.     textdraw0 = TextDrawCreate(235.000000, 52.000000, "CLAN TAG CREATOR");
  218.     TextDrawBackgroundColor(textdraw0, 255);
  219.     TextDrawFont(textdraw0, 3);
  220.     TextDrawLetterSize(textdraw0, 0.780000, 3.099999);
  221.     TextDrawColor(textdraw0, -65281);
  222.     TextDrawSetOutline(textdraw0, 0);
  223.     TextDrawSetProportional(textdraw0, 1);
  224.     TextDrawSetShadow(textdraw0, 1);
  225.  
  226.     textdraw1 = TextDrawCreate(332.000000, 88.000000, "(Version 1.3)");
  227.     TextDrawAlignment(textdraw1, 2);
  228.     TextDrawBackgroundColor(textdraw1, 255);
  229.     TextDrawFont(textdraw1, 3);
  230.     TextDrawLetterSize(textdraw1, 0.689999, 2.100000);
  231.     TextDrawColor(textdraw1, -65281);
  232.     TextDrawSetOutline(textdraw1, 0);
  233.     TextDrawSetProportional(textdraw1, 1);
  234.     TextDrawSetShadow(textdraw1, 1);
  235.     for(new i; i < MAX_PLAYERS; i ++)
  236.     {
  237.         Tracking[i] = CreateProgressBar(305, 167, 55.5, 3.2, COLOR_RED, 70.0);
  238.     }
  239.  
  240.     SetTimer("AutoMessage",Random_Time,1);
  241.     zone = 0;
  242.     area = 0;
  243.     Infer = 0;
  244.     Turi = 0;
  245.     Bull = 0;
  246.     return 1;
  247. }
  248.  
  249. public OnFilterScriptExit()
  250. {
  251.     GangZoneDestroy(ClanZone);
  252.     return 1;
  253. }
  254.  
  255. public OnPlayerConnect(playerid)
  256. {
  257.    if(fexist(Path(playerid)))
  258.    {
  259.      INI_ParseFile(Path(playerid), "LoadUser_%s", .bExtra = true, .extra = playerid);
  260.      ShowPlayerDialog(playerid, DIALOG_LOGIN, DIALOG_STYLE_INPUT,""COL_WHITE"Login",""COL_WHITE"Type your password below to login.","Login","Quit");
  261.      SetPVarInt(playerid, "Logged", 1);
  262.    }
  263.    else
  264.    {
  265.      ShowPlayerDialog(playerid, DIALOG_REGISTER, DIALOG_STYLE_INPUT,""COL_WHITE"Registering...",""COL_WHITE"Type your password below to register a new account.","Register","Quit");
  266.      SetPVarInt(playerid, "Registered", 1);
  267.      SetPVarInt(playerid, "Logged", 1);
  268.    }
  269.    SetPVarInt(playerid, "Join", 1);
  270.    #if SECOND_RCON_SECURITY == true
  271.    pInfo[playerid][pMaxRconPassAttempt] = 0;
  272.    #endif
  273.    new name[24];
  274.    GetPlayerName(playerid,name,sizeof(name));
  275.    if(strfind(name,"[Test]",true) != -1)
  276.    {
  277.      if(pInfo[playerid][pClan] == 1 || pInfo[playerid][pClanleader] == 1) // In this case the clan they need to be in is 1
  278.       {
  279.          SCM(playerid, -1,""COL_GREEN"** Welcome to clan [Test] **");// Replace Test With Your Clan Tag Name.
  280.       }else
  281.       {
  282.         KickMessage(playerid, ""COL_RED"You are not in server Clan."COL_GREEN"If you want to wear our server clan tag so apply\n"COL_LIME" On "COL_CYAN""SERVER_WEBSITE"");
  283.       }
  284.    }
  285.    SetTimerEx("task",1000,true,"i",playerid);
  286.    pvehicleid[playerid] = GetPlayerVehicleID(playerid);
  287.    pvehicleid[playerid] = 0;
  288.    pmodelid[playerid] = 0;
  289.    Welcomemessage[playerid] = 1;
  290.    IsOnline[playerid] = 1;
  291.    TrackingClan[playerid] = 0;
  292.    freeze[playerid] = 1;
  293.    showing[playerid] = 1;
  294.    return 1;
  295. }
  296.  
  297. public OnPlayerSpawn(playerid)
  298. {
  299.     #if ATTACH_3D_LABEL == true)
  300.     if(pInfo[playerid][pClan] == 1 && pInfo[playerid][pClanleader] !=1)
  301.     {
  302.         new pclabel[32];
  303.         format(pclabel,sizeof(pclabel),"[Test Clan Member]");
  304.         ClanMemberLabel[playerid] = Create3DTextLabel(pclabel, 0xB7FF0099, 30.0, 40.0, 50.0,40.0,0);
  305.         Attach3DTextLabelToPlayer(ClanMemberLabel[playerid], playerid, 0.0, 0.0, 0.7);
  306.         Delete3DTextLabel(ClanLeaderLabel[playerid]);
  307.     }
  308.     if(pInfo[playerid][pClanleader] == 1)
  309.     {
  310.         new cllabel[32];
  311.         format(cllabel,sizeof(cllabel),"[Test Clan Leader]");
  312.         ClanLeaderLabel[playerid] = Create3DTextLabel(cllabel, 0xB7FF0099, 30.0, 40.0, 50.0, 40.0,0);
  313.         Attach3DTextLabelToPlayer(ClanLeaderLabel[playerid], playerid, 0.0, 0.0, 0.7);
  314.         Delete3DTextLabel(ClanMemberLabel[playerid]);
  315.     }
  316.     #endif
  317.     show(playerid);
  318.     SetPlayerVirtualWorld(playerid, 0);
  319.     SetTimerEx("wmsg",4010,false,"i",playerid);
  320.     SetTimerEx("unfreeze",8000, false, "i",playerid);
  321.     SetPlayerPos(playerid,172.7035,-34.1494,1.5781);
  322.     SetPlayerFacingAngle(playerid,94.0009);
  323.     SetCameraBehindPlayer(playerid);
  324.  
  325.     return 1;
  326. }
  327.  
  328. public OnPlayerEnterDynamicArea(playerid, areaid)
  329. {
  330.     if(areaid == ClanArea)
  331.     {
  332.         foreach(Player,i)
  333.         {
  334.             if(pInfo[i][pClan] == 1 || pInfo[i][pClanleader] == 1 || IsPlayerAdmin(i))
  335.             {
  336.                 GameTextForPlayer(i, "~y~You are now in Range Of Clan Area ", 4000, 3);
  337.             }
  338.             else SetPlayerHealth(i, 0.0);
  339.         }
  340.     }
  341.     return 1;
  342. }
  343.  
  344. public OnPlayerLeaveDynamicArea(playerid, areaid)
  345. {
  346.     if(areaid == ClanArea)
  347.     {
  348.         if(pInfo[playerid][pClan] == 1 || pInfo[playerid][pClanleader] == 1 || IsPlayerAdmin(playerid))
  349.         {
  350.             GameTextForPlayer(playerid, "~y~You are now Out Of Clan Area Range", 4000, 3);
  351.         }
  352.     }
  353.     return 1;
  354. }
  355.  
  356. public OnPlayerExitVehicle(playerid, vehicleid)
  357. {
  358.     new engine,lights,alarm,doors,bonnet,boot,objective, vid = GetPlayerVehicleID(playerid);
  359.     for(new i =0;i<5;i++)
  360.     {
  361.         if(GetPlayerVehicleID(playerid)== Inf[i] || GetPlayerVehicleID(playerid)== Bul[i] || GetPlayerVehicleID(playerid)== Tur[i])
  362.         {
  363.             if(Lock[playerid] == true)
  364.             {
  365.                 GetVehicleParamsEx(vid,engine,lights,alarm,doors,bonnet,boot,objective);
  366.                 SetVehicleParamsEx(vid,engine,lights,alarm,0,bonnet,boot,objective);
  367.             }
  368.         }
  369.     }
  370.     if(GetPlayerVehicleID(playerid)== Inf1|| GetPlayerVehicleID(playerid)== Buf1 || GetPlayerVehicleID(playerid)== Tur1)
  371.     {
  372.             if(Lock[playerid] == true)
  373.             {
  374.                 GetVehicleParamsEx(vid,engine,lights,alarm,doors,bonnet,boot,objective);
  375.                 SetVehicleParamsEx(vid,engine,lights,alarm,0,bonnet,boot,objective);
  376.             }
  377.     }
  378.     return 1;
  379. }
  380.  
  381. public OnPlayerDisconnect(playerid, reason)
  382. {
  383.    #if SECOND_RCON_SECURITY == true
  384.    pInfo[playerid][pMaxRconPassAttempt] = 0;
  385.    #endif
  386.    
  387.    new INI:file = INI_Open(Path(playerid));
  388.    INI_SetTag(file,"Clan's Data");
  389.    INI_WriteInt(file,"Clan",pInfo[playerid][pClan]);
  390.    INI_WriteInt(file,"ClanLeader",pInfo[playerid][pClanleader]);
  391.    INI_Close(file);
  392.    GangZoneDestroy(ClanZone);
  393.    RemovePlayerMapIcon(playerid,MapIcons[playerid]);
  394.    for(new i =0;i<99;i++)
  395.    {
  396.         RemovePlayerMapIcon(playerid,MapIcons[i]);
  397.    }
  398.    DestroyProgressBar(Tracking[playerid]);
  399.    return 1;
  400. }
  401.  
  402. COMMAND:register(playerid, params[])
  403. {
  404.     SCM(playerid, -1, ""COL_RED"Error: "COL_WHITE"You are already registered.");
  405.     return 1;
  406. }
  407.  
  408. COMMAND:login(playerid, params[])
  409. {
  410.     SCM(playerid, -1, ""COL_RED"Error: "COL_WHITE"You are already registered and logged in.");
  411.     return 1;
  412. }
  413.  
  414. CMD:setclanmember(playerid, params[])
  415. {
  416.     if (IsPlayerConnected(playerid))
  417.     {
  418.         if(IsPlayerAdmin(playerid) || pInfo[playerid][pClanleader] == 1)
  419.         {
  420.             new string[1000],pplayerid,nom[MAX_PLAYER_NAME],rom[MAX_PLAYER_NAME];
  421.             if(pInfo[pplayerid][pClan] != 1)
  422.             {
  423.                 if(sscanf(params,"u",pplayerid)) return SCM(playerid , -1, ""COL_RED"[ERROR]: /setclanmember [playerid]");
  424.                 GetPlayerName(playerid,rom,sizeof(rom));
  425.                 GetPlayerName(pplayerid,nom,sizeof(nom));
  426.                 format(string,sizeof(string), ""COL_YELLOW"*You Have Successfuly Set %s As An Clan Member.",nom);
  427.                 SendClientMessage(playerid, -1,string);
  428.                 format(string,sizeof(string), ""COL_GREEN"*Clan Leader %s Has Made You A [Test] Clan Member! Now You Are Allowed To Use [Test] Tag in Your Name.",rom);
  429.                 SendClientMessage(pplayerid, -1,string);
  430.                 strins(nom,"[Test]",0,sizeof(nom));
  431.                 SetPlayerName(pplayerid,nom);
  432.                 pInfo[pplayerid][pClan]= 1;
  433.             }else return SCM(playerid, -1,""COL_RED"[ERROR] Player is already in clan");
  434.         }else return SCM(playerid, -1,""COL_RED"[ERROR] You need to be RCON admin to use this Command." ) ;
  435.     }else return SCM(playerid, -1,""COL_RED"[ERROR] Player Not Connected!" ) ;
  436.     return 1;
  437. }
  438. CMD:kickclanmember(playerid, params[])
  439. {
  440.     if(IsPlayerConnected(playerid))
  441.     {
  442.         if(IsPlayerAdmin(playerid) || pInfo[playerid][pClanleader] == 1)
  443.         {
  444.             new nom[MAX_PLAYER_NAME],pplayerid,rom[MAX_PLAYER_NAME];
  445.             if(sscanf(params,"ds",pplayerid)) return SCM(playerid, -1,""COL_RED"[ERROR]: /kickclanmember [playerid]");
  446.             GetPlayerName(playerid,rom,sizeof(rom));
  447.             GetPlayerName(pplayerid,nom,sizeof(nom));
  448.             pInfo[pplayerid][pClan]= 0;
  449.             KickMessage(pplayerid,"*You Have Kicked From clan member list");
  450.         }else return SCM(playerid, -1,""COL_RED"[ERROR] You need to be RCON admin/Clan Leader to use this Command.");
  451.     }else return SCM(playerid, -1,""COL_RED"[ERROR] Player Not Connected!" ) ;
  452.     return 1;
  453. }
  454.  
  455. CMD:setclanleader(playerid, params[])
  456. {
  457.     if(IsPlayerConnected(playerid))
  458.     {
  459.         if(IsPlayerAdmin(playerid))
  460.         {
  461.             new nom[MAX_PLAYER_NAME],string[200],pplayerid,rom[MAX_PLAYER_NAME];
  462.             if(pInfo[pplayerid][pClanleader] != 1)
  463.             {
  464.                 if(sscanf(params,"u",pplayerid)) return SCM(playerid, -1,""COL_RED"[ERROR]: /setclanleader [playerid]");
  465.                 GetPlayerName(playerid,rom,sizeof(rom));
  466.                 GetPlayerName(pplayerid,nom,sizeof(nom));
  467.                 format(string,sizeof(string),""COL_LIME"*You Have Successfully set %s as clan leader",nom);
  468.                 SCM(playerid, -1,string);
  469.                 format(string,sizeof(string),""COL_GREEN"*Admin %s Has Made you [Test]Clan leader now you can control server clan!",rom);
  470.                 SCM(playerid, -1,string);
  471.                 pInfo[pplayerid][pClanleader]= 1;
  472.             }else return SCM(playerid,-1,""COL_RED"[ERROR]Player is already In Clan");
  473.         }else return SCM(playerid, -1,""COL_RED"[ERROR] You need to be RCON admin to use this Command.");
  474.     }else return SCM(playerid, -1,""COL_RED"[ERROR] Player Not Connected!" ) ;
  475.     return 1;
  476. }
  477.  
  478. CMD:removeclanleader(playerid, params[])
  479. {
  480.     if(IsPlayerConnected(playerid))
  481.     {
  482.         if(IsPlayerAdmin(playerid))
  483.         {
  484.             new nom[MAX_PLAYER_NAME],string[200],pplayerid,rom[MAX_PLAYER_NAME];
  485.             if(sscanf(params,"u",pplayerid)) return SCM(playerid, -1,""COL_RED"[ERROR]: /removeclanleader [playerid]");
  486.             GetPlayerName(playerid,rom,sizeof(rom));
  487.             GetPlayerName(pplayerid,nom,sizeof(nom));
  488.             format(string,sizeof(string),""COL_RED"*You Have Successfully remove %s from clan leader post",nom);
  489.             SCM(playerid, -1,string);
  490.             format(string,sizeof(string),""COL_RED"*Admin %s Has Kick you from [Test]Clan leadership now you can't control server clan!",rom);
  491.             SCM(playerid, -1,string);
  492.             pInfo[playerid][pClanleader]= 0;
  493.             KickMessage(pplayerid,"*Admin Has Kicked You From [Test]Clan Leadership! You are kicked from server");
  494.         }else return SCM(playerid, -1,""COL_RED"[ERROR] You need to be RCON admin to use this Command.");
  495.     }else return SCM(playerid, -1,""COL_RED"[ERROR] Player Not Connected!" ) ;
  496.     return 1;
  497. }
  498. CMD:giveorder(playerid, params[])
  499. {
  500.     if(IsPlayerAdmin(playerid) || pInfo[playerid][pClanleader] == 1)
  501.     {
  502.         new string[200];
  503.         if(sscanf(params,"s[200]",string)) return SCM(playerid, -1,""COL_RED"[USAGE]: /giveorder [Order]");
  504.         format(string,sizeof(string),""COL_LIME"%s:Gives An Order:'%s'",GetName(playerid),string);
  505.         SendMessageToAllClanMembers(string);
  506.     }else return SCM(playerid, -1,""COL_RED"[ERROR] You need to be RCON admin/Clan Leader to use this Command.");
  507.     return 1;
  508. }
  509.  
  510. CMD:clancmds(playerid, params[])
  511. {
  512.     if(IsPlayerAdmin(playerid) || pInfo[playerid][pClanleader] == 1)
  513.     {
  514.     SCM(playerid, -1,""COL_BLUE"//-------------------------------------------Clan Commands List:------------------------------------------//");
  515.     SCM(playerid, -1,""COL_WHITE"CLAN LEADER & ADMIN/Setclanmember [playerid] | /Kickclanmember [playerid] |\n\n /teleclan |/createclanarea(cca)|/destroyclanarea(dca)|/GiveOrder\n\
  516.     /Lock | /Unlock | /Clanweapons |/Smt [playerid] |/Sct |\n\
  517.     /Clangps | /Membergps [playerid]| /Membercar [playerid] [modelid]");
  518.     SCM(playerid, -1,""COL_WHITE"ADMIN:-----------------------/Setclanleader [playerid] |/Removeclanmember [playerid]|");
  519.     SCM(playerid, -1,""COL_BLUE"//--------------------------------------------------------------------------------------------------------------//");
  520.     }else return SCM(playerid, -1,""COL_RED"[ERROR] You need to be RCON admin/Clan Leader to use this Command.");
  521.     return 1;
  522. }
  523. CMD:cmds(playerid, params[])
  524. {
  525.     ShowPlayerDialog(playerid,1000,DIALOG_STYLE_LIST,
  526.     "COMMANDS:",
  527.         "GENERAL\n\
  528.          CLAN\n\
  529.          ADMIN",
  530.     "SELECT\t", "CLOSE");
  531.     return 1;
  532. }
  533. CMD:createclanarea(playerid,params[])
  534. {
  535.     if(zone == 0 && area == 0)
  536.     {
  537.     #pragma unused params
  538.     if(pInfo[playerid][pClanleader] == 1 || IsPlayerAdmin(playerid))
  539.     {
  540.         zone =1 , area = 1;
  541.         new Float:pos[3];
  542.         GetPlayerPos(playerid, pos[0],pos[1], pos[2]);
  543.         ClanZone = GangZoneCreate(pos[0]+0.0,pos[1]+0.0,pos[0]+150,pos[1]+150);
  544.         ShowGangZoneColor(ClanZone, COLOR_YELLOW);
  545.         new vw = GetPlayerVirtualWorld(playerid);
  546.         ClanArea = CreateDynamicRectangle(pos[0],pos[1],pos[0]+150,pos[1]+150, vw, 0, -1);
  547.         SCM(playerid, -1,""COL_GREEN"Clan Area Created In Yellow Highlighted Area Range");
  548.     }else return SCM(playerid, -1,""COL_RED"[ERROR] You need to be RCON admin/Clan Leader to use this Command.");
  549.     }else return SCM(playerid, -1,""COL_RED"[ERROR] Clan Area Is Already Created\n\n First Delete it then create new");
  550.     return 1;
  551. }
  552. CMD:destroyclanarea(playerid,params[])
  553. {
  554.     #pragma unused params
  555.     if(zone == 1 && area == 1)
  556.     {
  557.     if(IsPlayerAdmin(playerid) || pInfo[playerid][pClanleader] == 1)
  558.     {
  559.         DestroyDynamicArea(ClanArea);
  560.         GangZoneHideForAll(ClanZone);
  561.         zone =0, area = 0;
  562.     }else return SCM(playerid, -1,""COL_RED"[ERROR] You need to be RCON admin/Clan Leader to use this Command.");
  563.     }else return SCM(playerid, -1,""COL_RED"[ERROR] No Clan Area is here to deleted\n\n First Create New");
  564.     return 1;
  565. }
  566. CMD:dca(playerid,params[])
  567. {
  568.     #pragma unused params
  569.     return cmd_destroyclanarea(playerid,params);
  570. }
  571.  
  572. CMD:cca(playerid,params[])
  573. {
  574.     #pragma unused params
  575.     return cmd_createclanarea(playerid,params);
  576. }
  577. CMD:teleclan(playerid, params[])
  578. {
  579.     #pragma unused params
  580.     if(IsPlayerAdmin(playerid) || pInfo[playerid][pClanleader] == 1)
  581.     {
  582.         ShowPlayerDialog(playerid, 101, DIALOG_STYLE_MSGBOX,"TELE CLAN MEMBERS:","DO YOU WANT TO TELE CLAN MEMBERS TO YOU ?","YES", "NO");
  583.     }else return SCM(playerid, -1,""COL_RED"[ERROR] You need to be RCON admin/Clan Leader to use this Command.");
  584.     return 1;
  585. }
  586. CMD:lock(playerid, params[])
  587. {
  588.     new Playerstate = GetPlayerState(playerid);
  589.    
  590.     #pragma unused params
  591.     if(Playerstate == PLAYER_STATE_DRIVER)
  592.     {
  593.     if(pInfo[playerid][pClan] ==1 || pInfo[playerid][pClanleader] == 1 || IsPlayerAdmin(playerid))
  594.     {
  595.         if(Lock[playerid] == false)
  596.         {
  597.             new engine,lights,alarm,doors,bonnet,boot,objective, vid = GetPlayerVehicleID(playerid);
  598.             for(new i = 0; i<5; i++)
  599.             {
  600.                 if(GetPlayerVehicleID(playerid)== Inf[i] || GetPlayerVehicleID(playerid)== Bul[i] || GetPlayerVehicleID(playerid)== Tur[i])
  601.                 {
  602.                     Lock[playerid] = true;
  603.                     GetVehicleParamsEx(vid,engine,lights,alarm,doors,bonnet,boot,objective);
  604.                     SetVehicleParamsEx(vid,engine,lights,alarm,1,bonnet,boot,objective);
  605.                 }
  606.             }
  607.             if(GetPlayerVehicleID(playerid)== Inf1 || GetPlayerVehicleID(playerid)== Buf1 || GetPlayerVehicleID(playerid)== Tur1)
  608.             {
  609.                     Lock[playerid] = true;
  610.                     GetVehicleParamsEx(vid,engine,lights,alarm,doors,bonnet,boot,objective);
  611.                     SetVehicleParamsEx(vid,engine,lights,alarm,1,bonnet,boot,objective);
  612.             }
  613.             SCM(playerid,-1,""COL_LIME"[[__CLAN_VEHICLE_DOORS_LOCKED__]]");
  614.         }else return SCM(playerid,-1,""COL_RED"Your Vehicle IS Already Locked");
  615.     }else return SCM(playerid, -1,""COL_RED"[ERROR] You need to be RCON admin/Clan Leader/Clan Member to use this Command.");
  616.     }else return SCM(playerid,-1,""COL_RED"You Are Not Driving Vehicle");
  617.     return 1;
  618. }
  619. CMD:unlock(playerid, params[])
  620. {
  621.     new Playerstate = GetPlayerState(playerid);
  622.     #pragma unused params
  623.     if(Playerstate == PLAYER_STATE_DRIVER)
  624.     {
  625.     if(pInfo[playerid][pClan] ==1 || pInfo[playerid][pClanleader] == 1 || IsPlayerAdmin(playerid) && Playerstate == PLAYER_STATE_DRIVER)
  626.     {
  627.         if(Lock[playerid] == true)
  628.         {
  629.             new engine,lights,alarm,doors,bonnet,boot,objective, vid = GetPlayerVehicleID(playerid);
  630.             for(new i = 0; i<5; i++)
  631.             {
  632.                 if(GetPlayerVehicleID(playerid)== Inf[i] || GetPlayerVehicleID(playerid)== Bul[i] || GetPlayerVehicleID(playerid)== Tur[i])
  633.                 {
  634.                     Lock[playerid] = false;
  635.                     GetVehicleParamsEx(vid,engine,lights,alarm,doors,bonnet,boot,objective);
  636.                     SetVehicleParamsEx(vid,engine,lights,alarm,0,bonnet,boot,objective);
  637.                 }
  638.             }
  639.             if(GetPlayerVehicleID(playerid)== Inf1 || GetPlayerVehicleID(playerid)== Buf1 || GetPlayerVehicleID(playerid)== Tur1)
  640.             {
  641.                     Lock[playerid] = false;
  642.                     GetVehicleParamsEx(vid,engine,lights,alarm,doors,bonnet,boot,objective);
  643.                     SetVehicleParamsEx(vid,engine,lights,alarm,0,bonnet,boot,objective);
  644.             }
  645.             SCM(playerid,-1,""COL_LIME"[[__CLAN_VEHICLE_DOORS_UNLOCKED__]]");
  646.         }else return SCM(playerid,-1,""COL_RED"Your Vehicle IS Already Unlocked/You Are Not Driving Vehicle");
  647.     }else return SCM(playerid, -1,""COL_RED"[ERROR] You need to be RCON admin/Clan Leader/Clan Member to use this Command.");
  648.     }else return SCM(playerid,-1,""COL_RED"You Are Not Driving Vehicle");
  649.     return 1;
  650. }
  651. CMD:clancars(playerid, params[])
  652. {
  653.     #pragma unused params
  654.     if(IsPlayerAdmin(playerid) || pInfo[playerid][pClanleader] == 1)
  655.     {
  656.         ShowPlayerDialog(playerid,Choose,DIALOG_STYLE_LIST,"VERIFYING...",
  657.         "CLAN ZONE",
  658.         "SUMBIT","");
  659.     }else return SCM(playerid, -1,""COL_RED"[ERROR] You need to be RCON admin/Clan Leader to use this Command.");
  660.     return 1;
  661. }
  662. CMD:clanweapons(playerid, params[])
  663. {
  664.     #pragma unused params
  665.     if(IsPlayerAdmin(playerid) || pInfo[playerid][pClanleader] == 1)
  666.     {
  667.         ShowPlayerDialog(playerid,Weaponlist,DIALOG_STYLE_LIST,"SELECTING...",
  668.         "AK - 47\n\
  669.         Combat Shotgun\n\
  670.         Swanoff Shotgun\n\
  671.         Desert Eagle\n\
  672.         Flame Thrower",
  673.         "SELECT","");
  674.     }else return SCM(playerid, -1,""COL_RED"[ERROR] You need to be RCON admin/Clan Leader to use this Command.");
  675.     return 1;
  676. }
  677. CMD:sct(playerid, params[])
  678. {
  679.     #pragma unused params
  680.     if(pInfo[playerid][pClan] ==1 || pInfo[playerid][pClanleader] == 1 || IsPlayerAdmin(playerid))
  681.     {
  682.         if(TrackingClan[playerid] == 1 || TrackingClan[playerid] == 2)
  683.         {
  684.             if(TrackingClan[playerid] == 1)
  685.             {
  686.                 for(new i = 0;i<99;i++)
  687.                 {
  688.                     TrackingClan[playerid] = 0;
  689.                     renew[playerid] = 1;
  690.                     SetTimerEx("Updateclanmapicon",17,false,"i",playerid);
  691.                 }
  692.                 SCM(playerid,-1,""COL_GREEN"You have successfully removed Map Icon(s)");
  693.                 return 1;
  694.             }
  695.         }else return SCM(playerid,-1,""COL_RED"[ERROR] You are not tracking anyone");
  696.     }else return SCM(playerid, -1,""COL_RED"[ERROR] You need to be RCON admin/Clan Leader/Clan Member to use this Command.");
  697.     return 1;
  698. }
  699. CMD:smt(playerid, params[])
  700. {
  701.     if(pInfo[playerid][pClan] ==1 || pInfo[playerid][pClanleader] == 1 || IsPlayerAdmin(playerid))
  702.     {
  703.         new pplayerid;
  704.         if(sscanf(params,"d",pplayerid)) return SCM(playerid, -1,""COL_RED"[ERROR]: /membergps [playerid]");
  705.         if(pplayerid != playerid)
  706.         {
  707.             if(TrackingClan[playerid] == 2 && TrackingClan[playerid] != 1)
  708.             {
  709.                 renew[playerid] = 1;
  710.                 SetTimerEx("Updatemapicon",17,false,"i",playerid,pplayerid);
  711.                 SCM(playerid,-1,""COL_GREEN"You have successfully removed Map Icon");
  712.                 TrackingClan[playerid] = 0;
  713.             }else return SCM(playerid,-1,""COL_RED"[ERROR] You are not tracking anyone");
  714.         }else return 1;
  715.     }else return SCM(playerid, -1,""COL_RED"[ERROR] You need to be RCON admin/Clan Leader/Clan Member to use this Command.");
  716.     return 1;
  717. }
  718.  
  719. CMD:clangps(playerid, params[])
  720. {
  721.     #pragma unused params
  722.     if(IsPlayerAdmin(playerid) || pInfo[playerid][pClanleader] == 1)
  723.     {
  724.         ShowPlayerDialog(playerid,GPS,DIALOG_STYLE_LIST,"TRACKING...",
  725.         "CLAN",
  726.          "TRACK","");
  727.     }
  728.     return 1;
  729. }
  730. CMD:membergps(playerid,params[])
  731. {
  732.     if(IsPlayerAdmin(playerid) || pInfo[playerid][pClanleader] == 1 || pInfo[playerid][pClanleader] == 1)
  733.     {
  734.         new pplayerid;
  735.         if(sscanf(params,"d",pplayerid)) return SCM(playerid, -1,""COL_RED"[ERROR]: /membergps [playerid]");
  736.         if(pplayerid != playerid)
  737.         {
  738.             if(IsPlayerConnected(pplayerid))
  739.             {
  740.                 if(TrackingClan[playerid] != 1 && TrackingClan[playerid] == 0)
  741.                 {
  742.                     if(pInfo[pplayerid][pClanleader] || pInfo[pplayerid][pClan])
  743.                     {
  744.                         if(GPSusedrecently[playerid] >= 1)
  745.                         {
  746.                             SCM(playerid,-1,""COL_RED"GPS system is used recently you need to wait\n\n To Use it again");
  747.                             return 1;
  748.                         }
  749.                         GPSusedrecently[playerid] = 300;
  750.                         trackon(playerid,pplayerid);
  751.                     }else return SCM(playerid,-1,""COL_RED"You can not track players instead of Clan members");
  752.                 }else return SCM(playerid,-1,""COL_RED"You are already Tracking Clan Player(s)\n\
  753.                 First Stop Tracking Then Try To Re-Track Them(USE:/smt [playerid])");
  754.             }else return SCM(playerid,-1,""COL_RED"Player Is Not Connected");
  755.         }else return  SCM(playerid,-1,""COL_RED"You can not track yourself");
  756.     }else return SCM(playerid, -1,""COL_RED"[ERROR] You need to be RCON admin/Clan Leader/Clan Member to use this Command.");
  757.     return 1;
  758. }
  759. CMD:newlist(playerid,params[])
  760. {
  761.     #pragma unused params
  762.     ShowPlayerDialog(playerid,89,DIALOG_STYLE_LIST,"NEW COMMANDS",
  763.     "/Lock\n\
  764.     /Unlock\n\
  765.     /Clancars\n\
  766.     /Clanweapons\n\
  767.     /Smt [playerid]\n\
  768.     /Sct\n\
  769.     /Clangps\n\
  770.     /Membergps [playerid]\n\
  771.     /Membercar [playerid] [modelid]\n\
  772.     /Leaders\n\
  773.     /DonateInfo",
  774.     "EXIT","");
  775.     return 1;
  776. }
  777. CMD:donateinfo(playerid,params[])
  778. {
  779.     #pragma unused params
  780.     ShowPlayerDialog(playerid,25,DIALOG_STYLE_MSGBOX,"DONATING INFO","Donate minimum 10$ to me\n\n Visit Here(http://samppawnscripter.freeforums.net)\n\n to done donating\n\n Stay Tuned for new Updates","EXIT","");
  781.     return 1;
  782. }
  783.  
  784. COMMAND:leaders(playerid, params[])
  785. {
  786.         new string[1000];
  787.         foreach(Player, i) {
  788.         if(IsOnline[i])
  789.         {
  790.             if(pInfo[i][pClanleader] == 1) { format(string,sizeof(string),""COL_LIME"Leader %s (%d)",GetName(i), i); }
  791.             else return SCM(playerid,-1,""COL_RED"-No Clan Leader Is Online-");
  792.             SCM(playerid, -1, ""COL_GREEN"|_____________________________________________|");
  793.             SCM(playerid, -1, ""COL_YELLOW"                 Online Leaders");
  794.             SCM(playerid,-1,string);
  795.             SCM(playerid, -1, ""COL_GREEN"|_____________________________________________|");
  796.         }else return SCM(playerid,-1,""COL_RED"-No Clan Leader Is Online-");
  797.         }
  798.         return 1;
  799. }
  800. CMD:membercar(playerid, params[])
  801. {
  802.     if(IsPlayerAdmin(playerid) || pInfo[playerid][pClanleader] == 1 || pInfo[playerid][pClanleader] == 1)
  803.     {
  804.         new pplayerid,model;
  805.         if(sscanf(params,"ud",pplayerid,model)) return SCM(playerid, -1,""COL_RED"[ERROR]: /membercar [playerid] [modelid]\n\nModel Id(1-3)");
  806.         if(!IsPlayerInAnyVehicle(pplayerid))
  807.         {
  808.             if(pInfo[pplayerid][pClan] == 1 || pInfo[pplayerid][pClanleader] == 1)
  809.             {
  810.                 Car(pplayerid,model);
  811.                 SCM(playerid,-1,""COL_GREEN"Successfully You Have Given The Car");
  812.             }else return SCM(playerid,-1,""COL_RED"Player Is Not Clan(Member/Leader)");
  813.         }else return SCM(playerid,-1,""COL_RED"Player is Already in a Vehicle");
  814.     }else return SCM(playerid, -1,""COL_RED"[ERROR] You need to be RCON admin/Clan Leader/Clan Member to use this Command.");
  815.     return 1;
  816. }
  817. public OnDialogResponse(playerid, dialogid, response, listitem, inputtext[])
  818. {
  819.     if(dialogid == 25)
  820.     {
  821.         if(response)
  822.         {
  823.             return 1;
  824.         }
  825.     }
  826.     if(dialogid == 89)
  827.     {
  828.         if(response)
  829.         {
  830.             return 1;
  831.         }
  832.     }
  833.     if(dialogid == GPS)
  834.     {
  835.         if(response)
  836.         {
  837.                 if(TrackingClan[playerid] == 0 && TrackingClan[playerid] !=2)
  838.                 {
  839.                     for(new i =0;i<99;i++)
  840.                     {
  841.                             if(i == playerid)continue;
  842.                             if(pInfo[i][pClan] == 1 ||pInfo[i][pClanleader] == 1)
  843.                             {
  844.                                 new Float:x,Float:y,Float:z;
  845.                                 GetPlayerPos(i,x,y,z);
  846.                                 TrackingClan[playerid] = 1;
  847.                                 renew[playerid] = 0;
  848.                                 MapIcons[i] = SetPlayerMapIcon(playerid,i,x,y,z,0,COLOR_CLAN,1);
  849.                                 SetTimerEx("Updateclanmapicon",17,true,"i",playerid);
  850.                             }
  851.                     }
  852.                 }else return SCM(playerid,-1,""COL_RED"You are already Tracking Clan Player First Stop Tracking Then Try To Re-Track Them(USE:/sct)");
  853.         }else return SCM(playerid,-1,""COL_RED"Selection Canceled");
  854.     }
  855.     if(dialogid == Weaponlist)
  856.     {
  857.         if(response)
  858.         {
  859.             switch(listitem)
  860.             {
  861.                 case 0: clanweapon(30);
  862.                 case 1: clanweapon(27);
  863.                 case 2: clanweapon(26);
  864.                 case 3: clanweapon(24);
  865.                 case 4: clanweapon(37);
  866.             }
  867.         }else return SCM(playerid,-1,""COL_RED"Selection Canceled");
  868.         return 1;
  869.     }
  870.     if(dialogid == Choose)
  871.     {
  872.         if(response)
  873.         {
  874.             switch(listitem)
  875.             {
  876.                 case 0:
  877.                 {
  878.                     InClanZone = true;
  879.                     ShowPlayerDialog(playerid,78, DIALOG_STYLE_LIST,
  880.                     "CHOOSE CAR:",
  881.                     "*Infernus*\n\
  882.                     *Bullet*\n\
  883.                     *Turismo*",
  884.                     "SUMBIT","");
  885.                 }
  886.             }
  887.         }else return SCM(playerid,-1,""COL_RED"Selection Canceled");
  888.         return 1;
  889.     }
  890.     if(dialogid == 78)
  891.     {
  892.         if(response)
  893.         {
  894.             switch(listitem)
  895.             {
  896.                 case 0:
  897.                 {
  898.                     Infer = 1;
  899.                     if(InClanZone == true)
  900.                     {Cars(playerid);}
  901.                 }
  902.                 case 1:
  903.                 {
  904.                     Bull = 1;
  905.                     if(InClanZone == true)
  906.                     {Cars(playerid);}
  907.                 }
  908.                 case 2:
  909.                 {
  910.                     Turi = 1;
  911.                     if(InClanZone == true)
  912.                     {Cars(playerid);}
  913.                 }
  914.             }
  915.         }else return SCM(playerid,-1,""COL_RED"Selection Canceled");
  916.         return 1;
  917.     }
  918.     if(dialogid == 1000)
  919.     {
  920.         if(response)
  921.         {
  922.             switch(listitem)
  923.             {
  924.                 case 0:
  925.                 {
  926.                     ShowPlayerDialog(playerid, 1001, DIALOG_STYLE_MSGBOX,
  927.                     "GENERAL COMMANDS:",
  928.                         "* /Login\n\
  929.                          * /Register\n\
  930.                          * /Lock\n\
  931.                          * /Unlock\n\
  932.                          * /Membergps [playerid]\n\
  933.                          * /Leaders\n\
  934.                          * /Smt [playerid]\n\
  935.                          * /Sct",
  936.                     "BACK\t", "CLOSE");
  937.                 }
  938.                 case 1:
  939.                 {
  940.                     if(IsPlayerAdmin(playerid) || pInfo[playerid][pClanleader] == 1)
  941.                     {
  942.                     ShowPlayerDialog(playerid, 1002, DIALOG_STYLE_MSGBOX,
  943.                     "CLAN LEADER COMMANDS:",
  944.                         "* /Setclanmember [playerid]\n\
  945.                          * /kickclanmember [playerid]\n\
  946.                          * /teleclan\n\
  947.                          * /createclanarea(cca)\n\
  948.                          * /destroyclanarea(dca)\n\
  949.                          * /GiveOrder\n\
  950.                          * /Lock\n\
  951.                          * /Unlock\n\
  952.                          * /Clangps\n\
  953.                          * /Clanweapons\n\
  954.                          * /Membergps [playerid]\n\
  955.                          * /Membercar [playerid] [modelid]\n\
  956.                          * /Smt [playerid]\n\
  957.                          * /Sct\n\
  958.                          * /Leaders\n\
  959.                          * /Clancars",
  960.                     "BACK\t", "CLOSE");
  961.                     }else return SCM(playerid, -1,""COL_RED"[ERROR] You need to be RCON admin/Clan Leader to use this Command.");
  962.                 }
  963.                 case 2:
  964.                 {
  965.                     if(IsPlayerAdmin(playerid))
  966.                     {
  967.                     ShowPlayerDialog(playerid, 1003, DIALOG_STYLE_MSGBOX,
  968.                     "ADMIN ADVANCED CLAN COMMANDS:",
  969.                         "* /Clan Leader Commands+\n\
  970.                          * /Setclanleader [playerid]\n\
  971.                          * /Removeclanleader [playerid]",
  972.                     "BACK\t", "CLOSE");
  973.                     }else return SCM(playerid, -1,""COL_RED"[ERROR] You need to be RCON admin to use this Command.");
  974.                 }
  975.             }
  976.         }else return SendClientMessage(playerid, -1,"Command Help Selection Canceled");
  977.     }
  978.     if(dialogid == 1001)
  979.     {
  980.         if(response)
  981.         {
  982.             ShowPlayerDialog(playerid,1000,DIALOG_STYLE_LIST,
  983.             "COMMANDS:",
  984.                 "GENERAL\n\
  985.                  CLAN\n\
  986.                  ADMIN",
  987.             "SELECT\t", "CLOSE");
  988.         }else return SendClientMessage(playerid, -1,"Command Help Selection Canceled");
  989.     }
  990.     if(dialogid == 1002)
  991.     {
  992.         if(response)
  993.         {
  994.             ShowPlayerDialog(playerid,1000,DIALOG_STYLE_LIST,
  995.             "COMMANDS:",
  996.                 "GENERAL\n\
  997.                  CLAN\n\
  998.                  ADMIN",
  999.             "SELECT\t", "CLOSE");
  1000.         }else return SendClientMessage(playerid, -1,"Command Help Selection Canceled");
  1001.     }
  1002.     if(dialogid == 1003)
  1003.     {
  1004.         if(response)
  1005.         {
  1006.             ShowPlayerDialog(playerid,1000,DIALOG_STYLE_LIST,
  1007.             "COMMANDS:",
  1008.                 "GENERAL\n\
  1009.                  CLAN\n\
  1010.                  ADMIN",
  1011.             "SELECT\t", "CLOSE");
  1012.         }else return SendClientMessage(playerid, -1,"Command Help Selection Canceled");
  1013.     }
  1014.     switch( dialogid )
  1015.     {
  1016.         case DIALOG_REGISTER:
  1017.         {
  1018.             if (!response) return Kick(playerid);
  1019.             if(response)
  1020.             {
  1021.                 if(!strlen(inputtext)) return ShowPlayerDialog(playerid, DIALOG_REGISTER, DIALOG_STYLE_INPUT,""COL_CYAN"Please Register:",""COL_WHITE"Welcome New User, Please Register.\n\n"COL_WHITE"Type a new Password to Register & Create a new account.","REGISTER","QUIT");
  1022.                
  1023.                 new hashpass[129];
  1024.                 WP_Hash(hashpass,sizeof(hashpass),inputtext);
  1025.                 new INI:File = INI_Open(Path(playerid));
  1026.                 INI_SetTag(File,"Clan's Data");
  1027.                 INI_WriteString(File,"Password",hashpass);
  1028.                 INI_WriteInt(File,"Clan",0);
  1029.                 INI_WriteInt(File,"ClanLeader",0);
  1030.                 INI_Close(File);
  1031.                 IsLogged[playerid]=1;
  1032.             }
  1033.         }
  1034.  
  1035.         case DIALOG_LOGIN:
  1036.         {
  1037.             if ( !response ) return Kick ( playerid );
  1038.             if( response )
  1039.             {
  1040.                 new hashpass[129];
  1041.                 WP_Hash(hashpass,sizeof(hashpass),inputtext);
  1042.                 if(!strcmp(hashpass,pInfo[playerid][pPass]))
  1043.                 {
  1044.                     INI_ParseFile(Path(playerid), "LoadUser_%s", .bExtra = true, .extra = playerid);
  1045.                     SendClientMessage(playerid, -1,""COL_GREEN"Success!You have successfully logged in!");
  1046.                     IsLogged[playerid]=1;
  1047.                 }
  1048.                 else
  1049.                 {
  1050.                   ShowPlayerDialog(playerid, DIALOG_LOGIN, DIALOG_STYLE_INPUT,""COL_CYAN"Please Login:",""COL_WHITE"Welcome Back, Please Login.\n\n"COL_WHITE"Type Your Password to Login or Register with a new User.","LOGIN","QUIT");
  1051.                 }
  1052.                 return 1;
  1053.             }
  1054.         }
  1055.     }
  1056. /*=============================================================================
  1057. ################################ Second Security ###############################
  1058. ==============================================================================*/
  1059.     #if SECOND_RCON_SECURITY == true
  1060.     if(dialogid == SECOND_SECURITY_DIALOG)
  1061.     {
  1062.         if (response)
  1063.         {
  1064.             if (!strcmp(SECOND_RCON_PASS, inputtext, false, 15) && !(!strlen(inputtext)))
  1065.             {
  1066.                 GameTextForPlayer(playerid, "~n~~n~~n~~n~~n~~w~Access  ~g~Granted!~n~~y~Welcome!",3000,3);
  1067.             }
  1068.             else
  1069.             {
  1070.                 ServerSecondRconSecurity(playerid);
  1071.             }
  1072.         }
  1073.         else
  1074.         {
  1075.             SendClientMessage(playerid, -1,""COL_RED"[ERROR]: Kicked");
  1076.             return Kick(playerid);
  1077.         }
  1078.         return 1;
  1079.     }
  1080.     #endif
  1081.     if(dialogid == 101)
  1082.     {
  1083.         if(!response) return 1;
  1084.         if(response)
  1085.         {
  1086.             TeleClanMembers(playerid);
  1087.             return 1;
  1088.         }
  1089.     }
  1090.     return 1;
  1091. }
  1092.  
  1093. //==============================================================================
  1094. //-------------------------------------
  1095. // RCON Attempts
  1096. //-------------------------------------
  1097. //==============================================================================
  1098. public OnRconLoginAttempt(ip[], password[], success)
  1099. {
  1100. //====================================
  1101. // INCORRECT RCON PASS
  1102. //====================================
  1103.     if(!success)
  1104.     {
  1105.         return 1;
  1106.     }
  1107. //====================================
  1108. // CORRECT RCON
  1109. //====================================
  1110.     #if SECOND_RCON_SECURITY == true
  1111.     else
  1112.     {
  1113.         for(new i = 0; i < MAX_PLAYERS; i++)
  1114.         {
  1115.             if(IsPlayerConnected(i))
  1116.             {
  1117.                 new pIP[16];
  1118.                 GetPlayerIp(i, pIP, 16);
  1119.                 if(!strcmp(pIP,ip,true))
  1120.                 {
  1121.                     new stm[128];
  1122.                     format(stm,sizeof(stm),"[RCON_SECURITY]:For access the account, you must enter the Second Security RCON Pass.");
  1123.                     ShowPlayerDialog(i, SECOND_SECURITY_DIALOG, DIALOG_STYLE_INPUT,"SERVER SECOND SECURITY",stm, "SUMBIT", "ESCAPE");
  1124.                 }
  1125.             }
  1126.         }
  1127.     }
  1128.     #endif
  1129.     return 1;
  1130. }
  1131.  
  1132. public OnPlayerStateChange(playerid, newstate, oldstate)
  1133. {
  1134.     if(newstate == PLAYER_STATE_DRIVER)
  1135.     {
  1136.         pvehicleid[playerid] = GetPlayerVehicleID(playerid);
  1137.         pmodelid[playerid] = GetVehicleModel(pvehicleid[playerid]);
  1138.     }
  1139.     else
  1140.     {
  1141.         pvehicleid[playerid] = 0;
  1142.         pmodelid[playerid] = 0;
  1143.     }
  1144.     if(pInfo[playerid][pClan] == 1 || pInfo[playerid][pClanleader] == 1)
  1145.     {
  1146.         if(oldstate == PLAYER_STATE_DRIVER && newstate == PLAYER_STATE_ONFOOT)
  1147.         {Lock[playerid]= false;}
  1148.     }
  1149.     if(newstate == PLAYER_STATE_DRIVER)
  1150.     {
  1151.         for(new i=0;i<5; i++)
  1152.         {
  1153.             if(GetPlayerVehicleID(playerid)== Inf[i] || GetPlayerVehicleID(playerid)== Bul[i] || GetPlayerVehicleID(playerid)== Tur[i])
  1154.             {
  1155.                 if(pInfo[playerid][pClan] != 1)
  1156.                 {
  1157.                         new Float:x,
  1158.                             Float:y,
  1159.                             Float:z;
  1160.                         GetPlayerPos(playerid, x, y, z);
  1161.                         SetPlayerPos(playerid, x, y, z+5);
  1162.                         GameTextForPlayer(playerid, "~r~Ejected", 5000, 3);
  1163.                         SendClientMessage(playerid, -1, ""COL_RED"Error: "COL_WHITE"You need to be Clan Member To Drive This Vehicle.");
  1164.                 }
  1165.                 else
  1166.                 {
  1167.                     SendClientMessage(playerid,-1,""COL_CYAN"[[_Clan_Zone_Vehicle_]]");
  1168.                     SendClientMessage(playerid,-1,""COL_LIME"Welcome to your Clan Personnel vehicle.");
  1169.                     return 1;
  1170.                 }
  1171.                 return 1;
  1172.             }
  1173.         }
  1174.     }
  1175.     if(newstate == PLAYER_STATE_DRIVER)
  1176.     {
  1177.         if(GetPlayerVehicleID(playerid)== Inf1|| GetPlayerVehicleID(playerid)== Buf1 || GetPlayerVehicleID(playerid)== Tur1)
  1178.         {
  1179.             if(pInfo[playerid][pClan] != 1)
  1180.             {
  1181.                     new Float:x,
  1182.                     Float:y,
  1183.                     Float:z;
  1184.                     GetPlayerPos(playerid, x, y, z);
  1185.                     SetPlayerPos(playerid, x, y, z+5);
  1186.                     GameTextForPlayer(playerid, "~r~Stunned", 5000, 3);
  1187.                     SendClientMessage(playerid, -1, ""COL_RED"Error: "COL_WHITE"You need to be Clan Member To Drive This Vehicle.");
  1188.             }
  1189.             else
  1190.             {
  1191.                 SendClientMessage(playerid,-1,""COL_CYAN"[[_Clan_Zone_Vehicle_]]");
  1192.                 SendClientMessage(playerid,-1,""COL_LIME"Welcome to your Clan Personnel vehicle.");
  1193.                 return 1;
  1194.             }
  1195.         }
  1196.     }
  1197.     return 1;
  1198. }
  1199.  
  1200. public OnPlayerText(playerid, text[])
  1201. {
  1202.     if(text[0] == '@' && pInfo[playerid][pClan] == 1 && pInfo[playerid][pClanleader] == 1)
  1203.     {
  1204.         new string[128];
  1205.         format(string, sizeof(string), ""COL_LIME"[CLAN_CHAT] %s (%d): %s", GetName(playerid), playerid, text[1]);
  1206.         for(new i; i < MAX_PLAYERS; i++)
  1207.         {
  1208.             if(pInfo[i][pClan]==1 && pInfo[i][pClanleader] == 1)
  1209.             {
  1210.                 SCM(i, -1,string);
  1211.             }
  1212.         }
  1213.         return 0;
  1214.     }
  1215.     return 1;
  1216. }
  1217.  
  1218. forward LoadUser_data(playerid, name[], value[]);
  1219. public LoadUser_data(playerid, name[], value[])
  1220. {
  1221.     INI_String("Password",pInfo[playerid][pPass],129);
  1222.     INI_Int("Clan",pInfo[playerid][pClan]);
  1223.     INI_Int("ClanLeader",pInfo[playerid][pClanleader]);
  1224.     return 1;
  1225. }
  1226.  
  1227. //================================Stocks======================================//
  1228. stock GetName(playerid)
  1229. {
  1230.     new
  1231.         pName[MAX_PLAYER_NAME];
  1232.  
  1233.     GetPlayerName(playerid, pName, MAX_PLAYER_NAME);
  1234.     return pName;
  1235. }
  1236.  
  1237. stock Path(playerid)
  1238. {
  1239.     new str[128],cname[MAX_PLAYER_NAME];
  1240.     GetPlayerName(playerid,cname,sizeof(cname));
  1241.     format(str,sizeof(str),ClanFile,cname);
  1242.     return str;
  1243. }
  1244.  
  1245. stock ServerSecondRconSecurity(playerid)
  1246. {
  1247.         if(pInfo[playerid][pMaxRconPassAttempt] == 3)
  1248.         {
  1249.             SendClientMessage(playerid, -1, ""COL_RED"[AUTO_ERROR]: "COL_WHITE"You have reached to your Max Attempt Level, "COL_RED"[Result]: Kick");
  1250.             Kick(playerid);
  1251.         }
  1252.         pInfo[playerid][pMaxRconPassAttempt]++;
  1253.         new err[140];
  1254.         SendClientMessage(playerid, -1, ""COL_RED"|- Access Denied -|");
  1255.         format(err,sizeof(err),"Invalid Password!. \n\nFor access the account, you must enter the CORRECT Second Security Password.\n\nAttempts: %d/3", pInfo[playerid][pMaxRconPassAttempt]);
  1256.         ShowPlayerDialog(playerid, SECOND_SECURITY_DIALOG, DIALOG_STYLE_INPUT, "SERVER SECOND SECURITY",err, "SUMBIT", "ESCAPE");
  1257. }
  1258.  
  1259. stock trackon(playerid,pplayerid)
  1260. {
  1261.     progressing[playerid] = 70;
  1262.     SetProgressBarMaxValue(Tracking[playerid],progressing[playerid]);
  1263.     reaching[playerid] = 1;
  1264.     SCM(playerid,-1,""COL_LIME"Tracking...");
  1265.     SetTimer("Updatetracking",100,true);
  1266.     SetTimerEx("trackend",70*100,false,"i",playerid,pplayerid);
  1267.     GameTextForPlayer(playerid,"~r~Please Wait...",1000,5);
  1268.     return 1;
  1269. }
  1270. forward trackend(playerid,pplayerid);
  1271. public trackend(playerid,pplayerid)
  1272. {
  1273.     reaching[playerid] = 0;
  1274.     new Float:x,Float:y,Float:z;
  1275.     renew[playerid] = 0;
  1276.     TrackingClan[playerid] = 2;
  1277.     GetPlayerPos(pplayerid,x,y,z);
  1278.     MapIcons[playerid] = SetPlayerMapIcon(playerid,1,x,y,z,0,COLOR_CLAN,1);
  1279.     SetTimerEx("Updatemapicon",17,true,"ii",playerid,pplayerid);
  1280.     return 1;
  1281. }
  1282.  
  1283. forward KickPlayer(playerid);
  1284. public KickPlayer(playerid)
  1285. {
  1286.      Kick(playerid);
  1287. }
  1288.  
  1289. stock KickMessage(playerid, message[])
  1290. {
  1291.     SendClientMessage(playerid, -1, message);
  1292.     SetTimerEx("KickPlayer", 1000, 0, "d", playerid);
  1293.     return 1;
  1294. }
  1295.  
  1296. stock SendMessageToAllClanMembers(text[])
  1297. {
  1298.     for(new i = 0;i<MAX_PLAYERS;i++)
  1299.     {
  1300.         if(pInfo[i][pClan] == 1 || pInfo[i][pClanleader] == 1)
  1301.         {
  1302.             SendClientMessage(i,0x00FFEE99, text);
  1303.         }
  1304.     }
  1305.     return true;
  1306. }
  1307.  
  1308. stock TeleClanMembers(playerid)
  1309. {
  1310.     new Float:x, Float:y, Float:z;
  1311.     GetPlayerPos(playerid, x, y, z);
  1312.     for(new pplayerid = 0; pplayerid < MAX_PLAYERS; pplayerid++)
  1313.     {
  1314.         if(pInfo[pplayerid][pClan] == 1)
  1315.         {
  1316.             SetPlayerPos(pplayerid, x+0.5, y+0.6, z);
  1317.         }
  1318.     }
  1319.     return 1;
  1320. }
  1321.  
  1322. ShowGangZoneColor(zonee,color)
  1323. {
  1324.     GangZoneShowForAll(zonee, color);
  1325.     return 1;
  1326. }
  1327.  
  1328. stock Car(pplayerid,model)
  1329. {
  1330.     new Float:x,Float:y,Float:z,Float:a;
  1331.     GetPlayerPos(pplayerid,x,y,z),GetPlayerFacingAngle(pplayerid,a);
  1332.     if(model == 1)
  1333.     {Tur1=CreateVehicle(Turismo,x,y,z,a,0,0,-1),PutPlayerInVehicle(pplayerid,Tur1,0);}
  1334.     if(model == 2)
  1335.     {Buf1=CreateVehicle(Bullet,x,y,z,a,0,0,-1),PutPlayerInVehicle(pplayerid,Buf1,0);}
  1336.     if(model == 3)
  1337.     {Inf1=CreateVehicle(Infernus,x,y,z,a,0,0,-1),PutPlayerInVehicle(pplayerid,Inf1,0);}
  1338.     return 1;
  1339. }
  1340.  
  1341. stock Cars(playerid)
  1342. {
  1343.         if(InClanZone == true && IsPlayerInDynamicArea(playerid, ClanArea))
  1344.         {
  1345.             if(Infer == 1 )
  1346.             {
  1347.  
  1348.                 new Float:pos[4];
  1349.                 GetPlayerPos(playerid,pos[0],pos[1],pos[2]); GetPlayerFacingAngle(playerid,pos[3]);
  1350.                 Inf[0] = CreateVehicle(Infernus,pos[0]+1.458,pos[1]+9.895,pos[2],pos[3],0,0,-1);
  1351.                 Inf[1] = CreateVehicle(Infernus,pos[0]+3.673,pos[1]+6.348,pos[2],pos[3],0,0,-1);
  1352.                 Inf[2] = CreateVehicle(Infernus,pos[0]+4.915,pos[1]+4.121,pos[2],pos[3],0,0,-1);
  1353.                 Inf[3] = CreateVehicle(Infernus,pos[0]+6.133,pos[1]+1.705,pos[2],pos[3],0,0,-1);
  1354.                 Inf[4] = CreateVehicle(Infernus,pos[0]+7.483,pos[1]+0.998,pos[2],pos[3],0,0,-1);
  1355.                 SCM(playerid,-1,""COL_YELLOW"Vehicle spawned!");
  1356.                 Infer =0,Bull = 0,Turi = 0;
  1357.             }
  1358.             if(Turi == 1)
  1359.             {
  1360.                 new Float:pos[4];
  1361.                 GetPlayerPos(playerid,pos[0],pos[1],pos[2]); GetPlayerFacingAngle(playerid,pos[3]);
  1362.                 Tur[0] = CreateVehicle(Turismo,pos[0]+1.458,pos[1]+9.895,pos[2],pos[3],0,0,-1);
  1363.                 Tur[1] = CreateVehicle(Turismo,pos[0]+3.673,pos[1]+6.348,pos[2],pos[3],0,0,-1);
  1364.                 Tur[2] = CreateVehicle(Turismo,pos[0]+4.915,pos[1]+4.121,pos[2],pos[3],0,0,-1);
  1365.                 Tur[3] = CreateVehicle(Turismo,pos[0]+6.133,pos[1]+1.705,pos[2],pos[3],0,0,-1);
  1366.                 Tur[4] = CreateVehicle(Turismo,pos[0]+7.483,pos[1]+0.998,pos[2],pos[3],0,0,-1);
  1367.                 SCM(playerid,-1,""COL_YELLOW"Vehicle spawned!");
  1368.                 Infer =0,Bull = 0,Turi = 0;
  1369.             }
  1370.             if(Bull == 1)
  1371.             {
  1372.                 new Float:pos[4];
  1373.                 GetPlayerPos(playerid,pos[0],pos[1],pos[2]); GetPlayerFacingAngle(playerid,pos[3]);
  1374.                 Bul[0] = CreateVehicle(Bullet,pos[0]+1.458,pos[1]+9.895,pos[2],pos[3],0,0,-1);
  1375.                 Bul[1] = CreateVehicle(Bullet,pos[0]+3.673,pos[1]+6.348,pos[2],pos[3],0,0,-1);
  1376.                 Bul[2] = CreateVehicle(Bullet,pos[0]+4.915,pos[1]+4.121,pos[2],pos[3],0,0,-1);
  1377.                 Bul[3] = CreateVehicle(Bullet,pos[0]+6.133,pos[1]+1.705,pos[2],pos[3],0,0,-1);
  1378.                 Bul[4] = CreateVehicle(Bullet,pos[0]+7.483,pos[1]+0.998,pos[2],pos[3],0,0,-1);
  1379.                 SCM(playerid,-1,""COL_YELLOW"Vehicle spawned!");
  1380.                 Infer =0,Bull = 0,Turi = 0;
  1381.             }
  1382.         }else return SCM(playerid,-1,""COL_RED"You are not in clan area");
  1383.         return 1;
  1384. }
  1385.  
  1386.  
  1387. stock clanweapon(weaponid)
  1388. {
  1389.     for(new i =0; i<MAX_PLAYERS;i++)
  1390.     {
  1391.         if(pInfo[i][pClan] == 1 || pInfo[i][pClanleader] == 1)
  1392.         {
  1393.             GivePlayerWeapon(i,weaponid,200);
  1394.         }
  1395.     }
  1396.     return 1;
  1397. }
  1398. forward wmsg(playerid);
  1399. public wmsg(playerid)
  1400. {
  1401.     if(Welcomemessage[playerid] == 1)
  1402.     {GameTextForPlayer(playerid,"~y~WELCOME TO NEW VERSION OF\n\n~g~CLAN TAG CREATOR\n\n~y~ENJOY HERE!!!",5000,5),Welcomemessage[playerid] = 0;}
  1403.     return 1;
  1404. }
  1405.  
  1406. forward Updatemapicon(playerid,ID);
  1407. public Updatemapicon(playerid,ID)
  1408. {
  1409.     if(pInfo[ID][pClan] == 1 || pInfo[ID][pClanleader] == 1)
  1410.     {
  1411.         new Float:x,Float:y,Float:z;
  1412.         GetPlayerPos(ID,x,y,z);
  1413.         if(renew[playerid] == 0)
  1414.         {
  1415.             MapIcons[playerid] = SetPlayerMapIcon(playerid,1,x,y,z,0,COLOR_CLAN,1);
  1416.         }
  1417.         if(renew[playerid] == 1)
  1418.         {
  1419.             RemovePlayerMapIcon(playerid,MapIcons[playerid]);
  1420.         }
  1421.     }
  1422.     return 1;
  1423. }
  1424.  
  1425. forward Updateclanmapicon(playerid);
  1426. public Updateclanmapicon(playerid)
  1427. {
  1428.     for(new i=0;i<99;i++)
  1429.     {
  1430.         if(i == playerid)continue;
  1431.         if(pInfo[i][pClan] == 1 || pInfo[i][pClanleader] == 1)
  1432.         {
  1433.                 new Float:x,Float:y,Float:z;
  1434.                 GetPlayerPos(i,x,y,z);
  1435.                 if(renew[playerid] == 0)
  1436.                 {
  1437.                     MapIcons[i] = SetPlayerMapIcon(playerid,i,x,y,z,0,COLOR_CLAN,1);
  1438.                 }
  1439.                 if(renew[playerid] == 1)
  1440.                 {
  1441.                     RemovePlayerMapIcon(playerid,MapIcons[i]);
  1442.                 }
  1443.         }
  1444.     }
  1445.     return 1;
  1446. }
  1447.  
  1448. stock show(playerid)
  1449. {
  1450.     if(showing[playerid] ==1)
  1451.     {
  1452.         TogglePlayerControllable(playerid, false);
  1453.         St(playerid);
  1454.         SetTimerEx("Ste",2500,false,"i",playerid);
  1455.         SetTimerEx("StartLoading",5000,false,"i",playerid);
  1456.         showing[playerid] = 0;
  1457.     }
  1458.     return 1;
  1459. }
  1460.  
  1461. forward task(playerid);
  1462. public task(playerid)
  1463. {
  1464.     if(GPSusedrecently[playerid] >=1)
  1465.     {
  1466.         GPSusedrecently[playerid] --;
  1467.     }
  1468.     return 1;
  1469. }
  1470.  
  1471. forward Updatetracking();
  1472. public Updatetracking()
  1473. {
  1474.     foreach(Player,i)
  1475.     {
  1476.         if(reaching[i] == 1)
  1477.         {
  1478.             progressing[i] --;
  1479.             SetProgressBarValue(Tracking[i], progressing[i]);
  1480.             ShowProgressBarForPlayer(i, Tracking[i]);
  1481.         }
  1482.         if(GetProgressBarValue(Tracking[i]) == 0 || reaching[i] == 0)
  1483.         {
  1484.             HideProgressBarForPlayer(i, Tracking[i]);
  1485.         }
  1486.     }
  1487.     return 1;
  1488. }
  1489.  
  1490. forward St(playerid);
  1491. public St(playerid)
  1492. {
  1493.     TextDrawShowForPlayer(playerid, textdraw0);
  1494.     SetTimerEx("StopLoading",2000, false, "i",playerid);
  1495.     return 1;
  1496. }
  1497. forward Ste(playerid);
  1498. public Ste(playerid)
  1499. {
  1500.     TextDrawShowForPlayer(playerid, textdraw1);
  1501.     SetTimerEx("StopLoading", 2000, false, "i", playerid);
  1502.     return 1;
  1503. }
  1504.  
  1505. forward StartLoading(playerid);
  1506. public StartLoading(playerid)
  1507. {
  1508.     TextDrawShowForPlayer(playerid, textdraw0);
  1509.     TextDrawShowForPlayer(playerid, textdraw1);
  1510.     SetTimerEx("StopLoading", 3000, false, "i", playerid);
  1511.     return true;
  1512. }
  1513.  
  1514. forward StopLoading(playerid);
  1515. public StopLoading(playerid)
  1516. {
  1517.     TextDrawHideForPlayer(playerid, textdraw0);
  1518.     TextDrawHideForPlayer(playerid, textdraw1);
  1519.     return true;
  1520. }
  1521.  
  1522. forward unfreeze(playerid);
  1523. public unfreeze(playerid)
  1524. {
  1525.     if(freeze[playerid] == 1)
  1526.     {
  1527.         TogglePlayerControllable(playerid, true);
  1528.         GameTextForPlayer(playerid,"~y~Now You Can Move",3000,5);
  1529.         freeze[playerid]  = 0;
  1530.     }
  1531.     return 1;
  1532. }
  1533.  
  1534. forward AutoMessage();
  1535. public AutoMessage()
  1536. {
  1537.     new string[128];
  1538.     format(string, sizeof(string), "[SERVER]%s", AutoMessages[random(sizeof(AutoMessages))]);
  1539.     SendClientMessageToAll(0x33AA33AA, string);
  1540.     return 1;
  1541. }
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!