Ok... i found the macro, but there is a problem, mq2events.dll is NOT working, when i type in /echo You have Entered the Guild Lobby. it is sapposed to start the chain of events, but mq2 is not working correctly i believe, can anyone send a fix to this problem please?
(i believe mq2 is not doing any of the events when it is sapposed to see the event and start the chain of events)
please help with a solution i would much appreciate it, thankyou!
(i believe mq2 is not doing any of the events when it is sapposed to see the event and start the chain of events)
please help with a solution i would much appreciate it, thankyou!
PHP:
UBER Vxed Macro... for noobs.
|Version 1.3 ---Added Summoning checks
|Version 1.2 ---Updated to work with new and old moveutils
|Version 1.1 ---Updated efficancy of songs
|Version 1.0 ---Tone Originally coded I believe
|-----------------------------------------------
|Disclaimer: Very high risk macro. People have been banned using this.
| USE AT YOUR OWN RISK!!!!!
|-----------------------------------------------
|What this macro does is zone you into Vxed from guild lobby.
|Upon death you will go all the way back to berindu and wait for
|corpse to pop and loot all items. Once all items are looted. You
|get expedition and start up in vxed. This uses invulnerbility song
|Healing potions and many other things to try to sustain your health
|so you don't have to be a godly to make it in vxed.
|-----------------------------------------------
|Instructions for use:
|-Bind in Guild Lobby next to Magus
|-Mem Songs as follows:
|---1.Selos
|---2,3,4,5.DOTS
|---6.Regen Song
|---8.Invulnerbility Song
|-Load your Inventory up with as many Healing Potion X as you can
-------------------------------------------------
|Load up the macro /mac vxed in guild lobby
|Type /echo You have entered Guild Lobby.
|Sit back and let the exp roll in
|------------------------------------------------
|PLUGINS REQUIRED - mq2moveutils, mq2twist, mq2warp
|------------------------------------------------
|----Events and Varibles Declared
#turbo 20
#Event GL "You have entered Guild Lobby."
#Event Barindu "You have entered Barindu, Hanging Gardens."
#Event Vxed "You have entered Vxed, The Crumbling Caverns."
#event GainExp "You gain#*#"
#event LoS "You cannot see your target."
#event OOR "Your target is out of range, get closer!"
#event Nedaria "You have entered Nedaria's Landing."
#event Natimbi "You have entered Natimbi, the Broken Shores."
#event Qinimi "You have entered Qinimi, Court of Nihilia."
#chat tell
#include Spell_Routines.inc
Sub Main
/declare t int outer 0
/declare loottotal int outer
/declare lootslot int outer
/declare lootleft int outer 0
/docrack nostun on
/declare X int outer
/declare Y int outer
/varset X 508.94
/varset Y -1258.81
/declare NakedTimer timer outer
/varset NakedTimer 600m
/declare Bellow int outer
/varset Bellow 0
/declare Kite int outer
/varset Kite 0
/declare PotionTimer timer outer
/varset PotionTimer 2m
/declare SeloSong int outer 1
:loopstart
/doevents
/if (${Me.AltAbilityReady[357]} && ${Target.Type.Equal[NPC]} && ${Bellow}==1) /alt act 199
/if (${NakedTimer}<=0) /call NakedTimerEvent
/if (${PotionTimer}<=0) /call PotionTimerEvent
/call GMcheck
/if (${Target.Level}>67) /tar npc next
|----------Summoning Mobs------------------------
/if (${Target.Name.Equal[misguided beludu Creque]}) {
/squelch /twist stop
/target npc next
/delay 30
/squelch /twist 2 3 4 5 6
}
/if (${Target.Name.Equal[a venomous stonemite]}) {
/squelch /twist stop
/target npc next
/delay 30
/squelch /twist 2 3 4 5 6
}
|----------End of summoning if/then's------------
/if (${Target.Distance}>500 && ${Kite}==1) /keypress esc
/if (${Target.ID}==FALSE && ${Kite}==1) /tar NPC radius 220
|----------Noob's Edits---(moving edit& selo's edit)-------
/if (!${Me.Moving} && (${Zone.ID}==290)) /nomodkey /keypress forward hold
/if ((${Me.Buff[${Me.Gem[${SeloSong}].Name}].Duration}<=5) && (${Zone.ID}==290)) {
/echo Selos about to die
/squelch /twist 1
/delay 1S
/nomodkey /keypress forward hold
/delay 1S
/nomodkey /keypress forward hold
/delay 1S
/nomodkey /keypress forward hold
/delay 1S
/nomodkey /keypress forward hold
/squelch /twist 2 3 4 5 6
}
|----------End of Edits
/delay 10
/goto :loopstart
/return
Sub GMcheck
/doevent
/if (${Spawn[gm].ID}) {
/mqlog Gm detected
/beep
/beep
/beep
/delay 20s
/alt act 212
/q
/endmac
}
/return
sub event_GL
/keypress back
/keypress back
/twist off
/varset Kite 0
/delay 2s
/varset Bellow 0
/circle off
/delay 1s
/dzremove Player1
/delay 1s
/dzremove Player2
/delay 1s
/dzremove player3
/delay 1s
/dzremove player4
/delay 1s
/dzremove player5
/delay 1s
/dzquit
/delay 1s
/load "spellset"
/delay 1m
/target magus
/delay 1s
/warp target
/delay 1s
/say nedaria
/return
sub event_GainExp
/squelch /stoptwist
/tar npc next
/delay 10
|-----Added venomous stonemite to summoning mobs in gainexp subroutine
/if (${Target.Name.Equal[misguided beludu Creque]}) {
/target npc next
/delay 30
}
/if (${Target.Name.Equal[a venomous stonemite]}) {
/target npc next
/delay 30
}
/squelch /twist 2 3 4 5 6
/return
Sub Event_Barindu
/keypress back
/keypress back
/delay 5s
/twist off
/delay 1s
/circle off
/itemnotify mainhand leftmouseup
/delay 1s
/if (${Cursor.ID}) {
/delay 1s
/call Expedition
} else {
/warp loc 481.93 -1266.57 -118.56
/call CorpseWatcher
/varset lootleft 0
}
}
/return
Sub Event_Vxed
/delay 1s
/autoinv
/keypress back
/keypress back
/varset NakedTimer 7000m
/varset Bellow 1
/delay 1
/varset Kite 1
/delay 10s
/twist 1
/delay 5s
/circle on 69 59.0321 -304.451
/delay 1s
/twist 8
/delay 4s
/warp loc 125 -300 447
|----Reduced # of songs twisted to compensate for lack of focus items
|----Also to break in the macro easily for 1st mob kill
/twist 1 2 3 4 6
/delay 1s
/return
Sub event_OOR
/target npc radius 100 next
/return
Sub event_LoS
/keypress esc
/return
Sub event_Nedaria
/keypress back
/keypress back
/doevent
/delay 5s
/target magus
/delay 1s
/warp target
/delay 1s
/say natimbi
/return
Sub event_Natimbi
/keypress back
/keypress back
/delay 1s
/warp loc 2060 110 550
/delay 1s
/face heading 90
/delay 1s
/keypress forward hold
/return
Sub event_qinimi
/keypress back
/keypress back
/delay 1s
/warp loc 580 348 -15
/keypress forward hold
/return
Sub Expedition
/keypress back
/keypress back
/doevent
/delay 5s
/twist off
/delay 1s
/target npc app
/delay 1s
/warp target
/delay 1s
/say Vxed
/delay 1s
/warp loc 481.93 -1266.57 -118.56
/delay 1s
/face fast nolook loc ${X}, ${Y}
/delay 60s
/keypress forward hold
/return
Sub CorpseWatcher
/keypress back
/keypress back
/target ${Me} corpse
/if (${Target.Type.Equal[corpse]}) /call Loot
/delay 1s
/if (!${Target.Type.Equal[Corpse]}) {
/varset NakedTimer 15m
}
/return
Sub NakedTimerEvent
/keypress back
/keypress back
/target ${Me} corpse
/if (${Target.Type.Equal[corpse]}) /call Loot
/if (!${Target.Type.Equal[Corpse]}) {
/varset NakedTimer 5m
}
/return
Sub Loot
:corpsepull
/target mycorpse
/delay 5 ${Target.CleanName.Equal[${Me}'s corpse]}
/if (${Target.CleanName.NotEqual[${Me}'s corpse]}) {
/echo No corpse in this zone
/return
}
/delay 3s
/corpse
/delay 1s ${Target.Distance}<20
/if (${Target.Distance}>20) {
/echo Corpse is too far away
/squelch /warp target
/return
}
/if (${Target.CleanName.Equal[${Me}'s corpse]}) {
/loot
} else {
/echo where did my corpse go?
/return
}
/delay 5s ${Me.State.Equal[BIND]}
/if (${Me.State.NotEqual[BIND]}) /goto :corpsepull
/varset loottotal 0
:LootLag
/if (${loottotal}!=${Corpse.Items}) {
/varset loottotal ${Corpse.Items}
/delay 1s
/goto :LootLag
}
/if (${loottotal}<=${lootleft}) {
/echo Looting aborted. Error in number items to be left on corpse.
/notify LootWnd DoneButton leftmouseup
/return
}
/varset loottotal ${Math.Calc[${Corpse.Items}-${lootleft}]}
/echo Looting all but ${lootleft} item(s)
/for lootslot 1 to ${loottotal}
:LootItem
/itemnotify loot${lootslot} rightmouseup
/delay 5 !${Corpse.Item[${lootslot}].ID}
/if (!${Corpse.Item[${lootslot}].ID}) {
/next lootslot
} else {
/goto :LootItem
}
/if (${Math.Calc[${Corpse.Items}-${lootleft}]}>0) /goto :LootLag
/notify LootWnd DoneButton leftmouseup
/echo Done looting.
/delay 1s
/call Expedition
/return
Sub Event_Chat(string ChatType,string Sender,string ChatText)
/mqlog ${ChatType}: ${Sender} tells you: ${ChatText}
/if (${ChatText.Equal["omgxp"]}) {
/delay 1s
/invite ${Sender}
}
/if (${ChatText.Equal["incxp"]}) {
/delay 1s
/dzadd ${Sender}
}
/if (${ChatText.Equal["camp"]}) {
/warp safe
/delay 1s
/warp succor
/keypress back
/delay 10
/circle off
/twist off
/camp desktop
}
/return
Sub PotionTimerEvent
/if (${Me.PctHPs}<=60 && ${Kite}==1 && !${PotionTimer}) {
/twist off
/delay 30
/call cast "Healing Potion X" item
/delay 30
/squelch /twist 2 3 4 5 6
}
/varset PotionTimer 2m
/return
Last edited:

