Try using the Select/Case commands.
SelectClass:
input "What class are you?>",class$
Select class$
Case "Warrior"
Print "You are a Warrior"
EndCase
Case "White Mage"
Print "You are a WhiteMage"
EndCase
Case "Black Mage"
Print "You are a BlackMage"
EndCase
Case Default
Print "That is not a valid Race / Class please choose again."
Goto SelectClass:`Normally, avoid using goto, but this is just a sample.
EndCase
EndSelect
I'm don;t remember if DBC has the Select/Case commands. Another way that would work in either DBC or DBP is:
Flag = 0
input "What class are you?>",class$
Do
if class$="Warrior"
print "You are a Warrior"
flag = 1
endif
if class$="White Mage"
print "You are a WhiteMage"
flag = 1
endif
if class$="Black Mage"
print "You are a BlackMage"
flag = 1
endif
if class$="Archer"
print "You are a Archer"
flag = 1
endif
If flag=0
Print "That is not a valid Race / Class please choose again."
Else
exit
Endif
Loop
"Droids don't rip your arms off when they lose." -H. Solo
REALITY II