mailin macros (easy AFK golds & lvl 1-10)

[xantan]

mailin macros (easy AFK golds, faction, & lvl 1-15ish)

This macro is to be started in South Qeynos

this macro picks up mail in surefall, then karana, then turns it in in south qeynos & repeats.
*NOTE: The top left slot in your inventory and the one under it must be open for this macro to work correctly.

#turbo

#Event entered1     "#*#You have entered North Qeynos#*#"
#Event entered2     "#*#You have entered South Qeynos#*#"
#Event entered3     "#*#You have entered Qeynos Hills#*#" 
#Event entered4     "#*#You have entered Surefall Glade#*#" 
#Event entered5     "#*#You have entered Western Plains of Karana#*#"

Sub Main
/delay 1
/itemnotify 22 leftmouseup
/delay 2
/if (!${Cursor.ID}) /goto :c
/autoinventory
/echo YOU NEED TO ZONE OR DELETE ALL MAIL AND START MAC AGAIN
/if (${Cursor.ID}) /keypress forward hold
:wait
/doevents
/delay 2
/goto :wait
/return

:c
/warp loc 589.03 -82.33 2.44
/delay 1
/face loc 592.40, -82.34 fast
/delay 1
/keypress forward hold
/goto :wait

:wait
/doevents
/delay 2
/goto :wait
/return



Sub Event_entered1
/itemnotify 23 leftmouseup
/delay 1
/if (${Cursor.ID}) {
/autoinventory
/warp loc -29.74 351.66 2.44
/delay 1
/face loc -33.59, 351.8 fast
/delay 1
/keypress forward hold
/goto :wait
}
/warp loc 1395 1095.19 3.44
/delay 1
/face loc 1398.51, 1097 fast
/delay 1
/keypress forward hold
:wait
/doevents
/delay 2
/goto :wait
/return

Sub Event_entered2
:a
/warp loc 516.13 -129.57 3.44
/delay 1
/tar tralyn marsinger
/delay 1
/itemnotify 23 leftmouseup
/delay 3
/if (!${Cursor.ID}) /goto :b
/click left target
/delay 1m ${Window[GiveWnd].Open}
    /if (!${Window[GiveWnd].Open}) {
/echo BUG
/end
}
/delay 2
/notify GiveWnd GVW_Give_Button leftmouseup
/delay 3s
/itemnotify 22 leftmouseup
/delay 1s
/if (!${Cursor.ID}) /goto :b
/tar tralyn marsinger
/delay 1
/click left target
/delay 1
    /delay 1m ${Window[GiveWnd].Open}
    /if (!${Window[GiveWnd].Open}) {
/echo BUG
/end
}
/delay 2
/notify GiveWnd GVW_Give_Button leftmouseup
/delay 1
/warp loc 589.03 -82.33 2.44
/delay 1
/face loc 592.40, -82.34 fast
/delay 1
/keypress forward hold
:wait
/doevents
/delay 2
/goto :wait
:b
/warp loc 589.03 -82.33 2.44
/delay 1
/face loc 592.40, -82.34 fast
/delay 1
/keypress forward hold
/goto :wait
/return


Sub Event_entered3
/autoinventory
/delay 1
/itemnotify 22 leftmouseup
/delay 2
/if (!${Cursor.ID}) /goto :sure
/delay 1
/autoinventory
/delay 2
/itemnotify 23 leftmouseup
/delay 2
/if (!${Cursor.ID}) {
/warp loc 1266.75 -2458.87 -0.90
/delay 1
/face loc 1261.12, -2465.71 fast
/delay 1
/keypress forward hold
:wait
/doevents
/delay 2
/goto :wait
/return
}
/autoinventory
/delay 1
/warp loc -345.79 1098.37 -4.40
/delay 1
/face loc -350.33, 1098.37 fast
/delay 1
/keypress forward hold
/goto :wait
:sure
/warp loc 5199.90 84.61 -3.15
:wait
/doevents
/delay 2
/goto :wait
/return

Sub Event_entered4
/warp loc 116.20 -73.60 3.44
/delay 1
/tar sivina lutewhisper
/delay 1
/keypress ESC
/delay 2
/tar sivina lutewhisper
/delay 2
/keypress h
/delay 2
/say i will deliver mail to qeynos
/delay 1
/autoinventory
/delay 1
/warp loc -616.63 123.1 3.44
:wait
/doevents
/delay 2
/goto :wait
/return

Sub Event_entered5
/warp loc -3664.37 -2001.70 23.86
/delay 1
/tar mistrana
/delay 1
/keypress ESC
/delay 1
/tar mistrana
/delay 2
/keypress h
/delay 2
/say i will deliver mail to qeynos
/delay 1
/autoinventory
/warp loc 57.56 52.03 -3.56
/delay 1
/face loc 60.97, 57.57 fast
/delay 1
/keypress forward hold
:wait
/doevents
/delay 2
/goto :wait
/return

this macro is to be started in Felwithe

this macro picks up mail in felwithe then turns it in in kelethin (greater faydark) & repeats.
*NOTE: This macro uses DELAYS when it zones, needs to be adjusted depending on how fast you zone.

#turbo
Sub Main
   :Loop



:start
|get to tacar for mail
/warp loc -89.94 -330.08 3.13
/delay 1
/tar tacar
/delay 1
/face
/delay 1
/keypress forward
/delay 1
/keypress forward
/delay 1
/keypress ESC
/delay 1
/tar tacar
/delay 4
/keypress h
/delay 5 
/say i will deliver mail to kelethin
|in felwithe to gfaydark
/warp loc 54.48 206.98 3.13
/delay 1
/face loc 54.48, 209.17 fast
/delay 1
/keypress forward hold
/delay 28s
|give to jakum
/warp loc -230 265 77.1
/delay 1
/tar jakum
/delay 5
 /click left target
    /delay 1m ${Window[GiveWnd].Open}
    /if (!${Window[GiveWnd].Open}) {
        /echo ERROR: Timeout trying to open GiveWnd.
/warp loc -1919.55 -2635.47 23.53
/delay 1
/face loc -1919.59, -2637.33 fast
/delay 1
/keypress forward hold
/delay 18s
/goto :start
/return
    }
    /notify GiveWnd GVW_Give_Button leftmouseup
/delay 2
|in gfaydayk to felwithe
/warp loc -1919.55 -2635.47 23.53
/delay 1
/face loc -1919.59, -2637.33 fast
/delay 1
/keypress forward hold
/delay 18s
/goto :start
/return

written by yours truly

enjoy

 

[PeteSampras]

Pro tip: if you use warp to accomplish this, check out mq2reachit plugin and you might as just well use /saytarget to get the items and /ubertrade to give from far away. and /zone to zone. you could probably turn this into a 20 line macro that route.

 

[xantan]

lol.

well when I wrote this that plugin wasn't available.


maybe you'll see some more coming from me in the future