Вопросы по CLEO-скриптингу

[SpnKO]

{$CLEO}
0000:
:Init
wait 1000
if
0AFA:  is_samp_available
jf @Init
0B34: samp register_client_command "reloadcleo" to_label @reload
0AC8: 1@ = allocate_memory_size 260
jump @StringCheck

:StringCheck
wait 0
for 31@ = 90 to 99
0B75: samp get_chat_string 31@ text_to 1@ prefix_to 3@ color_to 4@ prefix_color_to 5@
if
0C18: 6@ = strstr string1 1@ string2 "Hey buddy, you still with us? Type /hello"
then
        wait 200
        jump @ScanString
    end
    jump @StringCheck
 
 
:ScanString
if
0AD4: 8@ = scan_string 1@ format "Hey buddy, you still with us? Type /hello %d to let us know!" 9@
0AF8: samp add_message_to_chat 9@ color 0xFFFFFF
jump @StringCheck


:reload
0A92: create_custom_thread "yeshello.cs"
0A93: end_custom_thread
0B43: samp cmd_ret

Что не правильно делаю?

 

[Удалённый пользователь 126082]

Подскажите опкод для смены цвета машины

Я кстати часто замечаю, что есть файлы .sf. В какой программе можно это сделать?

 

[Vlad Horii]

Я кстати часто замечаю, что есть файлы .sf. В какой программе можно это сделать?

Visual Studio (c++)

 

[grandpafromghetto]

{$CLEO}
0000:

repeat
wait 0
until samp.Available()

:cheat_code
wait 0
0ADC:   test_cheat "FAKEPIC"
jf @cheat_code

:fake_pickup
wait 0
04C4: store_coords_to 0@ 1@ 2@ from_actor $PLAYER_ACTOR with_offset 0.0 0.0 0.0
0247: load_model 19133
pickup.Create(19133, 19133, 3, 0@, 1@, 2@)
end_thread

помогите, создается пикап, но он сразу же пропадает

 

[Vovich]

Как можно чтобы текст из chatmsg выполнился только один раз?

repeat
    wait 0
until SAMP.Available()




WHILE TRUE
WAIT 0
            if
            call @is_cp_active_LS 0
            then
                call @get_cp_pos_LS 0 0@ 1@ 2@
            if and
            0@ ==  1554.532104
            1@ ==  -1675.580688
            2@ ==  16.195313
            then
                018C: play_sound 1052 at 0.0 0.0 0.0
                chatmsg "text1" -1
        else
            if and
            0@ ==  2287.257813
            1@ ==  2431.447998
            2@ ==  10.820302
            then
                018C: play_sound 1052 at 0.0 0.0 0.0
                chatmsg "text2" -1
        else
            if and
            0@ ==  -1605.046143
            1@ ==  711.501038
            2@ ==  13.867177
            then
                018C: play_sound 1052 at 0.0 0.0 0.0
                chatmsg "text3" -1
                end
            end
        end
    end
end
end



:is_cp_active_LS
0AA2: 0@ = loadlib "samp.dll"
0A8E: 1@ = 0@ + 0x21A10C
0A8D: 1@ = readMem 1@ sz 4 vp 0
1@ += 0x24
0A8D: 1@ = readMem 1@ sz 4 vp 0
IF 1@ == TRUE
THEN 0485:  return_true
ELSE 059A:  return_false
END
0AA3: freelib 0@
0AB2: ret 0

:get_cp_pos_LS
0AA2: 0@ = loadlib "samp.dll"
0A8E: 1@ = 0@ + 0x21A10C
0A8D: 1@ = readMem 1@ sz 4 vp 0
1@ += 0xC
0A8D: 2@ = readMem 1@ sz 4 vp 0
1@ += 0x4
0A8D: 3@ = readMem 1@ sz 4 vp 0
1@ += 0x4
0A8D: 4@ = readMem 1@ sz 4 vp 0
0AA3: freelib 0@
0AB2: ret 3 2@ 3@ 4@

Добавь себе дополнительную переменную, которой будешь присваивать значение при активации, и обнулять его когда действие будет выполнятся, а в условии укажи эту переменную, после того как отправляешь сообщение, обнуляй ее, и действие не повторится, пока ты опять не присвоишь нужное значение переменной.

Или допустим, напиши себе функцию которая будет выводить сообщение, встал на координаты - вызвал функцию, вернула тру значит присвоил значение переменной, допустим 1, дальше пока переменная не 0 и не больше 1 оно ничего не делает с данным участком кода, а ищет условия дальше, допустим нашло другие координаты и присвоило 2, все теперь этот участок в ожидании, а оно проверяет все остальные координаты.
Ну как то так, если словами, думаю ты суть уловил. Если нужен пример, пиши.

 

[Kristyan]

Если нужен пример, пиши.

Можно? :-[

 

[Удалённый пользователь 126082]

Скажите простенький опкод для смены цвета машины

 

[MArkoas_Gonzaleees]

Ребят, что это за опкод? Помогите, объясните что и как, где его ипользуют. В общем, что это и с чем его едят
03CB: set_rendering_origin_at 1@ 2@ 3@

 

[romanblinov2013]

Ребят, что это за опкод? Помогите, объясните что и как, где его ипользуют. В общем, что это и с чем его едят
03CB: set_rendering_origin_at 1@ 2@ 3@

GTAG :: OpcodeDB - Opcode 03CB^{(https://gtagmodding.com/opcode-database/opcode/03CB/)}
Там всё предельно ясно написано.
Достаточно параметры погонять и у тебя всё получится! :)

 

[randazzo]

В чем проблема? Зажму alt+2 скрипт пропишет /capture ну итд, а когда 2 раз зажму, то ничего не происходит.

Спойлер: код

{$CLEO}{$NOSOURCE}
0000:

while not Samp.Available()
    wait 0
end
while true
    wait 0
    if and
    0AB0:   key_pressed 18 {alt 18}
    0AB0:   key_pressed 50 {2 52}
        then
        say "/capture"

        repeat
        wait 0
        until 0B4C:  samp is_dialog_active -1
        
        0B49: samp set_current_dialog_list_item 2
        0B47: samp close_current_dialog_with_button 1
    end
end

потому что скрипт ждет появления диалога

 

[Удалённый пользователь 126082]

Почему у меня цвета не меняются, а сменяется на 1 цвет и следующие изменения не происходят?

{$CLEO   .cs}
0000:

:av
wait 0
0AFA:  is_samp_available
jf @av
0B34: samp register_client_command "cheatallRGB" to_label @1
0B34: samp register_client_command "cheatallRGBOFF" to_label @2
0BDE: pause_thread 0


:1
wait 0
if
00DF:   actor $PLAYER_ACTOR driving
jf @1
0811: 0@ = actor $PLAYER_ACTOR used_car
0229: set_car 0@ primary_color_to 1 secondary_color_to 211
wait 2000
0229: set_car 0@ primary_color_to 2 secondary_color_to 1
wait 1000
0229: set_car 0@ primary_color_to 3 secondary_color_to 2
wait 2000
0229: set_car 0@ primary_color_to 4 secondary_color_to 3
wait 1000
0229: set_car 0@ primary_color_to 5 secondary_color_to 4
wait 3000
0229: set_car 0@ primary_color_to 6 secondary_color_to 5
0B43: samp cmd_ret


:2
wait 0
0229: set_car 0@ primary_color_to 1 secondary_color_to 211
0B43: samp cmd_ret

 

[jenekbueno]

^ в теле команд нельзя использовать ваит
это твой код?

 

[MArkoas_Gonzaleees]

Ребята, объясните мне пожалуйста. что в этом коде написано? Подробно

while true
wait 0
    if
    0@ == 1
    then
        03CB: set_rendering_origin_at 1@ 2@ 3@
        04E4: refresh_game_renderer_at 1@ 2@
        02CE: 8@ = ground_z_at 1@ 2@ 999.0
        8@ += 30.0
        0AE2: 4@ = random_vehicle_near_point 5@ 6@ 7@ in_radius 15.0 find_next 0 pass_wrecked 1 // add to mission cleanup
        00AB: put_car 4@ at 1@ 2@ -80.0
        wait 100
        0362: remove_actor $PLAYER_ACTOR from_car_and_place_at 1@ 2@ 8@
        Actor.PutAt($PLAYER_ACTOR,1@,2@,-999.0)
        wait 0
        02CE: 8@ = ground_z_at 1@ 2@ 999.0
        Actor.PutAt($PLAYER_ACTOR,1@,2@,8@)
    end

 

[jenekbueno]

Ребята, объясните мне пожалуйста. что в этом коде написано? Подробно

while true
wait 0
    if
    0@ == 1
    then
        03CB: set_rendering_origin_at 1@ 2@ 3@
        04E4: refresh_game_renderer_at 1@ 2@
        02CE: 8@ = ground_z_at 1@ 2@ 999.0
        8@ += 30.0
        0AE2: 4@ = random_vehicle_near_point 5@ 6@ 7@ in_radius 15.0 find_next 0 pass_wrecked 1 // add to mission cleanup
        00AB: put_car 4@ at 1@ 2@ -80.0
        wait 100
        0362: remove_actor $PLAYER_ACTOR from_car_and_place_at 1@ 2@ 8@
        Actor.PutAt($PLAYER_ACTOR,1@,2@,-999.0)
        wait 0
        02CE: 8@ = ground_z_at 1@ 2@ 999.0
        Actor.PutAt($PLAYER_ACTOR,1@,2@,8@)
    end

opcodes - list | BlastHack — DEV_WIKI^{(https://blast.hk/wiki/opcodes:list)}
CLEO-справочник^{(http://gtascript.ru/opcodes/)}

 

[Удалённый пользователь 126082]

^ в теле команд нельзя использовать ваит
это твой код?

А каким мне образом сделать, чтобы цвета менялись раз в 2 секунды?