Relay-Version: version B 2.10 5/3/83; site utzoo.UUCP
Posting-Version: Notesfiles; site iuvax.UUCP
Path: utzoo!watmath!clyde!burl!ulysses!mhuxr!mhuxn!ihnp4!inuxc!iubugs!iuvax!franco
From: franco@iuvax.UUCP
Newsgroups: net.micro.atari16
Subject: TINY BASIC
Message-ID: <54600020@iuvax.UUCP>
Date: Mon, 10-Mar-86 22:13:00 EST
Article-I.D.: iuvax.54600020
Posted: Mon Mar 10 22:13:00 1986
Date-Received: Thu, 13-Mar-86 06:49:37 EST
Lines: 102
Nf-ID: #N:iuvax:54600020:000:5968
Nf-From: iuvax!franco    Mar 10 22:13:00 1986


Have fun with this BASIC kernal.  Runs a bit faster than STBASIC,
allows only 26 variables (a-z) and only one array but array can be
as large as available memory.  Also allows compact statements.
documentation to follow.  Strip away all lines down to but excluding
"begin 644 tbi68k.tos".  I downloaded this and uudecoded it with the
uudecoder posted to the net yesterday and it worked.


begin 644 tbi68k.tos
M8!H   V    !@                        "//   ./F :8%!@  P 8  ,
M)F  #$Y@  R"8  -7@  #P N>0  #CY-^0  #8!A  O0(_D    >   .J" Y
M   ./I"\   ( "/    .L)"\    ;"/    .K$* (\    Z4(\    Z,(\  
M  Z(+GD   X^3?D   X+80 +A! \ #YA  B480 +%"A(0?D   ZT80 *QF$ 
M"OA*06<  6RRO   __]D  A8$0'@61$!X5EA  D(*DEF%F$ "2HD329Y   .
MJ&$ "2@CR@  #J@@#)"(L+P    #9Z(F>0  #J@L2]? (#D   ZLL(MC  @&
M(\L   ZH(DXD36$ "/PB2"1-)DQA  CH8 #_<DQ)4]1,3T'$3D774E7.4T%6
MQ4Y%6-1,1=1)QD=/5,]'3U-5PE)%5%52SE)%S49/TDE.4%744%))3M103TO%
M4U1/T$)9Q4-!3,P 4$5%RU).Q$%"TU-)6L4 5,\ 4U1%T  ^O3R^OKT\O;P 
M     L0   4P   "5@   FP   66   $(   !2    1^   "L    TH   -Z
M   $?    YX   2H   "\   !B0   )D    &@  !CP   4:   (#@  "!H 
M  A2   (8@  !Q@   .\   (L    ]8   /<   &9   !FH   9P   &?   
M!G8   :$   &E$/Y   !#D7Y   !>F$ "7@F2$("$!@2$68$($M@)!8 Q@*V
M/  N9QK"/ !_L@!G#%B*($M" DH9:OQ@V'3_2AEJTD?Y     "923M-A  9,
M(_D    >   .J&$ !CY@ /WP80 &-B!Y    'B/(   .B$JY   .B&< _=9"
M@2)(80 '0&4 _<HCR0  #H@@252(80 )2D/Y   !($7Y   !CF  _VAA  .>
M80 %[B( 80 ' &8 !D!@SF$ ")1A  7:80 &[F4 _8AA  A080 )#F<,L#P 
M$V8&80 ) F?Z80 &X&#@> MA  A,.@AA  D 8)YA  A #0IA  CT8 #_<F$ 
M"#(C"F$  SPX & &80 '6& 280 ('BP(80 %8F#@80 (S& 0/P1A  ,:.!\B
M &$ !W1@WF$ !49@  5H80 &VF$  P O""( 80 &9&8 !:8O.0  #H@O.0  
M#HQ"N0  #I0CSP  #HQ@ /\:80 %*"(Y   .C&< !2HN02/?   .C"/?   .
MB"!?80 &:&"D80 &AF$ !,PCS@  #I1#^0   6=%^0   =Y@ /Y<80 "DB/ 
M   .G$/Y   !:D7Y   !YF  _D)A  )X8 )P 2/    .F"/Y   .B   #J C
MR   #J0L3V &W?P    4(!9G&K"Y   .E&;N)$\B3D?Y    %-?)80 %XBY+
M8 #_)&$  R)E  2*(D @.0  #I1G  1^L\!G!F$ !<A@[" 1T+D   Z8:0 $
MN"* (CD   Z<2KD   Z8:@+!0;* ;10C^0  #J    Z(('D   ZD8 #^T&$ 
M!8Q@ /[(8 IA  '02H!F /X6(DA"@6$ !5ID /X 8 #[Q"YY   .D"/?   .
MB%B/(%\O"&$ !<A@"F$  I)E5B1 8!HO"&$  H9E  /N)$ 4$$( $( B7V$ 
M!8@0@B\(+SD   Z((_S_____   .B"//   .D"\*$#P .F$ !"1!^0  #K1A
M  %2)%\D@"/?   .B"!?6(]A  8P+ 1@DF  _BH,$  -9PQA  -.80 &&BP$
M8/1@ /X480 'H"!Y    'F$ !]1A /K69_JP/ ! 9QZP/  Z9NYA)!#!82 0
MP6$ ^KQG^A# L#P #6;R8-8CR   #JAA  ?R8 #ZYG0!0D%A /J:9_JP/ !!
M90)? , \  _I"8( 4<K_Z$YU80 '.B!Y    'B)Y   .J&$ !Y(0/  -80#Z
M8A \  IA /I:L\AC'A \ #IA /I.$AAA.A(88380&+ \  UGU&$ ^CI@\A \
M $!A /HP$#P #6$ ^B@0/  *80#Z(! \ !IA /H880 '9&  ^EAT >D9$ ' 
M/  /T#P ,+ \ #EC EX 80#Y]E'*_^9.=6$J80 %&"P.+P!A(")?$H!@ /T,
M8  "=F$22H!G  *^+P@B0$Z1(%]@ /ST858O $/Y   !;T7Y   ![F  ^[1A
M,FTD8"9A+&<>8"!A)F\88!IA(&X28!1A&F8,8 Y.=6$2; 1@!DYU0H!.=7 !
M3G4@'TYU(!\B'R\ +P%A!B(?LH!.=6$ !)8M!D* 8")A  2,*P)A)F$ !(0K
M$"\ 81PB']"!:0 "-F#L80 $<"UL+P!A"$2 3OD   ;$829A  1<*@XO &$<
M(A]A  "F8.YA  1*+T8O &$*(A_!06$  ,Y@VD/Y   !6$7Y   !RF  ^P!A
M*F4((D!"@" 13G5A  0T( %*0F;T80 $$"@.80#_&F$ ! 8I!$YU8  !;F$ 
M!$I"@! 0D#P 0&5"9BA22&'6T(!E  &DT(!E  &>+P!A  #Z(A^P@6,  88@
M.0  #JR0@4YUL#P &PH\  %E#E)(T$#00"(Y   .K-!!3G4H ;&$2H!J D2 
M2H%J D2!LKP  /__8PS!0;*\  #__V(  4@T ,3!2$# P4A T()E  $X2H1J
M D2 3G5*@6<  2HD 2@!L81*@&H"1(!*@6H"1(%V'R( 0H#2@=& 9PBP@FL$
M4H&0@E'+__#!04J$:@1$@$2!3G5A /\>(D!"@! 13G5A /\22H!G  #>:P  
MVB( (GD   XZL_P   XY909#^0    8@&0B  !\CR0  #CIAAB !4H!.=6$ 
M_MI*@&H&1(!K  "B3G4@.0  #JR0N0  #JA.=6$ _M)E.B\ 80 "QCT,80#]
MT"Q?+(!.=6 F80 "M#H(6(]@ /H(80 "J T(6(]@ /G<3G5A  +J#!  #68"
M3G4O"$WY   .&6$  T8@7R Y   .B&< ]Y2PO/____]G /O('Q!"$")Y   .
MB&$  D@0GQ \ #]A /<B0D!3B6$  6A@ /=F+PA-^0  #B%@N"\(3?D   X2
M8*YA  16+PA-^0  #B=@H&$ ]O 0/  @80#VZ$'Y   .M&$  KQG^K \  AG
M)K \ !AG1+ \  UG!K \ "!EXA# 80#VOK \  UG7K'\   ._V7.$#P "&$ 
M]J@0/  @80#VH+'\   .M&.V$#P "&$ ]I!3B&"J(@B2O   #K1G'E-!$#P 
M"&$ ]G@0/  @80#V<! \  AA /9H4<G_YD'Y   .M&  _WH0/  *80#V4DYU
MLKP  /__9 #_/")Y    'B1Y   .J%.*M<EE#!09X4H4$5.)M$%E DYU5(D,
M&0 -9OI@W+?)9P04V6#X3G6UR6?Z%R%@^"Q?(]\   Z49Q@CWP  #I@CWP  
M#IPCWP  #J CWP  #J1.UB(Y   .L)*/9 #^QBQ?(CD   Z49Q@O.0  #J0O
M.0  #J O.0  #IPO.0  #I@O 4[6$@ 0&;( 9Q)A /6HL#P #6;P$#P "F$ 
M]9I.=6$  ,HB&A \ "(B2&'6($DB7[ \  IG /?P5(E.T6$  *PG"! \ "=@
MX&$  *!?#A \  UA /5@(E]@WDYU)@$_!!\\ /]*@6H$1(%31(+\  II"B !
MPKP  /__8!HP 4)!2$&"_  *- $R (+\  H@ 4A!,@)(04A 'P!(0%-$2H%F
MRE-$:PP0/  @80#U"%',__9*@VH($#P +6$ ]/@0'VL*T#P ,&$ ].Q@\C@?
M3G5"@1(9X4D2&7@%88 0/  @80#TTD) 8 #_&F%.(E\2&;(09PI"@1(1T\%3
MB4[14HA2B4[10H%"0F$P#!  ,&4H#!  .6(BLKP,S,S,9 #]C" !TH'2@=* 
MTH$0&,"\    #]* 4D)@TDYU#!  (&8$4HA@]DYU0?D   ZT0@$0&+ \  UG
M&+ \ ")G%+ \ "=G#DH!9NAA&!$ 4HA@X$YU2@%F!!( 8-:R &;20@%@SK \
M &%E"K \ 'IB!) \ "!.=6$ ]"1G"K \  -F!&  ]&1.=4WY   .-1 >9P9A
M /0$8/9.=4CG__\_/  "/SP "$Y-6$]*@&?L(!<_ #\\  (_/  #3DU<3TS?
M__].=4CG?_\_/  "/SP  4Y-6$]*@&<2/SP  C\\  ).35A/P+P   !_3-__
M_DYU2.?__Q/    .1"\\   .1"\\     3\Y   .0C\\ $!.0=_\    #+"\
M     &L _'A,W___3G5(YW__+SP   Y%+SP    !/SD   Y"/SP /TY!W_P 
M   ,L+P     :P#\1A Y   .14S?__Y.=4CG@,!#^0  #D80&+ \ ")G#+'\
M   / &WP8 #[PA 8L#P (F<.L?P   \ ; #[L!+ 8.H2_   3-\# 4YU2.?_
M_S\\  (O/   #D8_/  ]3D%03S/    .0K!\  !M /O83-___TYU2.?__T)G
M+SP   Y&/SP /$Y!4$\SP   #D*P?   ;0#[L$S?__].=4CG__\_.0  #D(_
M/  ^3D%*GTS?__].=3\\  !.00T*1V]R9&\G<R!-0S8X,# P(%1I;GD@0D%3
M24,L('8Q+C -"@T*=C(N,"!F;W(@=&AE($%T87)I(#4R,"!35"!V97)S:6]N
M(&%D87!T960@8GD-"DME;FYE=&@@3"X@2'5R;&5Y#0HQ,C,P(%<@-W1H(",S
M#0I%=6=E;F4L($]2(" Y-S0P,@T*"@ -"D]+#0H 2&]W/PT* %=H870_#0H 
M4V]R<GDN1FEL92!%<G)O<B$-"@ -"@        8                     
M                                                            
M                                                            
M                                                            
M                                                            
M  (<!@8*! 8,# @&!@8&&#0*$@H,A@0$! 0$! 0$! 0$! 0$! 0$! 0$! 0$
M! 0$! 0$! 0$! 0$!@9*!!(&!A8.!K@&!@8.# 86!@8.!@82!@0&%"@6# 8.
M! 8N!C@*!A .,#0R!K0&@"X&9!J>!@@,'@9*#!@B"@X4,!@6)AX&. @&!@8(
8#@@&!@8!4%YL!@PF#!P0#A0@#AH.&-( 
 
end