Gammon Forum : MUSHclient : VBscript : little help with end if statements please

Entire forum ➜ MUSHclient ➜ VBscript ➜ little help with end if statements please

little help with end if statements please

It is now over 60 days since the last post. This thread is closed. Refresh page

Posted by

Guest1 USA (256 posts)

Date

Tue 19 Nov 2002 11:21 AM (UTC)

Message

due to spam and speed of mud when in large groups, I wanted to make an alias that will just tell me which spells are currently down (not active) as just hitting the score command instead gives way too much additional info and I miss half the info I need, SO.. this is what I have done.

for every spell i want to check (9 of them in this case) I have triggers for the spell up / spell down messages to set variables for each spell to show up or down. so far so good.

now what i want is an alias to call a script that looks at all these 9 variables, and then world notes me ONLY the ones that are down.. thats where I'm having problems as I don't know the correct syntax for if / end if statements. If the spell (variable) is up, i dont want to know about it.

Here is the subroutine I have at the moment. it's not throwing any errors, but it's not telling me anything either on world.note...

ACK nevermind I figured it out... just messed up something really minor on world.notes. I'll post it here anyway, someone might find it useful..

sub spellsdown (thename, theoutput, thewildcards)
dim stone
dim iron
dim strength
dim grace
dim mobility
dim rejuvenation
dim corona
dim stamina
dim aegis
stone = World.GetVariable ("spstone")
iron = World.GetVariable ("spiron")
strength = World.GetVariable ("spstrength")
grace = World.GetVariable ("spgrace")
mobility = World.GetVariable ("spmobility")
rejuvenation = World.GetVariable ("sprejuvenation")
corona = World.GetVariable ("spcorona")
stamina = World.GetVariable ("spstamina")
aegis = World.GetVariable ("spaegis")
World.ColourNote "lightblue", "", "SPELLS DOWN :"
if stone = ("down") then
World.Note "stone skin"
end if
if iron = ("down") then
World.Note "iron skin"
end if
if strength = ("down") then
World.Note "strength"
end if
if grace = ("down") then
World.Note "grace"
end if
if mobility = ("down") then
World.Note "mobility"
end if
if rejuvenation = ("down") then
World.Note "rejuvenation"
end if
if corona = ("down") then
World.Note "corona"
end if
if stamina = ("down") then
World.Note "stamina"
end if
if aegis = ("down") then
World.Note "aegis"
end if
end sub

Top

The dates and times for posts above are shown in Universal Co-ordinated Time (UTC).

To show them in your local time you can join the forum, and then set the 'time correction' field in your profile to the number of hours difference between your location and UTC time.

6,688 views.

It is now over 60 days since the last post. This thread is closed. Refresh page

Go to topic: Search the forum

top