Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- {
- use macro (Ctrl+J) "headsa"
- to insert a file header
- }
- {$VERSION 3.0.0000}
- thread 'MAIN'
- var
- $PLAYER_CHAR: Player
- end // var
- 01F0: set_max_wanted_level_to 6
- set_wb_check_to 0
- 00C0: set_current_time 8 0
- 04E4: unknown_refresh_game_renderer_at 2488.5601 -1666.84
- Camera.SetAtPos(2488.5601, -1666.84, 13.38)
- $PLAYER_CHAR = Player.Create(#NULL, 2488.5601, -1666.84, 13.38)
- $PLAYER_ACTOR = Actor.EmulateFromPlayer($PLAYER_CHAR)
- 07AF: $PLAYER_GROUP = player $PLAYER_CHAR group
- Camera.SetBehindPlayer
- set_weather 0
- wait 0 ms
- $PLAYER_CHAR.SetClothes("PLAYER_FACE", "HEAD", Head)
- $PLAYER_CHAR.SetClothes("JEANSDENIM", "JEANS", Legs)
- $PLAYER_CHAR.SetClothes("SNEAKERBINCBLK", "SNEAKER", Shoes)
- $PLAYER_CHAR.SetClothes("VEST", "VEST", Torso)
- $PLAYER_CHAR.Build
- $PLAYER_CHAR.CanMove = True
- fade 1 (out) 0 ms
- select_interior 0
- 0629: change_stat 181 (islands unlocked) to 4
- 016C: restart_if_wasted at 2027.77 -1420.52 15.99 angle 137.0 for_town_number 0
- 016D: restart_if_busted at 1550.68 -1675.49 14.51 angle 90.0 for_town_number 0
- 0180: set_on_mission_flag_to $ONMISSION // Note: your missions have to use the variable defined here ($ONMISSION)
- 03E6: remove_text_box
- // put your create_thread commands here
- create_thread @MODEL
- // IDLE LOOP
- :leeg
- wait 500
- jump @leeg
- end_thread
- :MODEL
- thread 'MODEL'
- 0518: $ASSET = create_available_asset_pickup 'PROP_3' at 2487.5598 -1658.3495 13.3528 price 100
- 0213: $HEALTH = create_pickup #HEALTH type 3 at 2484.5598 -1658.3495 13.3528
- 032B: $MINIGUN = create_weapon_pickup #MINIGUN group 15 ammo 5000 at 2490.5598 -1658.3495 13.3528
- 03DC: 1@ = create_marker_above_pickup $MINIGUN
- repeat
- wait 0
- until 0214: pickup $MINIGUN picked_up
- 0164: disable_marker 1@
- 0247: load_model #BFYST
- 0247: load_model #MINIGUN
- 038B: load_requested_models
- :MODEL_LOAD
- if and
- 8248: not model #BFYST available
- 8248: not model #MINIGUN available
- else_jump @MODEL_SPAWN
- wait 0 ms
- jump @MODEL_LOAD
- :MODEL_SPAWN
- 10@ = Actor.Create(CIVFEMALE, #BFYST, 2488.5601, -1680.84, 13.3438 )
- 01B2: give_actor 10@ weapon 38 ammo 500 // Load the weapon model before using this
- 02E2: set_actor 10@ weapon_accuracy_to 90
- 0223: set_actor 10@ health_to 1000
- 05E2: AS_actor 10@ kill_actor $PLAYER_ACTOR
- repeat
- wait 100
- until 0118: actor 10@ dead
- 0109: player $PLAYER_CHAR money += 100
- repeat
- wait 100
- until 0214: pickup $ASSET picked_up
- 00BC: show_text_highpriority GXT 'MCAT07E' time 3000 flag 1
- end_thread
RAW Paste Data
