[net.micro.amiga] SetFont

mcinerny@rochester.ARPA (Michael McInerny) (10/30/86)

[]

Okay, okay:  I'll give in to those without a 'C' compiler.  Here's
SetFont in uuencoded form.  I relinked it with Matt's "my.lib" and
Amiga.lib and it works, reducing the size from 17,000 bytes --> 4,900.

I'm also including the files "terminal.font" and "dotty.font", which
should be installed in the FONTS: directory.  You should also make
a directory FONTS:terminal, in which you should place the files
10, 8, and 7.  Finally, make a FONTS:dotty directory and install
the file "1".

Sorry the files aren't SHARed, but I couldn't find a quick utiltity
to do it.  No biggie, just cut between the ends/begins.  Save as
the filename.uue and it should be OK.

Enjoy!

-Michael



begin 664 1
M```#\P`````````!```````````````>```#Z0```!YP`$YU```````````,
M`````!H/@``!````````````````````````````````````````````````
M```````````,`````!H```````H``0!"``$``0`!```@(````&X``@```'``
M`````````$```````0`!``$```/L````!``````````.````1````%P```!B
(`````````_(`
`
end
begin 664 10
M```#\P`````````!``````````````$Q```#Z0```3%P`$YU```````````,
M`````!H/@``!````````````````````````````````````````````````
M```````````,`````!H`````!%0`"@!"``8`!P`!```@?P```&X`2````SX`
M``````````"%%",$!`H``````G"''A/C/G'```@(''"/'//OG(G#HN(LG/'/
M'/HHHHHOC@."`"`,`#`#`,``,&```````````````B(&J@"%/G,J!!$$B```
M!(F(HI($(HH@`!`$(HE$HDDDHHB!)$-LHDHDHJHHHHHHB("%`"`$`!`$@$"!
M$"``````````````!"$)%`"`%*A*"""#"```!)B`A)((`HHB""'B`HE$H$D$
M((B!*$/NHDHDH"(HHE%!"$"(@!`$`!`$`$``$"```````$``````!"$`*@"`
M/G"$`""'O@'`"*B!#/G+!''B"$`!!+HG($G'+OB!,$*JHG(G'"(E*B"""""`
M``'''''/&G&#$B-+'+&K'/)(HI(OB`"`%`"`%*D*@""#"```",B"`A`LB(@@
M`"'B"+ODH$D$(HB!*$(KHD*E`B(E/E"$"!"```(DHI)$)$B!'"*DHDI$L$)(
MJF$C!"$`*@```')I`""$B"`"$(B$(A(HB(A""!`$`((DHDDD(HB))$HIHD)$
MHB(B-HB(B`B```)DH)*$'$B!%"*DHG'$#$)%*F#F!"$`%`"``"!F@!$``"`"
M$''/G#G'"'.""`@("'(O'//D'HG&(OHIG.&LG''"(HG/C@.`/@&O'GGN),G)
M,G(DG$!$.#&B%)`O@B(`*@````````H``$``(```````````$```````````
M````````````````````````````````&``&`````$!@``````'`````````
M````````````````````````````````````````````````````````````
M````````````````````````````````````````````````````````````
M````````````````````````````````````````````````````````````
M``````````````8`!@`&``P`!@`2``8`&``&`!X`!@`D``8`*@`&`#``!@`V
M``8`/``&`$(`!@!(``8`3@`&`%0`!@!:``8`8``&`&8`!@!L``8`<@`&`'@`
M!@!^``8`A``&`(H`!@"0``8`E@`&`)P`!@"B``8`J``&`*X`!@"T``8`N@`&
M`,``!@#&``8`S``&`-(`!@#8``8`W@`&`.0`!@#J``8`\``&`/8`!@#\``8!
M`@`&`0@`!@$.``8!%``&`1H`!@$@``8!)@`&`2P`!@$R``8!.``&`3X`!@%$
M``8!2@`&`5``!@%6``8!7``&`6(`!@%H``8!;@`&`70`!@%Z``8!@``&`88`
M!@&,``8!D@`&`9@`!@&>``8!I``&`:H`!@&P``8!M@`&`;P`!@'"``8!R``&
M`<X`!@'4``8!V@`&`>``!@'F``8![``&`?(`!@'X``8!_@`&`@0`!@(*``8"
M$``&`A8`!@(<``8"(@`&`B@`!@(N``8"-``&`CH`!@)```8"0````^P````$
<``````````X```!$````7````&(````````#\CH`
`
end
begin 664 7
M```#\P`````````!``````````````#[```#Z0```/MP`$YU```````````,
M`````!H/@``!````````````````````````````````````````````````
M```````````,`````!H``````WP`!P!"``8`!P`!```@?P```&X`2````F8`
M``````````"%%",$!`H``````G"''A/C/G'```@(''"/'//OG(G#HN(LG/'/
M'/HHHHHOC@."`"`,`#`#`,`!,&```````````````B(&J@"%/G,J!!$$B```
M!(F(HI($(HH@"!`$(HE$HDDDHHB!)$-LHDHDHJHHHHHHB("%`"`$`!`$@$"`
M$"``````````````!"$)%`"`%*A*"""#"```!)B`A)((`HHB""'B`HE$H$D$
M((B!*$/NHDHDH"(HHE%!"$"(@!`$`!`$&D`#$"```+&@`$````(@!"$`*@"`
M/G"$`""'O@'`"*B!#/G+!''B`$`!!+HG($G'+OB!,$*JHG(G'"(E*B"""""`
M``'''''/)'&!$B-+'$I+'/)(HI$OB`"`%`"`%*D*@""#""``",B"`A`LB(@@
M""'B"+ODH$D$(HB!*$(KHD*E`B(E/E"$"!"```(DHI)$'$B!'"*DHG'$L$)(
MJF#C!"$`*@```')I`!$$B"`"$(B$(A(HB(A""!`$`((DHDDD(HB))$HIHD)$
MHB(B-HB(B`B```)DH)*$)$B)%"*DHD!$#$)%*F`F!"$`%`"``"!F@`H``$`"
M$''/G#G'"'."$`@("'(O'//D'HG&(OHIG.&LG''"(HG/C@.`/@&O'GGN&,G&
M,G(DG$!D.#&B%)'/@B(`*@````8`!@`&``P`!@`2``8`&``&`!X`!@`D``8`
M*@`&`#``!@`V``8`/``&`$(`!@!(``8`3@`&`%0`!@!:``8`8``&`&8`!@!L
M``8`<@`&`'@`!@!^``8`A``&`(H`!@"0``8`E@`&`)P`!@"B``8`J``&`*X`
M!@"T``8`N@`&`,``!@#&``8`S``&`-(`!@#8``8`W@`&`.0`!@#J``8`\``&
M`/8`!@#\``8!`@`&`0@`!@$.``8!%``&`1H`!@$@``8!)@`&`2P`!@$R``8!
M.``&`3X`!@%$``8!2@`&`5``!@%6``8!7``&`6(`!@%H``8!;@`&`70`!@%Z
M``8!@``&`88`!@&,``8!D@`&`9@`!@&>``8!I``&`:H`!@&P``8!M@`&`;P`
M!@'"``8!R``&`<X`!@'4``8!V@`&`>``!@'F``8![``&`?(`!@'X``8!_@`&
M`@0`!@(*``8"$``&`A8`!@(<``8"(@`&`B@`!@(N``8"-``&`CH`!@)```8"
E0````^P````$``````````X```!$````7````&(````````#\CH`
`
end
begin 664 8
M```#\P`````````!``````````````$-```#Z0```0UP`$YU```````````,
M`````!H/@``!````````````````````````````````````````````````
M```````````,`````!H``````\0`"`!"``8`!P`!```@?P```&X`2````JX`
M``````````"%%",$!`H``````G"''A/C/G'```@(''"/'//OG(G#HN(LG/'/
M'/HHHHHOC@."`"`,`#`#`,``,&```````````````B(&J@"%/G,J!!$$B```
M!(F(HI($(HH@`!`$(HE$HDDDHHB!)$-LHDHDHJHHHHHHB("%`"`$`!`$@$"!
M$"``````````````!"$)%`"`%*A*"""#"```!)B`A)((`HHB""'B`HE$H$D$
M((B!*$/NHDHDH"(HHE%!"$"(@!`$`!`$`$``$"```````$``````!"$`*@"`
M/G"$`""'O@'`"*B!#/G+!''B"$`!!+HG($G'+OB!,$*JHG(G'"(E*B"""""`
M``'''''/&G&#$B-+'+&K'/)(HI(OB`"`%`"`%*D*@""#"```",B"`A`LB(@@
M`"'B"+ODH$D$(HB!*$(KHD*E`B(E/E"$"!"```(DHI)$)$B!'"*DHDI$L$)(
MJF$C!"$`*@```')I`""$B"`"$(B$(A(HB(A""!`$`((DHDDD(HB))$HIHD)$
MHB(B-HB(B`B```)DH)*$'$B!%"*DHG'$#$)%*F#F!"$`%`"``"!F@!$``"`"
M$''/G#G'"'.""`@("'(O'//D'HG&(OHIG.&LG''"(HG/C@.`/@&O'GGN),G)
M,G(DG$!$.#&B%)`O@B(`*@````````H``$``(```````````$```````````
M````````````````````````````````&``&`````$!@``````'`````````
M``8`!@`&``P`!@`2``8`&``&`!X`!@`D``8`*@`&`#``!@`V``8`/``&`$(`
M!@!(``8`3@`&`%0`!@!:``8`8``&`&8`!@!L``8`<@`&`'@`!@!^``8`A``&
M`(H`!@"0``8`E@`&`)P`!@"B``8`J``&`*X`!@"T``8`N@`&`,``!@#&``8`
MS``&`-(`!@#8``8`W@`&`.0`!@#J``8`\``&`/8`!@#\``8!`@`&`0@`!@$.
M``8!%``&`1H`!@$@``8!)@`&`2P`!@$R``8!.``&`3X`!@%$``8!2@`&`5``
M!@%6``8!7``&`6(`!@%H``8!;@`&`70`!@%Z``8!@``&`88`!@&,``8!D@`&
M`9@`!@&>``8!I``&`:H`!@&P``8!M@`&`;P`!@'"``8!R``&`<X`!@'4``8!
MV@`&`>``!@'F``8![``&`?(`!@'X``8!_@`&`@0`!@(*``8"$``&`A8`!@(<
M``8"(@`&`B@`!@(N``8"-``&`CH`!@)```8"0````^P````$``````````X`
3``!$````7````&(````````#\CH`
`
end
begin 664 dotty.font
M#P```F1O='1Y+S$`````````````````````````````````````````````
M````````````````````````````````````````````````````````````
M````````````````````````````````````````````````````````````
M````````````````````````````````````````````````````````````
M````````````````````````````````````````````````````````````
M`````````````````````````````````````````````````0!"9&]T='DO
M,@``````````````````````````````````````````````````````````
M````````````````````````````````````````````````````````````
M````````````````````````````````````````````````````````````
M````````````````````````````````````````````````````````````
M````````````````````````````````````````````````````````````
=```````````````````````````````````"`$(`
`
end
begin 664 SetFont
M```#\P`````````,``````````L```!Q````;@```0L```!4`````0```!L`
M```4````"`````4````/````/@````L```/I````<2//````'"/`````)"/(
M````*$*Y````("QY````!"/.````!)/)3J[^VBA`2JP`K&<``*AA``%L(&P`
MK-'(T<@@:``0T<C1R$CG(#!%^0```*Q'^0```"QT`7``$!@FRF`"%-A1R/_\
M0AH@.0```"0@>0```"@2&%.`;QX,`0`@;_12@B;*8`H2&%.`#`$`(&\$%,%@
M\D(:8-Q"&D*;(`),WPP$2'D````L+P!.N0```!PCP````!!.N0```"PCP```
M`!0CP````!A.N0```IYP`"YY````'$YU80``QF$``+`CP````"!"IR\`)$`@
M*@`D9Q`L>0````@@0"(H``!.KO^"(BH`(&<H)#P```/M3J[_XB/`````$"/`
M````%"/`````&&<*Y8@@0"EH``@`I$ZY```"GG``8`0@+P`$+GD````<+P`L
M>0````0@.0````AG`B)`3J[^8DJY````(&<.3J[_?")Y````($ZN_H8@'TYU
M2.<!!BX\``.`!RQX``1.KO^43-]@@'!D8+!![`!<3J[^@$'L`%Q.KOZ,3G5"
MN0````A#^0```:P@/````!Y.KOW8(\`````(9[9.=0`````#[````!H````!
M```!N@```:H```&D```!:@```5X```%0```!0@```2(```$<```!%@```/8`
M``#D````U````,8```#`````M````*8```!R````;````%0```!.````(```
M`!0````.````"`````(````"`````@```30```#,`````@````D```"N````
MN@````````/P`````F5X:70R```````!0`````)P87)M17AI=````)H````"
M=V%I=&US9P````&0`````F1O;6%I;@`````!,@````)D;V-O;G,``````00`
M```$9G)O;5=O<FMB96YC:````````-H````#97AI=%1O1$]3```````!<@``
M``)F<F]M0TQ)`````#0````"7V5X:70```````$\`````F]P96Y$3U,````!
MH@````(V)#<U,@```````)8````"<W1A<G1U<````````````C4D-S4R````
M````D@````(T)#<U,@```````(@````",R0W-3(```````!V`````C(D-S4R
M````````8@````(Q)#<U.````````5@````",20W-3(```````!D`````FYO
M1$]3```````!=@````````/R```#Z@```&X``0``````````````````````
M````````````````````````````````````````````````````````````
M````````````````````````````````````````````````````````````
M````````````````````````````````````````````````````````````
M````````````````````````````````````````````````````````````
M````````````````````````````````````````````````````````````
M````````````````````````````````````````````````````````````
M````````````````````````````````````````````````````````````
M````````````````````````````````````````````````````````````
M````````````````````````````````````````````````````````````
M`````&1O<RYL:6)R87)Y`````_`````"5F5R4F5V`````````````E]$3U-"
M87-E````"`````)?<W1D:6X``````!`````#9&]S0VUD3&5N````````)```
M``-I;FET:6%L4U`````````<`````V1O<T-M9$)U9@```````"@````#87)G
M=D%R<F%Y````````+`````)?97)R;F\```````P````"7U-Y<T)A<V4````$
M`````D1/4TYA;64````!K`````-A<F=V0G5F9F5R``````"L`````E]S=&1O
M=70`````%`````)?<W1D97)R`````!@````#<F5T=7)N37-G````````(```
M``````/R```#Z0```0N_^0````!D!D[Y`````$*G2'D```!>3KD```#@4(\C
MP`````1*@&882'D```!O3KD`````6(]P%"\`80`!N%B/0J=(>0```(Y.N0``
M`.!0CR/``````$J`9@IP%2\`80`!E%B/0J=(>0```*!.N0```.!0CR/`````
M"$J`9AA(>0```+%.N0````!8CW`9+P!A``%B6(].=4Y6__"_^0````!D!D[Y
M`````)'(+PA(>0```"YP_R\`2'D```#0+4C_\"U(__0M2/_X3KD```"L3^\`
M$$J`9PIP'B\`80`!%EB/</\O`$ZY````1%B/$\`````;#````&0*<",O`&$`
M`/18CT*G3KD````P6(\CP````!P@0!(H``@,`0`-9@``Q")`(&D`I"U(__RQ
M_`````!G``"P+SP``0``<$0O`$ZY`````%"/+4#_^$J`9P``E"\\``$``'(D
M+P%.N0````!0CRU`__1*@&=H(&[_^-#\`!0B"")N__@C00`*TOP`%"()(&[_
M^"%!`!0A?`````P`&'(9(4$`'.2((4``*"\(+R[__$ZY````;%"/2'D````,
M3KD```"$6(\@;O_T+6@`'/_P<"0O`"\(3KD````84(]P1"\`+R[_^$ZY````
M&%"/</\CP````$8@+O_P3EY.=4Y6``"_^0````!D!D[Y`````$JY````0F<H
M<``0.0```!L,@/____]G"B\`3KD```!86(](>0```"Y.N0```,Q8CTJY````
M`&<.+SD`````3KD````86(]*N0````AG#B\Y````"$ZY````F%B/2KD`````
M9PXO.0````!.N0```)A8CTJY````!&<.+SD````$3KD```"86(\O+@`(3KD`
M``$\6(].7DYU3E;_U$CG`""_^0````!D!D[Y`````'`(+4#_Z"U\````W__D
M(FX`#"!I``00$`P``#]F&B\12'D```#T3KD`````4(]P"B\`80#_#%B/#*X`
M```!``AO:BU\```!'__@+6[_Y/_<(&X`#"UH``3_V"!N_]PO2``$4H@B;O_8
M$!$D;P`$%(!2KO_8+4C_W$H`9PX@")"N_^0,@`````]MT%.N_]PM;O_@_]@@
M;O_<4J[_W")N_]@0$1"`4J[_V$H`9N@,K@````(`"&\4(&X`#"\H``A.N0``
M``!8CRU`_^AA`/R`+6[_Y/_X("[_Z#U`__Q"+O_^'7P``O__2&[_^$ZY````
M`%B/(\``````2H!F&$AY```!)4ZY`````%B/<!LO`&$`_C!8CV$`_,XM0/_P
M2H!F"G`H+P!A`/X:6(\B;O_P(&D`,BUH`#3_]"\Y`````"\(+4C_[$ZY````
M`%"/2H!F""/N__0`````2'D```%+3KD`````6(]"IV$`_=98CTS?!`!.7DYU
M``````/L`````0````````*4````'0````,```0.```#L@```O@```+6```"
MO````H(```)Z```";````F0```)6```"3@```BH```(2```""````>@```&P
M```!C@```1````#P````N@```+````"`````=@```&@```!2````1````"H`
M```@````$@````4````$```$"````^X```.H```"0````C@````!````!0``
M`W0````%````!P``!!0```.X```"W````(8````P`````0````@```.@````
M$0````H```*(```"<@```EP```(P```"(@```=X```'.```!M@```:@```%>
M```!0@```0@```#H````S````&X```!*````&`````(````+```#^@```D8`
M```````#\@```^H```!4```````````````````````````$````````_P``
M```````D`````````"``````````````````````````#```````````````
M`````````````````````````&=R87!H:6-S+FQI8G)A<GD`1W)A<&AI8W,@
M;&EB<F%R>2!O<&5N(&9A:6QE9"X*`&EN='5I=&EO;BYL:6)R87)Y`&1I<VMF
M;VYT+FQI8G)A<GD`1&ES:V9O;G0@;&EB<F%R>2!O<&5N(&9A:6QE9"X*`&-O
M;G-O;&4N9&5V:6-E`'1O<&%Z+F9O;G0``````````````%5S86=E.B`@)7,@
M6V9O;G1N86UE/71O<&%Z(%MF;VYT<VEZ93TX75TN"@`N9F]N=`!/<&5N1&ES
M:T9O;G0@9F%I;&5D+2UF;VYT(&YO="!F;W5N9#\*`!MC```````#[`````,`
M```#````/````"@````@`````````_(```/K`````0```_(```/I````&TY6
M__A(YR,$*FX`"'X`?``0%0P``"!F!%*-8/00%0P``"UF!%*-?`$0%0P``#!M
M)@P``#EN("`'(@?C@20'YX+2@A052()(PE*-TH($@0```#`N`6#22H9G!B`'
M1(!@`B`'3-\@Q$Y>3G4``````_(```/I````%$CG`#HH;P`4(&\`&")O`!Q%
M^@`Z3^__="9/+'D````$3J[]]G#_2AM7R/_\1H!G$B\`2&\`!$A43KD`````
M3^\`#$_O`(Q,WUP`3G46P$YU```#[`````$````)````.@````````/P````
M`G-C7W!U=```````3`````-S='5F9D-H87(```````!,`````G!S7V5M<'1Y
M````0@````)?7V1O<')N=``````````"<'-?<VEZ90`````F`````W!S7V-O
M;6UO;@```````#`````````#\@```^D````(+P(D+P`(2&\`#"\"+SD````4
M3KD`````3^\`#"0?3G4```/L`````0````$````.`````0````8````4````
M`````_`````"7W!R:6YT9@```````````2Y,-``````"`````2Y,,P``````
M`````2Y,,@`````&`````2Y,,0`````<`````````_(```/I````!2\.+'D`
M```((&\`"$ZN_^(L7TYU```#[`````$````#````!`````````/P````!%]/
M<&5N1&ES:T9O;G0``````````````````_(```/I````#TCG,`(L>0````A,
M[P`.`!!.KO_03-]`#$YU```O#BQY````"$ZN_\HL7TYU+PXL>0````A.KO_$
M+%].=0```^P````#`````0```#`````@````!@````````/P`````E]/=71P
M=70`````+`````)?26YP=70``````!P````"7U=R:71E````````````````
M`_(```/I````/B\.+'D````$3.\``P`(3J[_.BQ?3G4``"\.+'D````$(F\`
M""`O``Q.KO\N+%].=2\.+'D````$(F\`"$ZN_MHL7TYU+PXL>0````0@+P`(
M3J[^MBQ?3G4O#BQY````!"`O``A.KOZP+%].=2\.+'D````$3.\#```(3J[^
MDBQ?3G4``"\.+'D````$(&\`"$ZN_H`L7TYU+PXL>0````0B;P`(3J[^8BQ?
M3G4O#BQY````!"!O``A,[P(!``PB+P`43J[^1"Q?3G4``"\.+'D````$(F\`
M"$ZN_CXL7TYU+PXL>0````0B;P`(("\`#$ZN_=@L7TYU```#[`````L````!
M````Y````-````"P````G````(@```!P````7````$@````T````'`````0`
M```````#\`````-?3W!E;DQI8G)A<GD```#@`````U]#;&]S941E=FEC90``
M`,P````#7T]P96Y$979I8V4`````K`````1?0VQO<V5,:6)R87)Y````````
MF`````-?5V%I=%!O<G0```````"$`````E]0=71-<V<`````;`````-?1G)E
M95-I9VYA;`````!8`````U]!;&QO8U-I9VYA;````$0````#7T9I;F1487-K
M````````,`````)?1G)E94UE;0```!@````#7T%L;&]C365M````````````
M``````/R```#Z0````LO#BQY````!")O``@@;P`,3J[_OBQ?3G4O#BQY````
M!")O``A.KO^R+%].=0```^P````"`````P```!P````$`````````_`````#
H7T-L;W-E1F]N=```````&`````)?4V5T1F]N=``````````````#\O``
`
end
begin 664 terminal.font
M#P```U1E<FUI;F%L+S@`````````````````````````````````````````
M````````````````````````````````````````````````````````````
M````````````````````````````````````````````````````````````
M````````````````````````````````````````````````````````````
M````````````````````````````````````````````````````````````
M````````````````````````````````````````````````"`!"5&5R;6EN
M86PO,3``````````````````````````````````````````````````````
M````````````````````````````````````````````````````````````
M````````````````````````````````````````````````````````````
M````````````````````````````````````````````````````````````
M````````````````````````````````````````````````````````````
M```````````````````````````````````*`$)497)M:6YA;"\W````````
M````````````````````````````````````````````````````````````
M````````````````````````````````````````````````````````````
M````````````````````````````````````````````````````````````
M````````````````````````````````````````````````````````````
M````````````````````````````````````````````````````````````
3``````````````````````<`0@``
`
end