Moderator: MacroQuest Developers

Code: Select all
#event gottell "#1# tells you#*#"
#event full "#*#no place to put#*#"
Sub Main
:loop
/doevents
/if (${SpawnCount[pc radius 150 loc -140 640]}>1 || ${Spawn[gm].ID}) /call Dummy
/squelch /itemtarget
/delay 5s ${Ground.ID}
/delay 5
/if (!${Ground.LineOfSight}) /goto :hold
/squelch /face nolook item
/delay 1s
:moveloop
/keypress forward hold
/if (${Ground.Distance}>8) /goto :moveloop
/keypress forward
/delay 5
/squelch /click left item
/delay 5s ${Cursor.ID}
/delay 5
/autoinventory
/goto :loop
:hold
/squelch /face away nolook loc 660, -60
/delay 1s
/keypress back hold
/if (${Me.X}<(-80)) /goto :hold
/keypress back
/delay 5
/goto :loop
/return
Sub Event_gottell(line,sender)
/tell ${sender} AFK Message:AFK for a bit.
/call Dummy
/return
Sub Event_full
/beep
/afk AFK for a bit.
/endmacro
/return
Sub Dummy
:dummywait
/if (!${Me.AFK}) /afk AFK for a bit.
/delay 5s
/if (${SpawnCount[pc radius 150 loc -140 640]}>1 || ${Spawn[gm].ID}) /goto :dummywait
/if (${Me.AFK}) /afk
/return
