ok, did it in Notepad and didn't get that error...now I'm getting this one and whenever I try something that does script I get a big red pop up that says my script is not enabled...even though it is...
Error number: -2146827276
Event: Execution of line 57 column 5
Description: Expected 'If'
Line in error:
end Sub
Called by: Immediate execution
following is the first part of the script I made, it's based on the one in this post earlier.
Sub herbhealing (a, b, c)
Dim value, spell, anorexia, aeon
anorexia = world.getvariable ("affliction_anorexia")
aeon = world.getvariable ("affliction_aeon")
If aeon = "on" Then
Exit Sub
If anorexia = "on" Then
Exit Sub
End If
For Each v In world.GetVariableList
value = world.GetVariable (v)
If Left (v, 11) = "affliction_" Then
spell = Mid (v, 12)
If value = "on" Then
Select Case spell
Case "stupidity" world.sendpush "eat pennyroyal"
Case "slickness" world.sendpush "eat calamus"
Case "paralysis" world.sendpush "eat kombu"
Case "confusion" world.sendpush "eat pennyroyal"
case "epilepsy" world.sendpush "eat kombu"
Case "dizziness" world.sendpush "eat kombu"
Case "recklessness" world.sendpush "eat horehound"
Case "justice" world.sendpush "eat reishi"
Case "paranoia" world.sendpush "eat pennyroyal"
case "hallucinations" world.sendpush "eat pennyroyal"
case "generosity" world.sendpush "eat galingale"
case "claustrophobia" world.sendpush "eat wormwood"
case "vertigo" world.sendpush "eat myrtle"
Case "dementia" world.sendpush "eat pennyroyal"
case "clumsiness" world.sendpush "eat kombu"
case "agoraphobia" world.sendpush "eat wormwood"
case "peace" world.sendpush "eat reishi"
Case "hemophilia" world.sendpush "eat yarrow"
Case "lethargy" world.sendpush "eat yarrow"
Case "relapsing" world.sendpush "eat yarrow"
Case "arteries" world.sendpush "eat yarrow"
Case "healthleech" world.sendpush "eat horehound"
Case "dissonant" world.sendpush "eat horehound"
Case "addiction" world.sendpush "eat galingale"
Case "gluttony" world.sendpush "eat galingale"
Case "rigormortis" world.sendpush "eat marjoram"
Case "torn" world.sendpush "eat marjoram"
Case "vapors" world.sendpush "eat kombu"
Case "nerves" world.sendpush "eat kombu"
Case "hypochondria" world.sendpush "eat wormwood"
Case "vestiphobia" world.sendpush "eat wormwood"
Case "sensitivity" world.sendpush "eat myrtle"
Case "weakness" world.sendpush "eat marjoram"
Case "lovers" world.sendpush "eat galingale"
Case "deafness" world.sendpush "eat faeleaf"
Case "blindenss" world.sendpush "eat faeleaf"
End Select
Exit Sub
End If
End If
Next
End Sub if
Sub stupidityon (a, b, c)
world.setvariable "affliction_stupidity", "on"
anorexia = world.getvariable ("affliction_anorexia")
aeon = world.getvariable ("affliction_aeon")
If aeon = "off" Then
If anorexia = "off" Then
world.sendpush "eat pennyroyal"
End If
end Sub
Sub stupidityoff (a, b, c)
world.setvariable "affliction_stupidity", "off"
End Sub
-------------------
this is just the beggining...please tell me what I've done wrong here if anything, thanks |