;<¤” « ÉÁXEPGRAF¤XEPFREAD¤XEPFREAÄXEPGRAÆA¤DIR¤SCR¤DRÖEXT¤FIL¤DRV¤€€€€€ € € € //XEP80 GRAPHICS VIEWER PROGRAM (LISTING 2)› BY MATTHEW RATCLIFF›(c)1988, ANTIC PUBLISHING› BPXEPGRAF$ USR›( BXEPFREAD$ USR›2TG†;@€,‡;@€,ˆ;Av€,Œ;@,‹;@,Š;@,T6‡.D1:*.*<S#@@E:.@SPUT XEP IN TEXT MODE, CLEAR SCREEN›FI0( Directory file spec (RETURN for ‡) 4†CB:†,I6‡.†P @ AZ+@!(* FILE ERROR *+ @pd @@‡n A0x@†(† A ‚@Œ 6Œ.D1:–_7+‡7@<@,0:,*+‡7@<@,01,_6Œ7@<@,.‡7@<@,  6Š.ª€-@B:‡,´#‡7€<€,4.6Š.‡7€,# A¾ €È=("(Graphics file to view &‹=B:‹,"@pÒ€-@B:‹,Ü‹7€<€,4.APæ €ð6‹7B:‹,%@,.Šú??+‹7@<@,4:,)+‹7@<@,4:,Ap 6†.‹6‹.Œ6‹7@,.† A€ A+ @@‹+@"(Loading picture file ‹,6-?:C:ƒ,:,6€-€%@) BPÆa104,201,1,240,9,170,240,5›Ða""104,104,202,208,251,96,162,0›Úa104,157,69,3,104,157,68,3›äa169,11,157,66,3,169,0,157›îa72,3,169,30,157,73,3,76›øa86,228,96,-1›0u& #B0ƒ;A,&6€-@:u" $Du)6ƒ7€<€,.>:,6€-€%@) BNu104,201,2,240,9,170,240,5›Xu$$104,104,202,208,251,96,104,133›bu%%209,104,133,208,104,133,211,104›lu""133,210,162,112,169,3,157,66›vu3,169,4,157,74,3,169,0›€u157,75,3,165,208,157,68,3›Šu 165,209,157,69,3,32,86,228›”u!!152,48,41,162,112,169,7,157›žu66,3,165,210,157,68,3,165›¨u211,157,69,3,169,0,157,72›²u3,169,30,157,73,3,32,86›¼u##228,152,162,112,169,12,157,66›Æu3,32,86,228,96,-1›€D1:XEPLIST2.BAS