+ -

Pages

Visit my blog where I release all kinds of hacks!

http://ze-samphacks.blogspot.com/

05/09/2014

Smart Object Finder by m1zg4rd SOURCE

Smart Object Finder by m1zg4rd 
SOURCE



 {$CLEO .cs}  
 hex  
  01 02 03 04 05 06 07 08 09 10 11 12 13 14 15  
 end  
 thread "BRIEFCASE"   
 wait 2000   
 0AA2: 26@ = load_library "SAMP.DLL" // IF and SET   
 :WALIZKA_46  
 wait 50   
 if   
 0AAB:  file_exists "CLEO\BRIEFCASE.INI"   
 else_jump @WALIZKA_623   
 wait 5   
 0AF0: 20@ = get_int_from_ini_file "CLEO\BRIEFCASE.INI" section "MAIN" key "KEY_1"   
 0AF0: 21@ = get_int_from_ini_file "CLEO\BRIEFCASE.INI" section "MAIN" key "KEY_2"   
 0AF0: 22@ = get_int_from_ini_file "CLEO\BRIEFCASE.INI" section "MAIN" key "KEY_OFF_1"   
 0AF0: 23@ = get_int_from_ini_file "CLEO\BRIEFCASE.INI" section "MAIN" key "KEY_OFF_2"   
 0AF0: 24@ = get_int_from_ini_file "CLEO\BRIEFCASE.INI" section "MAIN" key "KEY_SPECTATE"   
 0AF0: 25@ = get_int_from_ini_file "CLEO\BRIEFCASE.INI" section "MAIN" key "OBJECT_ID"   
 0AF0: 8@ = get_int_from_ini_file "CLEO\BRIEFCASE.INI" section "MAIN" key "TRAP_DETECT"  
 Model.Load(#RCCAM)  
 0085: 27@ = 26@ // (int)   
 27@ += 2173548   
 0A8D: 29@ = read_memory 27@ size 4 virtual_protect 1   
 0085: 28@ = 26@ // (int)   
 28@ += 500976   
 0AA6: call_method 28@ struct 29@ num_params 5 pop 0 0 16711680 0 "BRIEFCASE FINDER BY M1ZG4RD :3" 8   
 0085: 27@ = 26@ // (int)   
 27@ += 2173548   
 0A8D: 29@ = read_memory 27@ size 4 virtual_protect 1   
 0085: 28@ = 26@ // (int)   
 28@ += 500976   
 0AA6: call_method 28@ struct 29@ num_params 5 pop 0 0 16711680 0 "DEFAULT ACTIVATION: P+9" 8   
 0085: 27@ = 26@ // (int)   
 27@ += 2173548   
 0A8D: 29@ = read_memory 27@ size 4 virtual_protect 1   
 0085: 28@ = 26@ // (int)   
 28@ += 500976   
 0AA6: call_method 28@ struct 29@ num_params 5 pop 0 0 16711680 0 "DEFAULT DEACTIVATION: O+0" 8   
 jump @WALIZKA_862   
 :WALIZKA_623  
 wait 10   
 0AF1: write_int 57 to_ini_file "CLEO\BRIEFCASE.INI" section "MAIN" key "KEY_1"   
 0AF1: write_int 80 to_ini_file "CLEO\BRIEFCASE.INI" section "MAIN" key "KEY_2"   
 0AF1: write_int 48 to_ini_file "CLEO\BRIEFCASE.INI" section "MAIN" key "KEY_OFF_1"   
 0AF1: write_int 79 to_ini_file "CLEO\BRIEFCASE.INI" section "MAIN" key "KEY_OFF_2"   
 0AF1: write_int 189 to_ini_file "CLEO\BRIEFCASE.INI" section "MAIN" key "KEY_SPECTATE"   
 0AF1: write_int 1210 to_ini_file "CLEO\BRIEFCASE.INI" section "MAIN" key "OBJECT_ID"   
 0AF1: write_int 1 to_ini_file "CLEO\BRIEFCASE.INI" section "MAIN" key "TRAP_DETECT"  
 jump @WALIZKA_46   
 :WALIZKA_862  
 wait 10   
 if   
   Model.Available(#RCCAM)  
 else_jump @WALIZKA_862   
 wait 1   
 jump @WALIZKA_893   
 :WALIZKA_893  
 wait 10   
 if and  
 key_down 20@   
 key_down 21@   
 else_jump @WALIZKA_893   
 15@ = 0   
 11@ = 1   
 print "~W~BRIEFCASE SEARCHING..." 30000   
 Actor.StorePos($PLAYER_ACTOR, 0@, 1@, 2@)  
 2@ -= 0.3   
 if   
 0AE3: 9@ = random_object_near_point 0@ 1@ 2@ in_radius 100000.0 find_next 0 //IF and SET   
 else_jump @WALIZKA_893   
 if   
 03CA:  object 9@ exists   
 else_jump @WALIZKA_893   
 if   
   Object.Model(9@) == 25@  
 else_jump @WALIZKA_1155   
 if or  
 04E5:  object 9@ near_point 2305.5 1452.3 radius 2.0 2.0 sphere 0   
 04E5:  object 9@ near_point 1593.5 1454.5 radius 2.0 2.0 sphere 0   
 04E5:  object 9@ near_point 397.8 -2677.4 radius 2.0 2.0 sphere 0   
 else_jump @WALIZKA_1410   
 jump @WALIZKA_1155   
 :WALIZKA_1155  
 wait 0   
 if   
 0AE3: 9@ = random_object_near_point 0@ 1@ 2@ in_radius 100000.0 find_next 1 //IF and SET   
 else_jump @WALIZKA_1360   
 if   
 03CA:  object 9@ exists   
 else_jump @WALIZKA_1155   
 03F0: enable_text_draw 1   
 11@ += 1   
 045A: draw_text_1number 330.0 375.0 GXT 'NUMBER' number 11@ // ~1~  
 if   
   Object.Model(9@) == 25@  
 else_jump @WALIZKA_1155   
 if or  
 04E5:  object 9@ near_point 2305.5 1452.3 radius 2.0 2.0 sphere 0   
 04E5:  object 9@ near_point 1593.5 1454.5 radius 2.0 2.0 sphere 0   
 04E5:  object 9@ near_point 397.8 -2677.4 radius 2.0 2.0 sphere 0   
 else_jump @WALIZKA_1410   
 jump @WALIZKA_1155   
 :WALIZKA_1360  
 wait 20   
 00BE: text_clear_all   
 print "~R~BRIEFCASE NOT FOUND" 1200   
 wait 500   
 jump @WALIZKA_893   
 :WALIZKA_1410  
 if   
 04E7:  object 9@ in_water   
 else_jump @WALIZKA_1472   
 Object.StorePos(9@, 3@, 4@, 5@)  
 if   
  5@ >= -67.0   
 else_jump @WALIZKA_1627   
 wait 5   
 jump @WALIZKA_1682   
 :WALIZKA_1472  
 Object.StorePos(9@, 3@, 4@, 5@)  
 0400: store_coords_to 3@ 4@ 5@ from_object 9@ with_offset 0.0 0.0 -0.5   
 13@ = Car.Create(#RCCAM, 3@, 4@, 5@)  
 wait 100   
 050E: set_object 9@ no_collision_with_car 13@   
 Car.PutAt(13@, 3@, 4@, 5@)  
 wait 800   
 Car.StorePos(13@, 3@, 4@, 14@)  
 0063: 5@ -= 14@ // (float)  
 if  
  0039:  8@ == 1  
 else_jump @WALIZKA_1682   
 if or  
  5@ >= 6.0   
  -0.6 > 5@   
 else_jump @WALIZKA_1682   
 wait 5   
 jump @WALIZKA_1627   
 :WALIZKA_1627  
 wait 20   
 00BE: text_clear_all   
 print "~R~IT'S A ~R~TRAP~W~!" 1500   
 Car.Destroy(13@)  
 wait 500   
 jump @WALIZKA_1854   
 :WALIZKA_1682  
 wait 20   
 if and  
   not key_down 20@   
   not key_down 21@   
 else_jump @WALIZKA_1682   
 Object.StorePos(9@, 3@, 4@, 5@)  
 Object.StorePos(9@, 17@, 18@, 19@)  
 wait 10   
 10@ = Marker.CreateIconAndSphere(56, 3@, 4@, 5@)  
 print "~G~BRIEFCASE FOUND~Y~:3" 1200   
 Car.Destroy(13@)  
 12@ = 1   
 wait 500   
 jump @WALIZKA_1813   
 :WALIZKA_1813  
 wait 5   
 if and  
 key_down 20@   
 key_down 21@   
 else_jump @WALIZKA_1895   
 Marker.Disable(10@)  
 wait 10   
 jump @WALIZKA_893   
 :WALIZKA_1854  
 wait 10   
 if and  
 key_down 20@   
 key_down 21@   
 else_jump @WALIZKA_1854   
 Marker.Disable(10@)  
 wait 10   
 jump @WALIZKA_893   
 :WALIZKA_1895  
 wait 5   
 12@ += 1   
 if   
  12@ >= 40   
 else_jump @WALIZKA_2303   
 12@ = 1   
 if   
  15@ == 0   
 else_jump @WALIZKA_1979   
 15@ = 1   
 jump @WALIZKA_1963   
 :WALIZKA_1963  
 wait 5   
 Marker.Disable(10@)  
 jump @WALIZKA_2013   
 :WALIZKA_1979  
 wait 5   
 15@ = 0   
 10@ = Marker.CreateIconAndSphere(56, 3@, 4@, 5@)  
 jump @WALIZKA_2013   
 :WALIZKA_2013  
 if   
 key_down 24@   
 else_jump @WALIZKA_2269   
 if   
   Actor.Driving($PLAYER_ACTOR)  
 else_jump @WALIZKA_2269   
 16@ = 1   
 if   
  15@ == 0   
 else_jump @WALIZKA_2081   
 wait 1   
 jump @WALIZKA_2175   
 :WALIZKA_2081  
 18@ += 4.0   
 19@ += 5.0   
 Camera.SetPosition(17@, 18@, 19@, 0.0, 0.0, 0.0)  
 18@ -= 4.0   
 19@ -= 5.0   
 04E4: refresh_game_renderer_at 17@ 18@   
 Camera.PointAt(17@, 18@, 19@, 2)  
 jump @WALIZKA_2303   
 :WALIZKA_2175  
 18@ += 10.0   
 19@ += 15.0   
 Camera.SetPosition(17@, 18@, 19@, 0.0, 0.0, 0.0)  
 18@ -= 10.0   
 19@ -= 15.0   
 04E4: refresh_game_renderer_at 17@ 18@   
 Camera.PointAt(17@, 18@, 19@, 2)  
 jump @WALIZKA_2303   
 :WALIZKA_2269  
 if   
  16@ == 1   
 else_jump @WALIZKA_2303   
 16@ = 0   
 Camera.Restore_WithJumpCut  
 jump @WALIZKA_2303   
 :WALIZKA_2303  
 wait 5   
 if and  
 key_down 22@   
 key_down 23@   
   not key_down 24@   
 else_jump @WALIZKA_2378   
 Marker.Disable(10@)  
 00BE: text_clear_all   
 print "~R~SEARCHING CANCELED" 1500   
 wait 10   
 jump @WALIZKA_1854   
 :WALIZKA_2378  
 wait 5   
 if and  
 00ED:  actor $PLAYER_ACTOR sphere 0 near_point 17@ 18@ radius 2.0 2.0 on_foot   
 00E1:  player 0 pressed_key 16   
 else_jump @WALIZKA_1813   
 Marker.Disable(10@)  
 00BE: text_clear_all   
 print "~Y~BRIEFCASE PICKED UP" 1500   
 wait 10   
 jump @WALIZKA_1854   


Hacked and decrypted by Mr.Ze
5 SourceHack: Smart Object Finder by m1zg4rd SOURCE Smart Object Finder by m1zg4rd  SOURCE {$CLEO .cs} hex 01 02 03 04 05 06 07 08 09 10 11 12 13 14 15 end thread "...

No comments:

Post a Comment

< >