CLEO Help I have a problem with my code

CLEO related
Status
Not open for further replies.
T

TedyFromAnotherPlanet

Member
Joined
Jan 5, 2020
Messages
8
Reaction score
0
Location
Russia
So , i made a dialog CMD which helps instructors but when i execute it is making my game working slow but i have more then 60 fps , what should i do?

My Code:

PHP: 
{$CLEO .cs}

0000: NOP

0662: "InstructorCMD by TaZZeRR"
thread "InstructorCMD"
wait 2500

0AB1: call_scm_func @chatmsg 0
$activ = 0
while true
wait 0


if and
0AB0: 16
0AB0: 90
then
    if
    $activ == 0
     then
     $activ = 1
      wait 2000
     else
      $activ = 0
       wait 2000
     end
end

if and
    $activ == 1
    0AB0: 88
    then
    0AC6: 0@ = label @dialog_hex offset
    0B3B: samp show_dialog id 1000 caption "Choose the language" text 0@ button_1 "Ok" button_2 "Cancel" style 2
    wait 1000
    end

if
0B3C:  samp is_dialog_responded id 1000 button 2@ list_item 3@ input_text 0
then
    if and
       2@ == 1
       3@ == 0
       then
            chatmsg "The eng version isn't done at the moment" -1
        end
    
      
       if and
       2@ == 1
       3@ == 1
       then
           0AC6: 0@ = label @dialog_licente offset
           0B3B: samp show_dialog id 1001 caption "Alege licenta pe care doresti sa o acorzi" text 0@ button_1 "Ok" button_2 "Cancel" style 2
        end
        
    end
    
    if
            0B3C:  samp is_dialog_responded id 1001 button 2@ list_item 3@ input_text 0
            then
                if and
                    2@ == 1
                    3@ == 0
                    then
                    0AC6: 0@ = label @dialog_gun offset
                    0B3B: samp show_dialog id 1002 caption "Licenta de gun" text 0@ button_1 "Ok" button_2 "Back" style 2
                end
                
                if and
                    2@ == 1
                    3@ == 1
                    then
                  0AF9: samp say_msg "Iisus e un sfant"
                end
                
                if and
                    2@ == 1
                    3@ == 2
                    then
                  0AF9: samp say_msg "Iisus vorbeste urat"
                end
                
    end
    
    if
     0B3C:  samp is_dialog_responded id 1002 button 2@ list_item 3@ input_text 0
     then
    
     if and
     2@ == 1
     2@ == 0
     then
       chatmsg "{408080}InstructorCMD: Licenta gun - 1/9."
    0AF9: samp say_msg "Salut, sunt membrul factiunii School Instructors LS si te voi ajuta sa obtii licenta de 'Gun'."
     end
    
     if and
     2@ == 1
     3@ == 1
     then
     0B3B: samp show_dialog id 1003 caption "Gun 2/9" text "Tasteaza id-ul player-ului in casuta de mai jos" button_1 "Ok" button_2 "Cancel" style 1
     end
    
       if
        2@ == 0
        then
          0AC6: 0@ = label @dialog_licente offset
          0B3B: samp show_dialog id 1001 caption "Alege licenta pe care doresti sa o acorzi" text 0@ button_1 "Ok" button_2 "Cancel" style 2
       end
      
     end
    
     if
      0B3C:  samp is_dialog_responded id 1003 button 2@ list_item 3@ input_text 4@
      then
      0AC8: 4@ = allocate_memory_size 128
      0AD4: 2@ 4@ format "%d" 4@
      0B36: samp 0@ = get_player_nickname 4@
      if
      2@ == 1
       then
       chatmsg "{408080}InstructorCMD: Licenta gun - 2/9."
        0AF9: samp say_msg "Pentru inceput tasteaza comanda [/sl %s] pentru a-ti verifica licentele." 0@
               0AC9: free_allocated_memory 4@         
       end
      
       if
       2@ == 0
       then
      end
    
end

:dialog_hex
 HEX
 "EN" A
 "RO" 0
 END
 
 :dialog_licente
 HEX
 "Gun" A
 "Boat" A
 "Fly" 0
 END
 :dialog_gun
 HEX
 "Gun1" A
 "Gun2" A
 "Gun3" A
 "Gun4" A
 "Gun5" A
 "Gun6" A
 "Gun7" A
 "Gun8" A
 "Gun9" 0
 END
 
 :chatmsg
0AA2: 0@ = load_library "samp.dll" // IF and SET
chatmsg "{bfff00}Mod created by: {0080ff}TaZZeRR" -1
0085: 1@ = 0@ // (int)
1@ += 2203876
0A8D: 3@ = read_memory 1@ size 4 virtual_protect 1
0085: 2@ = 0@ // (int)
2@ += 409616       
0AB2: ret 0
 
Sort by date Sort by votes
Parazitas

Parazitas

God
Staff member
Joined
Jan 2, 2017
Messages
3,315
Solutions
7
Reaction score
935
Location
Lithuania
What this should do?
PHP: 
if
0B3C:  samp is_dialog_responded id 1003 button 2@ list_item 3@ input_text 4@
then
    0AC8: 4@ = allocate_memory_size 128
    0AD4: 2@ 4@ format "%d" 4@
    0B36: samp 0@ = get_player_nickname 4@
    if
    2@ == 1
    then
        chatmsg "{408080}InstructorCMD: Licenta gun - 2/9."
        0AF9: samp say_msg "Pentru inceput tasteaza comanda [/sl %s] pentru a-ti verifica licentele." 0@
        0AC9: free_allocated_memory 4@       
    end
    
    if
    2@ == 0
    then
        ////
    end
end

Also...
You must add end for while true everytime
PHP: 
{$CLEO .cs}

0000: "InstructorCMD by TaZZeRR"
THREAD "InstructorCMD"

wait 8500

0AF8: "{bfff00}Mod created by: {0080ff}TaZZeRR" -1

$activ = 0

while true
wait 0

if and
0AB0: 16
0AB0: 90
then
    if
    1@ == 0
    then
        1@ = 1
    else
        1@ = 0
     end
    wait 2000 // anti spam
end

if and
1@ == 1
0AB0: 88
then
    0AC6: 0@ = label @dialog_hex offset
    0B3B: samp show_dialog id 1000 caption "Choose the language" text 0@ button_1 "Ok" button_2 "Cancel" style 2
    wait 1000
end

if
0B3C:  samp is_dialog_responded id 1000 button 2@ list_item 3@ input_text 0
then
    if and
    2@ == 1
    3@ == 0
    then
        chatmsg "The eng version isn't done at the moment" -1
    end
    
    if and
    2@ == 1
    3@ == 1
    then
        0AC6: 0@ = label @dialog_licente offset
        0B3B: samp show_dialog id 1001 caption "Alege licenta pe care doresti sa o acorzi" text 0@ button_1 "Ok" button_2 "Cancel" style 2
    end       
end
   
if
0B3C:  samp is_dialog_responded id 1001 button 2@ list_item 3@ input_text 0
then
    if and
    2@ == 1
    3@ == 0
    then
        0AC6: 0@ = label @dialog_gun offset
        0B3B: samp show_dialog id 1002 caption "Licenta de gun" text 0@ button_1 "Ok" button_2 "Back" style 2
    end
           
    if and
    2@ == 1
    3@ == 1
    then
        0AF9: samp say_msg "Iisus e un sfant"
    end
           
    if and
    2@ == 1
    3@ == 2
    then
        0AF9: samp say_msg "Iisus vorbeste urat"
    end       
end
   
if
0B3C:  samp is_dialog_responded id 1002 button 2@ list_item 3@ input_text 0
then
    if and
    2@ == 1
    2@ == 0
    then
        chatmsg "{408080}InstructorCMD: Licenta gun - 1/9."
        0AF9: samp say_msg "Salut, sunt membrul factiunii School Instructors LS si te voi ajuta sa obtii licenta de 'Gun'."
    end
   
    if and
    2@ == 1
    3@ == 1
    then
        0B3B: samp show_dialog id 1003 caption "Gun 2/9" text "Tasteaza id-ul player-ului in casuta de mai jos" button_1 "Ok" button_2 "Cancel" style 1
    end
   
    if
    2@ == 0
    then
        0AC6: 0@ = label @dialog_licente offset
        0B3B: samp show_dialog id 1001 caption "Alege licenta pe care doresti sa o acorzi" text 0@ button_1 "Ok" button_2 "Cancel" style 2
    end
end
   
if
0B3C:  samp is_dialog_responded id 1003 button 2@ list_item 3@ input_text 4@
then
    0AC8: 4@ = allocate_memory_size 128
    0AD4: 2@ 4@ format "%d" 4@
    0B36: samp 0@ = get_player_nickname 4@
    if
    2@ == 1
    then
        chatmsg "{408080}InstructorCMD: Licenta gun - 2/9."
        0AF9: samp say_msg "Pentru inceput tasteaza comanda [/sl %s] pentru a-ti verifica licentele." 0@
        0AC9: free_allocated_memory 4@        
    end
     
    if
    2@ == 0
    then
        ////
    end
end

end

:dialog_hex
HEX
"EN" A
"RO" 0
END

:dialog_licente
HEX
"Gun" A
"Boat" A
"Fly" 0
END

:dialog_gun
HEX
"Gun1" A
"Gun2" A
"Gun3" A
"Gun4" A
"Gun5" A
"Gun6" A
"Gun7" A
"Gun8" A
"Gun9" 0
END
 
Last edited:
Upvote 0 Downvote
T

TedyFromAnotherPlanet

Member
Joined
Jan 5, 2020
Messages
8
Reaction score
0
Location
Russia
Parazitas said:
What this should do?
PHP: 
if
0B3C:  samp is_dialog_responded id 1003 button 2@ list_item 3@ input_text 4@
then
    0AC8: 4@ = allocate_memory_size 128
    0AD4: 2@ 4@ format "%d" 4@
    0B36: samp 0@ = get_player_nickname 4@
    if
    2@ == 1
    then
        chatmsg "{408080}InstructorCMD: Licenta gun - 2/9."
        0AF9: samp say_msg "Pentru inceput tasteaza comanda [/sl %s] pentru a-ti verifica licentele." 0@
        0AC9: free_allocated_memory 4@      
    end
   
    if
    2@ == 0
    then
        ////
    end
end

Also...
You must add end for while true everytime
PHP: 
{$CLEO .cs}

0000: "InstructorCMD by TaZZeRR"
THREAD "InstructorCMD"

wait 8500

0AF8: "{bfff00}Mod created by: {0080ff}TaZZeRR" -1

$activ = 0

while true
wait 0

if and
0AB0: 16
0AB0: 90
then
    if
    1@ == 0
    then
        1@ = 1
    else
        1@ = 0
     end
    wait 2000 // anti spam
end

if and
1@ == 1
0AB0: 88
then
    0AC6: 0@ = label @dialog_hex offset
    0B3B: samp show_dialog id 1000 caption "Choose the language" text 0@ button_1 "Ok" button_2 "Cancel" style 2
    wait 1000
end

if
0B3C:  samp is_dialog_responded id 1000 button 2@ list_item 3@ input_text 0
then
    if and
    2@ == 1
    3@ == 0
    then
        chatmsg "The eng version isn't done at the moment" -1
    end
   
    if and
    2@ == 1
    3@ == 1
    then
        0AC6: 0@ = label @dialog_licente offset
        0B3B: samp show_dialog id 1001 caption "Alege licenta pe care doresti sa o acorzi" text 0@ button_1 "Ok" button_2 "Cancel" style 2
    end      
end
  
if
0B3C:  samp is_dialog_responded id 1001 button 2@ list_item 3@ input_text 0
then
    if and
    2@ == 1
    3@ == 0
    then
        0AC6: 0@ = label @dialog_gun offset
        0B3B: samp show_dialog id 1002 caption "Licenta de gun" text 0@ button_1 "Ok" button_2 "Back" style 2
    end
          
    if and
    2@ == 1
    3@ == 1
    then
        0AF9: samp say_msg "Iisus e un sfant"
    end
          
    if and
    2@ == 1
    3@ == 2
    then
        0AF9: samp say_msg "Iisus vorbeste urat"
    end      
end
  
if
0B3C:  samp is_dialog_responded id 1002 button 2@ list_item 3@ input_text 0
then
    if and
    2@ == 1
    2@ == 0
    then
        chatmsg "{408080}InstructorCMD: Licenta gun - 1/9."
        0AF9: samp say_msg "Salut, sunt membrul factiunii School Instructors LS si te voi ajuta sa obtii licenta de 'Gun'."
    end
  
    if and
    2@ == 1
    3@ == 1
    then
        0B3B: samp show_dialog id 1003 caption "Gun 2/9" text "Tasteaza id-ul player-ului in casuta de mai jos" button_1 "Ok" button_2 "Cancel" style 1
    end
  
    if
    2@ == 0
    then
        0AC6: 0@ = label @dialog_licente offset
        0B3B: samp show_dialog id 1001 caption "Alege licenta pe care doresti sa o acorzi" text 0@ button_1 "Ok" button_2 "Cancel" style 2
    end
end
  
if
0B3C:  samp is_dialog_responded id 1003 button 2@ list_item 3@ input_text 4@
then
    0AC8: 4@ = allocate_memory_size 128
    0AD4: 2@ 4@ format "%d" 4@
    0B36: samp 0@ = get_player_nickname 4@
    if
    2@ == 1
    then
        chatmsg "{408080}InstructorCMD: Licenta gun - 2/9."
        0AF9: samp say_msg "Pentru inceput tasteaza comanda [/sl %s] pentru a-ti verifica licentele." 0@
        0AC9: free_allocated_memory 4@       
    end
    
    if
    2@ == 0
    then
        ////
    end
end

end

:dialog_hex
HEX
"EN" A
"RO" 0
END

:dialog_licente
HEX
"Gun" A
"Boat" A
"Fly" 0
END

:dialog_gun
HEX
"Gun1" A
"Gun2" A
"Gun3" A
"Gun4" A
"Gun5" A
"Gun6" A
"Gun7" A
"Gun8" A
"Gun9" 0
END
Click to expand...
The first one is a input dialog which you type the player id.
 
Upvote 0 Downvote
Status
Not open for further replies.
Top