{$VERSION 3.1.0023} {$CLEO .cs} thread "PLANT" { 0@ Memory Address 1@ Memory Value 2@ Current Menu 3@ Current Position 4@ Current Position 5@ Number 6@ Temp Obj / Model 7@ Key / Model Stat 8@ Current Position 9@ Current Object 10@ Min 11@ Max 12@ Distance 15@ Temp 16@ Clip Object 17@ Not Used 18@ Object 19@ List 1 20@ List 2 21@ Temp X 22@ Temp Y 23@ Temp Z 24@ Temp X 25@ Temp Y 26@ Temp Z 27@ Atan Angle 28@ Atan X 29@ Atan Y 30@ Loop 31@ File } 0A95: enable_thread_saving 0AA2: 31@ = load_library "CLEO\plugins\GxtHook.cleo" // IF and SET 0A9F: 0@ = current_thread_pointer 000A: 0@ += 0x10 0A8D: 0@ = read_memory 0@ size 4 virtual_protect 0 000E: 0@ -= @Ped_List for 30@ = 0 to 299 0A8C: write_memory 0@ size 4 value -1 virtual_protect 0 000A: 0@ += 4 end :PLANT_M0 wait 0 if and 0AB0: key_pressed 0x11 0AB0: key_pressed 0x50 jf @PLANT_M0 :PLANT_M1 wait 0 if or 8AB0: not key_pressed 0x11 8AB0: not key_pressed 0x50 jf @PLANT_M1 01F7: toggle_player $PLAYER_CHAR ignored_by_cops 1 03BF: toggle_player $PLAYER_CHAR ignored_by_everyone 1 0006: 16@ = -1 jump @PLANT_M4 :PLANT_M2 03E5: show_text_box 'PLT_H0' :PLANT_M3 gosub @PLANT_NC wait 0 if 00E1: player 0 pressed_key 4 jf @PLANT_M3 :PLANT_M4 01B4: toggle_player $PLAYER_CHAR can_move 0 08D4: 2@ = create_panel_with_title 'PLT_MT' position 29.0 145.0 width 186.0 columns 1 interactive 1 background 1 alignment 1 08D6: set_panel 2@ column 0 alignment 1 08DB: set_panel 2@ column 0 header 'DUMMY' data 'PLT_M0' 'PLT_M1' 'PLT_M2' 'PLT_M3' 'PLT_M4' 'PLT_M5' 'PLT_M6' 'PLT_M7' 'PLT_M8' 'PLT_M9' 'PLT_MA' 'PLT_MB' :PLANT_M5 wait 0 if 80E1: not player 0 pressed_key 16 jf @PLANT_M6 if 00E1: player 0 pressed_key 15 then 08DA: remove_panel 2@ 03E6: remove_text_box 01B4: toggle_player $PLAYER_CHAR can_move 1 jump @PLANT_M2 end jump @PLANT_M5 :PLANT_M6 wait 0 if 80E1: not player 0 pressed_key 16 jf @PLANT_M6 08D8: 3@ = panel 2@ selected_row 08DA: remove_panel 2@ 03E6: remove_text_box 01B4: toggle_player $PLAYER_CHAR can_move 1 0871: init_jump_table 3@ total_jumps 12 default_jump 0 @PLANT_M2 jumps 0 @PLANT_M7 1 @PLANT_M9 2 @PLANT_M11 3 @PLANT_M30 4 @PLANT_M33 5 @PLANT_M36 6 @PLANT_M39 0872: jump_table_jumps 7 @PLANT_M83 8 @PLANT_M96 9 @PLANT_M98 10 @PLANT_M87 11 @PLANT_M99 -1 @PLANT_M2 -1 @PLANT_M2 -1 @PLANT_M2 -1 @PLANT_M2 :PLANT_M7 01B4: toggle_player $PLAYER_CHAR can_move 0 0006: 18@ = 0 0007: 3@ = 0.0 0007: 8@ = 0.0 0006: 4@ = 0 gosub @PLANT_SL :PLANT_M8 wait 0 gosub @PLANT_GK if 0039: 7@ == 1 then if 001B: 0 > 4@ then 0006: 4@ = 0 end if 0019: 4@ > 288 then 0006: 4@ = 288 end if 056D: actor 9@ defined then 0665: get_actor 9@ model_to 6@ 009B: destroy_actor 9@ 0249: release_model 6@ end gosub @PLANT_SL end 0006: 7@ = 0 if and 8039: not 4@ == 8 8039: not 4@ == 42 8039: not 4@ == 65 8039: not 4@ == 74 8039: not 4@ == 86 8039: not 4@ == 119 8039: not 4@ == 149 8039: not 4@ == 208 then if 001B: 1 > 4@ then 0006: 7@ = 2 end if and 001B: 265 > 4@ 0019: 4@ > 6 then 0006: 7@ = 2 end if 0019: 4@ > 273 then 0006: 7@ = 2 end end if and 856D: not actor 9@ defined 00E1: player 0 pressed_key 4 0039: 7@ == 2 then 0247: load_model 4@ 038B: load_requested_models while true if 0248: model 4@ available then break end wait 0 end 04C4: store_coords_to 5@ 6@ 7@ from_actor $PLAYER_ACTOR with_offset 0.0 2.0 0.0 009A: 9@ = create_actor_pedtype 23 model 4@ at 5@ 6@ 7@ 0619: toggle_actor 9@ collision_detection 0 0249: release_model 4@ end gosub @PLANT_MC if 00E1: player 0 pressed_key 15 then while true if 80E1: not player 0 pressed_key 15 then break end wait 0 end jump @PLANT_M4 end jump @PLANT_M8 :PLANT_M9 01B4: toggle_player $PLAYER_CHAR can_move 0 0006: 18@ = 1 0007: 3@ = 0.0 0007: 8@ = 0.0 0006: 4@ = 400 gosub @PLANT_SL :PLANT_M10 wait 0 gosub @PLANT_GK if 0039: 7@ == 1 then if 001B: 400 > 4@ then 0006: 4@ = 400 end if 0019: 4@ > 611 then 0006: 4@ = 611 end if 056E: car 9@ defined then 0441: 6@ = car 9@ model 00A6: destroy_car 9@ 0249: release_model 6@ end gosub @PLANT_SL end 0006: 7@ = 2 if and 856E: not car 9@ defined 00E1: player 0 pressed_key 4 then 0247: load_model 4@ 038B: load_requested_models while true if 0248: model 4@ available then break end wait 0 end 04C4: store_coords_to 5@ 6@ 7@ from_actor $PLAYER_ACTOR with_offset 0.0 5.0 0.0 00A5: 9@ = create_car 4@ at 5@ 6@ 7@ 099A: set_car 9@ collision_detection 0 0249: release_model 4@ end gosub @PLANT_MC if 00E1: player 0 pressed_key 15 then while true if 80E1: not player 0 pressed_key 15 then break end wait 0 end jump @PLANT_M4 end jump @PLANT_M10 :PLANT_M11 01B4: toggle_player $PLAYER_CHAR can_move 0 0006: 18@ = 2 08D4: 2@ = create_panel_with_title 'PLT_NT' position 29.0 145.0 width 186.0 columns 1 interactive 1 background 1 alignment 1 08D6: set_panel 2@ column 0 alignment 1 08DB: set_panel 2@ column 0 header 'DUMMY' data 'PLT_N0' 'PLT_N1' 'PLT_N2' 'PLT_N3' 'PLT_N4' 'PLT_N5' 'PLT_N6' 'PLT_N7' 'PLT_N8' 'PLT_N9' 'PLT_NA' 'DUMMY' :PLANT_M12 wait 0 if 80E1: not player 0 pressed_key 16 jf @PLANT_M13 if 00E1: player 0 pressed_key 15 then 08DA: remove_panel 2@ 03E6: remove_text_box while true if 80E1: not player 0 pressed_key 15 then jump @PLANT_M4 end wait 0 end end jump @PLANT_M12 :PLANT_M13 wait 0 if 80E1: not player 0 pressed_key 16 jf @PLANT_M13 08D8: 3@ = panel 2@ selected_row 08DA: remove_panel 2@ 03E6: remove_text_box 01B4: toggle_player $PLAYER_CHAR can_move 1 0871: init_jump_table 3@ total_jumps 11 default_jump 0 @PLANT_M4 jumps 0 @PLANT_M14 1 @PLANT_M16 2 @PLANT_M18 3 @PLANT_M19 4 @PLANT_M20 5 @PLANT_M21 6 @PLANT_M22 0872: jump_table_jumps 7 @PLANT_M23 8 @PLANT_M24 9 @PLANT_M25 10 @PLANT_M26 -1 @PLANT_M4 -1 @PLANT_M4 -1 @PLANT_M4 -1 @PLANT_M4 -1 @PLANT_M4 :PLANT_M14 01B4: toggle_player $PLAYER_CHAR can_move 0 0006: 18@ = 2 0007: 3@ = 0.0 0007: 8@ = 0.0 0006: 4@ = 321 gosub @PLANT_SL :PLANT_M15 wait 0 gosub @PLANT_GK if 0039: 7@ == 1 then if 001B: 321 > 4@ then 0006: 4@ = 321 end if 0019: 4@ > 373 then 0006: 4@ = 373 end if 03CA: object 9@ exists then 0984: 6@ = object 9@ model 0108: destroy_object 9@ 0249: release_model 6@ end gosub @PLANT_SL end if and 8039: not 4@ == 329 8039: not 4@ == 332 8039: not 4@ == 340 then 0006: 7@ = 2 else 0006: 7@ = 0 end if and 83CA: not object 9@ exists 00E1: player 0 pressed_key 4 0039: 7@ == 2 then 0247: load_model 4@ 038B: load_requested_models while true if 0248: model 4@ available then break end wait 0 end 04C4: store_coords_to 5@ 6@ 7@ from_actor $PLAYER_ACTOR with_offset 0.0 2.0 0.0 0107: 9@ = create_object 4@ at 5@ 6@ 7@ 0382: toggle_object 9@ collision_detection 0 0249: release_model 4@ end gosub @PLANT_MC if 00E1: player 0 pressed_key 15 then while true if 80E1: not player 0 pressed_key 15 then break end wait 0 end jump @PLANT_M11 end jump @PLANT_M15 :PLANT_M16 01B4: toggle_player $PLAYER_CHAR can_move 0 0006: 18@ = 2 0007: 3@ = 0.0 0007: 8@ = 0.0 0006: 4@ = 615 gosub @PLANT_SL :PLANT_M17 wait 0 gosub @PLANT_GK if 0039: 7@ == 1 then if 001B: 615 > 4@ then 0006: 4@ = 615 end if 0019: 4@ > 792 then 0006: 4@ = 792 end if 03CA: object 9@ exists then 0984: 6@ = object 9@ model 0108: destroy_object 9@ 0249: release_model 6@ end gosub @PLANT_SL end if and 8039: not 4@ == 662 8039: not 4@ == 663 8039: not 4@ == 665 8039: not 4@ == 666 8039: not 4@ == 667 8039: not 4@ == 668 8039: not 4@ == 699 then 0006: 7@ = 2 else 0006: 7@ = 0 end if and 83CA: not object 9@ exists 00E1: player 0 pressed_key 4 0039: 7@ == 2 then 0247: load_model 4@ 038B: load_requested_models while true if 0248: model 4@ available then break end wait 0 end 04C4: store_coords_to 5@ 6@ 7@ from_actor $PLAYER_ACTOR with_offset 0.0 5.0 0.0 0107: 9@ = create_object 4@ at 5@ 6@ 7@ 0382: toggle_object 9@ collision_detection 0 0249: release_model 4@ end gosub @PLANT_MC if 00E1: player 0 pressed_key 15 then while true if 80E1: not player 0 pressed_key 15 then break end wait 0 end jump @PLANT_M11 end jump @PLANT_M17 :PLANT_M18 0006: 4@ = 800 0006: 10@ = 800 0006: 11@ = 905 jump @PLANT_M28 :PLANT_M19 0006: 4@ = 910 0006: 10@ = 910 0006: 11@ = 964 jump @PLANT_M28 :PLANT_M20 0006: 4@ = 966 0006: 10@ = 966 0006: 11@ = 998 jump @PLANT_M28 :PLANT_M21 0006: 4@ = 1207 0006: 10@ = 1207 0006: 11@ = 1325 jum...
buszolini