Trigger: You wield *.
Omit from output: checked
Label: Wield
Script: OnWield
And then put this subroutine in the script file (VBscript) - ensure scripting is enabled.
sub OnWield (strTriggerName, strTriggerLine, aryWildcards)
dim weapon, hit, dam
' weapon is in the first wildcard
weapon = aryWildcards (1)
' work out spell duration based on chant
Select Case weapon
Case "the Globe of Protection"
hit = 90
dam = 100
Case "a Silver Sword"
hit = 80
dam = 150
' --- and so on
Case Else
hit = -1
dam = -1
End Select
' show HP and Dam if known
if hit = -1 then
world.note "You wield " & weapon & " (unknown HP)"
else
world.note "You wield " & weapon & ". (Hit: " _
& hit & " Dam: " & dam & ")"
end if
end sub
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.