CLEO Help Auto dialog answer

CLEO related
Status
Not open for further replies.
P

Petricko

Member
Joined
Dec 21, 2014
Messages
23
Reaction score
0
Can someone tell me how to do that we automatically respond to the dialog ? In SA:MP. Os some timer to press ENTER every 5 seconds.
 
Sort by date Sort by votes
springfield

springfield

God
Joined
Feb 18, 2005
Messages
2,965
Reaction score
271
Code: 
    IF 0B4C:  samp is_dialog_active -1 //dialogID, -1 for any dialog
    THEN
        0B47: samp close_current_dialog_with_button 0 //0 left, 1 right
    END
 
Upvote 0 Downvote
D

DogoCaraballo

Active member
Joined
Dec 1, 2014
Messages
25
Reaction score
0
springfield link said:
Code: 
    IF 0B4C:  samp is_dialog_active -1 //dialogID, -1 for any dialog
    THEN
        0B47: samp close_current_dialog_with_button 0 //0 left, 1 right
    END
Click to expand...

is there a way to answer the third option of the dialog?
 
Upvote 0 Downvote
springfield

springfield

God
Joined
Feb 18, 2005
Messages
2,965
Reaction score
271
Code: 
0BC9: samp send_dialog_response dialog 0@ button 1@ listitem 2@ input 3@

0@ = dialogID
1@ = button left/right 0/1
2@ = selected element, starting from 0, 65535 for null
3@ = text input, "" for null.
 
Upvote 0 Downvote
P

Petricko

Member
Joined
Dec 21, 2014
Messages
23
Reaction score
0
Watch 1:35 you will see "Start playng" https://www.youtube.com/watch?v=Cws5pUdMiGs
Thus I need this to when prints the message "Start playng " on the screen that we accept dialogue . This is the script .

Code: 
// This file was decompiled using SASCM.ini published by Seemann (http://sannybuilder.com/files/SASCM.rar) on 13.10.2007
{$CLEO .cs}

//-------------MAIN---------------
0000: NOP 
wait 0 
gosub @NONAME_1922 
3@ = 0 
0000: NOP 
gosub @NONAME_1954 

:NONAME_29
wait 0 
if and
key_down 67 
key_down 81 
jf @NONAME_29 

:NONAME_52
wait 0 
if or
key_down 67 
key_down 81 
jf @NONAME_141 
goto @NONAME_52 
if 
0AE6: 12@ = find_first_file "CLEO\*.mga_path" get_filename_to "CLEO\driver.mga_path" //IF and SET 
jf @NONAME_869 
wait 0 

:NONAME_141
if 
File.Open(0@, "CLEO\driver.mga_path", 25202)
jf @NONAME_141
0BC9: samp send_dialog_response dialog 1 button 0 listitem 65535 input "" 
01BD: 9@ = current_time_in_ms 
print "Start playng" 2500 
3@ = 0 

:NONAME_213
wait 0 
gosub @NONAME_1749 
gosub @NONAME_1976 
gosub @NONAME_2126 
if and
key_down 67 
key_down 81 
jf @NONAME_264 
goto @NONAME_766 

:NONAME_264
$PLAYER_ACTOR = Actor.EmulateFromPlayer($PLAYER_CHAR)
if and
   not Actor.Dead($PLAYER_ACTOR)
   Actor.Driving($PLAYER_ACTOR)
jf @NONAME_796 
2@ = Actor.Car($PLAYER_ACTOR)
0A97: 7@ = car 2@ struct 
099A: set_car 2@ collision_detection 0 
if 
  3@ == 2 
jf @NONAME_348 
3@ = 0 
goto @NONAME_796 

:NONAME_348
if 
  3@ == 3 
jf @NONAME_373 
goto @NONAME_141 

:NONAME_373
if 
  3@ == 1 
jf @NONAME_412 
Car.LockInCurrentPosition(2@) = True
gosub @NONAME_921 
goto @NONAME_759 

:NONAME_412
Car.LockInCurrentPosition(2@) = False
File.Read(0@, 1, 15@)
File.Read(0@, 4, 10@)
gosub @NONAME_854 

:NONAME_446
002D:   10@ >= 8@ // (int) 
jf @NONAME_500 
gosub @NONAME_854 
gosub @NONAME_1749 
gosub @NONAME_1976 
gosub @NONAME_2126 
wait 0 
goto @NONAME_446 

:NONAME_500
if 
  15@ == 6 
jf @NONAME_532 
gosub @NONAME_1527 
goto @NONAME_759 

:NONAME_532
if 
  15@ == 0 
jf @NONAME_562 
File.Close(0@)
goto @NONAME_796 

:NONAME_562
if 
  15@ == 1 
jf @NONAME_594 
gosub @NONAME_935 
goto @NONAME_759 

:NONAME_594
if 
  15@ == 16 
jf @NONAME_626 
gosub @NONAME_1715 
goto @NONAME_759 

:NONAME_626
if 
  15@ == 2 
jf @NONAME_656 
File.Close(0@)
goto @NONAME_141 

:NONAME_656
if 
  15@ == 3 
jf @NONAME_688 
gosub @NONAME_1026 
goto @NONAME_759 

:NONAME_688
if 
  15@ == 4 
jf @NONAME_720 
gosub @NONAME_1253 
goto @NONAME_759 

:NONAME_720
if 
  15@ == 5 
jf @NONAME_752 
gosub @NONAME_1135 
goto @NONAME_759 

:NONAME_752
gosub @NONAME_899 

:NONAME_759
goto @NONAME_213 

:NONAME_766
wait 0 
if or
key_down 67 
key_down 81 
jf @NONAME_796 
goto @NONAME_766 

:NONAME_796
Car.LockInCurrentPosition(2@) = True
Car.LockInCurrentPosition(2@) = False
print "Stop playng" 2500 
099A: set_car 2@ collision_detection 1 
File.Close(0@)
gosub @NONAME_1954 
goto @NONAME_29 

:NONAME_854
01BD: 8@ = current_time_in_ms 
0062: 8@ -= 9@ // (int) 
return 

:NONAME_869
print "Cannot find File" 2500 
goto @NONAME_29 

:NONAME_899
print "UNIKNOW vType" 1500 
return 

:NONAME_921
print "Paused" 1 
return 

:NONAME_935
File.Read(0@, 12, 4@)
0A8E: 13@ = 7@ + 20 // int 
0A8D: 14@ = read_memory 13@ size 4 virtual_protect 0 
14@ += 48 
0A8C: write_memory 14@ size 4 value 4@ virtual_protect 1 
14@ += 4 
0A8C: write_memory 14@ size 4 value 5@ virtual_protect 1 
14@ += 4 
0A8C: write_memory 14@ size 4 value 6@ virtual_protect 1 
return 

:NONAME_1026
File.Read(0@, 12, 4@)
0A8E: 13@ = 7@ + 20 // int 
0A8D: 14@ = read_memory 13@ size 4 virtual_protect 0 
14@ += 48 
0A8C: write_memory 14@ size 4 value 4@ virtual_protect 1 
14@ += 4 
0A8C: write_memory 14@ size 4 value 5@ virtual_protect 1 
14@ += 4 
0A8C: write_memory 14@ size 4 value 6@ virtual_protect 1 
File.Read(0@, 4, 11@)
Car.Angle(2@) = 11@
return 

:NONAME_1135
File.Read(0@, 12, 4@)
0A8E: 13@ = 7@ + 20 // int 
0A8D: 14@ = read_memory 13@ size 4 virtual_protect 0 
14@ += 48 
0A8C: write_memory 14@ size 4 value 4@ virtual_protect 1 
14@ += 4 
0A8C: write_memory 14@ size 4 value 5@ virtual_protect 1 
14@ += 4 
0A8C: write_memory 14@ size 4 value 6@ virtual_protect 1 
File.Read(0@, 16, 16@)
07C6: set_car 2@ axis_angle_relation_to 16@ 17@ 18@ 19@ 
return 

:NONAME_1253
File.Read(0@, 12, 4@)
0A8E: 13@ = 7@ + 20 // int 
0A8D: 14@ = read_memory 13@ size 4 virtual_protect 0 
14@ += 48 
0A8C: write_memory 14@ size 4 value 4@ virtual_protect 1 
14@ += 4 
0A8C: write_memory 14@ size 4 value 5@ virtual_protect 1 
14@ += 4 
0A8C: write_memory 14@ size 4 value 6@ virtual_protect 1 
File.Read(0@, 1, 16@)
if 
08B7:   test 16@ bit 0 
jf @NONAME_1395 
0A8E: 13@ = 7@ + 1180 // int 
0A8C: write_memory 13@ size 4 value 1.0 virtual_protect 1 

:NONAME_1395
if 
08B7:   test 16@ bit 1 
jf @NONAME_1438 
0A8E: 13@ = 7@ + 1184 // int 
0A8C: write_memory 13@ size 4 value 1.0 virtual_protect 1 

:NONAME_1438
if 
08B7:   test 16@ bit 2 
jf @NONAME_1498 
0A8E: 13@ = 7@ + 1064 // int 
0A8D: 16@ = read_memory 13@ size 4 virtual_protect 1 
08BD: set 16@ bit 5 
0A8C: write_memory 13@ size 4 value 16@ virtual_protect 1 

:NONAME_1498
File.Read(0@, 16, 16@)
07C6: set_car 2@ axis_angle_relation_to 16@ 17@ 18@ 19@ 
return 

:NONAME_1527
File.Read(0@, 12, 4@)
0A8E: 13@ = 7@ + 20 // int 
0A8D: 14@ = read_memory 13@ size 4 virtual_protect 0 
14@ += 48 
0A8C: write_memory 14@ size 4 value 4@ virtual_protect 1 
14@ += 4 
0A8C: write_memory 14@ size 4 value 5@ virtual_protect 1 
14@ += 4 
0A8C: write_memory 14@ size 4 value 6@ virtual_protect 1 
File.Read(0@, 12, 4@)
0A8E: 13@ = 7@ + 68 // int 
0A8C: write_memory 13@ size 4 value 4@ virtual_protect 1 
13@ += 4 
0A8C: write_memory 13@ size 4 value 5@ virtual_protect 1 
13@ += 4 
0A8C: write_memory 13@ size 4 value 6@ virtual_protect 1 
File.Read(0@, 16, 16@)
07C6: set_car 2@ axis_angle_relation_to 16@ 17@ 18@ 19@ 
return 

:NONAME_1715
File.Read(0@, 16, 16@)
if 
14@ = SAMP.Base()
jf @NONAME_1747 
say 16@v 

:NONAME_1747
return 

:NONAME_1749
03F0: enable_text_draw 1 
03E3: set_texture_to_be_drawn_antialiased 1 
038D: draw_texture 1 position 320.0 400.0 size 320.0 40.0 RGBA 255 255 255 255 
03E4: enable_text_draw_align_right 1 
0340: set_text_draw_RGBA 255 255 255 128 
060D: draw_text_shadow 1 color_RGBA 32 32 32 128 
045A: draw_text_1number 447.0 394.0 GXT 'NUMBER' number 8@  // ~1~
31@ += 8.0 
32@ += 8.0 
038D: draw_texture 2 position 31@ 32@ size 16.0 16.0 RGBA 255 255 255 255 
31@ -= 8.0 
32@ -= 8.0 
return 

:NONAME_1922
0390: load_txd_dictionary "MGD" 
038F: load_texture "interf" as 1 // Load dictionary with 0390 first 
038F: load_texture "mouse" as 2 // Load dictionary with 0390 first 
return 

:NONAME_1954
31@ = 320.0 
32@ = 224.0 
return 

:NONAME_1976
0A4A: store_joystick_X_offset_to 16@ Y_offset_to 17@ 
005B: 31@ += 16@ // (float) 
0063: 32@ -= 17@ // (float) 
if 
   not 31@ >= 0.0 
jf @NONAME_2031 
31@ = 0.0 

:NONAME_2031
if 
   not 32@ >= 0.0 
jf @NONAME_2062 
32@ = 0.0 

:NONAME_2062
if 
  31@ > 640.0 
jf @NONAME_2093 
31@ = 640.0 

:NONAME_2093
if 
  32@ > 448.0 
jf @NONAME_2124 
32@ = 448.0 

:NONAME_2124
return 

:NONAME_2126
if 
00E1:   player 0 pressed_key 17 
jf @NONAME_2344 
if and
  32@ > 386.0 
   not 32@ >= 414.0 
jf @NONAME_2320 
if and
  31@ > 167.0 
   not 31@ >= 214.0 
jf @NONAME_2244 
if 
  3@ == 0 
jf @NONAME_2237 
3@ = 1 
goto @NONAME_2244 

:NONAME_2237
3@ = 0 

:NONAME_2244
if and
  31@ > 222.0 
   not 31@ >= 268.0 
jf @NONAME_2282 
3@ = 2 

:NONAME_2282
if and
  31@ > 277.0 
   not 31@ >= 324.0 
jf @NONAME_2320 
3@ = 3 

:NONAME_2320
00E1:   player 0 pressed_key 17 
jf @NONAME_2344 
wait 0 
goto @NONAME_2320 

:NONAME_2344
return
 
Upvote 0 Downvote
Status
Not open for further replies.
Top