Turbo Basic 1.1.


Turbo Basic 1.1. - . 237


PUT 1, %
NEXT %
CLOSE 1 '
END '

-143 -




MKMD$,MKMS$
--------------------
MKMD$ MKMS$

S$=MKMS$ ( )
---------- S$\MKMD$ ( )

MKM ( ) -
---------- ,
.
MKMS$ 4- -
; MKMD$ 8- - -
.

.堠 CVMD
--------- CVMS


-------- '
OPEN "CVMD.DTA" AS#1 LEN=12
FIELD#1, 4AS .$, & AS $
% =32767
FOR I%=1 TO 5 '
LSET S = MKMD$ (I%+ %)
PUT#1, I%
NEXT I%
FOR I% = 1TO 5 '
GET#1, I% '
PRINT CVMS ($), CVMD ( $)
NEXT I%
CLOSE#1 '
END '



MTIMER
------------------------------
MTIMER .

---------- :
y=MTIMER

MTIMER