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

[Alex7227]

Ребята можете написать в чём ошибка в коде он крашит даже в игру не входит!

{$CLEO}

const
    DIALOG_STYLE_LIST = 2
end
0000:
repeat
    wait 400
until 0AFA:  is_samp_available
while true
    wait 0
        if 0AB0: key_pressed 121
        then
        0AC8: 0@ = allocate_memory_size 128
        0ad3: format_stirng 0@ = "Респауны%cВторой пункт%cТретий пункт" 0xA 0xA
        0B3B: samp show_dialog id 17 caption "new" text 0@ button_1 "Выбрать" button_2 "Закрыть" style DIALOG_STYLE_LIST
        0AC9: free_allocated_memory 0@
        while 0AB0: key_pressed 121
        wait 20
    end
end
    if
        0B3C: samp is_dialog_responded id 17 button 1@ list_item 3@ input_text 0
    then
        if
            1@ == 1
        then
            if 3@ == 0
            then
            0AC8: 0@ = allocate_memory_size 128
            0ad3: format_stirng 0@ = "Банды%cОрганизации%cМафии" 0xA 0xA
            0B3B: samp show_dialog id 18 caption "new" text 0@ button_1 "Выбрать" button_2 "Закрыть" style DIALOG_STYLE_LIST
            0AC9: free_allocated_memory 0@
            end
            if 3@ == 1
            then 0AF8: samp add_message_to_chat "Это второй пункт" color -1
            end
            if 3@ == 2
            then 0AF8: samp add_message_to_chat "Это третий пункт" color -1
            end
        else
            0AF8: samp add_message_to_chat "А именно: Закрыть" color -1
        end
    end
    if
        0B3C: samp is_dialog_responded id 18 button 1@ list_item 3@ input_text 0
    then
        if
            1@ == 1
        then
            if 3@ == 0
            then
            0AC8: 0@ = allocate_memory_size 128
            0ad3: format_stirng 0@ = "Los Santos Vagos%cThe Ballas Gang%cThe Grove Street%cEl Coronos%cStreetRacers%cThe Rifa Gang%cHell Angels%cBlack Kings" 0xA 0xA 0xA 0xA 0xA 0xA 0xA
            0B3B: samp show_dialog id 19 caption "Банды" text 0@ button_1 "Выбрать" button_2 "Закрыть" style DIALOG_STYLE_LIST
            0AC9: free_allocated_memory 0@
            end
        else
            0AF8: samp add_message_to_chat "ESC" color -1
        end
    end
end

 

[DataIN]

как можно узнать ид всех машин в зоне стрима , если это возможно ?

 

[itsLegend]

Ребята можете написать в чём ошибка в коде он крашит даже в игру не входит!

Для начала обнови SASCM.ini

как можно узнать ид всех машин в зоне стрима , если это возможно ?

for 0@ = 0 to 2000 step 1
    if 0 = SAMP.GetVehicleHandleBySAMPVehicleID(0@)
    then
        0AF8: "%d" -1 0@
    end
end

 

[DataIN]

Для начала обнови SASCM.ini

for 0@ = 0 to 2000 step 1
    if 0 = SAMP.GetVehicleHandleBySAMPVehicleID(0@)
    then
        0AF8: "%d" -1 0@
    end
end

А как это в код правельно вставить?:slow: Хочу сделать , что бы по очередно все взорвались машины в зоне стрима или это не так просто?

{$CLEO .cs}
thread "KOKAin"


0000: NOP

repeat
wait 0
until samp.Available()

0B34: samp register_client_command "gash" to_label @lock

:Noname_3
wait 0
if 5@ == 1
then
samp.IsCommandTyped(0@)
if 0AD4: 4@ = scan_string 0@ format "%d" 7@ //IF and SET
then
9@ = samp.GetVehicleHandleBySAMPVehicleID(7@)
jf @Noname_4
Car.StorePos(9@, 3@, 2@, 1@)
036A: put_actor $player_actor in_car 9@
9@ = actor.CurrentCar($player_actor)
car.Health(9@) = 0          
5@ = 0
end
end

jump @Noname_3











:Noname_4
0AF8: samp add_message_to_chat "Машина вне зоны стрима!!!" color -1
5@ = 0
jump @Noname_3





:lock
if 5@ == 0
then
5@ = 1
end
samp.CmdRet()

 

[itsLegend]

Ой боже, ожидал большего. Как минимум, не будет слонопробелов в коде

 

[Uztor]

Hello, I created a car and how can I put me in?

04C4: store_coords_to 1@ 2@ 3@ from_actor $PLAYER_ACTOR with_offset 0.0 0.0 0.0
4@ = Car.Create(#HYDRA, 1@, 2@, 3@)

 

[Lightkiller]

036A: put_actor 93@ in_car 70@

 

[Uztor]

Okay, but the camera is wrong.
When I sit in a vehicle and create a car, then is the camera at the old car.

 

[TheMonstercat]

Hey i need something whit i can move faster while Aiming...
I mean the moment when you walk right (D) and then turn to left (A)... I need to speed up this moment.
I already tried it with :
0AB1: @WEAPON_DAT 4 -> Change Weapon 24 DAT 0x3C VALUE_TO 2.5 SIZE_OF_DAT 4

But this only speed's up the general Aim moving speed, not the turn.
I hope you know what i mean :)

Happy Holidays :)

 

[CM Naks]

{$CLEO}
0000:
0662: "4yvak c bh"

repeat
wait 400
until samp.Available()

0B34: samp register_client_command "rec" to_label @rec

while true
wait 0
    if 0@ == 1
    then
        0@ = 1
        0b28: 0    // disconnect
        wait 15000 // time 15 sec
        0b27: 1 // connect
    end
end

:rec
0@ = 1
samp.CmdRet()

Такое дело, ребят, нужна ваша помощь, недавно просил помочь мне изменить написание команды в собе от MG, а конкретно мне нужно изменить написание команды /re ( /re id -слежка за любым игроком в зоне прорисовки ) на /rec ( тот же смысл, только измененное написание команды ), дабы не конфликтовало с командой /re в панели администратора, и парень мне отправил вот эту мишуру, не подскажите, что с ней делать и куда засовывать? я чайник, до боли в ушах, если не трудно, помогите пожалуйста и скажите, это вообще то, что мне нужно? изменит ли это написание самой команды в игре? Заранее большое спасибо тому, кто поможет. Удалять сому команду из соба не хочу, т.к есть и другие сервера, на которых я играю, а там она бывает достаточно полезной

 

[hnnssy]

Hey i need something whit i can move faster while Aiming...
I mean the moment when you walk right (D) and then turn to left (A)... I need to speed up this moment.
I already tried it with :
0AB1: @WEAPON_DAT 4 -> Change Weapon 24 DAT 0x3C VALUE_TO 2.5 SIZE_OF_DAT 4

But this only speed's up the general Aim moving speed, not the turn.
I hope you know what i mean :)

Happy Holidays :)

maybe this

0A96: 1@ = actor $PLAYER_ACTOR struct
1@ += 1376
0A8C: write_memory 1@ size 4 value 30.0 virtual_protect 0 // 7.5 - default

 

[itsLegend]

Такое дело, ребят, нужна ваша помощь, недавно просил помочь мне изменить написание команды в собе от MG, а конкретно мне нужно изменить написание команды /re ( /re id -слежка за любым игроком в зоне прорисовки ) на /rec ( тот же смысл, только измененное написание команды ), дабы не конфликтовало с командой /re в панели администратора, и парень мне отправил вот эту мишуру, не подскажите, что с ней делать и куда засовывать? я чайник, до боли в ушах, если не трудно, помогите пожалуйста и скажите, это вообще то, что мне нужно? изменит ли это написание самой команды в игре? Заранее большое спасибо тому, кто поможет. Удалять сому команду из соба не хочу, т.к есть и другие сервера, на которых я играю, а там она бывает достаточно полезной

Нет, не поможет.
Нужно перекомпилировать исход соба, либо через hex редактор.

Используй другой символ обработки команд, в собе же есть.

 

[CM Naks]

Нет, не поможет.
Нужно перекомпилировать исход соба, либо через hex редактор.

Используй другой символ обработки команд, в собе же есть.

Спасибо большое за ответ, но я все же чего-то недопонимаю, можно ли вообще именно в собе МГ изменить написание /re на любое другое (/rec, /rej, /rel, не важно вообще )?

 

[Dark_Knight]

Спасибо большое за ответ, но я все же чего-то недопонимаю, можно ли вообще именно в собе МГ изменить написание /re на любое другое (/rec, /rej, /rel, не важно вообще )?

Можно не /re, а !re, но символ меняется для всех команд. Следущие сообщения об собейте будут расцениватся как оффтоп. Задавай в определеной теме такие вопросы.

 

[CM Naks]

Можно не /re, а !re, но символ меняется для всех команд. Следущие сообщения об собейте будут расцениватся как оффтоп. Задавай в определеной теме такие вопросы.

Ладно, последний вопрос и ухожу, надеюсь, сможете помочь, ты имел ввиду изменения символа / на ! для написания собейтовских команд? если да - то как сделать? Я тебе буду очень благодарен, если поможешь, только большая просьба, опиши подробно, т.к я чайник, еще раз повторюсь и на таких форумах доводится на так часто сидеть