#event NeedTarget "You must first select a target for this spell!"
#event NeedTarget2 "Your target is out of range, get closer!"
#event seetarget "You cannot see your target."
#event targetid "#*#has worn off#*#"
#event exp "You gain experience!!"
#event camp_check "#*#Camp Check#*#"
|change the resisted line to whatever song you use for snare
#event replay "You target resisted the Largo#*#"
Sub Main(String Selos, String Dirge, String Bellows)
/declare slowsong int outer 0
/declare healsong int outer 0
/declare SeloSong int outer 8
/declare DirgeSong int outer 7
/declare BellowSong int outer 6
/declare Bellowtimer int outer 300
/declare targetammount int outer
/declare PrevSong int outer 0
/declare snarepct int outer (snare % here)
/echo Selo's: ${Me.Gem[${SeloSong}].Name}
:MainLoop
/doevents
/nomodkey /keypress forward hold
/if (${Target.PctHPs}<=${snarepct}) /if (${slowsong}==0) {
/twist 7 2 3 4
/varset slowsong 1
}
/call selosong
|uncomment the lines below if you want to use
| denon's desperate dirge or Brusco's Bombastic Bellow
|/call dirgesong
|/call bellowsong
/call healsong
/delay 1S
/nomodkey /keypress forward hold
/varcalc Bellowtimer ${Bellowtimer}+1
/goto :MainLoop
/return
Sub Event_replay
/squelch /twist (snare and then other 3 songs, this is in case the largo's binding fails)
/return
Sub Event_NeedTarget
/if (!${Target.ID}) /squelch /target npc radius 100
/return
Sub Event_EXP
/twist (runsong)
/squelch /target npc radius 100
/if (${Target.ID}) {
/twist (normal twist)
/return
} else {
/twist (runsong)
/goto :looting
}
:looting
/look
/target valorian npc radius 100
/if (${Target.ID}) {
/twist (normal twist)
/varset healsong 0
/return
}
/target npc corpse radius 100
/if (!${Target.ID}) {
/circle on (radius and coords)
/return
}
/if (${Target.ID}) {
/circle off
/call LootMob
/goto :looting
}
/return
Sub Event_NeedTarget2
/squelch /target npc radius 100
/return
Sub Event_seetarget
/varcalc targetammount ${targetammount}+1
/if (${targetammount}>=10) {
/squelch /target npc radius 100
/varset targetammount 0
/return
}
/return
Sub Event_targetid
/varset targetammount 0
/return
sub selosong
/if (${SeloSong}) /if (${Me.Buff[${Me.Gem[${SeloSong}].Name}].Duration}<=6) {
/echo Selos about to die
/twist 8
/delay 1S
/nomodkey /keypress forward hold
/delay 1S
/nomodkey /keypress forward hold
/delay 1S
/nomodkey /keypress forward hold
/delay 1S
/nomodkey /keypress forward hold
/if (${slowsong}==1) /twist (slow + normal twist (pref max 4))
/if (${slowsong}==0) /twist (normal twist)
/nomodkey /keypress forward hold
/varcalc Bellowtimer ${Bellowtimer}+8
/varset PrevSong 0
/doevents
/return
}
/return
sub dirgesong
/if (${Me.CurrentMana}>=880) {
/echo dirge
/twist (desperate dirge song if you want to use it)
/varset slowsong 0
/delay 1S
/nomodkey /keypress forward hold
/delay 1S
/nomodkey /keypress forward hold
/delay 1S
/nomodkey /keypress forward hold
/delay 1S
/nomodkey /keypress forward hold
/twist (normal twist)
/varcalc Bellowtimer ${Bellowtimer}+8
/doevents
/return
}
/return
sub bellowsong
/if (${Bellowtimer}>=300) {
/echo bellows
/stopsong
/cast 6
/delay 1S
/nomodkey /keypress forward hold
/delay 1S
/nomodkey /keypress forward hold
/delay 1S
/nomodkey /keypress forward hold
/delay 1S
/nomodkey /keypress forward hold
/delay 1S
/nomodkey /keypress forward hold
/delay 1S
/nomodkey /keypress forward hold
/delay 1S
/nomodkey /keypress forward hold
/delay 1S
/nomodkey /keypress forward hold
/varset Bellowtimer 0
/doevents
/return
}
/return
Sub healsong
/if (${healsong}==0) /if (${Me.PctHPs}<=95) /if (${slowsong}==0) {
/twist (normal twist plus a heal song)
/varset healsong 1
/return
}
/if (${healsong}==0) /if (${Me.PctHPs}<=95) /if (${slowsong}==1) {
/twist (slow twist and change a dot into healsong)
/varset healsong 1
/return
}
/if (${healsong}==1) /if (${Me.PctHPs}>=96) /if (${slowsong}==0) {
/twist (normal twist)
/varset healsong 0
/return
}
/if (${healsong}==1) /if (${Me.PctHPs}>=96) /if (${slowsong}==1) {
/twist (slow twist)
/varset healsong 0
/return
}
/return
Sub LootMob
/declare LootChance int inner 0
/declare LootSlot int inner 0
/declare LootCheck int inner 0
/declare LootTotal int inner 0
/face fast
/keypress forward
/keypress back
/stick 5
|/delay 5s
:Distance
/if (${Target.Distance}<=10) {
/stick off
/loot
} else {
/goto :Distance
}
/stick off
/loot
/delay 1s
/if (!${Corpse.Items}) {
/echo NO LOOT! Cheap Bastard!
/shift /notify InventoryWindow IW_Money1 leftmouseup
/destroy
/shift /notify InventoryWindow IW_Money2 leftmouseup
/destroy
/shift /notify InventoryWindow IW_Money3 leftmouseup
/destroy
/notify LootWnd DoneButton leftmouseup
/cleanup
/return
}
/varset LootTotal ${Corpse.Items}
/for LootSlot 1 to ${LootTotal}
/itemnotify loot${LootSlot} leftmouseup
/delay 5
/echo Keeping a ${Cursor.Name}... WOOT!
/autoinventory
/delay 5
/next LootSlot
/shift /notify InventoryWindow IW_Money1 leftmouseup
/destroy
/shift /notify InventoryWindow IW_Money2 leftmouseup
/destroy
/shift /notify InventoryWindow IW_Money3 leftmouseup
/destroy
/notify LootWnd DoneButton leftmouseup
/cleanup
/return
Sub event_camp_check
/ooc BC
/return
