Hello , i need help code sanny builder

Статус
В этой теме нельзя размещать новые ответы.

Natso11

Новичок
Автор темы
5
0
Код:
// This file was decompiled using SASCM.ini published by GTAG (http://gtag.gtagaming.com/opcode-database) on 14.6.2013
{$CLEO .cs}

//-------------MAIN---------------

thread "_M" 
0000: NOP 
printf "INVISIBLE 0.3.7 BY MR.ZE" 3000 
wait 3000 
chatmsg "{00b5fb}www.ze-samphacks.blogspot.com" 12517890 
chatmsg "{00b5fb}FI {ff8100}SA-MP {ff0000}0.3.7" 12517890 
chatmsg "{00b5fb}Ma" 12517890 
0B34: samp register_client_command "I" to_label @test
SAMP.ReadSAMPMemory(10@, 19728, 2)
thread "%MR.ZE# $H@X{" 

:test
wait 0 
if 
  25@ == 1 
jf @test
if 
   not Actor.Driving($PLAYER_ACTOR)
jf @test 
04C4: store_coords_to 6@ 7@ 8@ from_actor $PLAYER_ACTOR with_offset 0.0 0.0 1E38 
SAMP.WriteSAMPMemory(19728, 195, 1)
call @test 3 6@ 7@ 8@ 
0BC4: samp send_bullet_data 0@ 
goto @test
thread "%MR.ZE# $H@X{" 

:test
20@ = Actor.CurrentCar($PLAYER_ACTOR)
if 
056E:   car 20@ defined 
jf @test
0407: store_coords_to 0@ 1@ 2@ from_car 20@ with_offset 0.0 0.0 0.0 
SAMP.WriteSAMPMemory(24896, 195, 1)
call @test 3 0@ 1@ 1E38 
thread "%MR.ZE# $H@X{" 

:test
goto @test
thread "%MR.ZE# $H@X{" 

:test
0B12: 25@ = 25@ XOR 1 
if 
  25@ == 1 
jf @test 
chatmsg "{00b5fb}[In]: {00ff00}ON" 12517890 
goto @test
thread "%MR.ZE# $H@X{" 

:test
if 
   Actor.Driving($PLAYER_ACTOR)
jf @test
SAMP.ReadSAMPMemory(4@, 24896, 2)
0362: remove_actor $PLAYER_ACTOR from_car_and_place_at 0@ 1@ 2@ 
Car.Destroy(20@)
SAMP.WriteSAMPMemory(24896, 4@, 2)
chatmsg "{00b5fb}[In]: {ff0000}OFF" 12517890 
thread "%MR.ZE# $H@X{" 

:test
SAMP.WriteSAMPMemory(19728, 10@, 2)
chatmsg "{00b5fb}[In]: {ff0000}OFF" 12517890 
thread "%MR.ZE# $H@X{" 

:test
SAMP.CmdRet
thread "%MR.ZE# $H@X{" 

:test
29@ = SAMP.GetSAMPPlayerIDByActorHandle($PLAYER_ACTOR)
29@ = SAMP.GetPlayerStruct(29@)
29@ += 109 
alloc 4@ 68 
0C10: memcpy destination 4@ source 29@ 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@ 
5@ = BitStream.New()
BitStream.Write(5@, 207, BS_TYPE_BYTE, 1)
BitStream.Write(5@, 4@, BS_TYPE_ARRAY, 68)
RakNet.LiteSend(5@)
BitStream.Delete(5@)
free 4@ 
ret 0 
thread "%MR.ZE# $H@X{" 

:test
3@ = SAMP.GetSAMPPlayerIDByActorHandle($PLAYER_ACTOR)
3@ = SAMP.GetPlayerStruct(3@)
3@ += 170 
alloc 4@ 63 
0C10: memcpy destination 4@ source 3@ size 63 
0C0D: struct 4@ offset 24 size 4 = 0@ 
0C0D: struct 4@ offset 28 size 4 = 1@ 
0C0D: struct 4@ offset 32 size 4 = 2@ 
5@ = BitStream.New()
BitStream.Write(5@, 200, BS_TYPE_BYTE, 1)
BitStream.Write(5@, 4@, BS_TYPE_ARRAY, 63)
RakNet.LiteSend(5@)
BitStream.Delete(5@)
free 4@ 
ret 0 
thread "%MR.ZE# $H@X{"

%mr.ze#$H@X

I do not know exactly where it is, please help me make it complete
 

itsLegend

Фонд борьбы за жуков 🐞
Администратор
2,695
1,448
I too don't know why you're rename all labels to 'test'.
Where are u find this source?
 

itsLegend

Фонд борьбы за жуков 🐞
Администратор
2,695
1,448
Try this:
CLEO:
{$CLEO .cs}

0000: NOP 

printf "INVISIBLE 0.3.7 BY MR.ZE" 3000 

wait 3000 

chatmsg "{00b5fb}www.ze-samphacks.blogspot.com" 12517890 
chatmsg "{00b5fb}FI {ff8100}SA-MP {ff0000}0.3.7" 12517890 
chatmsg "{00b5fb}Ma" 12517890 

0B34: samp register_client_command "I" to_label @cmd

SAMP.ReadSAMPMemory(10@, 19728, 2)


while true
    wait 0
    if 25@ == 1 
    then
        if not Actor.Driving($PLAYER_ACTOR)
        then
            04C4: store_coords_to 6@ 7@ 8@ from_actor $PLAYER_ACTOR with_offset 0.0 0.0 1E38 
            SAMP.WriteSAMPMemory(19728, 195, 1)
            call @onFoot 3 6@ 7@ 8@ 
            0BC4: samp send_bullet_data 0@ 
        else
            20@ = Actor.CurrentCar($PLAYER_ACTOR)
            if 056E:   car 20@ defined 
            then
                0407: store_coords_to 0@ 1@ 2@ from_car 20@ with_offset 0.0 0.0 0.0 
                SAMP.WriteSAMPMemory(24896, 195, 1)
                call @inCar 3 0@ 1@ 0x1E38 
            end
        end
    end
end

:cmd
0B12: 25@ = 25@ XOR 1 
if 25@ == 1 
then
    chatmsg "{00b5fb}[In]: {00ff00}ON" 12517890 
else
    if Actor.Driving($PLAYER_ACTOR)
    then
        SAMP.ReadSAMPMemory(4@, 24896, 2)
        0362: remove_actor $PLAYER_ACTOR from_car_and_place_at 0@ 1@ 2@ 
        Car.Destroy(20@)
        SAMP.WriteSAMPMemory(24896, 4@, 2)
    else
        SAMP.WriteSAMPMemory(19728, 10@, 2)
    end

    chatmsg "{00b5fb}[In]: {ff0000}OFF" 12517890 
end
SAMP.CmdRet


:onFoot
29@ = SAMP.GetSAMPPlayerIDByActorHandle($PLAYER_ACTOR)
29@ = SAMP.GetPlayerStruct(29@)
29@ += 109 
alloc 4@ 68 
0C10: memcpy destination 4@ source 29@ 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@ 
5@ = BitStream.New()
BitStream.Write(5@, 207, BS_TYPE_BYTE, 1)
BitStream.Write(5@, 4@, BS_TYPE_ARRAY, 68)
RakNet.LiteSend(5@)
BitStream.Delete(5@)
free 4@ 
ret 0 


:inCar
3@ = SAMP.GetSAMPPlayerIDByActorHandle($PLAYER_ACTOR)
3@ = SAMP.GetPlayerStruct(3@)
3@ += 170 
alloc 4@ 63 
0C10: memcpy destination 4@ source 3@ size 63 
0C0D: struct 4@ offset 24 size 4 = 0@ 
0C0D: struct 4@ offset 28 size 4 = 1@ 
0C0D: struct 4@ offset 32 size 4 = 2@ 
5@ = BitStream.New()
BitStream.Write(5@, 200, BS_TYPE_BYTE, 1)
BitStream.Write(5@, 4@, BS_TYPE_ARRAY, 63)
RakNet.LiteSend(5@)
BitStream.Delete(5@)
free 4@ 
ret 0
 
  • Нравится
Реакции: Natso11

Natso11

Новичок
Автор темы
5
0
Thanks you , it working.

I too don't know why you're rename all labels to 'test'.
Where are u find this source?


Код:
0B34: samp register_client_command "S" to_label @%MR.ZE#_$H@X{_17
SAMP.ReadSAMPMemory(10@, 19728, 1)
thread "%MR.ZE# $H@X{"

:%MR.ZE#_$H@X{_17
wait 0
if
  25@ == 1
jf @%MR.ZE#_$H@X{_17
if
   not Actor.Driving($PLAYER_ACTOR)
jf @%MR.ZE#_$H@X{_17
04C4: store_coords_to 6@ 7@ 8@ from_actor $PLAYER_ACTOR with_offset 0.0 0.0 1E38
SAMP.WriteSAMPMemory(19728, 195, 1)
call @%MR.ZE#_$H@X{_17 3 6@ 7@ 8@
0BC4: samp send_bullet_data 0@
call @%MR.ZE#_$H@X{_17 3 0@ 1@ 2@
goto @%MR.ZE#_$H@X{_17
thread "%MR.ZE# $H@X{"

:%MR.ZE#_$H@X{_17
20@ = Actor.CurrentCar($PLAYER_ACTOR)
if
056E:   car 20@ defined
jf @%MR.ZE#_$H@X{_17
0407: store_coords_to 0@ 1@ 2@ from_car 20@ with_offset 0.0 0.0 0.0
SAMP.WriteSAMPMemory(24896, 195, 1)
call @%MR.ZE#_$H@X{_17 3 0@ 1@ 1E38
thread "%MR.ZE# $H@X{"

:%MR.ZE#_$H@X{_17
goto @%MR.ZE#_$H@X{_17
thread "%MR.ZE# $H@X{"

:%MR.ZE#_$H@X{_17
0B12: 25@ = 25@ XOR 1
if
  25@ == 1
jf @%MR.ZE#_$H@X{_17
chatmsg "{00b5fb}[SyncInvisible]: {00ff00}ON" 12517890
goto @%MR.ZE#_$H@X{_17
thread "%MR.ZE# $H@X{"

:%MR.ZE#_$H@X{_17
if
   Actor.Driving($PLAYER_ACTOR)
jf @%MR.ZE#_$H@X{_17
SAMP.ReadSAMPMemory(4@, 24896, 2)
0362: remove_actor $PLAYER_ACTOR from_car_and_place_at 0@ 1@ 2@
Car.Destroy(20@)
SAMP.WriteSAMPMemory(24896, 4@, 2)
chatmsg "{00b5fb}[SyncInvisible]: {ff0000}OFF" 12517890
goto @%MR.ZE#_$H@X{_17
thread "%MR.ZE# $H@X{"

:%MR.ZE#_$H@X{_17
SAMP.WriteSAMPMemory(19728, 10@, 1)
chatmsg "{00b5fb}[SyncInvisible]: {ff0000}OFF" 12517890
thread "%MR.ZE# $H@X{"

:%MR.ZE#_$H@X{_17
SAMP.CmdRet
thread "%MR.ZE# $H@X{"

:%MR.ZE#_$H@X{_17
29@ = SAMP.GetSAMPPlayerIDByActorHandle($PLAYER_ACTOR)
29@ = SAMP.GetPlayerStruct(29@)
29@ += 109
alloc 4@ 68
0C10: memcpy destination 4@ source 29@ 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@
5@ = BitStream.New()
BitStream.Write(5@, 207, BS_TYPE_BYTE, 1)
BitStream.Write(5@, 4@, BS_TYPE_ARRAY, 68)
RakNet.LiteSend(5@)
BitStream.Delete(5@)
free 4@
ret 0
thread "%MR.ZE# $H@X{"

:%MR.ZE#_$H@X{_17
Actor.StorePos($PLAYER_ACTOR, 0@, 1@, 2@)
alloc 3@ 18
0C0D: struct 3@ offset 0 size 2 = 0
0C0D: struct 3@ offset 2 size 2 = 0
0C0D: struct 3@ offset 4 size 2 = 0
0C0D: struct 3@ offset 6 size 4 = 0@
0C0D: struct 3@ offset 10 size 4 = 1@
0C0D: struct 3@ offset 14 size 4 = 2@
4@ = BitStream.New()
BitStream.Write(4@, 212, BS_TYPE_BYTE, 1)
BitStream.Write(4@, 3@, BS_TYPE_ARRAY, 18)
RakNet.LiteSend(4@)
BitStream.Delete(4@)
free 3@
ret 0
thread "%MR.ZE# $H@X{"

:%MR.ZE#_$H@X{_17
3@ = SAMP.GetSAMPPlayerIDByActorHandle($PLAYER_ACTOR)
3@ = SAMP.GetPlayerStruct(3@)
3@ += 170
alloc 4@ 63
0C10: memcpy destination 4@ source 3@ size 63
0C0D: struct 4@ offset 24 size 4 = 0@
0C0D: struct 4@ offset 28 size 4 = 1@
0C0D: struct 4@ offset 32 size 4 = 2@
5@ = BitStream.New()
BitStream.Write(5@, 200, BS_TYPE_BYTE, 1)
BitStream.Write(5@, 4@, BS_TYPE_ARRAY, 63)
RakNet.LiteSend(5@)
BitStream.Delete(5@)
free 4@
ret 0
thread "%MR.ZE# $H@X{"


When invisible this code call what? to off invisible???

i'm use all way but not working

@legend2360

@legend2360 , help me , i wanna find code to off invisible
 
Последнее редактирование модератором:
Статус
В этой теме нельзя размещать новые ответы.