Pasted

#NoEnv ; Recommended for performance and compatibility with future AutoHotkey releases.
; #Warn  ; Enable warnings to assist with detecting common errors.
SendMode Input ; Recommended for new scripts due to its superior speed and reliability.
SetWorkingDir %A_ScriptDir% ; Ensures a consistent starting directory.
 
CardSortType_Rarity := 1
CardSortType_Level := 2
CardSortType_ATK := 3
CardSortType_DEF := 4
 
CardSortOrder_Ascending := 1
CardSortOrder_Descending := 2
 
MsgBox, 4, Flygon's beginner Deck, Press the Yes button if your game is in windowed mode. If you need to cancel the process, press ESC.
 
LastWinW := 0
LastWinH := 0
 
IfMsgBox Yes
{
    WinWaitActive, masterduel
 
    WinGetPos,X,Y,LastWinW,LastWinH,A
 
    ResizeWin(512, 512)
 
    RemoveMainDeckMonsters()
 
    ; RemoveMainDeckMonsters ensures the mouse is not pointing at the button of display unowned cards.
    DisplayUnownedCards()
 
    RemoveExtraDeckMonsters()
 
    ClearAllFilters()
 
    SetCardSortMethod(CardSortType_Rarity, CardSortOrder_Descending)
    ; Here we start main deck monsters.
 
    AddCardByText("Tri-brigade Nervall", 3)
    AddCardByText("Maxx C", 3)
    AddCardByText("Tri-brigade Kerass", 2)
    AddCardByText("Tri-brigade Kit", 3)
    AddCardByText("Ash Blossom & Joyous Spring", 3)
    AddCardByText("Rescue Cat", 3)
    AddCardByText("Destiny HERO - Celestial", 1)
    AddCardByText("Zoodiac Thoroughblade", 1)
    AddCardByText("Tri-brigade Fraktall", 3)
    AddCardByText("Destiny HERO - Dasher", 1)
    AddCardByText("The Primal Being", 1)
    AddCardByText("s Feather Duster", 1)
 
    ; The period is important for this card.
    AddCardByText("You can only activate 1 fusion destiny per turn.", 2)
    AddCardByText("You can only activate 1 Lightning Storm per turn.", 1)
 
    AddCardByText("Fire Formation - Tenki", 3)
    AddCardByText("Called By The Grave", 2)
    AddCardByText("Crossout Designator", 2)
    AddCardByText("Forbidden Droplet", 2)
    AddCardByText("Infinite Impermanence", 3)
    AddCardByText("Tri-brigade Revolt", 1)
 
    ; Now we switch to extra deck monsters.
 
    AddCardByText("Destiny HERO - Destroyer Phoenix Enforcer", 1)
    AddCardByText("Zoodiac Boarbow", 1)
    AddCardByText("Zoodiac Drident", 1)
    AddCardByText("Zoodiac Chakanine", 1)
    AddCardByText("Divine Arsenal AA-ZEUS - Sky Thunder", 1)
    AddCardByText("Salamangreat Almiraj", 1)
    AddCardByText("Ancient Warriors Oath - Double Dragon Lords", 1)
    AddCardByText("Tri-brigade Ferrijit the Barren Blossom", 1)
    AddCardByText("Tri-brigade Bearbrumm the Rampant Rampager", 1)
    AddCardByText("the Desperate Doom Eagle", 1)
    AddCardByText("Bow of the Goddess", 1)
    AddCardByText("Accesscode Talker", 1)
    AddCardByText("Tri-brigade Shuraig the Ominous Omen", 2)
    AddCardByText("Predaplant Verte Anaconda", 1)
 
    ResizeWin(LastWinW, LastWinH)
 
}
Else
{
    Return
}
 
ResizeWin(Width = 0,Height = 0)
{
    WinGetPos,X,Y,W,H,A
    
    if(%Width% = 0)
    {
        Width := W
    }
 
    if(%Height% = 0)
    {
        Height := H
    }
 
    WinMove,A,,%X%,%Y%,%Width%,%Height%
}
 
DisplayUnownedCards()
{
    PixelGetColor, OutputVar, 464, 181
 
    OutputVar += 0
 
    if(OutputVar < 2000)
    {
        Click, 464 181
 
        Sleep, 3000
    }
}
RemoveMainDeckMonsters()
{
    ; 70 instead of 65 to account for situations where the player already has an open menu.
    Loop, 70
    {
        Click, 148 197 Right
        Sleep, 100
    }
}
 
RemoveExtraDeckMonsters()
{
    Loop, 20
    {
        Click, 150 341 Right
        Sleep, 100
    }
}
 
ClearAllFilters()
{
    Click, 467 198
    Sleep, 2000
}
 
SetCardSortMethod(cardtype, cardorder)
{
    CardSortType_Rarity := 1
    CardSortType_Level := 2
    CardSortType_ATK := 3
    CardSortType_DEF := 4
 
    CardSortOrder_Ascending := 1
    CardSortOrder_Descending := 2
    
    Sleep, 1000
 
    Click, 419 195
 
    Sleep, 3000
 
 
    targetScreenPosX := 255
 
    if(cardorder = CardSortOrder_Descending)
    {
        targetScreenPosX += 63
    }
 
    targetScreenPosY := 0
 
    switch %cardtype%
    {
        case %CardSortType_Rarity%: targetScreenPosY = 150
        case %CardSortType_Level%: targetScreenPosY = 177
        case %CardSortType_ATK%: targetScreenPosY = 207
        case %CardSortType_DEF%: targetScreenPosY = 232
    }
 
    Click, %targetScreenPosX%, %targetScreenPosY%
 
    Sleep, 3000
}
AddCardByText(text, copies)
{
    text := StrReplace(text, "/", "{NumpadDiv}")
    text := StrReplace(text, "+", "{NumpadAdd}")
    text := StrReplace(text, "-", "{NumpadSub}")
    
    Click, 383 180
    Sleep, 200
    Send, %text%
    Sleep, 200
    Send, {Enter}
    Sleep, 1000
 
    Loop, %copies%
    {
        Click, 360 225 Right
        Sleep, 100
    }
 
    Click, 443 181
    Sleep, 1000
}
 
/::
 
    WinWaitActive, masterduel
 
    WinGetPos,X,Y,LastWinW,LastWinH,A
 
    ResizeWin(512, 512)
 
    MouseGetPos, xpos, ypos 
 
    clipboard = Click, %xpos% %ypos%
 
return
 
Esc::
    if(%LastWinW% != 0 && %LastWinH% != 0)
    {
        ResizeWin(LastWinW, LastWinH)
    }
 
ExitApp ; Exit script with Escape key
return