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

Impossible In Rage

Известный
955
247
Почему не работает ?

CLEO:
:saveposs
    0B35: samp 0@ = get_last_command_params
    00A0: store_actor $PLAYER_ACTOR position_to 1@ 2@ 3@
    0AF3: write_float 1@ to_ini_file "cleo\INI\config.ini" section 0@ key "X"
    0AF3: write_float 2@ to_ini_file "cleo\INI\config.ini" section 0@ key "Y"
    0AF3: write_float 3@ to_ini_file "cleo\INI\config.ini" section 0@ key "Z"
0B43: samp cmd_ret
0 возвращает строку , у тебя же в 0 еще и записана секция
 

noob213

Известный
33
2
0 возвращает строку , у тебя же в 0 еще и записана секция
как бы это было
Я хочу написать более 16 символов в разделе

нет работы


CLEO:
:saveposs
0B35: samp 0@ = get_last_command_params
00A0: store_actor $PLAYER_ACTOR position_to 20@ 21@ 22@
0AF3: write_float 20@ to_ini_file "cleo\INI\config.ini" section 0@ key "X"
0AF3: write_float 21@ to_ini_file "cleo\INI\config.ini" section 0@ key "Y"
0AF3: write_float 22@ to_ini_file "cleo\INI\config.ini" section 0@ key "Z"
0B43: samp cmd_ret
 
Последнее редактирование:

loganhackerdff

Известный
868
517
Хочу изменить заголовок диалога, что то я не понимаю
CLEO:
{$cleo}
0000:

while 8afa:
wait 0
end

var 
25@ : integer 
end

while true 
wait 0

if 0B4C:  samp is_dialog_active -1
then
alloc 6@ 64
alloc 5@ 64
0C11: memset destination 6@ value 0 size 16
0C11: memset destination 5@ value 0 size 64
0BD8: samp get_dialog_caption 5@
0B4E: samp 1@ = get_current_dialog_id
format 6@ = " ID - %d" 1@
0BD8: samp get_dialog_caption 5@
0C15: strcat destination 5@ source 6@
0BD8: samp get_dialog_caption 25@
chatmsg "%d" 0xffffff 25@
0C13: strcpy destination 25@ source 5@

    while  0B4C:  samp is_dialog_active -1
    wait 0
    end
    free 5@
    free 6@
end
end
 

Krackeen_777

Новичок
1
0
Как мне готовый c# скрипт закинуть в Cleo Script? Просто у меня есть исходник TranCity и там есть скрипт на троллейбус, и я хотел сделать работающий троллейбус в гта са...
 

hnnssy

Известный
Друг
2,684
2,748
Хочу изменить заголовок диалога, что то я не понимаю
CLEO:
{$cleo}
0000:

while 8afa:
wait 0
end

var
25@ : integer
end

while true
wait 0

if 0B4C:  samp is_dialog_active -1
then
alloc 6@ 64
alloc 5@ 64
0C11: memset destination 6@ value 0 size 16
0C11: memset destination 5@ value 0 size 64
0BD8: samp get_dialog_caption 5@
0B4E: samp 1@ = get_current_dialog_id
format 6@ = " ID - %d" 1@
0BD8: samp get_dialog_caption 5@
0C15: strcat destination 5@ source 6@
0BD8: samp get_dialog_caption 25@
chatmsg "%d" 0xffffff 25@
0C13: strcpy destination 25@ source 5@

    while  0B4C:  samp is_dialog_active -1
    wait 0
    end
    free 5@
    free 6@
end
end
зачем эти танцы с бубном? поставь хук на диалоги и редактируй название непосредственно на входе
 

Akakii_Nakamura

Новичок
4
1
Привет. Необходимо просто передвижение авто из точки А в точку Б, игнорируя все на свете.
Казалось бы, просто. Но при попытке запуска игры - краш.
Код:
{$CLEO .cs}
wait 0
0@ = Actor.CurrentCar($PLAYER_ACTOR)
1@ = 2376.5159    
2@ = -1436.8727
3@ = 80.7915
:1
if
0AB0:   key_pressed 45
Car.DriveTo(0@, 1@, 2@, 3@)
Car.SetMaxSpeed(0@, 35.0 )
jump  @1
 

Andra223.

Известный
18
1
Помогите пожалуйста, по чему это привязка? не могу понять что надо вводить в 0@
Код:
0AA7: call_function {__stdcall::GetVolumeInformation}0x81E532 num_params 8 pop 0 | {nFileSystemNameSize}FALSE {lpFileSystemNameBuffer}FALSE {lpFileSystemFlags}FALSE {lpMaximumComponentLength}FALSE {lpVolumeSerialNumber}0@v {nVolumeNameSize}FALSE {lpVolumeNameBuffer}FALSE {lpRootPathName}FALSE | {_errorCode}1@ |
IF 0039:   0@ == {lpVolumeSerialNumber}122324921
THEN {}
CHATMSG "ЗАЕБИСЬ" -1
ELSE {}
CHATMSG "НЕ ЗАЕБИСЬ" -1
END
0A93:
Точнее не могу понять, серийник чего надо вводить туда
 

Impossible In Rage

Известный
955
247
Привет. Необходимо просто передвижение авто из точки А в точку Б, игнорируя все на свете.
Казалось бы, просто. Но при попытке запуска игры - краш.
Код:
{$CLEO .cs}
wait 0
0@ = Actor.CurrentCar($PLAYER_ACTOR)
1@ = 2376.5159   
2@ = -1436.8727
3@ = 80.7915
:1
if
0AB0:   key_pressed 45
Car.DriveTo(0@, 1@, 2@, 3@)
Car.SetMaxSpeed(0@, 35.0 )
jump  @1
Во первых по моему ( я плохой кодер) , но первые 4 переменные лучше записать в лабеле , после сделать jf , if можно не писать если условие одно
 

Andra223.

Известный
18
1
Помогите пожалуйста, по чему это привязка? не могу понять что надо вводить в 0@
Код:
0AA7: call_function {__stdcall::GetVolumeInformation}0x81E532 num_params 8 pop 0 | {nFileSystemNameSize}FALSE {lpFileSystemNameBuffer}FALSE {lpFileSystemFlags}FALSE {lpMaximumComponentLength}FALSE {lpVolumeSerialNumber}0@v {nVolumeNameSize}FALSE {lpVolumeNameBuffer}FALSE {lpRootPathName}FALSE | {_errorCode}1@ |
IF 0039:   0@ == {lpVolumeSerialNumber}122324921
THEN {}
CHATMSG "ЗАЕБИСЬ" -1
ELSE {}
CHATMSG "НЕ ЗАЕБИСЬ" -1
END
0A93:
Точнее не могу понять, серийник чего надо вводить туда
МНЕ ТО ПОМОГИТЕ ПОЖАЛУЙСТА
 

astap_

Известный
Всефорумный модератор
626
597
Помогите пожалуйста, по чему это привязка? не могу понять что надо вводить в 0@
Код:
0AA7: call_function {__stdcall::GetVolumeInformation}0x81E532 num_params 8 pop 0 | {nFileSystemNameSize}FALSE {lpFileSystemNameBuffer}FALSE {lpFileSystemFlags}FALSE {lpMaximumComponentLength}FALSE {lpVolumeSerialNumber}0@v {nVolumeNameSize}FALSE {lpVolumeNameBuffer}FALSE {lpRootPathName}FALSE | {_errorCode}1@ |
IF 0039:   0@ == {lpVolumeSerialNumber}122324921
THEN {}
CHATMSG "ЗАЕБИСЬ" -1
ELSE {}
CHATMSG "НЕ ЗАЕБИСЬ" -1
END
0A93:
Точнее не могу понять, серийник чего надо вводить туда
серийный номер харда, не надо ничего вводить туда, функция возвращает значение, которое записывается в переменную 0@.
v убери, это не строка

Привет. Необходимо просто передвижение авто из точки А в точку Б, игнорируя все на свете.
Казалось бы, просто. Но при попытке запуска игры - краш.
Код:
{$CLEO .cs}
wait 0
0@ = Actor.CurrentCar($PLAYER_ACTOR)
1@ = 2376.5159   
2@ = -1436.8727
3@ = 80.7915
:1
if
0AB0:   key_pressed 45
Car.DriveTo(0@, 1@, 2@, 3@)
Car.SetMaxSpeed(0@, 35.0 )
jump  @1
CLEO:
{$CLEO}
0000:
thread 'astap'

while true // цикл работает, пока запущена игра
    wait 0
    if Actor.Driving($PLAYER_ACTOR) // если мы в машине
    then
        if 0AB0:   key_pressed 45 // если нажали клавишу 45
        then
            while 0AB0:   key_pressed 45 // цикл работает, пока зажата клавиша, чтобы не было флуда
                wait 0
            end
            0@ = Actor.CurrentCar($PLAYER_ACTOR)
            Car.DriveTo(0@, 2376.5159 , -1436.8727, 80.7915)
            Car.SetMaxSpeed(0@, 35.0 )
        end
    end
end
 

Akakii_Nakamura

Новичок
4
1
CLEO:
{$CLEO}
0000:
thread 'astap'

while true // цикл работает, пока запущена игра
    wait 0
    if Actor.Driving($PLAYER_ACTOR) // если мы в машине
    then
        if 0AB0:   key_pressed 45 // если нажали клавишу 45
        then
            while 0AB0:   key_pressed 45 // цикл работает, пока зажата клавиша, чтобы не было флуда
                wait 0
            end
            0@ = Actor.CurrentCar($PLAYER_ACTOR)
            Car.DriveTo(0@, 2376.5159 , -1436.8727, 80.7915)
            Car.SetMaxSpeed(0@, 35.0 )
        end
    end
end
Помогло, компилируется и не крашит, но он едет по дороге, а мне надо, чтобы напрямик. Лечится?
Car.SetDriverBehaviour(0@, 8) не помогает