Currency Exchange

A forum for you to dump all the macros you create, allowing users to use, modify, and comment on your work.

Moderator: MacroQuest Developers

ml2517
a grimling bloodguard
a grimling bloodguard
Posts: 1216
Joined: Wed Nov 12, 2003 1:12 am

Currency Exchange

Post by ml2517 » Tue Dec 16, 2003 1:31 am

Per someones request...

-- Added some delays in there in case there are server side limits. I didn't notice any last night but better safe than sorry.

Code: Select all

|
|  currencyexchange.mac  
|
|  Stand your character next to a banker and run this script.
|  It simply exchanges copper, silver and gold for plat.
| 
|  Could be useful if called from some automated scripts.  :)
|

#turbo 20 

Sub Main 
/declare Coin array 
/varset Coin(1) copper 
/varset Coin(2) silver 
/varset Coin(3) gold 
/varset Coin(4) plat 


/if $invpanel==FALSE /press i 
/if $target()==FALSE /target banker 
/click right target 

/call ChangeCoin 
/cleanup 
/endmacro 
/return 

Sub ChangeCoin 
/declare a local 
/for a 1 to 3 
    /sendkey down shift 
    /click left @Coin(@a) 
    /sendkey up shift 
    /delay 5
    /click left @Coin($calc(@a+1)) 
    /delay 5
    /click left @Coin(@a) 
    /delay 5
/next a 
/return