SHARE
TWEET

Dutchy3010

a guest Mar 19th, 2009 502 Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
  1. {
  2.   use macro (Ctrl+J) "headsa"
  3.   to insert a file header      
  4. }
  5. {$VERSION 3.0.0000}                                                              
  6.  
  7. thread 'MAIN'
  8.  var
  9.   $PLAYER_CHAR: Player
  10.  end // var
  11. 01F0: set_max_wanted_level_to 6
  12. set_wb_check_to 0
  13. 00C0: set_current_time 8 0
  14. 04E4: unknown_refresh_game_renderer_at 2488.5601 -1666.84
  15. Camera.SetAtPos(2488.5601, -1666.84, 13.38)
  16. $PLAYER_CHAR = Player.Create(#NULL, 2488.5601, -1666.84, 13.38)
  17. $PLAYER_ACTOR = Actor.EmulateFromPlayer($PLAYER_CHAR)
  18. 07AF: $PLAYER_GROUP = player $PLAYER_CHAR group
  19. Camera.SetBehindPlayer
  20. set_weather 0          
  21. wait 0 ms
  22. $PLAYER_CHAR.SetClothes("PLAYER_FACE", "HEAD", Head)
  23. $PLAYER_CHAR.SetClothes("JEANSDENIM", "JEANS", Legs)                          
  24. $PLAYER_CHAR.SetClothes("SNEAKERBINCBLK", "SNEAKER", Shoes)
  25. $PLAYER_CHAR.SetClothes("VEST", "VEST", Torso)
  26. $PLAYER_CHAR.Build
  27. $PLAYER_CHAR.CanMove = True
  28. fade 1 (out) 0 ms                    
  29. select_interior 0
  30. 0629: change_stat 181 (islands unlocked) to 4
  31. 016C: restart_if_wasted at 2027.77 -1420.52 15.99 angle 137.0 for_town_number 0
  32. 016D: restart_if_busted at 1550.68 -1675.49 14.51 angle 90.0 for_town_number 0
  33. 0180: set_on_mission_flag_to $ONMISSION // Note: your missions have to use the variable defined here ($ONMISSION)
  34. 03E6: remove_text_box
  35. create_thread @SPHERE
  36.  
  37. // IDLE LOOP
  38. :leeg
  39. wait 500
  40. jump @leeg
  41.  
  42. end_thread
  43.  
  44. :SPHERE
  45. thread 'SPHERE'
  46.  
  47. //Load models
  48. 0247: load_model #GREENWOO
  49. 038B: load_requested_models
  50.  
  51. :MODEL_LOAD
  52. 00D6: if  
  53. 8248:   not model #GREENWOO available
  54. 004D: jump_if_false @MODEL_SPAWN                                              
  55. 0001: wait 0 ms
  56. 0002: jump @MODEL_LOAD
  57.  
  58. :MODEL_SPAWN
  59. 00A5: $greenwood = create_car #GREENWOO at 2458.2483 -1659.0264 13.3047
  60. Car.Angle($greenwood)= 270.0
  61. 0186: $m1 = create_marker_above_car $greenwood
  62. wait 5000 ms
  63. Marker.Disable($m1)
  64.  
  65. 0249: release_model #GREENWOO
  66.  
  67.  
  68. end_thread
RAW Paste Data
We use cookies for various purposes including analytics. By continuing to use Pastebin, you agree to our use of cookies as described in the Cookies Policy. OK, I Understand
Not a member of Pastebin yet?
Sign Up, it unlocks many cool features!
 
Top