49 lines
647 B
Text
49 lines
647 B
Text
goto 14
|
|
print 'Enter your number: '
|
|
print endline
|
|
read $200
|
|
>= $200 0 $0
|
|
<= $200 7 $1
|
|
.and. $0 $1 $2
|
|
gotoF $2 10
|
|
goto 13
|
|
print 'Number must be between 0 and 7'
|
|
print endline
|
|
goto 2
|
|
goback
|
|
call 2
|
|
print 'Your number is: '
|
|
== $200 0 $2
|
|
gotoF $2 20
|
|
print 'zero'
|
|
goto 49
|
|
== $200 1 $2
|
|
gotoF $2 24
|
|
print 'one'
|
|
goto 49
|
|
== $200 2 $2
|
|
gotoF $2 28
|
|
print 'two'
|
|
goto 49
|
|
== $200 3 $2
|
|
gotoF $2 32
|
|
print 'three'
|
|
goto 49
|
|
== $200 4 $2
|
|
gotoF $2 36
|
|
print 'four'
|
|
goto 49
|
|
== $200 5 $2
|
|
gotoF $2 40
|
|
print 'five'
|
|
goto 49
|
|
== $200 6 $2
|
|
gotoF $2 44
|
|
print 'six'
|
|
goto 49
|
|
== $200 7 $2
|
|
gotoF $2 48
|
|
print 'seven'
|
|
goto 49
|
|
print 'unknown'
|
|
print endline
|