VillageIdiot
Member
- Joined
- Dec 14, 2006
- RedCents
- 291¢
Ok this macro has been pieced together from different ones i've seen around here. It works great except when i zone out. It does nothing, I just end up coming back and seeing myself standing there twisting songs. How can i just make it camp as soon as i zone? I've tried a few different variables but nothing seems to work for me.
Any help with this would be much appreciated.
Rich (BB code):
| This macro made for www.Redguides.com
| Don't steal it or we'll punch your fase!
#turbo
#event camp "personingroup tells the group, 'lets roll'
#event dzadd "personyouwanttoadd tells you, 'add me fool!'
#event invite "#*#invites you to join#*#"
#Event Zoned "#*#You have entered#*#
#event exp "#*#experience!#*#"
Sub Main
:loopstart
/doevents
/call GMcheck
/if (${Target.Level}>65) /tar npc next
/if (${Target.Distance}>220) /keypress esc
/if (${Target.ID}==FALSE) /tar NPC radius 220
/if (${Me.PctHPs}<=60) /potionbelt activate 1
/delay 10
/goto :loopstart
/return
Sub GMcheck
/if (${Spawn[gm].ID}) {
/echo Gm detected
/beep
/beep
/beep
/keypress 9
/endmac
/unload
/q
}
/return
Sub event_camp
/sit
/camp desk
/return
sub event_zoned
/delay 5s
/sit
/camp
/endmac
/plugin mq2twist unload
/return
sub event_dzadd
/dzadd personyouwanttoadd
/return
sub event_invite
/invite
/return
sub event_exp
/stoptwist
/circle off
/keypress back hold
/delay 5
/keypress forward
/delay 1s
/declare LootSlot int inner 0
/declare LootCheck int inner 0
/declare LootTotal int inner 0
/target corpse
/delay 1s
/moveto ID
/delay 1s
/loot
/delay 1s
/if (!${Corpse.Items}) {
/echo NO LOOT!
/notify LootWnd DoneButton leftmouseup
/delay 1s
/plugin mq2moveutils unload
/delay 1s
/plugin mq2moveutils
/delay 1s
/moveto loc -558.13, -123.51
/delay 1s
/face heading north
/delay 1s
/circle on 19
/tar NPC radius 220 bat
/squelch /twist 1 2 3 6 7 4 8
/return
}
/varset LootTotal ${Corpse.Items}
/for LootSlot 1 to ${LootTotal}
/itemnotify loot${LootSlot} leftmouseup
/delay 1
/if (${LootAllItems}) {
/echo Keeping a ${Cursor.Name}... WOOT!
/autoinventory
/autoinventory
/delay 1s
} else {
/for LootCheck 1 to ${ItemsToLoot.Size}
/if (${Cursor.Name.Find[${ItemsToLoot[${LootCheck}]}]}) {
/echo Keeping a ${Cursor.Name}... WOOT!
/autoinventory
/autoinventory
/delay 1s
}
/next LootCheck
}
/if (${Cursor.ID}) {
/echo Destroying a ${Cursor.Name}...
/destroy
/destroy
/delay 1s
}
/next LootSlot
/delay 1s
/notify LootWnd DoneButton leftmouseup
/delay 1s
/plugin mq2moveutils unload
/delay 1s
/plugin mq2moveutils
/delay 1s
/moveto loc -558.13, -123.51
/delay 1s
/face heading north
/delay 1s
/circle on 19
/tar NPC radius 220 bat
/squelch /twist 1 2 3 6 7 4 8
/return
Any help with this would be much appreciated.