$LH (c)1983 Action Computer Services  B JKIHiDiELV`L=$ =$ BLV`CL$$l L$ &` Fj`8冨凪` $EӅӥ $`ʆǪƩ Ɛee` $ƦʆǢ &Ɛeǐ % %L$ $'&&&8儨児祂*L$&&*ń8&&L$ [%`hihiHHȱȱL$c !#3`L$JJJJ`H $h`Hȩh r$L% {$L% %$L% -$L% 3$H8`HhHh _&L% BHI V䅠L% L& =$L%Ԇ ؠPIPP` &P -$L% &L& &L& 'L&H- &8塪墨hL' 'L& &'L& &ȹP`텠8堨塪 &芨Oȩ-`PP &P棩 Ѥģ0-ģ6000:,80H & &ehe&eģ0ʥ 8堅塅`$ &&*i0:0i &Ʀ`¢ 护°ڱ%ȱ%E &L`(担CS R&L`(I 'L`(H (L`( &L`( &B V %NLMȑ` MLN%B VL%S:)E:)H L& ) ) & L&h)0I))L&[\ZUVT` @)))` G)L& :)L& @)L&) ` G)L& &%` 0d $ҥ `2)2ҩ`p`0)9*`@0)ӈJJJJ)`Ѕ`ȱ`` 5*ȥ`HhƣĢ`ƥĤ`Ѣ *`ȱѢĦ`膡``ťƤe8夰L* Ƥ8`ŦeѠe桊L*URiptrt)j?%;************************************j>CARD FUNC BGet(BYTE chanj> CARD addr,len)j> CARD@ +temp=Burst(chan,7,addr,len)jw> RETURN (temp)jc>%;************************************j7>BYTE FUNC BPut(BYTE chanjPRI_, CARDLy, %n,n,)n,n, @et,iu,t,iu,io,t,iu,is,ȑr,t,iu,iq,ȑp,n, Vt,iu,i`%;***L- %------ v,----`k(BYTEL]- %T-V-X-W-U- T- v,Y-Y-`c)j<L- %----i-i--i-i--i-i-ȑ--i -i-ȑ- S-i-i`um=drvL%. %.. ...R. -!.!.`disk.sLY. %P.R.T.S.Q.WP. -U.U.`RNL..... ?*(j (`************L. %...8.....ͺ...LH/;.m...m...m...m.........М.L.`jLM/I/I/ELR/`La/]/]/aL/z]/L/8]/ `]/`L/@ 5*@ҩ 5*`cL///IL 0K+j ) / J/  :)L/ERROR #/ R&/ &  :)L/ Press any key/ R&/ &`L0K+j ) / & :)LL0Please remove disk from drive 10, R&  :)L0 and insert PRINT SHOP data disk.0_ R& :)L00 ?& &`L0K+j ) / & :)L0Please remove disk from drive 10 R& :)L1and insert .PIC disk.1 R& :)L;11, ?& &`LK1++r+ L&L`1K:1] &jJ+ ) /Ye,Xd,1 %*8K+0 %*g,f,/$/$L1D1: 1Q+P+`ttoL11J+j1L1 ) /L+L2g,f,0 ?* J/`*****L2 2 2 2 2 2i 2iD 2i 2i: 2i 2i 2i 2i 2i 2i 2i 2i 2i 2i 2i 2i 2i 2i 2i 2i.Ȍ 2 2LP3 2m 2 2iI LJ3 222LG3 2m2 2i2i 2e 2i2L 3L2 2L2 2 2L3 2m 2 2iIL3 2 28 2 2LU3 2 2 2q 2iI.L3 2 28 2i 2iI.L 4 2i 2iI L 4 2 2 `eL4i+ީ ". 4 4IL44 4` 4 4Lm4b,m 4c,i 4+QLg4` 4L94`*Lv4K+j ) / R :)L44 R& :)L4򮠳4 R& :)L4ͮǮ4 R& :)L55 ?& TL451. Load PS File5$ ?&LQ52. Load Atari File5> ?&Lk53. Save PS File5[ ?&L54. Save Atari File5u ?&TRUL5 Select(1-4):5 R& &r4r4)r4r4 &0r4L5r45L5Rr4`*****L5 455IL8K+j ) /L26# for next file, to load6 ?& &UL]6Filename File Type6C ?& &5j555L855+ߩ ".55IL65 /L8+O+ލN+55L8N+iO+iL6`N+O+N+il,O+im,UO+N+ R&L7 7 R&l,im,iɁȱLS7LI7Graphic7A ?&Lj7Lc7 Screen Magic7V ?& &IL7P+iQ+iDP+iQ+i:P+Q+P+iQ+iN+iO+i q*l,im,i`N+i N+O+iO+5L655Lq6L185L+8 0L185 /`")j.2GeLR8 4:8:8L8 ) /L8# for next file, to load8m ?& & L&L8D:*.*8 &8; z&I8IOL8L8 U8; ?& &IL88; 2L8L8 L&L9:8IL9 0L9:8 /8;`L!9K+j ) /i,h,k,j, :)L`9This is a graphic file.9H R& :)L9&Enter X coordinate(0-232): ~~~~~~9s R& 'i,h,h,i,Lg9  :)L9&Enter Y coordinate(0-140): ~~~~~~9 R& 'k,j,j,ɍk,L9L+IL:  :)LL:"lear or xisting Screen?: ~~~~:) R& &99)99 ^/99IC 9IEL:9 &9IEL:  :)L:Overlay(Y/N)?:: R& &M+M+)M+M+ ^/M+M+IY M+INL:M+ &L:C9NM+9ICL;9L ;99`jc/L;;;;; 1;Ȍ;=;;L;d,m;e,m;;; ".;;IL|;L;;i~;;i;d,m;e,m; %*;;; ;;;L;L;;;L7;; /L+ &;` FOR xMH; jz. DOL < %;<<; 1 J/<Ȍ<<<L<;m<;m<;; ".;;ILx< << &%;e;e ; q*;;f=f=;Lt=0; .;L[=M+IYL=(<< &%d,ee,emh,mi,k,j,( &%ee; .L[>(<< &%d,ee,emh,mi,k,j,( &%ee; q*L?M+IYL>(<< &%d,ee,emh,mi,k,j,( &%ee << &%;e;e .L?(<< &%d,ee,emh,mi,k,j,( &%ee << &%;e;e q*<