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

kraft1k

Вынь х*й из головы и все получится © hnnssy
Друг
1,479
1,163
Текст мигает из-за "wait 0", если убрать, то "маркер" на радаре не появляется. Как решить?

CLEO:
while true
wait 0

if MarkState == 1
then
for 15@ = 0 to MAX_VEHICLES
16@ = SAMP.GetVehicleHandleBySAMPVehicleID(15@)
if 056E:   car 16@ defined
then
    00AA: store_car 16@ position_to 21@ 22@ 23@
    marker.CreateIconAndSphere(20@, 55, 21@, 22@, 23@)
    wait 0
    marker.Disable(20@)
end
end
end


if VehicleState == 1
then
for 0@ = 0 to MAX_VEHICLES
03F0: enable_text_draw 1
1@ = SAMP.GetVehicleHandleBySAMPVehicleID(0@)
if 056E:   car 1@ defined
then
    00AA: store_car 1@ position_to 2@ 3@ 4@
     if call @convert 3 2@ 3@ 4@ ret 5@ 6@
     then
      0C11:  11@ 0 260
      format 11@ "{0094c8}Kraft1k{FFFFFF}:{ff0000}Транспорт"
      0B6F: render font 13@ draw_text 11@ pos  5@ 6@ color 0xe3dc0bff
     end
end
end
end

end
 
  • Нравится
Реакции: Config

BlackKnigga

Известный
BH Team
922
445
Текст мигает из-за "wait 0", если убрать, то "маркер" на радаре не появляется. Как решить?

CLEO:
while true
wait 0

if MarkState == 1
then
for 15@ = 0 to MAX_VEHICLES
16@ = SAMP.GetVehicleHandleBySAMPVehicleID(15@)
if 056E:   car 16@ defined
then
    00AA: store_car 16@ position_to 21@ 22@ 23@
    marker.CreateIconAndSphere(20@, 55, 21@, 22@, 23@)
    wait 0
    marker.Disable(20@)
end
end
end


if VehicleState == 1
then
for 0@ = 0 to MAX_VEHICLES
03F0: enable_text_draw 1
1@ = SAMP.GetVehicleHandleBySAMPVehicleID(0@)
if 056E:   car 1@ defined
then
    00AA: store_car 1@ position_to 2@ 3@ 4@
     if call @convert 3 2@ 3@ 4@ ret 5@ 6@
     then
      0C11:  11@ 0 260
      format 11@ "{0094c8}Kraft1k{FFFFFF}:{ff0000}Транспорт"
      0B6F: render font 13@ draw_text 11@ pos  5@ 6@ color 0xe3dc0bff
     end
end
end
end

end
А зачем удаляешь?
marker.Disable(20@)
 

MISTER_GONWIK

Всефорумный гонщик
Всефорумный модератор
1,260
1,742
Текст мигает из-за "wait 0", если убрать, то "маркер" на радаре не появляется. Как решить?

CLEO:
while true
wait 0

if MarkState == 1
then
for 15@ = 0 to MAX_VEHICLES
16@ = SAMP.GetVehicleHandleBySAMPVehicleID(15@)
if 056E:   car 16@ defined
then
    00AA: store_car 16@ position_to 21@ 22@ 23@
    marker.CreateIconAndSphere(20@, 55, 21@, 22@, 23@)
    wait 0
    marker.Disable(20@)
end
end
end


if VehicleState == 1
then
for 0@ = 0 to MAX_VEHICLES
03F0: enable_text_draw 1
1@ = SAMP.GetVehicleHandleBySAMPVehicleID(0@)
if 056E:   car 1@ defined
then
    00AA: store_car 1@ position_to 2@ 3@ 4@
     if call @convert 3 2@ 3@ 4@ ret 5@ 6@
     then
      0C11:  11@ 0 260
      format 11@ "{0094c8}Kraft1k{FFFFFF}:{ff0000}Транспорт"
      0B6F: render font 13@ draw_text 11@ pos  5@ 6@ color 0xe3dc0bff
     end
end
end
end

end
покажи полный код
 

SaMMpeR Cheats

Новичок
49
5
Хотел изменить скрипт но когда я его компилирую ошибка:
Неверное выражение Dialog.Create(4@,"----------------------------------------------------------------------").
Одна из переменных имеет неизвестный тип, либо их типы несовместимы.
CLEO:
{$CLEO .cs}

//-------------MAIN---------------
0000: NOP

:Noname_75
wait 0
   SAMP.Available
else_jump @Noname_75
0AF1: write_int 20160226 to_ini_file "CLEO\SaMMpeR.ini" section "AutoUpdate" key "CompileDate"
Dialog.Create(4@, "----------------------------------------------------------------------")
0AB3: var 19 = 4@
Dialog.SetVisible(4@, 0)
Dialog.EnableCaption(4@, 1)
Dialog.SetMinimized(4@, 0)
Dialog.SetBackgroundColor(4@, -939524096)
Dialog.AddCheckBox(4@, 0, "", 288, 4, 20, 20)
Dialog.AddCheckBox(4@, 1, "", 308, 4, 20, 20)
Dialog.AddStatic(4@, 2, "-----------------------------------------------------------------------------", 5, 20, 325, 20)
Dialog.AddStatic(4@, 3, "{FF0000}HK by SaMMpeR.eXe", 5, 5, 325, 20)
31@ = 40
0AC6: 29@ = label @Noname_52640 offset
0C65: 28@ = download_url 29@ to_file "SaMMpeR_info.php"
27@ = -1
 

Romelo

dev.
Проверенный
540
624
Хотел изменить скрипт но когда я его компилирую ошибка:
Неверное выражение Dialog.Create(4@,"----------------------------------------------------------------------").
Одна из переменных имеет неизвестный тип, либо их типы несовместимы.
CLEO:
{$CLEO .cs}

//-------------MAIN---------------
0000: NOP

:Noname_75
wait 0
   SAMP.Available
else_jump @Noname_75
0AF1: write_int 20160226 to_ini_file "CLEO\SaMMpeR.ini" section "AutoUpdate" key "CompileDate"
Dialog.Create(4@, "----------------------------------------------------------------------")
0AB3: var 19 = 4@
Dialog.SetVisible(4@, 0)
Dialog.EnableCaption(4@, 1)
Dialog.SetMinimized(4@, 0)
Dialog.SetBackgroundColor(4@, -939524096)
Dialog.AddCheckBox(4@, 0, "", 288, 4, 20, 20)
Dialog.AddCheckBox(4@, 1, "", 308, 4, 20, 20)
Dialog.AddStatic(4@, 2, "-----------------------------------------------------------------------------", 5, 20, 325, 20)
Dialog.AddStatic(4@, 3, "{FF0000}HK by SaMMpeR.eXe", 5, 5, 325, 20)
31@ = 40
0AC6: 29@ = label @Noname_52640 offset
0C65: 28@ = download_url 29@ to_file "SaMMpeR_info.php"
27@ = -1
CLEO:
{$CLEO .cs}

//-------------MAIN---------------
0000: NOP

:Noname_75
wait 0
   SAMP.Available
else_jump @Noname_75
0AF1: write_int 20160226 to_ini_file "CLEO\SaMMpeR.ini" section "AutoUpdate" key "CompileDate"
0B80: dialog 4@ = create "----------------------------------------------------------------------" 
0AB3: var 19 = 4@
0B86: dialog 4@ set_visible 0 
0B9F: dialog 4@ enable_caption 1
0BA1: dialog 4@ set_minimized 0
0B93: dialog 4@ set_background_color -939524096
0B83: dialog 4@ add_checkbox id 0 text "" pos_XY 288 4 size 20 20
0B83: dialog 4@ add_checkbox id 1 text "" pos_XY 308 4 size 20 20
0B91: dialog 4@ add_static id 2 text "-----------------------------------------------------------------------------" pos_XY 5 20 size 325 20 
0B91: dialog 4@ add_static id 3 text "{FF0000}HK by SaMMpeR.eXe" pos_XY 5 5 size 325 20 
31@ = 40
0AC6: 29@ = label @Noname_52640 offset
0C65: 28@ = download_url 29@ to_file "SaMMpeR_info.php"
27@ = -1
 
  • Нравится
Реакции: LaRossa

Karbun

Участник
112
3
Как сравнить 2 локальных переменных, в которых находится текст?