Advertisement
Guest User

Untitled

a guest
Oct 30th, 2013
111
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 4.00 KB | None | 0 0
  1. // This file was decompiled using sascm.ini published by GTAG (http://gtag.gtagaming.com/opcode-database) on 14.6.2013
  2.  
  3. {$VERSION 3.1.1000}
  4. {$CLEO .cs}
  5.  
  6. //-------------MAIN---------------
  7. if
  8. 29@ = SAMP.Base()
  9. else_jump @Noname_16
  10.  
  11. :Noname_16
  12. wait 400
  13. SAMP.Available
  14. else_jump @Noname_16
  15. SAMP.ReadSAMPMemory(12@, 24672, 2)
  16. SAMP.ReadSAMPMemory(13@, 17104, 2)
  17. wait 1200
  18. msg " Invisible by DubStep_ loaded" 16729344
  19. msg " For Silent-Hack.Ru" 16729344
  20. if
  21. 8AE4: not directory_exists "CLEO\ini"
  22. else_jump @Noname_158
  23. 0AE5: create_directory "CLEO\ini" // IF and SET
  24.  
  25. :Noname_158
  26. if
  27. not File.Exists("CLEO\ini\invisible.ini")
  28. else_jump @Noname_333
  29. File.INIWriteInt(160, "CLEO\ini\invisible.ini", "Settings", "Key1")
  30. File.INIWriteInt(35, "CLEO\ini\invisible.ini", "Settings", "Key2")
  31. File.INIWriteFloat(-70.0, "CLEO\ini\invisible.ini", "Settings", "Offset")
  32.  
  33. :Noname_333
  34. 4@ = File.INIReadInt("CLEO\ini\invisible.ini", "Settings", "Key1")
  35. 5@ = File.INIReadInt("CLEO\ini\invisible.ini", "Settings", "Key2")
  36. 6@ = File.INIReadFloat("CLEO\ini\invisible.ini", "Settings", "Offset")
  37.  
  38. :Noname_470
  39. wait 0
  40. if and
  41. key 4@
  42. key 5@
  43. else_jump @Noname_664
  44. 0B12: 7@ = 7@ XOR 1
  45. if
  46. 7@ == 1
  47. else_jump @Noname_580
  48. SAMP.WriteSAMPMemory(24672, 50064, 2)
  49. SAMP.WriteSAMPMemory(17104, 50064, 2)
  50. 0ACD: show_text_highpriority "You ~g~invisible~w~" time 2000
  51. jump @Noname_625
  52.  
  53. :Noname_580
  54. wait 0
  55. SAMP.WriteSAMPMemory(17104, 13@, 2)
  56. SAMP.WriteSAMPMemory(24672, 12@, 2)
  57. 0ACD: show_text_highpriority "You ~r~visible" time 2000
  58.  
  59. :Noname_625
  60. wait 0
  61. if or
  62. not key 4@
  63. not key 5@
  64. else_jump @Noname_657
  65. jump @Noname_664
  66.  
  67. :Noname_657
  68. jump @Noname_625
  69.  
  70. :Noname_664
  71. if and
  72. 7@ == 1
  73. 32@ >= 500
  74. else_jump @Noname_996
  75. 32@ = 0
  76. if
  77. 09DE: actor $PLAYER_ACTOR entering_car
  78. else_jump @Noname_746
  79.  
  80. :Noname_713
  81. not Actor.Driving($PLAYER_ACTOR)
  82. else_jump @Noname_736
  83. wait 0
  84. jump @Noname_713
  85.  
  86. :Noname_736
  87. SAMP.WriteSAMPMemory(24672, 12@, 2)
  88.  
  89. :Noname_746
  90. Actor.StorePos($PLAYER_ACTOR, 1@, 2@, 3@)
  91. if
  92. not 3@ >= 900.0
  93. else_jump @Noname_851
  94. 02CE: 3@ = ground_z_at 1@ 2@ 3@
  95. 005B: 3@ += 6@ // (float)
  96. if or
  97. not 3@ >= -85.0
  98. 3@ > 50.0
  99. else_jump @Noname_844
  100. 3@ = -85.0
  101.  
  102. :Noname_844
  103. jump @Noname_872
  104.  
  105. :Noname_851
  106. 04C4: store_coords_to 1@ 2@ 3@ from_actor $PLAYER_ACTOR with_offset 0 0 6@
  107.  
  108. :Noname_872
  109. if
  110. Actor.Driving($PLAYER_ACTOR)
  111. else_jump @Noname_977
  112. 8@ = Actor.CurrentCar($PLAYER_ACTOR)
  113. 9@ = SAMP.GetSAMPVehicleIDByCarHandle(8@)
  114. if
  115. 9@ > -1
  116. else_jump @Noname_951
  117. call_scm_func @Noname_1171 4 1@ 2@ 3@ 9@
  118. jump @Noname_970
  119.  
  120. :Noname_951
  121. call_scm_func @Noname_1003 3 1@ 2@ 3@
  122.  
  123. :Noname_970
  124. jump @Noname_996
  125.  
  126. :Noname_977
  127. call_scm_func @Noname_1003 3 1@ 2@ 3@
  128.  
  129. :Noname_996
  130. jump @Noname_470
  131.  
  132. :Noname_1003
  133. 3@ = SAMP.GetSAMPPlayerIDByActorHandle($PLAYER_ACTOR)
  134. 3@ = SAMP.GetPlayerStruct(3@)
  135. 3@ += 109
  136. 4@ = Memory.Alloc(68)
  137. call_scm_func @Noname_1352 3 4@ 3@ 68
  138. 0085: 5@ = 4@ // (int)
  139. 5@ += 6
  140. Memory.Write(5@, 4, 0@, 0)
  141. 5@ += 4
  142. Memory.Write(5@, 4, 1@, 0)
  143. 5@ += 4
  144. Memory.Write(5@, 4, 2@, 0)
  145. 5@ = RakNet.NewBitStream()
  146. RakNet.Write(5@, 212, BS_TYPE_BYTE, 1)
  147. RakNet.Write(5@, 4@, BS_TYPE_ARRAY, 68)
  148. RakNet.Send(5@, 1, 1, 0)
  149. RakNet.DeleteBitStream(5@)
  150. Memory.Free(4@)
  151. 0AB2: ret 0
  152.  
  153. :Noname_1171
  154. 5@ = SAMP.GetSAMPPlayerIDByActorHandle($PLAYER_ACTOR)
  155. 5@ = SAMP.GetPlayerStruct(5@)
  156. 5@ += 177
  157. 4@ = Memory.Alloc(63)
  158. call_scm_func @Noname_1352 3 4@ 5@ 63
  159. 0085: 5@ = 4@ // (int)
  160. Memory.Write(5@, 2, 3@, 0)
  161. 5@ += 24
  162. Memory.Write(5@, 4, 0@, 0)
  163. 5@ += 4
  164. Memory.Write(5@, 4, 1@, 0)
  165. 5@ += 4
  166. Memory.Write(5@, 4, 2@, 0)
  167. 5@ = RakNet.NewBitStream()
  168. RakNet.Write(5@, 217, BS_TYPE_BYTE, 1)
  169. RakNet.Write(5@, 4@, BS_TYPE_ARRAY, 63)
  170. RakNet.Send(5@, 1, 1, 0)
  171. RakNet.DeleteBitStream(5@)
  172. Memory.Free(4@)
  173. 0AB2: ret 0
  174.  
  175. :Noname_1352
  176. 2@ -= 1
  177. 3@ = 0
  178.  
  179. :Noname_1366
  180. 4@ = Memory.Read(1@, 1, 0)
  181. Memory.Write(0@, 1, 4@, 0)
  182. 1@ += 1
  183. 0@ += 1
  184. 3@ += 1
  185. 001D: 3@ > 2@ // (int)
  186. else_jump @Noname_1366
  187. 0AB2: ret 0
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement