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

Gangsta

Новичок
15
0
проверять надо не на "что-то подсказывает мне блаблабла...", а на деле
PHP:
{$CLEO .cs}
0000: NOP
 
if
8AF7: get_samp_base_to 29@
then
//0AF8: samp add_message_to_chat "SAMP base is not loaded." 0xe59d36
0ACF: show_formatted_styled_text "SAMP base is not loaded." time 3000 style 5
0A93: end_custom_thread
end
repeat
wait 400
until 0AFA: is_samp_structures_available
//0AF8: samp add_message_to_chat "SAMP base loaded: %p." 0xe59d36 29@
0ACF: show_formatted_styled_text "SAMP base loaded: %p" time 3000 style 5 29@
 
0AF8: samp add_message_to_chat "Trololo" 0xe59d36
0A93: end_custom_thread

Ничего не происходит.
 

gcode

нестандартное звание звание звание звание звани...
Друг
789
357
100500 раз читал внатуре! Пиздокс, на моей XP не включается.. И дааа! Собейты почти все не робят, кажись их на 2012 студии что ли пишут. Мб и SF на ней там пишут, не знаю. В общем пробовал все решения, предлагаемые здесь и на многих других ресурсах - не робит.
http://blasthack.net/threads/windows-xp-sampfuncs-Запуск-sampfuncs-2-4-на-win-xp.2217/
 

MISTER_GONWIK

Всефорумный гонщик
Всефорумный модератор
1,260
1,742
Ничего не происходит.

PHP:
{$CLEO .cs}
0000: NOP
 
:load_samp_base
    if not 30@ = SAMP.Base()
    then 
        while true
        wait 0
            0ACF: show_formatted_styled_text "SAMP base is not loaded." time 3000 style 5
        end
    end
while not SAMP.Available()
    wait 100
    0ACF: show_formatted_styled_text "SAMP Available();" time 3000 style 5
end
 
while true
wait 0
    0ACF: show_formatted_styled_text "SAMP base loaded: %p" time 3000 style 5 29@
end
 

gcode

нестандартное звание звание звание звание звани...
Друг
789
357
PHP:
{$CLEO .cs}
0000: NOP
 
:load_samp_base
if not 30@ = SAMP.Base()
then 0A93: end_custom_thread
end
while not SAMP.Available()
wait 100
0ACF: show_formatted_styled_text "SAMP Available();" time 3000 style 5
end
 
while true
wait 0
0ACF: show_formatted_styled_text "SAMP base loaded: %p" time 3000 style 5 29@
end
У него 0.3x и версия SF 1.5. Понимаешь?
 

TheMonstercat

Известный
75
11
Hey i tryed to NOP SetPlayerArmedWeapon without SAMPFUNCS
sampPatch[] = "NOP SetPlayerArmedWeapon" &0 0 0x136E0 "" "C390"

I have this with a mistake and i cant find it ^^

Код:
:Noname_1321
if
  30@ == 4
else_jump @Noname_1359
0AF0: 31@ = get_int_from_ini_file "cleo\HaX.ini" section "MAIN" key "NOP"
if
31@ == 0
then
0AA2: 31@ = load_library "kernel32.dll" // IF and SET
0AA4: 30@ = get_proc_address "GetModuleHandleA" library 31@ // IF and SET
0AA7: call_function 30@ num_params 1 pop 0 "samp.dll" 0@
0008: 0@ += 0x136E0
0A8D: 1@ = read_memory 0@ size 4 virtual_protect 0
0A8C: write_memory 0@ size 0xC390 value 4 virtual_protect 0
else
0AA2: 31@ = load_library "kernel32.dll" // IF and SET
0AA4: 30@ = get_proc_address "GetModuleHandleA" library 31@ // IF and SET
0AA7: call_function 30@ num_params 1 pop 0 "samp.dll" 0@
0008: 0@ += 0x136E0
0A8C: write_memory 0@ size 1@ value 4 virtual_protect 0
end
 

gcode

нестандартное звание звание звание звание звани...
Друг
789
357
Hey i tryed to NOP SetPlayerArmedWeapon without SAMPFUNCS
sampPatch[] = "NOP SetPlayerArmedWeapon" &0 0 0x136E0 "" "C390"

I have this with a mistake and i cant find it ^^

Код:
:Noname_1321
if
  30@ == 4
else_jump @Noname_1359
0AF0: 31@ = get_int_from_ini_file "cleo\HaX.ini" section "MAIN" key "NOP"
if
31@ == 0
then
0AA2: 31@ = load_library "kernel32.dll" // IF and SET
0AA4: 30@ = get_proc_address "GetModuleHandleA" library 31@ // IF and SET
0AA7: call_function 30@ num_params 1 pop 0 "samp.dll" 0@
0008: 0@ += 0x136E0
0A8D: 1@ = read_memory 0@ size 4 virtual_protect 0
0A8C: write_memory 0@ size 0xC390 value 4 virtual_protect 0
else
0AA2: 31@ = load_library "kernel32.dll" // IF and SET
0AA4: 30@ = get_proc_address "GetModuleHandleA" library 31@ // IF and SET
0AA7: call_function 30@ num_params 1 pop 0 "samp.dll" 0@
0008: 0@ += 0x136E0
0A8C: write_memory 0@ size 1@ value 4 virtual_protect 0
end

PHP:
:Noname_1321
if
  30@ == 4
else_jump @Noname_1359
0AF0: 31@ = get_int_from_ini_file "cleo\HaX.ini" section "MAIN" key "NOP"
0AA2: 31@ = load_library "kernel32.dll" // IF and SET
0AA4: 30@ = get_proc_address "GetModuleHandleA" library 31@ // IF and SET
0AA7: call_function 30@ num_params 1 pop 0 "samp.dll" 0@
0008: 0@ += 0x136E0
if
31@ == 0
then
0A8D: 1@ = read_memory 0@ size 2 virtual_protect 0
0A8C: write_memory 0@ size 2 value 0xC390 virtual_protect 0
else
0A8C: write_memory 0@ size 2  value 1@ virtual_protect 0
end
 

Alex[ON]

Потрачен
23
0
Обратите внимание, пользователь заблокирован на форуме. Не рекомендуется проводить сделки.
Как исправит ошибку при компилировании?
P.S Метка "format_url" переобъявлена. Изменять ее не вариант.....
 

itsLegend

Фонд борьбы за жуков 🐞
Администратор
2,696
1,462
PHP:
:Noname_1321
if
  30@ == 4
else_jump @Noname_1359
0AF0: 31@ = get_int_from_ini_file "cleo\HaX.ini" section "MAIN" key "NOP"
0AA2: 31@ = load_library "kernel32.dll" // IF and SET
0AA4: 30@ = get_proc_address "GetModuleHandleA" library 31@ // IF and SET
0AA7: call_function 30@ num_params 1 pop 0 "samp.dll" 0@
0008: 0@ += 0x136E0
if
31@ == 0
then
0A8D: 1@ = read_memory 0@ size 2 virtual_protect 0
0A8C: write_memory 0@ size 2 value 0xC390 virtual_protect 0
else
0A8C: write_memory 0@ size 2  value 1@ virtual_protect 0
end

Запись 0xC390 должна быть справа налево.
0x90C3
virtual_protect должен быть true, иначе варнинги, или вообще ничего не случится.
p.s. код вообще ужасно странный :|
 

gcode

нестандартное звание звание звание звание звани...
Друг
789
357
Запись 0xC390 должна быть справа налево.
0x90C3
virtual_protect должен быть true, иначе варнинги, или вообще ничего не случится.
p.s. код вообще ужасно странный :|
Зачем справа налево?) Ты же когда обычные нопы делаешь справа налево не пишешь значения.