Updating AHK Script for v1.0

;;                    //-- INSTRUCTIONS --//                                                    ;;
;;                                                                                              ;;
;;  Client must be set to default size (Also, don't use the webclient)                          ;;
;;                                                                                              ;;
;;  All keys to use are the arrow keys (Bar Shift+RightClick to debug and F12 to close script)  ;;
;;   Down  - Drags all items into chest from invent                                             ;;
;;   Up    - Drags all items into invent from chest but hanging on the last one                 ;;
;;   Right - Drops the item held from 'Up' and presses Alt+F4                                   ;;
;;   Left  - Would not recommend using (See bottom of script for how to use)                    ;;
;;                                                                                              ;;
;;                    //-~-~-~-~-~-~-~-~-//    Script by -Flamewind-                            ;;
 
 
#SingleInstance force  ;The below co-ords are for the first slot in you're invent/chest
sx=645    ;Slot X (You can change these co-ordinates if you're not using the default size)
syt=475   ;Slot Y - Invent
sy=580    ;Slot Y - Chest
sytn=520
syn=625
li=false
 
cmx=11
cmy=636
Return
 
;;--  Start of dragging all items out of invent, into chest script --;;
 
Down::
CoordMode, Mouse, Relative
j=0
k=0
While j < 8
{
        If j < 4
        {
                sxn:=sx+(45*j)
				MouseClickDrag, left, sxn, syt, sxn, sy, 15
        }
        Else
        {
                sxn:=sx+(45*k)
				MouseClickDrag, left, sxn, sytn, sxn, syn, 15
                k++
        }
        j++
}
Return
 
;;--  End of invent -> chest script  --;;
;;--  Start of dragging all items out of chest, into invent and hanging on the last item  --;;
 
Up::
CoordMode, Mouse, Relative
j=0
k=0
While j < 7
{
        If j < 4
        {
                sxn:=sx+(45*j)
				MouseClickDrag, left, sxn, sy, sxn, syt, 15
        }
        Else
        {
                sxn:=sx+(45*k)
				MouseClickDrag, left, sxn, syn, sxn, sytn, 15
                k++
        }
        j++
}
If j = 7
{
        sxn:=sx+(45*k)
        MouseMove, sxn, syn
        Sleep, 75
        Click D
        Sleep, 75
        MouseMove, sxn, sytn
        li=true
}
Return
 
;;--  End of chest -> invent script  --;;
 
Right::          ; <-- This is a shortcut for letting go of the item and using Alt+F4 after using the Up key (See above code)
If li = true
{
        Click U
        Sleep, 75
        Send, !{F4}
        li=false
}
Return
 
;--  Start of something I made to see if I could get AHK to detect the connect messages and do the timing for me ^_^  --;
 
+Left::
CoordMode, Mouse, Screen
MouseGetPos, cmx, cmy
Return
 
~Left::
CoordMode, Pixel, Screen
If li = true
{
        While GetKeyState("Left")
        {
                If li = true
                {
                        PixelGetColor, cmc, %cmx%, %cmy%
                        If cmc = 0xFE0000
                        {
                                Sleep, 75       ; <-- If you're going to use this part of the script you may want to tweak the timings a bit
                                Click U
                                Sleep, 75
                                Send, !{F4}
                                li=false
                        }
                }
        }
}
Return
 
;--  End of connection message detect  --;
 
+RButton::                               ;  <-- This is just for debugging purposes (After you use Shift+Left to show the position of the
CoordMode, Pixel, Screen                 ;       connection messages to the script, you need to make sure that the script is detecting
PixelGetColor, cmc, %cmx%, %cmy%         ;       the exact colours 0xFE0000, for blue and 0x0000FE for red.)
MsgBox, , , CMC %cmc%, CMX/Y %cmx% %cmy%
Return
 
F12::
ExitApp