Guest User

Untitled

a guest
Feb 13th, 2020
805
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 6.56 KB | None | 0 0
  1.  
  2.  
  3. DEFINE MISSIONS 1
  4. //DEFINE MISSION {ID} 0 AT {LABEL} @
  5. DEFINE MISSION 0 AT @INTRO
  6. DEFINE EXTERNAL_SCRIPTS 0 // Use -1 in order not to compile AAA script
  7. //DEFINE SCRIPT {NAME} AT {LABEL} @
  8. DEFINE UNKNOWN_EMPTY_SEGMENT 0
  9. DEFINE UNKNOWN_THREADS_MEMORY 0
  10.  
  11. var
  12. $PLAYER_CHAR: Player
  13. end // var
  14. 03A4: name_thread 'MAIN'
  15. 0169: set_fade_color_RGB 0 0 0
  16. 01F0: set_max_wanted_level_to 6
  17. 0111: toggle_wasted_busted_check 0
  18. 00C0: set_current_time_hours_to 8 minutes_to 0
  19. 04E4: unknown_refresh_game_renderer_at 2175.1885 -1830.7075
  20. 03CB: set_rendering_origin_at 2175.1885 -1830.7075 16.1475
  21. 0053: $PLAYER_CHAR = create_player #NULL at 2175.1885 -1830.7075 16.1475
  22. 01F5: $PLAYER_ACTOR = create_player_actor $PLAYER_CHAR
  23. 07AF: $PLAYER_GROUP = player $PLAYER_CHAR group
  24. 0373: set_camera_directly_behind_player
  25. 01B6: set_weather 0
  26. 0001: wait 0 ms
  27. //087B: set_player $PLAYER_CHAR clothes_texture "PLAYER_FACE" model "HEAD" body_part 1
  28. //087B: set_player $PLAYER_CHAR clothes_texture "JEANSDENIM" model "JEANS" body_part 2
  29. //087B: set_player $PLAYER_CHAR clothes_texture "SNEAKERBINCBLK" model "SNEAKER" body_part 3
  30. //087B: set_player $PLAYER_CHAR clothes_texture "VEST" model "VEST" body_part 0
  31. //070D: rebuild_player $PLAYER_CHAR
  32. 01B4: toggle_player $PLAYER_CHAR can_move 1
  33. 016A: fade 1 time 0
  34. 04BB: select_interior 0
  35. 0629: change_integer_stat 181 to 4
  36. 016C: restart_if_wasted_at 2027.77 -1420.52 15.99 angle 137.0 town_number 0
  37. 016D: restart_if_busted_at 1550.68 -1675.49 14.51 angle 90.0 town_number 0
  38. 0180: set_on_mission_flag_to $ONMISSION // Note: your missions have to use the variable defined here
  39. 0004: $DEFAULT_WAIT_TIME = 250
  40. 03E6: remove_text_box
  41. start_mission 0
  42.  
  43. // put your create_thread commands here
  44. create_thread @SKIN
  45. //create_thread @DEATH
  46.  
  47.  
  48. :MAIN_LOOP
  49. 0001: wait $DEFAULT_WAIT_TIME ms
  50. 00BF: $TIME_HOURS = current_time_hours, $TIME_MINS = current_time_minutes
  51. 0002: jump @MAIN_LOOP
  52.  
  53.  
  54. // put your mods (threads) here
  55. :SKIN
  56. thread 'SKIN'
  57. model.Load(#HECK2)
  58. 038B: load_requested_models
  59.  
  60. :SKIN_01
  61. if
  62. not model.Available(#HECK2)
  63. jf @SKIN_02
  64. wait 0
  65. jump @SKIN_01
  66.  
  67. :SKIN_02
  68. 09C7: change_player $PLAYER_CHAR model_to #HECK2
  69. end_thread
  70.  
  71.  
  72. //:DEATH
  73. //thread 'DEAT'
  74. //04ED: load_animation "INT_ANIM"
  75. //
  76. //
  77. //:DEAT_10
  78. //wait 10
  79. //if
  80. //04EE: animation "INT_ANIM" loaded
  81. //jf @DEAT_10
  82. //jump @DEAT_12
  83. //
  84. //:DEAT_12
  85. //wait 0
  86. //if
  87. //00E1: player 0 pressed_key 15
  88. //jf @DEAT_12
  89. //player.CanMove($PLAYER_CHAR) = False
  90. //wait 1000
  91. //0605: actor $PLAYER_ACTOR perform_animation "AL_KILL" IFP "INT_ANIM" framedelta 16.0 loop 0 lockX 0 lockY 0 lockF 1 time -2
  92. //wait 5000
  93. //0687: clear_actor $PLAYER_ACTOR task
  94. //0605: actor $PLAYER_ACTOR perform_animation "AL_DED" IFP "INT_ANIM" framedelta 16.0 loop 1 lockX 1 lockY 1 lockF 1 time -2
  95. //actor.PutAt($PLAYER_ACTOR, 2175.4077, -1847.5839, 2.51270)
  96. //
  97. //end_thread
  98.  
  99.  
  100.  
  101.  
  102.  
  103. //-------------Mission 0---------------
  104. // put your missions here
  105.  
  106.  
  107. //allen final pos. 1 = 2175.0955 -1838.8103 16.1406 angle = 91.3772 anim = shot in shoulder, fall to "death" ; note: allen must face to his left inorder for the anim to play correctly.
  108. //... till we meet again
  109.  
  110.  
  111. //-------------Mission 0---------------
  112. // put your missions here
  113.  
  114. :INTRO
  115. thread 'INTRO'
  116. gosub @INTRO_40
  117. if
  118. wasted_or_busted
  119. jf @INTRO_38
  120. gosub @INTRO_18145
  121.  
  122. :INTRO_38
  123. $ONMISSION = 0
  124. mission_cleanup
  125. end_thread
  126.  
  127. :INTRO_40
  128. increment_mission_attempts
  129. $ONMISSION = 1
  130. 179@ = 0
  131. 32@ = 0
  132. camera.SetPosition(2176.9719, -1845.3679, 30.2523, 45.0, 0.0, -10.0)
  133. 054C: use_GXT_table 'INTRO1'
  134. 0169: set_fade_color_RGB 0 0 0
  135. fade 0 0
  136. 0662: printstring "AA"
  137. 03F0: enable_text_draw 1
  138. wait 0
  139. 03E0: draw_text_behind_textures 0
  140. 0349: set_text_draw_font 2
  141. wait 0
  142. 100@ = 0
  143. 178@ = 0
  144. 181@ = 0
  145. 32@ = 0
  146.  
  147. :INTRO_41
  148. if
  149. 0 > 179@
  150. jf @INTRO_42
  151. if
  152. 181@ == 0
  153. if
  154. 5000 > 32@
  155. jf @INTRO_42
  156. wait 0
  157. 181@ = 1
  158. gosub @INTRO_TEXT
  159. jump @INTRO_41
  160.  
  161. :INTRO_42
  162. if
  163. 0 > 179@
  164. jf @INTRO_43
  165. if
  166. 181@ == 1
  167. jf @INTRO_43
  168. if
  169. 10000 > 32@
  170. jf @INTRO_43
  171. wait 0
  172. 181@ = 2
  173. gosub @INTRO_TEXT2
  174. jump @INTRO_42
  175.  
  176. :INTRO_43
  177. if
  178. 0 > 179@
  179. jf @INTRO_43
  180. if
  181. 181@ == 2
  182. jf @INTRO_43
  183. if
  184. 15000 > 32@
  185. jf @INTRO_44
  186. wait 0
  187. 181@ = 3
  188. gosub @INTRO_TEXT3
  189. jump @INTRO_43
  190.  
  191. :INTRO_44
  192. if
  193. 0 > 179@
  194. jf @INTRO_45
  195. wait 0
  196. gosub @INTRO_TEXT
  197. gosub @INTRO_TEXT2
  198. gosub @INTRO_TEXT3
  199.  
  200. :INTRO_45
  201. wait 1000
  202. fade 1 1000
  203. wait 5000
  204.  
  205.  
  206. :INTRO_TEXT
  207. 179@ += 10
  208. 033F: set_text_draw_letter_size 0.8 1.8
  209. 0340: set_text_draw_RGBA 255 255 255 179@
  210. 0342: set_text_draw_centered 1
  211. 0343: set_text_draw_linewidth 600.0
  212. 060D: draw_text_shadow 0 rgba 0 0 0 255
  213. 033E: set_draw_text_position 305.0 180.0 GXT 'INTAA' // Francis INTL. Airport,
  214. return
  215.  
  216. :INTRO_TEXT2
  217. 179@ += 10
  218. 033F: set_text_draw_letter_size 0.8 1.8
  219. 0340: set_text_draw_RGBA 255 255 255 179@
  220. 0342: set_text_draw_centered 1
  221. 0343: set_text_draw_linewidth 600.0
  222. 060D: draw_text_shadow 0 rgba 0 0 0 255
  223. 033E: set_draw_text_position 305.0 180.0 GXT 'INTAA' // Francis INTL. Airport,
  224. 033F: set_text_draw_letter_size 0.8 1.8
  225. 0340: set_text_draw_RGBA 255 255 255 179@
  226. 0342: set_text_draw_centered 1
  227. 0343: set_text_draw_linewidth 600.0
  228. 060D: draw_text_shadow 0 rgba 0 0 0 255
  229. 033E: set_draw_text_position 320.0 200.0 GXT 'INTAB' // Francis INTL. Airport,
  230. return
  231.  
  232.  
  233. :INTRO_TEXT3
  234. 179@ += 10
  235. 033F: set_text_draw_letter_size 0.8 1.8
  236. 0340: set_text_draw_RGBA 255 255 255 179@
  237. 0342: set_text_draw_centered 1
  238. 0343: set_text_draw_linewidth 600.0
  239. 060D: draw_text_shadow 0 rgba 0 0 0 255
  240. 033E: set_draw_text_position 305.0 180.0 GXT 'INTAA' // Francis INTL. Airport,
  241. 033F: set_text_draw_letter_size 0.8 1.8
  242. 0340: set_text_draw_RGBA 255 255 255 179@
  243. 0342: set_text_draw_centered 1
  244. 0343: set_text_draw_linewidth 600.0
  245. 060D: draw_text_shadow 0 rgba 0 0 0 255
  246. 033E: set_draw_text_position 320.0 200.0 GXT 'INTAB' // Francis INTL. Airport,
  247. 033F: set_text_draw_letter_size 0.8 1.8
  248. 0340: set_text_draw_RGBA 255 255 255 179@
  249. 0342: set_text_draw_centered 1
  250. 0343: set_text_draw_linewidth 600.0
  251. 060D: draw_text_shadow 0 rgba 0 0 0 255
  252. 033E: set_draw_text_position 320.0 220.0 GXT 'INTAC' // Francis INTL. Airport,
  253. return
  254.  
  255. :INTRO_18100
  256. 0318: set_latest_mission_passed 'INTRO'
  257. 01E3: show_text_1number_styled GXT 'M_PASSS' number 200 time 5000 style 1
  258. 0998: add_respect 3
  259. Player.Money($PLAYER_CHAR) += 100
  260. Player.ClearWantedLevel($PLAYER_CHAR)
  261. 0394: play_music 1
  262. return
  263.  
  264. :INTRO_18140 //if PLAYER_ACTOR wasted or busted
  265. return
  266.  
  267. :INTRO_18145
  268. 00BA: text_styled 'M_FAIL' 5000 ms 1
  269. return
  270.  
  271.  
  272.  
  273.  
  274. //-------------External script 0---------------
  275. // put your external scripts here
Advertisement
Add Comment
Please, Sign In to add comment