Want more features on Pastebin? Sign Up, it's FREE!
Guest

Dutchy3010

By: a guest on May 15th, 2009  |  syntax: None  |  size: 2.46 KB  |  views: 350  |  expires: Never
download  |  raw  |  embed  |  report abuse  |  print
Text below is selected. Please press Ctrl+C to copy to your clipboard. (⌘+C on Mac)
  1. // This file was decompiled using sascm.ini published by Seemann (http://sannybuilder.com/files/SASCM.rar) on 13.10.2007
  2. DEFINE OBJECTS 1
  3. DEFINE OBJECT SANNY BUILDER 3.01      
  4.  
  5. DEFINE MISSIONS 0
  6.  
  7. DEFINE EXTERNAL_SCRIPTS 0 // Use -1 in order not to compile AAA script
  8.  
  9. DEFINE UNKNOWN_EMPTY_SEGMENT 0
  10.  
  11. DEFINE UNKNOWN_THREADS_MEMORY 0
  12.  
  13. {$VERSION 3.1.0027}
  14.  
  15. //-------------MAIN---------------
  16. thread 'MAIN'
  17. 01F0: set_max_wanted_level_to 6
  18. set_wb_check_to 0
  19. 00C0: set_current_time_hours_to 8 minutes_to 0
  20. 04E4: unknown_refresh_game_renderer_at 2488.56 -1666.84
  21. Camera.SetAtPos(2488.56, -1666.84, 13.38)
  22. $PLAYER_CHAR = Player.Create(#NULL, 2488.56, -1666.84, 13.38)
  23. $PLAYER_ACTOR = Actor.EmulateFromPlayer($PLAYER_CHAR)
  24. 07AF: $PLAYER_GROUP = player $PLAYER_CHAR group
  25. Camera.SetBehindPlayer
  26. set_weather 0
  27. wait 0
  28. Player.SetClothes($PLAYER_CHAR, "PLAYER_FACE", "HEAD", Head)
  29. Player.SetClothes($PLAYER_CHAR, "JEANSDENIM", "JEANS", Legs)
  30. Player.SetClothes($PLAYER_CHAR, "SNEAKERBINCBLK", "SNEAKER", Shoes)
  31. Player.SetClothes($PLAYER_CHAR, "VEST", "VEST", Torso)
  32. Player.Build($PLAYER_CHAR)
  33. Player.CanMove($PLAYER_CHAR) = True
  34. fade 1 0
  35. select_interior 0
  36. 0629: change_integer_stat 181 to 4
  37. 016C: restart_if_wasted_at 2027.77 -1420.52 15.99 angle 137.0 town_number 0
  38. 016D: restart_if_busted_at 1550.68 -1675.49 14.51 angle 90.0 town_number 0
  39. 0180: set_on_mission_flag_to $ONMISSION // Note: your missions have to use the variable defined here
  40. $DEFAULT_WAIT_TIME = 250
  41. 03E6: remove_text_box
  42. create_thread @SAVE
  43.  
  44. :MAIN_305
  45. wait $DEFAULT_WAIT_TIME
  46. 00BF: $TIME_HOURS = current_time_hours, $TIME_MINS = current_time_minutes
  47. jump @MAIN_305
  48.  
  49.  
  50.  
  51.  
  52. :SAVE
  53. thread "SAVE"
  54.  
  55. // location of the save pickup
  56. $save_x = 2488.6506
  57. $save_y = -1660.9884
  58. $save_z = 13.3359
  59.  
  60. :SAVE_LOOP
  61. 0395: clear_area 1 at $save_x $save_y $save_z range 1.0
  62. $SAVE_PICKUP = Pickup.Create(#PICKUPSAVE, 3, $save_x, $save_y, $save_z)
  63.  
  64. repeat
  65.     wait 100
  66. until 0214:   pickup $SAVE_PICKUP picked_up
  67.  
  68. $ONMISSION = 1 // integer values
  69. Player.CanMove($PLAYER_CHAR) = False
  70. 03D8: show_save_screen
  71.  
  72. repeat
  73.     wait 100
  74. until 03D9:   save_done
  75.  
  76. Pickup.Destroy($SAVE_PICKUP)
  77.  
  78. repeat
  79.     wait 100
  80. until Player.Defined($PLAYER_CHAR)
  81.  
  82. Camera.Restore_WithJumpCut
  83. Camera.SetBehindPlayer
  84. Player.CanMove($PLAYER_CHAR) = True
  85.  
  86. $ONMISSION = 0
  87.  
  88. repeat
  89. wait 0
  90. until 80EC:   not actor $PLAYER_ACTOR 0 near_point 2488.6506 -1660.9884 radius 2.0 2.0
  91.  
  92. jump @SAVE_LOOP
  93.  
  94. end_thread
clone this paste RAW Paste Data