CLEO Help TELEPORT

CLEO related
Status
Not open for further replies.

Dzey

Active member
Joined
Feb 1, 2018
Messages
30
Reaction score
1
How to make then press y it will pick checkpoint and wait 4sec and teleport at last position.

Code:
{$CLEO}

thread "fak"

:ct
wait 0
if
    0AB0: 89
then    
if     
    call @is_cp_active 0
then
    call @get_cp_pos 0 1@ 2@ 3@
    if
        044B: $PLAYER_ACTOR
    then
        call @SendOnFootDataSync 3 1@ 2@ 3@
        wait 4000
    else        
        call @SendInCarDataSync 3 1@ 2@ 3@
        wait 4000
    end    
end
end
jump @ct
    

:is_cp_active
0AA2: 0@ = loadlib "samp.dll"
0A8E: 1@ = 0@ + 0x21A10C
0A8D: 1@ = readMem 1@ sz 4 vp 0
1@ += 0x24
0A8D: 1@ = readMem 1@ sz 4 vp 0
IF 1@ == TRUE
THEN 0485:  return_true
ELSE 059A:  return_false
END
0AA3: freelib 0@
0AB2: ret 0

:get_cp_pos
0AA2: 0@ = loadlib "samp.dll"
0A8E: 1@ = 0@ + 0x21A10C
0A8D: 1@ = readMem 1@ sz 4 vp 0
1@ += 0xC
0A8D: 2@ = readMem 1@ sz 4 vp 0
1@ += 0x4
0A8D: 3@ = readMem 1@ sz 4 vp 0
1@ += 0x4
0A8D: 4@ = readMem 1@ sz 4 vp 0
0AA3: freelib 0@
0AB2: ret 3 2@ 3@ 4@

:SendOnFootDataSync
0B2B: 3@ = $PLAYER_ACTOR
0BBA: 3@ 4@
alloc 4@ 68
0C0D: 4@ 6 4 = 0@
0C0D: 4@ 10 4 = 1@
0C0D: 4@ 14 4 = 2@
0BC0: 4@
free 4@
ret 0 

:SendInCarDataSync                 
3@ = SAMP.GetSAMPPlayerIDByActorHandle($PLAYER_ACTOR) 
3@ = SAMP.GetPlayerStruct(3@) 
3@ += 170
0AC8: 4@ = allocate_memory_size 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@ 
0B3D: raknet 5@ = new_bit_stream 
RakNet.Write(5@, 200, BS_TYPE_BYTE, 1) 
RakNet.Write(5@, 4@, BS_TYPE_ARRAY, 63) 
0B8B: raknet send bit_stream 5@                 
0B3E: raknet delete_bit_stream 5@ 
0AC9: 4@ 
0AB2: ret 0[code/]
 

Opcode.eXe

Expert
Joined
Feb 18, 2013
Messages
1,486
Reaction score
226
Location
( ͡° ͜ʖ ͡°)
Should work. But i didnt test it. So it probably doesnt work huh,

Code:
{$CLEO .cs}
0000:
// RPCs
const
RPC_CLICKPLAYER = 23
RPC_CLIENTJOIN = 25
RPC_ENTERVEHICLE = 26
RPC_ENTEREDITOBJECT = 27
RPC_SCRIPTCASH = 31
RPC_SERVERCOMMAND = 50
RPC_SPAWN = 52
RPC_DEATH = 53
RPC_NPCJOIN = 54
RPC_DIALOGRESPONSE = 62
RPC_CLICKTEXTDRAW = 83
RPC_SCMEVENT = 96
RPC_WEAPONPICKUPDESTROY = 97
RPC_CHAT = 101
RPC_SRVNETSTATS = 102
RPC_CLIENTCHECK = 103
RPC_DAMAGEVEHICLE = 106
RPC_GIVETAKEDAMAGE = 115
RPC_EDITATTACHEDOBJECT = 116
RPC_EDITOBJECT = 117
RPC_SETINTERIORID = 118
RPC_MAPMARKER = 119
RPC_REQUESTCLASS = 128
RPC_REQUESTSPAWN = 129
RPC_PICKEDUPPICKUP = 131
RPC_MENUSELECT = 132
RPC_VEHICLEDESTROYED = 136
RPC_MENUQUIT = 140
RPC_EXITVEHICLE = 154
RPC_UPDATESCORESPINGSIPS = 155
end

// Scripting/Server RPCs
const
RPC_SCRSETPLAYERNAME = 11
RPC_SCRSETPLAYERPOS = 12
RPC_SCRSETPLAYERPOSFINDZ = 13
RPC_SCRSETPLAYERHEALTH = 14
RPC_SCRTOGGLEPLAYERCONTROLLABLE = 15
RPC_SCRPLAYSOUND = 16
RPC_SCRSETPLAYERWORLDBOUNDS = 17
RPC_SCRGIVEPLAYERMONEY = 18
RPC_SCRSETPLAYERFACINGANGLE = 19
RPC_SCRRESETPLAYERMONEY = 20
RPC_SCRRESETPLAYERWEAPONS = 21
RPC_SCRGIVEPLAYERWEAPON = 22
RPC_SCRSETVEHICLEPARAMSEX = 24
RPC_SCRCANCELEDIT = 28
RPC_SCRSETPLAYERTIME = 29
RPC_SCRTOGGLECLOCK = 30
RPC_SCRWORLDPLAYERADD = 32
RPC_SCRSETPLAYERSHOPNAME = 33
RPC_SCRSETPLAYERSKILLLEVEL = 34
RPC_SCRSETPLAYERDRUNKLEVEL = 35
RPC_SCRCREATE3DTEXTLABEL = 36
RPC_SCRDISABLECHECKPOINT = 37
RPC_SCRSETRACECHECKPOINT = 38
RPC_SCRDISABLERACECHECKPOINT = 39
RPC_SCRGAMEMODERESTART = 40
RPC_SCRPLAYAUDIOSTREAM = 41
RPC_SCRSTOPAUDIOSTREAM = 42
RPC_SCRREMOVEBUILDINGFORPLAYER = 43
RPC_SCRCREATEOBJECT = 44
RPC_SCRSETOBJECTPOS = 45
RPC_SCRSETOBJECTROT = 46
RPC_SCRDESTROYOBJECT = 47
RPC_SCRDEATHMESSAGE = 55
RPC_SCRSETPLAYERMAPICON = 56
RPC_SCRREMOVEVEHICLECOMPONENT = 57
RPC_SCRUPDATE3DTEXTLABEL = 58
RPC_SCRCHATBUBBLE = 59
RPC_SCRSOMEUPDATE = 60
RPC_SCRSHOWDIALOG = 61
RPC_SCRDESTROYPICKUP = 63
RPC_SCRLINKVEHICLETOINTERIOR = 65
RPC_SCRSETPLAYERARMOUR = 66
RPC_SCRSETPLAYERARMEDWEAPON = 67
RPC_SCRSETSPAWNINFO = 68
RPC_SCRSETPLAYERTEAM = 69
RPC_SCRPUTPLAYERINVEHICLE = 70
RPC_SCRREMOVEPLAYERFROMVEHICLE = 71
RPC_SCRSETPLAYERCOLOR = 72
RPC_SCRDISPLAYGAMETEXT = 73
RPC_SCRFORCECLASSSELECTION = 74
RPC_SCRATTACHOBJECTTOPLAYER = 75
RPC_SCRINITMENU = 76
RPC_SCRSHOWMENU = 77
RPC_SCRHIDEMENU = 78
RPC_SCRCREATEEXPLOSION = 79
RPC_SCRSHOWPLAYERNAMETAGFORPLAYER = 80
RPC_SCRATTACHCAMERATOOBJECT = 81
RPC_SCRINTERPOLATECAMERA = 82
RPC_SCRSETOBJECTMATERIAL = 84
RPC_SCRGANGZONESTOPFLASH = 85
RPC_SCRAPPLYANIMATION = 86
RPC_SCRCLEARANIMATIONS = 87
RPC_SCRSETPLAYERSPECIALACTION = 88
RPC_SCRSETPLAYERFIGHTINGSTYLE = 89
RPC_SCRSETPLAYERVELOCITY = 90
RPC_SCRSETVEHICLEVELOCITY = 91
RPC_SCRCLIENTMESSAGE = 93
RPC_SCRSETWORLDTIME = 94
RPC_SCRCREATEPICKUP = 95
RPC_SCRMOVEOBJECT = 99
RPC_SCRENABLESTUNTBONUSFORPLAYER = 104
RPC_SCRTEXTDRAWSETSTRING = 105
RPC_SCRSETCHECKPOINT = 107
RPC_SCRGANGZONECREATE = 108
RPC_SCRPLAYCRIMEREPORT = 112
RPC_SCRSETPLAYERATTACHEDOBJECT = 113
RPC_SCRGANGZONEDESTROY = 120
RPC_SCRGANGZONEFLASH = 121
RPC_SCRSTOPOBJECT = 122
RPC_SCRSETNUMBERPLATE = 123
RPC_SCRTOGGLEPLAYERSPECTATING = 124
RPC_SCRPLAYERSPECTATEPLAYER = 126
RPC_SCRPLAYERSPECTATEVEHICLE = 127
RPC_SCRSETPLAYERWANTEDLEVEL = 133
RPC_SCRSHOWTEXTDRAW = 134
RPC_SCRTEXTDRAWHIDEFORPLAYER = 135
RPC_SCRSERVERJOIN = 137
RPC_SCRSERVERQUIT = 138
RPC_SCRINITGAME = 139
RPC_SCRREMOVEPLAYERMAPICON = 144
RPC_SCRSETPLAYERAMMO = 145
RPC_SCRSETGRAVITY = 146
RPC_SCRSETVEHICLEHEALTH = 147
RPC_SCRATTACHTRAILERTOVEHICLE = 148
RPC_SCRDETACHTRAILERFROMVEHICLE = 149
RPC_SCRSETWEATHER = 152
RPC_SCRSETPLAYERSKIN = 153
RPC_SCRSETPLAYERINTERIOR = 156
RPC_SCRSETPLAYERCAMERAPOS = 157
RPC_SCRSETPLAYERCAMERALOOKAT = 158
RPC_SCRSETVEHICLEPOS = 159
RPC_SCRSETVEHICLEZANGLE = 160
RPC_SCRSETVEHICLEPARAMSFORPLAYER = 161
RPC_SCRSETCAMERABEHINDPLAYER = 162
RPC_SCRWORLDPLAYERREMOVE = 163
RPC_SCRWORLDVEHICLEADD = 164
RPC_SCRWORLDVEHICLEREMOVE = 165
RPC_SCRWORLDPLAYERDEATH = 166
end

// Packets
const
PACKET_INTERNAL_PING = 6
PACKET_PING = 7
PACKET_PING_OPEN_CONNECTIONS = 8
PACKET_CONNECTED_PONG = 9
PACKET_REQUEST_STATIC_DATA = 10
PACKET_CONNECTION_REQUEST = 11
PACKET_AUTH_KEY = 12
PACKET_BROADCAST_PINGS = 14
PACKET_SECURED_CONNECTION_RESPONSE = 15
PACKET_SECURED_CONNECTION_CONFIRMATION = 16
PACKET_RPC_MAPPING = 17
PACKET_SET_RANDOM_NUMBER_SEED = 19
PACKET_RPC = 20
PACKET_RPC_REPLY = 21
PACKET_DETECT_LOST_CONNECTIONS = 23
PACKET_OPEN_CONNECTION_REQUEST = 24
PACKET_OPEN_CONNECTION_REPLY = 25
PACKET_CONNECTION_COOKIE = 26
PACKET_RSA_PUBLIC_KEY_MISMATCH = 28
PACKET_CONNECTION_ATTEMPT_FAILED = 29
PACKET_NEW_INCOMING_CONNECTION = 30
PACKET_NO_FREE_INCOMING_CONNECTIONS = 31
PACKET_DISCONNECTION_NOTIFICATION = 32
PACKET_CONNECTION_LOST = 33
PACKET_CONNECTION_REQUEST_ACCEPTED = 34
PACKET_INITIALIZE_ENCRYPTION = 35
PACKET_CONNECTION_BANNED = 36
PACKET_INVALID_PASSWORD = 37
PACKET_MODIFIED_PACKET = 38
PACKET_PONG = 39
PACKET_TIMESTAMP = 40
PACKET_RECEIVED_STATIC_DATA = 41
PACKET_REMOTE_DISCONNECTION_NOTIFICATION = 42
PACKET_REMOTE_CONNECTION_LOST = 43
PACKET_REMOTE_NEW_INCOMING_CONNECTION = 44
PACKET_REMOTE_EXISTING_CONNECTION = 45
PACKET_REMOTE_STATIC_DATA = 46
PACKET_ADVERTISE_SYSTEM = 56

PACKET_VEHICLE_SYNC = 200
PACKET_RCON_COMMAND = 201
PACKET_RCON_RESPONCE = 202
PACKET_AIM_SYNC = 203
PACKET_WEAPONS_UPDATE = 204
PACKET_STATS_UPDATE = 205
PACKET_BULLET_SYNC = 206
PACKET_PLAYER_SYNC = 207
PACKET_MARKERS_SYNC = 208
PACKET_UNOCCUPIED_SYNC = 209
PACKET_TRAILER_SYNC = 210
PACKET_PASSENGER_SYNC = 211
PACKET_SPECTATOR_SYNC = 212
end

// Gamestates
const
GAMESTATE_NONE = 0
GAMESTATE_WAIT_CONNECT = 1
GAMESTATE_AWAIT_JOIN = 2
GAMESTATE_CONNECTED = 3
GAMESTATE_RESTARTING = 4
GAMESTATE_DISCONNECTED = 5
end

// BitStream
const
BS_TYPE_BYTE = 0
BS_TYPE_BOOL = 1
BS_TYPE_SHORT = 2
BS_TYPE_INT = 3
BS_TYPE_FLOAT = 4
BS_TYPE_ARRAY = 5
BS_TYPE_BITSTREAM = 6
end

// Priorities
const
SYSTEM_PRIORITY = 0
HIGH_PRIORITY = 1
MEDIUM_PRIORITY = 2
LOW_PRIORITY = 3
end

// Reliability
const
UNRELIABLE = 6
UNRELIABLE_SEQUENCED = 7
RELIABLE = 8
RELIABLE_ORDERED = 9
RELIABLE_SEQUENCED = 10
end

// Sendrates
const
ONFOOTSENDRATE = 1
INCARSENDRATE = 2
AIMSENDRATE = 3
end

// SAMP Limits
const
MAX_PLAYERS = 1004
MAX_VEHICLES = 2000
MAX_PICKUPS = 4096
MAX_OBJECTS = 1000
MAX_GANGZONES = 1024
MAX_3DTEXTS = 2048
MAX_TEXTDRAWS = 2048
MAX_CLIENTCMDS = 144
MAX_MENUS = 128
end

// Text Styles
const
FCR_NONE = 0x0
FCR_BOLD = 0x1
FCR_ITALICS = 0x2
FCR_BORDER = 0x4
FCR_SHADOW = 0x8
FCR_UNDERLINE = 0x10
FCR_STRIKEOUT = 0x20
end

// SAMP SCM Events
const
SCMEVENT_PAINTJOB = 1
SCMEVENT_UPGRADE = 2
SCMEVENT_COLOR = 3
SCMEVENT_MODSHOPENTEREXIT = 4
end

// Special Actions
const
SPECIAL_ACTION_NONE = 0
SPECIAL_ACTION_DUCK = 1
SPECIAL_ACTION_USEJETPACK = 2
SPECIAL_ACTION_ENTER_VEHICLE = 3
SPECIAL_ACTION_EXIT_VEHICLE = 4
SPECIAL_ACTION_DANCE1 = 5
SPECIAL_ACTION_DANCE2 = 6
SPECIAL_ACTION_DANCE3 = 7
SPECIAL_ACTION_DANCE4 = 8
SPECIAL_ACTION_HANDSUP = 10
SPECIAL_ACTION_USECELLPHONE = 11
SPECIAL_ACTION_SITTING = 12
SPECIAL_ACTION_STOPUSECELLPHONE = 13
SPECIAL_ACTION_DRINK_BEER = 20
SPECIAL_ACTION_SMOKE_CIGGY = 21
SPECIAL_ACTION_DRINK_WINE = 22
SPECIAL_ACTION_DRINK_SPRUNK = 23
SPECIAL_ACTION_CUFFED = 24
SPECIAL_ACTION_CARRY = 25
SPECIAL_ACTION_URINATE = 68
end

// SAMP Dialog Styles
const
DIALOG_STYLE_MSGBOX = 0
DIALOG_STYLE_INPUT = 1
DIALOG_STYLE_LIST = 2
DIALOG_STYLE_PASSWORD = 3
DIALOG_STYLE_TABLIST = 4
DIALOG_STYLE_TABLIST_HEADERS = 5
end

// SAMP Cursor Modes
const
CMODE_DISABLED = 0
CMODE_LOCKKEYS_NOCURSOR = 1
CMODE_LOCKCAMANDCONTROL = 2
CMODE_LOCKCAM = 3
CMODE_LOCKCAM_NOCURSOR = 4
end

// RakNet Hook Parameters
const
PARAM_BITSTREAM = 0
PARAM_PACKETID = 1
PARAM_PRIORITY = 2
PARAM_RELIABILITY = 3
PARAM_ORDERINGCHANNEL = 4
PARAM_SHIFTTIMESTAMP = 5
end

// Primitive Types
const
D3DPT_POINTLIST = 1
D3DPT_LINELIST = 2
D3DPT_LINESTRIP = 3
D3DPT_TRIANGLELIST = 4
D3DPT_TRIANGLESTRIP = 5
D3DPT_TRIANGLEFAN = 6
end

REPEAT
    WAIT 0
UNTIL 0AFA:  SAMP_IS_READY
0BE2: setup_outcoming_packet_hook @Hooks
0@ = FALSE

WHILE TRUE
    WAIT 0
    IF
    0AB0: key_pressed 89
    THEN
        repeat
        wait 0
        until 8AB0: not key pressed 89
        IF
        0AB1: call @is_cp_active 0
        THEN
            call @get_cp_pos 0 1@ 2@ 3@
            33@ = 0
            0@ = TRUE
            REPEAT
                WAIT 0
                PRINTF "~r~CP:~w~ sync at %0.1f %0.1f %0.1f" 100 1@ 2@ 3@
            UNTIL 33@ > 4000
            0@ = FALSE
            
        END
    END
END



:Hooks
0BE5: raknet 31@ = get_hook_param PARAM_PACKETID
IF
0@ == TRUE
THEN
    IF
    31@ == PACKET_PLAYER_SYNC
    THEN
        0BE5: 30@ = get_hook_param PARAM_BITSTREAM
        0AC8: 29@ = allocate_memory_size 69
        0BE8: bit_stream 30@ read_array 29@ size 69
        // float fPosition[3]; + 6         
        0C0D: struct 29@ offset 6 size 4 = 1@   
        0C0D: struct 29@ offset 12 size 4 = 2@
        0C0D: struct 29@ offset 16 size 4 = 3@
        0BEA: raknet bit_stream 30@ reset_write_pointer
        0B40: raknet bit_stream 30@ write 29@ type BS_TYPE_ARRAY size 69         
        0AC9: free_allocated_memory 29@     
    END   
    IF
    31@ == PACKET_VEHICLE_SYNC
    THEN
        0BE5: 30@ = get_hook_param PARAM_BITSTREAM
        0AC8: 29@ = allocate_memory_size 64
        0BE8: bit_stream 30@ read_array 29@ size 64
        // float fPosition[3]; + 24         
        0C0D: struct 29@ offset 24 size 4 = 1@   
        0C0D: struct 29@ offset 28 size 4 = 2@
        0C0D: struct 29@ offset 32 size 4 = 3@
        0BEA: raknet bit_stream 30@ reset_write_pointer
        0B40: raknet bit_stream 30@ write 29@ type BS_TYPE_ARRAY size 64         
        0AC9: free_allocated_memory 29@     
    END
END
0BE0: hook_ret TRUE
 

Opcode.eXe

Expert
Joined
Feb 18, 2013
Messages
1,486
Reaction score
226
Location
( ͡° ͜ʖ ͡°)
Thats because the server has something against it. AntiCheat or something ( Fuck cleo .inc)

Code:
    GetPlayerPos( playerid, X, Y, Z );

    if( X >= 99999.0 || Y >= 99999.0 || Z >= 99999.0 || X <= -99999.0 || Y <= -99999.0 || Z <= -99999.0 ) {
          SendClientMessage( playerid, 0xa9c4e4ff, "Warning: Excessive X, Y, Z has been breached thus last location set." );


That means that the CLEO doesnt set the position correctly...
 

Parazitas

God
Joined
Jan 2, 2017
Messages
3,115
Solutions
5
Reaction score
879
Location
Lithuania
PHP:
{$CLEO .cs}

0000: NOP

wait 10000

while true
wait 0

if
0AB0: 89
then
    repeat
    wait 0
    until 8AB0: 89     
    if 
    call @is_cp_active 0
    then 
        if 
        00DF:   actor $PLAYER_ACTOR driving
        then     
            00A0: store_actor $PLAYER_ACTOR position_to 4@ 5@ 6@
            0AF3: write_float 4@ to_ini_file "cleo\CP.ini" section "Coords" key "X"
            0AF3: write_float 5@ to_ini_file "cleo\CP.ini" section "Coords" key "Y"
            0AF3: write_float 6@ to_ini_file "cleo\CP.ini" section "Coords" key "Z"
            call @get_cp_pos 0 1@ 2@ 3@
            00A1: put_actor $PLAYER_ACTOR at 1@ 2@ 3@
            wait 4000
            0AF2: 4@ = get_float_from_ini_file "cleo\CP.ini" section "Coords" key "X"
            0AF2: 5@ = get_float_from_ini_file "cleo\CP.ini" section "Coords" key "Y"
            0AF2: 6@ = get_float_from_ini_file "cleo\CP.ini" section "Coords" key "Z"
            00A1: put_actor $PLAYER_ACTOR at 4@ 5@ 6@
        end
    end    
end


end
    

:is_cp_active
0AA2: 0@ = loadlib "samp.dll"
0A8E: 1@ = 0@ + 0x21A10C
0A8D: 1@ = readMem 1@ sz 4 vp 0
1@ += 0x24
0A8D: 1@ = readMem 1@ sz 4 vp 0
IF 1@ == TRUE
THEN 0485:  return_true
ELSE 059A:  return_false
END
0AA3: freelib 0@
0AB2: ret 0

:get_cp_pos
0AA2: 0@ = loadlib "samp.dll"
0A8E: 1@ = 0@ + 0x21A10C
0A8D: 1@ = readMem 1@ sz 4 vp 0
1@ += 0xC
0A8D: 2@ = readMem 1@ sz 4 vp 0
1@ += 0x4
0A8D: 3@ = readMem 1@ sz 4 vp 0
1@ += 0x4
0A8D: 4@ = readMem 1@ sz 4 vp 0
0AA3: freelib 0@
0AB2: ret 3 2@ 3@ 4@
 
Status
Not open for further replies.
Top