Trigger/Delayed Output?

Posted by Elric on Fri 07 Dec 2001 11:36 PM — 22 posts, 74,620 views.

USA #0
I was wondering if there was a way to pause between casting. Like after you cast the first two spells. If you could pause for 4 seconds, then continue casting. This way your client could catch up with the server.

Trigger: * says 'spellup'

Send:
,is now casting on %1
c 'kindred strength' %1
<Pause here for 2 seconds>
c 'elven beauty' %1
<Pause here for 2 seconds>
c 'trollish vigor' %1
<Pause here for 2 seconds>
c 'valiance' %1
<Pause here for 2 seconds>
c 'fly' %1
,revs up the Turbo-Trancer 2000
,enters Turbo-Trance 1 of 2
<Pause here for 2 seconds>
trance
,enters Turbo-Trance 2 of 2
smile %1
<Pause here for 2 seconds>
,begins casting once more
c 'iceshield' %1
<Pause here for 2 seconds>
c 'fireshield' %1
<Pause here for 2 seconds>
c 'dragon wit' %1
<Pause here for 2 seconds>
c 'slink' %1
<Pause here for 2 seconds>
c 'sagacity' %1
<Pause here for 2 seconds>
,looks about for others to cast on!

Can that be done?
Denmark #1
Following script is in VBScript, use at own risk




sub SD-spellup (strTriggerName, trig_line, arrWildCards)
' This subroutine is written in Visual Basic scripting for Mushclient
' to install type: /sd-spellup "Install" "" ""
' Use however you like, modify at own risk
' SD in all triggernames are used to ID the writter of this script
' Storm Dragon of Gammon Software Solutions forum at : www.mushclient.com

 select case ucase(strtriggername)
  case "INSTALL"
   world.addtrigger "SD-spelluptrigger", "* says 'spellup'", "", 1, -1, 0, "", "SD-spellup"
  case "SD-SPELLUPTRIGGER"
   world.setvariable "SD-Person", arrWildCards(1)
   world.addtrigger "SD-TooLate", "* says 'spellup'", "", 1, -1, 0, "", "SD-spellup"
   world.addtimer "SD-Commence-1", 0, 0, 1, "", 5, "SD-spellup"
  case "SD-TOOLATE"
   world.send "say Sorry " + arrwildcards(1) + " but I am already casting spells on " + world.getvariable("SD-Person") + " please be patient"
  case "SD-COMMENCE-1"
   world.send ",is now casting on " + world.getvariable("SD-PERSON")
   world.send "cast 'kindred strength' " + world.getvariable("SD-PERSON")
   world.addtimer "SD-Commence-2", 0, 0, 2, "", 5, "SD-spellup"
  case "SD-COMMENCE-2"
   world.send "cast 'elven beauty' " + world.getvariable("SD-PERSON")
   world.addtimer "SD-Commence-3", 0, 0, 2, "", 5, "SD-spellup"
  case "SD-COMMENCE-3"
   world.send "cast 'trollish vigor' " + world.getvariable("SD-PERSON")
   world.addtimer "SD-Commence-4", 0, 0, 2, "", 5, "SD-spellup"
  case "SD-COMMENCE-4"
   world.send "cast 'valiance' " + world.getvariable("SD-PERSON")
   world.addtimer "SD-Commence-5", 0, 0, 2, "", 5, "SD-spellup"
  case "SD-COMMENCE-5"
   world.send "cast 'fly' " + world.getvariable("SD-PERSON")
   world.send ",revs up the Turbo-Trancer 2000"
   world.send ",enters Turbo-Trance 1 of 2"
   world.addtimer "SD-Commence-6", 0, 0, 2, "", 5, "SD-spellup"
  case "SD-COMMENCE-6"
   world.send "trance"
   world.send ",enters Turbo-Trance 2 of 2"
   world.send "smile " + world.getvariable("SD-PERSON")
   world.addtimer "SD-Commence-7", 0, 0, 2, "", 5, "SD-spellup"
  case "SD-COMMENCE-7"
   world.send ",begins casting once more"
   world.send "cast 'iceshield' " + world.getvariable("SD-PERSON")
   world.addtimer "SD-Commence-8", 0, 0, 2, "", 5, "SD-spellup"
  case "SD-COMMENCE-8"
   world.send "cast 'fireshield' " + world.getvariable("SD-PERSON")
   world.addtimer "SD-Commence-9", 0, 0, 2, "", 5, "SD-spellup"
  case "SD-COMMENCE-9"
   world.send "cast 'fireshield' " + world.getvariable("SD-PERSON")
   world.addtimer "SD-Commence-10", 0, 0, 2, "", 5, "SD-spellup"
  case "SD-COMMENCE-10"
   world.send "cast 'fireshield' " + world.getvariable("SD-PERSON")
   world.addtimer "SD-Commence-11", 0, 0, 2, "", 5, "SD-spellup"
  case "SD-COMMENCE-11"
   world.send "cast 'dragon wit' " + world.getvariable("SD-PERSON")
   world.addtimer "SD-Commence-12", 0, 0, 2, "", 5, "SD-spellup"
  case "SD-COMMENCE-12"
   world.send "cast 'slink' " + world.getvariable("SD-PERSON")
   world.addtimer "SD-Commence-13", 0, 0, 2, "", 5, "SD-spellup"
  case "SD-COMMENCE-13"
   world.send "cast 'sagacity' " + world.getvariable("SD-PERSON")
   world.addtimer "SD-Commence-14", 0, 0, 2, "", 5, "SD-spellup"
  case "SD-COMMENCE-14"
   world.note "Done! Target has been spelled up!"
   world.send ",looks about for others to cast on!"
   world.deletetrigger "SD-TOOLATE"
   world.addtrigger "SD-spelluptrigger", "* says 'spellup'", "", 1, -1, 0, "", "SD-spellup"
  case else
   world.note "Incorrect usage, please read the comments of this subroutine"
 end select
end sub


Ooops! <:)

I had accidentally swapped the way world.getvariable() and world.setvariable looked..
I have fixed the above script, so it should now be correct
study it for a while to learn how things look and simply change to fit your 'bots'
Amended on Tue 25 Dec 2001 05:48 PM by Storm Dragon
Australia Forum Administrator #2
You can save a bit of work by using "one-shot" timers, by using flag 4. The timer deletes itself after firing, thus removing the need for the "deletetimer" lines.

These flags are additive, so instead of using 1 (as you currently are) use 5 (1 + 4).
USA #3
Erm.. The above script needs a little bit of work.. I decided to try it and I got a bunkload of errors.. Nick, you were talking about one-shot timers or something? Could you take the above and clean it up?

I would like to use this and make other spelltriggers with it if you can..

This way I can create a kludged together spellbot script for MUSHClient, since all the ones that I got were for zMUD.
Denmark #4
Earlier post had loads of errors, I have edited and fixed them all I believe.

Oh, and thanks Nick, I dont think I noticed that you could make one-shot timers, can this be done with triggers too?
Amended on Tue 25 Dec 2001 06:03 PM by Storm Dragon
USA #5
Thanks mate.. This should work fine.. I am going to try it now..
USA #6
Error number: -2146827283
Event: Execution of line 23 column 7
Description: Expected '('
Called by: Immediate execution
Australia Forum Administrator #7
Quote:

Oh, and thanks Nick, I dont think I noticed that you could make one-shot timers, can this be done with triggers too?


No, the one-shot timers were for a single event (ie. do something in 5 seconds, not every 5 seconds).

I suppose a trigger could delete itself in a script, I'm not sure how successful that would be. ;)
Denmark #8
Ok.. I tried loading the script into my copy of MC, no errors at all.. Make sure you erase the old and get every line I wrote when you copy it over in your scriptfile
USA #9
sub PromptParse (strTriggerName, trig_line, arrWildCards)
  select case lcase(StrTriggerName)
    case "install"
      world.addtrigger "SendPrompt", "(*/*hp|*m|*mv)(*)<* coins>(#*)", "", 1, -1, 0, "", "PromptParse"
    case "sendprompt"             '    1 2   3  4    5  6         7  - These are the wildcards
      world.setvariable "CurrentHP", cint(arrWildCards(1))
      world.setvariable "MaxHP", cint(arrWildCards(2))
      world.setvariable "CurrentMana", cint(arrWildCards(3))
      world.setvariable "CurrentVitality", cint(arrWildCards(4))
      world.setvariable "CurrentCoins", arrWildCards(6)
    case else
  end select
' Below this line we can insert the subroutines that have to be checked everytime a prompt shows up.
  call ManaCheck
end sub

sub ManaCheck
  if world.getvariable("CurrentMana") <= world.getvariable("MinMana") then
    world.send "Restore Self"
  end if
end sub

sub SD-spellup (strTriggerName, trig_line, arrWildCards)
' This subroutine is written in Visual Basic scripting for Mushclient
' to install type: /sd-spellup "Install" "" ""
' Use however you like, modify at own risk
' SD in all triggernames are used to ID the writter of this script
' Storm Dragon of Gammon Software Solutions forum at : www.mushclient.com

 select case ucase(strtriggername)
  case "INSTALL"
   world.addtrigger "SD-spelluptrigger", "* says 'spellup'", "", 1, -1, 0, "", "SD-spellup"
  case "SD-SPELLUPTRIGGER"
   world.setvariable "SD-Person", arrWildCards(1)
   world.addtrigger "SD-TooLate", "* says 'spellup'", "", 1, -1, 0, "", "SD-spellup"
   world.addtimer "SD-Commence-1", 0, 0, 1, "", 5, "SD-spellup"
  case "SD-TOOLATE"
   world.send "say Sorry " + arrwildcards(1) + " but I am already casting spells on " + world.getvariable("SD-Person") + " please be patient"
  case "SD-COMMENCE-1"
   world.send ",is now casting on " + world.getvariable("SD-PERSON")
   world.send "cast 'kindred strength' " + world.getvariable("SD-PERSON")
   world.addtimer "SD-Commence-2", 0, 0, 2, "", 5, "SD-spellup"
  case "SD-COMMENCE-2"
   world.send "cast 'elven beauty' " + world.getvariable("SD-PERSON")
   world.addtimer "SD-Commence-3", 0, 0, 2, "", 5, "SD-spellup"
  case "SD-COMMENCE-3"
   world.send "cast 'trollish vigor' " + world.getvariable("SD-PERSON")
   world.addtimer "SD-Commence-4", 0, 0, 2, "", 5, "SD-spellup"
  case "SD-COMMENCE-4"
   world.send "cast 'valiance' " + world.getvariable("SD-PERSON")
   world.addtimer "SD-Commence-5", 0, 0, 2, "", 5, "SD-spellup"
  case "SD-COMMENCE-5"
   world.send "cast 'fly' " + world.getvariable("SD-PERSON")
   world.send ",revs up the Turbo-Trancer 2000"
   world.send ",enters Turbo-Trance 1 of 2"
   world.addtimer "SD-Commence-6", 0, 0, 2, "", 5, "SD-spellup"
  case "SD-COMMENCE-6"
   world.send "trance"
   world.send ",enters Turbo-Trance 2 of 2"
   world.send "smile " + world.getvariable("SD-PERSON")
   world.addtimer "SD-Commence-7", 0, 0, 2, "", 5, "SD-spellup"
  case "SD-COMMENCE-7"
   world.send ",begins casting once more"
   world.send "cast 'iceshield' " + world.getvariable("SD-PERSON")
   world.addtimer "SD-Commence-8", 0, 0, 2, "", 5, "SD-spellup"
  case "SD-COMMENCE-8"
   world.send "cast 'fireshield' " + world.getvariable("SD-PERSON")
   world.addtimer "SD-Commence-9", 0, 0, 2, "", 5, "SD-spellup"
  case "SD-COMMENCE-9"
   world.send "cast 'fireshield' " + world.getvariable("SD-PERSON")
   world.addtimer "SD-Commence-10", 0, 0, 2, "", 5, "SD-spellup"
  case "SD-COMMENCE-10"
   world.send "cast 'fireshield' " + world.getvariable("SD-PERSON")
   world.addtimer "SD-Commence-11", 0, 0, 2, "", 5, "SD-spellup"
  case "SD-COMMENCE-11"
   world.send "cast 'dragon wit' " + world.getvariable("SD-PERSON")
   world.addtimer "SD-Commence-12", 0, 0, 2, "", 5, "SD-spellup"
  case "SD-COMMENCE-12"
   world.send "cast 'slink' " + world.getvariable("SD-PERSON")
   world.addtimer "SD-Commence-13", 0, 0, 2, "", 5, "SD-spellup"
  case "SD-COMMENCE-13"
   world.send "cast 'sagacity' " + world.getvariable("SD-PERSON")
   world.addtimer "SD-Commence-14", 0, 0, 2, "", 5, "SD-spellup"
  case "SD-COMMENCE-14"
   world.note "Done! Target has been spelled up!"
   world.send ",looks about for others to cast on!"
   world.deletetrigger "SD-TOOLATE"
   world.addtrigger "SD-spelluptrigger", "* says 'spellup'", "", 1, -1, 0, "", "SD-spellup"
  case else
   world.note "Incorrect usage, please read the comments of this subroutine"
 end select
end sub


The above is all the code I have in the script file.. That's it.. All of it.. And I still get the error that I got above^^.. Just by letting MC rehash the config script, before I even type the install part.. Any idea?
Australia Forum Administrator #10
The forum replaces backslashes in some cases (see "what are forum codes?") when you paste.

If you have forum codes turned on you (the person posting) might want to set:

[ to \[
] to \]
\ to \\

Then the posted code should come out exactly.
Amended on Wed 26 Dec 2001 09:11 PM by Nick Gammon
USA #11
Storm Dragon, did you do that? Because what I copied is what is there. I have to know if you did, because since I don't know one thing about VBScript, I am going to have to try to bumble my way through the code and attempt to make those change. Or you can repost it with the corrections so I don't waste days and not learn anything.
Denmark #12
sub PromptParse (strTriggerName, trig_line, arrWildCards)
  select case lcase(StrTriggerName)
    case "install"
      world.addtrigger "SendPrompt", "(*/*hp|*m|*mv)(*)<* coins>(#*)", "", 1, -1, 0, "", "PromptParse"
    case "sendprompt"             '    1 2   3  4    5  6         7  - These are the wildcards
      world.setvariable "CurrentHP", cint(arrWildCards(1))
      world.setvariable "MaxHP", cint(arrWildCards(2))
      world.setvariable "CurrentMana", cint(arrWildCards(3))
      world.setvariable "CurrentVitality", cint(arrWildCards(4))
      world.setvariable "CurrentCoins", arrWildCards(6)
    case else
  end select
' Below this line we can insert the subroutines that have to be checked everytime a prompt shows up.
  call ManaCheck
end sub

sub ManaCheck
  if world.getvariable("CurrentMana") <= world.getvariable("MinMana") then
    world.send "Restore Self"
  end if
end sub

sub SDspellup (strTriggerName, trig_line, arrWildCards)
' This subroutine is written in Visual Basic scripting for Mushclient
' to install type: /SDspellup "Install" "" ""
' Use however you like, modify at own risk
' SD in all triggernames are used to ID the writter of this script
' Storm Dragon of Gammon Software Solutions forum at : www.mushclient.com

 select case ucase(strtriggername)
  case "INSTALL"
   world.addtrigger "SDspelluptrigger", "* says 'spellup'", "", 1, -1, 0, "", "SDspellup"
  case "SDSPELLUPTRIGGER"
   world.setvariable "SD-Person", arrWildCards(1)
   world.addtrigger "SD-TooLate", "* says 'spellup'", "", 1, -1, 0, "", "SDspellup"
   world.addtimer "SD-Commence-1", 0, 0, 1, "", 5, "SDspellup"
  case "SD-TOOLATE"
   world.send "say Sorry " + arrwildcards(1) + " but I am already casting spells on " + world.getvariable("SD-Person") + " please be patient"
  case "SD-COMMENCE-1"
   world.send ",is now casting on " + world.getvariable("SD-PERSON")
   world.send "cast 'kindred strength' " + world.getvariable("SD-PERSON")
   world.addtimer "SD-Commence-2", 0, 0, 2, "", 5, "SDspellup"
  case "SD-COMMENCE-2"
   world.send "cast 'elven beauty' " + world.getvariable("SD-PERSON")
   world.addtimer "SD-Commence-3", 0, 0, 2, "", 5, "SDspellup"
  case "SD-COMMENCE-3"
   world.send "cast 'trollish vigor' " + world.getvariable("SD-PERSON")
   world.addtimer "SD-Commence-4", 0, 0, 2, "", 5, "SDspellup"
  case "SD-COMMENCE-4"
   world.send "cast 'valiance' " + world.getvariable("SD-PERSON")
   world.addtimer "SD-Commence-5", 0, 0, 2, "", 5, "SDspellup"
  case "SD-COMMENCE-5"
   world.send "cast 'fly' " + world.getvariable("SD-PERSON")
   world.send ",revs up the Turbo-Trancer 2000"
   world.send ",enters Turbo-Trance 1 of 2"
   world.addtimer "SD-Commence-6", 0, 0, 2, "", 5, "SDspellup"
  case "SD-COMMENCE-6"
   world.send "trance"
   world.send ",enters Turbo-Trance 2 of 2"
   world.send "smile " + world.getvariable("SD-PERSON")
   world.addtimer "SD-Commence-7", 0, 0, 2, "", 5, "SDspellup"
  case "SD-COMMENCE-7"
   world.send ",begins casting once more"
   world.send "cast 'iceshield' " + world.getvariable("SD-PERSON")
   world.addtimer "SD-Commence-8", 0, 0, 2, "", 5, "SDspellup"
  case "SD-COMMENCE-8"
   world.send "cast 'fireshield' " + world.getvariable("SD-PERSON")
   world.addtimer "SD-Commence-9", 0, 0, 2, "", 5, "SDspellup"
  case "SD-COMMENCE-9"
   world.send "cast 'fireshield' " + world.getvariable("SD-PERSON")
   world.addtimer "SD-Commence-10", 0, 0, 2, "", 5, "SDspellup"
  case "SD-COMMENCE-10"
   world.send "cast 'fireshield' " + world.getvariable("SD-PERSON")
   world.addtimer "SD-Commence-11", 0, 0, 2, "", 5, "SDspellup"
  case "SD-COMMENCE-11"
   world.send "cast 'dragon wit' " + world.getvariable("SD-PERSON")
   world.addtimer "SD-Commence-12", 0, 0, 2, "", 5, "SDspellup"
  case "SD-COMMENCE-12"
   world.send "cast 'slink' " + world.getvariable("SD-PERSON")
   world.addtimer "SD-Commence-13", 0, 0, 2, "", 5, "SDspellup"
  case "SD-COMMENCE-13"
   world.send "cast 'sagacity' " + world.getvariable("SD-PERSON")
   world.addtimer "SD-Commence-14", 0, 0, 2, "", 5, "SDspellup"
  case "SD-COMMENCE-14"
   world.note "Done! Target has been spelled up!"
   world.send ",looks about for others to cast on!"
   world.deletetrigger "SD-TOOLATE"
   world.addtrigger "SDspelluptrigger", "* says 'spellup'", "", 1, -1, 0, "", "SDspellup"
  case else
   world.note "Incorrect usage, please read the comments of this subroutine"
 end select
end sub


ok I found the error, I was not aware that you cant use '-' in sub names, dumb me, but now I know and I will not make that
mistake again
when you install this you better run the install part again
just to be sure that everything will work.
Amended on Wed 02 Jan 2002 03:47 PM by Storm Dragon
USA #13
Well the script parsed just fine when I had MUSHClient reload it.. But when I redid the install I got this error..

Error number: -2146827263
Event: Execution of line 1 column 21
Description: Expected end of statement
Called by: Immediate execution
Australia Forum Administrator #14
I would have thought the install line would need commas, eg.



/SDspellup "Install", "", ""
Denmark #15
You are quite right Nick
I seem to keep making mistakes in this thread
but it is a learning experience ;)
USA #16
LoL.. Well then I am happy that I started this thread however long ago that I did.. Hehe.. But it seems that after adding the commas I had a perfect experience.. And it works great.. Thanks mate.
USA #17
Ugh.. Scratch that.. It doesn't work perfect.. It just installs perfectly.. Lmao.. I had someone test it and I still got the note "Incorrect usage, please read the comments of this subroutine"... And that is after a real person, not invis, entirely normal, says "spellup"
Denmark #18
LOL - Oh well one minor fix.. my 'replace all' seemed to mess up one of the cases

change:
  case "SDspellupTRIGGER"

to:
  case "SDSPELLUPTRIGGER"


the select case checks on uppercase characters only so it never evaluates the before as true.. no need to install after this change. :)
USA #19
Leetle problem again.. I changed that.. But now when someone says spellup, there is nothing.. I mean it.. Not one thing.. Lmao.. Any ideas now?
Denmark #20
Replace your entire scriptfile with the one below
I've tested it and it works perfectly.

sub PromptParse (strTriggerName, trig_line, arrWildCards)
  select case lcase(StrTriggerName)
    case "install"
      world.addtrigger "SendPrompt", "(*/*hp|*m|*mv)(*)<* coins>(#*)", "", 1, -1, 0, "", "PromptParse"
    case "sendprompt"             '    1 2   3  4    5  6         7  - These are the wildcards
      world.setvariable "CurrentHP", cint(arrWildCards(1))
      world.setvariable "MaxHP", cint(arrWildCards(2))
      world.setvariable "CurrentMana", cint(arrWildCards(3))
      world.setvariable "CurrentVitality", cint(arrWildCards(4))
      world.setvariable "CurrentCoins", arrWildCards(6)
    case else
  end select
' Below this line we can insert the subroutines that have to be checked everytime a prompt shows up.
  call ManaCheck
end sub

sub ManaCheck
  if world.getvariable("CurrentMana") <= world.getvariable("MinMana") then
    world.send "Restore Self"
  end if
end sub

sub SDspellup (strTriggerName, trig_line, arrWildCards)
' This subroutine is written in Visual Basic scripting for Mushclient
' to install type: /SDspellup "Install", "", ""
' Use however you like, modify at own risk
' SD in all triggernames are used to ID the writter of this script
' Storm Dragon of Gammon Software Solutions forum at : www.mushclient.com

 select case ucase(strTriggerName)
  case "INSTALL"
   world.addtrigger "SDspelluptrigger", "* says 'spellup'", "", 17, -1, 0, "", "SDspellup"
   world.note "Script installed, it should work properly"
  case "SDSPELLUPTRIGGER"
   world.setvariable "SDPerson", arrWildCards(1)
   world.addtrigger "SDTOOLATE", "* says 'spellup'", "", 17, -1, 0, "", "SDspellup"
   world.addtimer "SDCOMMENCE1", 0, 0, 1, "", 5, "SDspellup1"
  case "SDTOOLATE"
   world.send "say Sorry " + arrwildcards(1) + " but I am already casting spells on " + world.getvariable("SDPerson") + " please be patient"
  case else
   world.note "Incorrect usage, please read the comments of this subroutine"
 end select
end sub

sub SDspellup1(StrTriggerName)
 select case ucase(StrTriggerName)
  case "SDCOMMENCE1"
   world.send ",is now casting on " + world.getvariable("SDPERSON")
   world.send "cast 'kindred strength' " + world.getvariable("SDPERSON")
   world.addtimer "SDCOMMENCE2", 0, 0, 2, "", 5, "SDspellup1"
  case "SDCOMMENCE2"
   world.send "cast 'elven beauty' " + world.getvariable("SDPERSON")
   world.addtimer "SDCOMMENCE3", 0, 0, 2, "", 5, "SDspellup1"
  case "SDCOMMENCE3"
   world.send "cast 'trollish vigor' " + world.getvariable("SDPERSON")
   world.addtimer "SDCOMMENCE4", 0, 0, 2, "", 5, "SDspellup1"
  case "SDCOMMENCE4"
   world.send "cast 'valiance' " + world.getvariable("SDPERSON")
   world.addtimer "SDCOMMENCE5", 0, 0, 2, "", 5, "SDspellup1"
  case "SDCOMMENCE5"
   world.send "cast 'fly' " + world.getvariable("SDPERSON")
   world.send ",revs up the Turbo-Trancer 2000"
   world.send ",enters Turbo-Trance 1 of 2"
   world.addtimer "SDCOMMENCE6", 0, 0, 2, "", 5, "SDspellup1"
  case "SDCOMMENCE6"
   world.send "trance"
   world.send ",enters Turbo-Trance 2 of 2"
   world.send "smile " + world.getvariable("SDPERSON")
   world.addtimer "SDCOMMENCE7", 0, 0, 2, "", 5, "SDspellup1"
  case "SDCOMMENCE7"
   world.send ",begins casting once more"
   world.send "cast 'iceshield' " + world.getvariable("SDPERSON")
   world.addtimer "SDCOMMENCE8", 0, 0, 2, "", 5, "SDspellup1"
  case "SDCOMMENCE8"
   world.send "cast 'fireshield' " + world.getvariable("SDPERSON")
   world.addtimer "SDCOMMENCE9", 0, 0, 2, "", 5, "SDspellup1"
  case "SDCOMMENCE9"
   world.send "cast 'fireshield' " + world.getvariable("SDPERSON")
   world.addtimer "SDCOMMENCE10", 0, 0, 2, "", 5, "SDspellup1"
  case "SDCOMMENCE10"
   world.send "cast 'fireshield' " + world.getvariable("SDPERSON")
   world.addtimer "SDCOMMENCE11", 0, 0, 2, "", 5, "SDspellup1"
  case "SDCOMMENCE11"
   world.send "cast 'dragon wit' " + world.getvariable("SDPERSON")
   world.addtimer "SDCOMMENCE12", 0, 0, 2, "", 5, "SDspellup1"
  case "SDCOMMENCE12"
   world.send "cast 'slink' " + world.getvariable("SDPERSON")
   world.addtimer "SDCOMMENCE13", 0, 0, 2, "", 5, "SDspellup1"
  case "SDCOMMENCE13"
   world.send "cast 'sagacity' " + world.getvariable("SDPERSON")
   world.addtimer "SDCOMMENCE99", 0, 0, 2, "", 5, "SDspellup1"
  case "SDCOMMENCE99"
   world.note "Done! Target has been spelled up!"
   world.send ",looks about for others to cast on!"
   world.deletetrigger "SDTOOLATE"
   world.addtrigger "SDspelluptrigger", "* says 'spellup'", "", 17, -1, 0, "", "SDspellup"
 end select
end sub

Odd problem, seems to work perfectly now though, I do not know what the problem was :\
but it is gone now, enjoy the script!
Amended on Thu 03 Jan 2002 12:03 PM by Storm Dragon
USA #21
Yes, it worked perfectly.. Thanks mate..