Turbo Basic 1.1.


Turbo Basic 1.1. - . 194


WEND
PRINT c" ( TEXT.DTA":END




ERADR
-------------

ERADR .
-------

y=ERADR
---------

ERADR , -
--------- .ERADR -
, , , -
(.. -
-
, ).
ERADR
. - -
, , ,
(ERR) ERADR , -
.
. ERL
ERR
ERROR
ON ERROR

𠠠 ON ERROR GOTO
DIM X%(10)
FOR I%=1 TO 10
READ X%(I%) ' X 10
PRINT X%(I%) '


-112 -


NEXT I%
'
DATA 1,2,3,4,5,6,7
END '
:
LOCATE 10,15
'
PRINT " "ERR" "ERADR
LOCATE 11,15
PRINT " , -
"
END