Turbo Basic 1.1.


Turbo Basic 1.1. - . 253


.
GET PUT . , -
GET 'LSET
RSET.
$ = FN$ ( /)
'
OPEN "OPEN.DTA" AS #1 LEN=1
FIELD 1,1 AS $ ' 1-
$ = " "
-154 -


% =LOF (1) '
' GET,
FOR I% = 1 TO %
GET 1, I%
$ = $ + $ '
NEXT I%
'PUT
FOR I% = LEN ($) TO1 STEP-1
LSET $ = MID$ ($, I%,1)
PUT 1, LOF (1) '
NEXT I%
CLOSE 1 '
'
CALL
CALL
CALL
CALL
CALL
END '



OPEN COM
-------------------
OPEN COM
------------------- .

񠠠 OPEN " COM n [][,][,][,][]"
---------- AS [*] [LEN ]

n -
---------- /. - , -
: 蠠 蠠
75,110,150,300,600,1200,1800,2400,4800 9600 ( 300)
- ,