Follow along with the video below to see how to install our site as a web app on your home screen.
Note: This feature may not be available in some browsers.

Selo`s code FTW don't have to bother with /twist adjustRipSki said:VXED as requested.
I put selos Dot dot dot dot heal dont forget to update ini with /twist adjust # u prefer. I hear 9 or 13 are the best. I use 13 havent had selos pop off once soo...
letmein said:#event dzadd "personyouwanttoadd tells you, 'add me'
sub event_dzadd
/invite personyouwanttoadd
/delay 5s
/dzadd personyouwanttoadd
/return
|Insert this to you #event's
#Event dzadd "#1# tells you, 'dzaddmessage'"
|Just make sure you have doevents in your mainloop this is just an example
Sub Main
:loop
/doevents
/goto :loop
/return
| Add this anywhere in your macro as it's own sub
Sub Event_dzadd(string Line, string Sender)
/call checkFriend ${Sender}
/return
|Insert this sub as well
Sub checkFriend(string Sender)
/declare numFriends int local
/declare i int local
/varset numFriends ${Ini[Vxedfriendly.ini, Friendly, number]}
/for i 1 to ${numFriends}
/if (${Sender.Equal[${Ini[Vxedfriendly.ini, Friendly, Friend${i}]}]}) {
/tell ${Sender} You are my lova^^ wuwu
/dzadd ${Sender}
}
/next i
/return
[Friendly]
Number=3
Friend1=Tone
Friend2=Redbot
Friend3=Cade
Nobody luvs muh .ini but me eh ?
|I'd recommend going lil higher than 25%
Sub Main
/declare SafeHP int outer 35
/declare CapTimer timer outer 0
:loop
/if (${Me.PctHPs}<=${SafeHP} && ${Zone.ID}==290) /call RegenEvent
|For the AA
/if (${Me.AltAbilityReady[#]} && ${Zone.ID}==290 && ${Target.PctHPs}>50 && ${CapTimer}<=0) {
/alt act #
/varset CapTimer 15m
}
| I don't remember then # on Cacopany or whatever.
/goto :loop
Sub RegenEvent
/warp succor
/keypress back
/circle off
/twist 6
|or whatever gem you have the regen song in
/delay 4s
/sit
:hpcheck
/if (${Me.PctHPs}==100) /call Event_Vxed
/if (${Me.PctHPs}<=50) /potionbelt activate 1
/if (${Me.PctHPs}<100) /goto :hpcheck
/return
| 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'
#event invite "#*#invites you to join#*#"
#Event Zoned "#*#You have entered#*#"
Sub Main
/declare SafeHP int outer 30
/declare CapTimer timer outer 0
:loopstart
/doevents
/call GMcheck
/if (${Me.PctHPs}<=45) /potionbelt Activate 1
/if (${Me.PctHPs}<=60) /potionbelt Activate 2
/if (${Me.PctHP}<=${SafeHP} && ${Zone.ID}==290) /call RegenEvent
/if (${Target.Level}>67) {
/squelch /twist stop
/target npc next
/delay 30
/squelch /twist 5 1 2 3 4 8
}
/if (${Target.Name.Equal[a venomous stonemite]}) {
/squelch /twist stop
/target npc next
/delay 30
/squelch /twist 5 1 2 3 4 8
}
/if (${Target.Distance}>220) /tar npc radius 220
/if (${Target.ID}==FALSE) /tar npc radius 220
|For the AA
/if (${Me.AltAbilityReady[553]} && ${Zone.ID}==290 && ${Target.PctHP}<50 && ${CapTimer}<=0) {
/alt act 553
/varset CapTimer 15m
}
/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 desk
/endmac
/return
sub event_dzadd
/dzadd personyouwanttoadd
/return
sub event_invite
/invite
/return
sub Event_Vxed
/twist 7
/keypress 7
/keypress numlock
/return
Sub RegenEvent
/warp succor
/keypress back
/circle off
/twist 8
/delay 4s
/sit
:hpcheck
/if (${Me.PctHP}==100) /call Event_Vxed
/if (${Me.PctHP}<=50) /potionbelt activate 1
/if (${Me.PctHP}<100) /goto :hpcheck
/return
| 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'
#event invite "#*#invites you to join#*#"
#Event Zoned "#*#You have entered#*#"
Sub Main
/declare SafeHP int outer 42
/declare CapTimer timer outer 0
:loopstart
/doevents
/call GMcheck
/if (${Me.PctHPs}<=45) /potionbelt Activate 1
/if (${Me.PctHPs}<=60) /potionbelt Activate 2
/if (${Me.PctHPs}<=${SafeHP} && ${Zone.ID}==290) /call RegenEvent
/if (${Target.Level}>67) {
/squelch /twist stop
/target npc next
/delay 30
/squelch /twist 5 1 2 3 4 8
}
/if (${Target.Name.Equal[a venomous stonemite]}) {
/squelch /twist stop
/target npc next
/delay 30
/squelch /twist 5 1 2 3 4 8
}
/if (${Target.Distance}>220) /tar npc radius 220
/if (${Target.ID}==FALSE) /tar npc radius 220
|For the AA
/if (${Me.AltAbilityReady[553]} && ${Zone.ID}==290 && ${Target.PctHPs}>50 && ${Target.PctHPs}<98 && ${CapTimer}<=0) {
/alt act 553
/varset CapTimer 15m
}
/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 desk
/endmac
/return
sub event_dzadd
/dzadd personyouwanttoadd
/return
sub event_invite
/invite
/return
sub Event_Vxed
/twist 7
/face heading -110
/keypress 7
/keypress numlock
/return
Sub RegenEvent
/keypress 9
/keypress 9
/warp succor
/keypress back
/circle off
/twist 8
/delay 4s
/sit
:hpcheck
/if (${Me.PctHPs}==100) /call Event_Vxed
/if (${Me.PctHPs}<=50) /potionbelt activate 1
/if (${Me.PctHPs}<100) /goto :hpcheck
/return
Everything works fine i just need to add two checks.First is there a way to add a zonecheck? i've had warp go off in guildhall (which took me out of the map) wasn't sure which of the warp lines it was but just to be on the safe side made warp into its own sub, need to add like on the first line of warpstart only proceed if zone=Vxed or something like that.#turbo
#event Start "#*#You have entered Vxed, The Crumbling Caverns#*#"
#event guildlobby "#*#You have entered Guild Lobby#*#"
#event dzquit "#*#You have entered Barindu, Hanging Gardens#*#"
#Event dzadd "#1# tells you, 'dzaddmessage'"
Sub Main
/declare SeloSong int outer 1
/declare healsong int outer 2
/declare DefaultMaxSave int outer
/docrack nostun on
/docrack nosummon2 on
/varset DefaultMaxSave ${Ini[yafm.ini,Default,MaxSave,${NotFound}]}
/if (${DefaultMaxSave}==${NotFound}) {
/ini "yafm.ini" "Default" "MaxSave" "100"
/varset DefaultMaxSave 100
}
/return
:loopstart
/doevents
/doevents
/goto :loopstart
/return
Sub Start
/delay 3s
/twist off
/sit
/delay 1s
/stand
/call warpstart
:loopstart1
/if (${Me.PctHPs}<=56) /potionbelt Activate 1
/call healsong
/doevents
/call GMcheck
/if (${Me.PctHPs}<=40) /call succor
/if (${Me.Buff[${Me.Gem[${SeloSong}].Name}].Duration}<=4) /call selosub
/if (!${Target.ID}) /tar NPC radius 220
/IF (${Target.Name.Equal[misguided beludu Creque]}) {
/target npc next
/call NormalTwist
}
/IF (${Target.Name.Equal[a venemous stonemite]}) {
/target npc next
/call NormalTwist
}
/if (${Target.Level}>67) /tar npc next
/if (${Target.Distance}>220) /squelch /target clear
/if (${Me.AbilityReady[Forage]}) {
}
/doability forage
}
| If we successfully foraged something then take care of it.
/if (${Cursor.ID}) {
/call HandleItem
}
/goto :loopstart1
/return
Sub event_dzquit
/dzremove myMain
/dzremove Bard
/twist off
/sit
/delay 300s
/stand
/beep
/beep
/beep
/beep
/delay 15s
/target Apprentice Udranda
/warp target
/delay 2s
/say vxed
/delay 3s
/target stoneshifter
/warp target
/face heading 375
/look 0
/delay 30s
/keypress forward hold
/delay 40s
/target clear
/call start
/return
/sub warpstart
/face heading 272
/twist stop
/cast 8
/delay 6s
/face heading 272
/warp loc 132, -301, 446
/circle on 72
/keypress forward hold
/call normaltwist
Sub GMcheck
/if (${Spawn[gm].ID}) {
/mqlog GM Detected!!!
/echo Gm detected
/beep
/beep
/beep
/endmac
/unload
/q
}
/return
Sub NormalTwist
/squelch /twist 3 4 5 6
/varset healsong 0
/call healsong
/return
Sub healsong
/if (${healsong}==0) /if (${Me.PctHPs}<=95) {
/twist 2 3 4 5
/varset healsong 1
/return
}
/if (${healsong}==1) /if (${Me.PctHPs}>=96) {
/twist 3 4 5 6
/varset healsong 0
/return
}
/return
Sub selosub
/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
/call NormalTwist
/return
Sub succor
/warp succor
/circle off
/sit
/pause 1s
/stand
/delay 60
/if (${Me.PctHPs}>80) {
/call Warpstart
/return
}
/return
Sub Event_guildlobby
/echo sorry i don't know how or why but you died.
/tell JaimeMori I died!!!!!!!
/keypress forward
/circle off
/twist off
/beep
/beep
/beep
/beep
/beep
/beep
/sit on
/delay 45s
/camp desktop
/q
/endmacro
/return
Sub Event_dzadd(string Line, string Sender)
/call checkFriend ${Sender}
/return
Sub checkFriend(string Sender)
/declare numFriends int local
/declare i int local
/varset numFriends ${Ini[Vxedfriendly.ini, Friendly, number]}
/for i 1 to ${numFriends}
/if (${Sender.Equal[${Ini[Vxedfriendly.ini, Friendly, Friend${i}]}]}) {
/tell ${Sender} You are my lova^^ wuwu
/dzadd ${Sender}
}
/next i
/return
sub HandleItem
/declare ItemSetting int local
/declare NotFound int local
/declare ItemsHave int local
/varset NotFound -1
:LootIt
| Look up this item in yafm.ini
/varset ItemSetting ${Ini[yafm.ini,ForageList,${Cursor.Name},${NotFound}]}
/delay 5
| If the item isn't in the .ini file then add it.
/if (${ItemSetting}==${NotFound}) {
/ini "yafm.ini" "ForageList" "${Cursor.Name}" "${DefaultMaxSave}"
/varset ItemSetting ${DefaultMaxSave}
}
/varset ItemsHave ${FindItem=${Cursor.Name}}
| If we're keeping this item then stash it in our bags.
| Otherwise, just destroy it.
/if (${ItemSetting}>${ItemsHave}) {
/autoinventory
} else {
/destroy
}
/delay 5
/if (${Cursor.ID}) /goto :LootIt
/return
Tone said:Which version you using
| 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'
#event invite "#*#invites you to join#*#"
#Event Zoned "#*#You have entered#*#"
Sub Main
:loopstart
/doevents
/call GMcheck
/if (${Me.PctHPs}<=45) /potionbelt Activate 1
/if (${Me.PctHPs}<=60) /potionbelt Activate 2
/if (${Me.AltAbilityReady[361]} && ${Me.PctHPs}<=95) /alt act 361
/if (${Target.Level}>67) {
/squelch /twist stop
/target npc next
/delay 30
/squelch /twist 1 2 3 4 5 6
}
/if (${Target.Name.Equal[a venomous stonemite]}) {
/squelch /twist stop
/target npc next
/delay 30
/squelch /twist 1 2 3 4 5 6
}
/if (${Target.Distance}>220) /tar npc radius 220
/if (${Target.ID}==FALSE) /tar npc radius 220
/if (${Me.AltAbilityReady[199]} && ${Target.Type.Equal[NPC]}) /alt act 199
/if (${Me.AltAbilityReady[553]} && ${Target.Type.Equal[NPC]}) /alt act 553
/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 desk
/endmac
/return
sub event_dzadd
/dzadd personyouwanttoadd
/return
sub event_invite
/invite
/return
| 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'
#event invite "#*#invites you to join#*#"
#Event Zoned "#*#You have entered#*#"
Sub Main
:loopstart
/doevents
/call GMcheck
/if (${Me.PctHPs}<=45) /potionbelt Activate 1
/if (${Me.PctHPs}<=60) /potionbelt Activate 2
/if (${Target.Level}>67) {
/squelch /twist stop
/target npc next
/delay 30
/squelch /twist 7 1 2 3 4
}
/if (${Target.Name.Equal[a venomous stonemite]}) {
/squelch /twist stop
/target npc next
/delay 30
/squelch /twist 7 1 2 3 4
}
/if (${Target.Distance}>220) /tar npc radius 220
/if (${Target.ID}==FALSE) /tar npc radius 220
/delay 10
/call forage
/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 desk
/endmac
/return
sub event_dzadd
/dzadd personyouwanttoadd
/return
sub event_invite
/invite
/return
sub Forage
/varset DefaultMaxSave ${Ini[yafm.ini,Default,MaxSave,${NotFound}]}
/if (${DefaultMaxSave}==${NotFound}) {
/ini "yafm.ini" "Default" "MaxSave" "100"
/varset DefaultMaxSave 100
}
| Verify that we have the ability to forage.
/if (${Me.Skill[Forage]}==0) {
/echo You cannot forage, silly person!
/goto :Exit
}
| If we can forage then do so.
/if (${Me.AbilityReady[Forage]}) {
| Stand up. Can't forage while sitting.
/if (${Me.State.NotEqual[STAND]}) {
/stand
/delay 5
}
/doability forage
}
| If we successfully foraged something then take care of it.
/if (${Cursor.ID}) {
/call HandleItem
}
/return
sub HandleItem
/declare ItemSetting int local
/declare NotFound int local
/declare ItemsHave int local
/varset NotFound -1
:LootIt
| Look up this item in yafm.ini
/varset ItemSetting ${Ini[yafm.ini,ForageList,${Cursor.Name},${NotFound}]}
/delay 5
| If the item isn't in the .ini file then add it.
/if (${ItemSetting}==${NotFound}) {
/ini "yafm.ini" "ForageList" "${Cursor.Name}" "${DefaultMaxSave}"
/varset ItemSetting ${DefaultMaxSave}
}
/varset ItemsHave ${FindItem=${Cursor.Name}}
| If we're keeping this item then stash it in our bags.
| Otherwise, just destroy it.
/if (${ItemSetting}>${ItemsHave}) {
/autoinventory
} else {
/destroy
}
/delay 5
/if (${Cursor.ID}) /goto :LootIt
/return
mrtyler said:Ok what I did was just use the autoforage plugin, Dumb me... thats what they are there for 8)
