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

spiceman · 6 Июн 2013

fonarik написал(а):
как сделать отправку ложных координат на сервер?В папке SF там описано,но я не понял,прошу Вас,помогите мне.

Вот.

Код:

:playersynccoord
// 0ab1: @playersynccoord 3 0.0 0.0 0.0
0B2B: samp 3@ = get_player_id_by_actor_handle $player_actor
0B24: samp 3@ = get_player_ptr 3@
3@ += 0x6D
0AC8: 4@ = allocate_memory_size 0x44
0C10: memcpy destination 4@ source 3@ size 0x44
0C0D: struct 4@ offset 0x6 size 4 = 0@
0C0D: struct 4@ offset 0xA size 4 = 1@
0C0D: struct 4@ offset 0xE size 4 = 2@
0B3D: raknet 5@ = new_bit_stream
0B40: raknet bit_stream 5@ write PACKET_PLAYER_SYNC type BS_TYPE_BYTE size 1
0B40: raknet bit_stream 5@ write 4@ type BS_TYPE_ARRAY size 0x44
0B42: raknet send bit_stream 5@ priority PRIORITY_HIGH reliability UNRELIABLE_SEQUENCED ordering_channel 0
0B3E: raknet delete_bit_stream 5@
0AC9: free_allocated_memory 4@
0ab2: 0

Избранный · 6 Июн 2013

Кароч, я захотел зафигачить калькулятор на клео

Вроде как понял что как сделать, но не знаю как строку сканировать на символ (ну ввожу типо 2 + 3 в окошко). И проблема в том, что код не компилируется, я хз каким опкодом сделать проверку что переменная равна символу, думаю вы поняли.
вот что получилось, это часть скрипта:

Код:

while true
wait 0
if 0B3C: samp dialog_respond 1 button 1@ list_item 0 input_text 2@
then
if 1@ == 1
then
0AD4: 3@ = scan_string 2@ format "%d %s %d" 5@ 6@ 7@
if 6@ == "+" // и вот на этой строке ошибка
then

помогите плиз.

itsLegend · 6 Июн 2013

Избранный,

mgmoldova написал(а):
нельзя сканировать стринг на наличие стринга

К тому же...
Нельзя так:

Код:

if
      6@ == "+"

Скорее всего так:

Код:

0C14: strcmp string1 6@ string2 "+"

Избранный · 6 Июн 2013

фигово:( но может есть другой способ сделать офигенный калькулятор?

spiceman · 6 Июн 2013

Избранный написал(а):
фигово:( но может есть другой способ сделать офигенный калькулятор?

Да, сканируй не как стринг, а как символ.
Типо такого

PHP:

if 0AD4: 6@ = scan_string 2@ format "%d%c%d" 3@ 4@ 5@

А потом проверяй

PHP:

if 4@ == 43

ID символов, нужных тебе:
42 - знак "*"
43 - знак "+"
45 - знак "-"
47 - знак "/"

fonarik · 6 Июн 2013

Даниил,вот в этой строке недостаточно параметров
0B40: raknet bit_stream 5@ write PACKET_PLAYER_SYNC type BS_TYPE_BYTE size 1

itsLegend · 6 Июн 2013

fonarik написал(а):
Даниил,вот в этой строке недостаточно параметров
0B40: raknet bit_stream 5@ write PACKET_PLAYER_SYNC type BS_TYPE_BYTE size 1

Подключай RakNetDefines(в начало, после {$CLEO} ):

Код:

{$include /includes/RakNetDefines.txt}

Перед этим, установи SAMPFUNCS(в архиве есть папка CLEO...).

@---------------------------@

Что за пакет в RakNet'е?:
PACKET_MARKERS_SYNC / ID_MARKERS_SYNC

fonarik · 6 Июн 2013

Кароч все ясно, я не могу понять что не так в клео.
Вот что я получил:

Код:

{$CLEO .cs}
{$include /includes/RakNetDefines.txt}
 
if not 0@ = SAMP.Base() 
then 0A93: 
end 
repeat 
     wait 200 
until SAMP.Available() 
:1
wait 0
if
0ab0: 110
else_jump @1
:2
  wait 40
0AB1: call_scm_func @playersynccoord 3 1159.40 -1768.07 16.59
  wait 40
:playersynccoord
0B2B: samp 3@ = get_player_id_by_actor_handle $player_actor
0B24: samp 3@ = get_player_ptr 3@
3@ += 0x6D
0AC8: 4@ = allocate_memory_size 0x44
0C10: memcpy destination 4@ source 3@ size 0x44
0C0D: struct 4@ offset 0x6 size 4 = 0@
0C0D: struct 4@ offset 0xA size 4 = 1@
0C0D: struct 4@ offset 0xE size 4 = 2@
0B3D: raknet 5@ = new_bit_stream
0B40: raknet bit_stream 5@ write PACKET_PLAYER_SYNC type BS_TYPE_BYTE size 1
0B40: raknet bit_stream 5@ write 4@ type BS_TYPE_ARRAY size 0x44
0B42: raknet send bit_stream 5@ priority PRIORITY_HIGH reliability UNRELIABLE_SEQUENCED ordering_channel 0
0B3E: raknet delete_bit_stream 5@
0AC9: free_allocated_memory 4@
0ab2: 0

это координаты пикапа сердечка,да он мне дает хп,но меня сразу крашит.

Dark_Knight · 6 Июн 2013

Чуть не так ты написал.

Код:

{$CLEO .cs}
{$include /includes/RakNetDefines.txt}
 
if not 0@ = SAMP.Base()
then 0A93:
end
repeat
wait 200
until SAMP.Available()
 
while true
wait 0
if
0ab0: 110
then
while 0ab0: 110
wait 0
end 
wait 40
0AB1: call_scm_func @playersynccoord 3 1159.40 -1768.07 16.59
wait 40
end
end
 
:playersynccoord
0B2B: samp 3@ = get_player_id_by_actor_handle $player_actor
0B24: samp 3@ = get_player_ptr 3@
3@ += 0x6D
0AC8: 4@ = allocate_memory_size 0x44
0C10: memcpy destination 4@ source 3@ size 0x44
0C0D: struct 4@ offset 0x6 size 4 = 0@
0C0D: struct 4@ offset 0xA size 4 = 1@
0C0D: struct 4@ offset 0xE size 4 = 2@
0B3D: raknet 5@ = new_bit_stream
0B40: raknet bit_stream 5@ write PACKET_PLAYER_SYNC type BS_TYPE_BYTE size 1
0B40: raknet bit_stream 5@ write 4@ type BS_TYPE_ARRAY size 0x44
0B42: raknet send bit_stream 5@ priority PRIORITY_HIGH reliability UNRELIABLE_SEQUENCED ordering_channel 0
0B3E: raknet delete_bit_stream 5@
0AC9: free_allocated_memory 4@
0ab2: 0

fonarik · 6 Июн 2013

Dark_Knight написал(а):

Чуть не так ты написал.

Код:

{$CLEO .cs}
{$include /includes/RakNetDefines.txt}
 
if not 0@ = SAMP.Base()
then 0A93:
end
repeat
wait 200
until SAMP.Available()
 
while true
wait 0
if
0ab0: 110
then
while 0ab0: 110
wait 0
end
wait 40
0AB1: call_scm_func @playersynccoord 3 1159.40 -1768.07 16.59
wait 40
end
end
 
:playersynccoord
0B2B: samp 3@ = get_player_id_by_actor_handle $player_actor
0B24: samp 3@ = get_player_ptr 3@
3@ += 0x6D
0AC8: 4@ = allocate_memory_size 0x44
0C10: memcpy destination 4@ source 3@ size 0x44
0C0D: struct 4@ offset 0x6 size 4 = 0@
0C0D: struct 4@ offset 0xA size 4 = 1@
0C0D: struct 4@ offset 0xE size 4 = 2@
0B3D: raknet 5@ = new_bit_stream
0B40: raknet bit_stream 5@ write PACKET_PLAYER_SYNC type BS_TYPE_BYTE size 1
0B40: raknet bit_stream 5@ write 4@ type BS_TYPE_ARRAY size 0x44
0B42: raknet send bit_stream 5@ priority PRIORITY_HIGH reliability UNRELIABLE_SEQUENCED ordering_channel 0
0B3E: raknet delete_bit_stream 5@
0AC9: free_allocated_memory 4@
0ab2: 0

ну что,не робит

Избранный · 6 Июн 2013

Можно ли число из переменной в диалоге выводить? ну тут кароч, например во второй графе "message box example"
0B3B: samp show_dialog id 1 caption "Example" text "Message box example." button_1 "Ok" button_2 "" style 0

itsLegend · 6 Июн 2013

Избранный написал(а):
Можно ли число из переменной в диалоге выводить? ну тут кароч, например во второй графе "message box example"
0B3B: samp show_dialog id 1 caption "Example" text "Message box example." button_1 "Ok" button_2 "" style 0

Наверно так:

Код:

0AC8: 0@ = allocate_memory_size 128
0AD3: string 0@ format "%d + %d = %d" 5 2 7
0B3B: samp show_dialog id 1 caption "Example" text 0@ button_1 "Ok" button_2 "" style 0
0AC9: free_allocated_memory 0@

Dark_Knight · 6 Июн 2013

fonarik написал(а):
ну что,не робит

Samp fun cs какой версии?

fonarik · 6 Июн 2013

Dark_Knight написал(а):
Samp fun cs какой версии?

2.4,раньше он хоть крашил меня,а сейчас вообще 0

itsLegend · 7 Июн 2013

fonarik написал(а):
ну что,не робит

Тогда так, первый вариант:

Код:

{$CLEO}
{$I /includes/RakNetDefines.txt}
 
0000:
 
if
    8AF7: get_samp_base_to 0@
then
    0A93: end_custom_thread
end
repeat
    wait 400
until 0AFA: is_samp_structures_available
 
:1
wait 0
if
    0AB0: 110
else_jump @1
wait 300
0AB1: @playersynccoord 3 1159.40 -1768.07 16.59
wait 300
jump @1
 
:playersynccoord
0B2B: samp 3@ = get_player_id_by_actor_handle $player_actor
0B24: samp 3@ = get_player_ptr 3@
3@ += 0x6D
0AC8: 4@ = allocate_memory_size 0x44
0C10: memcpy destination 4@ source 3@ size 0x44
0C0D: struct 4@ offset 0x6 size 4 = 0@
0C0D: struct 4@ offset 0xA size 4 = 1@
0C0D: struct 4@ offset 0xE size 4 = 2@
0B3D: raknet 5@ = new_bit_stream
0B40: raknet bit_stream 5@ write PACKET_PLAYER_SYNC type BS_TYPE_BYTE size 1
0B40: raknet bit_stream 5@ write 4@ type BS_TYPE_ARRAY size 0x44
0B42: raknet send bit_stream 5@ priority PRIORITY_HIGH reliability UNRELIABLE_SEQUENCED ordering_channel 0
0B3E: raknet delete_bit_stream 5@
0AC9: free_allocated_memory 4@
0AB2: 0

Второй вариант:

Код:

{$CLEO}
{$I /includes/RakNetDefines.txt}
 
0000:
 
if
    8AF7: get_samp_base_to 0@
then
    0A93: end_custom_thread
end
repeat
    wait 400
until 0AFA: is_samp_structures_available
 
while true
    wait 0
    if
        0AB0: 110
    then
        0AB1: @playersynccoord 3 1159.40 -1768.07 16.59
        wait 300
    end
end
 
:playersynccoord
0B2B: samp 3@ = get_player_id_by_actor_handle $player_actor
0B24: samp 3@ = get_player_ptr 3@
3@ += 0x6D
0AC8: 4@ = allocate_memory_size 0x44
0C10: memcpy destination 4@ source 3@ size 0x44
0C0D: struct 4@ offset 0x6 size 4 = 0@
0C0D: struct 4@ offset 0xA size 4 = 1@
0C0D: struct 4@ offset 0xE size 4 = 2@
0B3D: raknet 5@ = new_bit_stream
0B40: raknet bit_stream 5@ write PACKET_PLAYER_SYNC type BS_TYPE_BYTE size 1
0B40: raknet bit_stream 5@ write 4@ type BS_TYPE_ARRAY size 0x44
0B42: raknet send bit_stream 5@ priority PRIORITY_HIGH reliability UNRELIABLE_SEQUENCED ordering_channel 0
0B3E: raknet delete_bit_stream 5@
0AC9: free_allocated_memory 4@
0AB2: 0

Поиск

Поиск

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

spiceman

GOWNIK <3

Избранный

Новичок

itsLegend

Фонд борьбы за жуков 🐞

Избранный

Новичок

spiceman

GOWNIK <3

fonarik

Известный

itsLegend

Фонд борьбы за жуков 🐞

fonarik

Известный

Dark_Knight

Me, me and me.

fonarik

Известный

Избранный

Новичок

itsLegend

Фонд борьбы за жуков 🐞

Dark_Knight

Me, me and me.

fonarik

Известный

itsLegend

Фонд борьбы за жуков 🐞

Похожие темы