CLEO Help Activated by key

CLEO related
Status
Not open for further replies.

Parazitas

God
Staff member
Joined
Jan 2, 2017
Messages
3,315
Solutions
7
Reaction score
935
Location
Lithuania
PHP:
{$CLEO .cs}

0000:

wait 8500

while true
wait 0

if
04C8:   actor $PLAYER_ACTOR driving_flying_vehicle
then
    0AB1: @DrawCrooshair 0
end

end

:DrawCrooshair
if
04C8:   actor $PLAYER_ACTOR driving_flying_vehicle
then
    03C0: 0@ = actor $PLAYER_ACTOR car                                                    
    0407: store_coords_to 1@ 2@ 3@ from_car 0@ with_offset 0.0 0.0 0.0                                                                             
    0174: 4@ = car 0@ Z_angle                                                                                             
    077D: 5@ = car 0@ x_angle                                                                                             
    0AB1: @get3DXYZInFrontOf 6 XYZ 1@ 2@ 3@ Z_Angle 4@ Y_Or_X_Angle 5@  Distance 9.5 Return_XYZ_To 6@ 7@ 8@
    0AB1: @getScreenXYFrom3DCoords 3 3D_coords_X 6@ Y 7@ Z 8@ store_screen_X_to 9@ Y_to 10@
    0AB1: @DRAW_OUTLINED_BOX 9 POS 9@ 10@ SIZE 5.0 5.0 RGBA 255 255 255 255 THICKNESS 1.0
end
0AB2: ret 0


:get3DXYZInFrontOf
{ 
    Return:
        PosX-InFrontOf
        PosY-InFrontOf
        PosZ-InFrontOf
             
    Example: 0AB1: @get3DXYZInFrontOf 6 XYZ 1@ 2@ 3@ Z_Angle 4@ Y_Angle 5@ Distance 9.5 Return_XYZ_To 6@ 7@ 8@
}
3@ *= -1.0
02F6: 6@ = sine 3@
006B: 6@ *= 5@
005B: 0@ += 6@
02F7: 6@ = cosine 3@
006B: 6@ *= 5@
005B: 1@ += 6@
02F7: 6@ = cosine 4@
0073: 5@ /= 6@
02F6: 6@ = sine 4@
006B: 5@ *= 6@
005B: 2@ += 5@
0AB2: ret 3 0@ 1@ 2@

:getScreenXYFrom3DCoords
0AC7: 14@ = var 0@ offset
0AC7: 15@ = var 3@ offset
0AC7: 16@ = var 6@ offset
0AC7: 17@ = var 9@ offset
0AA5: call 0x70CE30 num_params 6 pop 6 {18@ 18@} 0 0 17@ 16@ 15@ 14@
0007: 12@ = 640.0
0007: 13@ = 448.0
0A8D: 14@ = read_memory 0xC17044 size 4 virtual_protect 0
0A8D: 15@ = read_memory 0xC17048 size 4 virtual_protect 0
0093: 14@ = integer 14@ to_float
0093: 15@ = integer 15@ to_float
0073: 12@ /= 14@
0073: 13@ /= 15@
006B: 3@ *= 12@
006B: 4@ *= 13@
0AB2: ret 2 3@ 4@ 

:DRAW_OUTLINED_BOX
0087: 14@  = 8@ // (float)
0087: 12@ = 2@ // (float)
0087: 13@ = 3@ // (float)
12@ /= 2.0 // (float)
13@ /= 2.0 // (float)
0087: 8@  = 0@ // (float)
005B: 8@ += 2@  // (float)
0063: 8@ -= 12@  // (float) 
0087: 9@  = 0@ // (float) 
0063: 9@ -= 2@  // (float)
005B: 9@ += 12@  // (float) 
0087: 10@ = 1@ // (float)
005B: 10@ += 3@  // (float) 
0063: 10@ -= 13@  // (float) 
0087: 11@ = 1@ // (float)     by OpcodeXe
0063: 11@ -= 3@  // (float)
005B: 11@ += 13@  // (float)   
03F0: enable_text_draw 1                                    
038E: draw_box_position  8@ 1@  size 14@ 3@ RGBA 4@ 5@ 6@ 7@ //  links
038E: draw_box_position  9@ 1@  size 14@ 3@ RGBA 4@ 5@ 6@ 7@  // rechts
038E: draw_box_position  0@ 10@  size 2@ 14@ RGBA 4@ 5@ 6@ 7@  // oben 
038E: draw_box_position  0@ 11@  size 2@ 14@ RGBA 4@ 5@ 6@ 7@  // unten 
0AB2: 0
 

systremerko

New member
Joined
Dec 9, 2018
Messages
4
Reaction score
0
Its pretty good, but not that accurate, i'd like just change the cleo i sent. But i don't know how, only i need its when i sit to the chopper its will not gonna show but, but after i will press some button it will show up like before.
 

Zin

Expert
Joined
Aug 1, 2013
Messages
1,719
Solutions
1
Reaction score
111
Its pretty good, but not that accurate, i'd like just change the cleo i sent. But i don't know how, only i need its when i sit to the chopper its will not gonna show but, but after i will press some button it will show up like before.
C++:
// Made by www.youtube.com/jhgr16
{$CLEO .cs}

//-------------MAIN---------------
03A4: name_thread 'pene'
0390: load_txd_dictionary "PAMIRA"
038F: load_texture "MIRA" as 1 // Load dictionary with 0390 first
038F: load_texture "MIRA4" as 2
038F: load_texture "MIRA2" as 3 // Load dictionary with 0390 first
038F: load_texture "MIRA3" as 4

if
0AAB:   file_exists "CLEO\aircraftaim.ini"
then
0AF0: 23@ = get_int_from_ini_file "cleo\aircraftaim.ini" section "CROSSHAIR" key "red"
0AF0: 24@ = get_int_from_ini_file "cleo\aircraftaim.ini" section "CROSSHAIR" key "green"
0AF0: 25@ = get_int_from_ini_file "cleo\aircraftaim.ini" section "CROSSHAIR" key "blue"
0AF0: 26@ = get_int_from_ini_file "cleo\aircraftaim.ini" section "CROSSHAIR" key "transparency"
0AF0: 27@ = get_int_from_ini_file "cleo\aircraftaim.ini" section "CROSSHAIR" key "crosshair1"
0AF0: 28@ = get_int_from_ini_file "cleo\aircraftaim.ini" section "CROSSHAIR" key "crosshair2"
0AF2: 29@ = get_float_from_ini_file "cleo\aircraftaim.ini" section "CROSSHAIR" key "size"
0AF2: 30@ = get_float_from_ini_file "cleo\aircraftaim.ini" section "CROSSHAIR" key "size2"
0AF2: 31@ = get_float_from_ini_file "cleo\aircraftaim.ini" section "CROSSHAIR" key "distance"
else
23@ = 255
24@ = 255
25@ = 255
26@ = 255
27@ = 3
28@ = 4
29@ = 27.0
30@ = 27.0
end
15@ = 0
32@ = 1

:start
wait 0
IF AND
    KEY_DOWN 18
    KEY_DOWN 88
THEN
    0B12: 15@ = 15@ XOR 1
    WAIT 1000
END
if and
15@ == 1
player.Defined(0)
then
if or
00DD:   actor $PLAYER_ACTOR driving_car_with_model #SEASPAR
00DD:   actor $PLAYER_ACTOR driving_car_with_model #HUNTER
00DD:   actor $PLAYER_ACTOR driving_car_with_model #HYDRA   
00DD:   actor $PLAYER_ACTOR driving_car_with_model #RUSTLER
    then
    if
    32@ == 1
    then
    print "~B~Vehicles crosshair by ~W~ ~Y~jhgr16~W~" time 3500
    32@ = 0
    end
    0@ = Actor.CurrentCar($PLAYER_ACTOR) 
    $incar = 1
    077D: 1@ = car 0@ x_angle
    077D: 1@ = car 0@ x_angle
    077D: 1@ = car 0@ x_angle   
    0174: 2@ = car 0@ Z_angle
    00AA: store_car 0@ position_to 3@ 4@ 5@
    03F0: enable_text_draw 1
    0AB1: call_scm_func @get3DXYZInFrontOf 6 XYZ 3@ 4@ 5@ Z_Angle 2@ Y_Angle 1@ Distance 31@ Return_XYZ_To 6@ 7@ 8@
    if
    86BD:   no_obstacles_between 3@ 4@ 5@ and 6@ 7@ 8@ solid 1 car 0 actor 1 object 1 particle 0
    then
    0AB1: call_scm_func @getCollisionBetweenPoints 17 from 3@ 4@ 5@ to 6@ 7@ 8@ solid 1 car 0 actor 1 object 1 particle 0 cartyre 0 water 1 ignore_entity 0x0 see_through 0 camera_objects 0 shoot_through 0 store_to 20@ 21@ 22@ distance_to $caca2 entity_to $caca
    0AB1: call_scm_func @getScreenXYFrom3DCoords 3 3D_coords_X X 20@ Y 21@ Z 22@ store_screen_X_to 9@ Y_to 10@
    else
    0AB1: call_scm_func @getScreenXYFrom3DCoords 3 3D_coords_X X 6@ 7@ 8@ store_screen_X_to 9@ Y_to 10@
    end
    if or 
    00DD:   actor $PLAYER_ACTOR driving_car_with_model #HYDRA
    00DD:   actor $PLAYER_ACTOR driving_car_with_model #HUNTER
    then
    038D: draw_texture 27@ position 9@ 10@ size 29@ 29@ RGBA 23@ 24@ 25@ 26@
    else
    038D: draw_texture 28@ position 9@ 10@ size 30@ 30@ RGBA 23@ 24@ 25@ 26@
    end
    else
        if
        $incar == 1
        then                             
            if or
            80DD:   actor $PLAYER_ACTOR driving_car_with_model #SEASPAR
            80DD:   actor $PLAYER_ACTOR driving_car_with_model #HUNTER
            80DD:   actor $PLAYER_ACTOR driving_car_with_model #HYDRA
            80DD:   actor $PLAYER_ACTOR driving_car_with_model #RUSTLER
            then
            03F0: 0
            $incar = 0
            end
        else
        end
    end
end
jump @start

:getScreenXYFrom3DCoords // ugbase
0AA7: call_function 0x70CE30 num_params 6 pop 6 clipNear 1 clipFar 1 yMult 7@s xMult 6@s outVector 2@s inVector 0@s result 29@
0073: 2@ /= 6@
0073: 2@ /= 4@
0073: 3@ /= 7@
0073: 3@ /= 4@
2@ *= 640.0
3@ *= 448.0
0AB2: ret 2 2@ 3@


:get3DXYZInFrontOf{X,Y,Z,ZA,YA,Distance}
{   
    Return:
        PosX-InFrontOf
        PosY-InFrontOf
        PosZ-InFrontOf
        
    Example: 0AB1: call_scm_func @get3DXYZInFrontOf 6 XYZ 1@ 2@ 3@ Z_Angle 4@ Y_Angle 5@  Distance 7.0 Return_XYZ_To 6@ 7@ 8@

}
3@ *= -1.0
02F6: 6@ = sine 3@
006B: 6@ *= 5@
005B: 0@ += 6@
02F7: 6@ = cosine 3@
006B: 6@ *= 5@
005B: 1@ += 6@
02F7: 6@ = cosine 4@
0073: 5@ /= 6@
02F6: 6@ = sine 4@
006B: 5@ *= 6@
005B: 2@ += 5@
0AB2: ret 3 0@ 1@ 2@     
 
:getCollisionBetweenPoints // GTA FORUMS
{
 Parameters:
   Passed:
     0@ - start point X
     1@ - start point Y
     2@ - start point Z
     3@ - end point X
     4@ - end point Y
     5@ - end point Z
     6@ - is solid
     7@ - is car
     8@ - is actor
     9@ - is object
     10@ - is particle
     11@ - is car tyre
     12@ - is water
     13@ - entity to ignore (offset)
     14@ - no see-through stuff
     15@ - no camera objects
     16@ - no shoot-through stuff
   Result:
     17@ - collision point X
     18@ - collision point Y
     19@ - collision point Z
     20@ - distance
     21@ - entity

 Example:
   0AB1: call_scm_func @getCollisionBetweenPoints 17 from 0.0 0.0 0.0 to 1.0 0.0 0.0 solid 0 car 1 actor 0 object 0 particle 0 cartyre 1 water 0 ignore_entity 0x0 see_through 0 camera_objects 0 shoot_through 0 store_to 1@ 2@ 3@ distance_to 4@ entity_to 5@
}
if
 13@ <> 0x0
then
 0A8C: write_memory 0xB7CD68 size 4 value 13@ virtual_protect 0
end
0A8C: write_memory 0xB7CD70 size 1 value 11@ virtual_protect 0
0A9F: 26@ = current_thread_pointer
0AB1: call_scm_func @getLocalVarOffset 2 thread 26@ var 0 store_to 22@
0AB1: call_scm_func @getLocalVarOffset 2 thread 26@ var 3 store_to 23@
0AB1: call_scm_func @getLocalVarOffset 2 thread 26@ var 17 store_to 24@
0AB1: call_scm_func @getLocalVarOffset 2 thread 26@ var 21 store_to 25@
0AA7: call_function 0x56BA00 num_params 12 pop 12 bIgnoreShootThroughStuff 16@ bIgnoreSomeObjectsForCamera 15@ bIgnoreSeeThroughStuff 14@ bDummy 10@ bObject 9@ bActor 8@ bCar 7@ bBuilding 6@ pEntity 25@ pPoint 24@ pTarget 23@ pOrigin 22@ bReturn 31@ // CWorld__ProcessLineOfSight
if
 13@ <> 0x0
then
 0A8C: write_memory 0xB7CD68 size 4 value 0x0 virtual_protect 0
end
if
 31@ <> 0
then
 if and
   17@ <> 0.0
   18@ <> 0.0
   19@ <> 0.0
 then
   050A: 20@ = distance_between_XYZ 0@ 1@ 2@ and_XYZ 17@ 18@ 19@
   if
     12@ == 1
   then
     0A9F: 26@ = current_thread_pointer
     0AB1: call_scm_func @getLocalVarOffset 2 thread 26@ var 27 store_to 30@
     0AA7: call_function 0x6E61B0 num_params 7 pop 7 pPoint 30@ fTargetZ 5@ fTargetY 4@ fTargetX 3@ fOriginZ 2@ fOriginY 1@ fOriginX 0@ bResult 31@ // CWorld__TestLineAgainstWater
     if
       31@ <> 0 
     then
       0087: 17@ = 27@
       0087: 18@ = 28@
       0087: 19@ = 29@
       050A: 20@ = distance_between_XYZ 0@ 1@ 2@ and_XYZ 27@ 28@ 29@
     end
   end
   0AB2: ret 5 17@ 18@ 19@ 20@ 21@
 end
end
0AB2: ret 5 3@ 4@ 5@ 0.0 0x0


:getLocalVarOffset
{
 Parameters:
   Passed:
     0@ - thread pointer
     1@ - var number
   Result:
     1@ - var value

 Example:
   0AB1: call_scm_func @getLocalVarOffset 2 thread 0@ var 0 store_to 1@
}
if
 0@ <> 0
then
 1@ *= 0x4
 0A8E: 2@ = 0@ + 0xDC // mission flag
 if
   2@ == 1
 then
   1@ += 0xA48960 // mission locals
 else
   005A: 1@ += 0@
   1@ += 0x3C
 end
else
 1@ = 0
end
0AB2: ret 1 1@
 

Parazitas

God
Staff member
Joined
Jan 2, 2017
Messages
3,315
Solutions
7
Reaction score
935
Location
Lithuania
PHP:
{$CLEO .cs}

00000:

wait 8500

03A4: name_thread 'pene'

0390: load_txd_dictionary "PAMIRA" 
038F: load_texture "MIRA" as 1 // Load dictionary with 0390 first
038F: load_texture "MIRA4" as 2
038F: load_texture "MIRA2" as 3 // Load dictionary with 0390 first 
038F: load_texture "MIRA3" as 4

if
0AAB:   file_exists "CLEO\aircraftaim.ini"
then
    0AF0: 23@ = get_int_from_ini_file "cleo\aircraftaim.ini" section "CROSSHAIR" key "red"
    0AF0: 24@ = get_int_from_ini_file "cleo\aircraftaim.ini" section "CROSSHAIR" key "green"
    0AF0: 25@ = get_int_from_ini_file "cleo\aircraftaim.ini" section "CROSSHAIR" key "blue"
    0AF0: 26@ = get_int_from_ini_file "cleo\aircraftaim.ini" section "CROSSHAIR" key "transparency"
    0AF0: 27@ = get_int_from_ini_file "cleo\aircraftaim.ini" section "CROSSHAIR" key "crosshair1"
    0AF0: 28@ = get_int_from_ini_file "cleo\aircraftaim.ini" section "CROSSHAIR" key "crosshair2"
    0AF2: 29@ = get_float_from_ini_file "cleo\aircraftaim.ini" section "CROSSHAIR" key "size"
    0AF2: 30@ = get_float_from_ini_file "cleo\aircraftaim.ini" section "CROSSHAIR" key "size2"
    0AF2: 31@ = get_float_from_ini_file "cleo\aircraftaim.ini" section "CROSSHAIR" key "distance"
else
    23@ = 255
    24@ = 255
    25@ = 255
    26@ = 255
    27@ = 3
    28@ = 4
    29@ = 27.0
    30@ = 27.0
end

32@ = 1

:start
wait 0

if
0AB0: 113 // F2
then
    if
    15@ == 0
    then
        15@ = 1
    else
        15@ = 0
    end
    wait 1500 // anti spam key
end

if and
15@ == 1
player.Defined(0)
then
if or
00DD:   actor $PLAYER_ACTOR driving_car_with_model 447 // #SEASPAR
00DD:   actor $PLAYER_ACTOR driving_car_with_model 425 // #HUNTER
00DD:   actor $PLAYER_ACTOR driving_car_with_model 520 // #HYDRA    
00DD:   actor $PLAYER_ACTOR driving_car_with_model 476 // #RUSTLER
then
    if
    32@ == 1
    then
        print "~B~Vehicles crosshair by ~W~ ~Y~jhgr16~W~" time 3500 
        32@ = 0
    end
    0@ = Actor.CurrentCar($PLAYER_ACTOR)  
    $incar = 1
    077D: 1@ = car 0@ x_angle 
    077D: 1@ = car 0@ x_angle 
    077D: 1@ = car 0@ x_angle    
    0174: 2@ = car 0@ Z_angle
    00AA: store_car 0@ position_to 3@ 4@ 5@
    03F0: enable_text_draw 1
    0AB1: call_scm_func @get3DXYZInFrontOf 6 XYZ 3@ 4@ 5@ Z_Angle 2@ Y_Angle 1@ Distance 31@ Return_XYZ_To 6@ 7@ 8@
    if 
    86BD:   no_obstacles_between 3@ 4@ 5@ and 6@ 7@ 8@ solid 1 car 0 actor 1 object 1 particle 0
    then
        0AB1: call_scm_func @getCollisionBetweenPoints 17 from 3@ 4@ 5@ to 6@ 7@ 8@ solid 1 car 0 actor 1 object 1 particle 0 cartyre 0 water 1 ignore_entity 0x0 see_through 0 camera_objects 0 shoot_through 0 store_to 20@ 21@ 22@ distance_to $caca2 entity_to $caca
        0AB1: call_scm_func @getScreenXYFrom3DCoords 3 3D_coords_X X 20@ Y 21@ Z 22@ store_screen_X_to 9@ Y_to 10@
    else 
        0AB1: call_scm_func @getScreenXYFrom3DCoords 3 3D_coords_X X 6@ 7@ 8@ store_screen_X_to 9@ Y_to 10@
    end
    if or  
    00DD:   actor $PLAYER_ACTOR driving_car_with_model 520 // #HYDRA
    00DD:   actor $PLAYER_ACTOR driving_car_with_model 425 // #HUNTER
    then
        038D: draw_texture 27@ position 9@ 10@ size 29@ 29@ RGBA 23@ 24@ 25@ 26@
    else
        038D: draw_texture 28@ position 9@ 10@ size 30@ 30@ RGBA 23@ 24@ 25@ 26@
    end
else
        if
        $incar == 1
        then                              
            if or
            80DD:   actor $PLAYER_ACTOR driving_car_with_model 447 // #SEASPAR
            80DD:   actor $PLAYER_ACTOR driving_car_with_model 425 // #HUNTER
            80DD:   actor $PLAYER_ACTOR driving_car_with_model 520 // #HYDRA    
            80DD:   actor $PLAYER_ACTOR driving_car_with_model 476 // #RUSTLER
            then
            03F0: 0
            $incar = 0
            end
        else
        end
    end
end
jump @start

:getScreenXYFrom3DCoords // ugbase
0AA7: call_function 0x70CE30 num_params 6 pop 6 clipNear 1 clipFar 1 yMult 7@s xMult 6@s outVector 2@s inVector 0@s result 29@
0073: 2@ /= 6@
0073: 2@ /= 4@
0073: 3@ /= 7@
0073: 3@ /= 4@
2@ *= 640.0
3@ *= 448.0
0AB2: ret 2 2@ 3@


:get3DXYZInFrontOf{X,Y,Z,ZA,YA,Distance}
{    
    Return:
        PosX-InFrontOf
        PosY-InFrontOf
        PosZ-InFrontOf
        
    Example: 0AB1: call_scm_func @get3DXYZInFrontOf 6 XYZ 1@ 2@ 3@ Z_Angle 4@ Y_Angle 5@  Distance 7.0 Return_XYZ_To 6@ 7@ 8@

}
3@ *= -1.0
02F6: 6@ = sine 3@
006B: 6@ *= 5@
005B: 0@ += 6@
02F7: 6@ = cosine 3@
006B: 6@ *= 5@
005B: 1@ += 6@
02F7: 6@ = cosine 4@
0073: 5@ /= 6@
02F6: 6@ = sine 4@
006B: 5@ *= 6@
005B: 2@ += 5@
0AB2: ret 3 0@ 1@ 2@     
 
:getCollisionBetweenPoints // GTA FORUMS
{
 Parameters:
   Passed:
     0@ - start point X
     1@ - start point Y
     2@ - start point Z
     3@ - end point X
     4@ - end point Y
     5@ - end point Z
     6@ - is solid
     7@ - is car
     8@ - is actor
     9@ - is object
     10@ - is particle
     11@ - is car tyre
     12@ - is water
     13@ - entity to ignore (offset)
     14@ - no see-through stuff
     15@ - no camera objects
     16@ - no shoot-through stuff
   Result:
     17@ - collision point X
     18@ - collision point Y
     19@ - collision point Z
     20@ - distance
     21@ - entity

 Example:
   0AB1: call_scm_func @getCollisionBetweenPoints 17 from 0.0 0.0 0.0 to 1.0 0.0 0.0 solid 0 car 1 actor 0 object 0 particle 0 cartyre 1 water 0 ignore_entity 0x0 see_through 0 camera_objects 0 shoot_through 0 store_to 1@ 2@ 3@ distance_to 4@ entity_to 5@ 
}
if 
13@ <> 0x0 
then
    0A8C: write_memory 0xB7CD68 size 4 value 13@ virtual_protect 0 
end
0A8C: write_memory 0xB7CD70 size 1 value 11@ virtual_protect 0 
0A9F: 26@ = current_thread_pointer
0AB1: call_scm_func @getLocalVarOffset 2 thread 26@ var 0 store_to 22@ 
0AB1: call_scm_func @getLocalVarOffset 2 thread 26@ var 3 store_to 23@ 
0AB1: call_scm_func @getLocalVarOffset 2 thread 26@ var 17 store_to 24@ 
0AB1: call_scm_func @getLocalVarOffset 2 thread 26@ var 21 store_to 25@ 
0AA7: call_function 0x56BA00 num_params 12 pop 12 bIgnoreShootThroughStuff 16@ bIgnoreSomeObjectsForCamera 15@ bIgnoreSeeThroughStuff 14@ bDummy 10@ bObject 9@ bActor 8@ bCar 7@ bBuilding 6@ pEntity 25@ pPoint 24@ pTarget 23@ pOrigin 22@ bReturn 31@ // CWorld__ProcessLineOfSight
if 
13@ <> 0x0 
then
    0A8C: write_memory 0xB7CD68 size 4 value 0x0 virtual_protect 0 
end
if 
 31@ <> 0 
then
 if and
   17@ <> 0.0 
   18@ <> 0.0 
   19@ <> 0.0 
 then
   050A: 20@ = distance_between_XYZ 0@ 1@ 2@ and_XYZ 17@ 18@ 19@ 
   if 
     12@ == 1 
   then
     0A9F: 26@ = current_thread_pointer
     0AB1: call_scm_func @getLocalVarOffset 2 thread 26@ var 27 store_to 30@ 
     0AA7: call_function 0x6E61B0 num_params 7 pop 7 pPoint 30@ fTargetZ 5@ fTargetY 4@ fTargetX 3@ fOriginZ 2@ fOriginY 1@ fOriginX 0@ bResult 31@ // CWorld__TestLineAgainstWater
     if 
       31@ <> 0  
     then
       0087: 17@ = 27@ 
       0087: 18@ = 28@ 
       0087: 19@ = 29@ 
       050A: 20@ = distance_between_XYZ 0@ 1@ 2@ and_XYZ 27@ 28@ 29@ 
     end
   end
   0AB2: ret 5 17@ 18@ 19@ 20@ 21@ 
 end
end
0AB2: ret 5 3@ 4@ 5@ 0.0 0x0 


:getLocalVarOffset
{
 Parameters:
   Passed:
     0@ - thread pointer
     1@ - var number
   Result:
     1@ - var value

 Example:
   0AB1: call_scm_func @getLocalVarOffset 2 thread 0@ var 0 store_to 1@ 
}
if 
 0@ <> 0 
then
 1@ *= 0x4 
 0A8E: 2@ = 0@ + 0xDC // mission flag
 if 
   2@ == 1 
 then
   1@ += 0xA48960 // mission locals
 else
   005A: 1@ += 0@ 
   1@ += 0x3C 
 end
else
 1@ = 0 
end
0AB2: ret 1 1@
 

systremerko

New member
Joined
Dec 9, 2018
Messages
4
Reaction score
0
Sorry guys, but i dont know what to do next, i put it to the sanny builder and save it. I tried to press compile but it said unknow directive.
 
Status
Not open for further replies.
Top