🚀 go-pugleaf

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