koreth@panarthea.ebay.sun.com (Steven Grimm) (03/23/91)
Submitted-by: orc@vpnet.chi.il.us (David Parsons) Posting-number: Volume 5, Issue 6 Archive-name: chedit Here's another bit of Orc's Toolkit - part 3, chedit. Chedit is an incredibly inflexible character set editor for degas-style monochrome 8x16 fonts. It only works on standard (not Moniterm) monochrome moniter-equipped STs (It may work on a STe, but it's never been tested.) The source is written in the spirit of Chedit on the Terak 8510a, for those of you into random historia, and, in keeping with its history, is written with a fairly odd style and almost no documentation. Despite all this, it is a useful tool for modifying fonts. If you don't have Degas, or want a tool that is designed for working on fonts, this will do the trick for you. I've released it into the public domain, so you may do with it as you will. __ .david parsons \/ table !"#$%&'()*+,-./0123456789:;<=>? @ABCDEFGHIJKLMNOPQRSTUVWXYZ[\]^_ begin 644 ched_src.lzh M'CXM;&@Q+5X9 #24@ 8;-<%2 "$-(141)5"Y#"&W=[;,Y;68F#[_I\?A]z M0"YN;O/ZGM_UK@7-]:4]'H=7P?NIN*;S]?_^3J\V]I]P+3X;?OV4.Y,JI$W\y M;IY&^"'>NYM [5Q:U^Z"7;NOW5#1K'S[+P-Q%@U'E2(B/,/R<+AV]B :O*S%x MP\+7U$YD8!D&AR&K8M N6+Y5I"9;9FF+? G\C5"260)N@[>-^90>",&LCZ$&w MYQ--#!B]P50(Q_11&LPB+C1H\6'@>L V5ZMG.E^]WH.A4+#;QE#P@.$-?_?Ev MCD8APG914R2(O1/8ZZ#UZ(N*0$]^5N.]_4 $L/[?J+;SJ,7//9WI254LG; Vu MG#K6D#@G2]M)4[E4"P%&!S#Q&X&.>6*R=Q_D] ;R=V@_(T >ESFD2Z1X3+O[t MUU<4/1I(7_X^MT[T_BP]-]VQ,U%T*@\Q5S=%1%D>9=$2 )VF?>?\W<VJH?Z$s MU^2''KX'3 XU>25G7CX]94;XYHW@<R?4FKKMT!"K)KJ^Z0A8N3!" G:$.E&)r M()F$**,$#%J$'O4"!CY"'$T!#K<A"DX! RM"#G]C8[&A'6$V\:^ ]C@;C;4Lq M).^QD/T?8-MLQRD'U;IH^NE-7-N<WBV_E4 O9IZ_]YQ&7MET[SURE=L'/R%(p M$7AK9UF?4_[L\I)R2*/B#-(=M'=.ME_,-(<:9OX2YE2[1#%VQ#J+\O'%W90Qo M0CL"^\>#@.+#O=^L3CQ&%=S.)H=$*9$Q4[:$\SYF@+IUZS(6,IPL52+JBFPKn M;0G1 Q8/ORP?DX*'XRPVI&'$42!,5I"S#5+*CDZ6K#UJ[ZL(YUZ$58E%\)22m MAU5@65'D6<J;\IY??3^9W0,- S3:ME.]]10C\@7-8M269YOUX;B^2_13#H%-l M970*IA IF0"HN?(%<> 5KV=X+MO%W]8JN6FTMTA592K^E!]B!&%@A!H6#C+^k MJ)_N>F*D/##W+L? BP/7:_V<A/"'4K\\J]7?0.T#+_[EL[)WP1=I669-AM0(j M$.I((WM@1)\".=W8-COX$IG.6!"3X()*2WC[I!=<-VJXR=4PY0:B;>$QEP Wi M;I(CNX3=XF^W3HU (:&S_F M[^/! X?K/JLL%/6/.?0^XV!66[M-3-;12N5Bh M<^Y,K]!;NR9$P/22!G]/S492-]D5]^X^W!E-Y.'VR]F55\]2NP<[<6GGV"W'g M0*\)-VMUOO\!8/4_#)'W)ST;'(C0+D=;C]HK["/.<0;I?OS?2NA.#[53?\C'f MB!XM@4 _19:+-CLS<(XPWN#^'M Q+;OZS;77#6P?USXP$CL-/AHVFBDEA[A+e M>=Y@YSWHY)8#**P>GMZ^$DND6<[66%^4UK>^GT!6"5(8 [<K>?V-[%0DG*A1d ME<NO@P2KFA\(V*^BJ7Z^C&";1=!L#>WCOT,+U3M$I?NKVW7H5YM(COXZL "Jc M3X+1Y<$@*Z/I% >7>I$?Y.O*@@4TTY!"N[ @C;WYJ_2K#^#-DPWX/*2\..Q0b M3P#'(%X'[;=!1S"H4EC::V.%]!G=:$&_]MX+P^LJ=G1VR2O.WR$1O-L/=%.\a M,GQR9F^[N-4IX-(K]%R;[51=Y.O1?,?6#V.R/>)"WIJ^1"CTDZ8$-\C\QJ9Iz MM\8!3+GEFQ>5TM@E,Q[<%(]6%N086\V&UPKE/V0[59S%<].:AY;-!;#Q^8BTy MV7(F!*^_&YF2\3"JG!;AC0-T')[8@N8V=H/-G=S;1MP:+-F.+1@O@++Z)IKNx MYY3[C+TGDNF,?N@&5!]2,774"JB&)L*9JLZZOR0?\'XCVJA!Q#O?33TQ*.7#w MIBLEI8;,2<'7\FJG!OLX&H]7 JJY:S$U7!\B31$G5?C FOLK3\?+K(U45'Q;v M2H<R"S%P>:[O)<N5>@1Y%)7^#3GEQ;L577=<_ :TQK4_D-?"XF5:J*@_>C6Bu M4,:[C<RKWJ:C7?47G.+*M3XH5?-0]%Y:->5"K#UA5J#C6/1PMUE;=5'[7*(Lt MG" L99=OL635$66^6"R6.&-C"\QE-F%P:R/$DU:83S4N]*4')09(1XCIRP1_s M)(CH\X(\T@(_HN*O72".>]A'&@EZ)*DB)'[J" CY:N(WRHC2]W%OHDBJ%2B/r M@7\+7+%67KGQ?R 0?[?LS+.=.(0NEZ(N010N;W](68/XK\1D5M\$L3!<HNE%q MK?F=8F2^9]J:\?530*L<&\V;R >J ^?"!\N@YA#^7L/S\;>3SN'W@>S_3>J p MN5:;&<^.-GE"^WIK-_9M^QA)@QO)8?"]T,D8:6@7O<_DI P'R,'AYD]K7Y?Go MX(??F0'Q_A;F[;3S/EN114;M\OZK9-5LV&UZ+%M-/KZ,.OUS?E7\31-_T=&,n M>2<N<&Y$EYKZ>]3\C7ZOPSS CO3V +:V#[_IF<B_&500[Q^+LKU)W\6H""S1m M(3^ 'PK;T5TYR2=%SB3-^(4Q]BZ!U&:\UQ2^S]!'>H0WYM)%%C]:U35AA^:Pl ML&.(1QJ_T+XDM>^UF6S2:,>>-MUF^=;10M-D(RT:7--?D _@*T)U^DK/A=U%k M7CC"?]JJ5U5\QCQ8Q*LZ^=_(GI 0HL_FMQR1)V78H(X)<-^@E!HIU]O0./V!j MT1^@?Q(7^_XH,9#!M1<\2&QV71>B=.(5<A>7,+/LPR"O,)H(>9!3]"\2[.REi MW'6*I/&U;A0[_MG&1-;VBUL+'_(9QC=EMIWQ^1O6I ^;-KV0[@<Y\SP_B?95h MOGV-27^L"CVE28,G$<MYG ZYN^IX0PH%20EVP_E:?!$*.[;E7D@3WFNK7;XEg M3F$L^2)Q]7I]PX_#:R=/XC?.J^'VFL^VT_U?#1] 0C[R3\+(Y/M0_ZU'WY47f M>X49M$ZB^VCG&[ 31/7T1XQO;G*;7KWUV2KO^4MO4HP4S2;($^??("77V8T?e M@>'\Y'N@/I_?[WO_D+ Y[J=IQ)L O#$$^/!&NH%[,W1L%@8:S7?T &<EH9YHd M&;+*'XFSA/CMT)4/SF!^#@$.54-4MEKARN#DB"@RW\7%^5WS;+,BJ @MDIG'c M-2K&M?[3I#GJ?@,_'2F4#;PT$+'HO6X+.S)<TU<*VL3/[<(7%1*V+]-:%_"&b MMZ-$+;X K;K>='UJ62MX$I.?/(I?E66? ]#L8=J7^9PBYF&C[XKW0 =P0+$Da MFM=<[[].RYSVWD9GZJ* _^6]2?),Z _:?'.@/87\),FCLF@9S<:>!AU^,\\=z MZ/2Z]MX2PL\L8+?'^;BJZ+0#&647X(([LT':K=5JWXCF5==A(-[WX7OLM&++y MB&!V,W>06P6"V^66;J9S5G@=3GVS4C/]9K!9?\9TV6K16U. </[Z14WYYAB2x M*ZKVSK_M&%:V"][+N>J"W=:E;,"E\^39YHNGS%A3FA<6*3>77JWPFM30+DT8w M().?E_SC].4; .&O0=L#LE+U<XUKRM\I@W3M88-C*Z!@FH1KY7V5YABQNZE\v M//X5R&]F!6X7X>WN9FN D8BQ/Z"X,9"C(L "7O0<LE0<R$ C@6F;4-^B&X3Ju M]P)[#[?%K@G9J+IP''<X(\TPA42)"'.K+RSVV7- +XO5=XFUM\K":SLQ R2!t ML+2\K,A'[1S5&7(>M5A*MOZIQ?1B(]]"R=^JCB]"J@/M@][]8UO-D@03+/XTs MQ1_(<&S/; [M#2W2]?\([/$"T645<Q1L<NAA3WV<P^V0BD?HZ^Z].^]H[:N_r M[\1D9V]R5(OP1/.*@Y5[#?W<;WJV\+/,*\#BC912WO!%X/?-ZW>H'(9/]R;7q M4]??.RI)6%HQ>;C1O2L@[%4-]LU^X&4!JSS+-=-4NK^Q\-B'QWY/HX*FX3;Zp M$Y;6$15T,"Z;(NQ:\F?"TO)V,F^=3R*[-Q/LQE*'84'X-8:%@$8&MFQG=EYPo MQJ_,</OG+3^F?Y ;X%&&]9&\%/DMKAO#4;$;EK+1KCE6@"X[-MK]C>\Y7TW\n MP4K[GH4C&Q[V1>;*LSVQF+WH:JMU\*L]%23G%(6;LO>EW?[I^(R_(GPS<,?]m M5%BL*<G!;BEH6&O6+2^TG=84(^O^OZ#C;I.?!1Y<M69\A<MGYYB_(\Q=TG:7l M^E]OX=^;Y"^PW*:K[(_[[5N"T] M8.]2;T"L\[(GW>.(9@MC?YAG9A[OW;7Tk M+LDUFE)^[%N?UWH% V';+-/5W^6PQQ#:"2/ZLDG>,=[#]T!>LP]"C>C_<-1;j MV+97'=:NYY\0M@#!P,HUSJM,S1%/6+0<^!3WL_OS[?-<?S#^&%_.L@R7Q&'3i MM]&+@8NTXB Q-?$A3LO1GG!1;T9#Q1MHTO2DDV=HP:GOPQ>3UQ6O*&M%]#;,h MNNRSK+7:9]RD]Q096>ZK3P/H/3V@ZY1*H\W.8!H#1WEBJ+ROA7^"(6 =K9P7g MZ&]F79[)6RA/ %__%C=#YO _PR.E>JFLSMC6^[2MC@48EIP/D3]<UM!ISA_]f M!D1K9P55+1-82]-:_XUL2G*JM\JU2FZ:P_&2!+SD-;3D92K;ZK:K JV>K_&Re M,?'@\8%[>*K>!K$I5: O-,CB:P_G"(O;2PRF A&'-#[[;=YU+4 7>^\:Y2DJd MW*9DV>?OC%+CFKB3OU#R(/_R_Z*4L0^APT1PG:4?[V$E*4;2=TAOUWU&RXHVc M*<$[:A]/":+$2XDHE5QP*VQ7E/:(R6(E^+7XBZAQ$OQ%E$KL9/,-CWYB>Y_Lb M%@[U1YN\RHMQ,0.Y4^JZC.4(K:SD5KDMKENF\B%G7 IT>5+L"TP(A9(TG!D3a MQJ<IR["-#,3X2"^X#HUV3/BO-<M0?*#J>P6LP.2TE1\1)$O2&*6*6PA=:&JYz M;J_U?:>>=13,VL/M>55[]RY_#HQD]!CO[:-I#[TK\2?WN=I1?GNB;LH]"5^=y M36NY#(%%+KM&3&7YND>(_DEZC^ZRK=-#DO+ .A!HA(:/VU)8FE]<7*C_ J-Vx MEK=4_A-_"-J5+XW>_/3RMANAK>RR[JH"-I^,X*62;E\NAF)&,/6T$-]*;#84w MS2@HTB^7-[V*^3;:!+YP85^Y]W!<OVVWF^5 7^,D%TQ?0NI 7\-H%]PJ#DV v MO61<A_/-:+RH%]VN0O30ONNB\.!?3,T+O*PYQFZ *\SR<'.^A%_DZPN%7HN=u MW-N6H@AU8ZB[5JGU/>)6@3>$* 7W/VL[[-\!/\+\I^"@Y"]42"_%O5N,A=U-t MA?M%]JER%V1"%ZGMQ.3/N1M)$ 7Z\P1RT^ B<+_\3D?8'X$7A?S+->M/P(Y"s M_F6=OR4E_\J*++_)^X,T.CWI B2A]9?9^GQV]*<:RQVH77:3+?WZ2@_M O!Yr M]_@!?J(-XL'A+; @3C\3^&H,Y?D9_--",04_\V?^D-WE-(^?Y_RNPN)_[U%Gq MWW#NE/8A*4]]@0_;8COVTU[R K/GR2;AS)A!CA)5[]8/P:&ZK08/+8;V80?Cp M&@+P%%/9;[J(9-F.<W0VA'4VHD(:-<W_ +DBMVV=-;,B&EX#^_O[/D>O5*O2o MS]<2S#7X0GZY\#;QP^'R8<N8;L-5:^'YWF0WD!^9:/E5PJKY?]#ARX;K=HW3n MUZ*_JED"$QC4Q>,>PO$(Y(?^QL>Y>6?'M*<XN@__-__?I-2W'MHJS4/?%2FKm MA%@8N5KVVYH\,Y'LOXU34^V_-./\ -.LVL7));9R^(!3BM]-*_W!<18-N;]$l MOF=6#!+P7<"D9ONE(O#QVFR9<99 ]0I8[)SL1)N$,?]Q$A THBN'#Q/%3:+Jk MHD=W:.M6B&L@[7TCL?6"H5!5%CU0AO2NP)M?!WI6(=U9+ L+T_UF1I4+/\D5j M6:NH4E?NFXXFNK.27-%4S)QI4DUB58K1-AST?U30A$H"6)0*62+9".Y U8I$i MIJSZW+9B/9TR"08*T#3:-F&A/0AD%/$O?-7\3I0>ZK[K7_,Z__.C!M=G!MIZh MMN9N^28.;CC=',\I))"]VA-%!O=[W,Q)R$:/.E7U'=#QL!_?]RS/CQ,+\X4(g M%_QS&XH.\L7Z#$I8W'K'[X/>,;RF5/X.6C=!>T]TYG$(@F+&A*AJH.,ZWQG=f M-R+I3R:V8]->CC<>/;-&$1W@R"V:M'^:&O0G#[PU'MU1"7?F6*T.N<5I\FQ8e M=D-ZRBQZTJ=M*B\_&DNP B)S+*X]K/H(\36$PI[B"R#:(HN$Q]=:B,;__?=%d MR_22I$\OA>CWPS=-#X_,56GW7+*LQBRL)4L@(CRR4B_#Q:?2M(LD23;^ [7Sc M.,:EL]G%L9ETI3LI2*]_3=?&21!=S1>#P)B=.W6F/6JN3^X2ZD").703@#9-b MV2>OA.5UIDY-&"S>EF-4,>7=9JIETDLV]TQD+6I9[/LBH*HE3ZU?ZE"-5WE_a MJ@[,$T@R)-,&,FJ U6\OY13C_]-=Y>C"6NB9H#^(N6;(UZ)#=%;5\R9N98PIz M*IU.H4 V%?09<IPCZ$9MDDA( F^R2ZR\A%32)746F7,/>P:N+;K&?[@,#W=Dy M_]1Z[@I^)%*;']]]L2'GIX,=<-CM+7_L1=5E(9A=QNENIQV$6RF^^TRP(BLNx M[1_8$X?I0.U;&D;(OZF"@!9NR'HR']89JM$TR[\3^">T:3X$X]A9;=@%$w M=X&&!0M[O9;;<% I+X;%G&%"(YZF5@;^'6Z?K>KKCA@:B #"O-RH:52H&PT_v MQIA[B*>I%,**,D]%?Q!&>E!QG@4X;1N\^/PM'Q-F:HYMU_"D;TE'R\^6/6VBu M,E4S?AH#Q5'BQC. F!HF1//\'FZA1$ASZXW-W(U,6SF,#SUY1XU-.W]BB$+Et M+-M)4F.V^I9IO_4JSK+ES4 K, %< KB.I[;/G/IL=K[O%2)H8%E@^CIJ XNCs M^(CR&CU:.@4?F@T)#X:$_S$"Z//GFH=(VQ81NE"-Y^!;20*/B)4"_(U)'\\Kr M"EWY/^IELL;^2A*&K#=?*$XV8<+P@ML,'./<E)-^";.67;\WY_R V_'[_CX4q MCO[@X?![/R;%B5X-P,<KB;?:YQ2%=0@'U+XQY H!J;L:&K$AIM/2!2.0*0;)p M/4-(&1D4I^4O?L&\O:J,U&W-C4DM8'\:&O#][CI>D"UEJ4$<8;4U-9D^!2OPo M+M:!46IB1%\QU;.;!ZX%'"H#?JBYA/G$C%T2?V8DY;_A \ BG:69NJ0759VBn M5 .0=5?:( T#N8G53SE*W^NMQO#;?^FA/_/"C./E)'^?\Q_.^O_S?OO^9 6_m M_:6X48[^O\SHNIGF"&P>@I.F#IE@_<FC^Y_X0:X2I86/_ERT.B7TM']6LX7Ml M*-?SJNIH?0:E36[[^"0 MO6U- C5HC8WX7<\!7$:],>5Q1G%@_8S1X35#'$Dk MC5J)LXXFS\=&IEQA9, 3;+;_7*>I%E)3D7*=#V->WI3$R:8U-M<_S+CP\Q[3j M#J_F7V<4-2#"90K@6/C\#:D[5QV_CC^7A\N.EG'_64N'"RU<[*V>T>OHKB<Ni MG=."\A0"H\EL3B08!JH:WTN\?#I!"='<E8HJ!'/QW1T@<X*#Y3J3I5/F_C[%h MBJW7G[+1$TFG+5)M^52;T/II-!X[J3?S32:DB.@#GN S"]*/L%%^K2K-OL\Cg MD$UF2_FYFD@4L&BUHR(V+F=9==GN7'^X<B\LCQR(5A-*.JHPV.A[W2O<O7VEf M?]KN5/8+1JS6;*QH]TQ6LCW4#W(O-RR4=B<J>Y)EEY[[FH/=@;_CMHT="75%e M;WY%NLVF^+S*L)@EERR#DAS G]LYWM7D"T.E/%9:G3X<@Z-#.;?.U7Q)WTG]d M&#&&"OCHT.DX+T[?9P6^IM^7M=\C%(#0Q.UU5M*P?X_BX?7/ _HD/DA_BX']c M'8@^UY/T_,;['82NW7B,)&EKUGY949)J1);S*-P_*:I#]Q]1_*:J#]%0#\DUb M,H?K$GR35TW^^,SN;D_JJ/:#D+[8=\>8N.Q\_O2?[)'N*4EQ QEN3),(DO/Qa M@B1RXK_Y>866)4VCOP=*.'^;0%/@49MV"[^&[SDN@H;&N3?.Z]Y1_%XZ^'S=z MYS;L_?I-YCA3G2))94#+\@OZ0/M\%F8PG+CW&+>SK)T!WI"%/C)UGC4]VCU;y M$H5AG@P6,)(IU-PIBLEHOD4?/R0H:)EK,5PA6NAQMAR C"\!$SX@GP=1V-E;x MD6<8Y98X)PMM,68NQWE1SP@/".3G;/(;4'VY+$2ZI"P@\/QT]>_9)_LT387%w M/*\[9(3311&G%3N/,WUW7TZL36?4^P"1:K;O+"'[(7+.7:N^*?U*I.]=U2=Bv M]<P=FI>\-2I49>3Z]*.<)8AZJ=8_=K;JG=DC33:/$C'7.G\D;B<9XD:#1XR1u MW5E^_>^P'?8> WV8Y68579^C?A?V58U,;]JL-H%8?9-GW6%/16%/]WJ.,\^5t M[C&PN8;OWJJ" M\0%ZZ,,\]]!4T!&I?:7O56$!=1_OXU$?04K=>5UVN#P.0As MMWSHU5%MS\"K>]"P7XCV>,)"W1/FCFZ+->71+NB\GQAW11\A3F%C5I3=#*4.r M[H:\\4.;H2%$),0W0^@5=5!^>7QF$%%SGMH"'4,_[H1-!*3/1GX>3R2ZJ/6Rq M4=)_'8:8KRX8D'D%L)MA))'[>!,W[&HM RM2B5<9I21^W;^+AD7VV6]]P^BCp M_O(\!_E\-]%]A;I>=D1O(XG+</B[PTY]4DD<<:00P? T3[%24WN8C6L4K%C,o M.]NS)#/&UHSXXS=4 7CN%ERM&/I!D"]XB;;[#D-YCG[J"!>L)Z C'58,O]()n M;N]S^$\X:8.FA#R3@PBWWP2C"&E^- ZX(AG7>\&DH6>^MRY4;-0)F7[IA9GPm M_I)DHOV'L3'XH\Z)(QH360T#O^%&G[LQH.FWI#3]'Y4[/YB"540AKFGY] Hl M#!XL+6QH,2UN P0 'BS7!4@ A-04M%1DE,1=G#U^9RV+K/S[?O\?E]k M?Q?85[^_]:]_TL?"\ (P+8F'S^EV.;T^_R;FY[<U1T*SP2N]U:JCGSJ$^YB+j MC3>CW2?U-3@,W5C _CSU8"$W1B,D[I][*VS:/8;1X2.UC;.,./,,)J.3CF!5i M!Y%VH\5?@T <=2UL:#$MW@$ ,X" #SJ6P6( &4D5!1$U%Q;#,Y;G_3X_#h MZ@&LO__>^W]7+=U[_]& [W?@%LP5\K'!!*P*IW+7"N[2A2OJL^:\EG31HN_=g M*>OK / E^=23N9M&PD2XN)^:"1 IQ6X\'+/Q*[>\)P02'&-TI75<8JHZ2 &Nf M[]VWP4QQQ19:JZU9M&VWF=EMRW 32O:LNI 8HC*$*S!/Z H_Q8.:SO^!_[2,e MBEZN+(E*1"I0J;<?LEDI_?[/X/3/HIQDD(^ 2/Q)+AUTR54HW/A[(N^^*$CAd M=RQD('R2B+L&!IQ@A_P=^P*&,;P 7!\ZWA/Q6AB4YNC+:4DU\"RD>11\=GLJc M;(#_&D%%G_XR^VH[38GXBOD&3'MG)?3:9_Z;D"X; "D1#^APB& @/ZH=T^6Tb M\XZIP/H#JE^K'&(7_,G6'VO]J?MIHQ\<[4YIQ7?6OWL6$X8X>EN">Q;Z:O'?a MB51V>_SSQ9SP%*UU CSYVIZM4Y3)!F%7)_4VW1::M0FJ)AL#.T(<S)$*UWHQz M"U!]2151R5>7JKDNOZ=0<Z]KB-=?.<D)>DO\D)@RK[)+0I<W*+=%L*GS+&C@y MH\+\;K?!"YG2=71UQ.^7BHW1!EJ*:F;#(MNQ2VE-?@BZ579K7*O!Q12IZ-<@x 69@LGEE<.#99N!S'8,HAC(D@CXTT@ &;#w v end