Elite Dangerous Scripts WIP

;************************************
;* Crowbars82's Elite Scripts (WIP) *
;************************************

#SingleInstance force
#Persistent

SplashTextOn, 300, 20, Elite Dangerous Script, Reloading Elite Dangerous Script...
WinMove, Elite Dangerous Script,, 810, 0                ;need to put in auto-screen res
Sleep 1000
SplashTextOff

IniRead, TradeSystem1, EliteTrades.ini, System, TradeSystem1, BLANK             ;reads all data from previous entries (if any)
IniRead, TradeSystem2, EliteTrades.ini, System, TradeSystem2, BLANK
IniRead, TradeGoods1, EliteTrades.ini, Goods, TradeGoods1, BLANK
IniRead, TradeGoods2, EliteTrades.ini, Goods, TradeGoods2, BLANK
IniRead, TradeStation1, EliteTrades.ini, Station, TradeStation1, BLANK
IniRead, TradeStation2, EliteTrades.ini, Station, TradeStation2, BLANK

SplashTextOn, 200, 140, Trading Info, System 1: %TradeSystem1%`nStation 1: %TradeStation1%`nBuy: %TradeGoods1%`n`nSystem 2: %TradeSystem2%`nStation 2: %TradeStation2%`nBuy: %TradeGoods2%
WinMove, Trading Info,, 1984, 657

<^>!m::returnMousePos()                 ;this will return the coordinates of the mouse and send them to clipboard and saves to Mouse-Clicks.txt in script folder

^Numpad0 up::SetTradingRoute()
Numpad1 up::SetCourseToTrade1()
Numpad2 up::SetCourseToTrade2()

pause::Pause
^F1::reload
#q::ExitApp

;###################################
;# ELITE DANGEROUS TRADING ASSISTS #
;###################################

returnMousePos()
{
    CoordMode, Mouse, Screen
    MouseGetPos, MouseX, MouseY
    clipboard = %MouseX%, %MouseY%
    SplashTextOn, 300, 20, Shodan, clipboard is X:%MouseX% Y:%MouseY%
    WinMove, Shodan,, 810, 0
    Sleep 1000
    SplashTextOff
    FileAppend,
    (
    Send {Click %MouseX%, %MouseY%}`n
    ), Mouse-Clicks.txt
Return
}

SetTradingRoute()
    {
    Global TradeSystem1
    Global TradeSystem2
    Global TradeGoods1
    Global TradeGoods2
    Global TradeStation1
    Global TradeStation2

    InputBox, TradeSystem1, Set Trading Route, Enter First System...,,,,1984, 357
    if ErrorLevel 1
        {
        Sleep, 1000
        }
    else
        {
        IniWrite, %TradeSystem1%, EliteTrades.ini, System, TradeSystem1
        }
    InputBox, TradeStation1, Set Station, Enter First Station...,,,,1984, 357
    if ErrorLevel 1
        {
        Sleep, 100
        }
    else
        {
        IniWrite, %TradeStation1%, EliteTrades.ini, Station, TradeStation1
        }
    InputBox, TradeGoods1, Set Trading Route, Enter Trade Goods...,,,,1984, 357
    if ErrorLevel 1
        {
        Sleep, 100
        }
    else
        {
        IniWrite, %TradeGoods1%, EliteTrades.ini, Goods, TradeGoods1
        }
    InputBox, TradeSystem2, Set Trading Route, Enter Second System...,,,,1984, 357
    if ErrorLevel 1
        {
        Sleep, 100
        }
    else
        {
        IniWrite, %TradeSystem2%, EliteTrades.ini, System, TradeSystem2
        }
    InputBox, TradeStation2, Set Station, Enter Second Station...,,,,1984, 357
    if ErrorLevel 1
        {
        Sleep, 100
        }
    else
        {
        IniWrite, %TradeStation2%, EliteTrades.ini, Station, TradeStation2
        }
    InputBox, TradeGoods2, Set Trading Route, Enter Trade Goods...,,,,1984, 357
    if ErrorLevel 1
        {
        Sleep, 100
        }
    else
        {
        IniWrite, %TradeGoods2%, EliteTrades.ini, Goods, TradeGoods2
        }

    SplashTextOn, 200, 150, Trading Info, System 1: %TradeSystem1%`nStation 1:%TradeStation1%`nBuy: %TradeGoods1%`n`nSystem 2: %TradeSystem2%`nnStation 2:%TradeStation2%`nBuy: %TradeGoods2%
    WinMove, Trading Info,, 1984, 657
    Return
}

SetCourseToTrade1()
    {
    Global TradeSystem1
    Global TradeSystem2
    Global TradeGoods1
    Global TradeGoods2
    Global TradeStation1
    Global TradeStation2

    IfWinExist, ahk_class FrontierDevelopmentsAppWinClass
        {
        WinActivate
        Sleep, 100
        CoordMode, Mouse, Screen

        MouseMove, 58, 139              ;click on the info tab
        Sleep, 100
        Send {LButton down}
        Sleep, 10
        Send {LButton up}
        Sleep, 100

        MouseMove, 216, 143             ;click on the navigation tab
        Sleep, 100
        Send {LButton down}
        Sleep, 10
        Send {LButton up}
        Sleep, 100

        MouseMove, 341, 246             ;click in the search box
        Sleep, 100
        Send {LButton down}
        Sleep, 10
        Send {LButton up}
        Sleep, 100

        Loop, 30
            {
            Send {Backspace}            ;clear current system if any
            }
        Sleep, 10

        Send %TradeSystem1%             ;enter system name
        Sleep, 100
        Send {Enter down}
        Sleep, 10
        Send {Enter up}

        MouseMove, 1142, 662            ;hovers over the plot route button
        Sleep, 2000                     ;waits for the map to float over to the desired system (will need to be changed for systems further than a few jumps)
        Send {LButton down}
        Sleep, 10
        Send {LButton up}
        Sleep, 100
        }
    Return
}

SetCourseToTrade2()
    {
    Global TradeSystem1
    Global TradeSystem2
    Global TradeGoods1
    Global TradeGoods2
    Global TradeStation1
    Global TradeStation2

    IfWinExist, ahk_class FrontierDevelopmentsAppWinClass
        {
        WinActivate
        Sleep, 100
        CoordMode, Mouse, Screen

        MouseMove, 58, 139              ;click on the info tab
        Sleep, 100
        Send {LButton down}
        Sleep, 10
        Send {LButton up}
        Sleep, 100

        MouseMove, 216, 143             ;click on the navigation tab
        Sleep, 100
        Send {LButton down}
        Sleep, 10
        Send {LButton up}
        Sleep, 100

        MouseMove, 341, 246             ;click in the search box
        Sleep, 100
        Send {LButton down}
        Sleep, 10
        Send {LButton up}
        Sleep, 100

        Loop, 30
            {
            Send {Backspace}            ;clear current system if any
            }
        Sleep, 10

        Send %TradeSystem2%             ;enter system name
        Sleep, 100
        Send {Enter down}
        Sleep, 10
        Send {Enter up}

        MouseMove, 1142, 662            ;hovers over the plot route button
        Sleep, 2000                     ;waits for the map to float over to the desired system (will need to be changed for systems further than a few jumps)
        Send {LButton down}
        Sleep, 10
        Send {LButton up}
        Sleep, 100
        }
    Return
}

Return