Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- isMouseShown()
- {
- StructSize := A_PtrSize + 16
- VarSetCapacity(InfoStruct, StructSize)
- NumPut(StructSize, InfoStruct)
- DllCall("GetCursorInfo", UInt, &InfoStruct)
- Result := NumGet(InfoStruct, 8)
- if Result
- return 1
- else
- return 0
- }
- #If !isMouseShown() and WinActive("Darkfall Online")
- /*
- Reference for special keys
- shift = +
- alt = !
- ctrl = ^
- */
- /*
- Person Date Comment
- ----------------------------------------------------------------------------------------------------------
- Vodecca 2/6/2011 Created Cycle Spells
- */
- {
- #NoEnv
- SendMode Input
- curSpell=0
- #IfWinActive, Darkfall Online ; only activates script if you are in darkfall.
- ;Cycle spells
- ~*e::
- IfWinActive, Darkfall Online
- {
- if curSpell = 0
- {
- send {F10}
- curSpell++
- } else if curSpell = 1
- {
- send {F11}
- curSpell++
- } else if curSpell = 2
- {
- send {F12}
- curSpell++
- }else if curSpell = 3
- {
- send {F9}
- curSpell++
- }else if curSpell = 4
- {
- send {F8}
- curSpell=0
- }
- return
- }
- }
- IniFile := "C:\loot.txt"
- FileGetSize, size, %IniFile%
- if (size = "") {
- MsgBox Setting up
- IniWrite, 1300, %IniFile%, Loot, xdest ; --- destination x pos
- IniWrite, 700, %IniFile%, Loot, ydest ; --- destination y pos
- } else {
- IniRead, xdest, %IniFile%, Loot, xdest ; --- destination x pos
- IniRead, ydest, %IniFile%, Loot, ydest ; --- destination y pos
- }
- CoordMode, Pixel
- $!Lbutton:: ;quick loot -------------------------
- MouseGetPos, x1, y1
- MouseClickDrag, left, x1, y1, xdest, ydest, 0 ;0 is mouse speed, 0 is instant
- MouseMove, x1, y1, 0 ;0 is mouse speed, 0 is instant
- return
- $!Rbutton:: ;loot destination ------------------------->
- MouseGetPos, xdest, ydest
- IniWrite, %xdest%, %IniFile%, Loot, xdest
- IniWrite, %ydest%, %IniFile%, Loot, ydest
- return
- ~F1 Up:: ;this will trigger when you release the shift key.
- if (sprint != 1) ;if you aren't sprinting
- {
- Send {F1 down}
- sprint := 1 ;you are now sprinting
- tooltip, sprint, 1100, 60, 1
- }
- else ;if you're already sprinting
- {
- Send {F1 up}
- sprint := 0 ;you are no longer sprinting
- tooltip, , , ,1
- }
- return
- ~Mbutton:: ;this toggles your GUI by pressing the f11 key.
- ;if (gui != 1)
- ; {
- ;
- ; Send {ESCAPE}
- ; Sleep 20
- ; gui := 1
- ; }
- ;else
- ; {
- ; gui := 0
- ; }
- Send {BACKSPACE}
- if (sprint != 1) ;if you aren't sprinting
- {
- ;continue to not sprint
- }
- else ;if you ARE sprinting
- {
- Sleep 30
- Send {F12 up}
- Sleep 40
- Send {F12 down} ;continue to sprint
- }
- return
Add Comment
Please, Sign In to add comment