Нажатие кнопки

Isov

Известный
Автор темы
102
16
сбствн дед нету, бота своего для пирса не переделал на завод, кто может сменить копку Y на копку H все кнопки Y в скрипте сменить на H и собрать т.к мой сони все время ошибки хуярит, заранее благодарю, 30 рубасов могу на qiwi кинуть :D

CLEO:
// This file was decompiled using SASCM.ini published by GTAG (http://gtag.gtagaming.com/opcode-database) on 14.6.2013
{$CLEO .cs}

//-------------MAIN---------------
0000: NOP
0662: printstring "Alco Bot for Pears Project"
0662: printstring "Автор скрипта: Ded_Fedot"
0662: printstring "Контакты: vk.com/idedfedot"

:Label000069
0001: wait 400 ms
0AFA:  is_samp_available
004D: jump_if_false @Label000069

:Label000077
8AFA:   not is_samp_available
004D: jump_if_false @Label00008C
0001: wait 400 ms
0002: jump @Label000077

:Label00008C
0B34: samp register_client_command "alcobot" to_label @Label000AB1
0B34: samp register_client_command "circles" to_label @Label000B03
0006: 24@ = 0

:Label0000B3
0001: wait 0 ms
00D6: if
0B3C:  samp is_dialog_responded id 22822 button 2@ list_item 3@ input_text 0
004D: jump_if_false @Label0003B8
00D6: if
0039:   2@ == 1
004D: jump_if_false @Label0003B8
00D6: if
0039:   3@ == 0
004D: jump_if_false @Label0001A7
00D6: if
08B7:   test 30@ bit 0
004D: jump_if_false @Label000113
0006: 29@ = 1
0002: jump @Label00011A

:Label000113
0006: 29@ = 0

:Label00011A
0B12: 29@ = 29@ XOR 1
00D6: if
0039:   29@ == 1
004D: jump_if_false @Label00016E
08BD: set 30@ bit 0
018C: play_sound 1139 at 0.0 0.0 0.0
0ACF: show_formatted_styled_text "~w~Bot ~g~on" time 1000 style 2
0002: jump @Label0001A7

:Label00016E
08C3: clear 30@ bit 0
018C: play_sound 1138 at 0.0 0.0 0.0
0ACF: show_formatted_styled_text "~w~Bot ~r~off" time 1000 style 2
0006: 24@ = 0

:Label0001A7
00D6: if
0039:   3@ == 1
004D: jump_if_false @Label000294
00D6: if
08B7:   test 30@ bit 1
004D: jump_if_false @Label0001D9
0006: 29@ = 1
0002: jump @Label0001E0

:Label0001D9
0006: 29@ = 0

:Label0001E0
0B12: 29@ = 29@ XOR 1
00D6: if
0039:   29@ == 1
004D: jump_if_false @Label00023A
08BD: set 30@ bit 1
018C: play_sound 1139 at 0.0 0.0 0.0
0ACF: show_formatted_styled_text "~w~Collision ~g~on" time 1000 style 2
0002: jump @Label000294

:Label00023A
08C3: clear 30@ bit 1
018C: play_sound 1138 at 0.0 0.0 0.0
0AB5: store_actor $PLAYER_ACTOR closest_vehicle_to 22@ closest_ped_to 23@
00D6: if
056D:   actor 23@ defined
004D: jump_if_false @Label000294
0619: enable_actor 23@ collision_detection 1
0ACF: show_formatted_styled_text "~w~Collision ~r~off" time 1000 style 2

:Label000294
00D6: if
0039:   3@ == 2
004D: jump_if_false @Label0002FE
00D6: if
08B7:   test 30@ bit 2
004D: jump_if_false @Label0002C6
0006: 29@ = 1
0002: jump @Label0002CD

:Label0002C6
0006: 29@ = 0

:Label0002CD
0B12: 29@ = 29@ XOR 1
00D6: if
0039:   29@ == 1
004D: jump_if_false @Label0002F7
08BD: set 30@ bit 2
0002: jump @Label0002FE

:Label0002F7
08C3: clear 30@ bit 2

:Label0002FE
00D6: if
0039:   3@ == 4
004D: jump_if_false @Label00032C
08C3: clear 30@ bit 0
08C3: clear 30@ bit 1
08C3: clear 30@ bit 2
0006: 24@ = 0

:Label00032C
00D6: if
0039:   3@ == 3
004D: jump_if_false @Label0003B8
04E4: refresh_game_renderer_at -1058.975 -1360.008
03CB: set_rendering_origin_at -1058.975 -1360.008 28@
02CE: 28@ = ground_z_at -1058.975 -1360.008 500.0
00A1: put_actor $PLAYER_ACTOR at -1058.975 -1360.008 28@
018C: play_sound 1139 at 0.0 0.0 0.0
0ACF: show_formatted_styled_text "~w~Teleport ~g~successfully" time 1000 style 2

:Label0003B8
00D6: if
08B7:   test 30@ bit 0
004D: jump_if_false @Label000A4E
0006: 0@ = 0

:Label0003D1
0B50: samp 1@ = object_handle_by_id 0@
00D6: if
03CA:   object 1@ exists
004D: jump_if_false @Label000A38
01BB: store_object 1@ position_to 2@ 3@ 4@
0984: 5@ = object 1@ model
00D6: if
0039:   5@ == 1487
004D: jump_if_false @Label000A38
0AF2: 25@ = get_float_from_ini_file "cleo\Alco_Bot.ini" section "Alco_Bot" key "Distance"
050A: 6@ = distance_between_XYZ 2@ 3@ 4@ and_XYZ -1084.719 -1295.837 1562.027
00D6: if
8035:   not  6@ >= 25@ // (float)
004D: jump_if_false @Label000A38
0B56: set_game_key 6 state 255
0001: wait 1000 ms
00D6: if
0B4C:  samp is_dialog_active 1742
004D: jump_if_false @Label000A38
0B47: samp close_current_dialog_with_button 1
0001: wait 200 ms
0AB1: call_scm_func @Label000D78 3 -1074.76 -1289.114 1
0AB1: call_scm_func @Label000D78 3 -1072.284 -1288.968 0
0B56: set_game_key 11 state 255
0001: wait 0 ms
0B56: set_game_key 11 state 0
0B56: set_game_key 11 state 255
0B56: set_game_key 11 state 255
0001: wait 500 ms
00D6: if
0B4C:  samp is_dialog_active 1742
004D: jump_if_false @Label000A38
0B47: samp close_current_dialog_with_button 1
0001: wait 200 ms
0AB1: call_scm_func @Label000D78 3 -1072.284 -1288.771 0
0AB1: call_scm_func @Label000D78 3 -1072.318 -1288.463 0
0AB1: call_scm_func @Label000D78 3 -1072.714 -1285.401 0
0B56: set_game_key 11 state 255
0001: wait 0 ms
0B56: set_game_key 11 state 0
0B56: set_game_key 11 state 255
0B56: set_game_key 11 state 255
0001: wait 500 ms
00D6: if
0B4C:  samp is_dialog_active 1742
004D: jump_if_false @Label000A38
0B47: samp close_current_dialog_with_button 1
0001: wait 200 ms
0AB1: call_scm_func @Label000D78 3 -1072.882 -1285.4 0
0AB1: call_scm_func @Label000D78 3 -1073.212 -1285.552 0
0AB1: call_scm_func @Label000D78 3 -1073.212 -1285.552 1
0AB1: call_scm_func @Label000D78 3 -1085.242 -1294.242 1
0B56: set_game_key 11 state 255
0001: wait 0 ms
0B56: set_game_key 11 state 0
0B56: set_game_key 11 state 255
0B56: set_game_key 11 state 255
0001: wait 500 ms
00D6: if
0B4C:  samp is_dialog_active 697
004D: jump_if_false @Label000A38
0B47: samp close_current_dialog_with_button 1
000A: 24@ += 1
0ACF: show_formatted_styled_text "~w~Circles ~g~%d" time 1000 style 2 24@
0AF0: 26@ = get_int_from_ini_file "cleo\Alco_Bot.ini" section "Alco_Bot" key "Circles"
00D6: if
003B:   24@ == 26@ // (int)
004D: jump_if_false @Label000A38
0792: disembark_instantly_actor $PLAYER_ACTOR
0B56: set_game_key 17 state 255
0001: wait 0 ms
0B56: set_game_key 17 state 0
0B56: set_game_key 17 state 255
0B56: set_game_key 17 state 255
0792: disembark_instantly_actor $PLAYER_ACTOR
0001: wait 500 ms
0792: disembark_instantly_actor $PLAYER_ACTOR
00D6: if
0B4C:  samp is_dialog_active 1742
004D: jump_if_false @Label000A38
0B47: samp close_current_dialog_with_button 1
0792: disembark_instantly_actor $PLAYER_ACTOR
0001: wait 200 ms
0006: 24@ = 0
0AB1: call_scm_func @Label000D78 3 -1081.762 -1291.631 1
0AB1: call_scm_func @Label000D78 3 -1079.159 -1289.239 0
0AB1: call_scm_func @Label000D78 3 -1079.1 -1288.892 0
0AB1: call_scm_func @Label000D78 3 -1078.628 -1278.831 1
0AB1: call_scm_func @Label000D78 3 -1078.379 -1278.698 0
0AB1: call_scm_func @Label000D78 3 -1065.973 -1277.103 1
0AB1: call_scm_func @Label000D78 3 -1065.882 -1276.837 0
0AB1: call_scm_func @Label000D78 3 -1066.685 -1270.016 0
0001: wait 500 ms
0B56: set_game_key 11 state 255
0001: wait 0 ms
0B56: set_game_key 11 state 0
0B56: set_game_key 11 state 255
0B56: set_game_key 11 state 255
0B56: set_game_key 11 state 255
0001: wait 0 ms
0B56: set_game_key 11 state 0
0B56: set_game_key 11 state 255
0B56: set_game_key 11 state 255
0B56: set_game_key 11 state 255
0001: wait 0 ms
0B56: set_game_key 11 state 0
0B56: set_game_key 11 state 255
0B56: set_game_key 11 state 255
0B56: set_game_key 11 state 255
0001: wait 0 ms
0B56: set_game_key 11 state 0
0B56: set_game_key 11 state 255
0B56: set_game_key 11 state 255
0B56: set_game_key 11 state 255
0001: wait 0 ms
0B56: set_game_key 11 state 0
0B56: set_game_key 11 state 255
0B56: set_game_key 11 state 255
0B56: set_game_key 11 state 255
0001: wait 0 ms
0B56: set_game_key 11 state 0
0B56: set_game_key 11 state 255
0B56: set_game_key 11 state 255
0B56: set_game_key 11 state 255
0001: wait 0 ms
0B56: set_game_key 11 state 0
0B56: set_game_key 11 state 255
0B56: set_game_key 11 state 255
0001: wait 500 ms
00D6: if
0B4C:  samp is_dialog_active -1
004D: jump_if_false @Label000A38
0B49: samp set_current_dialog_list_item 1
0001: wait 200 ms
0B47: samp close_current_dialog_with_button 1
0001: wait 500 ms
00D6: if
0B4C:  samp is_dialog_active -1
004D: jump_if_false @Label000A38
0B47: samp close_current_dialog_with_button 1
0001: wait 200 ms
0AB1: call_scm_func @Label000D78 3 -1066.417 -1270.103 0
0AB1: call_scm_func @Label000D78 3 -1065.702 -1277.65 1
0AB1: call_scm_func @Label000D78 3 -1065.922 -1277.774 0
0AB1: call_scm_func @Label000D78 3 -1077.881 -1278.72 1
0AB1: call_scm_func @Label000D78 3 -1078.017 -1278.979 0
0AB1: call_scm_func @Label000D78 3 -1080.824 -1290.403 1
0AB1: call_scm_func @Label000D78 3 -1081.042 -1290.621 0
0AB1: call_scm_func @Label000D78 3 -1085.038 -1294.275 0
0001: wait 500 ms
0B56: set_game_key 11 state 255
0001: wait 0 ms
0B56: set_game_key 11 state 0
0B56: set_game_key 11 state 255
0B56: set_game_key 11 state 255
0B56: set_game_key 11 state 255
0001: wait 0 ms
0B56: set_game_key 11 state 0
0B56: set_game_key 11 state 255
0B56: set_game_key 11 state 255
0B56: set_game_key 11 state 255
0001: wait 0 ms
0B56: set_game_key 11 state 0
0B56: set_game_key 11 state 255
0B56: set_game_key 11 state 255
0B56: set_game_key 11 state 255
0001: wait 0 ms
0B56: set_game_key 11 state 0
0B56: set_game_key 11 state 255
0B56: set_game_key 11 state 255
0B56: set_game_key 11 state 255
0001: wait 0 ms
0B56: set_game_key 11 state 0
0B56: set_game_key 11 state 255
0B56: set_game_key 11 state 255
0B56: set_game_key 11 state 255
0001: wait 0 ms
0B56: set_game_key 11 state 0
0B56: set_game_key 11 state 255
0B56: set_game_key 11 state 255
0B56: set_game_key 11 state 255
0001: wait 0 ms
0B56: set_game_key 11 state 0
0B56: set_game_key 11 state 255
0B56: set_game_key 11 state 255
0001: wait 500 ms
00D6: if
0B4C:  samp is_dialog_active 697
004D: jump_if_false @Label000A38
0B47: samp close_current_dialog_with_button 1

:Label000A38
000A: 0@ += 1
0019:   0@ > 1500
004D: jump_if_false @Label0003D1

:Label000A4E
00D6: if
08B7:   test 30@ bit 1
004D: jump_if_false @Label000A67
0050: gosub @Label000D11

:Label000A67
00D6: if
08B7:   test 30@ bit 2
004D: jump_if_false @Label000AAA
0AF8: samp add_message_to_chat "{FF0000}Ты дурак? Написали же в разработке" color -1

:Label000AAA
0002: jump @Label0000B3

:Label000AB1
0AC6: 3@ = label @Label000BD9 offset
0B3B: samp show_dialog id 22822 caption "{FFF000}Бот {FFFFFF}лекероводочного завода" text 3@ button_1 "Выбрать" button_2 "Выход" style 2
0B43: samp cmd_ret

:Label000B03
0B35: samp 27@ = get_last_command_params
00D6: if
0AD4: 27@ = scan_string 27@ format "%d" 26@
004D: jump_if_false @Label000B6D
0ACF: show_formatted_styled_text "~w~Circles ~g~%d" time 1000 style 2 26@
0AF1: write_int 26@ to_ini_file "cleo\Alco_Bot.ini" section "Alco_Bot" key "Circles"
0B43: samp cmd_ret

:Label000B6D
0AF8: samp add_message_to_chat "{FF0000}Не правильный ввод команды. {FFFFFF}Пример: {FF0000}/circles {FFF000}[Кол-ч] {FFFFFF}кругов" color -1
0B43: samp cmd_ret

:Label000BD9
hex
7B 46 46 46 46 46 46 7D 5B 31 5D 7B 45 42 45 42
45 42 7D CD E0 F7 E0 F2 FC 20 F0 E0 E1 EE F2 F3
20 E1 EE F2 E0 0A 7B 46 46 46 46 46 46 7D 5B 32
5D 7B 45 42 45 42 45 42 7D CA EE EB EB E8 E7 E8
FF 20 E8 E3 F0 EE EA EE E2 0A 7B 46 46 46 46 46
46 7D 5B 33 5D 7B 45 42 45 42 45 42 7D C7 E0 E1
F0 E0 F2 FC 20 E7 E0 F0 EF EB E0 F2 F3 20 7B 46
46 30 30 30 30 7D 28 C2 20 F0 E0 E7 F0 E0 E1 EE
F2 EA E5 29 0A 7B 46 46 46 46 46 46 7D 5B 34 5D
7B 45 42 45 42 45 42 7D D2 E5 EB E5 EF EE F0 F2
20 ED E0 20 E7 E0 E2 EE E4 0A 7B 46 46 46 46 46
46 7D 5B 35 5D 7B 45 42 45 42 45 42 7D CE F2 EA
EB FE F7 E8 F2 FC 20 E2 F1 B8 0A 7B 46 46 46 46
46 46 7D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D
3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 0A 7B 46 46 46 46
46 46 7D C0 E2 F2 EE F0 3A 20 7B 46 46 30 30 30
30 7D 44 65 64 5F 46 65 64 6F 74 0A 7B 46 46 46
30 30 30 7D CA EE ED F2 E0 EA F2 FB 3A 20 7B 46
46 46 46 46 46 7D 76 6B 2E 63 6F 6D 2F 69 64 65
64 66 65 64 6F 74 0A 00
end

:Label000D11
0AB5: store_actor $PLAYER_ACTOR closest_vehicle_to 22@ closest_ped_to 23@
00D6: if
056D:   actor 23@ defined
004D: jump_if_false @Label000D33
0619: enable_actor 23@ collision_detection 0

:Label000D33
0051: return

:Label000D35
0001: wait 0 ms
0330: set_player $PLAYER_CHAR infinite_run 1
00A0: store_actor $PLAYER_ACTOR position_to 3@ 4@ 5@
0063: 0@ -= 3@ // (float)
0063: 1@ -= 4@ // (float)
0604: get_Z_angle_for_point 0@ 1@ store_to 5@
0173: set_actor $PLAYER_ACTOR Z_angle_to 5@
02EB: restore_camera_with_jumpcut
0AB2: ret 0

:Label000D78
0509: 6@ = distance_between_XY 3@ 4@ and_XY 0@ 1@

:Label000D89
0021:   6@ > 0.5
004D: jump_if_false @Label000E08
00A0: store_actor $PLAYER_ACTOR position_to 3@ 4@ 5@
0AB1: call_scm_func @Label000D35 2 0@ 1@
0AB1: call_scm_func @Label000E0D 1 3
00D6: if
0039:   2@ == 1
004D: jump_if_false @Label000DE2
0AB1: call_scm_func @Label000E0D 1 32

:Label000DE2
0509: 6@ = distance_between_XY 3@ 4@ and_XY 0@ 1@
0002: jump @Label000E01
0002: jump @Label000E08

:Label000E01
0002: jump @Label000D89

:Label000E08
0AB2: ret 0

:Label000E0D
0006: 1@ = 12006488
005A: 1@ += 0@ // (int)
0A8C: write_memory 1@ size 1 value 255 virtual_protect 0
0AB2: ret 0
000E: 1@ -= -3526
0A9F: 2@ = current_thread_pointer
000A: 2@ += 16
0A8D: 3@ = read_memory 2@ size 4 virtual_protect 1
0062: 3@ -= 0@ // (int)
0006: 4@ = 0
 
Последнее редактирование модератором:

Carrentine

Потрачен
570
460
Обратите внимание, пользователь заблокирован на форуме. Не рекомендуется проводить сделки.
В данном разделе код за тебя писать никто не будет.
Могу лишь порекомендовать установить SAMPFUNCS опкоды для Sanny Builder, это должно помочь в компиляции скрипта.
 

Isov

Известный
Автор темы
102
16
В данном разделе код за тебя писать никто не будет.
Могу лишь порекомендовать установить SAMPFUNCS опкоды для Sanny Builder, это должно помочь в компиляции скрипта.

Код я ведь предоставил, там нужно клавишу Y сменить на H но дело в том что я не шарю в разработке Cleo и не вижу попросту где менять надо, так то если можешь подскажи, а собрать уже мб как то соберу