Guest User

Untitled

a guest
Aug 16th, 2013
166
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
Pawn 7.36 KB | None | 0 0
  1. #include <a_samp>
  2. #include <zcmd>
  3.  
  4. #define FILTERSCRIPT
  5. #define LIST DIALOG_STYLE_LIST
  6. #define INPUT DIALOG_STYLE_INPUT
  7. #define PDI 100
  8. #define COLOR 0xFF8080FF
  9. #pragma tabsize 0  
  10.  
  11.  
  12. #if defined FILTERSCRIPT
  13.  
  14. AntiDeAMX( )
  15. {
  16. new a [ ] [ ] =
  17. {
  18. "Unarmed ( Fist ) " ,
  19. " BrassK "
  20. } ;
  21. #pragma unused a
  22. }
  23. public OnFilterScriptInit()
  24. {
  25.     print("\n--------------------------------------");
  26.     print(" Prezidento Sistema By SCmindë(MindCode)");
  27.     print("--------------------------------------\n");
  28.     AntiDeAMX();
  29.     return 1;
  30. }
  31. public OnPlayerSpawn(playerid)
  32. {
  33.   if ( GetPVarInt ( playerid , "Prezidentas" ) == 1)
  34.   {
  35.     SetPlayerSkin ( playerid , 115 ); //prezidendo skin
  36.     SetPlayerColor ( playerid , 0xFFFFFFFF ); //prezidento spalva
  37.     return 1;
  38.   }
  39.   return 1;
  40. }
  41.  
  42. public OnDialogResponse(playerid, dialogid, response, listitem, inputtext[])
  43. {
  44. if(dialogid ==  PDI )
  45. {
  46.         if(response)
  47.         {
  48.  
  49.  
  50.          switch(listitem)
  51.          {
  52.           case 0:
  53.                  {
  54.                          ShowPlayerDialog ( playerid , PDI+1 , INPUT , "Prezidento praneðimas","Áveskite praneðimà","Praneðti","");
  55.                  }
  56.  
  57.         case 1:
  58.                  {
  59.                          ShowPlayerDialog ( playerid , PDI+2 , LIST , "Darbø ID" , "1.Policija\n2.Medikas\n3.Taksi" , "Toliau","");
  60.                  }
  61.                  case 2:
  62.                  {
  63.                          ShowPlayerDialog ( playerid , PDI+3 , INPUT , "Nuimti Direktoriu" , "Áraðykite Direktoriaus vardà kuriam norite nuimti direktoriu" , "Nuimti" , "" );
  64.                  }
  65.          }
  66.            
  67.         }
  68.         return 1;
  69. }
  70. else if ( dialogid == PDI+1 )
  71. {
  72.   if ( response )
  73.   {
  74.     new
  75.       msg [ 128 ];
  76.     if ( strlen ( inputtext ) <= 5 ) return SendClientMessage(playerid,COLOR,"Praneðimas turi bûti maþiau negu 5 skaitmenø");
  77.     format ( msg , sizeof(msg) , "Prezidento Praneðimas: %s ",inputtext);
  78.     SendClientMessageToAll(COLOR,msg);
  79.  
  80.   }
  81.   return 1;
  82. }
  83. else if ( dialogid == PDI+2 )
  84. {
  85.   if ( response )
  86.   {
  87.   if ( listitem == 0 )
  88.   {
  89.     ShowPlayerDialog ( playerid , PDI+4 , INPUT , "Direktoriaus uþdëjimas", "Áraðykite vardà kuriam norite uþdëti direktoriu","Uþdëti","");
  90.     SetPVarInt ( playerid , "DirekPar" , 1);
  91.     return 1;
  92.   }
  93.   else if ( listitem == 1 )
  94.   {
  95.     ShowPlayerDialog ( playerid , PDI+4 , INPUT , "Direktoriaus uþdëjimas", "Áraðykite vardà kuriam norite uþdëti direktoriu","Uþdëti","");
  96.     SetPVarInt ( playerid , "DirekPar" , 2);
  97.     return 1;
  98.   }
  99.   else if ( listitem == 2)
  100.   {
  101.     ShowPlayerDialog ( playerid , PDI+4 , INPUT , "Direktoriaus uþdëjimas", "Áraðykite vardà kuriam norite uþdëti direktoriu","Uþdëti","");
  102.     SetPVarInt ( playerid , "DirekPar" , 3);
  103.     return 1;
  104.   }
  105.   return 1;
  106.   }
  107. }
  108. else if ( dialogid == PDI+4 )
  109. {
  110.   if ( response )
  111.   {
  112.     switch ( GetPVarInt ( playerid , "DirekPar" ) )
  113.     {
  114.       case 1:
  115.       {
  116.        
  117.         new name[MAX_PLAYER_NAME];
  118.         strmid(name,inputtext,0,sizeof(name));
  119.         new id = GetPlayeridMid(name),
  120.           msg [ 250 ];
  121.         if ( id == INVALID_PLAYER_ID )
  122.         {
  123.           SendClientMessage(playerid,COLOR,"Tokio þaidëjo nëra , praðome patinkslinti vardà");
  124.           return 1;
  125.         }
  126.         GetPlayerName(id,name,sizeof(name));
  127.         SetPVarInt (id , "Direktorius" , 1);
  128.         format ( msg , sizeof(msg) , "Prezidentas paskárë %s Policijos Direktoriumi",pName(id));
  129.         SendClientMessageToAll(COLOR,msg);
  130.         format (msg , sizeof(msg), "Sveikiname , PREZIDENTAS %s jus paskárë Policijos Direktoriumi",pName(playerid) );
  131.         SendClientMessage (id , COLOR , msg);
  132.        
  133.  
  134.       }
  135.       case 2:
  136.       {
  137.         new name[MAX_PLAYER_NAME];
  138.         strmid(name,inputtext,0,sizeof(name));
  139.         new id = GetPlayeridMid(name),
  140.           msg [ 250 ];
  141.         if ( id == INVALID_PLAYER_ID )
  142.         {
  143.           SendClientMessage(playerid,COLOR,"Tokio þaidëjo nëra , praðome patinkslinti vardà");
  144.           return 1;
  145.         }
  146.         SetPVarInt (id , "Direktorius" , 2);
  147.         format ( msg , sizeof(msg) , "Prezidentas paskárë %s Medikø Direktoriumi",pName(id));
  148.         SendClientMessageToAll(COLOR,msg);
  149.         format (msg , sizeof(msg), "Sveikiname , PREZIDENTAS %s jus paskárë Medikø Direktoriumi",pName(playerid) );
  150.         SendClientMessage (id , COLOR , msg);
  151.       }
  152.       case 3:
  153.       {
  154.         new name[MAX_PLAYER_NAME];
  155.         strmid(name,inputtext,0,sizeof(name));
  156.         new id = GetPlayeridMid(name),
  157.           msg [ 250 ];
  158.         if ( id == INVALID_PLAYER_ID )
  159.         {
  160.           SendClientMessage(playerid,COLOR,"Tokio þaidëjo nëra , praðome patinkslinti vardà");
  161.           return 1;
  162.         }
  163.         SetPVarInt ( id , "Direktorius" , 3);
  164.         format ( msg , sizeof(msg) , "Prezidentas paskárë %s Taksi Direktoriumi",pName(id));
  165.         SendClientMessageToAll(COLOR,msg);
  166.         format (msg , sizeof(msg), "Sveikiname , PREZIDENTAS %s jus paskárë Taksi Direktoriumi",pName(playerid) );
  167.         SendClientMessage (id , COLOR , msg);
  168.       }
  169.     }
  170.   }
  171.   return 1;
  172. }
  173. else if ( dialogid == PDI+3 )
  174. {
  175.   if ( response )
  176.   {
  177.     new name[MAX_PLAYER_NAME];
  178.     strmid(name,inputtext,0,sizeof(name));
  179.     new id = GetPlayeridMid(name),
  180.       msg [ 250 ];
  181.     if ( id == INVALID_PLAYER_ID )
  182.     {
  183.       SendClientMessage(playerid,COLOR,"Tokio þaidëjo bylos neradome , praðome patikslinti vardà");
  184.       return 1;
  185.     }
  186.     SetPVarInt(id,"Direktorius",0);
  187.     format(msg,sizeof(msg),"Prezidentas paðalino %s nuo direktoriaus posto",pName(id));
  188.     SendClientMessageToAll(COLOR,msg);
  189.     format(msg,sizeof(msg),"Prezidentas tave paðalino nuo direktoriaus posto");
  190.     SendClientMessage(id,COLOR,msg);
  191.   }
  192.   return 1;
  193. }
  194.   return 1;
  195. }
  196.  
  197. // Komandos buvo reikalyngos testavimui , nemanau ,kad jum to prireiks todël galit iðtrynti
  198. /*
  199. CMD:uzmesti ( playerid )
  200. {
  201.   SetPVarInt(playerid,"Prezidentas" ,1 );
  202.   SetPlayerSkin ( playerid , 115 );
  203.   SendClientMessage(playerid,COLOR,"Uþsidëjai prezidentà");
  204.   return 1;
  205. }
  206. CMD:kelintasd ( playerid )
  207. {
  208.   format ( drkpas , sizeof(drkpas) , "Tavo D. ID: %d",GetPVarInt(playerid,"Direktorius") );
  209.   SendClientMessage(playerid,COLOR,drkpas);
  210.   return 1;
  211. }
  212. CMD:kelintas ( playerid )
  213. {
  214.   format ( drkpas , sizeof(drkpas) , "Tavo D. ID: %d",GetPVarInt(playerid,"DirekPar") );
  215.   SendClientMessage(playerid,COLOR,drkpas);
  216.   return 1;
  217. }*/
  218. CMD:ppanel ( playerid )
  219. {
  220.   if ( GetPVarInt(playerid,"Prezidentas") != 1 ) return SendClientMessage(playerid,COLOR,"Ði komanda tik prezidentui");
  221.   ShowPlayerDialog ( playerid , PDI , LIST , "Prezidento Valdymo Panelë" , "{FFFFFF}[ {FF0000}»{FFFFFF} ]Skelbti praneðimà\n{FFFFFF}[ {FF0000}»{FFFFFF} ]Paskárti darbo direktoriu\n{FFFFFF}[ {FF0000}»{FFFFFF} ]Nuðalinti nuo direktoriaus pareigø","Pasirinkti","");
  222.   return 1;
  223. }
  224. stock GetPlayeridMid(name[])
  225. {
  226.     for(new i=0;i<MAX_PLAYERS;i++){
  227.     if(IsPlayerConnected(i)){
  228.       new gPlayerName[MAX_PLAYER_NAME];
  229.         GetPlayerName(i,gPlayerName,MAX_PLAYER_NAME);
  230.         if(strfind(gPlayerName,name,true) != -1) return i;
  231.   }}
  232.     return INVALID_PLAYER_ID;
  233. }
  234. public OnFilterScriptExit()
  235. {
  236.     return 1;
  237. }
  238.  
  239. #else
  240.  
  241. #endif
  242. stock pName(playerid)
  243. {
  244.    new Zaidejas[MAX_PLAYER_NAME];
  245.    GetPlayerName(playerid,Zaidejas,MAX_PLAYER_NAME);
  246.    return Zaidejas;
  247. }
Advertisement
Add Comment
Please, Sign In to add comment