daily pastebin goal
33%
SHARE
TWEET

Dutchy3010

a guest Mar 24th, 2009 439 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. // put your create_thread commands here
  36.  
  37. create_thread @MODEL
  38.  
  39. // IDLE LOOP
  40. :leeg
  41. wait 500
  42. jump @leeg
  43.  
  44. end_thread
  45.  
  46. :MODEL
  47. thread 'MODEL'
  48. 0518: $ASSET = create_available_asset_pickup 'PROP_3' at 2487.5598 -1658.3495 13.3528  price 100
  49. 0213: $HEALTH = create_pickup #HEALTH type 3 at 2484.5598 -1658.3495 13.3528
  50. 032B: $MINIGUN = create_weapon_pickup #MINIGUN group 15 ammo 5000 at 2490.5598 -1658.3495 13.3528
  51. 03DC: 1@ = create_marker_above_pickup $MINIGUN
  52.  
  53. repeat
  54. wait 0
  55. until 0214:   pickup $MINIGUN picked_up
  56.  
  57. 0164: disable_marker 1@
  58.  
  59. 0247: load_model #BFYST
  60. 0247: load_model #MINIGUN
  61. 038B: load_requested_models
  62.  
  63. :MODEL_LOAD
  64. if and
  65. 8248:   not model #BFYST available
  66. 8248:   not model #MINIGUN available
  67. else_jump @MODEL_SPAWN
  68. wait 0 ms
  69. jump @MODEL_LOAD
  70.  
  71. :MODEL_SPAWN
  72. 10@ = Actor.Create(CIVFEMALE, #BFYST, 2488.5601, -1680.84, 13.3438 )
  73. 01B2: give_actor 10@ weapon 38 ammo 500 // Load the weapon model before using this
  74. 02E2: set_actor 10@ weapon_accuracy_to 90
  75. 0223: set_actor 10@ health_to 1000
  76.  
  77. 05E2: AS_actor 10@ kill_actor $PLAYER_ACTOR
  78.  
  79. repeat
  80. wait 100
  81. until 0118:   actor 10@ dead
  82.  
  83. 0109: player $PLAYER_CHAR money += 100
  84.  
  85. repeat
  86. wait 100
  87. until 0214:   pickup $ASSET picked_up
  88.  
  89. 00BC: show_text_highpriority GXT 'MCAT07E' time 3000 flag 1  
  90.  
  91.  
  92. 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
 
Top