posted 27-05-2003 13:56 BST
When i start the game in questnet, the Team Selection procedure keeps repeating itselg rapidly....somebody please check my code to see what's wrong....
This is the First part....
' "Capture the Flag"
' Created with QDK 3.12
define game <Capture the Flag>
asl-version <311>
start <>
game author <Ste J Edwards>
game version <1.0 BETA>
game info <1.0 BETA>
default fontname <Arial>
player startscript {
set string <teamselect; none>
set numeric <bluescore; 0>
set numeric <redscore; 0>
msg <|jc|s20|cr|bCapture|cb The|cl Flag |cbTB|s00|xb|jl|n>
do <Team Selection>
}
------------------------------------------
This is the Procedure...
define procedure <Team Selection>
msg <Select a team....|n|n|b|crRED: |xb|cb%redscore%|n|b|clBLUE: |xb|cb%bluescore%>
enter <teamselect>
if ( #teamselect# = red ) then {
give <redkit>
goto <red base10>
}
else {
if ( #teamselect# = blue ) then {
give <bluekit>
goto <blue base10>
}
else {
msg <|bINVALID TEAM...|xb|n>
do <Team Selection>
}
}
end define
thanks.