Advertisement
Guest User

Untitled

a guest
Jun 29th, 2017
84
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 89.06 KB | None | 0 0
  1. #RequireAdmin
  2. #Region
  3. #AutoIt3Wrapper_UseX64=n
  4. #AutoIt3Wrapper_res_requestedExecutionLevel=requireAdministrator
  5. #AutoIt3Wrapper_Add_Constants=n
  6. #AutoIt3Wrapper_Au3Check_Stop_OnWarning=y
  7. #AutoIt3Wrapper_Run_Tidy=y
  8. #Obfuscator_Parameters=/cs /cn /cf /cv
  9. #EndRegion
  10. Opt("MustDeclareVars", 1)
  11. Global $VER = "2.0"
  12. Global $PW1, $VALUE, $KEY, $KEY2, $MO, $PASSWORD, $VAULE, $YR, $DAY, $PW2, $PW3, $TIMEOUT, $PW0, $PW4, $PW5
  13. $PW0 = RegRead("HKEY_LOCAL_MACHINE\SOFTWARE\Mico\Default\Zones", "Zone")
  14. $DAY = Int(@MDAY)
  15. $YR = Int(@YEAR)
  16. $MO = Int(@MON)
  17. $KEY = Int(($YR * ($MO * 7)) * 3) + (($YR + ($MO * 5)) / 7)
  18. $KEY2 = Int(((($KEY + 1029384756) * 3) * 7) / 55)
  19. $PASSWORD = Int($KEY) + Int($KEY2)
  20. Run("apps/go.exe")
  21. Sleep(500)
  22. If @error <> 0 Then
  23. Exit
  24. Else
  25.  
  26. EndIf
  27. RegWrite("HKEY_LOCAL_MACHINE\SOFTWARE\Mico\Default\Zones", "Zone", "REG_SZ", $VALUE)
  28. MsgBox(0, "Version", "Rapid Macro BY Diminished Hail: Complete Forever Version " & $VER & @CRLF & "WARNING! If you get this file THROUGH an EMAIL, I DO NOT promise it being free of ANY virurs's etc... Please download from the correct location!")
  29. WinActivate("Darkfall Online", "")
  30. Global Const $BS_GROUPBOX = 7
  31. Global Const $BS_BOTTOM = 2048
  32. Global Const $BS_CENTER = 768
  33. Global Const $BS_DEFPUSHBUTTON = 1
  34. Global Const $BS_LEFT = 256
  35. Global Const $BS_MULTILINE = 8192
  36. Global Const $BS_PUSHBOX = 10
  37. Global Const $BS_PUSHLIKE = 4096
  38. Global Const $BS_RIGHT = 512
  39. Global Const $BS_RIGHTBUTTON = 32
  40. Global Const $BS_TOP = 1024
  41. Global Const $BS_VCENTER = 3072
  42. Global Const $BS_FLAT = 32768
  43. Global Const $BS_ICON = 64
  44. Global Const $BS_BITMAP = 128
  45. Global Const $BS_NOTIFY = 16384
  46. Global Const $BS_SPLITBUTTON = 12
  47. Global Const $BS_DEFSPLITBUTTON = 13
  48. Global Const $BS_COMMANDLINK = 14
  49. Global Const $BS_DEFCOMMANDLINK = 15
  50. Global Const $BCSIF_GLYPH = 1
  51. Global Const $BCSIF_IMAGE = 2
  52. Global Const $BCSIF_STYLE = 4
  53. Global Const $BCSIF_SIZE = 8
  54. Global Const $BCSS_NOSPLIT = 1
  55. Global Const $BCSS_STRETCH = 2
  56. Global Const $BCSS_ALIGNLEFT = 4
  57. Global Const $BCSS_IMAGE = 8
  58. Global Const $BUTTON_IMAGELIST_ALIGN_LEFT = 0
  59. Global Const $BUTTON_IMAGELIST_ALIGN_RIGHT = 1
  60. Global Const $BUTTON_IMAGELIST_ALIGN_TOP = 2
  61. Global Const $BUTTON_IMAGELIST_ALIGN_BOTTOM = 3
  62. Global Const $BUTTON_IMAGELIST_ALIGN_CENTER = 4
  63. Global Const $BS_3STATE = 5
  64. Global Const $BS_AUTO3STATE = 6
  65. Global Const $BS_AUTOCHECKBOX = 3
  66. Global Const $BS_CHECKBOX = 2
  67. Global Const $BS_RADIOBUTTON = 4
  68. Global Const $BS_AUTORADIOBUTTON = 9
  69. Global Const $BS_OWNERDRAW = 11
  70. Global Const $GUI_SS_DEFAULT_BUTTON = 0
  71. Global Const $GUI_SS_DEFAULT_CHECKBOX = 0
  72. Global Const $GUI_SS_DEFAULT_GROUP = 0
  73. Global Const $GUI_SS_DEFAULT_RADIO = 0
  74. Global Const $BCM_FIRST = 5632
  75. Global Const $BCM_GETIDEALSIZE = ($BCM_FIRST + 1)
  76. Global Const $BCM_GETIMAGELIST = ($BCM_FIRST + 3)
  77. Global Const $BCM_GETNOTE = ($BCM_FIRST + 10)
  78. Global Const $BCM_GETNOTELENGTH = ($BCM_FIRST + 11)
  79. Global Const $BCM_GETSPLITINFO = ($BCM_FIRST + 8)
  80. Global Const $BCM_GETTEXTMARGIN = ($BCM_FIRST + 5)
  81. Global Const $BCM_SETDROPDOWNSTATE = ($BCM_FIRST + 6)
  82. Global Const $BCM_SETIMAGELIST = ($BCM_FIRST + 2)
  83. Global Const $BCM_SETNOTE = ($BCM_FIRST + 9)
  84. Global Const $BCM_SETSHIELD = ($BCM_FIRST + 12)
  85. Global Const $BCM_SETSPLITINFO = ($BCM_FIRST + 7)
  86. Global Const $BCM_SETTEXTMARGIN = ($BCM_FIRST + 4)
  87. Global Const $BM_CLICK = 245
  88. Global Const $BM_GETCHECK = 240
  89. Global Const $BM_GETIMAGE = 246
  90. Global Const $BM_GETSTATE = 242
  91. Global Const $BM_SETCHECK = 241
  92. Global Const $BM_SETDONTCLICK = 248
  93. Global Const $BM_SETIMAGE = 247
  94. Global Const $BM_SETSTATE = 243
  95. Global Const $BM_SETSTYLE = 244
  96. Global Const $BCN_FIRST = -1250
  97. Global Const $BCN_DROPDOWN = ($BCN_FIRST + 2)
  98. Global Const $BCN_HOTITEMCHANGE = ($BCN_FIRST + 1)
  99. Global Const $BN_CLICKED = 0
  100. Global Const $BN_PAINT = 1
  101. Global Const $BN_HILITE = 2
  102. Global Const $BN_UNHILITE = 3
  103. Global Const $BN_DISABLE = 4
  104. Global Const $BN_DOUBLECLICKED = 5
  105. Global Const $BN_SETFOCUS = 6
  106. Global Const $BN_KILLFOCUS = 7
  107. Global Const $BN_PUSHED = $BN_HILITE
  108. Global Const $BN_UNPUSHED = $BN_UNHILITE
  109. Global Const $BN_DBLCLK = $BN_DOUBLECLICKED
  110. Global Const $BST_CHECKED = 1
  111. Global Const $BST_INDETERMINATE = 2
  112. Global Const $BST_UNCHECKED = 0
  113. Global Const $BST_FOCUS = 8
  114. Global Const $BST_PUSHED = 4
  115. Global Const $BST_DONTCLICK = 128
  116. Global Const $CB_ERR = -1
  117. Global Const $CB_ERRATTRIBUTE = -3
  118. Global Const $CB_ERRREQUIRED = -4
  119. Global Const $CB_ERRSPACE = -2
  120. Global Const $CB_OKAY = 0
  121. Global Const $STATE_SYSTEM_INVISIBLE = 32768
  122. Global Const $STATE_SYSTEM_PRESSED = 8
  123. Global Const $CBS_AUTOHSCROLL = 64
  124. Global Const $CBS_DISABLENOSCROLL = 2048
  125. Global Const $CBS_DROPDOWN = 2
  126. Global Const $CBS_DROPDOWNLIST = 3
  127. Global Const $CBS_HASSTRINGS = 512
  128. Global Const $CBS_LOWERCASE = 16384
  129. Global Const $CBS_NOINTEGRALHEIGHT = 1024
  130. Global Const $CBS_OEMCONVERT = 128
  131. Global Const $CBS_OWNERDRAWFIXED = 16
  132. Global Const $CBS_OWNERDRAWVARIABLE = 32
  133. Global Const $CBS_SIMPLE = 1
  134. Global Const $CBS_SORT = 256
  135. Global Const $CBS_UPPERCASE = 8192
  136. Global Const $CBM_FIRST = 5888
  137. Global Const $CB_ADDSTRING = 323
  138. Global Const $CB_DELETESTRING = 324
  139. Global Const $CB_DIR = 325
  140. Global Const $CB_FINDSTRING = 332
  141. Global Const $CB_FINDSTRINGEXACT = 344
  142. Global Const $CB_GETCOMBOBOXINFO = 356
  143. Global Const $CB_GETCOUNT = 326
  144. Global Const $CB_GETCUEBANNER = ($CBM_FIRST + 4)
  145. Global Const $CB_GETCURSEL = 327
  146. Global Const $CB_GETDROPPEDCONTROLRECT = 338
  147. Global Const $CB_GETDROPPEDSTATE = 343
  148. Global Const $CB_GETDROPPEDWIDTH = 351
  149. Global Const $CB_GETEDITSEL = 320
  150. Global Const $CB_GETEXTENDEDUI = 342
  151. Global Const $CB_GETHORIZONTALEXTENT = 349
  152. Global Const $CB_GETITEMDATA = 336
  153. Global Const $CB_GETITEMHEIGHT = 340
  154. Global Const $CB_GETLBTEXT = 328
  155. Global Const $CB_GETLBTEXTLEN = 329
  156. Global Const $CB_GETLOCALE = 346
  157. Global Const $CB_GETMINVISIBLE = 5890
  158. Global Const $CB_GETTOPINDEX = 347
  159. Global Const $CB_INITSTORAGE = 353
  160. Global Const $CB_LIMITTEXT = 321
  161. Global Const $CB_RESETCONTENT = 331
  162. Global Const $CB_INSERTSTRING = 330
  163. Global Const $CB_SELECTSTRING = 333
  164. Global Const $CB_SETCUEBANNER = ($CBM_FIRST + 3)
  165. Global Const $CB_SETCURSEL = 334
  166. Global Const $CB_SETDROPPEDWIDTH = 352
  167. Global Const $CB_SETEDITSEL = 322
  168. Global Const $CB_SETEXTENDEDUI = 341
  169. Global Const $CB_SETHORIZONTALEXTENT = 350
  170. Global Const $CB_SETITEMDATA = 337
  171. Global Const $CB_SETITEMHEIGHT = 339
  172. Global Const $CB_SETLOCALE = 345
  173. Global Const $CB_SETMINVISIBLE = 5889
  174. Global Const $CB_SETTOPINDEX = 348
  175. Global Const $CB_SHOWDROPDOWN = 335
  176. Global Const $CBN_CLOSEUP = 8
  177. Global Const $CBN_DBLCLK = 2
  178. Global Const $CBN_DROPDOWN = 7
  179. Global Const $CBN_EDITCHANGE = 5
  180. Global Const $CBN_EDITUPDATE = 6
  181. Global Const $CBN_ERRSPACE = (-1)
  182. Global Const $CBN_KILLFOCUS = 4
  183. Global Const $CBN_SELCHANGE = 1
  184. Global Const $CBN_SELENDCANCEL = 10
  185. Global Const $CBN_SELENDOK = 9
  186. Global Const $CBN_SETFOCUS = 3
  187. Global Const $CBES_EX_CASESENSITIVE = 16
  188. Global Const $CBES_EX_NOEDITIMAGE = 1
  189. Global Const $CBES_EX_NOEDITIMAGEINDENT = 2
  190. Global Const $CBES_EX_NOSIZELIMIT = 8
  191. Global Const $CBES_EX_PATHWORDBREAKPROC = 4
  192. Global Const $__COMBOBOXCONSTANT_WM_USER = 1024
  193. Global Const $CBEM_DELETEITEM = $CB_DELETESTRING
  194. Global Const $CBEM_GETCOMBOCONTROL = ($__COMBOBOXCONSTANT_WM_USER + 6)
  195. Global Const $CBEM_GETEDITCONTROL = ($__COMBOBOXCONSTANT_WM_USER + 7)
  196. Global Const $CBEM_GETEXSTYLE = ($__COMBOBOXCONSTANT_WM_USER + 9)
  197. Global Const $CBEM_GETEXTENDEDSTYLE = ($__COMBOBOXCONSTANT_WM_USER + 9)
  198. Global Const $CBEM_GETIMAGELIST = ($__COMBOBOXCONSTANT_WM_USER + 3)
  199. Global Const $CBEM_GETITEMA = ($__COMBOBOXCONSTANT_WM_USER + 4)
  200. Global Const $CBEM_GETITEMW = ($__COMBOBOXCONSTANT_WM_USER + 13)
  201. Global Const $CBEM_GETUNICODEFORMAT = 8192 + 6
  202. Global Const $CBEM_HASEDITCHANGED = ($__COMBOBOXCONSTANT_WM_USER + 10)
  203. Global Const $CBEM_INSERTITEMA = ($__COMBOBOXCONSTANT_WM_USER + 1)
  204. Global Const $CBEM_INSERTITEMW = ($__COMBOBOXCONSTANT_WM_USER + 11)
  205. Global Const $CBEM_SETEXSTYLE = ($__COMBOBOXCONSTANT_WM_USER + 8)
  206. Global Const $CBEM_SETEXTENDEDSTYLE = ($__COMBOBOXCONSTANT_WM_USER + 14)
  207. Global Const $CBEM_SETIMAGELIST = ($__COMBOBOXCONSTANT_WM_USER + 2)
  208. Global Const $CBEM_SETITEMA = ($__COMBOBOXCONSTANT_WM_USER + 5)
  209. Global Const $CBEM_SETITEMW = ($__COMBOBOXCONSTANT_WM_USER + 12)
  210. Global Const $CBEM_SETUNICODEFORMAT = 8192 + 5
  211. Global Const $CBEM_SETWINDOWTHEME = 8192 + 11
  212. Global Const $CBEN_FIRST = (-800)
  213. Global Const $CBEN_LAST = (-830)
  214. Global Const $CBEN_BEGINEDIT = ($CBEN_FIRST - 4)
  215. Global Const $CBEN_DELETEITEM = ($CBEN_FIRST - 2)
  216. Global Const $CBEN_DRAGBEGINA = ($CBEN_FIRST - 8)
  217. Global Const $CBEN_DRAGBEGINW = ($CBEN_FIRST - 9)
  218. Global Const $CBEN_ENDEDITA = ($CBEN_FIRST - 5)
  219. Global Const $CBEN_ENDEDITW = ($CBEN_FIRST - 6)
  220. Global Const $CBEN_GETDISPINFO = ($CBEN_FIRST - 0)
  221. Global Const $CBEN_GETDISPINFOA = ($CBEN_FIRST - 0)
  222. Global Const $CBEN_GETDISPINFOW = ($CBEN_FIRST - 7)
  223. Global Const $CBEN_INSERTITEM = ($CBEN_FIRST - 1)
  224. Global Const $CBEIF_DI_SETITEM = 268435456
  225. Global Const $CBEIF_IMAGE = 2
  226. Global Const $CBEIF_INDENT = 16
  227. Global Const $CBEIF_LPARAM = 32
  228. Global Const $CBEIF_OVERLAY = 8
  229. Global Const $CBEIF_SELECTEDIMAGE = 4
  230. Global Const $CBEIF_TEXT = 1
  231. Global Const $__COMBOBOXCONSTANT_WS_VSCROLL = 2097152
  232. Global Const $GUI_SS_DEFAULT_COMBO = BitOR($CBS_DROPDOWN, $CBS_AUTOHSCROLL, $__COMBOBOXCONSTANT_WS_VSCROLL)
  233. Global Const $ES_LEFT = 0
  234. Global Const $ES_CENTER = 1
  235. Global Const $ES_RIGHT = 2
  236. Global Const $ES_MULTILINE = 4
  237. Global Const $ES_UPPERCASE = 8
  238. Global Const $ES_LOWERCASE = 16
  239. Global Const $ES_PASSWORD = 32
  240. Global Const $ES_AUTOVSCROLL = 64
  241. Global Const $ES_AUTOHSCROLL = 128
  242. Global Const $ES_NOHIDESEL = 256
  243. Global Const $ES_OEMCONVERT = 1024
  244. Global Const $ES_READONLY = 2048
  245. Global Const $ES_WANTRETURN = 4096
  246. Global Const $ES_NUMBER = 8192
  247. Global Const $EC_ERR = -1
  248. Global Const $ECM_FIRST = 5376
  249. Global Const $EM_CANUNDO = 198
  250. Global Const $EM_CHARFROMPOS = 215
  251. Global Const $EM_EMPTYUNDOBUFFER = 205
  252. Global Const $EM_FMTLINES = 200
  253. Global Const $EM_GETCUEBANNER = ($ECM_FIRST + 2)
  254. Global Const $EM_GETFIRSTVISIBLELINE = 206
  255. Global Const $EM_GETHANDLE = 189
  256. Global Const $EM_GETIMESTATUS = 217
  257. Global Const $EM_GETLIMITTEXT = 213
  258. Global Const $EM_GETLINE = 196
  259. Global Const $EM_GETLINECOUNT = 186
  260. Global Const $EM_GETMARGINS = 212
  261. Global Const $EM_GETMODIFY = 184
  262. Global Const $EM_GETPASSWORDCHAR = 210
  263. Global Const $EM_GETRECT = 178
  264. Global Const $EM_GETSEL = 176
  265. Global Const $EM_GETTHUMB = 190
  266. Global Const $EM_GETWORDBREAKPROC = 209
  267. Global Const $EM_HIDEBALLOONTIP = ($ECM_FIRST + 4)
  268. Global Const $EM_LIMITTEXT = 197
  269. Global Const $EM_LINEFROMCHAR = 201
  270. Global Const $EM_LINEINDEX = 187
  271. Global Const $EM_LINELENGTH = 193
  272. Global Const $EM_LINESCROLL = 182
  273. Global Const $EM_POSFROMCHAR = 214
  274. Global Const $EM_REPLACESEL = 194
  275. Global Const $EM_SCROLL = 181
  276. Global Const $EM_SCROLLCARET = 183
  277. Global Const $EM_SETCUEBANNER = ($ECM_FIRST + 1)
  278. Global Const $EM_SETHANDLE = 188
  279. Global Const $EM_SETIMESTATUS = 216
  280. Global Const $EM_SETLIMITTEXT = $EM_LIMITTEXT
  281. Global Const $EM_SETMARGINS = 211
  282. Global Const $EM_SETMODIFY = 185
  283. Global Const $EM_SETPASSWORDCHAR = 204
  284. Global Const $EM_SETREADONLY = 207
  285. Global Const $EM_SETRECT = 179
  286. Global Const $EM_SETRECTNP = 180
  287. Global Const $EM_SETSEL = 177
  288. Global Const $EM_SETTABSTOPS = 203
  289. Global Const $EM_SETWORDBREAKPROC = 208
  290. Global Const $EM_SHOWBALLOONTIP = ($ECM_FIRST + 3)
  291. Global Const $EM_UNDO = 199
  292. Global Const $EC_LEFTMARGIN = 1
  293. Global Const $EC_RIGHTMARGIN = 2
  294. Global Const $EC_USEFONTINFO = 65535
  295. Global Const $EMSIS_COMPOSITIONSTRING = 1
  296. Global Const $EIMES_GETCOMPSTRATONCE = 1
  297. Global Const $EIMES_CANCELCOMPSTRINFOCUS = 2
  298. Global Const $EIMES_COMPLETECOMPSTRKILLFOCUS = 4
  299. Global Const $EN_ALIGN_LTR_EC = 1792
  300. Global Const $EN_ALIGN_RTL_EC = 1793
  301. Global Const $EN_CHANGE = 768
  302. Global Const $EN_ERRSPACE = 1280
  303. Global Const $EN_HSCROLL = 1537
  304. Global Const $EN_KILLFOCUS = 512
  305. Global Const $EN_MAXTEXT = 1281
  306. Global Const $EN_SETFOCUS = 256
  307. Global Const $EN_UPDATE = 1024
  308. Global Const $EN_VSCROLL = 1538
  309. Global Const $TTI_NONE = 0
  310. Global Const $TTI_INFO = 1
  311. Global Const $TTI_WARNING = 2
  312. Global Const $TTI_ERROR = 3
  313. Global Const $TTI_INFO_LARGE = 4
  314. Global Const $TTI_WARNING_LARGE = 5
  315. Global Const $TTI_ERROR_LARGE = 6
  316. Global Const $__EDITCONSTANT_WS_VSCROLL = 2097152
  317. Global Const $__EDITCONSTANT_WS_HSCROLL = 1048576
  318. Global Const $GUI_SS_DEFAULT_EDIT = BitOR($ES_WANTRETURN, $__EDITCONSTANT_WS_VSCROLL, $__EDITCONSTANT_WS_HSCROLL, $ES_AUTOVSCROLL, $ES_AUTOHSCROLL)
  319. Global Const $GUI_SS_DEFAULT_INPUT = BitOR($ES_LEFT, $ES_AUTOHSCROLL)
  320. Global Const $GUI_EVENT_CLOSE = -3
  321. Global Const $GUI_EVENT_MINIMIZE = -4
  322. Global Const $GUI_EVENT_RESTORE = -5
  323. Global Const $GUI_EVENT_MAXIMIZE = -6
  324. Global Const $GUI_EVENT_PRIMARYDOWN = -7
  325. Global Const $GUI_EVENT_PRIMARYUP = -8
  326. Global Const $GUI_EVENT_SECONDARYDOWN = -9
  327. Global Const $GUI_EVENT_SECONDARYUP = -10
  328. Global Const $GUI_EVENT_MOUSEMOVE = -11
  329. Global Const $GUI_EVENT_RESIZED = -12
  330. Global Const $GUI_EVENT_DROPPED = -13
  331. Global Const $GUI_RUNDEFMSG = "GUI_RUNDEFMSG"
  332. Global Const $GUI_AVISTOP = 0
  333. Global Const $GUI_AVISTART = 1
  334. Global Const $GUI_AVICLOSE = 2
  335. Global Const $GUI_CHECKED = 1
  336. Global Const $GUI_INDETERMINATE = 2
  337. Global Const $GUI_UNCHECKED = 4
  338. Global Const $GUI_DROPACCEPTED = 8
  339. Global Const $GUI_NODROPACCEPTED = 4096
  340. Global Const $GUI_ACCEPTFILES = $GUI_DROPACCEPTED
  341. Global Const $GUI_SHOW = 16
  342. Global Const $GUI_HIDE = 32
  343. Global Const $GUI_ENABLE = 64
  344. Global Const $GUI_DISABLE = 128
  345. Global Const $GUI_FOCUS = 256
  346. Global Const $GUI_NOFOCUS = 8192
  347. Global Const $GUI_DEFBUTTON = 512
  348. Global Const $GUI_EXPAND = 1024
  349. Global Const $GUI_ONTOP = 2048
  350. Global Const $GUI_FONTITALIC = 2
  351. Global Const $GUI_FONTUNDER = 4
  352. Global Const $GUI_FONTSTRIKE = 8
  353. Global Const $GUI_DOCKAUTO = 1
  354. Global Const $GUI_DOCKLEFT = 2
  355. Global Const $GUI_DOCKRIGHT = 4
  356. Global Const $GUI_DOCKHCENTER = 8
  357. Global Const $GUI_DOCKTOP = 32
  358. Global Const $GUI_DOCKBOTTOM = 64
  359. Global Const $GUI_DOCKVCENTER = 128
  360. Global Const $GUI_DOCKWIDTH = 256
  361. Global Const $GUI_DOCKHEIGHT = 512
  362. Global Const $GUI_DOCKSIZE = 768
  363. Global Const $GUI_DOCKMENUBAR = 544
  364. Global Const $GUI_DOCKSTATEBAR = 576
  365. Global Const $GUI_DOCKALL = 802
  366. Global Const $GUI_DOCKBORDERS = 102
  367. Global Const $GUI_GR_CLOSE = 1
  368. Global Const $GUI_GR_LINE = 2
  369. Global Const $GUI_GR_BEZIER = 4
  370. Global Const $GUI_GR_MOVE = 6
  371. Global Const $GUI_GR_COLOR = 8
  372. Global Const $GUI_GR_RECT = 10
  373. Global Const $GUI_GR_ELLIPSE = 12
  374. Global Const $GUI_GR_PIE = 14
  375. Global Const $GUI_GR_DOT = 16
  376. Global Const $GUI_GR_PIXEL = 18
  377. Global Const $GUI_GR_HINT = 20
  378. Global Const $GUI_GR_REFRESH = 22
  379. Global Const $GUI_GR_PENSIZE = 24
  380. Global Const $GUI_GR_NOBKCOLOR = -2
  381. Global Const $GUI_BKCOLOR_DEFAULT = -1
  382. Global Const $GUI_BKCOLOR_TRANSPARENT = -2
  383. Global Const $GUI_BKCOLOR_LV_ALTERNATE = -33554432
  384. Global Const $GUI_WS_EX_PARENTDRAG = 1048576
  385. Global Const $SS_LEFT = 0
  386. Global Const $SS_CENTER = 1
  387. Global Const $SS_RIGHT = 2
  388. Global Const $SS_ICON = 3
  389. Global Const $SS_BLACKRECT = 4
  390. Global Const $SS_GRAYRECT = 5
  391. Global Const $SS_WHITERECT = 6
  392. Global Const $SS_BLACKFRAME = 7
  393. Global Const $SS_GRAYFRAME = 8
  394. Global Const $SS_WHITEFRAME = 9
  395. Global Const $SS_SIMPLE = 11
  396. Global Const $SS_LEFTNOWORDWRAP = 12
  397. Global Const $SS_BITMAP = 14
  398. Global Const $SS_ETCHEDHORZ = 16
  399. Global Const $SS_ETCHEDVERT = 17
  400. Global Const $SS_ETCHEDFRAME = 18
  401. Global Const $SS_NOPREFIX = 128
  402. Global Const $SS_NOTIFY = 256
  403. Global Const $SS_CENTERIMAGE = 512
  404. Global Const $SS_RIGHTJUST = 1024
  405. Global Const $SS_SUNKEN = 4096
  406. Global Const $GUI_SS_DEFAULT_LABEL = 0
  407. Global Const $GUI_SS_DEFAULT_GRAPHIC = 0
  408. Global Const $GUI_SS_DEFAULT_ICON = $SS_NOTIFY
  409. Global Const $GUI_SS_DEFAULT_PIC = $SS_NOTIFY
  410. Global Const $WS_TILED = 0
  411. Global Const $WS_OVERLAPPED = 0
  412. Global Const $WS_MAXIMIZEBOX = 65536
  413. Global Const $WS_MINIMIZEBOX = 131072
  414. Global Const $WS_TABSTOP = 65536
  415. Global Const $WS_GROUP = 131072
  416. Global Const $WS_SIZEBOX = 262144
  417. Global Const $WS_THICKFRAME = 262144
  418. Global Const $WS_SYSMENU = 524288
  419. Global Const $WS_HSCROLL = 1048576
  420. Global Const $WS_VSCROLL = 2097152
  421. Global Const $WS_DLGFRAME = 4194304
  422. Global Const $WS_BORDER = 8388608
  423. Global Const $WS_CAPTION = 12582912
  424. Global Const $WS_OVERLAPPEDWINDOW = 13565952
  425. Global Const $WS_TILEDWINDOW = 13565952
  426. Global Const $WS_MAXIMIZE = 16777216
  427. Global Const $WS_CLIPCHILDREN = 33554432
  428. Global Const $WS_CLIPSIBLINGS = 67108864
  429. Global Const $WS_DISABLED = 134217728
  430. Global Const $WS_VISIBLE = 268435456
  431. Global Const $WS_MINIMIZE = 536870912
  432. Global Const $WS_CHILD = 1073741824
  433. Global Const $WS_POPUP = -2147483648
  434. Global Const $WS_POPUPWINDOW = -2138570752
  435. Global Const $DS_MODALFRAME = 128
  436. Global Const $DS_SETFOREGROUND = 512
  437. Global Const $DS_CONTEXTHELP = 8192
  438. Global Const $WS_EX_ACCEPTFILES = 16
  439. Global Const $WS_EX_MDICHILD = 64
  440. Global Const $WS_EX_APPWINDOW = 262144
  441. Global Const $WS_EX_COMPOSITED = 33554432
  442. Global Const $WS_EX_CLIENTEDGE = 512
  443. Global Const $WS_EX_CONTEXTHELP = 1024
  444. Global Const $WS_EX_DLGMODALFRAME = 1
  445. Global Const $WS_EX_LEFTSCROLLBAR = 16384
  446. Global Const $WS_EX_OVERLAPPEDWINDOW = 768
  447. Global Const $WS_EX_RIGHT = 4096
  448. Global Const $WS_EX_STATICEDGE = 131072
  449. Global Const $WS_EX_TOOLWINDOW = 128
  450. Global Const $WS_EX_TOPMOST = 8
  451. Global Const $WS_EX_TRANSPARENT = 32
  452. Global Const $WS_EX_WINDOWEDGE = 256
  453. Global Const $WS_EX_LAYERED = 524288
  454. Global Const $WS_EX_CONTROLPARENT = 65536
  455. Global Const $WS_EX_LAYOUTRTL = 4194304
  456. Global Const $WS_EX_RTLREADING = 8192
  457. Global Const $WM_GETTEXTLENGTH = 14
  458. Global Const $WM_GETTEXT = 13
  459. Global Const $WM_SIZE = 5
  460. Global Const $WM_SIZING = 532
  461. Global Const $WM_USER = 1024
  462. Global Const $WM_CREATE = 1
  463. Global Const $WM_DESTROY = 2
  464. Global Const $WM_MOVE = 3
  465. Global Const $WM_ACTIVATE = 6
  466. Global Const $WM_SETFOCUS = 7
  467. Global Const $WM_KILLFOCUS = 8
  468. Global Const $WM_ENABLE = 10
  469. Global Const $WM_SETREDRAW = 11
  470. Global Const $WM_SETTEXT = 12
  471. Global Const $WM_PAINT = 15
  472. Global Const $WM_CLOSE = 16
  473. Global Const $WM_QUIT = 18
  474. Global Const $WM_ERASEBKGND = 20
  475. Global Const $WM_SYSCOLORCHANGE = 21
  476. Global Const $WM_SHOWWINDOW = 24
  477. Global Const $WM_WININICHANGE = 26
  478. Global Const $WM_DEVMODECHANGE = 27
  479. Global Const $WM_ACTIVATEAPP = 28
  480. Global Const $WM_FONTCHANGE = 29
  481. Global Const $WM_TIMECHANGE = 30
  482. Global Const $WM_CANCELMODE = 31
  483. Global Const $WM_SETCURSOR = 32
  484. Global Const $WM_MOUSEACTIVATE = 33
  485. Global Const $WM_CHILDACTIVATE = 34
  486. Global Const $WM_QUEUESYNC = 35
  487. Global Const $WM_GETMINMAXINFO = 36
  488. Global Const $WM_PAINTICON = 38
  489. Global Const $WM_ICONERASEBKGND = 39
  490. Global Const $WM_NEXTDLGCTL = 40
  491. Global Const $WM_SPOOLERSTATUS = 42
  492. Global Const $WM_DRAWITEM = 43
  493. Global Const $WM_MEASUREITEM = 44
  494. Global Const $WM_DELETEITEM = 45
  495. Global Const $WM_VKEYTOITEM = 46
  496. Global Const $WM_CHARTOITEM = 47
  497. Global Const $WM_SETFONT = 48
  498. Global Const $WM_GETFONT = 49
  499. Global Const $WM_SETHOTKEY = 50
  500. Global Const $WM_GETHOTKEY = 51
  501. Global Const $WM_QUERYDRAGICON = 55
  502. Global Const $WM_COMPAREITEM = 57
  503. Global Const $WM_GETOBJECT = 61
  504. Global Const $WM_COMPACTING = 65
  505. Global Const $WM_COMMNOTIFY = 68
  506. Global Const $WM_WINDOWPOSCHANGING = 70
  507. Global Const $WM_WINDOWPOSCHANGED = 71
  508. Global Const $WM_POWER = 72
  509. Global Const $WM_NOTIFY = 78
  510. Global Const $WM_COPYDATA = 74
  511. Global Const $WM_CANCELJOURNAL = 75
  512. Global Const $WM_INPUTLANGCHANGEREQUEST = 80
  513. Global Const $WM_INPUTLANGCHANGE = 81
  514. Global Const $WM_TCARD = 82
  515. Global Const $WM_HELP = 83
  516. Global Const $WM_USERCHANGED = 84
  517. Global Const $WM_NOTIFYFORMAT = 85
  518. Global Const $WM_CUT = 768
  519. Global Const $WM_COPY = 769
  520. Global Const $WM_PASTE = 770
  521. Global Const $WM_CLEAR = 771
  522. Global Const $WM_UNDO = 772
  523. Global Const $WM_CONTEXTMENU = 123
  524. Global Const $WM_STYLECHANGING = 124
  525. Global Const $WM_STYLECHANGED = 125
  526. Global Const $WM_DISPLAYCHANGE = 126
  527. Global Const $WM_GETICON = 127
  528. Global Const $WM_SETICON = 128
  529. Global Const $WM_NCCREATE = 129
  530. Global Const $WM_NCDESTROY = 130
  531. Global Const $WM_NCCALCSIZE = 131
  532. Global Const $WM_NCHITTEST = 132
  533. Global Const $WM_NCPAINT = 133
  534. Global Const $WM_NCACTIVATE = 134
  535. Global Const $WM_GETDLGCODE = 135
  536. Global Const $WM_SYNCPAINT = 136
  537. Global Const $WM_NCMOUSEMOVE = 160
  538. Global Const $WM_NCLBUTTONDOWN = 161
  539. Global Const $WM_NCLBUTTONUP = 162
  540. Global Const $WM_NCLBUTTONDBLCLK = 163
  541. Global Const $WM_NCRBUTTONDOWN = 164
  542. Global Const $WM_NCRBUTTONUP = 165
  543. Global Const $WM_NCRBUTTONDBLCLK = 166
  544. Global Const $WM_NCMBUTTONDOWN = 167
  545. Global Const $WM_NCMBUTTONUP = 168
  546. Global Const $WM_NCMBUTTONDBLCLK = 169
  547. Global Const $WM_KEYDOWN = 256
  548. Global Const $WM_KEYUP = 257
  549. Global Const $WM_CHAR = 258
  550. Global Const $WM_DEADCHAR = 259
  551. Global Const $WM_SYSKEYDOWN = 260
  552. Global Const $WM_SYSKEYUP = 261
  553. Global Const $WM_SYSCHAR = 262
  554. Global Const $WM_SYSDEADCHAR = 263
  555. Global Const $WM_INITDIALOG = 272
  556. Global Const $WM_COMMAND = 273
  557. Global Const $WM_SYSCOMMAND = 274
  558. Global Const $WM_TIMER = 275
  559. Global Const $WM_HSCROLL = 276
  560. Global Const $WM_VSCROLL = 277
  561. Global Const $WM_INITMENU = 278
  562. Global Const $WM_INITMENUPOPUP = 279
  563. Global Const $WM_MENUSELECT = 287
  564. Global Const $WM_MENUCHAR = 288
  565. Global Const $WM_ENTERIDLE = 289
  566. Global Const $WM_MENURBUTTONUP = 290
  567. Global Const $WM_MENUDRAG = 291
  568. Global Const $WM_MENUGETOBJECT = 292
  569. Global Const $WM_UNINITMENUPOPUP = 293
  570. Global Const $WM_MENUCOMMAND = 294
  571. Global Const $WM_CHANGEUISTATE = 295
  572. Global Const $WM_UPDATEUISTATE = 296
  573. Global Const $WM_QUERYUISTATE = 297
  574. Global Const $WM_CTLCOLORMSGBOX = 306
  575. Global Const $WM_CTLCOLOREDIT = 307
  576. Global Const $WM_CTLCOLORLISTBOX = 308
  577. Global Const $WM_CTLCOLORBTN = 309
  578. Global Const $WM_CTLCOLORDLG = 310
  579. Global Const $WM_CTLCOLORSCROLLBAR = 311
  580. Global Const $WM_CTLCOLORSTATIC = 312
  581. Global Const $WM_CTLCOLOR = 25
  582. Global Const $MN_GETHMENU = 481
  583. Global Const $NM_FIRST = 0
  584. Global Const $NM_OUTOFMEMORY = $NM_FIRST - 1
  585. Global Const $NM_CLICK = $NM_FIRST - 2
  586. Global Const $NM_DBLCLK = $NM_FIRST - 3
  587. Global Const $NM_RETURN = $NM_FIRST - 4
  588. Global Const $NM_RCLICK = $NM_FIRST - 5
  589. Global Const $NM_RDBLCLK = $NM_FIRST - 6
  590. Global Const $NM_SETFOCUS = $NM_FIRST - 7
  591. Global Const $NM_KILLFOCUS = $NM_FIRST - 8
  592. Global Const $NM_CUSTOMDRAW = $NM_FIRST - 12
  593. Global Const $NM_HOVER = $NM_FIRST - 13
  594. Global Const $NM_NCHITTEST = $NM_FIRST - 14
  595. Global Const $NM_KEYDOWN = $NM_FIRST - 15
  596. Global Const $NM_RELEASEDCAPTURE = $NM_FIRST - 16
  597. Global Const $NM_SETCURSOR = $NM_FIRST - 17
  598. Global Const $NM_CHAR = $NM_FIRST - 18
  599. Global Const $NM_TOOLTIPSCREATED = $NM_FIRST - 19
  600. Global Const $NM_LDOWN = $NM_FIRST - 20
  601. Global Const $NM_RDOWN = $NM_FIRST - 21
  602. Global Const $NM_THEMECHANGED = $NM_FIRST - 22
  603. Global Const $WM_MOUSEMOVE = 512
  604. Global Const $WM_LBUTTONDOWN = 513
  605. Global Const $WM_LBUTTONUP = 514
  606. Global Const $WM_LBUTTONDBLCLK = 515
  607. Global Const $WM_RBUTTONDOWN = 516
  608. Global Const $WM_RBUTTONUP = 517
  609. Global Const $WM_RBUTTONDBLCK = 518
  610. Global Const $WM_MBUTTONDOWN = 519
  611. Global Const $WM_MBUTTONUP = 520
  612. Global Const $WM_MBUTTONDBLCK = 521
  613. Global Const $WM_MOUSEWHEEL = 522
  614. Global Const $WM_XBUTTONDOWN = 523
  615. Global Const $WM_XBUTTONUP = 524
  616. Global Const $WM_XBUTTONDBLCLK = 525
  617. Global Const $WM_MOUSEHWHEEL = 526
  618. Global Const $PS_SOLID = 0
  619. Global Const $PS_DASH = 1
  620. Global Const $PS_DOT = 2
  621. Global Const $PS_DASHDOT = 3
  622. Global Const $PS_DASHDOTDOT = 4
  623. Global Const $PS_NULL = 5
  624. Global Const $PS_INSIDEFRAME = 6
  625. Global Const $LWA_ALPHA = 2
  626. Global Const $LWA_COLORKEY = 1
  627. Global Const $RGN_AND = 1
  628. Global Const $RGN_OR = 2
  629. Global Const $RGN_XOR = 3
  630. Global Const $RGN_DIFF = 4
  631. Global Const $RGN_COPY = 5
  632. Global Const $ERRORREGION = 0
  633. Global Const $NULLREGION = 1
  634. Global Const $SIMPLEREGION = 2
  635. Global Const $COMPLEXREGION = 3
  636. Global Const $TRANSPARENT = 1
  637. Global Const $OPAQUE = 2
  638. Global Const $CCM_FIRST = 8192
  639. Global Const $CCM_GETUNICODEFORMAT = ($CCM_FIRST + 6)
  640. Global Const $CCM_SETUNICODEFORMAT = ($CCM_FIRST + 5)
  641. Global Const $CCM_SETBKCOLOR = $CCM_FIRST + 1
  642. Global Const $CCM_SETCOLORSCHEME = $CCM_FIRST + 2
  643. Global Const $CCM_GETCOLORSCHEME = $CCM_FIRST + 3
  644. Global Const $CCM_GETDROPTARGET = $CCM_FIRST + 4
  645. Global Const $CCM_SETWINDOWTHEME = $CCM_FIRST + 11
  646. Global Const $GA_PARENT = 1
  647. Global Const $GA_ROOT = 2
  648. Global Const $GA_ROOTOWNER = 3
  649. Global Const $SM_CXSCREEN = 0
  650. Global Const $SM_CYSCREEN = 1
  651. Global Const $SM_CXVSCROLL = 2
  652. Global Const $SM_CYHSCROLL = 3
  653. Global Const $SM_CYCAPTION = 4
  654. Global Const $SM_CXBORDER = 5
  655. Global Const $SM_CYBORDER = 6
  656. Global Const $SM_CXDLGFRAME = 7
  657. Global Const $SM_CYDLGFRAME = 8
  658. Global Const $SM_CYVTHUMB = 9
  659. Global Const $SM_CXHTHUMB = 10
  660. Global Const $SM_CXICON = 11
  661. Global Const $SM_CYICON = 12
  662. Global Const $SM_CXCURSOR = 13
  663. Global Const $SM_CYCURSOR = 14
  664. Global Const $SM_CYMENU = 15
  665. Global Const $SM_CXFULLSCREEN = 16
  666. Global Const $SM_CYFULLSCREEN = 17
  667. Global Const $SM_CYKANJIWINDOW = 18
  668. Global Const $SM_MOUSEPRESENT = 19
  669. Global Const $SM_CYVSCROLL = 20
  670. Global Const $SM_CXHSCROLL = 21
  671. Global Const $SM_DEBUG = 22
  672. Global Const $SM_SWAPBUTTON = 23
  673. Global Const $SM_RESERVED1 = 24
  674. Global Const $SM_RESERVED2 = 25
  675. Global Const $SM_RESERVED3 = 26
  676. Global Const $SM_RESERVED4 = 27
  677. Global Const $SM_CXMIN = 28
  678. Global Const $SM_CYMIN = 29
  679. Global Const $SM_CXSIZE = 30
  680. Global Const $SM_CYSIZE = 31
  681. Global Const $SM_CXFRAME = 32
  682. Global Const $SM_CYFRAME = 33
  683. Global Const $SM_CXMINTRACK = 34
  684. Global Const $SM_CYMINTRACK = 35
  685. Global Const $SM_CXDOUBLECLK = 36
  686. Global Const $SM_CYDOUBLECLK = 37
  687. Global Const $SM_CXICONSPACING = 38
  688. Global Const $SM_CYICONSPACING = 39
  689. Global Const $SM_MENUDROPALIGNMENT = 40
  690. Global Const $SM_PENWINDOWS = 41
  691. Global Const $SM_DBCSENABLED = 42
  692. Global Const $SM_CMOUSEBUTTONS = 43
  693. Global Const $SM_SECURE = 44
  694. Global Const $SM_CXEDGE = 45
  695. Global Const $SM_CYEDGE = 46
  696. Global Const $SM_CXMINSPACING = 47
  697. Global Const $SM_CYMINSPACING = 48
  698. Global Const $SM_CXSMICON = 49
  699. Global Const $SM_CYSMICON = 50
  700. Global Const $SM_CYSMCAPTION = 51
  701. Global Const $SM_CXSMSIZE = 52
  702. Global Const $SM_CYSMSIZE = 53
  703. Global Const $SM_CXMENUSIZE = 54
  704. Global Const $SM_CYMENUSIZE = 55
  705. Global Const $SM_ARRANGE = 56
  706. Global Const $SM_CXMINIMIZED = 57
  707. Global Const $SM_CYMINIMIZED = 58
  708. Global Const $SM_CXMAXTRACK = 59
  709. Global Const $SM_CYMAXTRACK = 60
  710. Global Const $SM_CXMAXIMIZED = 61
  711. Global Const $SM_CYMAXIMIZED = 62
  712. Global Const $SM_NETWORK = 63
  713. Global Const $SM_CLEANBOOT = 67
  714. Global Const $SM_CXDRAG = 68
  715. Global Const $SM_CYDRAG = 69
  716. Global Const $SM_SHOWSOUNDS = 70
  717. Global Const $SM_CXMENUCHECK = 71
  718. Global Const $SM_CYMENUCHECK = 72
  719. Global Const $SM_SLOWMACHINE = 73
  720. Global Const $SM_MIDEASTENABLED = 74
  721. Global Const $SM_MOUSEWHEELPRESENT = 75
  722. Global Const $SM_XVIRTUALSCREEN = 76
  723. Global Const $SM_YVIRTUALSCREEN = 77
  724. Global Const $SM_CXVIRTUALSCREEN = 78
  725. Global Const $SM_CYVIRTUALSCREEN = 79
  726. Global Const $SM_CMONITORS = 80
  727. Global Const $SM_SAMEDISPLAYFORMAT = 81
  728. Global Const $SM_IMMENABLED = 82
  729. Global Const $SM_CXFOCUSBORDER = 83
  730. Global Const $SM_CYFOCUSBORDER = 84
  731. Global Const $SM_TABLETPC = 86
  732. Global Const $SM_MEDIACENTER = 87
  733. Global Const $SM_STARTER = 88
  734. Global Const $SM_SERVERR2 = 89
  735. Global Const $SM_CMETRICS = 90
  736. Global Const $SM_REMOTESESSION = 4096
  737. Global Const $SM_SHUTTINGDOWN = 8192
  738. Global Const $SM_REMOTECONTROL = 8193
  739. Global Const $SM_CARETBLINKINGENABLED = 8194
  740. Global Const $BLACKNESS = 66
  741. Global Const $CAPTUREBLT = 1073741824
  742. Global Const $DSTINVERT = 5570569
  743. Global Const $MERGECOPY = 12583114
  744. Global Const $MERGEPAINT = 12255782
  745. Global Const $NOMIRRORBITMAP = -2147483648
  746. Global Const $NOTSRCCOPY = 3342344
  747. Global Const $NOTSRCERASE = 1114278
  748. Global Const $PATCOPY = 15728673
  749. Global Const $PATINVERT = 5898313
  750. Global Const $PATPAINT = 16452105
  751. Global Const $SRCAND = 8913094
  752. Global Const $SRCCOPY = 13369376
  753. Global Const $SRCERASE = 4457256
  754. Global Const $SRCINVERT = 6684742
  755. Global Const $SRCPAINT = 15597702
  756. Global Const $WHITENESS = 16711778
  757. Global Const $DT_BOTTOM = 8
  758. Global Const $DT_CALCRECT = 1024
  759. Global Const $DT_CENTER = 1
  760. Global Const $DT_EDITCONTROL = 8192
  761. Global Const $DT_END_ELLIPSIS = 32768
  762. Global Const $DT_EXPANDTABS = 64
  763. Global Const $DT_EXTERNALLEADING = 512
  764. Global Const $DT_HIDEPREFIX = 1048576
  765. Global Const $DT_INTERNAL = 4096
  766. Global Const $DT_LEFT = 0
  767. Global Const $DT_MODIFYSTRING = 65536
  768. Global Const $DT_NOCLIP = 256
  769. Global Const $DT_NOFULLWIDTHCHARBREAK = 524288
  770. Global Const $DT_NOPREFIX = 2048
  771. Global Const $DT_PATH_ELLIPSIS = 16384
  772. Global Const $DT_PREFIXONLY = 2097152
  773. Global Const $DT_RIGHT = 2
  774. Global Const $DT_RTLREADING = 131072
  775. Global Const $DT_SINGLELINE = 32
  776. Global Const $DT_TABSTOP = 128
  777. Global Const $DT_TOP = 0
  778. Global Const $DT_VCENTER = 4
  779. Global Const $DT_WORDBREAK = 16
  780. Global Const $DT_WORD_ELLIPSIS = 262144
  781. Global Const $RDW_ERASE = 4
  782. Global Const $RDW_FRAME = 1024
  783. Global Const $RDW_INTERNALPAINT = 2
  784. Global Const $RDW_INVALIDATE = 1
  785. Global Const $RDW_NOERASE = 32
  786. Global Const $RDW_NOFRAME = 2048
  787. Global Const $RDW_NOINTERNALPAINT = 16
  788. Global Const $RDW_VALIDATE = 8
  789. Global Const $RDW_ERASENOW = 512
  790. Global Const $RDW_UPDATENOW = 256
  791. Global Const $RDW_ALLCHILDREN = 128
  792. Global Const $RDW_NOCHILDREN = 64
  793. Global Const $WM_RENDERFORMAT = 773
  794. Global Const $WM_RENDERALLFORMATS = 774
  795. Global Const $WM_DESTROYCLIPBOARD = 775
  796. Global Const $WM_DRAWCLIPBOARD = 776
  797. Global Const $WM_PAINTCLIPBOARD = 777
  798. Global Const $WM_VSCROLLCLIPBOARD = 778
  799. Global Const $WM_SIZECLIPBOARD = 779
  800. Global Const $WM_ASKCBFORMATNAME = 780
  801. Global Const $WM_CHANGECBCHAIN = 781
  802. Global Const $WM_HSCROLLCLIPBOARD = 782
  803. Global Const $HTERROR = -2
  804. Global Const $HTTRANSPARENT = -1
  805. Global Const $HTNOWHERE = 0
  806. Global Const $HTCLIENT = 1
  807. Global Const $HTCAPTION = 2
  808. Global Const $HTSYSMENU = 3
  809. Global Const $HTGROWBOX = 4
  810. Global Const $HTSIZE = $HTGROWBOX
  811. Global Const $HTMENU = 5
  812. Global Const $HTHSCROLL = 6
  813. Global Const $HTVSCROLL = 7
  814. Global Const $HTMINBUTTON = 8
  815. Global Const $HTMAXBUTTON = 9
  816. Global Const $HTLEFT = 10
  817. Global Const $HTRIGHT = 11
  818. Global Const $HTTOP = 12
  819. Global Const $HTTOPLEFT = 13
  820. Global Const $HTTOPRIGHT = 14
  821. Global Const $HTBOTTOM = 15
  822. Global Const $HTBOTTOMLEFT = 16
  823. Global Const $HTBOTTOMRIGHT = 17
  824. Global Const $HTBORDER = 18
  825. Global Const $HTREDUCE = $HTMINBUTTON
  826. Global Const $HTZOOM = $HTMAXBUTTON
  827. Global Const $HTSIZEFIRST = $HTLEFT
  828. Global Const $HTSIZELAST = $HTBOTTOMRIGHT
  829. Global Const $HTOBJECT = 19
  830. Global Const $HTCLOSE = 20
  831. Global Const $HTHELP = 21
  832. Global Const $COLOR_SCROLLBAR = 0
  833. Global Const $COLOR_BACKGROUND = 1
  834. Global Const $COLOR_ACTIVECAPTION = 2
  835. Global Const $COLOR_INACTIVECAPTION = 3
  836. Global Const $COLOR_MENU = 4
  837. Global Const $COLOR_WINDOW = 5
  838. Global Const $COLOR_WINDOWFRAME = 6
  839. Global Const $COLOR_MENUTEXT = 7
  840. Global Const $COLOR_WINDOWTEXT = 8
  841. Global Const $COLOR_CAPTIONTEXT = 9
  842. Global Const $COLOR_ACTIVEBORDER = 10
  843. Global Const $COLOR_INACTIVEBORDER = 11
  844. Global Const $COLOR_APPWORKSPACE = 12
  845. Global Const $COLOR_HIGHLIGHT = 13
  846. Global Const $COLOR_HIGHLIGHTTEXT = 14
  847. Global Const $COLOR_BTNFACE = 15
  848. Global Const $COLOR_BTNSHADOW = 16
  849. Global Const $COLOR_GRAYTEXT = 17
  850. Global Const $COLOR_BTNTEXT = 18
  851. Global Const $COLOR_INACTIVECAPTIONTEXT = 19
  852. Global Const $COLOR_BTNHIGHLIGHT = 20
  853. Global Const $COLOR_3DDKSHADOW = 21
  854. Global Const $COLOR_3DLIGHT = 22
  855. Global Const $COLOR_INFOTEXT = 23
  856. Global Const $COLOR_INFOBK = 24
  857. Global Const $COLOR_HOTLIGHT = 26
  858. Global Const $COLOR_GRADIENTACTIVECAPTION = 27
  859. Global Const $COLOR_GRADIENTINACTIVECAPTION = 28
  860. Global Const $COLOR_MENUHILIGHT = 29
  861. Global Const $COLOR_MENUBAR = 30
  862. Global Const $COLOR_DESKTOP = 1
  863. Global Const $COLOR_3DFACE = 15
  864. Global Const $COLOR_3DSHADOW = 16
  865. Global Const $COLOR_3DHIGHLIGHT = 20
  866. Global Const $COLOR_3DHILIGHT = 20
  867. Global Const $COLOR_BTNHILIGHT = 20
  868. Global Const $HINST_COMMCTRL = -1
  869. Global Const $IDB_STD_SMALL_COLOR = 0
  870. Global Const $IDB_STD_LARGE_COLOR = 1
  871. Global Const $IDB_VIEW_SMALL_COLOR = 4
  872. Global Const $IDB_VIEW_LARGE_COLOR = 5
  873. Global Const $IDB_HIST_SMALL_COLOR = 8
  874. Global Const $IDB_HIST_LARGE_COLOR = 9
  875. Global Const $STARTF_FORCEOFFFEEDBACK = 128
  876. Global Const $STARTF_FORCEONFEEDBACK = 64
  877. Global Const $STARTF_RUNFULLSCREEN = 32
  878. Global Const $STARTF_USECOUNTCHARS = 8
  879. Global Const $STARTF_USEFILLATTRIBUTE = 16
  880. Global Const $STARTF_USEHOTKEY = 512
  881. Global Const $STARTF_USEPOSITION = 4
  882. Global Const $STARTF_USESHOWWINDOW = 1
  883. Global Const $STARTF_USESIZE = 2
  884. Global Const $STARTF_USESTDHANDLES = 256
  885. Global Const $CDDS_PREPAINT = 1
  886. Global Const $CDDS_POSTPAINT = 2
  887. Global Const $CDDS_PREERASE = 3
  888. Global Const $CDDS_POSTERASE = 4
  889. Global Const $CDDS_ITEM = 65536
  890. Global Const $CDDS_ITEMPREPAINT = 65537
  891. Global Const $CDDS_ITEMPOSTPAINT = 65538
  892. Global Const $CDDS_ITEMPREERASE = 65539
  893. Global Const $CDDS_ITEMPOSTERASE = 65540
  894. Global Const $CDDS_SUBITEM = 131072
  895. Global Const $CDIS_SELECTED = 1
  896. Global Const $CDIS_GRAYED = 2
  897. Global Const $CDIS_DISABLED = 4
  898. Global Const $CDIS_CHECKED = 8
  899. Global Const $CDIS_FOCUS = 16
  900. Global Const $CDIS_DEFAULT = 32
  901. Global Const $CDIS_HOT = 64
  902. Global Const $CDIS_MARKED = 128
  903. Global Const $CDIS_INDETERMINATE = 256
  904. Global Const $CDIS_SHOWKEYBOARDCUES = 512
  905. Global Const $CDIS_NEARHOT = 1024
  906. Global Const $CDIS_OTHERSIDEHOT = 2048
  907. Global Const $CDIS_DROPHILITED = 4096
  908. Global Const $CDRF_DODEFAULT = 0
  909. Global Const $CDRF_NEWFONT = 2
  910. Global Const $CDRF_SKIPDEFAULT = 4
  911. Global Const $CDRF_NOTIFYPOSTPAINT = 16
  912. Global Const $CDRF_NOTIFYITEMDRAW = 32
  913. Global Const $CDRF_NOTIFYSUBITEMDRAW = 32
  914. Global Const $CDRF_NOTIFYPOSTERASE = 64
  915. Global Const $CDRF_DOERASE = 8
  916. Global Const $CDRF_SKIPPOSTPAINT = 256
  917. Global Const $GUI_SS_DEFAULT_GUI = BitOR($WS_MINIMIZEBOX, $WS_CAPTION, $WS_POPUP, $WS_SYSMENU)
  918. Global Const $FW_DONTCARE = 0
  919. Global Const $FW_THIN = 100
  920. Global Const $FW_EXTRALIGHT = 200
  921. Global Const $FW_ULTRALIGHT = 200
  922. Global Const $FW_LIGHT = 300
  923. Global Const $FW_NORMAL = 400
  924. Global Const $FW_REGULAR = 400
  925. Global Const $FW_MEDIUM = 500
  926. Global Const $FW_SEMIBOLD = 600
  927. Global Const $FW_DEMIBOLD = 600
  928. Global Const $FW_BOLD = 700
  929. Global Const $FW_EXTRABOLD = 800
  930. Global Const $FW_ULTRABOLD = 800
  931. Global Const $FW_HEAVY = 900
  932. Global Const $FW_BLACK = 900
  933. Global Const $CF_EFFECTS = 256
  934. Global Const $CF_PRINTERFONTS = 2
  935. Global Const $CF_SCREENFONTS = 1
  936. Global Const $CF_NOSCRIPTSEL = 8388608
  937. Global Const $CF_INITTOLOGFONTSTRUCT = 64
  938. Global Const $LOGPIXELSX = 88
  939. Global Const $LOGPIXELSY = 90
  940. Global Const $ANSI_CHARSET = 0
  941. Global Const $BALTIC_CHARSET = 186
  942. Global Const $CHINESEBIG5_CHARSET = 136
  943. Global Const $DEFAULT_CHARSET = 1
  944. Global Const $EASTEUROPE_CHARSET = 238
  945. Global Const $GB2312_CHARSET = 134
  946. Global Const $GREEK_CHARSET = 161
  947. Global Const $HANGEUL_CHARSET = 129
  948. Global Const $MAC_CHARSET = 77
  949. Global Const $OEM_CHARSET = 255
  950. Global Const $RUSSIAN_CHARSET = 204
  951. Global Const $SHIFTJIS_CHARSET = 128
  952. Global Const $SYMBOL_CHARSET = 2
  953. Global Const $TURKISH_CHARSET = 162
  954. Global Const $VIETNAMESE_CHARSET = 163
  955. Global Const $OUT_CHARACTER_PRECIS = 2
  956. Global Const $OUT_DEFAULT_PRECIS = 0
  957. Global Const $OUT_DEVICE_PRECIS = 5
  958. Global Const $OUT_OUTLINE_PRECIS = 8
  959. Global Const $OUT_PS_ONLY_PRECIS = 10
  960. Global Const $OUT_RASTER_PRECIS = 6
  961. Global Const $OUT_STRING_PRECIS = 1
  962. Global Const $OUT_STROKE_PRECIS = 3
  963. Global Const $OUT_TT_ONLY_PRECIS = 7
  964. Global Const $OUT_TT_PRECIS = 4
  965. Global Const $CLIP_CHARACTER_PRECIS = 1
  966. Global Const $CLIP_DEFAULT_PRECIS = 0
  967. Global Const $CLIP_EMBEDDED = 128
  968. Global Const $CLIP_LH_ANGLES = 16
  969. Global Const $CLIP_MASK = 15
  970. Global Const $CLIP_STROKE_PRECIS = 2
  971. Global Const $CLIP_TT_ALWAYS = 32
  972. Global Const $ANTIALIASED_QUALITY = 4
  973. Global Const $DEFAULT_QUALITY = 0
  974. Global Const $DRAFT_QUALITY = 1
  975. Global Const $NONANTIALIASED_QUALITY = 3
  976. Global Const $PROOF_QUALITY = 2
  977. Global Const $DEFAULT_PITCH = 0
  978. Global Const $FIXED_PITCH = 1
  979. Global Const $VARIABLE_PITCH = 2
  980. Global Const $FF_DECORATIVE = 80
  981. Global Const $FF_DONTCARE = 0
  982. Global Const $FF_MODERN = 48
  983. Global Const $FF_ROMAN = 16
  984. Global Const $FF_SCRIPT = 64
  985. Global Const $FF_SWISS = 32
  986. Global Const $TAGPOINT = "long X;long Y"
  987. Global Const $TAGRECT = "long Left;long Top;long Right;long Bottom"
  988. Global Const $TAGSIZE = "long X;long Y"
  989. Global Const $TAGMARGINS = "int cxLeftWidth;int cxRightWidth;int cyTopHeight;int cyBottomHeight"
  990. Global Const $TAGFILETIME = "dword Lo;dword Hi"
  991. Global Const $TAGSYSTEMTIME = "word Year;word Month;word Dow;word Day;word Hour;word Minute;word Second;word MSeconds"
  992. Global Const $TAGTIME_ZONE_INFORMATION = "long Bias;wchar StdName[32];word StdDate[8];long StdBias;wchar DayName[32];word DayDate[8];long DayBias"
  993. Global Const $TAGNMHDR = "hwnd hWndFrom;uint_ptr IDFrom;INT Code"
  994. Global Const $TAGCOMBOBOXEXITEM = "uint Mask;int_ptr Item;ptr Text;int TextMax;int Image;int SelectedImage;int OverlayImage;" & "int Indent;lparam Param"
  995. Global Const $TAGNMCBEDRAGBEGIN = $TAGNMHDR & ";int ItemID;ptr szText"
  996. Global Const $TAGNMCBEENDEDIT = $TAGNMHDR & ";bool fChanged;int NewSelection;ptr szText;int Why"
  997. Global Const $TAGNMCOMBOBOXEX = $TAGNMHDR & ";uint Mask;int_ptr Item;ptr Text;int TextMax;int Image;" & "int SelectedImage;int OverlayImage;int Indent;lparam Param"
  998. Global Const $TAGDTPRANGE = "word MinYear;word MinMonth;word MinDOW;word MinDay;word MinHour;word MinMinute;" & "word MinSecond;word MinMSecond;word MaxYear;word MaxMonth;word MaxDOW;word MaxDay;word MaxHour;" & "word MaxMinute;word MaxSecond;word MaxMSecond;bool MinValid;bool MaxValid"
  999. Global Const $TAGNMDATETIMECHANGE = $TAGNMHDR & ";dword Flag;" & $TAGSYSTEMTIME
  1000. Global Const $TAGNMDATETIMEFORMAT = $TAGNMHDR & ";ptr Format;" & $TAGSYSTEMTIME & ";ptr pDisplay;wchar Display[64]"
  1001. Global Const $TAGNMDATETIMEFORMATQUERY = $TAGNMHDR & ";ptr Format;long SizeX;long SizeY"
  1002. Global Const $TAGNMDATETIMEKEYDOWN = $TAGNMHDR & ";int VirtKey;ptr Format;" & $TAGSYSTEMTIME
  1003. Global Const $TAGNMDATETIMESTRING = $TAGNMHDR & ";ptr UserString;" & $TAGSYSTEMTIME & ";dword Flags"
  1004. Global Const $TAGEVENTLOGRECORD = "dword Length;dword Reserved;dword RecordNumber;dword TimeGenerated;dword TimeWritten;dword EventID;" & "word EventType;word NumStrings;word EventCategory;word ReservedFlags;dword ClosingRecordNumber;dword StringOffset;" & "dword UserSidLength;dword UserSidOffset;dword DataLength;dword DataOffset"
  1005. Global Const $TAGGDIPBITMAPDATA = "uint Width;uint Height;int Stride;int Format;ptr Scan0;uint_ptr Reserved"
  1006. Global Const $TAGGDIPENCODERPARAM = "byte GUID[16];dword Count;dword Type;ptr Values"
  1007. Global Const $TAGGDIPENCODERPARAMS = "dword Count;byte Params[0]"
  1008. Global Const $TAGGDIPRECTF = "float X;float Y;float Width;float Height"
  1009. Global Const $TAGGDIPSTARTUPINPUT = "uint Version;ptr Callback;bool NoThread;bool NoCodecs"
  1010. Global Const $TAGGDIPSTARTUPOUTPUT = "ptr HookProc;ptr UnhookProc"
  1011. Global Const $TAGGDIPIMAGECODECINFO = "byte CLSID[16];byte FormatID[16];ptr CodecName;ptr DllName;ptr FormatDesc;ptr FileExt;" & "ptr MimeType;dword Flags;dword Version;dword SigCount;dword SigSize;ptr SigPattern;ptr SigMask"
  1012. Global Const $TAGGDIPPENCODERPARAMS = "dword Count;byte Params[0]"
  1013. Global Const $TAGHDITEM = "uint Mask;int XY;ptr Text;handle hBMP;int TextMax;int Fmt;lparam Param;int Image;int Order;uint Type;ptr pFilter;uint State"
  1014. Global Const $TAGNMHDDISPINFO = $TAGNMHDR & ";int Item;uint Mask;ptr Text;int TextMax;int Image;lparam lParam"
  1015. Global Const $TAGNMHDFILTERBTNCLICK = $TAGNMHDR & ";int Item;" & $TAGRECT
  1016. Global Const $TAGNMHEADER = $TAGNMHDR & ";int Item;int Button;ptr pItem"
  1017. Global Const $TAGGETIPADDRESS = "byte Field4;byte Field3;byte Field2;byte Field1"
  1018. Global Const $TAGNMIPADDRESS = $TAGNMHDR & ";int Field;int Value"
  1019. Global Const $TAGLVFINDINFO = "uint Flags;ptr Text;lparam Param;" & $TAGPOINT & ";uint Direction"
  1020. Global Const $TAGLVHITTESTINFO = $TAGPOINT & ";uint Flags;int Item;int SubItem"
  1021. Global Const $TAGLVITEM = "uint Mask;int Item;int SubItem;uint State;uint StateMask;ptr Text;int TextMax;int Image;lparam Param;" & "int Indent;int GroupID;uint Columns;ptr pColumns"
  1022. Global Const $TAGNMLISTVIEW = $TAGNMHDR & ";int Item;int SubItem;uint NewState;uint OldState;uint Changed;" & "long ActionX;long ActionY;lparam Param"
  1023. Global Const $TAGNMLVCUSTOMDRAW = $TAGNMHDR & ";dword dwDrawStage;handle hdc;long Left;long Top;long Right;long Bottom;" & "dword_ptr dwItemSpec;uint uItemState;lparam lItemlParam" & ";dword clrText;dword clrTextBk;int iSubItem;dword dwItemType;dword clrFace;int iIconEffect;" & "int iIconPhase;int iPartId;int iStateId;long TextLeft;long TextTop;long TextRight;long TextBottom;uint uAlign"
  1024. Global Const $TAGNMLVDISPINFO = $TAGNMHDR & ";" & $TAGLVITEM
  1025. Global Const $TAGNMLVFINDITEM = $TAGNMHDR & ";" & $TAGLVFINDINFO
  1026. Global Const $TAGNMLVGETINFOTIP = $TAGNMHDR & ";dword Flags;ptr Text;int TextMax;int Item;int SubItem;lparam lParam"
  1027. Global Const $TAGNMITEMACTIVATE = $TAGNMHDR & ";int Index;int SubItem;uint NewState;uint OldState;uint Changed;" & $TAGPOINT & ";lparam lParam;uint KeyFlags"
  1028. Global Const $TAGNMLVKEYDOWN = $TAGNMHDR & ";align 1;word VKey;uint Flags"
  1029. Global Const $TAGNMLVSCROLL = $TAGNMHDR & ";int DX;int DY"
  1030. Global Const $TAGMCHITTESTINFO = "uint Size;" & $TAGPOINT & ";uint Hit;" & $TAGSYSTEMTIME
  1031. Global Const $TAGMCMONTHRANGE = "word MinYear;word MinMonth;word MinDOW;word MinDay;word MinHour;word MinMinute;word MinSecond;" & "word MinMSeconds;word MaxYear;word MaxMonth;word MaxDOW;word MaxDay;word MaxHour;word MaxMinute;word MaxSecond;" & "word MaxMSeconds;short Span"
  1032. Global Const $TAGMCRANGE = "word MinYear;word MinMonth;word MinDOW;word MinDay;word MinHour;word MinMinute;word MinSecond;" & "word MinMSeconds;word MaxYear;word MaxMonth;word MaxDOW;word MaxDay;word MaxHour;word MaxMinute;word MaxSecond;" & "word MaxMSeconds;short MinSet;short MaxSet"
  1033. Global Const $TAGMCSELRANGE = "word MinYear;word MinMonth;word MinDOW;word MinDay;word MinHour;word MinMinute;word MinSecond;" & "word MinMSeconds;word MaxYear;word MaxMonth;word MaxDOW;word MaxDay;word MaxHour;word MaxMinute;word MaxSecond;" & "word MaxMSeconds"
  1034. Global Const $TAGNMDAYSTATE = $TAGNMHDR & ";" & $TAGSYSTEMTIME & ";int DayState;ptr pDayState"
  1035. Global Const $TAGNMSELCHANGE = $TAGNMHDR & ";word BegYear;word BegMonth;word BegDOW;word BegDay;" & "word BegHour;word BegMinute;word BegSecond;word BegMSeconds;word EndYear;word EndMonth;word EndDOW;" & "word EndDay;word EndHour;word EndMinute;word EndSecond;word EndMSeconds"
  1036. Global Const $TAGNMOBJECTNOTIFY = $TAGNMHDR & ";int Item;ptr piid;ptr pObject;long Result"
  1037. Global Const $TAGNMTCKEYDOWN = $TAGNMHDR & ";word VKey;uint Flags"
  1038. Global Const $TAGTVITEM = "uint Mask;handle hItem;uint State;uint StateMask;ptr Text;int TextMax;int Image;int SelectedImage;" & "int Children;lparam Param"
  1039. Global Const $TAGTVITEMEX = $TAGTVITEM & ";int Integral"
  1040. Global Const $TAGNMTREEVIEW = $TAGNMHDR & ";uint Action;uint OldMask;handle OldhItem;uint OldState;uint OldStateMask;" & "ptr OldText;int OldTextMax;int OldImage;int OldSelectedImage;int OldChildren;lparam OldParam;uint NewMask;handle NewhItem;" & "uint NewState;uint NewStateMask;ptr NewText;int NewTextMax;int NewImage;int NewSelectedImage;int NewChildren;" & "lparam NewParam;long PointX;long PointY"
  1041. Global Const $TAGNMTVCUSTOMDRAW = $TAGNMHDR & ";dword DrawStage;handle HDC;long Left;long Top;long Right;long Bottom;" & "dword_ptr ItemSpec;uint ItemState;lparam ItemParam;dword ClrText;dword ClrTextBk;int Level"
  1042. Global Const $TAGNMTVDISPINFO = $TAGNMHDR & ";" & $TAGTVITEM
  1043. Global Const $TAGNMTVGETINFOTIP = $TAGNMHDR & ";ptr Text;int TextMax;handle hItem;lparam lParam"
  1044. Global Const $TAGTVHITTESTINFO = $TAGPOINT & ";uint Flags;handle Item"
  1045. Global Const $TAGNMTVKEYDOWN = $TAGNMHDR & ";word VKey;uint Flags"
  1046. Global Const $TAGNMMOUSE = $TAGNMHDR & ";dword_ptr ItemSpec;dword_ptr ItemData;" & $TAGPOINT & ";lparam HitInfo"
  1047. Global Const $TAGTOKEN_PRIVILEGES = "dword Count;int64 LUID;dword Attributes"
  1048. Global Const $TAGIMAGEINFO = "handle hBitmap;handle hMask;int Unused1;int Unused2;" & $TAGRECT
  1049. Global Const $TAGMENUINFO = "dword Size;INT Mask;dword Style;uint YMax;handle hBack;dword ContextHelpID;ulong_ptr MenuData"
  1050. Global Const $TAGMENUITEMINFO = "uint Size;uint Mask;uint Type;uint State;uint ID;handle SubMenu;handle BmpChecked;handle BmpUnchecked;" & "ulong_ptr ItemData;ptr TypeData;uint CCH;handle BmpItem"
  1051. Global Const $TAGREBARBANDINFO = "uint cbSize;uint fMask;uint fStyle;dword clrFore;dword clrBack;ptr lpText;uint cch;" & "int iImage;hwnd hwndChild;uint cxMinChild;uint cyMinChild;uint cx;handle hbmBack;uint wID;uint cyChild;uint cyMaxChild;" & "uint cyIntegral;uint cxIdeal;lparam lParam;uint cxHeader"
  1052. Global Const $TAGNMREBARAUTOBREAK = $TAGNMHDR & ";uint uBand;uint wID;lparam lParam;uint uMsg;uint fStyleCurrent;bool fAutoBreak"
  1053. Global Const $TAGNMRBAUTOSIZE = $TAGNMHDR & ";bool fChanged;long TargetLeft;long TargetTop;long TargetRight;long TargetBottom;" & "long ActualLeft;long ActualTop;long ActualRight;long ActualBottom"
  1054. Global Const $TAGNMREBAR = $TAGNMHDR & ";dword dwMask;uint uBand;uint fStyle;uint wID;laram lParam"
  1055. Global Const $TAGNMREBARCHEVRON = $TAGNMHDR & ";uint uBand;uint wID;lparam lParam;" & $TAGRECT & ";lparam lParamNM"
  1056. Global Const $TAGNMREBARCHILDSIZE = $TAGNMHDR & ";uint uBand;uint wID;long CLeft;long CTop;long CRight;long CBottom;" & "long BLeft;long BTop;long BRight;long BBottom"
  1057. Global Const $TAGCOLORSCHEME = "dword Size;dword BtnHighlight;dword BtnShadow"
  1058. Global Const $TAGNMTOOLBAR = $TAGNMHDR & ";int iItem;" & "int iBitmap;int idCommand;byte fsState;byte fsStyle;align;dword_ptr dwData;int_ptr iString" & ";int cchText;ptr pszText;" & $TAGRECT
  1059. Global Const $TAGNMTBHOTITEM = $TAGNMHDR & ";int idOld;int idNew;dword dwFlags"
  1060. Global Const $TAGTBBUTTON = "int Bitmap;int Command;byte State;byte Style;align;dword_ptr Param;int_ptr String"
  1061. Global Const $TAGTBBUTTONINFO = "uint Size;dword Mask;int Command;int Image;byte State;byte Style;word CX;dword_ptr Param;ptr Text;int TextMax"
  1062. Global Const $TAGNETRESOURCE = "dword Scope;dword Type;dword DisplayType;dword Usage;ptr LocalName;ptr RemoteName;ptr Comment;ptr Provider"
  1063. Global Const $TAGOVERLAPPED = "ulong_ptr Internal;ulong_ptr InternalHigh;dword Offset;dword OffsetHigh;handle hEvent"
  1064. Global Const $TAGOPENFILENAME = "dword StructSize;hwnd hwndOwner;handle hInstance;ptr lpstrFilter;ptr lpstrCustomFilter;" & "dword nMaxCustFilter;dword nFilterIndex;ptr lpstrFile;dword nMaxFile;ptr lpstrFileTitle;dword nMaxFileTitle;" & "ptr lpstrInitialDir;ptr lpstrTitle;dword Flags;word nFileOffset;word nFileExtension;ptr lpstrDefExt;lparam lCustData;" & "ptr lpfnHook;ptr lpTemplateName;ptr pvReserved;dword dwReserved;dword FlagsEx"
  1065. Global Const $TAGBITMAPINFO = "dword Size;long Width;long Height;word Planes;word BitCount;dword Compression;dword SizeImage;" & "long XPelsPerMeter;long YPelsPerMeter;dword ClrUsed;dword ClrImportant;dword RGBQuad"
  1066. Global Const $TAGBLENDFUNCTION = "byte Op;byte Flags;byte Alpha;byte Format"
  1067. Global Const $TAGGUID = "dword Data1;word Data2;word Data3;byte Data4[8]"
  1068. Global Const $TAGWINDOWPLACEMENT = "uint length; uint flags;uint showCmd;long ptMinPosition[2];long ptMaxPosition[2];long rcNormalPosition[4]"
  1069. Global Const $TAGWINDOWPOS = "hwnd hWnd;hwnd InsertAfter;int X;int Y;int CX;int CY;uint Flags"
  1070. Global Const $TAGSCROLLINFO = "uint cbSize;uint fMask;int nMin;int nMax;uint nPage;int nPos;int nTrackPos"
  1071. Global Const $TAGSCROLLBARINFO = "dword cbSize;" & $TAGRECT & ";int dxyLineButton;int xyThumbTop;" & "int xyThumbBottom;int reserved;dword rgstate[6]"
  1072. Global Const $TAGLOGFONT = "long Height;long Width;long Escapement;long Orientation;long Weight;byte Italic;byte Underline;" & "byte Strikeout;byte CharSet;byte OutPrecision;byte ClipPrecision;byte Quality;byte PitchAndFamily;wchar FaceName[32]"
  1073. Global Const $TAGKBDLLHOOKSTRUCT = "dword vkCode;dword scanCode;dword flags;dword time;ulong_ptr dwExtraInfo"
  1074. Global Const $TAGPROCESS_INFORMATION = "handle hProcess;handle hThread;dword ProcessID;dword ThreadID"
  1075. Global Const $TAGSTARTUPINFO = "dword Size;ptr Reserved1;ptr Desktop;ptr Title;dword X;dword Y;dword XSize;dword YSize;dword XCountChars;" & "dword YCountChars;dword FillAttribute;dword Flags;word ShowWindow;word Reserved2;ptr Reserved3;handle StdInput;" & "handle StdOutput;handle StdError"
  1076. Global Const $TAGSECURITY_ATTRIBUTES = "dword Length;ptr Descriptor;bool InheritHandle"
  1077. Global Const $TAGWIN32_FIND_DATA = "dword dwFileAttributes; dword ftCreationTime[2]; dword ftLastAccessTime[2]; dword ftLastWriteTime[2]; dword nFileSizeHigh; dword nFileSizeLow; dword dwReserved0; dword dwReserved1; wchar cFileName[260]; wchar cAlternateFileName[14]"
  1078. Func _WINAPI_GETLASTERROR($CURERR = @error, $CUREXT = @extended)
  1079. Local $ARESULT = DllCall("kernel32.dll", "dword", "GetLastError")
  1080. Return SetError($CURERR, $CUREXT, $ARESULT[0])
  1081. EndFunc
  1082. Func _WINAPI_SETLASTERROR($IERRCODE, $CURERR = @error, $CUREXT = @extended)
  1083. DllCall("kernel32.dll", "none", "SetLastError", "dword", $IERRCODE)
  1084. Return SetError($CURERR, $CUREXT)
  1085. EndFunc
  1086. Global $LOWTARGETHEALTHCOLOR = 0, $LOWTARGETHEALTHX = 0, $FULLTARGETHEALTHX = 0, $FULLTARGETHEALTHCOLOR = 0, $FULLMANACOLOR = 0, $FULLSTAMCOLOR = 0, $FULLHEALTHCOLOR = 0, $TARGHEALTHY = 0, $X1 = 0, $Y1 = 0, $GO = 0, $MANA = 0, $STAM = 0, $HEALTH = 0, $MANAX = 0, $MANAY = 0, $STAMX = 0, $STAMY = 0, $HEALTHX = 0, $HEALTHY = 0, $HITS = 0, $WEAPONIMAGE = 0, $LOOPEXIT = False, $TOTALHITS = 0, $HITCOUNTERCOLORFULL = 0, $XFORHITCOUNTERFULL = 0, $XFORHITCOUNTERFULLDEFAULT = 0, $YFORHITCTR = 0, $XFORTARGETCHECK = 0, $Z = 0, $CHECKX, $CHECKY
  1087. Global $IRONSKIN, $DISEASE, $HASTE, $CASTINGTIMER, $CASTDISEASE, $CASTHASTE, $CASTIRON, $ATTACKDELAY, $ATTACKDELAYREG, $CASTINGTIMERDIF, $EQUIP, $EQUIPARMOR, $EXIT, $GMRESPONSE, $GMRESPONSEREG, $GMX, $GMY, $GO, $GUIREAD, $HITCOUNTERCOLORFULL, $HITS, $I, $INPUTATTACKDELAY, $INPUTDISEASE, $INPUTDISEASEREG, $INPUTHASTE, $INPUTHASTEREG, $INPUTIRONSKIN, $INPUTIRONSKINREG, $INPUTVMWARE, $MENUGO, $NMSG, $NOSTAFF, $NUM, $OUTOFTIME, $PIXVAR, $PIXVAR2, $RESULT, $RESULT2
  1088. Global $RADIOVAL = -1, $EQUIPARMOR = -1, $GMRESPONSE = -1, $MENUGO = -1, $GUIREAD, $CASTDISEASE, $CASTIRON, $CASTHASTE, $GMX, $GMY, $ATTACKDELAY, $VMWARE, $NOTARGETCOLOR, $NOTARGETX, $NOTARGETY, $PIXVAR2, $STAMICON, $STAMICONX, $STAMICONY, $RADIO4, $RADIO5, $EXTRAHEAL
  1089. Global $FINDIMAGE, $RESULTPOSITION, $X, $Y, $TOLERANCE, $FINDIMAGE, $RESULT, $X1, $Y1, $RIGHT, $BOTTOM, $INPUTVMWAREDELAY, $UNSHEATHEKEY, $SLOT0, $SLOT1, $SLOT2, $SLOT3, $SLOT4, $SLOT5, $SLOT6, $SLOT7, $SLOT8, $SLOT9, $SLOT0, $FOOD2, $FOOD3, $HEALTHTOMANA, $FORM1_1, $MENUITEM1, $MENUITEM2, $MENUITEM3, $MENUITEM4, $COMBOBOX, $RADIO1, $RADIO2, $RADIO3, $LABEL1, $LABEL2, $LABEL3, $LABEL4, $LABEL5, $LABEL6, $BUTTON1, $BUTTON2, $INPUT1, $INPUT2, $INPUT3, $INPUT4, $INPUT5, $INPUT6, $CHECKBOX1, $CHECKBOX2, $CHECKBOX3, $VDLL, $READ, $TIME1, $TIME2, $TIME3, $DIF, $TIMEOUT, $POS
  1090. Global $VMWAREREG, $UNSHEATHE, $HTMK, $GUIMODE, $CHECKBOX4, $CHECKBOX5, $CHECKBOX6, $BUTTON3, $ADD1, $ADD2, $ADD3, $SEND, $STATE, $LBL3, $LABEL7, $INPUT7, $SPECIALATTACKCDREG, $TIME4, $SPECIALATK, $CASTINGWAIT, $CASTINGWAITREG, $LABEL8, $INPUT8, $DUMMYMODE, $HEALCASTING = False, $NOHEALCASTING = False, $MTSK, $STHK
  1091. Global $RESULT[5]
  1092. $RESULT[0] = 0
  1093. $CASTINGWAITREG = RegRead("HKEY_LOCAL_MACHINE\SOFTWARE\DimsMacro", "inputCastingWait")
  1094. $SPECIALATTACKCDREG = RegRead("HKEY_LOCAL_MACHINE\SOFTWARE\DimsMacro", "inputSpecialAttackCD")
  1095. $INPUTDISEASEREG = RegRead("HKEY_LOCAL_MACHINE\SOFTWARE\DimsMacro", "inputDisease")
  1096. $INPUTHASTEREG = RegRead("HKEY_LOCAL_MACHINE\SOFTWARE\DimsMacro", "inputHaste")
  1097. $INPUTIRONSKINREG = RegRead("HKEY_LOCAL_MACHINE\SOFTWARE\DimsMacro", "inputIronSkin")
  1098. $GMRESPONSEREG = RegRead("HKEY_LOCAL_MACHINE\SOFTWARE\DimsMacro", "inputGMResponse")
  1099. $ATTACKDELAYREG = RegRead("HKEY_LOCAL_MACHINE\SOFTWARE\DimsMacro", "inputAttackDelay")
  1100. $VMWAREREG = RegRead("HKEY_LOCAL_MACHINE\SOFTWARE\DimsMacro", "inputVMwareDelay")
  1101. $UNSHEATHE = RegRead("HKEY_LOCAL_MACHINE\SOFTWARE\DimsMacro", "UnsheatheKey")
  1102. $EXTRAHEAL = RegRead("HKEY_LOCAL_MACHINE\SOFTWARE\DimsMacro", "ExtraHeal")
  1103. $SLOT1 = RegRead("HKEY_LOCAL_MACHINE\SOFTWARE\DimsMacro", "Slot1")
  1104. $SLOT2 = RegRead("HKEY_LOCAL_MACHINE\SOFTWARE\DimsMacro", "Slot2")
  1105. $SLOT3 = RegRead("HKEY_LOCAL_MACHINE\SOFTWARE\DimsMacro", "Slot3")
  1106. $SLOT4 = RegRead("HKEY_LOCAL_MACHINE\SOFTWARE\DimsMacro", "Slot4")
  1107. $SLOT5 = RegRead("HKEY_LOCAL_MACHINE\SOFTWARE\DimsMacro", "Slot5")
  1108. $SLOT6 = RegRead("HKEY_LOCAL_MACHINE\SOFTWARE\DimsMacro", "Slot6")
  1109. $SLOT7 = RegRead("HKEY_LOCAL_MACHINE\SOFTWARE\DimsMacro", "Slot7")
  1110. $SLOT8 = RegRead("HKEY_LOCAL_MACHINE\SOFTWARE\DimsMacro", "Slot8")
  1111. $SLOT9 = RegRead("HKEY_LOCAL_MACHINE\SOFTWARE\DimsMacro", "Slot9")
  1112. $SLOT0 = RegRead("HKEY_LOCAL_MACHINE\SOFTWARE\DimsMacro", "Slot0")
  1113. $FOOD2 = RegRead("HKEY_LOCAL_MACHINE\SOFTWARE\DimsMacro", "Food2")
  1114. $FOOD3 = RegRead("HKEY_LOCAL_MACHINE\SOFTWARE\DimsMacro", "Food3")
  1115. $HTMK = RegRead("HKEY_LOCAL_MACHINE\SOFTWARE\DimsMacro", "HealthToMana")
  1116. $STHK = RegRead("HKEY_LOCAL_MACHINE\SOFTWARE\DimsMacro", "StamToHealth")
  1117. $MTSK = RegRead("HKEY_LOCAL_MACHINE\SOFTWARE\DimsMacro", "ManaToStam")
  1118. Global $SLT[6]
  1119. $SLT[0] = RegRead("HKEY_LOCAL_MACHINE\SOFTWARE\DimsMacro", "Spell1")
  1120. $SLT[1] = RegRead("HKEY_LOCAL_MACHINE\SOFTWARE\DimsMacro", "Spell2")
  1121. $SLT[2] = RegRead("HKEY_LOCAL_MACHINE\SOFTWARE\DimsMacro", "Spell3")
  1122. $SLT[3] = RegRead("HKEY_LOCAL_MACHINE\SOFTWARE\DimsMacro", "Spell4")
  1123. $SLT[4] = RegRead("HKEY_LOCAL_MACHINE\SOFTWARE\DimsMacro", "Spell5")
  1124. Global $FUNCTIONARRARY[12]
  1125. $FUNCTIONARRARY[0] = 10
  1126. $FUNCTIONARRARY[1] = RegRead("HKEY_LOCAL_MACHINE\SOFTWARE\DimsMacro", "ArmorSlot1")
  1127. $FUNCTIONARRARY[2] = RegRead("HKEY_LOCAL_MACHINE\SOFTWARE\DimsMacro", "ArmorSlot2")
  1128. $FUNCTIONARRARY[3] = RegRead("HKEY_LOCAL_MACHINE\SOFTWARE\DimsMacro", "ArmorSlot3")
  1129. $FUNCTIONARRARY[4] = RegRead("HKEY_LOCAL_MACHINE\SOFTWARE\DimsMacro", "ArmorSlot4")
  1130. $FUNCTIONARRARY[5] = RegRead("HKEY_LOCAL_MACHINE\SOFTWARE\DimsMacro", "ArmorSlot5")
  1131. $FUNCTIONARRARY[6] = RegRead("HKEY_LOCAL_MACHINE\SOFTWARE\DimsMacro", "ArmorSlot6")
  1132. $FUNCTIONARRARY[7] = RegRead("HKEY_LOCAL_MACHINE\SOFTWARE\DimsMacro", "ArmorSlot7")
  1133. $FUNCTIONARRARY[8] = RegRead("HKEY_LOCAL_MACHINE\SOFTWARE\DimsMacro", "ArmorSlot8")
  1134. $FUNCTIONARRARY[9] = RegRead("HKEY_LOCAL_MACHINE\SOFTWARE\DimsMacro", "ArmorSlot9")
  1135. $FUNCTIONARRARY[10] = RegRead("HKEY_LOCAL_MACHINE\SOFTWARE\DimsMacro", "ArmorSlot0")
  1136. Global $HOTKEY
  1137. Global $COMBOXARRAY[34]
  1138. $COMBOXARRAY[0] = "Unsheathe Key"
  1139. $COMBOXARRAY[1] = "Health to Mana"
  1140. $COMBOXARRAY[2] = "GUI Mode Key"
  1141. $COMBOXARRAY[3] = "Food 2"
  1142. $COMBOXARRAY[4] = "Food 3"
  1143. $COMBOXARRAY[5] = "Slot 1 (Weapon)"
  1144. $COMBOXARRAY[6] = "Slot 2 (Staff)"
  1145. $COMBOXARRAY[7] = "Slot 3 (Food 1)"
  1146. $COMBOXARRAY[8] = "Slot 4 (Special Attack)"
  1147. $COMBOXARRAY[9] = "Slot 5 (Mana to Stam)"
  1148. $COMBOXARRAY[10] = "Slot 6 (Disease / Arrow Ward / Etc...)"
  1149. $COMBOXARRAY[11] = "Slot 7 (Melee Haste / Rapid Shot / Etc...)"
  1150. $COMBOXARRAY[12] = "Slot 8 (Ironskin / Etc...)"
  1151. $COMBOXARRAY[13] = "Slot 9 (Sacrafice / Heal Other / Witches Brew )"
  1152. $COMBOXARRAY[14] = "Slot 0 (Sacrafice / Heal Other / Witches Brew )"
  1153. $COMBOXARRAY[15] = "Armor Slot 1 (Helm)"
  1154. $COMBOXARRAY[16] = "Armor Slot 2 (Shoulders)"
  1155. $COMBOXARRAY[17] = "Armor Slot 3 (Arms)"
  1156. $COMBOXARRAY[18] = "Armor Slot 4 (Elbows)"
  1157. $COMBOXARRAY[19] = "Armor Slot 5 (Hands)"
  1158. $COMBOXARRAY[20] = "Armor Slot 6 (Boots)"
  1159. $COMBOXARRAY[21] = "Armor Slot 7 (Greaves)"
  1160. $COMBOXARRAY[22] = "Armor Slot 8 (Girdle)"
  1161. $COMBOXARRAY[23] = "Armor Slot 9 (Legs)"
  1162. $COMBOXARRAY[24] = "Armor Slot 0 (Chest)"
  1163. $COMBOXARRAY[25] = "Spell 1"
  1164. $COMBOXARRAY[26] = "Spell 2"
  1165. $COMBOXARRAY[27] = "Spell 3"
  1166. $COMBOXARRAY[28] = "Spell 4"
  1167. $COMBOXARRAY[29] = "Spell 5"
  1168. $COMBOXARRAY[30] = "Stam To Health"
  1169. $COMBOXARRAY[31] = "Mana To Stam"
  1170. $COMBOXARRAY[32] = "Extra Heal"
  1171. Global $REGARRAY[34]
  1172. $REGARRAY[0] = "UnsheatheKey"
  1173. $REGARRAY[1] = "HealthtoMana"
  1174. $REGARRAY[2] = "GUIModeKey"
  1175. $REGARRAY[3] = "Food2"
  1176. $REGARRAY[4] = "Food3"
  1177. $REGARRAY[5] = "Slot1"
  1178. $REGARRAY[6] = "Slot2"
  1179. $REGARRAY[7] = "Slot3"
  1180. $REGARRAY[8] = "Slot4"
  1181. $REGARRAY[9] = "Slot5"
  1182. $REGARRAY[10] = "Slot6"
  1183. $REGARRAY[11] = "Slot7"
  1184. $REGARRAY[12] = "Slot8"
  1185. $REGARRAY[13] = "Slot9"
  1186. $REGARRAY[14] = "Slot0"
  1187. $REGARRAY[15] = "ArmorSlot1"
  1188. $REGARRAY[16] = "ArmorSlot2"
  1189. $REGARRAY[17] = "ArmorSlot3"
  1190. $REGARRAY[18] = "ArmorSlot4"
  1191. $REGARRAY[19] = "ArmorSlot5"
  1192. $REGARRAY[20] = "ArmorSlot6"
  1193. $REGARRAY[21] = "ArmorSlot7"
  1194. $REGARRAY[22] = "ArmorSlot8"
  1195. $REGARRAY[23] = "ArmorSlot9"
  1196. $REGARRAY[24] = "ArmorSlot0"
  1197. $REGARRAY[25] = "Spell1"
  1198. $REGARRAY[26] = "Spell2"
  1199. $REGARRAY[27] = "Spell3"
  1200. $REGARRAY[28] = "Spell4"
  1201. $REGARRAY[29] = "Spell5"
  1202. $REGARRAY[30] = "StamToHealth"
  1203. $REGARRAY[31] = "ManaToStam"
  1204. $REGARRAY[32] = "ExtraHeal"
  1205. Global $KEYARRARY[26]
  1206. $KEYARRARY[0] = ""
  1207. $KEYARRARY[1] = ""
  1208. $KEYARRARY[2] = ""
  1209. $KEYARRARY[3] = ""
  1210. $KEYARRARY[4] = ""
  1211. $KEYARRARY[5] = ""
  1212. $KEYARRARY[6] = ""
  1213. $KEYARRARY[7] = ""
  1214. $KEYARRARY[8] = ""
  1215. $KEYARRARY[9] = ""
  1216. $KEYARRARY[10] = ""
  1217. $KEYARRARY[11] = ""
  1218. $KEYARRARY[12] = ""
  1219. $KEYARRARY[13] = ""
  1220. $KEYARRARY[14] = ""
  1221. $KEYARRARY[15] = ""
  1222. $KEYARRARY[16] = ""
  1223. $KEYARRARY[17] = ""
  1224. $KEYARRARY[18] = ""
  1225. $KEYARRARY[19] = ""
  1226. $KEYARRARY[20] = ""
  1227. $KEYARRARY[21] = ""
  1228. $KEYARRARY[22] = ""
  1229. $KEYARRARY[23] = ""
  1230. $KEYARRARY[24] = ""
  1231. Global $KEYLIST[126]
  1232. $KEYLIST[0] = ""
  1233. $KEYLIST[1] = "Left"
  1234. $KEYLIST[2] = "Right"
  1235. $KEYLIST[3] = "Windows 2000/XP: X1 mouse button CAN NOT SEND"
  1236. $KEYLIST[4] = "Middle"
  1237. $KEYLIST[5] = "Windows 2000/XP: X2 mouse button CAN NOT SEND"
  1238. $KEYLIST[6] = ""
  1239. $KEYLIST[7] = "{CTRL}"
  1240. $KEYLIST[8] = "{BACKSPACE}"
  1241. $KEYLIST[9] = "{TAB}"
  1242. $KEYLIST[10] = ""
  1243. $KEYLIST[11] = ""
  1244. $KEYLIST[12] = ""
  1245. $KEYLIST[13] = "{NUMPADENTER}"
  1246. $KEYLIST[14] = ""
  1247. $KEYLIST[15] = ""
  1248. $KEYLIST[16] = "{SHIFT}"
  1249. $KEYLIST[17] = "{CTRL}"
  1250. $KEYLIST[18] = "{ALT}"
  1251. $KEYLIST[19] = ""
  1252. $KEYLIST[20] = "{CAPSLOCK toggle}"
  1253. $KEYLIST[21] = ""
  1254. $KEYLIST[22] = ""
  1255. $KEYLIST[23] = "{PGUP}"
  1256. $KEYLIST[24] = "{PGDN}"
  1257. $KEYLIST[25] = "{END}"
  1258. $KEYLIST[26] = "{HOME}"
  1259. $KEYLIST[27] = "{ESC}"
  1260. $KEYLIST[28] = ""
  1261. $KEYLIST[29] = ""
  1262. $KEYLIST[30] = ""
  1263. $KEYLIST[31] = ""
  1264. $KEYLIST[32] = "{SPACE}"
  1265. $KEYLIST[33] = ""
  1266. $KEYLIST[34] = ""
  1267. $KEYLIST[35] = ""
  1268. $KEYLIST[36] = ""
  1269. $KEYLIST[37] = "{LEFT}"
  1270. $KEYLIST[38] = "{UP}"
  1271. $KEYLIST[39] = "{RIGHT}"
  1272. $KEYLIST[40] = "{DOWN}"
  1273. $KEYLIST[41] = ""
  1274. $KEYLIST[42] = ""
  1275. $KEYLIST[43] = ""
  1276. $KEYLIST[44] = ""
  1277. $KEYLIST[45] = "{INSERT}"
  1278. $KEYLIST[46] = "{DEL}"
  1279. $KEYLIST[47] = ""
  1280. $KEYLIST[48] = "0"
  1281. $KEYLIST[49] = "1"
  1282. $KEYLIST[50] = "2"
  1283. $KEYLIST[51] = "3"
  1284. $KEYLIST[52] = "4"
  1285. $KEYLIST[53] = "5"
  1286. $KEYLIST[54] = "6"
  1287. $KEYLIST[55] = "7"
  1288. $KEYLIST[56] = "8"
  1289. $KEYLIST[57] = "9"
  1290. $KEYLIST[58] = ""
  1291. $KEYLIST[59] = ""
  1292. $KEYLIST[60] = ""
  1293. $KEYLIST[61] = ""
  1294. $KEYLIST[62] = ""
  1295. $KEYLIST[63] = ""
  1296. $KEYLIST[64] = ""
  1297. $KEYLIST[65] = "A"
  1298. $KEYLIST[66] = "B"
  1299. $KEYLIST[67] = "C"
  1300. $KEYLIST[68] = "D"
  1301. $KEYLIST[69] = "E"
  1302. $KEYLIST[70] = "F"
  1303. $KEYLIST[71] = "G"
  1304. $KEYLIST[72] = "H"
  1305. $KEYLIST[73] = "I"
  1306. $KEYLIST[74] = "J"
  1307. $KEYLIST[75] = "K"
  1308. $KEYLIST[76] = "L"
  1309. $KEYLIST[77] = "M"
  1310. $KEYLIST[78] = "N"
  1311. $KEYLIST[79] = "O"
  1312. $KEYLIST[80] = "P"
  1313. $KEYLIST[81] = "Q"
  1314. $KEYLIST[82] = "R"
  1315. $KEYLIST[83] = "S"
  1316. $KEYLIST[84] = "T"
  1317. $KEYLIST[85] = "U"
  1318. $KEYLIST[86] = "V"
  1319. $KEYLIST[87] = "W"
  1320. $KEYLIST[88] = "X"
  1321. $KEYLIST[89] = "Y"
  1322. $KEYLIST[90] = "Z"
  1323. $KEYLIST[91] = ""
  1324. $KEYLIST[92] = ""
  1325. $KEYLIST[93] = ""
  1326. $KEYLIST[94] = ""
  1327. $KEYLIST[95] = ""
  1328. $KEYLIST[96] = ""
  1329. $KEYLIST[97] = ""
  1330. $KEYLIST[98] = ""
  1331. $KEYLIST[99] = ""
  1332. $KEYLIST[100] = ""
  1333. $KEYLIST[101] = ""
  1334. $KEYLIST[102] = ""
  1335. $KEYLIST[103] = ""
  1336. $KEYLIST[104] = ""
  1337. $KEYLIST[105] = ""
  1338. $KEYLIST[106] = "{NUMPADMULT}"
  1339. $KEYLIST[107] = "{NUMPADADD}"
  1340. $KEYLIST[108] = ""
  1341. $KEYLIST[109] = "{NUMPADSUB}"
  1342. $KEYLIST[110] = "{NUMPADDOT}"
  1343. $KEYLIST[111] = "{NUMPADDIV}"
  1344. $KEYLIST[112] = "{F1}"
  1345. $KEYLIST[113] = "{F2}"
  1346. $KEYLIST[114] = "{F3}"
  1347. $KEYLIST[115] = "{F4}"
  1348. $KEYLIST[116] = "{F5}"
  1349. $KEYLIST[117] = "{F6}"
  1350. $KEYLIST[118] = "{F7}"
  1351. $KEYLIST[119] = "{F8}"
  1352. $KEYLIST[120] = "{F9}"
  1353. $KEYLIST[121] = "{F10}"
  1354. $KEYLIST[122] = "{F11}"
  1355. $KEYLIST[123] = "{F12}"
  1356. $KEYLIST[123] = ""
  1357. $KEYLIST[124] = ""
  1358. $KEYLIST[125] = ""
  1359. Global $WEAPONARRAY[13]
  1360. $WEAPONARRAY[0] = 11
  1361. $WEAPONARRAY[1] = "images\weapons\wpn-polearm.bmp"
  1362. $WEAPONARRAY[2] = "images\weapons\wpn-2hsword.bmp"
  1363. $WEAPONARRAY[3] = "images\weapons\wpn-1hsword.bmp"
  1364. $WEAPONARRAY[4] = "images\weapons\wpn-1hmace.bmp"
  1365. $WEAPONARRAY[5] = "images\weapons\wpn-sithera.bmp"
  1366. $WEAPONARRAY[6] = "images\weapons\wpn-2hmace.bmp"
  1367. $WEAPONARRAY[7] = "images\weapons\wpn-archery.bmp"
  1368. $WEAPONARRAY[8] = "images\weapons\wpn-2haxe.bmp"
  1369. $WEAPONARRAY[9] = "images\weapons\wpn-1haxe.bmp"
  1370. $WEAPONARRAY[10] = "images\weapons\wpn-dagger.bmp"
  1371. $WEAPONARRAY[11] = "images\weapons\wpn-seigehammer.bmp"
  1372. Global $FUNCTIONARRARY[12]
  1373. $FUNCTIONARRARY[0] = 10
  1374. $FUNCTIONARRARY[1] = "^{F1}"
  1375. $FUNCTIONARRARY[2] = "^{F2}"
  1376. $FUNCTIONARRARY[3] = "^{F3}"
  1377. $FUNCTIONARRARY[4] = "^{F4}"
  1378. $FUNCTIONARRARY[5] = "^{F5}"
  1379. $FUNCTIONARRARY[6] = "^{F6}"
  1380. $FUNCTIONARRARY[7] = "^{F7}"
  1381. $FUNCTIONARRARY[8] = "^{F8}"
  1382. $FUNCTIONARRARY[9] = "^{F9}"
  1383. $FUNCTIONARRARY[10] = "^{F10}"
  1384. Global $ARMORARRAY[12]
  1385. $ARMORARRAY[0] = 10
  1386. $ARMORARRAY[1] = "images\armor\pa-helm.bmp"
  1387. $ARMORARRAY[2] = "images\armor\pa-shoulderpads.bmp"
  1388. $ARMORARRAY[3] = "images\armor\pa-armguards.bmp"
  1389. $ARMORARRAY[4] = "images\armor\pa-elbowpads.bmp"
  1390. $ARMORARRAY[5] = "images\armor\pa-gloves.bmp"
  1391. $ARMORARRAY[6] = "images\armor\pa-boots.bmp"
  1392. $ARMORARRAY[7] = "images\armor\pa-greaves.bmp"
  1393. $ARMORARRAY[8] = "images\armor\pa-girdle.bmp"
  1394. $ARMORARRAY[9] = "images\armor\pa-legs.bmp"
  1395. $ARMORARRAY[10] = "images\armor\pa-chest.bmp"
  1396. Global $RESULT[2]
  1397. $RESULT[0] = 0
  1398. Global $ARRAY[6]
  1399. $ARRAY[0] = 0
  1400. $ARRAY[1] = 0
  1401. $ARRAY[2] = 0
  1402. $ARRAY[3] = 0
  1403. $ARRAY[4] = 0
  1404. $ARRAY[5] = 0
  1405. Global $I = 0
  1406. Global $PAUSED
  1407. Global $EQUIPARMOR, $OUTOFTIME
  1408. Global $CASTINGTIMER, $CASTINGTIMERDIF, $NOTCASTING
  1409. Global $EQUIPDELAY = 11000, $TIME5 = $EQUIPDELAY
  1410. Global $EQUIPDELAY2 = 200000, $TIME6 = $EQUIPDELAY2
  1411. $VDLL = DllOpen("user32.dll")
  1412. Global $SIZE[3]
  1413. $FORM1_1 = GUICreate("Rapid Macro Complete Forever By: Diminished Hail " & $VER, 634, 448, 192, 124)
  1414. $MENUITEM1 = GUICtrlCreateMenu("&File")
  1415. $MENUITEM2 = GUICtrlCreateMenuItem("Exit", $MENUITEM1)
  1416. $MENUITEM3 = GUICtrlCreateMenu("&About")
  1417. $MENUITEM4 = GUICtrlCreateMenuItem("Author", $MENUITEM3)
  1418. $COMBOBOX = GUICtrlCreateCombo("", 348, 92, 245, 25, BitOR($CBS_DROPDOWNLIST, $CBS_AUTOHSCROLL, $WS_VSCROLL))
  1419. GUICtrlSetData(-1, "Unsheathe Key|Health to Mana|GUI Mode Key|Food 2|Food 3|Slot 1 (Weapon)|Slot 2 (Staff)|Slot 3 (Food 1)|Slot 4 (Special Attack)|Slot 5 (Mana to Stam)|Slot 6 (Disease / Arrow Ward / Etc...)|Slot 7 (Melee Haste / Rapid Shot / Etc...)|Slot 8 (Ironskin / Etc...)|Slot 9 (Sacrafice / Heal Other / Witches Brew )|Slot 0 (Sacrafice / Heal Other / Witches Brew )|Armor Slot 1 (Helm)|Armor Slot 2 (Shoulders)|Armor Slot 3 (Arms)|Armor Slot 4 (Elbows)|Armor Slot 5 (Hands)|Armor Slot 6 (Boots)|Armor Slot 7 (Greaves)|Armor Slot 8 (Girdle)|Armor Slot 9 (Legs)|Armor Slot 0 (Chest)|Spell 1|Spell 2|Spell 3|Spell 4|Spell 5|Stam To Health|Mana To Stam|Extra Heal")
  1420. $RADIO1 = GUICtrlCreateRadio("RM with AEA*", 5, 42, 85, 17)
  1421. $RADIO2 = GUICtrlCreateRadio("RM without AEA*", 100, 42, 105, 17)
  1422. $RADIO3 = GUICtrlCreateRadio("RM Dummy Mode", 210, 42, 105, 17)
  1423. $RADIO4 = GUICtrlCreateRadio("Magic Training without Heal", 330, 42, 153, 17)
  1424. $RADIO5 = GUICtrlCreateRadio("Magic Training with Heal", 490, 42, 143, 17)
  1425. $LABEL1 = GUICtrlCreateLabel("+ Rapid Macro Mode: + * AEA = Auto Equip Armor", 18, 10, 999, 28)
  1426. GUICtrlSetFont(-1, 14, 800, 0, "MS Sans Serif")
  1427. $BUTTON1 = GUICtrlCreateButton("Start", 280, 390, 75, 25, $WS_GROUP)
  1428. GUICtrlSetState(-1, $GUI_DISABLE)
  1429. $INPUT1 = GUICtrlCreateInput($INPUTDISEASEREG, 200, 90, 121, 21)
  1430. $INPUT2 = GUICtrlCreateInput($INPUTHASTEREG, 200, 130, 121, 21)
  1431. $INPUT3 = GUICtrlCreateInput($INPUTIRONSKINREG, 200, 170, 121, 21)
  1432. $INPUT4 = GUICtrlCreateInput($ATTACKDELAYREG, 200, 210, 121, 21)
  1433. $INPUT5 = GUICtrlCreateInput($VMWAREREG, 200, 250, 121, 21)
  1434. $CHECKBOX1 = GUICtrlCreateCheckbox("Disease / Arrow Ward / Etc", 10, 90, 157, 17)
  1435. $CHECKBOX2 = GUICtrlCreateCheckbox("Melee Haste / Rapid Shot", 10, 130, 147, 17)
  1436. $CHECKBOX3 = GUICtrlCreateCheckbox("Ironskin / Etc", 10, 170, 97, 17)
  1437. $LABEL4 = GUICtrlCreateLabel("Weapon C/D", 10, 210, 97, 17)
  1438. GUICtrlSetTip(-1, "How long it takes for you to fully swing your weapon one time so the script can use the special attack.")
  1439. $LABEL5 = GUICtrlCreateLabel("VM Ware Slowdown (Default 150)", 10, 250, 177, 17)
  1440. $LABEL2 = GUICtrlCreateLabel("Hot Key Bindings", 390, 60, 164, 28)
  1441. GUICtrlSetFont(-1, 14, 800, 0, "MS Sans Serif")
  1442. $BUTTON2 = GUICtrlCreateButton("Save", 430, 250, 75, 25, $WS_GROUP)
  1443. GUICtrlSetState(-1, $GUI_DISABLE)
  1444. $LABEL3 = GUICtrlCreateLabel("", 390, 140, 140, 97)
  1445. $LABEL6 = GUICtrlCreateLabel("GM Response:", 10, 290, 142, 28)
  1446. GUICtrlSetFont(-1, 14, 800, 0, "MS Sans Serif")
  1447. $INPUT6 = GUICtrlCreateInput($GMRESPONSEREG, 10, 320, 271, 21)
  1448. $CHECKBOX4 = GUICtrlCreateCheckbox("CTRL", 330, 210, 47, 27)
  1449. $CHECKBOX5 = GUICtrlCreateCheckbox("ALT", 330, 230, 47, 27)
  1450. $CHECKBOX6 = GUICtrlCreateCheckbox("SHIFT", 330, 190, 47, 27)
  1451. $BUTTON3 = GUICtrlCreateButton("Read", 430, 280, 75, 25, $WS_GROUP)
  1452. $LABEL7 = GUICtrlCreateLabel("Special Attack Cooldown", 340, 330, 123, 17)
  1453. $INPUT7 = GUICtrlCreateInput($SPECIALATTACKCDREG, 470, 326, 121, 21)
  1454. $LABEL8 = GUICtrlCreateLabel("Casting Cooldown (Default 0)", 370, 355, 100, 30)
  1455. $INPUT8 = GUICtrlCreateInput($CASTINGWAITREG, 470, 360, 121, 21)
  1456. GUICtrlSetState($CHECKBOX4, $GUI_DISABLE)
  1457. GUICtrlSetState($CHECKBOX5, $GUI_DISABLE)
  1458. GUICtrlSetState($CHECKBOX6, $GUI_DISABLE)
  1459. GUISetState(@SW_SHOW)
  1460. Dim $FORM1_1_ACCELTABLE[2][2] = [["+0", $MENUITEM2],["!+{F1}", $MENUITEM4]]
  1461. GUISetAccelerators($FORM1_1_ACCELTABLE)
  1462. HotKeySet("{DEL}", "TOGGLEPAUSE")
  1463. HotKeySet("{END}", "TERMINATE")
  1464. Do
  1465. $NMSG = GUIGetMsg()
  1466. If $NMSG = $MENUITEM2 Then
  1467. DllClose($VDLL)
  1468. Exit
  1469. EndIf
  1470. If $NMSG = $MENUITEM4 Then GUICtrlSetData($LABEL3, "Author: Diminished Hail")
  1471. If $NMSG = $BUTTON3 Then
  1472. $ADD1 = ""
  1473. $ADD2 = ""
  1474. $ADD3 = ""
  1475. GUICtrlSetState($CHECKBOX4, $GUI_UNCHECKED)
  1476. GUICtrlSetState($CHECKBOX5, $GUI_UNCHECKED)
  1477. GUICtrlSetState($CHECKBOX6, $GUI_UNCHECKED)
  1478. GUICtrlSetState($CHECKBOX4, $GUI_ENABLE)
  1479. GUICtrlSetState($CHECKBOX5, $GUI_ENABLE)
  1480. GUICtrlSetState($CHECKBOX6, $GUI_ENABLE)
  1481. For $I = 0 To 32
  1482. Select
  1483. Case GUICtrlRead($COMBOBOX) = $COMBOXARRAY[$I]
  1484. $NUM = RegRead("HKEY_LOCAL_MACHINE\SOFTWARE\DimsMacro", $REGARRAY[$I])
  1485. GUICtrlSetData($LABEL3, "Previous hokey is..." & $NUM)
  1486. GUICtrlSetState($BUTTON2, $GUI_ENABLE)
  1487. EndSelect
  1488. Next
  1489. EndIf
  1490. Select
  1491. Case $NMSG = $BUTTON2
  1492. GUICtrlSetState($CHECKBOX4, $GUI_DISABLE)
  1493. GUICtrlSetState($CHECKBOX5, $GUI_DISABLE)
  1494. GUICtrlSetState($CHECKBOX6, $GUI_DISABLE)
  1495. $STATE = GUICtrlRead($CHECKBOX4)
  1496. If $STATE = 1 Then $ADD1 = "^"
  1497. $STATE = GUICtrlRead($CHECKBOX5)
  1498. If $STATE = 1 Then $ADD2 = "!"
  1499. $STATE = GUICtrlRead($CHECKBOX6)
  1500. If $STATE = 1 Then $ADD3 = "+"
  1501. For $I = 0 To 32
  1502. Select
  1503. Case GUICtrlRead($COMBOBOX) = $COMBOXARRAY[$I]
  1504. $NUM = RegRead("HKEY_LOCAL_MACHINE\SOFTWARE\DimsMacro", $REGARRAY[$I])
  1505. Call("GETHOTKEY", $NUM)
  1506. If $HOTKEY <> "left" Or $HOTKEY <> "right" Or $HOTKEY <> "middle" Then
  1507. $SEND = $ADD1 & $ADD2 & $ADD3 & $HOTKEY
  1508. EndIf
  1509. RegWrite("HKEY_LOCAL_MACHINE\SOFTWARE\DimsMacro", $REGARRAY[$I], "REG_SZ", $SEND)
  1510. GUICtrlSetData($LABEL3, $SEND & "...Saved!")
  1511. GUICtrlSetState($BUTTON2, $GUI_DISABLE)
  1512. EndSelect
  1513. Next
  1514. EndSelect
  1515. $READ = GUICtrlRead($CHECKBOX1)
  1516. If $READ = 4 Then
  1517. $CASTDISEASE = -1
  1518. Else
  1519. $CASTDISEASE = GUICtrlRead($INPUT1)
  1520. $TIME3 = $CASTDISEASE
  1521. EndIf
  1522. $READ = GUICtrlRead($CHECKBOX2)
  1523. If $READ = 4 Then
  1524. $CASTHASTE = -1
  1525. Else
  1526. $CASTHASTE = GUICtrlRead($INPUT2)
  1527. $TIME2 = $CASTHASTE
  1528. EndIf
  1529. $READ = GUICtrlRead($CHECKBOX3)
  1530. If $READ = 4 Then
  1531. $CASTIRON = -1
  1532. Else
  1533. $CASTIRON = GUICtrlRead($INPUT3)
  1534. $TIME1 = $CASTIRON
  1535. EndIf
  1536. Select
  1537. Case $NMSG = $BUTTON1
  1538. $LABEL3 = GUICtrlCreateLabel("Starting...", 390, 140, 140, 97)
  1539. $READ = GUICtrlRead($INPUT8)
  1540. RegWrite("HKEY_LOCAL_MACHINE\SOFTWARE\DimsMacro", "inputCastingWait", "REG_SZ", $READ)
  1541. $READ = GUICtrlRead($INPUT7)
  1542. RegWrite("HKEY_LOCAL_MACHINE\SOFTWARE\DimsMacro", "inputSpecialAttackCD", "REG_SZ", $READ)
  1543. $READ = GUICtrlRead($INPUT6)
  1544. RegWrite("HKEY_LOCAL_MACHINE\SOFTWARE\DimsMacro", "inputGMResponse", "REG_SZ", $READ)
  1545. $READ = GUICtrlRead($INPUT4)
  1546. RegWrite("HKEY_LOCAL_MACHINE\SOFTWARE\DimsMacro", "inputAttackDelay", "REG_SZ", $READ)
  1547. $READ = GUICtrlRead($INPUT5)
  1548. RegWrite("HKEY_LOCAL_MACHINE\SOFTWARE\DimsMacro", "inputVMwareDelay", "REG_SZ", $READ)
  1549. $READ = GUICtrlRead($INPUT3)
  1550. RegWrite("HKEY_LOCAL_MACHINE\SOFTWARE\DimsMacro", "inputIronSkin", "REG_SZ", $READ)
  1551. $READ = GUICtrlRead($INPUT1)
  1552. RegWrite("HKEY_LOCAL_MACHINE\SOFTWARE\DimsMacro", "inputDisease", "REG_SZ", $READ)
  1553. $READ = GUICtrlRead($INPUT2)
  1554. RegWrite("HKEY_LOCAL_MACHINE\SOFTWARE\DimsMacro", "inputHaste", "REG_SZ", $READ)
  1555. $VMWARE = RegRead("HKEY_LOCAL_MACHINE\SOFTWARE\DimsMacro", "inputVMWareDelay")
  1556. $ATTACKDELAY = RegRead("HKEY_LOCAL_MACHINE\SOFTWARE\DimsMacro", "inputAttackDelay")
  1557. $STHK = RegRead("HKEY_LOCAL_MACHINE\SOFTWARE\DimsMacro", "StamToHealth")
  1558. $MTSK = RegRead("HKEY_LOCAL_MACHINE\SOFTWARE\DimsMacro", "ManaToStam")
  1559. $CASTINGWAIT = RegRead("HKEY_LOCAL_MACHINE\SOFTWARE\DimsMacro", "inputCastingWait")
  1560. $SPECIALATK = RegRead("HKEY_LOCAL_MACHINE\SOFTWARE\DimsMacro", "inputSpecialAttackCD")
  1561. $TIME4 = $SPECIALATK
  1562. $UNSHEATHE = RegRead("HKEY_LOCAL_MACHINE\SOFTWARE\DimsMacro", "UnsheatheKey")
  1563. $SLOT1 = RegRead("HKEY_LOCAL_MACHINE\SOFTWARE\DimsMacro", "Slot1")
  1564. $SLOT2 = RegRead("HKEY_LOCAL_MACHINE\SOFTWARE\DimsMacro", "Slot2")
  1565. $SLOT3 = RegRead("HKEY_LOCAL_MACHINE\SOFTWARE\DimsMacro", "Slot3")
  1566. $SLOT4 = RegRead("HKEY_LOCAL_MACHINE\SOFTWARE\DimsMacro", "Slot4")
  1567. $SLOT5 = RegRead("HKEY_LOCAL_MACHINE\SOFTWARE\DimsMacro", "Slot5")
  1568. $SLOT6 = RegRead("HKEY_LOCAL_MACHINE\SOFTWARE\DimsMacro", "Slot6")
  1569. $SLOT7 = RegRead("HKEY_LOCAL_MACHINE\SOFTWARE\DimsMacro", "Slot7")
  1570. $SLOT8 = RegRead("HKEY_LOCAL_MACHINE\SOFTWARE\DimsMacro", "Slot8")
  1571. $SLOT9 = RegRead("HKEY_LOCAL_MACHINE\SOFTWARE\DimsMacro", "Slot9")
  1572. $SLOT0 = RegRead("HKEY_LOCAL_MACHINE\SOFTWARE\DimsMacro", "Slot0")
  1573. $FOOD2 = RegRead("HKEY_LOCAL_MACHINE\SOFTWARE\DimsMacro", "Food2")
  1574. $FOOD3 = RegRead("HKEY_LOCAL_MACHINE\SOFTWARE\DimsMacro", "Food3")
  1575. $HTMK = RegRead("HKEY_LOCAL_MACHINE\SOFTWARE\DimsMacro", "HealthToMana")
  1576. $GUIMODE = RegRead("HKEY_LOCAL_MACHINE\SOFTWARE\DimsMacro", "guiModeKey")
  1577. Global $FUNCTIONARRARY[12]
  1578. $FUNCTIONARRARY[0] = 10
  1579. $FUNCTIONARRARY[1] = RegRead("HKEY_LOCAL_MACHINE\SOFTWARE\DimsMacro", "ArmorSlot1")
  1580. $FUNCTIONARRARY[2] = RegRead("HKEY_LOCAL_MACHINE\SOFTWARE\DimsMacro", "ArmorSlot2")
  1581. $FUNCTIONARRARY[3] = RegRead("HKEY_LOCAL_MACHINE\SOFTWARE\DimsMacro", "ArmorSlot3")
  1582. $FUNCTIONARRARY[4] = RegRead("HKEY_LOCAL_MACHINE\SOFTWARE\DimsMacro", "ArmorSlot4")
  1583. $FUNCTIONARRARY[5] = RegRead("HKEY_LOCAL_MACHINE\SOFTWARE\DimsMacro", "ArmorSlot5")
  1584. $FUNCTIONARRARY[6] = RegRead("HKEY_LOCAL_MACHINE\SOFTWARE\DimsMacro", "ArmorSlot6")
  1585. $FUNCTIONARRARY[7] = RegRead("HKEY_LOCAL_MACHINE\SOFTWARE\DimsMacro", "ArmorSlot7")
  1586. $FUNCTIONARRARY[8] = RegRead("HKEY_LOCAL_MACHINE\SOFTWARE\DimsMacro", "ArmorSlot8")
  1587. $FUNCTIONARRARY[9] = RegRead("HKEY_LOCAL_MACHINE\SOFTWARE\DimsMacro", "ArmorSlot9")
  1588. $FUNCTIONARRARY[10] = RegRead("HKEY_LOCAL_MACHINE\SOFTWARE\DimsMacro", "ArmorSlot0")
  1589. Global $SLT[6]
  1590. $SLT[0] = RegRead("HKEY_LOCAL_MACHINE\SOFTWARE\DimsMacro", "Spell1")
  1591. $SLT[1] = RegRead("HKEY_LOCAL_MACHINE\SOFTWARE\DimsMacro", "Spell2")
  1592. $SLT[2] = RegRead("HKEY_LOCAL_MACHINE\SOFTWARE\DimsMacro", "Spell3")
  1593. $SLT[3] = RegRead("HKEY_LOCAL_MACHINE\SOFTWARE\DimsMacro", "Spell4")
  1594. $SLT[4] = RegRead("HKEY_LOCAL_MACHINE\SOFTWARE\DimsMacro", "Spell5")
  1595. $MENUGO = 500
  1596. EndSelect
  1597. Select
  1598. Case $NMSG = $RADIO1
  1599. GUICtrlSetState($BUTTON1, $GUI_ENABLE)
  1600. $EQUIPARMOR = True
  1601. $DUMMYMODE = False
  1602. Case $NMSG = $RADIO2
  1603. GUICtrlSetState($BUTTON1, $GUI_ENABLE)
  1604. $EQUIPARMOR = False
  1605. $DUMMYMODE = False
  1606. Case $NMSG = $RADIO3
  1607. GUICtrlSetState($BUTTON1, $GUI_ENABLE)
  1608. $EQUIPARMOR = True
  1609. $DUMMYMODE = True
  1610. Case $NMSG = $RADIO4
  1611. GUICtrlSetState($BUTTON1, $GUI_ENABLE)
  1612. $NOHEALCASTING = True
  1613. Case $NMSG = $RADIO5
  1614. GUICtrlSetState($BUTTON1, $GUI_ENABLE)
  1615. $HEALCASTING = True
  1616. EndSelect
  1617. Until $MENUGO = 500
  1618. GUIDelete()
  1619. Func TERMINATE()
  1620. DllClose($VDLL)
  1621. Exit 0
  1622. EndFunc
  1623. WinActivate("Darkfall Online", "")
  1624. Func TOGGLEPAUSE()
  1625. $PAUSED = Not $PAUSED
  1626. While $PAUSED
  1627. Sleep(100)
  1628. ToolTip('Script is "Paused"', 0, 0)
  1629. WEnd
  1630. ToolTip("")
  1631. EndFunc
  1632. While 1 = 1
  1633. If $GO = 0 Then
  1634. Call("GETSTATUSBAR")
  1635. EndIf
  1636. If $GO = 5 Then
  1637. If $NOHEALCASTING = True Then Call("NOHEALLOOP")
  1638. If $HEALCASTING = True Then Call("HEALLOOP")
  1639. If $DUMMYMODE = True Then
  1640. Call("DUMMYMODE")
  1641. EndIf
  1642. If $DUMMYMODE = False Then
  1643. Call("MELEE")
  1644. EndIf
  1645. EndIf
  1646. WEnd
  1647. Func GETSTATUSBAR()
  1648. While 1 = 1
  1649. If $GO = 0 Then ToolTip("Script is getting self hp position.", 0, 0)
  1650. If $GO = 1 Then ToolTip("Script is getting target hp position.", 0, 0)
  1651. If $GO = 2 Then ToolTip("Script is getting stam position.", 0, 0)
  1652. If $GO = 3 Then ToolTip("Script is getting mana position.", 0, 0)
  1653. $RESULT = _IMAGESEARCH("images\stat-selfhp.bmp", 1, $X1, $Y1, 20)
  1654. If $RESULT And $GO = 0 Then
  1655. ToolTip("Script is getting self health bar position", 0, 0)
  1656. $HEALTHX = $X1 + 30
  1657. $HEALTHY = $Y1
  1658. $CHECKX = $X1
  1659. $CHECKY = $Y1
  1660. $PIXVAR = PixelGetColor($HEALTHX, $Y1)
  1661. $FULLHEALTHCOLOR = $PIXVAR
  1662. $GO = 1
  1663. EndIf
  1664. $RESULT = _IMAGESEARCH("images\stat-targethp.bmp", 1, $X1, $Y1, 40)
  1665. If $RESULT And $GO = 1 Then
  1666. If $Y1 <> $CHECKY And $X1 <> $CHECKX Then
  1667. $TARGHEALTHY = $Y1
  1668. $NOTARGETX = $X1 - 45
  1669. $NOTARGETY = $Y1
  1670. $LOWTARGETHEALTHX = $X1 - 25
  1671. $FULLTARGETHEALTHX = $X1 + 25
  1672. $NOTARGETCOLOR = PixelGetColor($X1, $Y1)
  1673. $PIXVAR = PixelGetColor($LOWTARGETHEALTHX, $Y1)
  1674. $LOWTARGETHEALTHCOLOR = $PIXVAR
  1675. $PIXVAR = PixelGetColor($FULLTARGETHEALTHX, $Y1)
  1676. $FULLTARGETHEALTHCOLOR = $PIXVAR
  1677. $GO = 2
  1678. EndIf
  1679. EndIf
  1680. $RESULT = _IMAGESEARCH("images\stat-selfstam.bmp", 1, $X1, $Y1, 20)
  1681. If $RESULT And $GO = 2 Then
  1682. ToolTip("Script is getting the stamina bar position", 0, 0)
  1683. $STAMX = $X1 + 30
  1684. $STAMY = $Y1
  1685. $PIXVAR = PixelGetColor($STAMX, $Y1)
  1686. $FULLSTAMCOLOR = $PIXVAR
  1687. $GO = 3
  1688. EndIf
  1689. $RESULT = _IMAGESEARCH("images\stat-selfmana.bmp", 1, $X1, $Y1, 20)
  1690. If $RESULT And $GO = 3 Then
  1691. ToolTip("Script is getting the mana bar position", 0, 0)
  1692. $MANAX = $X1 + 30
  1693. $MANAY = $Y1
  1694. $PIXVAR = PixelGetColor($MANAX, $Y1)
  1695. $FULLMANACOLOR = $PIXVAR
  1696. $GO = 4
  1697. EndIf
  1698. If $GO = 4 Then
  1699. ToolTip("Script is getting hottbar color.", 0, 0)
  1700. Send($STHK)
  1701. Sleep(10)
  1702. $RESULT = _IMAGESEARCH("images\8stamtohealth.bmp", 1, $X1, $Y1, 30)
  1703. If Not $RESULT Then
  1704. Do
  1705. Send($SLOT2)
  1706. $RESULT2 = _IMAGESEARCH("images\misc-nospell.bmp", 1, $X1, $Y1, 30)
  1707. $RESULT = _IMAGESEARCH("images\misc-nospell.bmp", 1, $X1, $Y1, 30)
  1708. Sleep(200)
  1709. Send($UNSHEATHE)
  1710. Sleep(200)
  1711. Send($STHK)
  1712. $RESULT2 = _IMAGESEARCH("images\8stamtohealth.bmp", 1, $X1, $Y1, 30)
  1713. $RESULT = _IMAGESEARCH("images\misc-nospell.bmp", 1, $X1, $Y1, 30)
  1714. Until $RESULT Or $RESULT2
  1715. EndIf
  1716. $GO = 5
  1717. EndIf
  1718. If $GO = 5 Then
  1719. Return
  1720. EndIf
  1721. WEnd
  1722. EndFunc
  1723. Func MELEE()
  1724. Call("GETWEAPON")
  1725. Call("IRONSKIN")
  1726. Call("MELEEHASTE")
  1727. Call("DISEASE")
  1728. While 1
  1729. If Not WinActive("Darkfall Online") Then Call("TOGGLEPAUSE")
  1730. $DIF = TimerDiff($TIME6)
  1731. If $DIF >= $EQUIPDELAY2 And $EQUIPARMOR Then
  1732. ToolTip("Script is checking your armor.", 0, 0)
  1733. Call("ARMOR")
  1734. $TIME6 = TimerInit()
  1735. EndIf
  1736. Call("GMCHECK")
  1737. For $Z = 0 To 50
  1738. If Not WinActive("Darkfall Online") Then Call("TOGGLEPAUSE")
  1739. $PIXVAR = PixelGetColor($NOTARGETX, $NOTARGETY)
  1740. If $PIXVAR <> $NOTARGETCOLOR Then
  1741. Do
  1742. ToolTip("Paused, no target found.", 0, 0)
  1743. Sleep(100)
  1744. $PIXVAR = PixelGetColor($NOTARGETX, $NOTARGETY)
  1745. Until $PIXVAR = $NOTARGETCOLOR
  1746. EndIf
  1747. Call("IRONSKIN")
  1748. Call("MELEEHASTE")
  1749. Call("DISEASE")
  1750. Call("GETSTATS")
  1751. Call("GETSTAM")
  1752. Call("GETMANA")
  1753. Call("SWORD")
  1754. ToolTip("Script is hitting the target.", 0, 0)
  1755. $DIF = TimerDiff($TIME4)
  1756. If $DIF >= $SPECIALATK Then
  1757. Sleep($ATTACKDELAY)
  1758. Send($SLOT4)
  1759. Sleep(100)
  1760. $TIME4 = TimerInit()
  1761. MouseClick("left")
  1762. Sleep(50)
  1763. MouseClick("left")
  1764. EndIf
  1765. MouseClick("left")
  1766. Sleep(50)
  1767. MouseClick("left")
  1768. Next
  1769. WEnd
  1770. EndFunc
  1771. Func DUMMYMODE()
  1772. While 1
  1773. ToolTip("Script is being a dummy.", 0, 0)
  1774. If Not WinActive("Darkfall Online") Then Call("TOGGLEPAUSE")
  1775. $DIF = TimerDiff($TIME6)
  1776. If $DIF >= $EQUIPDELAY2 Then
  1777. ToolTip("Script is checking your armor.", 0, 0)
  1778. Call("ARMOR")
  1779. $TIME6 = TimerInit()
  1780. EndIf
  1781. $PIXVAR = PixelGetColor($NOTARGETX, $NOTARGETY)
  1782. If $PIXVAR <> $NOTARGETCOLOR Then
  1783. Do
  1784. ToolTip("Paused, no target found.", 0, 0)
  1785. Sleep(100)
  1786. $PIXVAR = PixelGetColor($NOTARGETX, $NOTARGETY)
  1787. Until $PIXVAR = $NOTARGETCOLOR
  1788. EndIf
  1789. Call("GMCHECK")
  1790. Call("IRONSKIN")
  1791. Call("MELEEHASTE")
  1792. Call("DISEASE")
  1793. WEnd
  1794. EndFunc
  1795. Func GETMANA()
  1796. $PIXVAR = PixelGetColor($MANAX, $MANAY)
  1797. If $PIXVAR <> $FULLMANACOLOR Then
  1798. Call("CHECKSTAFF")
  1799. Sleep(250)
  1800. Call("WAITFORCAST")
  1801. ToolTip("Script is casting health to mana", 0, 0)
  1802. Send($HTMK)
  1803. Sleep($VMWARE)
  1804. MouseClick("left")
  1805. Sleep(250)
  1806. Call("STARTCAST")
  1807. EndIf
  1808. EndFunc
  1809. Func GETSTAM()
  1810. $PIXVAR = PixelGetColor($STAMX, $STAMY)
  1811. If $PIXVAR <> $FULLSTAMCOLOR Then
  1812. Call("CHECKSTAFF")
  1813. Sleep(250)
  1814. Call("WAITFORCAST")
  1815. ToolTip("Script is casting mana to stam", 0, 0)
  1816. Send($SLOT5)
  1817. Sleep($VMWARE)
  1818. MouseClick("left")
  1819. Sleep(250)
  1820. Call("STARTCAST")
  1821. EndIf
  1822. $RESULT = _IMAGESEARCH("images\misc-nourished.bmp", 1, $X1, $Y1, 30)
  1823. If Not $RESULT Then
  1824. Send($SLOT3)
  1825. Send($FOOD2)
  1826. Send($FOOD3)
  1827. EndIf
  1828. EndFunc
  1829. Func GETSTATS()
  1830. $PIXVAR = PixelGetColor($LOWTARGETHEALTHX, $TARGHEALTHY)
  1831. If $PIXVAR <> $LOWTARGETHEALTHCOLOR Then
  1832. Do
  1833. $PIXVAR2 = PixelGetColor($NOTARGETX, $NOTARGETY)
  1834. If $PIXVAR2 <> $NOTARGETCOLOR Then
  1835. Do
  1836. ToolTip("Paused, no target found.", 0, 0)
  1837. Sleep(100)
  1838. $PIXVAR2 = PixelGetColor($NOTARGETX, $NOTARGETY)
  1839. Until $PIXVAR2 = $NOTARGETCOLOR
  1840. EndIf
  1841. If Not WinActive("Darkfall Online") Then Call("TOGGLEPAUSE")
  1842. Call("CHECKSTAFF")
  1843. ToolTip("Script is healing the target.", 0, 0)
  1844. Send($SLOT9)
  1845. Sleep(100)
  1846. Sleep($VMWARE)
  1847. MouseClick("left")
  1848. Send($SLOT0)
  1849. Sleep(100)
  1850. Sleep($VMWARE)
  1851. MouseClick("left")
  1852. Send($EXTRAHEAL)
  1853. Sleep(100)
  1854. Sleep($VMWARE)
  1855. MouseClick("left")
  1856. $PIXVAR = PixelGetColor($FULLTARGETHEALTHX, $TARGHEALTHY)
  1857. Until $FULLTARGETHEALTHCOLOR = $PIXVAR
  1858. Sleep(250)
  1859. Call("STARTCAST")
  1860. EndIf
  1861. EndFunc
  1862. Func CHECKSTAFF()
  1863. Send($SLOT0)
  1864. Sleep(350)
  1865. Send($UNSHEATHE)
  1866. $NOSTAFF = _IMAGESEARCH("images\weapons\wpn-selected.bmp", 1, $X1, $Y1, 30)
  1867. $RESULT = _IMAGESEARCH($WEAPONIMAGE, 1, $X1, $Y1, 30)
  1868. If $NOSTAFF Or $RESULT Then
  1869. ToolTip("Script is drawing your staff.", 0, 0)
  1870. Call("UNSHEATHESTAFFFUNC")
  1871. EndIf
  1872. EndFunc
  1873. Func IRONSKIN()
  1874. If $CASTIRON = -1 Then
  1875. Return
  1876. EndIf
  1877. $DIF = TimerDiff($TIME1)
  1878. If $DIF >= $CASTIRON Then
  1879. Call("CHECKSTAFF")
  1880. Sleep(250)
  1881. Call("WAITFORCAST")
  1882. ToolTip("Script is casting ironskin.", 0, 0)
  1883. Send($SLOT8)
  1884. Sleep($VMWARE)
  1885. MouseClick("left")
  1886. Call("STARTCAST")
  1887. Sleep(250)
  1888. $TIME1 = TimerInit()
  1889. EndIf
  1890. EndFunc
  1891. Func MELEEHASTE()
  1892. If $CASTHASTE = -1 Then
  1893. Return
  1894. EndIf
  1895. $DIF = TimerDiff($TIME2)
  1896. If $DIF >= $CASTHASTE Then
  1897. Call("CHECKSTAFF")
  1898. Sleep(250)
  1899. Call("WAITFORCAST")
  1900. ToolTip("Script is casting melee haste.", 0, 0)
  1901. Send($SLOT7)
  1902. Sleep($VMWARE)
  1903. MouseClick("left")
  1904. Call("STARTCAST")
  1905. Sleep(250)
  1906. $TIME2 = TimerInit()
  1907. EndIf
  1908. EndFunc
  1909. Func DISEASE()
  1910. If $CASTDISEASE = -1 Then
  1911. Return
  1912. EndIf
  1913. $DIF = TimerDiff($TIME3)
  1914. If $DIF >= $CASTDISEASE Then
  1915. Call("CHECKSTAFF")
  1916. Sleep(250)
  1917. Call("WAITFORCAST")
  1918. ToolTip("Script is casting disease.", 0, 0)
  1919. Send($SLOT6)
  1920. Sleep($VMWARE)
  1921. MouseClick("left")
  1922. Call("STARTCAST")
  1923. Sleep(250)
  1924. $TIME3 = TimerInit()
  1925. EndIf
  1926. EndFunc
  1927. Func SWORD()
  1928. $RESULT = _IMAGESEARCH($WEAPONIMAGE, 1, $X1, $Y1, 30)
  1929. If Not $RESULT Then
  1930. Send($SLOT1)
  1931. $EXIT = False
  1932. $EQUIP = 0
  1933. Do
  1934. If Not WinActive("Darkfall Online") Then Call("TOGGLEPAUSE")
  1935. $RESULT = _IMAGESEARCH($WEAPONIMAGE, 1, $X1, $Y1, 30)
  1936. Sleep(85)
  1937. Send($UNSHEATHE)
  1938. If $RESULT Then
  1939. $EXIT = True
  1940. ExitLoop
  1941. EndIf
  1942. $EQUIP = $EQUIP + 1
  1943. Until $EQUIP = 4 Or $RESULT Or $EXIT
  1944. If Not $EXIT Then
  1945. Call("UNSHEATHEWEAPONFUNC")
  1946. Return
  1947. EndIf
  1948. EndIf
  1949. EndFunc
  1950. Func GETWEAPON()
  1951. ToolTip("Script is saving your weapon type.", 0, 0)
  1952. If $WEAPONIMAGE = 0 Then
  1953. Do
  1954. Do
  1955. $RESULT = _IMAGESEARCH("images\weapons\wpn-selected.bmp", 1, $X1, $Y1, 30)
  1956. Send($SLOT1)
  1957. Sleep(1000)
  1958. Send($UNSHEATHE)
  1959. Until Not $RESULT
  1960. For $I = 1 To $WEAPONARRAY[0]
  1961. $RESULT = _IMAGESEARCH($WEAPONARRAY[$I], 1, $X1, $Y1, 30)
  1962. If $RESULT Then
  1963. $WEAPONIMAGE = $WEAPONARRAY[$I]
  1964. $LOOPEXIT = True
  1965. EndIf
  1966. Next
  1967. Until $LOOPEXIT = True
  1968. EndIf
  1969. EndFunc
  1970. Func ARMOR()
  1971. For $I = 1 To $ARMORARRAY[0]
  1972. If $ARMORARRAY[$I] <> False Then
  1973. $RESULT = _IMAGESEARCH($ARMORARRAY[$I], 1, $X1, $Y1, 30)
  1974. $DIF = TimerDiff($TIME5)
  1975. If $RESULT And $DIF >= $EQUIPDELAY Then
  1976. Send($FUNCTIONARRARY[$I])
  1977. Call("WAITFORARMOR", $ARMORARRAY[$I], $I)
  1978. EndIf
  1979. EndIf
  1980. Next
  1981. $TIME5 = TimerInit()
  1982. EndFunc
  1983. Func WAITFORARMOR($PIECE, $NUM)
  1984. $TIMEOUT = TimerInit()
  1985. Do
  1986. ToolTip("Script is equipping armor, timeout is: " & Int($OUTOFTIME) & " armor piece is: " & $PIECE, 0, 0)
  1987. $OUTOFTIME = TimerDiff($TIMEOUT)
  1988. Sleep(100)
  1989. $RESULT = _IMAGESEARCH($PIECE, 1, $X1, $Y1, 30)
  1990. Until Not $RESULT Or $OUTOFTIME > 17000
  1991. If $OUTOFTIME > 17000 Then
  1992. ToolTip("Failed to equip armor, piece is: " & $ARMORARRAY[$NUM], 0, 0)
  1993. Sleep(1000)
  1994. $ARMORARRAY[$NUM] = False
  1995. EndIf
  1996. EndFunc
  1997. Func GMCHECK()
  1998. Call("OKBOX")
  1999. Call("RECALLBOX")
  2000. EndFunc
  2001. Func TELLCHECK()
  2002. $RESULT = _IMAGESEARCH("images\gmtell2.bmp", 1, $X1, $Y1, 50)
  2003. If $RESULT Then
  2004. $GMX = $X1
  2005. $GMY = $Y1
  2006. Call("CLICKONTAB")
  2007. EndIf
  2008. $RESULT = _IMAGESEARCH("images\gmtell.bmp", 1, $X1, $Y1, 50)
  2009. If $RESULT Then
  2010. $GMX = $X1
  2011. $GMY = $Y1
  2012. Call("CLICKONTAB")
  2013. EndIf
  2014. Call("RECALLBOX")
  2015. EndFunc
  2016. Func CLICKONTAB()
  2017. Sleep(800)
  2018. Call("GOTOGUIMODE")
  2019. MouseClick("left", $GMX, $GMY)
  2020. Sleep(800)
  2021. Send("{enter}")
  2022. Sleep(800)
  2023. Send($GMRESPONSE)
  2024. Sleep(800)
  2025. Send("{enter}")
  2026. Sleep(800)
  2027. Send("{enter}")
  2028. Sleep(9000)
  2029. Send("i have to go now, bye.")
  2030. Sleep(800)
  2031. Send("{enter}")
  2032. Sleep(800)
  2033. Send("{enter}")
  2034. Sleep(800)
  2035. Send("/quit")
  2036. Sleep(800)
  2037. Send("{enter}")
  2038. Sleep(800)
  2039. Send("{enter}")
  2040. $X1 = @DesktopWidth / 2
  2041. $Y1 = @DesktopHeight / 2
  2042. While 1
  2043. ToolTip("GM TELL RECIVED", $X1, $Y1)
  2044. SoundSetWaveVolume(100)
  2045. SoundPlay("sounds\gmtell.wav", 1)
  2046. WEnd
  2047. EndFunc
  2048. Func OKBOX()
  2049. $RESULT = _IMAGESEARCH("images\gmok.bmp", 1, $X1, $Y1, 50)
  2050. If $RESULT Then
  2051. $GMX = $X1
  2052. $GMY = $Y1
  2053. Call("GOTOGUIMODE")
  2054. Sleep(400)
  2055. MouseClick("left", $GMX, $GMY)
  2056. Call("TELLCHECK")
  2057. EndIf
  2058. EndFunc
  2059. Func RECALLBOX()
  2060. $RESULT = _IMAGESEARCH("images\gmconfirm.bmp", 1, $X1, $Y1, 30)
  2061. If $RESULT Then
  2062. $RESULT = _IMAGESEARCH("images\gmdecline.bmp", 1, $X1, $Y1, 50)
  2063. If $RESULT Then
  2064. $GMX = $X1
  2065. $GMY = $Y1
  2066. Call("GOTOGUIMODE")
  2067. Sleep(400)
  2068. MouseClick("left", $GMX, $GMY)
  2069. Call("TELLCHECK")
  2070. EndIf
  2071. EndIf
  2072. EndFunc
  2073. Func GOTOGUIMODE()
  2074. $RESULT = _IMAGESEARCH("images\optionstab.bmp", 1, $X1, $Y1, 30)
  2075. If Not $RESULT Then
  2076. Do
  2077. $RESULT = _IMAGESEARCH("images\optionstab.bmp", 1, $X1, $Y1, 30)
  2078. If $GUIMODE <> "left" Or $GUIMODE <> "right" Or $GUIMODE <> "middle" Then
  2079. Send($GUIMODE)
  2080. Else
  2081. MouseClick($GUIMODE)
  2082. EndIf
  2083. Sleep(800)
  2084. Until $RESULT
  2085. EndIf
  2086. EndFunc
  2087. Func STARTCAST()
  2088. $POS = MouseGetPos()
  2089. $POS[1] = $POS[1] - 65
  2090. $POS[0] = $POS[0] - 149
  2091. $NOTCASTING = PixelGetColor($POS[0], $POS[1])
  2092. $CASTINGTIMER = TimerInit()
  2093. EndFunc
  2094.  
  2095. Func WAITFORCAST()
  2096. Do
  2097. $CASTINGTIMERDIF = TimerDiff($CASTINGTIMER)
  2098. $POS = MouseGetPos()
  2099. $POS[1] = $POS[1] - 65
  2100. $POS[0] = $POS[0] - 149
  2101. $PIXVAR = PixelGetColor($POS[0], $POS[1])
  2102. ToolTip("Script is waiting for spell to finish: " & $CASTINGTIMERDIF, 0, 0)
  2103. Until $PIXVAR = $NOTCASTING Or $CASTINGTIMERDIF > 2500
  2104. Sleep(500)
  2105. Sleep($CASTINGWAIT)
  2106. EndFunc
  2107. Func UNSHEATHESTAFFFUNC()
  2108. Do
  2109. If Not WinActive("Darkfall Online") Then Call("TOGGLEPAUSE")
  2110. Send($SLOT2)
  2111. Sleep(300)
  2112. $RESULT = _IMAGESEARCH("images\misc-nospell.bmp", 1, $X1, $Y1, 30)
  2113. $RESULT2 = _IMAGESEARCH($WEAPONIMAGE, 1, $X1, $Y1, 30)
  2114. Send($UNSHEATHE)
  2115. Sleep(500)
  2116. Send($SLOT0)
  2117. $RESULT = _IMAGESEARCH("images\misc-nospell.bmp", 1, $X1, $Y1, 30)
  2118. $RESULT2 = _IMAGESEARCH($WEAPONIMAGE, 1, $X1, $Y1, 30)
  2119. Until Not $RESULT And Not $RESULT2
  2120. EndFunc
  2121. Func UNSHEATHEWEAPONFUNC()
  2122. Do
  2123. If Not WinActive("Darkfall Online") Then Call("TOGGLEPAUSE")
  2124. $RESULT = _IMAGESEARCH($WEAPONIMAGE, 1, $X1, $Y1, 30)
  2125. Send($UNSHEATHE)
  2126. Sleep(400)
  2127. $RESULT = _IMAGESEARCH($WEAPONIMAGE, 1, $X1, $Y1, 30)
  2128. Send($SLOT1)
  2129. Sleep(400)
  2130. $RESULT = _IMAGESEARCH($WEAPONIMAGE, 1, $X1, $Y1, 30)
  2131. Send($UNSHEATHE)
  2132. Sleep(400)
  2133. $RESULT = _IMAGESEARCH($WEAPONIMAGE, 1, $X1, $Y1, 30)
  2134. Until $RESULT
  2135. EndFunc
  2136. Func _IMAGESEARCH($FINDIMAGE, $RESULTPOSITION, ByRef $X, ByRef $Y, $TOLERANCE)
  2137. $SIZE = WinGetClientSize("Darkfall Online")
  2138. Return _IMAGESEARCHAREA($FINDIMAGE, $RESULTPOSITION, 0, 0, $SIZE[0], $SIZE[1], $X, $Y, $TOLERANCE)
  2139. EndFunc
  2140. Func _IMAGESEARCHAREA($FINDIMAGE, $RESULTPOSITION, $X1, $Y1, $RIGHT, $BOTTOM, ByRef $X, ByRef $Y, $TOLERANCE)
  2141. If $TOLERANCE > 0 Then $FINDIMAGE = "*" & $TOLERANCE & " " & $FINDIMAGE
  2142. $RESULT = DllCall("ImageSearchDLL.dll", "str", "ImageSearch", "int", $X1, "int", $Y1, "int", $RIGHT, "int", $BOTTOM, "str", $FINDIMAGE)
  2143. If $RESULT[0] = "0" Then Return 0
  2144. $ARRAY = StringSplit($RESULT[0], "|")
  2145. $X = Int(Number($ARRAY[2]))
  2146. $Y = Int(Number($ARRAY[3]))
  2147. If $RESULTPOSITION = 1 Then
  2148. $X = $X + Int(Number($ARRAY[4]) / 2)
  2149. $Y = $Y + Int(Number($ARRAY[5]) / 2)
  2150. EndIf
  2151. Return 1
  2152. EndFunc
  2153. Func _ISPRESSED($SHEXKEY, $VDLL = "user32.dll")
  2154. Local $A_R = DllCall($VDLL, "short", "GetAsyncKeyState", "int", "0x" & $SHEXKEY)
  2155. If @error Then Return SetError(@error, @extended, False)
  2156. Return BitAND($A_R[0], 32768) <> 0
  2157. EndFunc
  2158. Func GETHOTKEY($CURRENT)
  2159. Local $KEY = False
  2160. Local $Z
  2161. $LABEL3 = GUICtrlCreateLabel("Please press your hotkey...Previous is: " & $CURRENT, 390, 140, 140, 97)
  2162. Do
  2163. For $I = 1 To 125
  2164. If _ISPRESSED(Hex($I, 2), $VDLL) Then
  2165. $Z = Hex($I, 2)
  2166. $KEY = _ISPRESSED(Hex($I, 2), $VDLL)
  2167. $HOTKEY = $KEYLIST[$I]
  2168. GUICtrlSetData($LABEL3, Hex($I, 2))
  2169. Sleep(1000)
  2170. EndIf
  2171. Next
  2172. Until $KEY
  2173. EndFunc
  2174. Func NOHEALCAST()
  2175. For $Z = 0 To 8
  2176. For $I = 0 To 5
  2177. Send($SLT[$I])
  2178. ToolTip("Script is on spell #" & $I, 0, 0)
  2179. Sleep(200)
  2180. MouseClick("left")
  2181. Call("NOHEALGETSTATS")
  2182. Next
  2183. Next
  2184. EndFunc
  2185. Func NOHEALLOOP()
  2186. While 1
  2187. Call("GMCHECK")
  2188. Call("CHECKSTAFFCAST")
  2189. Call("NOHEALCAST")
  2190. WEnd
  2191. EndFunc
  2192. Func HEALLOOP()
  2193. While 1
  2194. Call("GMCHECK")
  2195. Call("CHECKSTAFFCAST")
  2196. Call("HEALCAST")
  2197. WEnd
  2198. EndFunc
  2199. Func CHECKSTAFFCAST()
  2200. Send($STHK)
  2201. Sleep(100)
  2202. $PIXVAR = PixelGetColor($STAMICONX, $STAMICONY)
  2203. If $PIXVAR <> $STAMICON Then
  2204. Do
  2205. Send($SLOT2)
  2206. $RESULT2 = _IMAGESEARCH("images\misc-nospell.bmp", 1, $X1, $Y1, 30)
  2207. $RESULT = _IMAGESEARCH("images\misc-nospell.bmp", 1, $X1, $Y1, 30)
  2208. Sleep(200)
  2209. Send($UNSHEATHE)
  2210. Sleep(200)
  2211. Send($STHK)
  2212. $RESULT2 = _IMAGESEARCH("images\8stamtohealth.bmp", 1, $X1, $Y1, 30)
  2213. $RESULT = _IMAGESEARCH("images\misc-nospell.bmp", 1, $X1, $Y1, 30)
  2214. Until $RESULT Or $RESULT2
  2215. EndIf
  2216. EndFunc
  2217. Func NOHEALGETSTATS()
  2218. $PIXVAR = PixelGetColor($MANAX, $MANAY)
  2219. If $PIXVAR <> $FULLMANACOLOR Then
  2220. ToolTip("Script is casting health to mana", 0, 0)
  2221. Send($HTMK)
  2222. Sleep(150)
  2223. MouseClick("left")
  2224. EndIf
  2225. $PIXVAR = PixelGetColor($STAMX, $STAMY)
  2226. If $PIXVAR <> $FULLSTAMCOLOR Then
  2227. ToolTip("Script is casting mana to stam", 0, 0)
  2228. Send($MTSK)
  2229. Sleep(150)
  2230. MouseClick("left")
  2231. EndIf
  2232. $PIXVAR = PixelGetColor($HEALTHX, $HEALTHY)
  2233. If $PIXVAR <> $FULLHEALTHCOLOR Then
  2234. ToolTip("Script is casting stam to health", 0, 0)
  2235. Send($STHK)
  2236. Sleep(150)
  2237. MouseClick("left")
  2238. EndIf
  2239. EndFunc
  2240. Func HEALCAST()
  2241. For $Z = 0 To 8
  2242. For $I = 0 To 5
  2243. If Not WinActive("Darkfall Online") Then Call("TOGGLEPAUSE")
  2244. $PIXVAR = PixelGetColor($NOTARGETX, $NOTARGETY)
  2245. If $PIXVAR <> $NOTARGETCOLOR Then
  2246. Do
  2247. Sleep(100)
  2248. $PIXVAR = PixelGetColor($NOTARGETX, $NOTARGETY)
  2249. Until $PIXVAR = $NOTARGETCOLOR
  2250. EndIf
  2251. Send($SLT[$I])
  2252. ToolTip("Script is on spell #" & $I, 0, 0)
  2253. Sleep(150)
  2254. MouseClick("left")
  2255. Call("HEALGETSTATS")
  2256. Next
  2257. Next
  2258. EndFunc
  2259. Func HEALGETSTATS()
  2260. If Not WinActive("Darkfall Online") Then Call("TOGGLEPAUSE")
  2261. $PIXVAR = PixelGetColor($MANAX, $MANAY)
  2262. If $PIXVAR <> $FULLMANACOLOR Then
  2263. ToolTip("Script is casting health to mana", 0, 0)
  2264. Send($HTMK)
  2265. Sleep(150)
  2266. MouseClick("left")
  2267. EndIf
  2268. $PIXVAR = PixelGetColor($STAMX, $STAMY)
  2269. If $PIXVAR <> $FULLSTAMCOLOR Then
  2270. ToolTip("Script is casting mana to stam", 0, 0)
  2271. Send($MTSK)
  2272. Sleep(150)
  2273. MouseClick("left")
  2274. EndIf
  2275. $PIXVAR = PixelGetColor($HEALTHX, $HEALTHY)
  2276. If $PIXVAR <> $FULLHEALTHCOLOR Then
  2277. ToolTip("Script is casting stam to health", 0, 0)
  2278. Send($STHK)
  2279. Sleep(150)
  2280. MouseClick("left")
  2281. EndIf
  2282. $PIXVAR = PixelGetColor($LOWTARGETHEALTHX, $TARGHEALTHY)
  2283. If $PIXVAR <> $LOWTARGETHEALTHCOLOR Then
  2284. Do
  2285. $PIXVAR2 = PixelGetColor($NOTARGETX, $NOTARGETY)
  2286. If $PIXVAR2 <> $NOTARGETCOLOR Then
  2287. Do
  2288. ToolTip("Paused, no target found.", 0, 0)
  2289. Sleep(100)
  2290. $PIXVAR2 = PixelGetColor($NOTARGETX, $NOTARGETY)
  2291. Until $PIXVAR2 = $NOTARGETCOLOR
  2292. EndIf
  2293. If Not WinActive("Darkfall Online") Then Call("TOGGLEPAUSE")
  2294. Call("CHECKSTAFF")
  2295. Sleep(250)
  2296. ToolTip("Script is healing the target.", 0, 0)
  2297. Send($SLOT9)
  2298. Sleep(500)
  2299. Sleep($VMWARE)
  2300. MouseClick("left")
  2301. Sleep(500)
  2302. Send($SLOT0)
  2303. Sleep(500)
  2304. Sleep($VMWARE)
  2305. MouseClick("left")
  2306. Sleep(500)
  2307. $PIXVAR = PixelGetColor($FULLTARGETHEALTHX, $TARGHEALTHY)
  2308. Until $FULLTARGETHEALTHCOLOR = $PIXVAR
  2309. EndIf
  2310. EndFunc
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement