API tools faq
paste
Advertisement
recca062

Mappin Auto Cast Ragnarok Online

recca062
Sep 15th, 2016
326
0
Never
Add comment
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
Autohotkey 36.00 KB | None | 0 0
raw download clone embed print report
  1. ;
  2. ; AutoHotkey Version: 1.x
  3. ; Language:       English
  4. ; Platform:       Win9x/NT
  5. ; Author:         Recca - [email protected]
  6. ;
  7. if not A_IsAdmin
  8. {
  9.    Run *RunAs "%A_ScriptFullPath%"
  10.    ExitApp
  11. }
  12. #NoTrayIcon
  13. SetBatchLines -1
  14. #NoEnv
  15. SetWorkingDir %A_ScriptDir%
  16. SendMode Input
  17. Coordmode, Pixel, Screen
  18. CoordMode, Mouse, Window
  19. MacroButtonNumber = 20
  20. KeyboardButonNumber =100
  21. KeyboardX = 15  
  22. KeyboardY = 180
  23. secondTime = 0
  24. LoadSetting()
  25. title = Mappin' Auto Cast RO - by : Recca ( http://ragindex.blogspot.com )
  26. Gui, Color, F0F0F0
  27. Gui, 2:Color, BEBED7
  28. Gui, Font, w1000
  29.  
  30. Gui, Add, Text, x610 y476 w100 h32 gHideShow Border +Center cBlue, HIDE`nICONS
  31. Gui, Add, Text, xp-1 yp-1 wp+2 hp+2 Border BackgroundTrans
  32. Gui, Add, Text, x13 y470 w974 h45 Border BackgroundTrans,
  33. Gui, Add, Text, xp-1 yp-1 wp+2 hp+2 Border BackgroundTrans
  34. Gui, Add, Button, xp+5 yp+5 w130 h35 gClear, CLEAR ALL
  35. Gui, Add, Button, xp+700 yp wp hp gSaveChanges, SAVE CHANGES
  36. Gui, Add, Button, xp+135 yp wp hp gLoadCurr, Load Current Setting
  37. Gui, Font, w0
  38. Gui, Font, w0 norm
  39. Gui, Add, Text, x15 y6 w164 h96 Border BackgroundTrans
  40. Gui, Add, Text, xp-1 yp-1 wp+2 hp+2 Border BackgroundTrans
  41. Gui, Add, Text, xp-1 yp-1 wp+2 hp+2 Border BackgroundTrans
  42. Gui, Add, Text, xp-1 yp-1 wp+2 hp+2 Border BackgroundTrans
  43. Gui, Add, Text, xp-1 yp-1 wp+2 hp+2 Border BackgroundTrans
  44. Gui, Add, GroupBox, x15 y0 cBlue w80 h68, Skill Macro
  45. Gui, Add, Picture, xp+18 y15 w40 h40 Border vMainStack1, %A_ScriptDir%\Mode\SpamMacro.bmp
  46. Loop %MacroButtonNumber%
  47.     Gui, Add, Picture,xp yp  hwndhWnd%A_Index%1 v1%A_Index% Border gControlMove1 +0x4000000 w40 h40 , %A_ScriptDir%\Mode\SpamMacro.bmp
  48. Gui, Add, GroupBox, xp-18 yp+45 w80 h43 cBlue, Delay
  49. Gui, Add, Edit, w60 xp+10 yp+15 +Number vSkillDelay
  50. Gui, Add, UpDown, Range0-2147483647,%SkillDelay%
  51. Gui, Add, GroupBox, x100 y0 cBlue w80 h68, Usable Macro
  52. Gui, Add, Picture, xp+18 y15 w40 h40 Border vMainStack2, %A_ScriptDir%\Mode\Usable.bmp
  53. Loop %MacroButtonNumber%
  54.     Gui, Add, Picture,xp yp  hwndhWnd%A_Index%2 v2%A_Index% Border gControlMove2 +0x4000000 w40 h40 , %A_ScriptDir%\Mode\Usable.bmp
  55. Gui, Add, GroupBox, xp-18 yp+45 w80 h43 cBlue, Delay
  56. Gui, Add, Edit, w60 xp+10 yp+15 +Number vUsableDelay
  57. Gui, Add, UpDown, Range0-2147483647,%UsableDelay%
  58. Gui, Add, Text, x270 y6 w220 h168 Border BackgroundTrans
  59. Gui, Add, Text, xp-1 yp-1 wp+2 hp+2 Border BackgroundTrans
  60. Gui, Add, Text, xp-1 yp-1 wp+2 hp+2 Border BackgroundTrans
  61. Gui, Add, Text, xp-1 yp-1 wp+2 hp+2 Border BackgroundTrans
  62. Gui, Add, Text, xp-1 yp-1 wp+2 hp+2 Border BackgroundTrans
  63. Gui, Add, Groupbox, x270 y0 cBlue w220 h175, Self - Cast
  64. Gui, Add, Picture, xp+13 y15 w40 h40 Border vMainStack3, %A_ScriptDir%\Mode\SelfCast.bmp
  65. Loop %MacroButtonNumber%
  66.     Gui, Add, Picture,xp yp  hwndhWnd%A_Index%3 v3%A_Index% Border gControlMove3 +0x4000000 w40 h40 , %A_ScriptDir%\Mode\SelfCast.bmp
  67. Gui, Add, Text, xp yp+50 w80 cBlue, Activate by press the`nbutton twice
  68. Gui, Add, Text, xp+75 yp-50, This will cast at the center`n of screen.`n====================`n/camera`nToggles between`n smooth/locked camera. `nOn | Off`n====================`nMake sure this ^ command`n is ON for 100`% accuracy
  69. Gui, Add, Text, x185 y6 w80 h168 Border BackgroundTrans
  70. Gui, Add, Text, xp-1 yp-1 wp+2 hp+2 Border BackgroundTrans
  71. Gui, Add, Text, xp-1 yp-1 wp+2 hp+2 Border BackgroundTrans
  72. Gui, Add, Text, xp-1 yp-1 wp+2 hp+2 Border BackgroundTrans
  73. Gui, Add, Text, xp-1 yp-1 wp+2 hp+2 Border BackgroundTrans
  74. Gui, Add, Groupbox, x185 y0 cBlue w80 h175, Chain Macro
  75. Gui, Add, Picture, xp+18 y15 w40 h40 Border vMainStack4, %A_ScriptDir%\Mode\Chain.bmp
  76. Loop %MacroButtonNumber%
  77.     Gui, Add, Picture,xp yp  hwndhWnd%A_Index%4 v4%A_Index% Border gControlMove4 +0x4000000 w40 h40 , %A_ScriptDir%\Mode\Chain.bmp
  78. Gui, Add, Text, xp-10 yp+50, This will cast `na chain of `nkeys :`n`n Key #1 ->`n Key #2 ->`n Key #3 ->`n..........
  79. Gui, Add, Text, x495 y6 w200 h170 Border BackgroundTrans
  80. Gui, Add, Text, xp-1 yp-1 wp+2 hp+2 Border BackgroundTrans
  81. Gui, Add, Text, xp-1 yp-1 wp+2 hp+2 Border BackgroundTrans
  82. Gui, Add, Text, xp-1 yp-1 wp+2 hp+2 Border BackgroundTrans
  83. Gui, Add, Text, xp-1 yp-1 wp+2 hp+2 Border BackgroundTrans
  84. Gui, Add, Groupbox, y0 x495 w200 h175 cBlue, 2-Hotkey Bar
  85. Gui, Add, Picture, xp+5 y15 w40 h40 Border vMainStack5, %A_ScriptDir%\Mode\HK1.bmp
  86. Loop 1
  87.     Gui, Add, Picture,xp yp  hwndhWnd%A_Index%5 v5%A_Index% Border gControlMove5 +0x4000000 w40 h40 , %A_ScriptDir%\Mode\HK1.bmp
  88. Gui, Add, Picture, xp+45 y15 w40 h40 Border vMainStack6, %A_ScriptDir%\Mode\HK2.bmp
  89. Loop 1
  90.     Gui, Add, Picture,xp yp  hwndhWnd%A_Index%6 v6%A_Index% Border gControlMove6 +0x4000000 w40 h40 , %A_ScriptDir%\Mode\HK2.bmp
  91. Gui, Add, GroupBox, xp-50 yp+45 w100 h115 cBlue, Coordinates
  92. Gui, Add, Edit, xp+5 yp+15 w89 +Center vCoor1,
  93. Gui, Add, Button, xp yp+23 wp gPickCoor1, Pick coord #1
  94. Gui, Add, Edit, xp yp+25 w89 +Center vCoor2,
  95. Gui, Add, Button, xp yp+23 wp gPickCoor2, Pick coord #2
  96. Gui, Add, Text, xp+97 yp-135, <-- Looks familiar ?`nthe 2 useless`nHotkey bar ?`n`n2-Hotkey Bar`ncan now be assign`nhotkey.`n`nThis will double`nclick the coordinate
  97. Gui, Font, w1000 s14
  98. Gui, Add, Text, x300 y476 +0x201 +Border  cGreen w200 h30 gRunApp, Run 'M.A.C.R.O.exe'
  99. Gui, Add, Text, xp-1 yp-1 wp+2 hp+2 Border BackgroundTrans
  100. Gui, Add, Text, xp-1 yp-1 wp+2 hp+2 Border BackgroundTrans
  101. Gui, Add, Text, xp-1 yp-1 wp+2 hp+2 Border BackgroundTrans
  102. Gui, Add, Text, xp-1 yp-1 wp+2 hp+2 Border BackgroundTrans
  103. Gui, Font, w0
  104. Gui, Add, ActiveX,  x702 y8 w280 h165 vWB, Shell. Exlorer
  105. Gui, Add, Text, x700 y6 w284 h168 Border BackgroundTrans
  106. Gui, Add, Text, xp-1 yp-1 wp+2 hp+2 Border BackgroundTrans
  107. Gui, Add, Text, xp-1 yp-1 wp+2 hp+2 Border BackgroundTrans
  108. Gui, Add, Text, xp-1 yp-1 wp+2 hp+2 Border BackgroundTrans
  109. Gui, Add, Text, xp-1 yp-1 wp+2 hp+2 Border BackgroundTrans
  110. WB.Navigate("http://textuploader.com/5efk2/raw")
  111. wb.silent := true
  112. Gui, Font, w0 s30
  113. Gui, Font, w0 s8
  114. Gui, Add, Text, x14 y104 w165 h73 Border BackgroundTrans
  115. Gui, Add, Text, xp-1 yp-1 wp+2 hp+2 Border BackgroundTrans
  116. Gui, Add, Text, xp-1 yp-1 wp+2 hp+2 Border BackgroundTrans
  117. Gui, Add, Text, xp-1 yp-1 wp+2 hp+2 Border BackgroundTrans
  118. Gui, Add, GroupBox, x15 y100 cBLue w165 h76, Hotkeys to
  119. Gui, Font, w1000
  120. Gui, Add, Text, xp+2 yp+15 cBlue, PAUSE
  121. Gui, Font, s10
  122. Gui, Add, Button, xp yp+15 w80 h45 gHotkeyPause vHotkey_P, %PauseHotkey_L%
  123. Gui, Font, s8
  124. Gui, Add, Text, xp+80 yp-15 cBlue, EXIT
  125. Gui, Font, s10
  126. Gui, Add, Button, xp yp+15 w80 h45 gHotkeyExit vHotkey_E, %ExitHotkey_L%
  127. Gui, Font, w0 s8
  128. MakeKeyboard()
  129. Gui, 2:Add, Progress, x-1 y-1 w300 h20 BackgroundA6B9E2 Disabled hwndHPROG
  130. Gui, 2:Add, Text, x270 y3 w14 h10 r1 +0x4000 +Center gGuiClose2, X
  131. Gui, 2:Font, w1000
  132. Gui, 2:Add, Text, x0 y3 w300 h10 r1 +0x4000  +Center +BackgroundTrans gGuiMove2, Chain Macro Setup
  133. Gui, 2:Font, w0
  134. Gui, 2:Add, Listview, x0 y19 w330 h2 Background000000
  135. Gui, 2:Add, Listview, x10 y30 w200 h200 +NoSortHdr vChainMacroLV AltSubmit gChainMacroLVX, #|Key|Delay|Mode
  136. Gui, 2:Default
  137. Gui, Listview, ChainMacroLV
  138. LV_ModifyCol(2, 50)
  139. Gui, 1:Default
  140. Gui, 2:Add, GroupBox, xp+215 yp-6 w60 h50 cBlue, Key
  141. Gui, 2:Add, GroupBox, xp yp+40 wp hp cBlue, Delay
  142. Gui, 2:Add, GroupBox, xp yp+40 wp hp cBlue, Mode
  143. Gui, 2:Add, Groupbox,xp yp+50 cBlue wp h130, Control
  144. Gui, 2:Add, Button, xp+2 yp+15 w55 gAdd_CM, Add
  145. Gui, 2:Add, Button, xp yp+24 wp gDel_CM, Delete
  146. Gui, 2:Add, Button, xp yp+24 wp gmUp_CM, Move Up
  147. Gui, 2:Add, Button, xp yp+24 wp gmDw_CM, Move Down
  148. Gui, 2:Font, w1000
  149. Gui, 2:Add, Button, xp-218 yp-7 w100 h50 gOK_CM, OK
  150. Gui, 2:Add, Button, xp+101 yp wp h50 gGuiClose2, CANCEL
  151. Gui, 2:Font, w0
  152. Gui, 2:Add, Hotkey, x228 y40 w53 h20  Limit142 vKey_CM
  153. Gui, 2:Add, Edit, xp yp+40 w53 h20 +Number vDelay_CM
  154. Gui, 2:Add, UpDown, Range0-2147483647,100
  155. Gui, 2:Add, DropDownList, xp yp+40 w53 Choose2 AltSubmit vMode_CM ,Click|No Click
  156. Gui, 2:+ Toolwindow -Caption +AlwaysOnTop
  157. Gui, 3:Add, Hotkey, x30 y15 w150 h20 vScriptHotkey
  158. Gui, 3:Add, Text, +BackgroundTrans +Border x4 y4 w192 h92
  159. Gui, 3:Add, Text, xp-1 yp-1 wp+2 hp+2 Border BackgroundTrans
  160. Gui, 3:Add, Text, xp-1 yp-1 wp+2 hp+2 Border BackgroundTrans
  161. Gui, 3:Add, Text, xp-1 yp-1 wp+2 hp+2 Border BackgroundTrans
  162. Gui, 3:Add, Text, xp-1 yp-1 wp+2 hp+2 Border BackgroundTrans
  163. Gui, 3:Add, Text, Center x40 y40 cblue, Press hotkey combination
  164. Gui, 3:Add, Button, x20 y60 w80 h30 gOkay, OK
  165. Gui, 3:Add, Button, xp+85 yp wp hp gGuiClose3, CANCEL
  166. Gui, 3:+Toolwindow -Caption +AlwaysOnTop
  167. Menu,Menu, Add, Remove Hotkey,Remove_Hotkey
  168. Gui, Font, w0 s11
  169. Gui, Add, StatusBar,
  170. Gui, Show, w995 h540, %title%
  171. Load()
  172. Return
  173. LoadCurr:
  174. gosub Clear
  175. Load()
  176. return
  177. RunApp:
  178. Run, M.A.C.R.O.exe
  179. return
  180. PickCoor1:
  181. PickCoor2:
  182. StringRight, currCoor, A_ThisLabel, 1
  183. MsgBox, 262208, Pick Coordinate, After this message box disappear`nthe next location you click will be record.
  184. KeyWait LButton, D
  185. Mousegetpos, x, y
  186. WinGetActiveTitle, Title
  187. GuiControl,, Coor%currCoor%, %x%,%y%
  188. return
  189. GuiClose4:
  190. Gui, 4:submit
  191. return
  192. OK_CM:
  193. LV_GetText(Confirm, 1)
  194. RetrievedText =
  195. if (Confirm ="")
  196.     return
  197. Loop % LV_GetCount()
  198. {
  199.     LV_GetText(RetrievedText1, A_Index,1)
  200.     LV_GetText(RetrievedText2, A_Index,2)
  201.     LV_GetText(RetrievedText3, A_Index,3)
  202.     LV_GetText(RetrievedText4, A_Index,4)
  203.     IfInString, RetrievedText4, No
  204.         RetrievedText4 = ,u
  205.     else
  206.         RetrievedText4 =
  207.     RetrievedText = %RetrievedText%%RetrievedText2%,%RetrievedText3%%RetrievedText4%->
  208. }
  209. StringTrimRight, RetrievedText, RetrievedText, 2
  210. x%OnControl% = ChainMacro|%buttonName%|%RetrievedText%
  211. Gui, 1:-Disabled
  212. Gui, 2:submit
  213. Gui, 1:default
  214. GuiControlGet, displayButton,, %OnControl%, Text
  215. SB_SetText("Chain Macro has been assigned to " . displayButton)
  216. return
  217. Add_CM:
  218. Gui, 2:submit, nohide
  219. Gui, 2:Default
  220. Gui, Listview, ChainMacroLV
  221. If Key_CM !=
  222. {
  223.     CM_Count++
  224.     if Mode_CM = 1
  225.         LV_Add("",CM_Count,Key_CM, Delay_CM, "Click")
  226.     else
  227.         LV_Add("",CM_Count,Key_CM, Delay_CM, "No Click")
  228. }
  229.     Loop % LV_GetCount()
  230.         LV_Modify(A_Index,"",A_Index)
  231. GuiControl, Focus, Key_CM
  232. return
  233. ChainMacroLVX:
  234. if A_GuiEvent = Normal
  235.     selectedRow := A_EventInfo
  236. return
  237. Del_CM:
  238. Gui, 2:Default
  239. Gui, Listview, ChainMacroLV
  240. LV_Delete(selectedRow)
  241. Loop % LV_GetCount()
  242.     LV_Modify(A_Index,"",A_Index)
  243. return
  244. mUp_CM:
  245. LV_GetText(fieldData1,selectedRow, 1)
  246. LV_GetText(fieldData2,selectedRow, 2)
  247. LV_GetText(fieldData3,selectedRow, 3)
  248. LV_GetText(fieldData4,selectedRow, 4)
  249. fieldData = %fieldData1%,%fieldData2%,%fieldData3%,%fieldData4%
  250. LV_Delete(selectedRow)
  251. if selectedRow != 1
  252.     selectedRow--
  253. LV_Insert(selectedRow,"",fieldData1,fieldData2,fieldData3,fieldData4)
  254. LV_Modify(selectedRow, "Select")
  255. Loop % LV_GetCount()
  256.     LV_Modify(A_Index,"",A_Index)
  257. return
  258. mDw_CM:
  259. if (selectedRow = LV_GetCount())
  260.     return
  261. LV_GetText(fieldData1,selectedRow, 1)
  262. LV_GetText(fieldData2,selectedRow, 2)
  263. LV_GetText(fieldData3,selectedRow, 3)
  264. LV_GetText(fieldData4,selectedRow, 4)
  265. fieldData = %fieldData1%,%fieldData2%,%fieldData3%,%fieldData4%
  266. LV_Delete(selectedRow)
  267. selectedRow++
  268. LV_Insert(selectedRow,"",fieldData1,fieldData2,fieldData3,fieldData4)
  269. LV_Modify(selectedRow, "Select")
  270. Loop % LV_GetCount()
  271.     LV_Modify(A_Index,"",A_Index)
  272. return
  273. Clear:
  274. Loop 7
  275. {
  276.     GuiControlGet, MainStack%A_Index%,Pos
  277.     if A_index = 5
  278.         GuiControl, Move, 50, % "x" MainStack%A_Index%X "y" MainStack%A_Index%Y
  279.     if A_index = 6
  280.         GuiControl, Move, 60, % "x" MainStack%A_Index%X "y" MainStack%A_Index%Y
  281.     currIndex := A_Index
  282.     Loop %MacroButtonNumber%
  283.     {
  284.         GuiControl, Move, %currIndex%%A_index%, % "x" MainStack%currIndex%X "y" MainStack%currIndex%Y
  285.     }
  286.     GuiControl, Show, MainStack%A_Index%
  287.     Loop 100
  288.     {
  289.         GuiControl, Show, Button%A_Index%
  290.         xbutton%A_Index%=
  291.     }
  292. }
  293. return
  294. SaveChanges:
  295. Gui, submit, nohide
  296. FileRead, fileData, %A_ScriptDir%\M.A.C.R.O.ini
  297. FileDelete, %A_ScriptDir%\M.A.C.R.O.ini
  298. ; Print Top Part
  299. Loop, parse, fileData, `n
  300.     {
  301.     if A_LoopField =
  302.         continue
  303.     IfNotInString, A_LoopField, -----
  304.         FileAppend, %A_LoopField%`n, %A_ScriptDir%\M.A.C.R.O.ini
  305.     else
  306.         break
  307.     }
  308. Loop, parse, fileData, `n
  309. {
  310.     if A_LoopField =
  311.         continue
  312.     IfInString, A_LoopField,----- M.A.C.R.O -----
  313.     {
  314.         FileAppend, %A_LoopField%`n, %A_ScriptDir%\M.A.C.R.O.ini
  315.     Loop, 100
  316.     {
  317.         GuiControlGet, LoopButton,, button%A_Index%, Text
  318.         buttonInfo := xbutton%A_Index%
  319.         StringSplit, buttonInfo_, buttonInfo, |
  320.         if buttonInfo !=
  321.         {
  322.         if (buttonInfo_1 = "MacroSpam")
  323.             FileAppend, %buttonInfo_2%`n, %A_ScriptDir%\M.A.C.R.O.ini
  324.         if (buttonInfo_1 ="UsableSpam")
  325.             FileAppend, %buttonInfo_2%`,u`n, %A_ScriptDir%\M.A.C.R.O.ini
  326.         if (buttonInfo_1 ="ChainMacro")
  327.         {
  328.             StringReplace, buttonInfo_3, buttonInfo_3,->,|,all
  329.             content = %buttonInfo_2%->%buttonInfo_3%
  330.             FileAppend, %content%`n, %A_ScriptDir%\M.A.C.R.O.ini
  331.         }
  332.         if (buttonInfo_1 ="SelfCast")
  333.             FileAppend, %buttonInfo_2%`,s`n, %A_ScriptDir%\M.A.C.R.O.ini
  334.         if (buttonInfo_1 = "12HotkeyBar")
  335.             FileAppend, %buttonInfo_2%#1|%coor1%`n, %A_ScriptDir%\M.A.C.R.O.ini
  336.         if (buttonInfo_1 = "22HotkeyBar")
  337.             FileAppend, %buttonInfo_2%#2|%coor2%`n, %A_ScriptDir%\M.A.C.R.O.ini
  338.         }
  339.     }
  340.         break
  341.     }
  342. }
  343. IniWrite, %SkillDelay%, %A_ScriptDir%\M.A.C.R.O.ini,Setting,SkillDelay
  344. IniWrite, %UsableDelay%, %A_ScriptDir%\M.A.C.R.O.ini,Setting,UsableDelay
  345. IniWrite, %ExitHotkey%, %A_ScriptDir%\M.A.C.R.O.ini,Setting,ExitHotkey
  346. IniWrite, %pauseHotkey%, %A_ScriptDir%\M.A.C.R.O.ini,Setting,pauseHotkey
  347. SB_SetText("Changes has been saved")
  348. return
  349. HotkeyExit:
  350. currChange = Exit
  351. Gui, 3:Show, w200 h100, Hotkey
  352. Gui, 3:Default
  353. GuiControl, Focus, ScriptHotkey
  354. GuiControl, , ScriptHotkey, %ExitHotkey%
  355. return
  356. HotkeyPause:
  357. currChange = Pause
  358. Gui, 3:Show, w200 h100, Hotkey
  359. Gui, 3:Default
  360. GuiControl, Focus, ScriptHotkey
  361. GuiControl, , ScriptHotkey,%PauseHotkey%
  362. return
  363. Okay:
  364. Gui, 3:submit
  365. if currChange = Exit
  366. {
  367.     ExitHotkey := ScriptHotkey
  368.     StringReplace, ExitHotkey_L, ExitHotkey, +, Shift +%A_Space%
  369.     StringReplace, ExitHotkey_L, ExitHotkey_L, ^, Ctrl +%A_Space%
  370.     StringReplace, ExitHotkey_L, ExitHotkey_L, !, Alt +%A_Space%
  371.     Gui, 1:Default
  372.     GuiControl,, Hotkey_E, %ExitHotkey_L%
  373. }
  374. if currChange = Pause
  375. {
  376.     PauseHotkey := ScriptHotkey
  377.     StringReplace, PauseHotkey_L, PauseHotkey, +, Shift +%A_Space%
  378.     StringReplace, PauseHotkey_L, PauseHotkey_L, ^, Ctrl +%A_Space%
  379.     StringReplace, PauseHotkey_L, PauseHotkey_L, !, Alt +%A_Space%
  380.     Gui, 1:Default
  381.     GuiControl,, Hotkey_P, %PauseHotkey_L%
  382. }
  383. return
  384. GuiClose3:
  385. Gui, 3:submit
  386. return
  387. ControlMove1:
  388. ControlMove2:
  389. ControlMove3:
  390. ControlMove4:
  391. ControlMove5:
  392. ControlMove6:
  393. ControlMove7:
  394.  StringRight, currLabel, A_ThisLabel, 1
  395.   CheckOnControl()
  396.   currCtrl := OnControl
  397.   x%currCtrl%=
  398.   Ix := SubStr( A_GuiControl,2 ), sHwnd := hWnd%Ix%%currLabel%
  399.   DllCall( "SetWindowPos", UInt,sHwnd, UInt,0, UInt,0, UInt,0, UInt,0, UInt,0, UInt,0x43 )
  400.   Sleep -1     ; ^ SWP_NOMOVE := 0x2 | SWP_NOSIZE := 0x1 | SWP_SHOWWINDOW := 0x40 = 0x43
  401.   SendMessage, 0x112, 0xF012, 0,, ahk_id %sHwnd%             ; WM_SYSCOMMAND and SC_MOVE
  402.   KeyWait LButton
  403.   GuiControlGet,%A_GuiControl%, Pos
  404.   GuiControl, Show, %A_GuiControl%
  405.   OccupiedCell := %A_Guicontrol%x "," %A_Guicontrol%y
  406.   string = %A_Guicontrol%x %A_Guicontrol%y
  407.   CheckOnControl()
  408.     if string != 2015
  409.         GuiControl, Show, %currCtrl%
  410.     if OnControl !=
  411.         if currCtrl !=
  412.             if (currCtrl != OnControl)
  413.                     GuiControl, Show, %currCtrl%
  414.   CheckRegButton()
  415.   CheckCell()
  416.   preChain := A_Guicontrol
  417.   if assigned != 1
  418. {
  419.     GuiControlGet, MainStack%currLabel%, Pos
  420.     GuiControl, Move, %A_Guicontrol%,% "x" MainStack%currLabel%X "y" MainStack%currLabel%Y
  421.     GuiControl, Show, %OnControl%
  422.     x%currCtrl%=
  423. }
  424. return
  425. GuiClose:
  426. ExitApp
  427. return
  428. GuiClose2:
  429. Gui, 1:Default
  430. Gui, 1:-Disabled
  431. GuiControlGet, MainStack4, Pos
  432. GuiControl, Move, %preChain%,% "x" MainStack4X "y" MainStack4Y
  433. GuiControl, Show, %OnControl%
  434. SB_SetText("Chain Macro Setup canceled...")
  435. Gui, 2:submit
  436. return
  437. GuiMove2:
  438. PostMessage, 0xA1, 2
  439. return
  440. Remove_Hotkey:
  441. StringLeft, leftChar, GuiControl, 1
  442. Loop, 7
  443. {
  444.     if leftChar = 5
  445.     {
  446.        
  447.         GuiControlGet, MainStack5, Pos
  448.         GuiControl, Move, %GuiControl%,% "x" MainStack5X "y" MainStack5Y
  449.         GuiControl, Show, %OnControl%
  450.         GuiControl, Show, MainStack5
  451.         x%OnControl% =
  452.         break
  453.     }
  454.     if leftChar = 6
  455.     {
  456.        
  457.         GuiControlGet, MainStack6, Pos
  458.         GuiControl, Move, %GuiControl%,% "x" MainStack6X "y" MainStack6Y
  459.         GuiControl, Show, %OnControl%
  460.         GuiControl, Show, MainStack6
  461.          x%OnControl% =
  462.         break
  463.     }
  464.     if (leftChar = A_Index)
  465.     {
  466.     GuiControlGet, MainStack%A_Index%, Pos
  467.     GuiControl, Move, %GuiControl%,% "x" MainStack%A_Index%X "y" MainStack%A_Index%Y
  468.     GuiControl, Show, %OnControl%
  469.      x%OnControl% =
  470.     }
  471. }
  472. return
  473. GuiContextMenu:
  474. MouseGetPos,mouseX,mouseY,, controlName
  475. if A_GuiControl =
  476.     return
  477. IfInString, controlName, Button
  478.     return
  479. IfInString, A_GuiControl, This will
  480.     return
  481. IfInString, controlName, SysLink1
  482.     return
  483. IfInString, controlName, statusbar321
  484.     return
  485. IfInString, A_GuiControl, script
  486.     return
  487. IfInString, A_GuiControl, Buttons
  488.     return
  489. IfInString, A_GuiControl, useless
  490.     return
  491. IfInString, A_GuiControl, ini
  492.     return
  493. IfInString, A_GuiControl, Hotkey
  494.     return
  495. IfInString, A_GuiControl, Hide
  496.     return
  497. IfInString, A_GuiControl, Info
  498.     return
  499. IfInString, A_GuiControl, Activate
  500.     return
  501. GuiControlGet,%A_GuiControl%, Pos
  502. tempX := %A_Guicontrol%x
  503. tempY := %A_Guicontrol%y
  504. GuiControl := A_GuiControl
  505. CheckOnControl()
  506. IfInString, A_GuiControl, button
  507.     return
  508. if (tempX = 20 and tempY = 15)
  509.     return
  510. IfInString, controlName, Static
  511.     Menu,Menu,Show
  512. return
  513. HideShow:
  514. WinGetPos, tempoX, tempoY, , , %title%
  515. xX := tempoX+18
  516. yY := tempoY+206
  517. SplashImage, %A_ScriptDir%\Keyboard.png, B X%xX% Y%yY%
  518. KeyWait LButton
  519. SplashImage, Off
  520. return
  521. Load()
  522. {
  523.     global
  524.     SelfCast_C = 1
  525.     ChainMacro_C = 1
  526.     MacroSpam_C = 1
  527.     UsableSpam_C = 1
  528.     start := false
  529.     start1 := false
  530.     start2 := false
  531.  
  532.     Loop, read, %A_ScriptDir%\M.A.C.R.O.ini
  533.     {
  534.         IfInString, A_Loopreadline, ----- M.A.C.R.O -----
  535.         {
  536.             start := true
  537.             continue
  538.         }
  539.         if start = 1
  540.         {
  541.             IfInString, A_Loopreadline, ->
  542.             {
  543.                 StringReplace, fix, A_Loopreadline, ->, #
  544.                 StringSplit, fix_, fix, #
  545.                 Loop, 100
  546.                 {
  547.                 GuiControlGet, buttonNameX,, button%A_Index%, text
  548.                 if (fix_1 = buttonNameX)
  549.                 {
  550.                     GuiControlGet, button%A_Index%, Pos
  551.                     GuiControl, Move, 4%ChainMacro_C%,% "x" button%A_Index%x-1 "y" button%A_Index%y-1
  552.                     ChainMacro_C++
  553.                     GuiControl, Hide, button%A_Index%
  554.                     StringReplace, fix, fix, |, ->, all
  555.                     StringReplace, fix, fix, #, |
  556.                     xbutton%A_Index% = ChainMacro|%fix%
  557.                     break
  558.                 }
  559.                 }
  560.             }
  561.             else IfInString, A_Loopreadline, ,u
  562.             {
  563.                 StringTrimRight, fix, A_Loopreadline, 2
  564.                 Loop, 100
  565.                 {
  566.                     GuiControlGet, buttonNameX,, button%A_Index%, text
  567.                     if (fix = buttonNameX)
  568.                     {
  569.                         GuiControlGet, button%A_Index%, Pos
  570.                         GuiControl, Move, 2%UsableSpam_C%,% "x" button%A_Index%x-1 "y" button%A_Index%y-1
  571.                         UsableSpam_C++
  572.                         GuiControl, Hide, button%A_Index%
  573.                         xbutton%A_Index% = UsableSpam|%fix%
  574.                         break
  575.                     }
  576.                 }
  577.             }
  578.             else IfInString, A_Loopreadline, ,s
  579.             {
  580.                 StringTrimRight, fix, A_Loopreadline, 2
  581.                 Loop, 100
  582.                 {
  583.                     GuiControlGet, buttonNameX,, button%A_Index%, text
  584.                     if (fix = buttonNameX)
  585.                     {
  586.                         GuiControlGet, button%A_Index%, Pos
  587.                         GuiControl, Move, 3%SelfCast_C%,% "x" button%A_Index%x-1 "y" button%A_Index%y-1
  588.                         SelfCast_C++
  589.                         GuiControl, Hide, button%A_Index%
  590.                         xbutton%A_Index% = SelfCast|%fix%
  591.                         break
  592.                     }
  593.                 }
  594.             }
  595.             else IfInString, A_LoopReadLine, #1
  596.             {
  597.                 StringReplace, fix, A_LoopReadline, #1, |
  598.                 StringSplit, fix_, fix, |
  599.                 GuiControl,, Coor1, %fix_3%
  600.                 Loop, 100
  601.                 {
  602.                     GuiControlGet, buttonNameX,, button%A_Index%, text
  603.                     if (fix_1 = buttonNameX)
  604.                     {
  605.                         GuiControlGet, button%A_Index%, Pos
  606.                         GuiControl, Move, 50,% "x" button%A_Index%x-1 "y" button%A_Index%y-1
  607.                         GuiControl, Hide, button%A_Index%
  608.                         GuiControl, Hide, MainStack5
  609.                         xbutton%A_Index% = 12HotkeyBar|%fix_1%|%fix_3%
  610.                         break
  611.                     }
  612.                 }
  613.             }
  614.             else IfInString, A_LoopReadLine, #2
  615.             {
  616.                 StringReplace, fix, A_LoopReadline, #2, |
  617.                 StringSplit, fix_, fix, |
  618.                 GuiControl,, Coor2, %fix_3%
  619.                 Loop, 100
  620.                 {
  621.                     GuiControlGet, buttonNameX,, button%A_Index%, text
  622.                     if (fix_1 = buttonNameX)
  623.                     {
  624.                         GuiControlGet, button%A_Index%, Pos
  625.                         GuiControl, Move, 60,% "x" button%A_Index%x-1 "y" button%A_Index%y-1
  626.                         GuiControl, Hide, button%A_Index%
  627.                         GuiControl, Hide, MainStack6
  628.                         xbutton%A_Index% = 22HotkeyBar|%fix_1%|%fix_3%
  629.                         break
  630.                     }
  631.                 }
  632.             }
  633.             else
  634.             {
  635.                 fix := A_Loopreadline
  636.                 Loop, 100
  637.                 {
  638.                     GuiControlGet, buttonNameX,, button%A_Index%, text
  639.                     if (fix = buttonNameX)
  640.                     {
  641.                         GuiControlGet, button%A_Index%, Pos
  642.                         GuiControl, Move, 1%MacroSpam_C%,% "x" button%A_Index%x-1 "y" button%A_Index%y-1
  643.                         MacroSpam_C++
  644.                         GuiControl, Hide, button%A_Index%
  645.                         xbutton%A_Index% = MacroSpam|%fix%
  646.                         break
  647.                     }
  648.                 }
  649.             }
  650.         }
  651.     }
  652. }
  653. CheckOnControl()
  654. {
  655.     global
  656.     GuiControlGet,%A_GuiControl%, Pos
  657.     picX := %A_Guicontrol%x
  658.     picY := %A_Guicontrol%y
  659.     tempX := picX+20
  660.     tempY := picY+20
  661.     OnControl =
  662.     Loop %KeyboardButonNumber%
  663.     {
  664.         GuiControlGet,button%A_Index%, Pos
  665.         temp1X := button%A_index%x
  666.         temp1Y := button%A_index%y
  667.         expand1X := temp1X + 40
  668.         expand1Y := temp1Y + 40
  669.         verCheck = 0
  670.         horCheck = 0
  671.         if tempX between %temp1X% and %expand1X%
  672.             verCheck = 1
  673.         if tempY between %temp1Y% and %expand1Y%
  674.             horCheck = 1
  675.         if ( verCheck = 1 and horCheck = 1 )
  676.             OnControl = button%A_Index%
  677.     }
  678. }
  679. CheckRegButton()
  680. {
  681.     global
  682.     GuiControlGet,%A_GuiControl%, Pos
  683.     picX := %A_Guicontrol%x
  684.     picY := %A_Guicontrol%y
  685.     tempX := picX+20
  686.     tempY := picY+20
  687.     assigned = 0
  688.     x%OnControl% = 0
  689.     Loop %KeyboardButonNumber%
  690.     {
  691.         GuiControlGet, displayButton,, button%A_Index%, Text
  692.         GuiControlGet,button%A_Index%, Pos
  693.         temp1X := button%A_index%x
  694.         temp1Y := button%A_index%y
  695.         expand1X := temp1X + 40
  696.         expand1Y := temp1Y + 40
  697.         verCheck = 0
  698.         horCheck = 0
  699.         if tempX between %temp1X% and %expand1X%
  700.             verCheck = 1
  701.         if tempY between %temp1Y% and %expand1Y%
  702.             horCheck = 1
  703.         if ( verCheck = 1 and horCheck = 1 )
  704.         {
  705.             GuiControl, Move, %A_Guicontrol%,% "x" temp1X-1 "y" temp1Y-1
  706.             assigned = 1
  707.             GuiControl, Hide, button%A_Index%
  708.             GuiControlGet, buttonName,, button%A_Index%, text
  709.             if currLabel = 1
  710.             {
  711.                 SB_SetText("'Macro Spam' is assigned to " . displayButton . ". --- Hold down this button to spam SKILL --- AHK code = Loop ( Send Key -> Click -> Delay )")
  712.                 x%OnControl% = MacroSpam|%buttonName%
  713.                 StringTrimLeft, temporary, A_Guicontrol, 1
  714.                 if (temporary = MacroButtonNumber)
  715.                     GuiControl, Hide, MainStack%currLabel%
  716.             }
  717.             if currLabel = 2
  718.             {
  719.                 SB_SetText("'Usable Spam' is assigned to " . displayButton . ". --- Hold down this button to spam POTION --- AHK code = Loop ( Send Key -> Delay )")
  720.                 x%OnControl% = UsableSpam|%buttonName%
  721.                 StringTrimLeft, temporary, A_Guicontrol, 1
  722.                 if (temporary = MacroButtonNumber)
  723.                     GuiControl, Hide, MainStack%currLabel%
  724.             }
  725.             if currLabel = 3
  726.             {
  727.                 SB_SetText("'Self-Cast' is assigned to " . displayButton . ". --- Default: Press this button twice to self-cast. --- AHK code = ( Send Key -> Click at center of screen -> Move mouse back to old location )")
  728.                 x%OnControl% = SelfCast|%buttonName%
  729.                 StringTrimLeft, temporary, A_Guicontrol, 1
  730.                 if (temporary = MacroButtonNumber)
  731.                     GuiControl, Hide, MainStack%currLabel%
  732.             }
  733.             if currLabel = 4
  734.             {
  735.                 StringTrimLeft, temporary, A_Guicontrol, 1
  736.                 if (temporary = MacroButtonNumber)
  737.                     GuiControl, Hide, MainStack%currLabel%
  738.                 secondTime = 1
  739.                 CheckCell()
  740.                 secondTime = 0
  741.                 if occupied = 0
  742.                 {
  743.                     SB_SetText("Setting up chain macro...")
  744.                     Gui, 2:Show, w290, Chain Macro Setup
  745.                     Gui, 2:Default
  746.                     Gui, Listview, ChainMacroLV
  747.                     LV_Delete()
  748.                     GuiControl, Focus, Key_CM
  749.                     CM_Count = 0
  750.                     Gui, 1:+Disabled
  751.                 }
  752.                 return
  753.             }
  754.             if currLabel = 5
  755.             {
  756.                 GuiControl, Hide, MainStack%currLabel%
  757.                 SB_SetText("1st hotkey of '2-Hotkey Bar'has been assigned to " . displayButton)
  758.                 x%OnControl% = 12HotkeyBar|%buttonName%
  759.             }
  760.             if currLabel = 6
  761.             {
  762.                 GuiControl, Hide, MainStack%currLabel%
  763.                 SB_SetText("2nd hotkey of '2-Hotkey Bar'has been assigned to " . displayButton)
  764.                 x%OnControl% = 22HotkeyBar|%buttonName%
  765.             }
  766.         }
  767.     }
  768. }
  769.  
  770. CheckCell()
  771. {
  772.     global
  773.     occupied = 0
  774.     if assigned = 0
  775.         return
  776.     Loop 7
  777.     {
  778.     AIndex := A_Index
  779.     Loop %MacroButtonNumber%
  780.     {
  781.         GuiControlGet,%AIndex%%A_Index%, Pos
  782.         tempX := %AIndex%%A_index%x
  783.         tempY := %AIndex%%A_index%y
  784.         expandX := tempX + 40
  785.         expandY := tempY + 40
  786.         StringSplit, split_, OccupiedCell, `,
  787.         random = %AIndex%%A_Index%
  788.         if (random = A_GuiControl)
  789.             continue
  790.         if (tempX = 20 and tempY = 15)
  791.             continue
  792.         currX := split_1
  793.         currY := split_2
  794.         currExpandX := currX+ 40
  795.         currExpandY := currY+ 40
  796.         verticalCheck = 0
  797.         horizonCheck = 0
  798.         cenX := currX+20
  799.         cenY := currY+20
  800.         if cenX between %tempX% and %expandX%
  801.             verticalCheck = 1
  802.         if cenY between %tempY% and %expandY%
  803.             horizonCheck = 1
  804.         if (horizonCheck = 1 and verticalCheck = 1)
  805.         {
  806.             SB_SetText("Only 1 hotkey can be assign per button !!!")
  807.             GuiControlGet, MainStack%currLabel%, Pos
  808.             GuiControl, Move, %A_Guicontrol%,% "x" MainStack%currLabel%X "y" MainStack%currLabel%Y
  809.             occupied = 1
  810.             if secondTime = 0
  811.                 Loop 2
  812.                     SoundBeep, 1000 ,50
  813.         }
  814.     }
  815.     }
  816. }
  817. MakeKeyboard()
  818. {
  819.     global
  820. Gui, Font, w1000 s10
  821. Gui, Add, Text, x%KeyboardX% y%KeyboardY% w970 h285 +0x201 +Border BackgroundTrans
  822. Gui, Add, Text, xp-1 yp-1 wp+2 hp+2 +0x201 +Border BackgroundTrans
  823. Gui, Add, Text, xp-1 yp-1 wp+2 hp+2 +0x201 +Border BackgroundTrans
  824. Gui, Add, Text, xp-1 yp-1 wp+2 hp+2 +0x201 +Border BackgroundTrans
  825. Gui, Add, Text, xp+8 yp+10 w40 h40 +0x201 +Border vbutton1 cBlue, Esc
  826. Gui, Add, Text, xp+60 yp wp hp +0x201 +Border vbutton2, F1
  827. Gui, Add, Text, xp+45 yp wp hp +0x201 +Border vbutton3, F2
  828. Gui, Add, Text, xp+45 yp wp hp +0x201 +Border vbutton4, F3
  829. Gui, Add, Text, xp+45 yp wp hp +0x201 +Border vbutton5, F4
  830. Gui, Add, Text, xp+55 yp wp hp +0x201 +Border vbutton6, F5
  831. Gui, Add, Text, xp+45 yp wp hp +0x201 +Border vbutton7, F6
  832. Gui, Add, Text, xp+45 yp wp hp +0x201 +Border vbutton8, F7
  833. Gui, Add, Text, xp+45 yp wp hp +0x201 +Border vbutton9, F8
  834. Gui, Add, Text, xp+55 yp wp hp +0x201 +Border vbutton10, F9
  835. Gui, Add, Text, xp+45 yp wp hp +0x201 +Border vbutton11 cBlue, F10
  836. Gui, Add, Text, xp+45 yp wp hp +0x201 +Border vbutton12 cBlue, F11
  837. Gui, Add, Text, xp+45 yp wp hp +0x201 +Border vbutton13 cBlue, F12
  838. Gui, Add, Text, xp-575 yp+50 wp hp +0x201 +Border vbutton14, ``
  839. Gui, Add, Text, xp+45 yp wp hp +0x201 +Border vbutton15, 1
  840. Gui, Add, Text, xp+45 yp wp hp +0x201 +Border vbutton16, 2
  841. Gui, Add, Text, xp+45 yp wp hp +0x201 +Border vbutton17,3
  842. Gui, Add, Text, xp+45 yp wp hp +0x201 +Border vbutton18,4
  843. Gui, Add, Text, xp+45 yp wp hp +0x201 +Border vbutton19,5
  844. Gui, Add, Text, xp+45 yp wp hp +0x201 +Border vbutton20,6
  845. Gui, Add, Text, xp+45 yp wp hp +0x201 +Border vbutton21,7
  846. Gui, Add, Text, xp+45 yp wp hp +0x201 +Border vbutton22,8
  847. Gui, Add, Text, xp+45 yp wp hp +0x201 +Border vbutton23,9
  848. Gui, Add, Text, xp+45 yp wp hp +0x201 +Border vbutton24,0
  849. Gui, Add, Text, xp+45 yp wp hp +0x201 +Border vbutton25,-
  850. Gui, Add, Text, xp+45 yp wp hp +0x201 +Border vbutton26,=
  851. Gui, Add, Text, xp+45 yp wp hp +Border vbutton27, Back`nspace
  852. Gui, Add, Text, xp-585 yp+45 wp hp +0x201 +Border vbutton28, Tab
  853. Gui, Add, Text, xp+45 yp wp hp +0x201 +Border vbutton29,Q
  854. Gui, Add, Text, xp+45 yp wp hp +0x201 +Border vbutton30,W
  855. Gui, Add, Text, xp+45 yp wp hp +0x201 +Border vbutton31,E
  856. Gui, Add, Text, xp+45 yp wp hp +0x201 +Border vbutton32,R
  857. Gui, Add, Text, xp+45 yp wp hp +0x201 +Border vbutton33,T
  858. Gui, Add, Text, xp+45 yp wp hp +0x201 +Border vbutton34,Y
  859. Gui, Add, Text, xp+45 yp wp hp +0x201 +Border vbutton35,U
  860. Gui, Add, Text, xp+45 yp wp hp +0x201 +Border vbutton36,I
  861. Gui, Add, Text, xp+45 yp wp hp +0x201 +Border vbutton37,O
  862. Gui, Add, Text, xp+45 yp wp hp +0x201 +Border vbutton38,P
  863. Gui, Add, Text, xp+45 yp wp hp +0x201 +Border vbutton39,[
  864. Gui, Add, Text, xp+45 yp wp hp +0x201 +Border vbutton40,]
  865. Gui, Add, Text, xp+45 yp wp hp +0x201 +Border vbutton41,\
  866. Gui, Add, Text, xp-585 yp+45 wp hp +Border vbutton42,Caps`nLock
  867. Gui, Add, Text, xp+65 yp wp hp +0x201 +Border vbutton43,A
  868. Gui, Add, Text, xp+45 yp wp hp +0x201 +Border vbutton44,S
  869. Gui, Add, Text, xp+45 yp wp hp +0x201 +Border vbutton45,D
  870. Gui, Add, Text, xp+45 yp wp hp +0x201 +Border vbutton46,F
  871. Gui, Add, Text, xp+45 yp wp hp +0x201 +Border vbutton47,G
  872. Gui, Add, Text, xp+45 yp wp hp +0x201 +Border vbutton48,H
  873. Gui, Add, Text, xp+45 yp wp hp +0x201 +Border vbutton49,J
  874. Gui, Add, Text, xp+45 yp wp hp +0x201 +Border vbutton50,K
  875. Gui, Add, Text, xp+45 yp wp hp +0x201 +Border vbutton51,L
  876. Gui, Add, Text, xp+45 yp wp hp +0x201 +Border vbutton52,;
  877. Gui, Add, Text, xp+45 yp wp hp +0x201 +Border vbutton53,'
  878. Gui, Add, Text, xp+45 yp w65 hp +0x201 +Border cRed, Enter
  879. Gui, Add, Text, xp-560 yp+45 w40 hp +0x201 +Border vbutton54,LShift
  880. Gui, Add, Text, xp+80 yp wp hp +0x201 +Border vbutton55,Z
  881. Gui, Add, Text, xp+45 yp wp hp +0x201 +Border vbutton56,X
  882. Gui, Add, Text, xp+45 yp wp hp +0x201 +Border vbutton57,C
  883. Gui, Add, Text, xp+45 yp wp hp +0x201 +Border vbutton58,V
  884. Gui, Add, Text, xp+45 yp wp hp +0x201 +Border vbutton59,B
  885. Gui, Add, Text, xp+45 yp wp hp +0x201 +Border vbutton60,N
  886. Gui, Add, Text, xp+45 yp wp hp +0x201 +Border vbutton61,M
  887. Gui, Add, Text, xp+45 yp wp hp +0x201 +Border vbutton62,,
  888. Gui, Add, Text, xp+45 yp wp hp +0x201 +Border vbutton63,.
  889. Gui, Add, Text, xp+45 yp wp hp +0x201 +Border vbutton64,/
  890. Gui, Add, Text, xp+45 yp wp hp +0x201 +Border vbutton65,RShift
  891. Gui, Add, Text, xp-530 yp+45 wp hp +0x201 +Border vbutton66,LCtrl
  892. Gui, Add, Text, xp+45 yp wp hp +0x201 +Border vbutton67 cRed,#
  893. Gui, Add, Text, xp+45 yp wp hp +0x201 +Border vbutton68,LAlt
  894. Gui, Add, Text, xp+190 yp w40 hp +0x201 Border vbutton69, Space
  895. Gui, Add, Text, xp-140 yp-1 w310 hp+2 +0x201 +Border BackgroundTrans
  896. Gui, Add, Text, xp+325 yp w40 hp +0x201 +Border vbutton70,RAlt
  897. Gui, Add, Text, xp+45 yp w40 hp +0x201 +Border vbutton71,RCtrl
  898. Gui, Add, Text, xp+125 yp w40 hp +0x201 +Border vbutton72,<
  899. Gui, Add, Text, xp+45 yp w40 hp +0x201 +Border vbutton73,v
  900. Gui, Add, Text, xp+45 yp w40 hp +0x201 +Border vbutton74,>
  901. Gui, Add, Text, xp-45 yp-45 w40 hp +0x201 +Border vbutton75,^
  902. Gui, Add, Text, xp-45 yp-185 w40 hp +Border vbutton76 cBlue,Print`nScreen
  903. Gui, Add, Text, xp+45 yp w40 hp +Border vbutton77,Scroll Lock
  904. Gui, Add, Text, xp+45 yp w40 hp +Border vbutton78,Pause Break
  905. Gui, Add, Text, xp-90 yp+50 w40 hp +0x201 +Border vbutton79 cBlue,Insert
  906. Gui, Add, Text, xp+45 yp w40 hp +0x201 +Border vbutton80,Home
  907. Gui, Add, Text, xp+45 yp w40 hp +Border vbutton81,Page`nUp
  908. Gui, Add, Text, xp-90 yp+45 w40 hp +0x201 +Border vbutton82,Delete
  909. Gui, Add, Text, xp+45 yp w40 hp +0x201 +Border vbutton83,End
  910. Gui, Add, Text, xp+45 yp w40 hp +Border vbutton84,Page`nDown
  911. Gui, Add, Text, xp+60 yp-45 w40 h40 +Border vbutton85, Num`nLock
  912. Gui, Add, Text, xp+45 yp w40 h40 +0x201 +Border vbutton86, /
  913. Gui, Add, Text, xp+45 yp w40 h40 +0x201 +Border vbutton87, *
  914. Gui, Add, Text, xp+45 yp w40 h40 +0x201 +Border vbutton88, -
  915. Gui, Add, Text, xp-135 yp+45 w40 h40 +0x201 +Border vbutton89, 7
  916. Gui, Add, Text, xp+45 yp w40 h40 +0x201 +Border vbutton90, 8
  917. Gui, Add, Text, xp+45 yp w40 h40 +0x201 +Border vbutton91, 9
  918. Gui, Add, Text, xp+45 yp w40 h40 +0x201 +Border vbutton92, +
  919. Gui, Add, Text, xp-135 yp+45 w40 h40 +0x201 +Border vbutton93, 4
  920. Gui, Add, Text, xp+45 yp w40 h40 +0x201 +Border vbutton94, 5
  921. Gui, Add, Text, xp+45 yp w40 h40 +0x201 +Border vbutton95, 6
  922. Gui, Add, Text, xp-90 yp+45 w40 h40 +0x201 +Border vbutton96, 1
  923. Gui, Add, Text, xp+45 yp w40 h40 +0x201 +Border vbutton97, 2
  924. Gui, Add, Text, xp+45 yp w40 h40 +0x201 +Border vbutton98, 3
  925. Gui, Add, Text, xp-90 yp+45 w40 h40 +0x201 +Border vbutton99, 0
  926. Gui, Add, Text, xp+45 yp w40 h40 +0x201 +Border vbutton100, Del/.
  927. Gui, Add, Text, xp+90 yp-90 w40 h130 +0x201 +Border cRed, Enter
  928. Gui, font, s8
  929. Gui, Add, Link, xp-130 yp-140, By : Recca`n<a href="http://ragindex.blogspot.com">http://ragindex.blogspot.com</a>`n
  930. }
  931. LoadSetting()
  932. {
  933.     global
  934.     IniRead, SkillDelay, M.A.C.R.O.ini, Setting, SkillDelay
  935.     IniRead, UsableDelay, M.A.C.R.O.ini, Setting, UsableDelay
  936.     IniRead, PauseHotkey, M.A.C.R.O.ini, Setting, PauseHotkey
  937.     StringReplace, PauseHotkey_L, PauseHotkey, +, Shift +%A_Space%
  938.     StringReplace, PauseHotkey_L, PauseHotkey_L, ^, Ctrl +%A_Space%
  939.     StringReplace, PauseHotkey_L, PauseHotkey_L, !, Alt +%A_Space%
  940.     IniRead, ExitHotkey, M.A.C.R.O.ini, Setting, ExitHotkey
  941.     StringReplace, ExitHotkey_L, ExitHotkey, +, Shift +%A_Space%
  942.     StringReplace, ExitHotkey_L, ExitHotkey_L, ^, Ctrl +%A_Space%
  943.     StringReplace, ExitHotkey_L, ExitHotkey_L, !, Alt +%A_Space%
  944.     IniRead, selfCast_Mode, M.A.C.R.O.ini, Activate, selfCast
  945. }
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement
Public Pastes
Advertisement
We use cookies for various purposes including analytics. By continuing to use Pastebin, you agree to our use of cookies as described in the Cookies Policy.  OK, I Understand
Not a member of Pastebin yet?
Sign Up, it unlocks many cool features!