Overnight casting skills for BST using warder

Macro depository for macros written before the user variable changes that broke all of them.

Moderator: MacroQuest Developers

User avatar
Coraz
a lesser mummy
a lesser mummy
Posts: 41
Joined: Mon Sep 09, 2002 11:24 pm

Overnight casting skills for BST using warder

Post by Coraz » Tue Sep 10, 2002 6:30 pm

This is an altered ghettolized macro I butchered up and sewed together at random points, works well though. /macro it and make sure you have nothing (or your warder) targetted. You'll start casting spells (easily customizable) on your warder to up skills. VI coded it so warders poof every 5 hours (god knows why) so if at any time your target does not equal your warder, it will attempt to summon and target it. It will also attempt to spirtual light you every time you go lom (SL = clarity) and sit you to meditate until full mana, then repeat. You can remove that line if you're too low to use your spiritual lines. It also has a built in /call crap command for those pesky GMs. This is easily removable.

Don't pounce me for bad scripting grammar :/

Code: Select all

#define maxiskill v1 
Sub Main 
/varcalc maxiskill $char(level)*5+5 
:Begin 
   
   /if n $char(skill,alteration)<$maxiskill /cast 1
   /if n $char(skill,alteration)<$maxiskill /delay 35 
   /if n $char(skill,evocation)<$maxiskill /cast 2 
   /if n $char(skill,evocation)<$maxiskill /delay 50 
   /if n $char(skill,conjuration)<$maxiskill /cast 3 
   /if n $char(skill,conjuration)<$maxiskill /delay 42 
   /if n $char(skill,divination)<$maxiskill /cast 4
   /if n $char(skill,divination)<$maxiskill /delay 38
   /if n $char(skill,abjuration)<$maxiskill /cast 5
   /if n $char(skill,abjuration)<$maxiskill /delay 55
   /if $gm==TRUE /call Crap
   /if $target(name)!~"Warder" /call Warder   
   /if n $char(mana,pct)<25 /cast 6 /delay 75
   /if n $char(mana,pct)<10 /sit 
   /if n $char(mana,pct)<10 /call meditate 
   /if n $char(skill,alteration)<$maxiskill /goto :begin 
   /if n $char(skill,evocation)<$maxiskill /goto :begin 
   /if n $char(skill,conjuration)<$maxiskill /goto :begin 
   /if n $char(skill,divination)<$maxiskill /goto :begin 
   /if n $char(skill,abjuration)<$maxiskill /goto :begin
 
Sub Crap 
   /cleanup
   /reply 1 sec.. laggy 
   /sit 
   /mqlog
   /delay 80
   /q 


        /sit 
        /camp 
/return 

Sub Warder
    /press 4
    /delay 180
    /target pet
    /delay 10
/return

Sub meditate 
:rest 
   /delay 10 
   /if n $char(mana,pct)<100 /goto :rest 
   /stand 
/return 
Whee I did something constructive! /hug self

User avatar
rizwank
Huggle Police
Huggle Police
Posts: 524
Joined: Tue Jul 23, 2002 12:07 am
Contact:

Post by rizwank » Tue Sep 10, 2002 7:48 pm

that sig makes me cringe.. lose it please! ::cries::

powerspike
a ghoul
a ghoul
Posts: 80
Joined: Sun Aug 11, 2002 11:40 pm
Location: Australia
Contact:

Post by powerspike » Tue Sep 10, 2002 9:35 pm

VI coded it so warders poof every 5 hours (god knows why) so if at any time your target does not equal your warder
Vi at one stage stated that there are perminate buffs in the game (warder is a buff ;) ) because it cause corruption in there databases for some reason, so "perm buffs" usally wear off after 5-10 hours or so
One for the Road guys, what's the worst that could happen......

LOADING, PLEASE WAIT ....

User avatar
Coraz
a lesser mummy
a lesser mummy
Posts: 41
Joined: Mon Sep 09, 2002 11:24 pm

Post by Coraz » Tue Sep 10, 2002 9:44 pm

Narr!

Only for riz, because his avatar is so vexing.. /sig nerf on

Don't think I wont whip it out when you get out of line :twisted:

Not.. not that.. whip... sicko..

User avatar
rizwank
Huggle Police
Huggle Police
Posts: 524
Joined: Tue Jul 23, 2002 12:07 am
Contact:

Post by rizwank » Tue Sep 10, 2002 11:39 pm

Coraz

Jack Benny


You can put it back up when I get my accts unbanned.