Relay-Version: version B 2.10 5/3/83; site utzoo.UUCP
Path: utzoo!mnetor!seismo!lll-lcc!ames!ucbcad!ucbvax!mitre-bedford.ARPA!jhs
From: jhs@mitre-bedford.ARPA
Newsgroups: comp.sys.atari.8bit
Subject: corrected MAGIC files
Message-ID: <8701151943.AA01042@mitre-bedford.ARPA>
Date: Thu, 15-Jan-87 14:43:19 EST
Article-I.D.: mitre-be.8701151943.AA01042
Posted: Thu Jan 15 14:43:19 1987
Date-Received: Fri, 16-Jan-87 02:12:30 EST
Sender: daemon@ucbvax.BERKELEY.EDU
Organization: The MITRE Corp., Bedford, MA
Lines: 388

Here are the corrected files for the Turbo BASIC drawing demo program MAGIC.
MAGIC.TUR is the source code, and MAGIC.OBJ is a load module of subroutines
used by the compiled version.  You should cut these apart into two separate
files and uudecode each.  The filename of the output should be as specified
in the "begin" line of each.

When you have uudecoded them, MAGIC.OBJ should contain 954 bytes and
MAGIC.TUR should contain 15621 bytes.

-John S.
----------------c-u-t---h-e-r-e---f-o-r---MAGICOBJ.UUE------------------------
begin 644 magic.obj
M__]PB'N)BDB82"#1B&K*T/QNP@)J;L("*J;+*LK0_$BM,XF-F(BM-(F-F8AH
MC6"0:*AHJF"I`&#@H/#YX/_P]BDPXB2"(BTP,BR"(BTQ8
MBZD"C<("C<$"C7Z)()J+('"(8*7-C3.)I,3,Z,:&B-%XUHC1:-:(T:C6B-&8VLT`:NT0:]J&&=
MJ&'*$/>NTP88O1:-;=(&G1:-O1>-:0"=%XVNU`88O1:-;=4&G1:-O1>-:0"=
M%XV(T,=@2(I(K@O4O8"-C0K4C1C0:*IH0$BIWHT*U(T8T&A`,`8]!DBM"]3E
)%(T*U(T:T&A`
`
end
----------------c-u-t---h-e-r-e---f-o-r---MAGICTUR.UUE------------------------
begin 644 magic.tur
M`````68!9P&_`N0]]SU/J%)!24ZD1DE,1:1"4D6H05)4J$U,I$=20:3!54Y/
MPD=20;)/0E7.0T_,UT-/L43,R4U!T]C934E24D_2PMI:VEBQTT9!4L+%RDJQ
M2K++ST=2P5C(6;*@,M%2L.0`<`````)0Y`%@`````4'PP.00@@````%"HV
MART_.HH\B2P4+206-`-"!P.+%!L(C"T.00<(````&0Y!!Q(````4+!^,$D8Z
MC"4.01!"````+!0P"8P40A\.00<$````$@Y`%0`````6/@,G%1\.0059````
M$@Y`1@`````4)Q\.00(#````$@X````````62`-(%1\.0042````$@Y`2```
M```4)Q\.0043````$@Y`!@`````4.1\.0@5"A@``$@Y!`9(````410>-(@Y`
M!``````;2"064@-G&A\.0164````$H`XC2PE#D`B`````!0\-HXM1CH.005@
M````+"5&.@Y!!6$````L)`Y!`E8````45`B/+8XE#D`&`````!F.)0Y!`0``
M```48!^/$@Y!`4$````49`F/%&;V@<-#0P.00@`````%N0'(PXVART_.I`\
MB2P4(PH.02`P````)48Z#D$"`P```"P6[@=H&`=4.@X````````L(@X`````
M```;)S:1+48Z#D$7D````"P4-C:2+48Z#D$7D0```"P4/"R1$I(4:!Z3%PY!
M()`````2#D$@4````!(.02!@````$@Y!('`````2#D$@@````!;X!PT-"@Y!
M("`````6`@@;$2P.00%9````)I$2DA0;"@Y!()`````6#`@;$2R1$@Y`E0``
M```FDA0;"@Y!()`````6%@@C&2P.00%9````)I$2#D"5`````":2%",*#D$@
MD````!8@"#41+)$2#D"5`````":2%!\L#D$!60```":1$I(4-2P.00%9````
M)I$2#D"5`````":2%BH(#0T*#D$@(````!:V"!\5'PY"!3)(```2#@``````
M`!0?"@Y"`9`````6N`L*"@#,R<[%F\(+#0T,#D$(`````!;,"S45'PY!`@,`
M```2#@```````!0@-H0
M````+!)&.@Y!%Y$````L%$D'5#H.````````+"(.````````&PY!,(`````6
M_@L8#C:'+3\ZBCR)+!08"@Y!,&`````6"`P-#0P.03$0````%A(,("`'5#H.
M````````+"(.````````&PY!,)`````6'`P-#0H.03`@````%B8,31(VARU&
M.@Y!%Y`````L%"$VE"U&.@Y!%Y$````L%$T>DQ<.03%@````$@Y!,2`````2
M#D$Q,````!(.03%`````$@Y!,5`````6,`PI$2P.00%9````)I$2DA0?+PY!
M`5D````FAQ*4%"D*#D$Q8````!8Z#"D1+)$2#D"5`````":2%!\OAQ(.0)4`
M````)I04*0H.03%@````%D0,.1DL#D$!60```":1$@Y`E0`````FDA0O+PY!
M`5D````FAQ(.0)4`````)I04.0H.03%@````%DX,9Q$L#D$!60```":1$I(4
M'R\.00%9````)H<2E!0M+)$2#D"5`````":2%#LOAQ(.0)4`````)I0442P.
M00%9````)I$2#D"5`````":2%&0````+!)&.@Y!%Y$````L%#X'5#H.
M````````+"(.````````&PY!0(`````6Y@\8#C:'+3\ZBCR)+!08"@Y!0%``
M```6\`\7#0P.03$0````%!<*#D%`4````!:&$`T-"@Y!0F`````6I!`?%1\.
M0@4R2```$@X````````4'PH.0@&0````%H@3"@H`QLG,S)N2$WL)*`\!?103
M(PY!4``````4'S:5+0Y``P`````4*S:6+0X````````4>P%&:6QL($UE;G5E
M+$9I;&P@=VET:"!A8W1U86P@0V]L;W(L1FEL;"!W:71H(#(J,B!0871T97)N
M+$9I;&P@=VET:"`X*C@@4&%T=&5R;IN<$T<-#`Y"`@`````4$S:7+9$4'P>1
M(@Y``0`````;,PB,+0Y"`U(````9#D(#4F,``!0Y'XP2BQ0]"8P41PH.054`
M````%J83-PDVF"V-%!4VC2T.0`0`````%"0````+"<.
M0`0`````+!0[!Y$A#D`(`````"F1(`Y``0`````;#D%08````!;8$WH=-I$M
M4#I&.@Y!%Y`````L)PY`!``````L%#2(`Y`!``````;7C:9+5`Z*Y$F#D`!`````"PG#D`"`````"P40``$@X````````4>@H.05!@````%N(3%Q<'DB$.0!$`````&PY!4&``
M```6[!,7!P.9%`TLD1*2%!<*#D%08````!:6%(T5'PY"!3)(```2#@``````
M`!0A!Y1````+!*;%"D'FR(.0`$`````&S4VFRT.0`(`
M````%#\*#D%5-P```!:?%1L/!YLB#D`"`````!L;-ILM#D`!`````!:A%2@/
M'PY!`@8````2FQ0H-H0````+!)&.@Y!%Y$````L%$D'5#H.````````+"(.````````
M&PY!8&`````6HA<8#C:'+3\ZBCR)+!08"@Y!8$`````6K!<.#C:'+3\ZBCR)
M+!:V%SP\-ILM33HK*Y$F1CH.01>0````+"PC#D`"`````"PE*RN2)D8Z#D$7
MD0```"PL(PY``@`````L+!:[%PL+8I$2DA*;%C@8&`XVART_.H@\B2P4&`H.
M06`@````%E$8'Q4?#D(%,D@``!(.````````%!\*#D$!`````!98&PP,`-/1
MU<'2Q9MB&PT-#`Y!"``````6;!LU%1\.00(#````$@X````````4(#:'+3\Z
MD#R)+!0U"@Y!<"4````E1CH.00(#````+!9Q&T`8!U0Z#@```````"PB#@``
M`````!LG-I$M1CH.01>0````+!0V-I(M1CH.01>1````+!1`"@Y!<#4````6
M=AL-#0H.07`@````%GL;("`'5#H.````````+"(.````````&PY!<#4````6
M@!M0#C:'+3\ZD#R)+!04+)$2DA0C-H0````+!0R-I0M1CH.01>1
M````+!0X+)$2DA0^+X<2DA1$+X<2E!1*+Y$2E!10+Y$2DA:%&R`@!U0Z#@``
M`````"PB#@```````!L.07!@````%HH;&`XVART_.HH\B2P4&`H.07!`````
M%I0;2@XVART_.HH\B2P4'3:'+48Z#D$7D````"P4+#:4+48Z#D$7D0```"P4
M,BR1$I(4."^'$I(4/B^'$I041"^1$I042B^1$I(6GAL@(`=4.@X````````L
M(@X````````;#D%P<````!:H&Q@.-H#D`%`````!L=-HLMD28.0`$`````%"<*#D&0
M$````!90(PT-"@Y"`9`````66B-`0`%#:&]O1(@Y`!@`````;(1\.
M0@4R2```$@X````````4*PH.0@&0````%E8G%Q<'D1X.0`$`````&PY"`0&0
M```68"+8T4%3:-+0Y`!``````4'PP.00@`````%"4VC2V>%#$.(PL(@Y``0``
M```;5`F,%%X*#D(!`6```!9T)UP/'Y\2#D$!2!N87)R;W<@4W1R:7!E'(@Y`$0`````;'3:1+9$F#D`!`````!9F*QT/
M!XBL;#P>1(`X````````;&S:1+0X````````6A"L/"0>1(:$;
M#S:1+:$6CBL;#P>2(`X````````;&S:2+0X````````6F"L/"0>2(:(;#S:2
M+:(6HBL-#0H.0@$0<```%JPK2!4?#D$%60```!(.0$8`````%"C$BM&.@Y!%Y$````L)J,G#D`"
M`````"PGHQ1+"@Y"`1&0```6WBL?%1\.0@4R2```$@X````````4'PH.0@&0
M````%H@L;Q4?#D$71P```!(.0`,`````%"-
M(@Y`!``````;#D(!%4```!8*+8@E-HXM1CH.005@````+"5&.@Y!!6$````L
M)`Y!`E8````4/0B,+8XE#D`&`````!F.)0Y`)P`````421^,$@Y!`38````4
M30F,%%\?#D$%$@```!(.0$@`````%'$?#D$%$P```!(.0`8`````%(@?#D$5
ME````!*`.(TL)0Y`(@`````6%"U/%1\.0@5"A@``$@Y!`9(````4(3:@+0Y"
M!`5@```4+3:A+0Y`,``````4.3:B+0Y`<@`````413:C+0Y`!``````43PH.
M0@$0<```%N`N%!0`Q,7,Q=3%H-#)P]35TL6;ZBYH"2@/`7T4$R,.0@$@$```
M%!\VE2T.0!``````%"LVEBT.````````%#4,#D("`````!1H`41E;&5T92!0
M:6-T=7)E+"`@("`@(""@V<73H:`L+"PL+"PL+"P@("`@("`@("!.3YOT+A<7
M!Y$B#D`!`````!L.0%``````%OXN#0T*#D(!D````!;(,A`0`,3)T\N@S<7.
MU<6;TC)\#A$<#D`!`````!04*`\!?10>(PY"`3`````4*C:5+0Y`!``````4
M-C:6+0X````````40`P.0@(`````%'P!1&ES:R!-96YU92Q,;V%D(%!I8W1U
M2Q-86EN($UE;G5EF]PR)R<>D1<.
M0@$P,```$@Y"`34````2#D(!-P```!(.0@$Y````%N8R;@T-#D(!-@```!03
M*`\!?10E+0Y`$@`````2#D`%`````!0V*`\,3&]A9"!0:6-T=7)E%$@M#D`2
M`````!(.0`<`````%%@H#PL^("`@("`@("`@/!1J+0Y`$P`````2#D`'````
M`!1N`H(6ZS)''0>"-PY``0`````\#D`"`````"PT#P)#.AL]%QP.0`$`````
M$@Y`!``````2#@```````!(/`D,Z%$<*#D(!,$4``!;P,E8?-H$W#D`#````
M`#Q".H(L)0Y``@`````L+H(4.3:!-PY``0`````\#D`"`````"PN#P)$.A16
M%QP.0`$`````$@Y`!``````2#@```````!*!%O4R+A<(C"T.01=0````&0Y!
M%U0````4)"D<#D`!`````!*'%"H?C!*'%"X)C!;Z,F80*1P.0`$`````$HT4
M&@P.00@`````%$8VART_.D,ZA2P\#D`6`````#P.0`<`````/`Y"`VE@```\
M#D$X.0```"P443:'+3\ZB#R)+!1<$1P.0`$`````%&8*#D$!`````!:\-&X-
M#0Y"`38````4$R@/`7T4)2T.0!(`````$@Y`!0`````4-B@/#%-A=F4@4&EC
M='5R911(+0Y`$@`````2#D`'`````!18*`\+/B`@("`@("`@(#P4:BT.0!,`
M````$@Y`!P`````4;@*"%L$T1QT'@C<.0`$`````/`Y``@`````L-`\"0SH;
M/1<<#D`!`````!(.0`@`````$@X````````2#P)#.A1'"@Y"`345```6QC16
M'S:!-PY``P`````\0CJ"+"4.0`(`````+"Z"%#DV@3<.0`$`````/`Y``@``
M```L+@\"1#H45A<<#D`!`````!(.0`@`````$@X````````2@1;+-#$7"(PM
M#D$74````!D.01=4````%"`VARU&.HPL%"TJ'`Y``0`````2AQ0Q"8P6T#1;
M$"H<#D`!`````!*-%!H,#D$(`````!1&-H&5D(%1E>'0@)B!'5'EP92!I;B!T97AT('EO=2!W86YT('1O('!L;W0@%"H"@10T#`Y!"```
M```6[#85%1\.00(#````$@X````````6]C8C#C:'+3\ZD#R)+!0C"@Y"`4"`
M```E1CH.00(#````+!8`-R`@!U0Z#@```````"PB#D`!`````!L.0@%`<```
M%@HW21<(C"T.````````&0Y`!0`````413(.````````$@Y`(``````D*PY`
M!0`````FC"P2#D`0`````!(.0`@`````%$D)C!84-R$2-I$M1CH.01>0````
M+!0A-I(M1CH.01>1````+!8>-PL+69$2DA*!%C(W#0T*#D(!0&```!;(-Q\5
M'PY"!3)(```2#@```````!0?"@Y"`9`````6F#H/#P#)SM3%TM+5T-2;HCIE
M%1\.0@.9E0``$@Y!`3`````4+Q\.0@-ADP``$D8Z#D$74````"6`.(TL+!1!
M'PY!!1(````2#D"5`````!13'PY!!1,````2#D$!00```!1E'PY"!4*&```2
M#D$!D@```!:L.C<)*`\!?103(PY"`5`````4'S:5+0Y`!@`````4+3:6+8TE
M#D`!`````!0W#`Y"`@`````6MCHG#P>1'@Y`!@`````;'3:-+9$F#D`!````
M`!0G"@Y"`5`0```6P#H-#0H.0@&0````%LHZ3DX!4V5T($EN=&5R/B41-I$MD28.0`$`````%"4VF"U&.@Y!%U`````E@#B1+"P6
MJ#Y,%#:E+5`ZF"<.0!8`````+!0D-J8MF":E)`Y`%@`````4*C:8+8T40#:;
M+:8D#D`!4````"4.0",`````%$PVC2T.0`0`````%K(^>Q4K#D`%`````"4.
M0!8`````%!\,#D$((````!0Q'PY!!5D````2#@```````!0W-HTMF!1!#`Y"
M`6$````42P,.0`,`````%%\(CRT.0`0`````&0Y`1@`````4:RP.0"``````
M$H\4=R\.0&``````$H\4>PF/%K<^%14?#D$%60```!(.0$8`````%KP^8!0V
MART_.I`\#D(#:6```"P4*0=&.@Y!`@,````L'@X````````;.Q\.0@4R2```
M$@X````````45A\.01=0````)8`XD2P2I20.0!8`````):848`H.00$`````
M%L8^("`'5#H.````````+"(.0`$`````&PY"`6!@```6T#X@(`=&.@Y!%Y$`
M```L(0Y`10`````;#D(!8)```!;5/CLG-J4M4#HK1CH.01>1````+"8.0`50
M````+"<.0`)P````+!0Q#`Y"`6$5```4.PH.0@%@8```%MH^0R\VIBU0.BM&
M.@Y!%Y$````L)@Y`0``````L)PY``P`````L)@Y``@`````4.0P.0@%A,```
M%$,*#D(!8&```!;D/H,5'PY!!1(````2#D!V`````!0G'PY!!1,````2#D$!
M00```!1)-HXM1CH.005@````+"5&.@Y!!6$````L)`Y!`E8````480B,+8XE
M#D`&`````!F.)0Y`4@`````4;1^,$@Y!`3@````4<0F,%(,?#D(%0H8``!(.
M00&2````%O,^&P\'I2`.````````&QLVI2T.````````%O@^9P\VIRT.````
M````%"L(C"T.0@-BA0``&0Y"`V,S```:#D`#`````!0_")HM#@```````!D.
M0`(`````%%$?C"6:$J4D#D`6`````"6G%%4)FA1C-J&5D(%1E>'0@
M)B!'1(`Y``0`````ID2&5&PY"`@!0```69DYT%RT.
M0`4`````$I8E#D`"`````!0?*`\#("`@%#,(C"T.````````&0Y`!``````4
M1RT.0`,`````$I$E#D`"`````!11*`\%("`@("`48Q\.0@4R>0``$@X`````
M```4=#:'+3\ZD#P.0@-I8```+!9P3CH7+0Y``P`````2D24.0`(`````%"$H
M#P4M+2TM/A0E"8P4-Q\.0@4R2```$@X````````4.B067'9W#S:++0Y``0``
M```4&S:3+0Y``0`````4+1\.0((`````$@X````````40C:`.`X````````L
M+0Y`!``````45@B/+0Y``0`````9#D`$`````!1G-H`XCRPMCR8.0`$`````
M%&L)CQ1W-HTM#D`$`````!9F=@T-(PY"`P-@```6>G9-%PB/+0Y``0`````9
M#D`Q`````!0;(H<4*3:!-X\\CRPN/CJ'+!0M"8\431<<#D`"`````!(.0`0`
M````$@X````````2#P)+.A:$=HL-*PY`!P`````4'Q\.00<(````$@X`````
M```4,1\.00<)````$@X````````40Q\.00<0````$@X````````451\.00<1
M````$@X````````4:0B/+0X````````9#D`#`````!1X-H,XCRPM#@``````
M`!2'-H0XCRPM#D`!`````!2+"8\6CG8M%PB/+0Y``0`````9#D`H`````!0;
M(H<4*3:%-X\\CRPN/CJ'+!0M"8\6F'9J:@$Q,#0L,3("`@("`@("`@("`@0V]P>7)I9VAT(#$Y
M.#0@8GD@%MYV4BTH#R4@("!286QF($9IQ\.0@4W
M:```$@Y``0`````4AS:'+3\Z0SJ!+"P6!G>1%PB/+0X````````9#D`#````
M`!0S,H\2#@```````!(.````````$@X````````4-PF/%$D?#D$7D0```!(.
M0`4`````%%L?#D$74````!(.0%(`````%&T?#D$740```!(.00$X````%'\?
M#D$74@```!(.00&&````%)$?#D$75````!(.````````%A!WC!HVCRU&.@Y!
M`08````L)@Y`)``````4)A\.0@5">0``$H\4-#:H+8\D#D$"5@```!1,"(\M
MJ"4.0042````&:@E#D$&0````!18'X\2#@```````!1<"8\4:#:2+0Y`&```
M```4>A\.00<$````$@Y`%0`````4C!\.0059````$@Y`1@`````6&G=Z%1\.
M0@4R=P``$@Y``P`````4)Q\.0@4R2```$@X````````4.PB/+0X````````9
M#D`&`````!0_(JD441^H)0Y!!1(````EDB6/$JD450F/%&