348
UNTIL Directive
End REPEAT Loop
Format
UNTIL expression
Where:
Condition to end REPEAT looping when true.
expression
Description
Use the UNTIL directive to define the end of a REPEAT loop in a program.
See Also
Example
0010 PRINT 'CS',"Standard TAX calculation..."
0020 INPUT "How much was your INCOME? $",CASH
0110 REPEAT
0120 INPUT "How much TAX did you pay? $",TAXES
0130 LET CASH=CASH-TAXES
0140 PRINT "You have $",CASH," left"
0150 UNTIL CASH<=0
0160 PRINT "Okay you have paid enough."
-:BEGIN
-:RUN
Standard TAX calculation...
How much was your INCOME? $1.98
How much TAX did you pay? $1.65
You have $ 0.33 left
How much TAX did you pay? $.33
You have $ 0 left
Okay you have paid enough.