Pastebin launched a little side project called VERYVIRAL.com, check it out ;-) Want more features on Pastebin? Sign Up, it's FREE!
Guest

Untitled

By: a guest on Dec 12th, 2012  |  syntax: None  |  size: 5.88 KB  |  views: 103  |  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. {$CLEO}
  2. {$VERSION 3.1.0040}
  3. const
  4.     WEATHER_RAIN_1 = 8    // RAINY-SF
  5.     WEATHER_RAIN_2 = 16  // RAINY-COUNTRYSIDE
  6. end    
  7. var
  8. 20@ : Integer
  9. 21@ : Integer
  10. end
  11. 0000:
  12. 1@ = 0
  13. 0A9F: 0@ = current_thread_pointer
  14. 0A8E: 10@ = 0@ + 0x10
  15. 0A8D: 10@ = read_memory 10@ size 4 virtual_protect 0
  16. 0A8F: 11@ = 10@ - @lbl
  17. 0A8C: write_memory 0x004856D8 size 4 value 11@ virtual_protect 1
  18. 0@ += 0x40 // 0@ = 1@'s global address; fixed 02/10/10
  19. 11@ += 2
  20. 0A8C: write_memory 11@ size 4 value 0@ virtual_protect 0
  21. while true
  22.     wait 0
  23. 0A8D: 20@ = read_memory 0xC81320 size 2 virtual_protect 0   // [word] Current weather
  24.             if or
  25.                 20@ == WEATHER_RAIN_1
  26.                 20@ == WEATHER_RAIN_2
  27.             then
  28. 0B52: get_audio 31@ state 21@ volume 32@ position 32@ length 32@ loop 32@ menu_flag 32@ tempo 32@ speed 32@ pitch 32@ synchronize speed 32@ volume 32@
  29.                         if
  30.                         21@ == 0
  31.                         then
  32.                         0B51: 31@ = play_media_file "audio\rain-02.mp3" direct_path 0 prescan 1 volume 100.0 position 0.0 loop 1 menu_flag 2 tempo 0.0 speed 100.0 pitch 0.0 synchronize speed 1 volume 1 save 0
  33.                         0B53: set_audio 31@ volume 25.0 for 0 ms position -1.0 loop -1 menu_flag -1 tempo -100.0 speed -1000.0 pitch -100.0 synchronize speed -1 volume -1
  34.                         end
  35.             else
  36. 0B52: get_audio 31@ state 21@ volume 32@ position 32@ length 32@ loop 32@ menu_flag 32@ tempo 32@ speed 32@ pitch 32@ synchronize speed 32@ volume 32@
  37.             if
  38.             21@ <> 0
  39.             then
  40.             0B50: stop_audio 31@
  41.             end
  42.             end
  43.        
  44.     if
  45.         1@ == 1
  46.     then
  47.        //gosub @cleo_music_player
  48.        gosub @phone
  49.        gosub @RainModEffect
  50.        gosub @speed
  51.        //gosub @tacticalscreen
  52.  
  53.         1@ = 0
  54.     end
  55. end
  56.  
  57. :lbl
  58. hex
  59.     C705 00000000 01000000  // MOV DWORD PTR DS:[00000000], 1
  60.     B8 BB414800             // MOV EAX,004841BB
  61.     FFE0                    // JMP EAX
  62. end
  63.  
  64. :phone
  65. 0390: load_txd_dictionary "MOBILE"
  66. 038F: load_texture "MOBILE" as 123 // Load dictionary with 0390 first
  67. return
  68.  
  69. :RainModEffect
  70. 0390: load_txd_dictionary 'RainMod'
  71. 038F: load_texture "drop_1" as 119 // Load dictionary with 0390 first
  72. 038F: load_texture "drop_2" as 120 // Load dictionary with 0390 first
  73. 038F: load_texture "drop_3" as 121 // Load dictionary with 0390 first
  74. 038F: load_texture "drop_4" as 122 // Load dictionary with 0390 first
  75. return
  76.  
  77. :cleo_music_player
  78. 0390: load_txd_dictionary 'rstns'
  79. 038F: load_texture "driver" as 68
  80. 038F: load_texture "truecrime" as 69
  81. 038F: load_texture "mc2" as 70
  82. 038F: load_texture "mc3" as 71
  83. 038F: load_texture "gtacw" as 72
  84. 038F: load_texture "gta1" as 73
  85. 038F: load_texture "gta2" as 74
  86. 038F: load_texture "3_FLASH" as 75
  87. 038F: load_texture "3_GAME" as 76
  88. 038F: load_texture "3_HEAD" as 77
  89. 038F: load_texture "3_KJAH" as 78
  90. 038F: load_texture "3_LIPS" as 79
  91. 038F: load_texture "3_MSX" as  80
  92. 038F: load_texture "3_RISE" as 81
  93. 038F: load_texture "vc_emotion" as 82
  94. 038F: load_texture "vc_fever" as 83
  95. 038F: load_texture "vc_flash" as 84
  96. 038F: load_texture "vc_vrock" as 85
  97. 038F: load_texture "vc_wave" as 86
  98. 038F: load_texture "vc_wildstyle" as 87
  99. 038F: load_texture "lcs_flash" as 88
  100. 038F: load_texture "lcs_head" as 89
  101. 038F: load_texture "lcs_kjah" as 90
  102. 038F: load_texture "lcs_lips" as 91
  103. 038F: load_texture "lcs_msx" as 92
  104. 038F: load_texture "lcs_rise" as 93
  105. 038F: load_texture "vcs_emotion" as 94
  106. 038F: load_texture "vcs_espantoso" as 95
  107. 038F: load_texture "vcs_flash" as 96
  108. 038F: load_texture "vcs_fresh" as 97
  109. 038F: load_texture "vcs_paradise" as 98
  110. 038F: load_texture "vcs_vrock" as 99
  111. 038F: load_texture "vcs_wave" as 100
  112. return
  113.  
  114. :tacticalscreen
  115. 0390: load_txd_dictionary 'weapon'
  116.  
  117. 038F: load_texture "gun_vibe1" as 66
  118. 038F: load_texture "gun_vibe2" as 67
  119. 038F: load_texture "gun_cane" as 68
  120. 038F: load_texture "dummy" as 69
  121. 038F: load_texture "colt45" as 70
  122. 038F: load_texture "silenced" as 71
  123. 038F: load_texture "desert_eagle" as 72
  124. 038F: load_texture "unarmed" as 73
  125. 038F: load_texture "brassknuckle" as 74
  126.  
  127. 038F: load_texture "golfclub" as 75
  128. 038F: load_texture "nitestick" as 76
  129. 038F: load_texture "knifecur" as 77
  130. 038F: load_texture "bat" as 78
  131. 038F: load_texture "shovel" as 79
  132. 038F: load_texture "katana" as 80
  133. 038F: load_texture "poolcue" as 81
  134. 038F: load_texture "chnsaw" as 82
  135. 038F: load_texture "chromegun" as 83
  136. 038F: load_texture "sawnoff" as 84
  137. 038F: load_texture "shotgspa" as 85
  138. 038F: load_texture "micro_uzi" as 86
  139. 038F: load_texture "mp5lng" as 87
  140. 038F: load_texture "tec9" as 88
  141. 038F: load_texture "ak47" as 89
  142. 038F: load_texture "m4" as 90
  143. 038F: load_texture "cuntgun" as 91
  144. 038F: load_texture "sniper" as 92
  145. 038F: load_texture "rocketla" as 93
  146. 038F: load_texture "heatseek" as 94
  147. 038F: load_texture "flame" as 95
  148. 038F: load_texture "minigun" as 96
  149. 038F: load_texture "grenade" as 97
  150. 038F: load_texture "molotov" as 98
  151. 038F: load_texture "satchel" as 99
  152. 038F: load_texture "spraycan" as 100
  153. 038F: load_texture "fire_ex" as 101
  154. 038F: load_texture "camera" as 102
  155. 038F: load_texture "flowera" as 103
  156. 038F: load_texture "goggles" as 104
  157. 038F: load_texture "gun_para" as 105
  158. 038F: load_texture "detonator" as 106
  159. 038F: load_texture "teargas" as 107
  160. 038F: load_texture "notepad" as 108
  161. 038F: load_texture "trad" as 109
  162. 038F: load_texture "dot" as 110
  163. 038F: load_texture "trad_h" as 111
  164. 038F: load_texture "trad_m" as 112
  165.  
  166. 038F: load_texture "gun_dildo1" as 113  //64
  167. 038F: load_texture "gun_dildo2" as 114  //65
  168. return
  169.  
  170. :speed
  171. 0390: load_txd_dictionary "SPEED"
  172. 038F: load_texture "STRELK" as 115 // Load dictionary with 0390 first
  173. 038F: load_texture "CIF" as 116 // Load dictionary with 0390 first
  174. 038F: load_texture "CIFN" as 117 // Load dictionary with 0390 first
  175. 038F: load_texture "STRELKN" as 118 // Load dictionary with 0390 first
  176. return