13 lines
151 B
Text
13 lines
151 B
Text
PROC Main()
|
|
BYTE v
|
|
|
|
PrintE("Before loop")
|
|
DO
|
|
v=Rand(20)
|
|
PrintBE(v)
|
|
IF v=10 THEN
|
|
EXIT
|
|
FI
|
|
OD
|
|
PrintE("After loop")
|
|
RETURN
|