Relay-Version: version B 2.10 5/3/83; site utzoo.UUCP
Path: utzoo!mnetor!seismo!husc6!mit-eddie!genrad!decvax!ucbvax!MITRE-BEDFORD.ARPA!jhs
From: jhs@MITRE-BEDFORD.ARPA
Newsgroups: comp.sys.atari.8bit
Subject: Turbo BASIC Compiler (at last) in uuencoded form.
Message-ID: <8701142104.AA00698@mitre-bedford.ARPA>
Date: Wed, 14-Jan-87 16:04:35 EST
Article-I.D.: mitre-be.8701142104.AA00698
Posted: Wed Jan 14 16:04:35 1987
Date-Received: Thu, 15-Jan-87 03:35:39 EST
Sender: daemon@ucbvax.BERKELEY.EDU
Organization: The MITRE Corp., Bedford, MA
Lines: 248

At last!!!  Howard Chu has gotten me copies of the COMPILER and RUNTIME files
for Turbo BASIC, despite my destroying the first copy of the compiler that he
sent me.  (Makes you feel better, I bet, to know that others do dumb things
like that too!)

Both these postings are in UUENCODED form, not BINHEX.  I posted uudecode
for the Atari 8-bitters awhile ago, so you should be able to download that
and uudecode on your Atari if you don't have uudecode on your host.  This
is highly desirable because the current version of HEXBIN is entirely in
BASIC and so is fairly slow.  (We all should compile HEXBIN with this nifty
new compiler and gain the 15 times speedup that is promised.  That wouldn't be
to bad, actually!)

Anyway, here is the compiler file and runtime will follow.  I have already
posted the compiler documentation, uuencode, and a uuencoded version of the
interpreter.  Anybody missing these should request a re-posting.

Many thanks to Howard Chu and to the various others in the chain that got
these wonderful tools delivered to us all!!!

-John Sangster / jhs@mitre-bedford.arpa

------------------c-u-t---h-e-r-e---f-o-r---COMPILER.UUE----------------------
begin 644 compiler
M_@'__P ^KSX &!C_/#QF0@    9F?G9F   8/&9^9F8 /G,S/C P> !\-S,^
M,#!X  !@8S8\.6,  0$/ P/VY " @/# P& @  $#!@8& P$ X3,&!@8SX0#'
M8S,V-F;.  Z !G9F9F9F8\ /\Q,3$Q,7L ^X&!\8&!
M^P#XC(SXL)C,5:I5JE6J5:H! @4*%2I5J@" 0*!0J%2J5:I4J%"@0(!5*A4*
M!0(!   P8C&B +T X)T /+T X9T /;T XYT /^C0ZZD0C<8"J3R-Q0*-\ *-
M] *I1XU$ ZDPC44#J1R-2 .I 8U) ZD+C4(#(%;DCO "8'V;FW]_(  ! @,$
M!08'FW]_" D*"PP-#@\0FYL@(" @(" @(" @(%1U*G^C0'3J=0@,@5N0P6JD.A=J=1 .I887;G?X!10,XI=CEUH7<
MI=GEUX7=YMS0 N;=I=R=2 .EW9U) R!6Y# RS@'3H "FW? .L=J1ULC0^>;7
MYMO*T/*FW/ (L=J1ULC*T/BI_XT!TS"(J0R=0@-,5N1L"@#B N," &  P#W+
M(,K &*58:7B-1"&E66D C44AJ3B-, *I(8TQ JD#A50@',&B_YH@OO$@[<(@
M5,(@7,%,+\ @[_@@\?0@ZN0@ZN2ED 61\ JED*21(.C!3%K (._D2V5I;F4 
M(._D($9E:&QEDBJ(H@Z,$@
M[^0@0GET97.; *60!9'0!B!']TPCP*(0((/$J0"%HB#OY)N;0FET=&4@96EN
M92!487-T92!D<@IC:V5N "#WP$PCP*( ((/$J<"%:JD#G4(#J0R=2@.I )U+
M ZFLG40#J2"=10,@KR PV:G,C?0"8(:EA*8@'B'  # %IJ6DIF @ .13=&]P
M<&5D $R=P*#]H@!,_B"@)ZD F9DAB!#Z8(I(F$BB$*D'G4(#J0"=2 .=20,@
MB,2%G>:5:*AHJJ6=8(:=II?FE[V !*:=A9U@HO^:3#7 J0"%E2 GP862("?!
MA9.H,.D@)\&%E*D$HH@@_\.EDI&KR*63D:O(I8"1J\BE@9&KI9*DDR LPJD 
MA8\@KL2E_@&5Q920]Z6/\!F@ ;&.2*6 D8[(L8ZJI8&1CH:/:(6.3*#!8(74
MA-6I (76A=>%V*(0^ ;4)M6EUF76A=:EUV77A=>EV&78A=C*T.?88""^P:D 
MA=FEV" ,PJ77( /"I=8@ \*EV? 28$A*2DI*( S":"D/T 2DV? 7"3"%V4B*
M2)A(NKP# ::B(/X@:*AHJFA@(+[!H!:EV"!&PJ77(#W"I=9(2DI*2B!&PF@I
M#PD0F9DAR& Z96EL9: $N4_"F:DAB!#WJ0>B$)U" ZD.G4@#J0"=20.IU)U$
M ZD G44#((C$3(#"I=0%U? :( /D2V5I;B!"87-I8RU0]*
MZBOD*^1IZA+N].XR[QKJ&NH:ZE+P?.DKY%SJ3NQ_Z6?I7.J"Z2OD_O KY"OD
ME.^\[\_O\_ 7\6/K?.IDZ>WO2/!YZ6OL@NESZ7SJBN]C[V/L]NOYZX+I\^LN
M\++O$O!TZBOD*^1IZBODF>N][,#L >K^ =SL8.VY[03NB.YB[JWLJNSPZ]_L
M9NW7[<7PU/#7\-KPW?!Z\.#PBO"8\';I4NHKY ?%*^0KY"OD*^38[N/PYO"=
M\(KP!.I#['SL%? B['7OE^\@ .13<&5I8VAE8T/CP
M&\:FQJB(L:61IXBQI9&GB+&ED:>(L:61IYC0Z26D//)%- %J1:9?P29@ 3(T/K(A)>M@02%G:V !(69"JBY(<.%
MU+DBPX75( C%I9KP$J* (/_#IIJY -F1J\C*T/>&FF!LU  @0<7&F\:;\""D
MF[D!V$BY -@8:0A(J8\@\^D@1<5H(//I:"#SZ4PQR:T!V$BEG1AIJKW)QH6?I)R^ -J])\?%GY R3S0+KD VHC)6/ BR6OP'OX!R3CP
M$,DW\ S).? (R3OP!,D_T."I@R#SZ:F/(//II9ZDG,DWD!?)/+ 3R3KP#Z:;
MO?_7QIO&F\B9 -JEGLB9 -J$G$Q0Q2!(P0D ,"[P*]Q[W'O<FQYO'F\>AQYO'F\>FQYO'F\>;QYO'F\>;QYO'L,>PQ[#'L,>A
MQZ''H<;Q\S'S\>]QP  PLB;QYO'B@ (2;($7%3#')H "$FR!%Q:F#(//I3#')F$B@@"#/QZ2C:#CI
M9IF!!? "J4"9@ 6I )F"!9F#!9F$!9F%!1B8:0:%HVEZ""#SZ2BI!6D 3//I
MH$A,S\?FH&AHI)Q,;<6Y MB9 -C(Q)O0]<:;3/'(BID V,C(N0'8F0#8R,2;
MT/7&FTPXR2 @RY C2"  Y$EN=&5G97(@/# @;V1E^ =C)FO!8R9SP5\F8L#G)@/ \R8+P3LF#
M\%;)A/!9R8CP7,F)\&/)BO =R8OP+IC2!)RDSDR(HXZ23)!+#7F0#83.7(F0#8F$BY MB9 =C(
MQ)O0]<:;:*A@X*#P$^"B\!+@H_ 1X+CP%>"Y\!%,ILFIIBRIIRRIJ)D V$SE
MR+D$V,F#T.C(("#+B+#AI=70W1BY =AI YD V*74F0'8R,A,\LJY!-C)5O +
MR5?P"LE:T+NIE"RIC"RICID!V*F#F0#8R$PMRY
M MB%U;D!V(74H@"AU/ $28"!U$PMR;D#V)D V,C$F]#UQIM,V\A,I,FY ]C)
M'9#VR2BP\FF3F0#83"W)J:^9 -A,+"9U "(
M$/@@*B%HJ&  Y"?Y(-KDYI#0 N:1:(74:(75YM30 N;5H "QU/ &(!C"3 _D
M(.KDI=5(I=1(8"#:Y*( O8KDA:3P#<69\ GHO8KD$/KHT.SHO8KD*7\@&,*]
MBOX!Y!#RI:3P&" #Y"!N:6-H="!C;VUP:6QI97)B87( 8*69H  @Z,$@ ^0@
M*BHJ($U514Q,("HJ*@!,G< $3$E3U 5%3E1%T@]#3T[4%DY%UQA,3T'$&5-!
M5L4T0U-!5L4U0TQ/0<0W15)23])3*LQ54D5.5;4T +FU:  L=3P
M!B 8PDSUY*752*742&"82(J@ "#HP2  Y%%*4T( :*A@"JJI(""IZ;T WR"I
MZ;T!W_#;3*GI( #D0V]M<&EL97(@1F5H;&5R $R=P*2;P ?0):T V,F"T!ZM
M MC)N- 7K078R:#0$*T!V,T&V- (C078H ),QN6@ ,2;\$&Y -BJO<[G$##)
MP) ;R=>PJ"D_"JJ]SNB%U+W/Z(75N0#8( C%3+GEJ:(@J>G(N0#8(*GIO<[G
M*3\@(>7(Q)O0OV XZ5 LJ8 LJ8$LJ04LJ02%Z,BY -B%YLBY -B%YX3IH 6Q
MYIG@ (@0^*7@T :EZ,D$\!"EY07D!>,%XM TI>#)0- NI>BDZ:;AR6;P(LEG
M\#;):/!,R6GP3\EJ\#+)!/ VR07P1LF \%')@?!*T%3@ M!0J7$LJ7 LJ6\L
MJ7(LJ4,LJ4),(>7@ O#KJ7/0_@$>X +PZ:EVT!;@ ?#DD.6I0- ,X 'PU*ET
M+*EU+*EY2*FI(#;K:$PAY:EX+*EW2" "Z4QMYJ6"A=3%A*6#A=7EA; AH 6Q
MU-G@ - %B!#V,"08I=1I!H74D +FU<6$I=7EA9#?J0:BA"#_PZ %N>  D=2(
M$/BI#R"IZ3BEU.6""""IZ:F@(*GI**75Y8,@J>FDZ:7H$ L@ NFI.\;H$ *I
M/TPAY:)&(/WFJ:"B $PVZ\BY -B%U,BY -B%U;FU-#5
MYM5,'.>I%R"IZ3BEAN6$"""IZ:F@(*GI**6'Y84@J>G(N0#8A>#(N0#8A>&8
M2*  L> 8:0&%XJ*&(/_#H "QX)&KR,3BT/=HJ*D;3"'EHE4LHH@LHHHLHHP@
MI^?HJ80LJ85,-NNB"2RB*2RB22 (Z:FJ(*GIJ9@@J>D@".FIJ""IZ:F*3*GI
M  $" _________________________________\='A\@(2(C)"4F)R@I*O__
M__\O,#$R,S3_-O_______ST^_]-!T-%$149'2$E*2TQ-3D]045)35%565UA9
M6EM<75Y?-3?__S@Y______\Z:VS____________________^ ?___\#"ABPM
M*\0-S<.(P<:'QR[)RLO%R,S2S?__B8J+C/^.CY"1DI.4E9:7F)G4_YS_S\[.
MSL[.SL[.SL[.U=;_____________________________________________
M____________________________________________S.7)Y4SG_.CQYC[G
MK^>LY[+GF.>;YY[GE>>^Y;_EP^4>Z2'I!>DNZ3CI3NE1Z2 %Z:F@+*FB+*FI
M)(H@J>G(N0#83*GIJ0<@">E,#.FBNBRBUBRBU*FE(#;KZ*FD3#;K(/;FJ;&B
MU$PVZZFBR+X V" VZ[T VQ #J3PLJ1I,(>6I;2RI;DBIHB"IZEH
M3"'EH  LH :IJ2"EZ:#[3#WKJ1\LJ1TLJ1PLJ0,LJ0(LJ0 *JKP!WM 0BB#H
MP2#GY"  Y%%*4T$ 8+T WJJI(""IZ8H@J>F8AJ2FFIT V::DYIKP&V @ .1!
M=7-DFM@01))O "J?\@
MJ>E,/>L@>LBDF\ #T!>M -C)B= 0I9G)#- %J0@@A.F@ $P3Z2!,Y:D)I)G 
M#- "J5A,A/X!Z2#EZZ#(3#WK(.7KH@*@_4PMZR!PR"!,Y:6=R1+P]& @"\5,
M3.6I$DR$Z:D,((3I3(OJI9W)%O#M((3LI)?  = )I9W)$M #($C!I9W)%O!D
MR1+P<F8(*GIBDRIZ:F%3*7IJ94LJ9!(('K(:"#S
MZ2!^R*2;P ?0"JT V,F)T /-!-A@($7KT"FM!MCP R#8ZZT"V,G D S)V+ 6
MR=/P$LG0D Z@!" %Z:X"V*P!V$PMZR!,Y:D33(3I($7KT#*M MC)P) ,R=BP
M)\G3\"/)T) ?H 0@_.BN MBL =@@+>O(T 'HBO %J8Q,,NNIA$REZ2!,Y:D4
M3(3I( #D6F%H;#XR-34 8"!ZR*F7()OL3$SEJ2$LJ1DLJ1NID2#JZR!ZR*F2
M(.KKI9W)%O &('K(($SEJ2=,A.D@1>L@_@%,Y:D;3(3IK8$$R1S0"2!(P2#E
MZZD'+*D&3(3I(.7KJ1Y,A.FM@03)%O %J2!,Z/"I 4R$Z2"$[*DC3(3II)>Y
M@ 3)'- )($C!(.7KJ0HLJ0M,A.D@\^F*2)A((#'):*AHJF"I)"RI)4@@A.P@
M1>L@3.5H3(3IJ00LJ05(($7KJ9$@\^D@?L@@3.5H3(3IJ0.BBDS_PZD"+*D!
M2"#5[&B1J\BE@)&KR*6!D:M@.*6*Z0.%BK "QHN@ +&*8" ,[2#S[/#X8* "
ML8J%K(BQBH6K&*6 :0.1J\BE@6D D:M@2"#5[&BJRM -( #D1$\@9F5H;'0 
M8,K0$2  Y%)%4$5!5"!F96AL= !@( #D5TA)3$4@9F5H;'0 8"".[:D"+*D!
M2" &[874:,74T+/(L8JJR+&*J*E,3*'IH *QBH6LB+&*A:M,Z>RIT"RI\$@@
M<,C)A- .(*CQJ82@U""EZ:D%T 4@3.6II:#4(*7I:* #3*7II8!(I8%((([M
M(/'$J0,@_NVI R#A[&B1JVB(D:M@I8J%U*6+A=6@ #BEU.D#A=2P L;5L=3P
M\LBDFJGPF?[8H  @$^FFE>3^ 92P
M!B GP4Q"[F @\<2FCJ2/('OMI8"%CJ6!A8]@I8WP.J( H "I3)&,R+&,2!B*
M98"1C,BQC*JE@6D D8R&C6B%C&"EC? 4H "QC/ .H@,@:.X@&^ZI (T V6 @
M .1)1B!F96AL= !@I9*DDR RZR!(P2"IZ:6=R9O0]*6:C0+9HH(@_\.FFKD 
MV9&KR,K0]X::8"!%ZZF1()OL('3())@P!:D](//I($SEJ29,A.D@"\6DF[G_
MUT@@3.4@<,AHIIW@&@A(T ,@=,@@3.5HJJFB(#;KJ2@H\ *I*2"$Z:FPH@,@
M-NL@\<2I!4S^[2"]\"#QQ" &[NI*R"$Z:6=R1;0\F @A.P@<,@@3.6I+""$
MZ:6=R1;0[V"L@03 '- .J2TLJ4HLJ2Y(((3L:"RI2T@@O?!H2""$Z:6=R1;0
M\FA@($+K($SEJ2_0Y2"$[""]\""F\*F@(*7IJ3!,A.D@A.P@1>L@3.6I,4R$
MZ2"$[*V!!,D/\!VI,BRI-BRI-$@@O?!H2 :8:0 @A.FEGMH+*DX2"#EZZ"(
M(#WK(.7KH(H@/>L@Y?X!ZVA,A.FM@03)%O VJ3TLJ51(K8$$R1S0(2!(P2"F
M\&BJJ3_@A/ "J3<@I>FIH*  (*7IBDR$Z:D\2"!ZR"!,Y6@LJ55,A.D@IO"E
MDID W*63F0#=8*D^((3I(*;PJJD?3*'I($C!R0#0 R!(P4F J"!(P;D VX68
MF& @IO"IHDREZ:V!!,D6T 6I/TR$Z:E +*E!+*E"+*E#+*E$+*E%+*E&+*E'
M2"!PR"!,Y6A,A.D@Y>N@C" ]ZZE)+*E(2""$["#EZZ"((#WK(.7KH(H@/>M,
MZ? @<,C)A C0 L:;($SE(/'$I9W)%_ /R1CP#LEB\#K):O S3%_UHDPLHDXH
MT 'HJ2>@ ""EZ8H@A.D@>LBEF\D#T#>M =BL M@@I>GN =FEGGN =FEG'  3)W QIL@,G5M($1/4YN;?T-O;G1R;VP@
M4B ](%)E8F]O=)L (/? *7_)!/ 'R1+0!DRT]$S8],DQD.G).;#EC:,@2" <
MP:DDC9DA:"D?C9HAJ1J-FR&B$""#Q*D#G4(#J:*=1 .I()U% ZD&G4H#J0"=
M2P,@B,0@IO2I (62J0.%CB GP%5*(0((/$J0"%DZ62T -,OO$8I5AI
M>(6KI5EI (6LJ0.%CJ:3\!P8I:MI#86KD +FK,:.T JI X6.YJO0 N:LRM#D
MH RQJPF D:N($/<@]\"FD\F;\$G)'/ GR2WP(\D=\#3)/? PR1[P&&DZ ,L:LI?Y&KB!#W3++SZ.CHY)*P
ML)#^ >>I1(V !*VC((V!!*DZC8($H@.@ ;&K*7_P!QAI()V !.C(P SP#, )
MT.JI+IV !.C0XJD@G8 $Z. HT/B]?P0XZ2"=F"'*T/2B$*D#G4(#J8"=1 .I
M!)U% ZD$G4H#J0"=2P,@B,2I?2 8PB#JY"#JY$SJY"#OY']_TL7"S\_4H,JO
MSJ"_ "#WP,E*\ @@[^2< $P.\TR<("#OY']_Q,_3H,JOSJ"_ "#WP,E*T-],
MEB"I;X6KJ2*%K*  L:LI!\D'\#&QJZ #R2#P%"D/R0WP#LD,\ J(R0CP!,D*
MT &(&)AEJX6KD +FK,6 I:SE@9#(3*/VL:O)!_!-R0_P)\D7\"#)'_ ZR2?P
M#\DW\ [)/_ *R2_0"4RC]4RF]4R%]DPVY:*$+**"J:F1JQC(L:MU )&KH .Q
MJW4!D:N@!$P?]<@@+/9,D?7(L:NJR+&K(.;UH *1JXB*D:N(J4R1JZ #3!_U
MJ0 LJ?^%TJFBD:O(L:N%TZ %)-(P!B L]DS(];&KJLBQJR#F]: &D:N(BI&K
M&*6K:0*%JZ6L:0"%K,;3T-*@!4P?]875AM2EAH76I8>%UZ  L=;%U,BQUN75
ML G(R,C0\.;7T.S0!XBQUL74\!(@2O8@ .1:96EL92!F96AL= #(R+'6JLBQ
MUF"QJZB^ -RY -T0KR!*]B  Y/X!3&%B96P@9F5H;'0 8*6KIJR%U(;5I8:%
MUJ6'A=>@ ,C(L=;%U,BQUN75L ?(T/#FU]#L.*76Z0:%UK "QM>QUH63B+'6
MA9)@J:F1J\BQJZJ] -R1JZ #O0#=D:L0 R W]J $3!_U(//L$ -,'_=(H *Q
MBJJ(L8H@3O9H\!W) ? MR0+P.LD#\$@@ .1.15A4(&9E:&QT $RC]B  Y$58
M250@;VAN92 N+BX 3*/V( #D3$]/4"!F96AL= !,H_8@ .153E1)3"!F96AL
M= !,H_8@ .1714Y$(&9E:&QT $RC]J:-\".EC"!.]B  Y$5.1$E&(&9E:&QT
M * "L8RJB+&,A8R&C8K0W6 @O?BI (6B(._DFT9I;&5N86UE(&9U97(@9&%S
M(&-O;7!I;&EE'AX> *D A:6I0(V^ JD C;8"(!XAP  PF*2ET [)0; KR3&0X\DY
ML-^0O(2E?R4KP!GM^0_ZO2 B(MTAJNK!ZL'Z0O#J[NCNR.ZW[+3LA^_O[2OO
MZ^U7(6LAQNV_[=[MV.V&[7WM5,FI^ICZHNUF^HOYA.U[[<'*2^]([\['+?[O_MC.ZQ[F_QEO$.\0;Q:?&0\2[M3.U'[;;J._:)\+[Z
M!^\0[S/O-N\P[SGOE?O![\/O2NY.[GCN$NY0_%/\F/R;_%#\4_R2_)7\W_J&
M\+'LJ^SD^@                                                  
M                                                     ,GQP_&[
M\<_QM>L[['?S .N6ZX/L!/Y5_PK^/O_2ZFO_4>MT_A?^AOXS_I+^2NL0_BS^
M2/Y._@;]F.P0_6KR=O*6\H#RBO*@\COU#O+\\07R%_*]\K7RJO+UZL[M$\ ^
MZ]7RWO+U\N7R[/+\\@+[5_)4]H+TK/1O]MGK5?TA]$KTB>P:[)3S">G=PPSU
M!O4Q(0#U7O1U\Q[U$O48]23UQ_)@\L'TUO/:\][SXO- (0CV%/9R]C3T(/86
M]*3SJ?2.]"7[9_)S\I/R??*'\IWR./4+\OGQ O(4\I;_G?^D_Z__Y?'5\=OQ
=&\