Stuneris

Remember of first script (Donator by Stuneris) 2009 December

Dec 12th, 2014
456
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
Pawn 5.54 KB | None | 0 0
  1. #include <a_samp>
  2. #include <dudb>
  3. #include <zcmd>
  4. #include <sscanf>
  5.  
  6. new bool:Logged[MAX_PLAYERS];
  7. new bool:Donator[MAX_PLAYERS];
  8. new Text[128];
  9. new string2[256];
  10. new pname1[MAX_PLAYER_NAME];
  11.  
  12. #define GREEN 0x00EA00FF
  13. #define RED 0xF00000FF
  14. #define PURPLE 0x330066AA
  15.  
  16. #pragma tabsize 0
  17.  
  18. public OnFilterScriptInit()
  19. {
  20.     print("\n----------------------------------");
  21.     print(" Donator by Stuneris LODED");
  22.     print("----------------------------------\n");
  23.     return 1;
  24. }
  25.  
  26. public OnFilterScriptExit()
  27. {
  28.     print("\n----------------------------------");
  29.     print(" Donator by Stuneris UNLODED");
  30.     print("----------------------------------\n");
  31.     return 1;
  32. }
  33.  
  34. public OnPlayerConnect(playerid)
  35. {
  36.     Logged[playerid] = false;
  37.     Donator[playerid] = false;
  38. //==============================================================================
  39.     new file[128], vardas[128];
  40.     GetPlayerName(playerid, vardas, 128);
  41.     format(file,128,"Users/%s.ini",vardas);
  42.     if(!dini_Exists(file))
  43.     {
  44.     ShowPlayerDialog(playerid,9876,DIALOG_STYLE_INPUT,"Registracija","Jai norite zaisti serveryje turite uzsiregistruoti.\nIveskite slaptazodi kuri naudosite prisijungimui:","Registruotis","Iseiti");
  45.     }
  46.     else if(dini_Exists(file))
  47.     {
  48.     ShowPlayerDialog(playerid,9877,DIALOG_STYLE_INPUT,"Prisijungimas","Jai norite zaisti serveryje turite prisijungti\nIveskite savo slaptazodi:","Prisijungti","Iseiti");
  49.     }
  50.     return 1;
  51. }
  52.  
  53. public OnPlayerDisconnect(playerid, reason)
  54. {
  55.     Logged[playerid] = false;
  56.     Donator[playerid] = false;
  57.     return 1;
  58. }
  59.  
  60. public OnPlayerSpawn(playerid)
  61. {
  62.     if(Donator[playerid])
  63.     {
  64.         SendClientMessageToAll(PURPLE, "Katik prisijunge donatorius!");
  65.     }
  66.     return 1;
  67. }
  68.  
  69. public OnDialogResponse(playerid, dialogid, response, listitem, inputtext[])
  70. {
  71. GetPlayerName(playerid,pname1,sizeof(pname1));
  72. //==============================================================================
  73.     if(dialogid == 9876)
  74.     {
  75.     if(response)
  76.     {
  77.     if(!strlen(inputtext))
  78.     {
  79.     ShowPlayerDialog(playerid,9876,DIALOG_STYLE_INPUT,"Registracija","Neivedete slaptazodio.\nIveskite slaptazodi kuri naudosite prisijungimui:","Registruotis","Iseiti");
  80.     }
  81.     else
  82.     {
  83.     new file[128], vardas[128];
  84.     GetPlayerName(playerid,vardas,128);
  85.     format(file,128,"Users/%s.ini",vardas);
  86.     dini_Create(file);
  87.     dini_IntSet(file,"Slaptazodis",udb_hash(inputtext));
  88.     Logged[playerid] = true;
  89.     SendClientMessage(playerid,0xFFFFFFFF,"Registracija sekminga, prie serverio jus prijungtas automatiskai");
  90.     }
  91.     }
  92.     else if(!response)
  93.     {
  94.     Kick(playerid);
  95.     }
  96.     return 1;
  97. }
  98.    
  99.     if(dialogid == 9877)
  100.     {
  101.     if(response)
  102.     {
  103.     new file[128], vardas[128], pass[256], donatorius[256];
  104.     GetPlayerName(playerid, vardas, 128);
  105.     format(file,128,"Users/%s.ini",vardas);
  106.     pass = dini_Get(file,"Slaptazodis");
  107.        
  108.     donatorius = dini_Get(file,"donator");
  109.        
  110.     if(strval(donatorius) == 1)
  111.     {
  112.     SendClientMessage(playerid,0xFFFFFFFF,"Sveikas Donatoriau, geros dienos žaidime!");
  113.     Donator[playerid] = true;
  114.     }
  115.  
  116.     if(udb_hash(inputtext) != strval(pass))
  117.     {
  118.     ShowPlayerDialog(playerid,9877,DIALOG_STYLE_INPUT,"Prisijungimas","Slptazodis neteisingas.\nIveskite savo slaptazodi:","Prisijungti","Iseiti");
  119.     }
  120.     else
  121.     {
  122.     Logged[playerid] = true;
  123.     SendClientMessage(playerid,0xFFFFFFFF,"Jus sekmingai prisijungete, geros dienos");
  124.     }
  125.     }
  126.     else if(!response)
  127.     {
  128.     Kick(playerid);
  129.     }
  130.     return 1;
  131. }
  132.  
  133.     if(dialogid == 1)
  134.     {
  135.     if(response)
  136.     {
  137.     if(listitem == 0)
  138.     {
  139.     GivePlayerWeapon(playerid,30 ,100000);
  140.     }
  141.     if(listitem == 1)
  142.     {
  143.     GivePlayerWeapon(playerid,21 ,100000);
  144.     }
  145.     if(listitem == 2)
  146.     {
  147.     GivePlayerWeapon(playerid,28 ,100000);
  148.     }
  149.     if(listitem == 3)
  150.     {
  151.     GivePlayerWeapon(playerid,29 ,100000);
  152.     }
  153.     if(listitem == 4)
  154.     {
  155.     GivePlayerWeapon(playerid,32 ,100000);
  156.     }
  157.     if(listitem == 5)
  158.     {
  159.     GivePlayerWeapon(playerid,34 ,100000);
  160.     }
  161.     if(listitem == 6)
  162.     {
  163.     GivePlayerWeapon(playerid,25 ,100000);
  164.     }
  165.     if(listitem == 7)
  166.     {
  167.     GivePlayerWeapon(playerid,26 ,100000);
  168.     }
  169.     if(listitem == 8)
  170.     {
  171.     GivePlayerWeapon(playerid,27 ,100000);
  172.     }
  173.     if(listitem == 9)
  174.     {
  175.     GivePlayerWeapon(playerid,22 ,100000);
  176.     }
  177.     if(listitem == 10)
  178.     {
  179.     GivePlayerWeapon(playerid,23 ,100000);
  180.     }
  181.     if(listitem == 11)
  182.     {
  183.     GivePlayerWeapon(playerid,24 ,100000);
  184.     }
  185.     }
  186.     }
  187.     return 1;
  188. }
  189.  
  190. //===========================Donatoriu komandos=================================
  191.     CMD:dkomandos(playerid, params[])
  192.     {
  193.     if(Donator[playerid])
  194.     {
  195.     ShowPlayerDialog(playerid,2,DIALOG_STYLE_MSGBOX,"Donatoriu komandos","/d-parasysi zinute visiems\n/jetpack-gausi Jet-Pack\n/gun-donatoriaus ginklai","gerai","");
  196.     }
  197.     return 1;
  198. }
  199.  
  200.     CMD:d(playerid, params[])
  201.     {
  202.     if(Donator[playerid])
  203.     {
  204.     if(sscanf(params,"s", Text)) return SendClientMessage(playerid, RED, "Pranesti visiems: /a [TEXT]");
  205.     format(string2, 128, "[Donatorius] %s : %s",PlayerName(playerid), Text);
  206.     SendClientMessageToAll(PURPLE, string2);
  207.     }
  208.     return 1;
  209. }
  210.  
  211.     CMD:jetpack(playerid, params[])
  212.     {
  213.     if(Donator[playerid])
  214.     {
  215.     SetPlayerSpecialAction(playerid,SPECIAL_ACTION_USEJETPACK);
  216.     SendClientMessage(playerid, GREEN, "Gavai Jet-Pack");
  217.     }
  218.     return 1;
  219. }
  220.  
  221.     CMD:gun(playerid, params[])
  222.     {
  223.     if(Donator[playerid])
  224.     {
  225.     ShowPlayerDialog(playerid,1,DIALOG_STYLE_LIST,"Donatoriaus ginklai","AK-47\nM4\nMicro SMG\nMP5\nTec9\nSniper Rifle\nShotgun\nSawn-off Shotgun\nCombat Shotgun\n9mm\nSilenced 9mm\nDesert Eagle","Rinktis","Iseiti");
  226.     }
  227.     return 1;
  228. }
  229. //=================================Stock========================================
  230. stock PlayerName(id)
  231. {
  232.     new name[MAX_PLAYER_NAME];
  233.     GetPlayerName(id, name, MAX_PLAYER_NAME);
  234.     return name;
  235. }
Advertisement
Add Comment
Please, Sign In to add comment