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

LaRossa

Потрачен
429
117
Обратите внимание, пользователь заблокирован на форуме. Не рекомендуется проводить сделки.
помогите мне сделать буквы большими и сделать скрипт в несколько потоков с этим же, а то у меня говорит что метка переобъявлена, а дальше я сам
CLEO:
{$CLEO}
0000: NOP

repeat
wait 0
until Samp.Available()

0B34: samp register_client_command "cmd" to_label @cmd

WHILE TRUE
    wait 0
    IF 0@ == 1
    THEN
        say "%s" 4@v  // здесь нужно верхним регистром при помощи опкода 0c26 как мне писали выше
        0@ = 0
    END
END

:cmd
0B35: samp 1@ = get_last_command_params
IF 0AD4: 2@ = scan_string 1@ format "%s" 4@v
THEN
    0@ = 1
END
0B43: samp cmd_ret
CLEO:
{$CLEO}
0000:
while not Samp.Available()
    wait 0
end
alloc 2@ 64 
0B34: samp register_client_command "cmd" to_label @cmd
while true
    wait 0
    if 0@ == 1
        then
        say "%s" 2@
        0@ = 0
    end       
end

:cmd   
alloc 1@ 32  
0B35: samp 1@ = get_last_command_params
if 0AD4: 1@ = scan_string 1@ format "%s" 2@
    then
    0@ = 1
end
free 1@
Samp.CmdRet()
 

D3.Pheonix

🎹
Модератор
2,817
1,597
помогите мне сделать буквы большими и сделать скрипт в несколько потоков с этим же, а то у меня говорит что метка переобъявлена, а дальше я сам
CLEO:
{$CLEO}
0000: NOP

repeat
wait 0
until Samp.Available()

0B34: samp register_client_command "cmd" to_label @cmd

WHILE TRUE
    wait 0
    IF 0@ == 1
    THEN
        say "%s" 4@v  // здесь нужно верхним регистром при помощи опкода 0c26 как мне писали выше
        0@ = 0
    END
END

:cmd
0B35: samp 1@ = get_last_command_params
IF 0AD4: 2@ = scan_string 1@ format "%s" 4@v
THEN
    0@ = 1
END
0B43: samp cmd_ret
CLEO:
{$CLEO}
0000: NOP

repeat
wait 0
until Samp.Available()
alloc 4@ 112

0B34: samp register_client_command "cmd" to_label @cmd

WHILE TRUE
    wait 0
    IF 0@ == 1
    THEN
        say "%s" 4@
        0@ = 0
    END
END

:cmd
0B35: samp 1@ = get_last_command_params
0AA5: call 0x8220AD num_params 3 pop 3 params 4@ "%s" 1@
0AA7: call_function 0x8220AD num_params 3 pop 3 4@ "%s" 1@ 5@
if not 5@ == 0
THEN
    0@ = 1
    0C26: strupr in 4@ out 4@
END
0B43: samp cmd_ret
 

Fragrus

Известный
11
0
И ещё вопросец, короче появляюсь СиДжеем на вайнвуде. Вот код:
CLEO:
{$CLEO}

wait 0 // Ждать 0 тысячных сек, нужно чтоб не вылетело.
if  // при условии, что...
0AB0: key_pressed 11 // нажат Y
then
00A0: store_actor $PLAYER_ACTOR position_to 1@ 2@ 3@
end

if 1@ > 2250.04
then
0063: 1@ -= 100
00A1: put_actor $PLAYER_ACTOR at 1@ 2@ 3@
else
0063: 1@ += 100
00A1: put_actor $PLAYER_ACTOR at 1@ 2@ 3@
end
 

D3.Pheonix

🎹
Модератор
2,817
1,597
И ещё вопросец, короче появляюсь СиДжеем на вайнвуде.
CLEO:
{$CLEO}
0000:

while true
wait 0 // Ждать 0 тысячных сек, нужно чтоб не вылетело.
    if // при условии, что...
        0AB0: key_pressed 11 // нажат Y
    then
        00A0: store_actor $PLAYER_ACTOR position_to 1@ 2@ 3@

        if 1@ > 2250.04
        then
            0063: 1@ -= 100
            00A1: put_actor $PLAYER_ACTOR at 1@ 2@ 3@
        else
            0063: 1@ += 100
            00A1: put_actor $PLAYER_ACTOR at 1@ 2@ 3@
        end
    end
end
 

Fragrus

Известный
11
0
Иначе говоря есть функция math.atan2 в cleo или sf ? Потому что в LUA Она есть
 

holmes0

Известный
29
8
Как локальную переменную использовать негативно? То есть например 0@ = 1.0, а использовать её как -1.0 без добавления второй переменной