MTGO- Magic The Gathering OnLine

[Casper2400]

For some reason I do not have permission to add posts to the sample scripts forum.

Please post your comments here.

Thank you

These codes all assume you have YatBot.

This code will set your commons owned less than 4 to physical owned =1.

[sblock]

CODE

#cs ----------------------------------------------------------------------------

AutoIt Version: 3.2.2.0

Author: Casper2400 <bbs@mjsutton.com>

Name: Physical Set.exe

Script Function:

This sets all your cards to "Physical owned =1" for traders looking to fill sets of cards you have less than 4.

Put this Program into your "Quick Launch"

Log onto your MTGO account. Click "collection" tab. Reset. "Set Rarity". Set "Version". Set "Number Owned" to < 3.

Run this program from quick launch so MTGO is still active window (click anywhere on your MTGO screen before prog starts)

When finished you must manually close this prog. you can pause at anytime by clicking the "pause" button on your computer.

#ce ----------------------------------------------------------------------------

; Script Start - Add your code below here

Sleep (2000) ;allows you a few seconds to click on screen before prog starts.

Global $Paused

HotKeySet("{PAUSE}", "TogglePause") ; pauses the program, click again to unpause.

Func TogglePause()

$Paused = Not $Paused

While $Paused

Sleep(2000)

WEnd

EndFunc ;==>TogglePause

Do

MouseClick ( "left", 423, 260, 1, 5 ) ;Left page

MouseClick ( "left", 517, 260, 1, 5 )

MouseClick ( "left", 610, 260, 1, 5 )

MouseClick ( "left", 423, 445, 1, 5 )

MouseClick ( "left", 517, 445, 1, 5 )

MouseClick ( "left", 610, 445, 1, 5 )

MouseClick ( "left", 423, 625, 1, 5 )

MouseClick ( "left", 517, 625, 1, 5 )

MouseClick ( "left", 610, 625, 1, 5 )

MouseClick ( "left", 750, 260, 1, 5 ) ;Right page

MouseClick ( "left", 845, 260, 1, 5 )

MouseClick ( "left", 935, 260, 1, 5 )

MouseClick ( "left", 750, 445, 1, 5 )

MouseClick ( "left", 845, 445, 1, 5 )

MouseClick ( "left", 935, 445, 1, 5 )

MouseClick ( "left", 750, 625, 1, 5 )

MouseClick ( "left", 845, 625, 1, 5 )

MouseClick ( "left", 935, 625, 1, 5 )

MouseClick ( "left", 960, 83, 1, 0 ) ;Change page

sleep (500)

Until $Paused

[/sblock]

This code will shut down YatBot.exe, Autologin.exe, and magic1.exe then run MTGO update for you on Thursday and restart yatbot after setting common cards to tradeable. works best with above code run before hand. best run as a scheduled task on Thursday 10am PST.

[sblock]

CODE

#cs ----------------------------------------------------------------------------

AutoIt Version: 3.2.2.0

Author: casper2400 <bbs@mjsutton.com>

Name: MTGO update.exe

Script Function:

Updates MTGO automated for you, sets cards to trade, and starts YatBot.

#ce ----------------------------------------------------------------------------

; Script Start - Add your code below here

Send ( "{PAUSE}" )

ProcessClose("AutoLogin.exe")

MouseClick ( "left", 80, 35, 1, 5 ) ;clicks Main Window Tab

Sleep ( 1000 )

MouseClick ( "left", 50, 421, 1, 10 ) ;clicks Log Off Button

Sleep ( 1000 )

MouseClick ( "left", 500, 420, 1, 10 ) ;clicks "Check" (Yes log off) Button

Sleep ( 2000 )

MouseClick ( "left", 1015, 10, 1, 0 ) ;close magic.exe

Sleep ( 1000 )

ProcessClose("YatBot.exe")

Run ( "C:\Program Files\Wizards of the Coast\Magic Online\magic.exe" ) ;start mtgo update

WinWaitActive("Magic Online Install/Update Agent","", 20 )

MouseClick ( "left", 698, 411, 1, 0 ) ;clicks launch button

WinWaitActive("Magic Online Install/Update Agent", "")

Opt ("ColorMode", 0) ;0=RRGGBB color, 1=BBGGRR color

; Wait until something changes in the region 0,0 to 50,50

; Get initial checksum

$checksum = PixelChecksum (550,292, 550,292) ;left, top, right, bottom

; Wait for the region to change, the region is checked every 100ms to reduce CPU load

While $checksum = PixelChecksum (550,292, 550,292)

Sleep(100)

WEnd

If $checksum = ( "5696A1" ) Then

Sleep(1000)

ElseIf $checksum = ( "C8C8C8" ) Then

EndIf

MouseClick ( "left", 455, 622, 1, 0 ) ;clicks I agree button

Sleep ( 1000 )

WinWaitActive("Magic Online V2.", "")

Sleep ( 1000 )

WinSetState ( "Magic Online V2.", "", @SW_MAXIMIZE )

MouseClick ( "left", 422, 366, 1, 0 ) ;clicks inputs username

Send ("USERNAME")

Sleep ( 1000 )

MouseClick ( "left", 422, 417, 1, 0 ) ;clicks inputs password

Send ("PASSWORD")

Sleep ( 1000 )

MouseClick ( "left", 500, 450, 1, 0 ) ;clicks Log On button

$checksum = PixelChecksum (570,410, 570,410) ;left, top, right, bottom

While $checksum = PixelChecksum (570,410, 570,410)

Sleep(100)

WEnd

If $checksum = ( "9593A5" ) Then

Sleep(500)

ElseIf $checksum = ( "D3D6D9" ) Then

EndIf

MouseClick ( "left", 339, 35, 1, 5 ) ;clicks Collection Tab

Sleep ( 1000 )

MouseClick ( "left", 200, 330, 1, 5 ) ;clicks Reset Tab

Sleep ( 1000 )

MouseClick ( "left", 245, 217, 1, 5 ) ;clicks Rarity Menu

Sleep ( 1000 )

MouseClick ( "left", 150, 254, 1, 5 ) ;selects rarity "common"

Sleep ( 1000 )

MouseClick ( "left", 245, 236, 1, 5 ) ;clicks Version Menu

Sleep ( 1000 )

MouseClick ( "left", 150, 276, 1, 5 ) ;Selects Version "regular"

Sleep ( 1000 )

MouseClick ( "right", 500, 80, 1, 5 ) ;Right clicks Top of Collection for trade menu

Sleep ( 1000 )

MouseClick ( "left", 550, 115, 1, 5 ) ;Selects All Tradeable

Sleep ( 1000 )

MouseClick ( "left", 200, 330, 1, 5 ) ;clicks Reset Tab

Sleep ( 1000 )

MouseClick ( "left", 245, 130, 1, 5 ) ;clicks Cards to View Menu

Sleep ( 1000 )

MouseClick ( "left", 150, 180, 1, 5 ) ;Select View "physical"

Sleep ( 1000 )

MouseClick ( "right", 500, 80, 1, 5 ) ;Right clicks Top of Collection for trade menu

Sleep ( 1000 )

MouseClick ( "left", 550, 130, 1, 5 ) ;Selects All UnTradeable

Sleep ( 1000 )

MouseClick ( "left", 200, 330, 1, 5 ) ;clicks Reset Tab

Sleep ( 1000 )

MouseClick ( "left", 80, 35, 1, 5 ) ;clicks Main Window Tab

Sleep ( 1000 )

MouseClick ( "left", 50, 421, 1, 10 ) ;clicks Log Off Button

Sleep ( 1000 )

MouseClick ( "left", 500, 420, 1, 10 ) ;clicks "Check" (Yes log off) Button

Sleep ( 2000 )

MouseClick ( "left", 1015, 10, 1, 0 ) ;close magic.exe

Sleep ( 2000 )

Run ( "C:\Program Files\YaTBoT\AutoLogin.exe" ) ;start autologin

WinWaitActive("Auto Login Utiliy","", 20 )

MouseClick ( "left", 230, 390, 1, 0 ) ;sets text box position

Send ("PASSWORD")

MouseClick ( "left", 250, 450, 1, 0 ) ;sets text box position

Exit

[/sblock]

This code is best set as a system scheduled task for windows start or in startup to run at windows start.

It auto starts and logs into YatBot AutoLogin to run your trade bot.

[sblock]

CODE

#cs ----------------------------------------------------------------------------

AutoIt Version: 3.2.2.0

Author: casper2400 <bbs@mjsutton.com>

Name: YatBot Start.exe

Script Function:

Auto starts YatBot (I run this at windows start to auto run when computer starts.

#ce ----------------------------------------------------------------------------

; Script Start - Add your code below here

Sleep (20000 )

Run ( "C:\Program Files\YaTBoT\AutoLogin.exe" ) ;start autologin

WinWaitActive("Auto Login Utiliy","", 20 )

MouseClick ( "left", 230, 390, 1, 0 ) ;sets text box position

Send ("PASSWORD")

MouseClick ( "left", 250, 450, 1, 0 ) ;Clicks "GO!" Button

Exit

[/sblock]

Edited January 13, 2007 by Casper2400

[BrettF]

I think you have to reach 10 posts. Dont trust me on that though.... Im not too sure on that...