Advertisement
MartisK

Notebook // v0.1 @ MartynasK

Jan 24th, 2014
234
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
Pawn 4.56 KB | None | 0 0
  1. /*
  2.  
  3.     NoteBook @ MartynasK
  4.  
  5. */
  6.  
  7. #include <a_samp>
  8. #include <Dini>
  9. #include <zcmd>
  10.  
  11. #define FILTERSCRIPT
  12. #define DIALOG_NOTEBOOK 0
  13. #define DIALOG_VIEW     1
  14. #define DIALOG_WRITE    2
  15.  
  16. public OnFilterScriptInit()
  17. {
  18.     print( "# NoteBook v0.1 by MartynasK successfully loaded." );
  19.     return 1;
  20. }
  21.  
  22. public OnFilterScriptExit()
  23. {
  24.     print( "# NoteBook v0.1 by MartynasK successfully unloaded." );
  25.     return 1;
  26. }
  27.  
  28. CMD:uzrasine( playerid )
  29. {
  30.     ShowPlayerDialog( playerid, DIALOG_NOTEBOOK, DIALOG_STYLE_LIST, "UŽRAŠINĖ", "{ff7e7e}> Sukurti naują įrašą\n{ff7e7e}Peržiūrėti paskutinį įrašą", "Atlikti", "Uždaryti" );
  31.     return true;
  32. }
  33.  
  34. public OnDialogResponse(playerid, dialogid, response, listitem, inputtext[])
  35. {
  36.     if( dialogid == DIALOG_NOTEBOOK )
  37.     {
  38.         if( response )
  39.         {
  40.             if( listitem == 0 ) ShowPlayerDialog( playerid, DIALOG_WRITE, DIALOG_STYLE_INPUT, "NAUJAS ĮRAŠAS", "{ffffff}Įveskite tekstą, kuris bus įrašytas į užrašinę:", "Įrašyti", "Atgal" );
  41.             else if( listitem == 1 )
  42.             {
  43.             new
  44.                         String  [ 170 ],
  45.                         uFailas [ 50 ],
  46.                         Vardas  [ MAX_PLAYER_NAME ],
  47.                         Menesis [ 11 ];
  48.                    
  49.             GetPlayerName( playerid, Vardas, MAX_PLAYER_NAME );
  50.             format( uFailas, sizeof( uFailas ), "Uzrasines/%s.ini", Vardas );
  51.                
  52.             if( !fexist( uFailas ) ) return SendClientMessage( playerid, 0xFFFFFFFF, "[ > ] {ff7e7e}Jūs dar neturite užrašų!" );
  53.                
  54.             new
  55.                         Uzrasas = dini_Get( uFailas, "Irasas" ),
  56.                 YY = dini_Get( uFailas, "Metai" ),
  57.                 MM = dini_Get( uFailas, "Menesis" ),
  58.                 DD = dini_Get( uFailas, "Diena" );
  59.                    
  60.             switch( MM )
  61.             {
  62.                 case 1: Menesis = "sausio";
  63.                 case 2: Menesis = "vasario";
  64.                 case 3: Menesis = "kovo";
  65.                 case 4: Menesis = "balandžio";
  66.                 case 5: Menesis = "gegužės";
  67.                 case 6: Menesis = "birželio";
  68.                 case 7: Menesis = "liepos";
  69.                 case 8: Menesis = "rugpjūčio";
  70.                 case 9: Menesis = "rugsėjo";
  71.                 case 10: Menesis = "spalio";
  72.                 case 11: Menesis = "lapkričio";
  73.                 case 12: Menesis = "gruodžio";
  74.             }
  75.                    
  76.             format( String, sizeof( String ), "{ff7e7e}%i metų %s %i dienos įrašas: \n{ffffff}%s", YY, Menesis, DD, Uzrasas );
  77.             ShowPlayerDialog( playerid, DIALOG_VIEW, DIALOG_STYLE_MSGBOX, "UŽRAŠAI", String, "Atgal", "" );
  78.             return true;
  79.             }
  80.         }
  81.     }
  82.    
  83.     else if( dialogid == DIALOG_WRITE )
  84.     {
  85.         if( !response ) ShowPlayerDialog( playerid, DIALOG_NOTEBOOK, DIALOG_STYLE_LIST, "UŽRAŠINĖ", "{ff7e7e}> Sukurti naują įrašą\n{ff7e7e}Peržiūrėti paskutinį įrašą", "Atlikti", "Uždaryti" );
  86.         else if( response )
  87.         {
  88.             new
  89.                 Vardas  [ MAX_PLAYER_NAME ],
  90.                 uFailas [ 60 ],
  91.                 HH, MM, DD;
  92.                
  93.         if( strlen( inputtext ) > 100 ) ShowPlayerDialog( playerid, DIALOG_WRITE, DIALOG_STYLE_INPUT, "NAUJAS ĮRAŠAS", "{ff0000}Įvestas tekstas per ilgas! Didžiausias leistinas simbolių kiekis: 100.\n\n{ffffff}Įveskite tekstą, kuris bus įrašytas į užrašinę:", "Įrašyti", "Atgal" );
  94.         if( strlen( inputtext ) < 10 ) ShowPlayerDialog( playerid, DIALOG_WRITE, DIALOG_STYLE_INPUT, "NAUJAS ĮRAŠAS", "{ff0000}Įvestas tekstas per trumpas! Turite įrašyti bent 10 simbolių.\n\n{ffffff}Įveskite tekstą, kuris bus įrašytas į užrašinę:", "Įrašyti", "Atgal" );
  95.                
  96.         GetPlayerName( playerid, Vardas, MAX_PLAYER_NAME );
  97.         getdate( HH, MM, DD );
  98.         format( uFailas, sizeof( uFailas ), "Uzrasines/%s.ini", Vardas );
  99.         if( !fexist( uFailas ) )
  100.         {
  101.                 dini_Create( uFailas );
  102.            
  103.                 dini_Set( uFailas, "Irasas", inputtext );
  104.             dini_IntSet( uFailas, "Metai", HH );
  105.             dini_IntSet( uFailas, "Menesis", MM );
  106.             dini_IntSet( uFailas, "Diena", DD );
  107.                
  108.             SendClientMessage( playerid, 0xFFFFFFFF, "[ > ] {ff7e7e}Įrašas sėkmingai įrašytas!" );
  109.             return true;
  110.         }
  111.         else if( fexist( uFailas ) )
  112.         {
  113.             dini_Remove( uFailas );
  114.                
  115.             dini_Create( uFailas );
  116.  
  117.             dini_Set( uFailas, "Irasas", inputtext );
  118.             dini_IntSet( uFailas, "Metai", HH );
  119.             dini_IntSet( uFailas, "Menesis", MM );
  120.             dini_IntSet( uFailas, "Diena", DD );
  121.                
  122.             SendClientMessage( playerid, 0xFFFFFFFF, "[ > ] {ff7e7e}Įrašas sėkmingai pakeistas!" );
  123.             return true;
  124.         }
  125.         }
  126.     }
  127.    
  128.     else if( dialogid == DIALOG_VIEW )
  129.     {
  130.             if( response ) ShowPlayerDialog( playerid, DIALOG_NOTEBOOK, DIALOG_STYLE_LIST, "UŽRAŠINĖ", "{ff7e7e}> Sukurti naują įrašą\n{ff7e7e}Peržiūrėti paskutinį įrašą", "Atlikti", "Uždaryti" );
  131.         return true;
  132.     }
  133.    
  134.     return 1;
  135. }
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement