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

itsLegend

Фонд борьбы за жуков 🐞
Администратор
2,696
1,469
Я сегодня жестко туплю.
Предыдущие 2 функи - чекает весь пул каров и cped'ов. Я думал они нужны тебе :)
А со смещением в cped не обращай внимания, причина указана выше, на первой строке
 

SR_team

like pancake
BH Team
4,815
6,514
Я сегодня жестко туплю.
Предыдущие 2 функи - чекает весь пул каров и cped'ов. Я думал они нужны тебе :)
А со смещением в cped не обращай внимания, причина указана выше, на первой строке

Спасибо тебе большое! Теперь коллизия работает идеально! Скоро залью, про тебя не забуду :)
 

gcode

нестандартное звание звание звание звание звани...
Друг
789
357
strstr кстати может отказываться работать без причины (связываю это с 8ой виндой у себя) из-за этого могут не работать большинство ACheckerов и написать свой будет проблематично.
 

hnnssy

Известный
Друг
2,684
2,769
strstr кстати может отказываться работать без причины (связываю это с 8ой виндой у себя) из-за этого могут не работать большинство ACheckerов и написать свой будет проблематично.

У меня стоит 8.1, работает прекрасно всё.
 

legioner1234

Новичок
32
0
Народ какой опкод нужен для перевода на версию 0.3z, вы скажите что заменить, а я буду пытатся.
Новичок очень охота узнать хотя бы как перевести.
Код:
// This file was decompiled using SASCM.ini published by GTAG (http://gtag.gtagaming.com/opcode-database) on 14.6.2013
{$CLEO .cs}
 
//-------------MAIN---------------
0000: NOP
if
0@ = SAMP.Base()
else_jump @NONAME_46
 
:NONAME_18
not SAMP.Available
else_jump @NONAME_39
wait 500
jump @NONAME_18
 
:NONAME_39
jump @NONAME_48
 
:NONAME_46
end_thread
 
:NONAME_48
0@ = 0
 
:NONAME_55
wait 0
if
0@ == 0
else_jump @NONAME_202
if
key_down 74
else_jump @NONAME_195
0@ = 1
0AF8: samp add_message_to_chat "[FASTBOT] БОТ ВКЛЮЧЕН, ЧТОБЫ ВЫКЛЮЧИТЬ ЗАЖМИТЕ КЛАВИШУ \"5\"." color 6736947
print "~Y~CLEO ~G~ACTIVATED" 1500
 
:NONAME_195
jump @NONAME_348
 
:NONAME_202
Actor.StorePos($PLAYER_ACTOR, 1@, 2@, 3@)
call @NONAME_355 3 2230.781 -2285.63 14.3751
call @NONAME_355 3 1@ 2@ 3@
wait 1
wait 1
key_down 53
else_jump @NONAME_202
0AF8: samp add_message_to_chat "[FASTBOT] БОТ ОТКЛЮЧЕН." color 13382400
print "~Y~CLEO ~R~DEACTIVATED" 1500
0@ = 0
 
:NONAME_348
jump @NONAME_55
 
:NONAME_355
3@ = SAMP.GetSAMPPlayerIDByActorHandle($PLAYER_ACTOR)
3@ = SAMP.GetPlayerStruct(3@)
3@ += 109
alloc 4@ 68
call @NONAME_523 3 4@ 3@ 68
0085: 5@ = 4@ // (int)
5@ += 6
0A8C: write_memory 5@ size 4 value 0@ virtual_protect 0
5@ += 4
0A8C: write_memory 5@ size 4 value 1@ virtual_protect 0
5@ += 4
0A8C: write_memory 5@ size 4 value 2@ virtual_protect 0
5@ = RakNet.NewBitStream()
RakNet.Write(5@, 212, BS_TYPE_BYTE, 1)
RakNet.Write(5@, 4@, BS_TYPE_ARRAY, 68)
RakNet.Send(5@, 1, 1, 0)
RakNet.DeleteBitStream(5@)
free 4@
ret 0
 
:NONAME_523
2@ -= 1
3@ = 0
 
:NONAME_537
0A8D: 4@ = read_memory 1@ size 1 virtual_protect 0
0A8C: write_memory 0@ size 1 value 4@ virtual_protect 0
1@ += 1
0@ += 1
3@ += 1
001D: 3@ > 2@ // (int)
else_jump @NONAME_537
ret 0
Я так понимаю надо это заменить на 0.3z
Код:
:NONAME_355
3@ = SAMP.GetSAMPPlayerIDByActorHandle($PLAYER_ACTOR)
3@ = SAMP.GetPlayerStruct(3@)
3@ += 109
alloc 4@ 68
call @NONAME_523 3 4@ 3@ 68
0085: 5@ = 4@ // (int)
5@ += 6
0A8C: write_memory 5@ size 4 value 0@ virtual_protect 0
5@ += 4
0A8C: write_memory 5@ size 4 value 1@ virtual_protect 0
5@ += 4
0A8C: write_memory 5@ size 4 value 2@ virtual_protect 0
5@ = RakNet.NewBitStream()
RakNet.Write(5@, 212, BS_TYPE_BYTE, 1)
RakNet.Write(5@, 4@, BS_TYPE_ARRAY, 68)
RakNet.Send(5@, 1, 1, 0)
RakNet.DeleteBitStream(5@)
free 4@
ret 0
 

Dark_Knight

Me, me and me.
Друг
4,083
2,110
Все правильно понял. Это структура. Чего именно я хз сам в этом нубло.
 

SR_team

like pancake
BH Team
4,815
6,514
Народ какой опкод нужен для перевода на версию 0.3z, вы скажите что заменить, а я буду пытатся.
Новичок очень охота узнать хотя бы как перевести.
Код:
// This file was decompiled using SASCM.ini published by GTAG (http://gtag.gtagaming.com/opcode-database) on 14.6.2013
{$CLEO .cs}
 
//-------------MAIN---------------
0000: NOP
if
0@ = SAMP.Base()
else_jump @NONAME_46
 
:NONAME_18
not SAMP.Available
else_jump @NONAME_39
wait 500
jump @NONAME_18
 
:NONAME_39
jump @NONAME_48
 
:NONAME_46
end_thread
 
:NONAME_48
0@ = 0
 
:NONAME_55
wait 0
if
0@ == 0
else_jump @NONAME_202
if
key_down 74
else_jump @NONAME_195
0@ = 1
0AF8: samp add_message_to_chat "[FASTBOT] БОТ ВКЛЮЧЕН, ЧТОБЫ ВЫКЛЮЧИТЬ ЗАЖМИТЕ КЛАВИШУ \"5\"." color 6736947
print "~Y~CLEO ~G~ACTIVATED" 1500
 
:NONAME_195
jump @NONAME_348
 
:NONAME_202
Actor.StorePos($PLAYER_ACTOR, 1@, 2@, 3@)
call @NONAME_355 3 2230.781 -2285.63 14.3751
call @NONAME_355 3 1@ 2@ 3@
wait 1
wait 1
key_down 53
else_jump @NONAME_202
0AF8: samp add_message_to_chat "[FASTBOT] БОТ ОТКЛЮЧЕН." color 13382400
print "~Y~CLEO ~R~DEACTIVATED" 1500
0@ = 0
 
:NONAME_348
jump @NONAME_55
 
:NONAME_355
3@ = SAMP.GetSAMPPlayerIDByActorHandle($PLAYER_ACTOR)
3@ = SAMP.GetPlayerStruct(3@)
3@ += 109
alloc 4@ 68
call @NONAME_523 3 4@ 3@ 68
0085: 5@ = 4@ // (int)
5@ += 6
0A8C: write_memory 5@ size 4 value 0@ virtual_protect 0
5@ += 4
0A8C: write_memory 5@ size 4 value 1@ virtual_protect 0
5@ += 4
0A8C: write_memory 5@ size 4 value 2@ virtual_protect 0
5@ = RakNet.NewBitStream()
RakNet.Write(5@, 212, BS_TYPE_BYTE, 1)
RakNet.Write(5@, 4@, BS_TYPE_ARRAY, 68)
RakNet.Send(5@, 1, 1, 0)
RakNet.DeleteBitStream(5@)
free 4@
ret 0
 
:NONAME_523
2@ -= 1
3@ = 0
 
:NONAME_537
0A8D: 4@ = read_memory 1@ size 1 virtual_protect 0
0A8C: write_memory 0@ size 1 value 4@ virtual_protect 0
1@ += 1
0@ += 1
3@ += 1
001D: 3@ > 2@ // (int)
else_jump @NONAME_537
ret 0
Я так понимаю надо это заменить на 0.3z
Код:
:NONAME_355
3@ = SAMP.GetSAMPPlayerIDByActorHandle($PLAYER_ACTOR)
3@ = SAMP.GetPlayerStruct(3@)
3@ += 109
alloc 4@ 68
call @NONAME_523 3 4@ 3@ 68
0085: 5@ = 4@ // (int)
5@ += 6
0A8C: write_memory 5@ size 4 value 0@ virtual_protect 0
5@ += 4
0A8C: write_memory 5@ size 4 value 1@ virtual_protect 0
5@ += 4
0A8C: write_memory 5@ size 4 value 2@ virtual_protect 0
5@ = RakNet.NewBitStream()
RakNet.Write(5@, 212, BS_TYPE_BYTE, 1)
RakNet.Write(5@, 4@, BS_TYPE_ARRAY, 68)
RakNet.Send(5@, 1, 1, 0)
RakNet.DeleteBitStream(5@)
free 4@
ret 0


PHP:
3@ = SAMP.GetSAMPPlayerIDByActorHandle($PLAYER_ACTOR)
3@ = SAMP.GetPlayerStruct(3@)
3@ += 55 
0AC8: 4@ = allocate_memory_size 68
0C10: memcpy destination 4@ source 3@ size 68
0C0D: struct 4@ offset 6 size 4 = 0@
0C0D: struct 4@ offset 10 size 4 = 1@
0C0D: struct 4@ offset 14 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_STRING size 68
0B42: raknet send bit_stream 5@ priority 1 reliability 7 ordering_channel 0
0B3E: raknet delete_bit_stream 5@
0AC9: free_allocated_memory 4@
 

legioner1234

Новичок
32
0
Теперь пишет что ожидалось 4 параметра
Код:
// This file was decompiled using SASCM.ini published by GTAG (http://gtag.gtagaming.com/opcode-database) on 14.6.2013
{$CLEO .cs}
 
//-------------MAIN---------------
0000: NOP
if
0@ = SAMP.Base()
else_jump @NONAME_46
 
:NONAME_18
  not SAMP.Available
else_jump @NONAME_39
wait 500
jump @NONAME_18
 
:NONAME_39
jump @NONAME_48
 
:NONAME_46
end_thread
 
:NONAME_48
0@ = 0
 
:NONAME_55
wait 0
if
  0@ == 0
else_jump @NONAME_202
if
key_down 74
else_jump @NONAME_195
0@ = 1
0AF8: samp add_message_to_chat "[FASTBOT] БОТ ВКЛЮЧЕН, ЧТОБЫ ВЫКЛЮЧИТЬ ЗАЖМИТЕ КЛАВИШУ \"5\"." color 6736947 
print "~Y~CLEO ~G~ACTIVATED" 1500
 
:NONAME_195
jump @NONAME_348
 
:NONAME_202
Actor.StorePos($PLAYER_ACTOR, 1@, 2@, 3@)
call @NONAME_355 3 2230.781 -2285.63 14.3751
call @NONAME_355 3 1@ 2@ 3@
wait 1
wait 1
key_down 53
else_jump @NONAME_202
0AF8: samp add_message_to_chat "[FASTBOT] БОТ ОТКЛЮЧЕН." color 13382400 
print "~Y~CLEO ~R~DEACTIVATED" 1500
0@ = 0
 
:NONAME_348
jump @NONAME_55
 
:NONAME_355
3@ = SAMP.GetSAMPPlayerIDByActorHandle($PLAYER_ACTOR)
3@ = SAMP.GetPlayerStruct(3@)
3@ += 55
0AC8: 4@ = allocate_memory_size 68
0C10: memcpy destination 4@ source 3@ size 68
0C0D: struct 4@ offset 6 size 4 = 0@
0C0D: struct 4@ offset 10 size 4 = 1@
0C0D: struct 4@ offset 14 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_STRING size 68
0B42: raknet send bit_stream 5@ priority 1 reliability 7 ordering_channel 0
0B3E: raknet delete_bit_stream 5@
0AC9: free_allocated_memory 4@
ret 0
 
:NONAME_523
2@ -= 1
3@ = 0
 
:NONAME_537
0A8D: 4@ = read_memory 1@ size 1 virtual_protect 0
0A8C: write_memory 0@ size 1 value 4@ virtual_protect 0
1@ += 1
0@ += 1
3@ += 1
001D:  3@ > 2@ // (int)
else_jump @NONAME_537
ret 0
 

SR_team

like pancake
BH Team
4,815
6,514
Теперь пишет что ожидалось 4 параметра
Код:
// This file was decompiled using SASCM.ini published by GTAG (http://gtag.gtagaming.com/opcode-database) on 14.6.2013
{$CLEO .cs}
 
//-------------MAIN---------------
0000: NOP
if
0@ = SAMP.Base()
else_jump @NONAME_46
 
:NONAME_18
  not SAMP.Available
else_jump @NONAME_39
wait 500
jump @NONAME_18
 
:NONAME_39
jump @NONAME_48
 
:NONAME_46
end_thread
 
:NONAME_48
0@ = 0
 
:NONAME_55
wait 0
if
  0@ == 0
else_jump @NONAME_202
if
key_down 74
else_jump @NONAME_195
0@ = 1
0AF8: samp add_message_to_chat "[FASTBOT] БОТ ВКЛЮЧЕН, ЧТОБЫ ВЫКЛЮЧИТЬ ЗАЖМИТЕ КЛАВИШУ \"5\"." color 6736947
print "~Y~CLEO ~G~ACTIVATED" 1500
 
:NONAME_195
jump @NONAME_348
 
:NONAME_202
Actor.StorePos($PLAYER_ACTOR, 1@, 2@, 3@)
call @NONAME_355 3 2230.781 -2285.63 14.3751
call @NONAME_355 3 1@ 2@ 3@
wait 1
wait 1
key_down 53
else_jump @NONAME_202
0AF8: samp add_message_to_chat "[FASTBOT] БОТ ОТКЛЮЧЕН." color 13382400
print "~Y~CLEO ~R~DEACTIVATED" 1500
0@ = 0
 
:NONAME_348
jump @NONAME_55
 
:NONAME_355
3@ = SAMP.GetSAMPPlayerIDByActorHandle($PLAYER_ACTOR)
3@ = SAMP.GetPlayerStruct(3@)
3@ += 55
0AC8: 4@ = allocate_memory_size 68
0C10: memcpy destination 4@ source 3@ size 68
0C0D: struct 4@ offset 6 size 4 = 0@
0C0D: struct 4@ offset 10 size 4 = 1@
0C0D: struct 4@ offset 14 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_STRING size 68
0B42: raknet send bit_stream 5@ priority 1 reliability 7 ordering_channel 0
0B3E: raknet delete_bit_stream 5@
0AC9: free_allocated_memory 4@
ret 0
 
:NONAME_523
2@ -= 1
3@ = 0
 
:NONAME_537
0A8D: 4@ = read_memory 1@ size 1 virtual_protect 0
0A8C: write_memory 0@ size 1 value 4@ virtual_protect 0
1@ += 1
0@ += 1
3@ += 1
001D:  3@ > 2@ // (int)
else_jump @NONAME_537
ret 0

подключи инклуиды от SF или замени их на номера
 

Dark_Knight

Me, me and me.
Друг
4,083
2,110
Код:
if
0@ = SAMP.Base()
else_jump @NONAME_46
Замени на
Код:
if
not 0@ = SAMP.Base()
else_jump @NONAME_46