L/CAR RUN"D1:FONTFACT.ORY":CD 0 rȱCC)(HCCh8`h`Ci}CDiD`  R@P  1  YΡ@ ߦ` L++L_ 6  r  *L i L ( (  l LL(    iEEܱE  1E L( LЫ0 7  B A@C=>? <   / CD%|C}G} r QL ` ߰")- Q" $G@}L,LX")R M0 Q|G$.}|$G Q$}$%8(() `(0)8` L } QL GL#` )A>DJiEȽE f  7y>>y??B= PL> L` }"*(! H H` U $ { L l F@  l$/@LEE E8EdE }é, HE=7EhEE  P" Bȱ$ ɛ=`= P wL  l L:   } w  @A  <  L E  w P  L  =   EEEiEȱEiE `L: } l =) = P L=) `LT30# LM NLLUV IL }M S =N LTUNLML(L)ML I&*IL GIɛILI   LE0 ' } E)HEh D  G T L.SROTCES EERF GȦ==*GBG ȄI>?d ] ] GI`}8 I 0IGI`ȱ$RSLS lWLQ*+U V (    TL}o$:;" 1P ȱ$/4ȱ$VWA **/ `$* ** L- ?} +ȱ$ɛ * ? . $0f?A[ 0: L  `$0``pi} ] 7=503)ۢ?B @A0Я=08L;`0 }   L HjGGh)G  D}`  @A8` D G)}GG)ݽG)(`B!L lE08E ' (Ep EFh2?B }8=ii(LHS S0 )h`L8 LiGH`Nfj****8jHi h`}L E JE8  &miHEEȱEEh`莠 !D =F E} LGH`L   8   `I0`  `+D}OS SYS L"TTUV`L\  ɐ ލ   C }DD  CD  DCIC0D DQ)   ) )LLl}č 1]_ ZLMOC. R'SE\    LHHD\ʎa} Q[ I  =' Q a: J/`511]`>p JBR   L  J }J >    eLg_v`a 0\L Z HH_\}ɛ&$_ɛ`_ ,ɛ`Ȅ J`DDRLUFFCICLCRSJIEEONODLNOOAUAORLNCL####PARNVBC}`-_  = = Q Q  _0` Z',, CL_#`\  S}%  &  V Z_ɛ B  Z I   & } LH IhLę`*J 0   ` L ` `Ȍ }8 S I 0A ]L _ ll Q = + P  `_`` !}} T = qTLl lXY Z  J   R   I Q "} I8Xi SL 7kɛL\(_R lLPR IK Q L_80  `L  { #} {`  LHJJJJ h) ii0HI B V` BLV_J EB V0`ɐɀɠ)H $} lh'L I QL_\ED`IH`Drive ErrorSystem I/O ErrorDisk fullWrite protectedFile Mismat%}chInvalid Filename}Happy-Computer DOS II+/D V:4.5M COPYRIGHT 1985 by Stefan DorndorfFile lockedDevice doneDirector&}y fullFile not foundBad Load FileNot DOS II+ FormatBreakInvalid Hex PC AC XR YR NV-BDIZC-> Source-> Destination[g'}x!0>QWc{hhhhXحΌ΋L;LHL9-* P P``(}̏*̐#``J 2`DMD1:+D1:+DOS SYS L}m??PAGCHBASSCHMAPCHDECCHALTBITGRIDCSPCTTLLNMLML2DLIFNFFFLFXEMDIRDEBDDVCHNUACICHLD*}DFLAAFLALOIDXHRKEOPLFLALLDBDPAVB6BsDA A A +} (( (( +(( S!P  .-[@ ,}@@e@3BH`@@8 By !@"@#@$@%Ac&'-}(AU)*+@,-./@01B62@3@b4567@.}8@ + AQ AT" AV@, A06@ AJ AT /}A`^ A`h$r|-@@-@@(8,&8, (68<,-@F:80},&8,!6@)68<,-@ :68,-8,&8,  $-@@68,- 1}-@@-@@%8<,"@ %68,-8,%8,  $&0-@@2}(000:/!@!-@@%(/ AD/!@ !-@@%(/ AN% @!-3}@@%(X-@@(000b/!@!-@@%(/ A@l/!@ !-@@4}%(/ A@v% @!-@@%($AR@-@@-@5}@-%@(>:8<,, ( AR$(!6@* @2(6-%@d6}'!@1* @'6-&@2!@* A(6- '!A'* A`'6-%@d'!AY7}* A$'6-&@2 !A#* AU6-*$4>'!* @d'6-%@2H'!@c* 8}@'6-&@dR!@* A(6-\$fp6-$@6-&@z-@@69}8,-F:%%, $ #A -@@3"67,.>:, $6-?:C:,<<<@,:}$104,104,133,205,104,133204,104,133,207,104,133206,104,104,170,160,0177,204,145,206,136,208249,;}230,205,230,207,202208,242,96$-%@(>:AX,."@6-&@8"@6-%@<}B"@6-&@L"@6-%@V"6-@`"6-@j"=}@ 6-@t"@ 6-@~: -@6@62@: -%@(>>}:AX,$$$%@F:%@,%A($$%@F:%@,%A(BBA$?}AdAU6-F:Ad,"AUA@A-"@)"@)"@)"@7 A`A A0@}#"@3 A`# A0#"@5 A# A0 #"@ A0# A0#"@@ A`A}# A0#"@b A# A0(#"@X A# A02#"@w A"# A0<#B}"@U A # A0F#"@T A!P# A0P#"@c A # A0Z#"@7 A" #C} A0d#"@B AY@# A0n A0xH-@"(,AdAU>Af@D}H AG"@!-@@":(Enter ATASCII code G@M"@!-@@"7(Enter cE}haracter D@M6-@:,# )!A'# A0"@*4&Af0 A B'F}gAf AP A -@"(*-%@*(>:AS,>:AX,$G}-@"(.-@@".(Clearing character.-@@-@@" H}"@ 68<,-@F, "@ 68<,-@ 6 @ J A`T-@"(^*-%@I}*(>:AS,>:AX,h$r|-@"(3-@@"3(Restoring ROM character.6J}-$@6-&@-@@68,-F:%%,  A A`-@"(K}*-%@*(>:AS,>:AX,$-@"(--@@"-(Storing character.L} A`-@@ 6-8,& %%0 :-%@(>:AX,DK 7%@<%@M},40=67%@<%@,.1K6-%@N-@"(X*-%@*(>:AS,>:AX,b$lN}vI"@6-@--@@?( DRAW/I A0>"@6-@--@@>(O} DRAW/-%@(>:AX,$K"@-%@$(568<,-@ A6-@`K P}AK"@-%@$(.568<,-@FA6-A@K A: -@6@62Q}@: -%@(>:AX,$-@"(M"@6-@--@@R}C(ASCII/M A P76-@!-@@7(/CHARACTER-%@(>:AX, S}$ 6-%@*"A(6-4 A0G A H*-%@*(>:AS,>:AX,RT}$\f6-&@p"6@6-A'z A0 A *-%@*(>:AS,>:AX,U}$6-467@,.0%67A(,.0467@,. A -@"(*-%V}@*(>:AS,>:AX,$ +70@@@70@@@ 9ARW}'AdAU9@e %-@%  I/O OPTIONS %-@@%  $ '@X}'@@9. $-@$  :-8  B ( 1 WHOLE font.L **(" 2 DATA statements forY} WHOLE font.V ( 3 PARTIAL font.` ,,($ 4 DATA statements for PARTIAL font.j  t ( :-~   ( 5 WHOLZ}E font. ( 6 PARTIAL font.   ( :- ( ( 7 Directory. ( ( :- ( ""( 8 R[}eturn to main program. =-@@"=(" Select required option  $ A%@@$ B'g #\} @)!@# A%@ "@ AV@$ #!* @# A&0 @ A'`# %"]}@)"@%6-A(( ??A) A8A) A8A1A1AHP2 A"< F (>:A%^},P !AR!6-Z 0@@@d 6-@@6(Generate loader subroutine n _}A&0 4A&0x 0Y*0y$ 6-@ A& 8-@@+(Start line no.. 8@`} !! @)!B'A' 2-@@ %( Increment 2@ !! @)!AA'  $a}  (>:A%, --@@-(Enter font name :   A'`@  4 ' A" AE@b} $$7@<@,4A( U"@)"@+-@@L(The font will be saved as :-U( c} T"@)"@+-@@K(The font to be loaded is :-T(  U"@)"@+-@@d}L(The font will be saved as :-U( " c%+"@)"@,*"@7-@@ Z(The loader will be savee}d as :-c( , @6 $@ -@@ (J -A T A'`^ h @ f}AR@r A)| @@ @ ?-@@?($g}  @ 0Y*0y$ @ S7@<@,4D.-@@S( WRITING TO DIh}SK. Please wait...  W7@<@,4C.-@@W($WRITING TO CASSETTE. Please wait...  @A0i}@ @67@,.1%67A(,.1467@,.@6-A( @@ *@ -j}@ 7<,40A1@ *@&@ 6-%++&@,$@, -@& 6-F:%,k}0 *@:  D  N @X "@ A4@b $l v @ AR@ A20l} @@ @ A2` 9-@@9(򠭠 -m}A  @$ @ U7@<@,4D.-@@U("READING FROM DISK. Please wan}it...  Y7@<@,4C.-@@Y(&READING FROM CASSETTE. Please wait...  @67@,.0%67A(o},.0467@,.@6- @@ )@ -@ )@ 6-%p}+$@, 67%@<%@,.1 -@* )@4 %>  H  R @\ q}$f p @ AR@z A4 @@ ?-@@?($r}  @ "0Y*0y@'"$ @ @@ 6s}- -@@ ADp !! A6%+&@,$@ (@   @$67,t}.GR.0$# 67,.POKE106,PEEK(106)-8#$$67,.GR.0$.67,. P=PEEK(106)+4$867,.CH=P*256$B6u}7,.CLOSE#1$Li67,. OPEN#1,4,0,567B:,%@,.>:@4,I67B:,%@,.f67B:,%@,.>:@4,i$Vv}67,.GET#1,N$`67,. FORA=1TON$j67,.GET#1,B$t67,. C=CH+(B*8)$~67,. FORD=0TO7$6w}7,.GET#1,E$67,. POKEC+D,E$67,.NEXTD$67,.NEXTA$67,.CLOSE#1$67,. POKE75x}6,P$67,.RETURN$ @@ 6-"@ AB-Ay}@ A@  @$(2 @@< 6-F"@ ABPz}-@A(Z7<,40 A9`d6-+&@,$@n A@x @$ ADp{}67<%@,.DATA6-%@6-B:=:'@,,##67<%&@,.=:'@,67%<%,.,|}6-%%@6-F:%,6-B:=:,,67<%&@,.=:,-@@67%<%,.,6}}-%%@"6-F:%%,,6-B:=:,,667<%&@,.=:,@ J(@T$^h ADpr6~}7<%@,.RESTORE|EE67%@<%@%B:=:%@$,,&@,.=:%@$, @-@}@ ADp## AC%++&@,$@, @ $# 67,.POKE106,PEEK(106)-8#$6}7,.GR.0$67,. P=PEEK(106)+4$67,.CH=P*256$67,.N=67%@,.=:,$67,. FORA=}1TON$67,.READB$67,. C=CH+(B*8)$&67,. FORD=0TO7$067,.READE$:67,. POKEC+D,E$}D67,.NEXTD$N67,.NEXTA$X67,. POKE756,P$b67,.RETURN$lv 6.6-B:=:,,}67@<,.=:,6-%@ 6-%$AR@ 6. 467@,. %67@,}. 467@,.467@,. %67@,. 467@,.467@,. %67@,. 467@,.}467@,. %67@,. 467@,.67@<@,.07@<@,4C:&6.C:0 B'g} =7@<@,4D:'6.D1:36-@= AFp<7@<@,0D&6.D1:26-@< AFp c}7@<@,30*+7@<@,/4)7@<@,48,*7@<@,4:z6.7@<@,6-@} AFp* 6.D1:46-@>6-6-H7<,4  AG@R7<,4. AG@\"@} AG@f6-%@pM5+7<,1A*7<,/Z,)+7<,10*7<,/9,C6-%@M AFz AH }G%7<,0 *7<,0.*"@=6. Name too long !G B'g67@<@,.''67@<@,.7<&}@,##67&%@<@,..FNT67@<@,.''67@<@,.7<&@,##67&%@}<@,..LST AH06. Invalid name !AR$ >:A%,70@@}@70@@@#-@@#( DIRECTORY'-@@'( 1) .FNT files'-@@}'( 2) .LST files$'-@@'( 3) ALL files."-@@"(Select 8 AIB!! @})!@AIL B'gV"@6.D:*.FNT`"@6.D:*.LSTj"@6.D:*.*t(>:}A%,~+@+@@36-!-@@3@@!-@@}! AP`@( B(6-@&@@!8-@!@B AP'@}'AdAU(-@#(( ԠΠ F:Ad,"AUAPp B'g$ +} AF:A,&@A +'0@@@A0@ *-@@* THE} FONT FACTORY,-@@,  *-@@*(By Sarah Keates(6-@@ 6(}Sint-Genesius-Rode , Belgium2'-@@'  <8-@@8 ͠F}6-F:A,%@P6-$AVZ6-F:AV,$AVd9@<@,9@,;A(,9@,};@,;@,;@@,;@@,;@@,;@,;@,nss;@,;@ ,;@,;@,};@,;@ ,;@,;@ ,;@E,;@,x A @ A  #AR-@@}"67<,.>:, 104,160,255,152,145,88136,208,250,96'6-6-'6- #ASp}-@@" 68,- 128,64,32,16,8,4,2,1c67@,. %67@@,. 467@},.c6.( THE FONT FACTORY - By Sarah Keates B67@,.>:@,367@@,.>:@,B67@,.46}7@,.0%67A(,.0467@,."-@@,-@@668<,-@ J6}8,-T ^$hr #AV|-@@"67<,.>:, 6-P:C:,'AV,}6-C:,&AV$AA%%6-F:A`,%AV$F:Aa,$72,169,70,141,10,212141},24,208,169,224,1419,212,104,64 >:A%,70@@@70@@@K@}'AR@9A0@KA1@& A0-@(:-@@}(D9-@9( | N get new characterN,, $ ........ | < get previous characterX,, $ ........ | }> get next character b,, $ ........ | C clear character grid l++ # ........ | R restore ROM characterv-- % .....}... | S store current character,, $ ........ | D /DELETE mode ++ # ........ | A ASCII/ input,, }$ ........ | M restore ROM set ,, $ | E exit program   000 000 |,, $ INT ASC | SHIFT}-I access I/O menu  -@@ (36-@6-@'6-@36-@!AR}!AV-%@(>:AX,'@'AR@6-?:C:,,AR %6}-@36-@e% A -%@(>:AX, $*4,-@"(,AdAU>*-}@"*( ARE YOU SURE HR20Y*0y#-@"((2 A0\ +fAVp70}@@@70@@@z D1:FONTFACT((2 A0\ +fAVp70K00000llllllll~`~~fl0fF68of;00000000f< 800000 0 ~~`0 0`0ff|ff||ffffff`x`ff`x``||~ZZ~ xs6<8<6sx00006~}||fff|`|vff|xl|||<xx0f< 8f>p`|ff|<```<>ff><>ff>|p`|ffw8<  xp`lxlf8<f}kc|ffffff>|f```>`<|~ffff>fff<ck>6f< x~ 0~<~~<}~x|nf8x8ff|`p>ff>|f```>`<|~ffff>fff<ck>6f< x~ 0~<~~<8888888fffffff>`<|fl0fF68of;`p88p`f<z46>ffskk~kk=f|skkkkcf`x`cf|f`x``hp=ff<4,V|xmlxxll```af~x }}|fnfm``}fnf|lff`<Ff\0hhblt8pp8? }ww<~~~<x`x`~<~~< }0~0 ~ <~~<@>fff;@0`b|ff|@ff:@@|x|`blvff0  8flxl0 f }~~jc|fffc@F|v```@>p<|00~0006ffn; ff<k>6f<x~ ~0~<~~< }~x|nf8x8~<f|b@;ff>F|v```@>p<|00~0006ffn; ff<k>6f<x~ ~0~<~~< >>>666666>`<|fl0fF68of; 0p88pf<go{s><>g8g>>np~w>>p~ww>88>w>ww>>w?<88p8~~p88p>}w>www~w~ww~>wppw>|vww~|x~xxx~xxx>wpww;wwwwww>wv||vwxxxxxcwww{{ww}>www>~ww~pp>ww~;~ww~ww>w8w>wwww;wwww>wwwcww>>wwww>8p>8888>p8||8l}?037370?9=;aa9ٙws6>6ٙ}>A]Q]A><~~~<x`x`~>>}?? ~~ 00 >?w;pp~wwn>wpw>?ww;>wp>?;ww?~pp~www<>>psv|vs<>f}kcnwwww>www>nww~pp;ww?nwppp?p>~wwww;www>ck>6w>>wwww?|8 0 }0 0;n*U*U*U*ww~pp;ww?nwppp?p>~wwww;www>ck>6w>>wwww?|8 0 fffffff>`<|fl0fF68of;p88pf< 80 0 ~~`0 0`<}f ``nf>ff~fff~~f<flxxlf`````~cwkccfv~~nf}<`|f<|`||~ 00~<f>``|ff|<```<>ff>>ff>|``|fff8<<``lxlf8<f}kc|ffffff>|f```>`<|~ffff>fff<ck>6f< x~ 0~}8x8ff|``>ff>|f```>`<|~ffff>fff<ck>6f< x~ 0~8888fffffff>`<|fl0fF68of;888>x|f<>>``~pppww``|l`cc>66wwcc0 0 ~~`0 0`c}cooo`?33sss~ffgggg`cc~ffwww``pp``pppc`oggssssss n~fflggg000ppp~gwggggwoggg}ccgggccpppccggg~ffwww`ssggggggggggo>gggogsss>ggggggfl7g@`0 xx6}c6>8pp8?}ww<~~~<x`x`~<~~<}0~0 ~ <~~<<>f>``|ff|<```<>ff>>ff>|``|fff8<<``lxlf8<f}kc|ffffff>|f```>`<|~ffff>fff<ck>6f< x~ 0~<~~<}8x8ff|``>ff>|f```>`<|~ffff>fff<ck>6f< x~ 0~<~~<fffffff |880  00((?0~ 0}`@ 80|<}f f``f<ffffbx`bbx``||ff~fff~ZZ~ xlxxl```bgv~nf}`<|<fffff<fff<<f<8pp8?}((((~~~<<~<~~<}0~0 ~ UUUxv`|fff>f`f< |v000|000`~`|fff8<f<`lxxl8<}fff`<|~fff;bt8|lf<|~L2~}8x8ff|`~| f``>`<|~fff;bt8|lf<|~L2~fffffff>`<|fl0fF68of;p88pf< 80 0 ~~`0 0`< }f 7ggo;3s~s3``p?cccccs6<gn||lopp``cccwkc|vvvvw }6cc633>006cco><66>333`>?ll 3333c>ccc6<cckwccf<6ccc6 ?f 3~@`0 xx6 }c6>8pp8? }ww<~~~<x`x`~<~~< }0~0 ~ <~~<6vv``|ffff6680>{2rއ<```|f~6<3 }|fffff~`~ff3c ? s333c66cck3~n۱6f[ۃ><~~< }~p|nf8x8f|`>ff~`~ff3c ? s333c66cck3~n۱6f[ۃ><~~< fffffff>`<|fl0fF68of;p88pf< 80 0 ~~`0 0`<$}f 7ggo;3s~s3``p?cccccs6<gn||lopp``cccwkc|vvvvw$}6cc633>006cco><66>333`>?ll 3333c>ccc6<cckwccf<6ccc6 ?f 3~@`0 xx6$}c6>8pp8?** TT$}wwT*TUU]x`x`~<~~<$}0~0 ~ <~~<6vv``|ffff6680>{2rއ<```|f~6<3$}|fffff~`~ff3c ? s333c66cck3~n۱6f[ۃ><~~<$}8x8ff|`>ff~`~ff3c ? s333c66cck3~n۱6f[ۃ><~~<$fffffff>`<|fl0fF68of;880  00f< 80 0 ~~`0 0`<(}f f``f<ffffbx`bbx``||ff~fff xlxxl```bv~nf(}`<|<fffff<fff<<f<f`f< |v000|000`~`|fff8<f<`lxxl8<(}fff`<|~fff;bt8|lf<|~L2~<~~<(}8x8ff|`~| f``>`<|~fff;bt8|lf<|~L2~<~~<(888888fffffff>`<|fl0fF68of;`p88p`f<x<6>ffsccncc8pp8?-}ww<~~~<x`x`~<~~<-}0~0 ~ <~~<>fff;``|ff|ff:>|x|``lvff0 8flxl0 f-}~~jc|fffc|v```>`<|0~0006ffn;ff<k>6f<x~ ~1~<~~<-}~x|nf8x8f|`;ff>|v```>`<|0~0006ffn;ff<k>6f<x~ ~1~<~~<,|||888lllllll8~|80n8l8pv0008ppx|<8><f<8|~~~~||||||> x1}|||v~x |||||||x0||8|||8p@`0 61}c6>8pp8?1 }ww<~~~<x`x`~<~~<1 }0~0 ~ <~~<|~~~|~~~|~0|8888~~|<|<<~~<<<<<~|8l8~|8p<~~<1 }8x8~~||~|8|888>~|8l8~|8p<~~<0 3fDDDDD>@<|'E$(*$   D((D|0~85} @<$ |>"> 4~> <"<  |B<| 0    0 @<@<  <5}D0$$<$d@8$8$$x$@@D8x$"""D8 < B<@<" xP  &"$f">""3@> H> d<f(00(&` ~b6**"#d4,4,&5}|$$$$>>""*&|""<$&<@<<@@~ d$$$$>f$$$<b"*>6#f$8$ff$<Hx>b>@`0 xx65}c6>8pp8?5}ww<~~~<x`x`~<~~<5}0~0 ~ <~~<$$$@ 8$$$$ $$$$8  x $$D8@ (4$$ ` 8$8$6 5}IIII,$$$,$$, > l$$$l$$$III66 l$$D8>D"|<~~<5}8x8$$, > l$$$l$$$III66 l$$D8>D"|<~~<4(((((|(|((>H< | F PP TH4   T88T|0|9} @80 ||  ((D|BB|BBB@@@@((DDB@p@B BDD|DD$B~B$88HP`PH((DDlTTDDDdTLD|9}8pp8?9}ww<~~~<x`x`~<~~<9}0~0 ~ <~~<:DLv$$xDb (H0 x@8X @@ ` X$( $|HP` 8(D $B$$X@b9} 8 @88DBD8$$D$x@~p~ b$$$8`<|fl0ff68of;p88pf< 0 0 ~~`0 0```nf>ff~fff~~f<flxxlf`````~cwkccfv~~nf="}f>``|ff|<```<>ff>>ff><``|fff8<><``lxlf8<f=&}kc|ffffff>|f```>`<|~ffff>fff<ck>6f<<~ 0~<~~<='}8x8f|```>ff>|f```>`<|~ffff>fff<ck>6f<<~ 0~<~~<<xxxx~~xxUUUUUUUUU*~0 0A)}`@ 80~~@ @``nf>ff~fff~~f<flxxlf`````~cwkccfv~~nfA+}`8`>p88p>>~0~ 0E2}`@ 80 0 ~~`0 0```nf>ff~fff~~f<flxxlf`````~cwkccfv~~nfE4}f<<f>``|ff|<```<>ff>>ff>|``|fff8<<``lxlf8<fE8}kc|ffffff>|f```>`<|~ffff>fff<ck>6f< x~ 0~0E9}8x8ff|``>ff>|f```>`<|~ffff>fff<ck>6f< x~ 0~0Dfffdddd>`<|fl0fF68of;p88pf<<\||| @||||~  0 0 ~~`0 0`.N88888I=}888888N<8xd8888 @`0 ||6I>}c6>8pp8?I?}ww<~~~<x`x`~<~~|8|$|8|~|8p<~~<IB}~x|nf8x88888>|8|$|8|~|8p<~~<HpPPPPpPp|TT||ււ|8n®$Hpبު~8((8$HPPH$pH$$Hpƒƪ8((88(X`pPp (PMD}|Ʋ|8hHh(lD|$^$: $T|$\|(((8|ƺD||ƺtpPppPppPppP(PP(`P((P`|ME}|ƺ~|ƺ|ƺ||ƺ||ƺ|ƾ|(( |檴ࠠMF}|ƺ||ƺ|~¾z((((8|T(ƪT((TT(((8(^|D\PP\D|P( |DttD|(TMG}6>8pp8?MH}ww<~~~<x`x`~bނPPp~ý}C𰾃8(xHhlD|࠼xHh((lD|MJ}~ý~}8nBn(.2祥祥f<|lֺ祥{Ffρ<~~<MK}8x8}8nBn(.2祥祥f<|lֺ祥{Ffρ<~~<L00000llllllll~`~~fl0fF68of;00000000f< 800000 0 ~~`0 0`0xff|ff||ffffff`x`ff`x``||~ZZ~ xs6<8<6sx00006~QO}||fff|`|vff|xl|||<xx0f<8pp8?QQ}ww<~~~<x`x`~<~~f>p`|ff|<```<>ff><>ff>|p`|ffw8<  xp`lxlf8<fQS}kc|ffffff>|f```>`<|~ffff>fff<ck>6f< x~ 0~<~~<QT}~x|nf8x8ff|`p>ff>|f```>`<|~ffff>fff<ck>6f< x~ 0~<~~<Pfffffff>`<|fl0fF68of;880p88pf< 80 0 ~~`0 0`f``f<ffffbx`bbx``||f~ff~ZZ~ xlxxl```bv~nfUX}b<F|<fffff<fff<<f<8pp8?UZ}ww<~~~<x`x`~<~~f?`|fff>f`f< |v000|000`~`|fff8<f<`lxxl8<U\}fff`<|~fff;fff<|lf<|~L2~<~~<U]}8x8ff|`~| f``>`<|~fff;fff<|lf<|~L2~<~~<T8888fffffff>`<|fl0fF68of;888>x|f<>>``~pppww``|l`cc>66wwcc0 0 ~~`0 0`cY`}cooo`?33sss~ffgggg`cc~ffwww``pp``pppc`oggssssss <<< n~fflggg000ppp~gwggggwogggYa}ccgggccpppccggg~ffwww`ssggggggggggo>gggogsss>ggggggfl7g@`0 xx6Yb}c6>8pp8?Yc}ww<~~~<x`x`~<~~6f<6f<`<|fl0fF68of; p88p f< 8]r}0 0 ~~`0 0`!``nf>(ff~fff)~]s}~*f<+flxxlf,`````~-cwkcc.fv~~nf/6c?@6>ABCDE]u}F8pGp8H?IJKLMNOPwwQRS]v}T<~~~<UVWXYZ[x`x`~\<~]~<^0~0_ ~ `<~~<a]w}<>f>b``|ff|c<```<d>ff>eg>ff>|h``|fffi8<jff>r|f```s>`<|t~uffff>vfff<wck>6xf< xz~ 0~{<~~<|]y}}~x|nf~8x8|f```s>`<|t~uffff>vfff<wck>6xf< xz~ 0~{<~~<|\fffffff>`<|fl0fF68of;p88pf< 80 0 ~~`0 0```nf>ff~fff~~f<flxxlf`````~cwkccfv~~nfa}}8pp8?a}ww<~~~<x`x`~<~~f>``|ff|<```<>ff>>ff>|``|fff8<<``lxlf8<fa}kc|ffffff>|f```>`<|~ffff>fff<ck>6f< x~ 0~<~~<a}~x|nf8x8ff|``>ff>|f```>`<|~ffff>fff<ck>6f< x~ 0~<~~<`000000llHhhhh|x \<@@||00   ``pp|00 |00  e}``|Ąx(x8 @ @Pp xHx8DD(00000000 $HH$H$Hxe}lt((DD|<@@<<@D8􄄄88pe}xxx@<@@ ||HH00HHHD((Dx00 @< <@  xx(|e}6>8pp8?e}ww<~~~<x`x`~<~~`<|fl0fF68of;880p88pf< 80 0 ~~`0 0`f``f<ffffbx`bbx``||f~ff~ZZ~ xlxxl```bv~nfi}b<F|<fffff<fff<<f<8pp8?i}ww<~~~<x`x`~<~~f?`|fff>f`f< |v000|000`~`|fff8<f<`lxxl8<i}fff`<|~fff;fff<|lf<|~L2~<~~<i}8x8ff|`~| f``>`<|~fff;fff<|lf<|~L2~<~~<h10GR.020POKE106,PEEK(106)-830GR.040P=PEEK(106)+450CH=P*25660CLOSE#170OPEN#1,4,0,"D1:SQUARE.FNT "80GET#1,N90FORA=1TONm}100GET#1,B110C=CH+(B*8)120FORD=0TO7130GET#1,E140POKEC+D,E150NEXTD160NEXTA170CLOSE#1180POKE756,P190RETURN0FORA=1TONls%&;&FNEORCAXFRCLEARBCAUESCCLFDNCCCCC10CPC25C55C1C6C75CHBAC25CC1DC56C56CC1C1q}2ACONSOXYCC1CC1XCHACCSASAORIC2C12LI  2K k**A@q}AA  % @ & '@@@@@@`A@Bq}IAVBhAY@@dAVBhdBqT AU!@"@#B$A`%Aa&@q}'@(A()*+B2y,-.Ad/@0@1@ 2@3Aa4Bsv56q}789:A;@<@=>@'?A'@@A@8 ""CREATE-A-FONT by Vince Ercegq}PROGRAM WRITTEN: 8/2/83(2o Ao;@,;@,;@,;@%,;@2,;@B,9,q}9,9,;,;,;,7n6.>:@0,!6.>:@),)6. 267,.;67,.L67@%,. U67,.n6.ERDICSLFq}T-=+*UKQ:AFB6.>:@',+ A .-@2">67,.>:,B K%-@2"!67,.>:,% P' -q}#68&,-P:#%?P,' Z26-F:,&6-+%,$&A#2BBy_/B2w6-&/6-?:C:,<BsD<$,q}d1+ A8AU%1B7tnW 6-$'6-?:C:,<&$<$,9AAHEAWAq}AHxQB2HAh'B2PAh9B2QAhEAQA}'AB2V'B2q}XKAR-%-@1/-%%C(>:$@2%,G K =B2Y!-&A&'+ =q}B2SA`36-F:,%F:,$%$%&@-&3S-%A%A%-3%@C%%q}ApS%%ApQ%%A2@ ! +6-%$5 A;6-G@FQ A02 -(ditq}(everse'(ata2(nvert9 (lear( ave Font)( oad Font9( rom (Copy)K@@!-@/(q} o (Copy)K(>:AV, Scroll UPY(>:AW, Scroll DN=(>:AX, Scroll LeftY(>:AY, Scroll q}RT\ (ndo( olor change&(uit2@>-@Y(ntic 4/5 Atari\$2 6-A!Aq}2F:,"A F:,"A/-%@0%()-%@0%/(  R:,"*T:,*F:,"A(q}T:,A  6-R:,F:, A06-%+!* ,&+!* ,336-%+",%+",%+",&+",&+",&+"@,q}  6-" !6-,  6-6 !6-@8 -%@0% (*-$. 8 AJF:,"@q}9@fTFK:)96-$+!@A* @,F(A^--@7<,0>:,# - q}AhA A@APAAA APAAA0APApAA0q}A@A`AAPr^ A6-@&0-A`@@6<B2SD-%H(P6-&^ Aq}| *-A`B2S! '-*$(T:,A A A1 6-%$-#68,-q}F:%,' 1 A P6-%@1&F:,(2, 6 A p= ApA8!-/-@#%9(Fq}:%,=  - ( PRESS JOYSTICK ;(BUTTON TO CONTINUE'1%%1-%%;(>:, --5 q}-%%(>:,!-%%-(>:%,1 5 T:,A3A8AU Ap) A3 AH -q}68,-F:%$, '-/-@%$%8&,D H  A p1-%@2#2' 1 A pq}H Ap((5(FILE (dev:filename.ext)9C A H -A#86-F:%,%q}%**F:%,. 8 ApU (>:AS, SAVE COMPLETE.-A2 < ApAK AU A&H Aq}p((5(FILE (dev:filename.ext)9C ApH+-A#0( )%% ( q}Ap52 (>:AS, LOAD COMPLETE.-A2 :& Ap A& A0Dj 6-6- Ap6(q}LOCATE CHARACTER TO COPYT(AND PRESS JOYSTICK BUTTON^ Ad6-j6-N4 -%F:%$%, * Ap4 Aq}X: --(%$%F:%$%,, 0 : Abl 6-6- Ap2(LOCATE CHARACTER TO H(REPLACE Aq}ND PRESS\(JOYSTICK BUTTONf Al6-lF 6--$%$%F:%$,( 2 Ap< AF AvS -q}68,-F:%$, (6-8,0->68&,-8,B K68,-S-K-6%$%8,92A&$&@q}= A K A pN -68,-F:%$, (6-8,3-6A68,-8&,E N68,-C-6-%q}%$%8,12$5 9 C A p) -68,-F:%$,)68,-8,$$ 8,!68,-8,&$ AB q}--&%$%8,024 8 B A pB -68,-F:%$,&6-8,'/"P:,868,-B A q}68,-P:,%D --&%$%8,22&6 : D A p$ -%8, $ A Pq}W Ap A@+(COLOR REGISTER/2(=(COLORAD(S( LUMINANCEW?6-%A? A)!A)q} )!) )!A@C $%"AF:A,, Ap6 AC(A  A`Y Ap+(PRESSq} 'Y' TO EXIT PROGRAM0>K:E)Y"@A! Ap A! A ;-@1-%F:q}BsD%&%P:',,1 ; A p6+@4B2w''3A86 1%%6-*9 6-6-q}1%%%-%%9(>:%&$+",,4' -R:,"*T:, ' A>(T:,A H -%%(>:,RVq} 6-R:,&6-%+!* ,&+!* ,V6-%+",%+",%+",&+",&+",&+"@,\  6-@1f!@16-q}p  6-z !6- -  A !6-& A C++!* @,)+!@1* @eq},96-&@2C A @!6* @26-% -%%(>:,$B 2-%@1'-:q}%F:%+&,',> B  A> 2-%@(0%+&,'F:,4 > AG6-?:C:,:,@-%@ $+",@"&+",J(>:q},N e A`jN -%-@!,(>:AV,0 : ApD AN At+ --@!$(>:q}AV,( +$~D6-A6-@Q,F:%,"A86-@D6-ApK-%%A-'%1q}%%;%%K%%A2E  -&&7$+"@,%$+"A,; E AJJ104,104,133,204,1q}04,133,205,104,69,204,133,213,104,69,205,133,212,96ii104,104,133,213,104,133,212,104,133,215,104,133,214,162,4,160,0,177,q}212,145,214,200,208,249,230,213230,215,202,208,240,96ALMOST DONE!!- 6-F:,%F:,$%A-%q}, - (>:AA,,AR#(>:AA,#%=-@8-%(>:AA,+-9(>:q}AA,= ] -1(#'THE ULTIMATE CHARACTER SET EDITOR'4(7(](! Created 8/2/83 by Vince Erceg]-@@"q}/(PRESS TO BEGIN=%@4Q%@!@P]BBw; #A0!-A6AT%"+/ ;q}@4.6-?:A6,-@.( PLEASE WAITB-6BBw&BBv.-:2$> B  q}2[ARA!AS';-ApA?"EI W-@B[" 67,.>:, #$q}EE104,173,31,208,201,6,240,10,232,142,10,212,142,25,208,76,1,6,96]]0,0,0,48,50,37,51,51,0,179,180,161,178,180,0,52,47,q}0,35,40,33,46,39,37,0,36,41,51,48,44([[33,57,0,44,41,51,52,0,0,0,0,0,0,0,48,50,37,51,51,0,175,176,180,169,175,174,0,38,47,q}502bb0,36,41,51,43,0,36,41,50,37,35,52,47,50,57,0,0,165,88,133,203,165,89,133,204,160,0,166,0,240<jj13,185,34,6,145,203q},200,192,38,208,246,76,148,6,185,73,6,145,203,200,192,38,208,246,169,155,141,26,2FEE165,0,73,1,133,0,96,104,104,133,204,10q}4,133,203,104,133,206,104ZRR133,205,166,206,160,0,169,0,145,203,136,208,251,230,204,202,48,6,208,244,164n**205,208,240,q}198,204,160,0,145,203,96x- Ap A`-D:*.*?-@!6.7,?7<,4 FREE SECTOq}A`+'"P:',-+%,'!(+ A@-+%,'( ;( ('(PRESS ANY KEY TO CONTINUE1 Apq}; A>( ( (END..PRESS ANY KEY* Ap4 A> A  F:,  Ap Aq}K6-6-@#6-%+6-%36-%;6-%C6-%K6-%3 6-%6-%6-%#6-%+6-%36-%q}; 6-%6-%6-$'6-A36-A';6-%S6-AU6-%#6-AY+6-%36-%?6-AVG6q}-%S6-B2y$D1:FNTCREAT.ER';6-%S6-AU6-%#6-AY+6-%36-%?6-AVG6p-