SHARE
TWEET

Untitled

a guest Aug 17th, 2018 126 Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
  1. :AMBIENT
  2. thread 'AMBIENT'
  3. $11041 = Object.Init(#AP_RADAR1_01, 1663.62, -2362.7, 31.72)
  4. Object.RemoveFromMissionCleanupList($11041)
  5. $11040 = Object.Init(#AP_RADAR1_01, 1709.41, -2362.7, 31.72)
  6. Object.RemoveFromMissionCleanupList($11040)
  7. $11039 = Object.Init(#AP_RADAR1_01, -1691.59, -619.7, 29.62)
  8. Object.RemoveFromMissionCleanupList($11039)
  9. $11038 = Object.Init(#AP_RADAR1_01, 1294.89, 1502.55, 26.02)
  10. Object.RemoveFromMissionCleanupList($11038)
  11. 0@ = 0.0
  12. 10@ = 0
  13.  
  14. :AMBIENT_140
  15. wait 10
  16.   $11037 == 0
  17. else_jump @AMBIENT_203
  18.    Player.Defined($PLAYER_CHAR)
  19. else_jump @AMBIENT_477
  20. 077E: get_active_interior_to $Active_Interior
  21.   $Active_Interior == 0
  22. else_jump @AMBIENT_196
  23. $11037 = 1
  24.  
  25. :AMBIENT_196
  26. jump @AMBIENT_234
  27.  
  28. :AMBIENT_203
  29.    Player.Defined($PLAYER_CHAR)
  30. else_jump @AMBIENT_477
  31. 077E: get_active_interior_to $Active_Interior
  32.    not $Active_Interior == 0
  33. $11037 = 0
  34.  
  35. :AMBIENT_234
  36. 00BF: $Time_Hours = current_time_hours, $Time_Mins = current_time_minutes
  37. if and
  38.   $Time_Hours >= 22
  39.   10@ == 0
  40. else_jump @AMBIENT_302
  41. $11036 = Object.Init(#OD_LIGHTBEAM, 154.311, -1951.8, 48.406)
  42. Object.RemoveFromMissionCleanupList($11036)
  43. 10@ = 1
  44.  
  45. :AMBIENT_302
  46. Object.Angle($11041) = 0@
  47. Object.Angle($11040) = 0@
  48. Object.Angle($11039) = 0@
  49. Object.Angle($11038) = 0@
  50.   10@ == 1
  51. else_jump @AMBIENT_366
  52. 0453: set_object $11036 XYZ_rotation 90.0 0@ 0.0
  53.  
  54. :AMBIENT_366
  55. 0079: 0@ += frame_delta_time * 2.0
  56.   0@ > 359.9
  57. else_jump @AMBIENT_403
  58. 0@ -= 360.0
  59.  
  60. :AMBIENT_403
  61. 00BF: $Time_Hours = current_time_hours, $Time_Mins = current_time_minutes
  62. if and
  63.   $Time_Hours >= 5
  64.   20 > $Time_Hours
  65.   10@ == 1
  66. 80C2:   not sphere_onscreen 154.311 -1951.8 48.406 radius 50.0
  67. else_jump @AMBIENT_477
  68. Object.Destroy($11036)
  69. 10@ = 0
  70.  
  71. :AMBIENT_477
  72. jump @AMBIENT_140
  73. 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