CLEO Help [HELP!] How to add more locations?? [MUST SEE!]

[ChristianIvann0939]

Hey, i need help with this cleo script. I want to add more Location like ammunation, etc.

please give me tutorial.

// This file was decompiled using sascm.ini published by GTAG (http://gtag.gtagaming.com/opcode-database) on 14.6.2013

{$VERSION 3.1.1000}
{$CLEO .cs}

//-------------MAIN---------------
thread "OPCODEEXE_SERVERFUCK" 

:OPCODEEXE_SERVERFUCK_24
wait 0 
if 
0AB0:   key_pressed 121 
else_jump @OPCODEEXE_SERVERFUCK_24 
018C: play_sound 1139 at 0.0 0.0 0.0 
0ACD: show_text_highpriority "~R~STARTING NOW!" time 1500 
Actor.StorePos($PLAYER_ACTOR, 5@, 6@, 7@)
0362: remove_actor $PLAYER_ACTOR from_car_and_place_at 5@ 6@ 7@ 
25@ = Actor.Angle($PLAYER_ACTOR)
wait 2000 
018C: play_sound 1139 at 0.0 0.0 0.0 
0ACD: show_text_highpriority "LSPD IS GETTING FUCKED!" time 2500 
1@ = 1538.49 
2@ = -1675.53 
3@ = 13.55 
3@ += 100.0 
Camera.SetPosition(1@, 2@, 3@, 0.0, 0.0, 0.0)
3@ -= 100.0 
Camera.PointAt(1@, 2@, 3@, 2)
04E4: refresh_game_renderer_at 1@ 2@ 
Actor.PutAt($PLAYER_ACTOR, 1538.49, -1675.53, 13.55)
wait 2000 
018C: play_sound 1139 at 0.0 0.0 0.0 
gosub @OPCODEEXE_SERVERFUCK_1524 
0ACD: show_text_highpriority "BSN IS GETTING FUCKED!" time 2500 
1@ = 1205.87 
2@ = -957.2 
3@ = 55.6 
3@ += 100.0 
Camera.SetPosition(1@, 2@, 3@, 0.0, 0.0, 0.0)
3@ -= 100.0 
Camera.PointAt(1@, 2@, 3@, 2)
04E4: refresh_game_renderer_at 1@ 2@ 
Actor.PutAt($PLAYER_ACTOR, 1205.87, -957.2, 55.6)
wait 2159 
018C: play_sound 1139 at 0.0 0.0 0.0 
gosub @OPCODEEXE_SERVERFUCK_1524 
0ACD: show_text_highpriority "OAMT IS GETTING FUCKED!" time 2500 
1@ = 895.16 
2@ = -1256.59 
3@ = 49.76 
3@ += 100.0 
Camera.SetPosition(1@, 2@, 3@, 0.0, 0.0, 0.0)
3@ -= 100.0 
Camera.PointAt(1@, 2@, 3@, 2)
04E4: refresh_game_renderer_at 1@ 2@ 
Actor.PutAt($PLAYER_ACTOR, 895.16, -1256.59, 49.76)
wait 2159 
018C: play_sound 1139 at 0.0 0.0 0.0 
gosub @OPCODEEXE_SERVERFUCK_1524 
0ACD: show_text_highpriority "LSSPAWN IS GETTING FUCKED!" time 2500 
1@ = 1085.82 
2@ = -1809.23 
3@ = 16.6 
3@ += 100.0 
Camera.SetPosition(1@, 2@, 3@, 0.0, 0.0, 0.0)
3@ -= 100.0 
Camera.PointAt(1@, 2@, 3@, 2)
04E4: refresh_game_renderer_at 1@ 2@ 
Actor.PutAt($PLAYER_ACTOR, 1085.82, -1809.23, 16.6)
wait 2159 
018C: play_sound 1139 at 0.0 0.0 0.0 
gosub @OPCODEEXE_SERVERFUCK_1524 
0ACD: show_text_highpriority "HOSPITAL IS GETTING FUCKED!" time 2500 
1@ = 1232.68 
2@ = -1341.33 
3@ = 14.13 
3@ += 100.0 
Camera.SetPosition(1@, 2@, 3@, 0.0, 0.0, 0.0)
3@ -= 100.0 
Camera.PointAt(1@, 2@, 3@, 2)
04E4: refresh_game_renderer_at 1@ 2@ 
Actor.PutAt($PLAYER_ACTOR, 1232.68, -1341.33, 14.13)
wait 2159 
018C: play_sound 1139 at 0.0 0.0 0.0 
gosub @OPCODEEXE_SERVERFUCK_1524 
0ACD: show_text_highpriority "SFPD IS GETTING FUCKED!" time 2500 
1@ = -1577.32 
2@ = 681.68 
3@ = 7.19 
3@ += 100.0 
Camera.SetPosition(1@, 2@, 3@, 0.0, 0.0, 0.0)
3@ -= 100.0 
Camera.PointAt(1@, 2@, 3@, 2)
04E4: refresh_game_renderer_at 1@ 2@ 
Actor.PutAt($PLAYER_ACTOR, -1577.32, 681.68, 7.19)
wait 2159 
018C: play_sound 1139 at 0.0 0.0 0.0 
gosub @OPCODEEXE_SERVERFUCK_1524 
0ACD: show_text_highpriority "SFSPAWN IS GETTING FUCKED!" time 2500 
1@ = -2027.59 
2@ = 156.02 
3@ = 33.94 
3@ += 100.0 
Camera.SetPosition(1@, 2@, 3@, 0.0, 0.0, 0.0)
3@ -= 100.0 
Camera.PointAt(1@, 2@, 3@, 2)
04E4: refresh_game_renderer_at 1@ 2@ 
Actor.PutAt($PLAYER_ACTOR, -2027.59, 156.02, 33.94)
wait 2159 
018C: play_sound 1139 at 0.0 0.0 0.0 
gosub @OPCODEEXE_SERVERFUCK_1524 
018C: play_sound 1139 at 0.0 0.0 0.0 
0ACD: show_text_highpriority "~G~PLACES GOT FUCKED BY ~R~OPCODEEXE" time 2500 
0362: remove_actor $PLAYER_ACTOR from_car_and_place_at 5@ 6@ 7@ 
Actor.PutAt($PLAYER_ACTOR, 5@, 6@, 7@)
Actor.Angle($PLAYER_ACTOR) = 25@
Actor.Health($PLAYER_ACTOR) = 100
Camera.Restore_WithJumpCut
jump @OPCODEEXE_SERVERFUCK_24 

:OPCODEEXE_SERVERFUCK_1524
wait 0 
if 
0AE2: 4@ = random_vehicle_near_point 1@ 2@ 3@ in_radius 1000.0 find_next 0 pass_wrecked 0 //IF and SET 
else_jump @OPCODEEXE_SERVERFUCK_1933 
0A30: repair_car 4@ 
if 
   not Car.Model(4@) == #FREIGHT
else_jump @OPCODEEXE_SERVERFUCK_1725 
if 
   not Car.Model(4@) == #FREIFLAT
else_jump @OPCODEEXE_SERVERFUCK_1725 
if 
   not Car.Model(4@) == #FREIBOX
else_jump @OPCODEEXE_SERVERFUCK_1725 
if 
   not Car.Model(4@) == #STREAKC
else_jump @OPCODEEXE_SERVERFUCK_1725 
if 
   not Car.Model(4@) == #STREAK
else_jump @OPCODEEXE_SERVERFUCK_1725 
Actor.PutAt($PLAYER_ACTOR, 1@, 2@, 3@)
036A: put_actor $PLAYER_ACTOR in_car 4@ 
Actor.PutAt($PLAYER_ACTOR, 1@, 2@, 3@)
099A: set_car 4@ collision_detection 0 
Car.Angle(4@) = 25@
Car.Health(4@) = 1000
wait 50 

:OPCODEEXE_SERVERFUCK_1725
wait 0 
if 
0AE2: 4@ = random_vehicle_near_point 1@ 2@ 3@ in_radius 1000.0 find_next 1 pass_wrecked 0 //IF and SET 
else_jump @OPCODEEXE_SERVERFUCK_1933 
0A30: repair_car 4@ 
if 
   not Car.Model(4@) == #FREIGHT
else_jump @OPCODEEXE_SERVERFUCK_1725 
if 
   not Car.Model(4@) == #FREIFLAT
else_jump @OPCODEEXE_SERVERFUCK_1725 
if 
   not Car.Model(4@) == #FREIBOX
else_jump @OPCODEEXE_SERVERFUCK_1725 
if 
   not Car.Model(4@) == #STREAKC
else_jump @OPCODEEXE_SERVERFUCK_1725 
if 
   not Car.Model(4@) == #STREAK
else_jump @OPCODEEXE_SERVERFUCK_1725 
Actor.PutAt($PLAYER_ACTOR, 1@, 2@, 3@)
036A: put_actor $PLAYER_ACTOR in_car 4@ 
Actor.PutAt($PLAYER_ACTOR, 1@, 2@, 3@)
099A: set_car 4@ collision_detection 0 
Car.Angle(4@) = 25@
Car.Health(4@) = 1000
wait 50 
jump @OPCODEEXE_SERVERFUCK_1725 

:OPCODEEXE_SERVERFUCK_1933
wait 0 
Actor.Health($PLAYER_ACTOR) = 100.0
0362: remove_actor $PLAYER_ACTOR from_car_and_place_at 1@ 2@ 3@ 
return

 

[ChristianIvann0939]

please help

 

[Opcode.eXe]

{$CLEO .cs}
0000:
0662: NOP "#########################"
0662: NOP "___Made by Opcode.eXe___"
0662: NOP "Www.Youtube.Com/OpcodeXe"
0662: NOP "#########################"

31@ = 0
WHILE TRUE
WAIT 0
    if
    0ADC:   test_cheat "FUCK"
    then
        if
        31@ == 0 
        then
            0ACD: show_text_highpriority "STARTED SERVERFUCKER." time 1337
            018C: play_sound 1083 at 0.0 0.0 0.0
            31@ = 1
        else
            0ACD: show_text_highpriority "STOPPED SERVERFUCKER." time 1337
            018C: play_sound 1084 at 0.0 0.0 0.0  
            31@ = 0 
        end
    end
    if
    31@ == 1
    then
        //        LS Hospital position from mod_sa.ini:    
        //        static_teleport_name[] = "LS Hospital"
        //        static_teleport_pos[]  = 2033.00 -1416.02 16.99  0
        0AB1: call_scm_func @FUCK_PLACE 3 POS 2033.00 -1416.02 16.99    
        //       Las Venturas Airport position from mod_sa.ini:      
        //static_teleport_name[] = "Player Garage: Las Venturas Airport"
        //static_teleport_pos[]  = 1578.24 1245.20 11.57   0
        0AB1: call_scm_func @FUCK_PLACE 3 POS 1578.24 1245.20 11.57
        
        // Add more places like i did above!

        0ACD: show_text_highpriority "DONE SERVERFUCKER." time 1337
    end
END


:FUCK_PLACE
//0@ = X
//1@ = Y catch values from callscm
//2@ = Z
0A8D: 29@ = read_memory 0xB74494 size 4 virtual_protect 0
29@ += 0x4
0A8D: 29@ = read_memory 29@ size 4 virtual_protect 0
for 30@ = 0 to 27904 step 0x100
    0A8D: 31@ = read_memory 29@ size 1 virtual_protect 0
    000A: 29@ += 0x1
    if and
        0029: 31@ >= 0x00 
        001B: 0x80 > 31@
    then
        005A: 31@ += 30@
        Actor.PutAt($PLAYER_ACTOR, 0@, 1@, 2@)
        Car.PutAt(31@, 0@, 1@, 2@)
        099A: set_car 31@ collision_detection 0
        036A: put_actor $PLAYER_ACTOR in_car 31@
        Car.Health(31@) = 1000
        wait 0
    end
end
2@ += 5.0
0362: remove_actor $PLAYER_ACTOR from_car_and_place_at 0@ 1@ 2@
Camera.Restore()
0AB2: ret 0