Turbo Basic 1.1.



Turbo Basic 1.1. - . 234


,
ENDMEN.
MEMSET
. -
, ,
7 , .
. ENDMEN
PRINT FRE (-1) ' o
-141 -


--------
' 128
MEMSET ENDMEN - &H80
PRINT FRE (-1) '
END '

MID$
--------------

MID$ .
------------
S$=MID$ ( , n[,m] )
----------
n m - ,
1 32767 32767 .
MID$ , m- , n-
. m n-
m ,
n- . n ,MID$
-.
. 堠 LEFT$
MID$
RIGHT$
𠠠 INPUT ' :", $
-------- .$ = $
PRINT $
' ,
MID$ .
FOR I% = 1 TO LEN ( %)
MIDS ( %, I%,1) = MIDS ( $,- (LEN (
$)- I%) + 1,1)
NEXT I%
PRINT %
END '

MID$
-----------------

MIDS