"GIFCOM.BIN", UUencoded
                                       
   From: John Iannetta <76703.4244@compuserve.com>
   Reply to: John Iannetta
   Date: 26 Oct 1998 09:24:33 PST
   Organization: Concentric Internet Services
               *** comp.binaries.cbm is a moderated binaries- ***
               ***      only newsgroup (no discussion or      ***
               *** crossposting allowed) for Commodore 8-bits ***
               ***                                            ***
               *** For information on comp.binaries.cbm visit ***
               ***  http://www.concentric.net/~cdkaiser/cbc/  ***
               ***                                            ***
               ***  This file is also available via FTP from  ***
               ***     ftp://videocam.net.au/cbm/incoming     ***
               *** (allow time for submission to be received) ***


    This is "GIFCOM.BIN", UUencoded.  It is a Commodore-64 and 1541/1571
utility for adding a comment block to a GIF file.  Comment blocks contain
ASCII text, and usually describe the GIF image.  Comment blocks are defined by
version 89a of the GIF standard, and will not be displayed (or printed) by an
87a viewer.

    This program requires you to have the text in a PETASCII text file, on the
same disk that contains the GIF file.  Run the program and enter the filenames
of the GIF and text files.  When the smoke clears, you will have an 89a GIF
file with the comment block ahead of the image.  Documentation included with
this program.

begin 644 gifcom.bin
M`0@+"`H`B3(P,34`'`@/`)<U-2PN.I<U-BPY.0!7"!$`G#J&1D<D+$@D+%0D
M+$94)#I:)++'*"XI.DTDLL<H,3,I.D*R-SDS-CI1)++'*#,T*3J).3`P`(((
M%`!&LBXZF2)%3E1%4B!$25-+($12259%($1%5DE#12!.54U"15(N(@"="!8`
MF2(1*$5.5$52(#`@5$\@15A)5"XI(@"W"!D`F3J9(B`@.)$B.H5$.HM$LBZG
M-#DU`.0('@"+1+,TL$2Q,S"GF2*3$DE,3$5'04P@1$5624-%($Y534)%4B(Z
MB3(P`/8((P"7,3@V+$0ZGC4Q-S<W`"4)*`"+PB@R*;(QIYDBDQ(_1$5624-%
M(CM$.R*=($Y/5"!04D5314Y4(CJ),C``,@DM`(O"*#(IIS0Y`%8),`"9(I,2
M3D\@1E)%12!"3$]#2U,@3TX@1$E32R(ZB3(P`&X),0"?,34L1"PQ-3J?."Q$
M+#@L(B,B`(0),@"8,34L(E4Q(CLX.S`[,3@[,0":"3,`F#$U+")5,B([.#LP
M.S$X.S$`NPDT`*`X.IDBDR(ZC38P,#J+0;$Q.:>@,34ZF3J),C``WPDW`)DB
M14Y415(@0T]-4$Q%5$4@1TE&($9)3$5.04U%+B(`!@HY`)DB$2A04D534R!2
M15154DX@1D]2($1)4D5#5$]262XI$2(`/0H\`$9')+(B(CJ%1D<D.HM&1R2R
M(B*GGS@L1"PN+"(D(CJ>-3$U,3`ZF2*3(CJ@,34ZB3(P`$\*/P"?."Q$+#@L
M1D<D.J`X`&0*00"--C`P.HM!L3$YIYDZB34U`(<*0P"--3`P.E-$LE,Z4$2R
M4#J7,3DU+%-$.I<Q.38L4$0`I`I&`)DB$45.5$52(%1%6%0@1DE,14Y!344N
M(@#*"DD`F2(1*%!215-3(%)%5%523B!43R!35$%25"!/5D52+BDB`/$*2P"9
M.D94)+(B(CJ%1E0D.HM&5"2R(B*GF2*3(CJ@,34ZB3(P``,+30"?."Q$+#@L
M1E0D.J`X`!4+4`"--C`P.HM!L3$YIS<P`"D+40"--3`P.I\X+$0L."PB(R(`
M/PM2`)@Q-2PB53$B.S@[,#LQ.#M3`%,+4P"8,34L(D(M4"([.#M0JC,`@@M4
M`%>RPB@T-2FJ,C4VK,(H-#8IJC(S.I=7+#$V.I=7JC$L,3@S.I=7JC(L,@"N
M"U4`@4FR+J0Q-3JA(S@L020ZBT$DLL<H,38P*:>75RQ).DFR,34ZB3@W`,(+
M5@"72:HV.34LQBA!)*I:)"D`R`M7`((`W0M8`)@Q-2PB0BU0(CLX.U"J,C@`
M\PM9`*$C."Q!)#I2LL8H022J6B0I``\,6@"A(S@L020Z4K(R-3:LQBA!)*I:
M)"FJ4@`]#%L`BU*Q,38XIYDB$51/3R!-04Y9($),3T-+4R!)3B!&24Q%(CJ@
M.#J)-S``:PQ=`)DBDQ$B.T@D.TTD.U0D.TTD.R(13TY%($U/345.5"!03$5!
M4T4N+BXB`((,7@"8,34L(E4Q(CLX.S`[,3@[4T0`EPQ@`)@Q-2PB0BU0(CLX
M.U!$JC$`M`QA`*$C."Q!)#I4LL8H022J6B0I.I<Q-S8L5`#1#&(`H2,X+$$D
M.E.RQBA!)*I:)"DZES$W-RQ3`/`,8P"75ZLR,2PQ-CJ75ZLR,"PQ-C<ZEU>K
M,3DL,@`@#60`@4FR+J0Q-3JA(S@L020ZBT$DLL<H,38P*:>75ZLR,2Q).DFR
M,34ZB3$P-0`T#68`ETFJ-C<Y+,8H022J6B0I`#H-:0""`%P-:P"9(A%#2$5#
M2TE.1R`B.U$D.T9')#M1)#LB+BXN(@!Q#6X`F#$U+")5,2([.#LP.U0[4P"(
M#7,`H2,X+$$D.E14LL8H022J6B0I`)\->`"A(S@L020Z4U.RQBA!)*I:)"D`
MK`V"`(M&LC&G.#`P`+<-AP"+1J<S,#``P`V,`(DW,#``TPV@`%2R5%0Z4[)3
M4SJ),3$P`.4-R`"8,34L(D(M4"([.#M*``H.S0"A(S@L020ZBT$DLB(L(K!!
M)+(B.R*P022R(B$BIS(R,``?#M(`2K)*JC$ZBTJS,C4VIS(P-0`I#M<`2K(N
M.HX`3@[<`%0RLE14.E,RLE-3.I="+,8H022J6B0I.HM*LC(U-:>.`'0.X0"!
M2[(QI#(U-:M*.J$C."Q!)#J70JI++,8H022J6B0I.H(`>@[F`(X`D@XL`8M-
ML3(U-:=-LDVK,C4T.HDQ-C``K`XV`4:R,3I*LDTZC3(P,#J+2K(NIS$V,`"Z
M#D`!6+(N.EFR3:LQ`,0.2@&-,3`P,`#=#I`!H#@Z4B2R(C`P(JK)*,0H4BDL
M,2D`]PZ5`8M2L3FG4B2R(C`BJLDHQ"A2*2PR*0`.#YH!BU*Q.3FG4B2RR2C$
M*%(I+#,I`!T/GP&?."Q$+#@L1E0D`$$/I`&9(A%214%$24Y'($E.("([420[
M1E0D.U$D.R(N+BXB`&@/J0&9(A%.54U"15(@3T8@0DQ/0TM3(%1/(%)%040@
M/2`B.U(D`'@/K@&7,BQ+.IXU,3(P,@"+#[,!F2*3$2([2"0[320[5"0`K@^X
M`9DB$5-#4D%40TA)3D<@(CM1)#M&5"0[420[(BXN+@"Y#[T!GC4Q,S4T`.H/
MP@&9(A%!1$1)3D<@(CM1)#M&5"0[420[(B!43R`B.U$D.T9')#M1)#LB+BXN
M(@#U#\<!GC4Q,S@P```0S`&>-3$Y-#$`(A#1`9@Q-2PB4S`Z(CM&5"0ZES$W
M-BQ4,CJ7,3<W+%,R`#00U@&>-3(P,#,ZGC4R,C$P`%D0VP&9(A$N+BY$3TY%
M+B`@5D%,241!5$E.1R!$25-++BXN(@!U$.`!C38P,#J@,34ZH#@ZBT&Q,3FG
MF3J),C``@A#E`9DBDR(ZB3(P`)`0[P&7-38L,38P.H``KQ#T`9@Q-2PB32U2
M(CO'*#$T-"D[QR@R*3O'*#4I`,80_@&A(S$U+$$D.E.RQBA!)*I:)"D`XA`(
M`J$C,34L020ZH2,Q-2Q!)#JA(S$U+$$D`/D0$@*A(S$U+$$D.E"RQBA!)*I:
M)"D`_Q`<`HX`$!%8`H0Q-2Q!+$(D+$,L50`L$6("BT&Q,3FGF3J903J9.IE"
M)#J9.IE#+%4`,A%L`HX`51&\`H%)LC*D,30ZH2,X+$$D.I=)JD(LQBA!)*I:
M)"DZ@@!\$<$"B\(H0JHR*;(W,:_"*$*J,RFR-S.OPBA"JC0ILC<PIS<Q-0"<
M$<8"F2(1$DY/5"!'248@1D]234%4(CJ@,34ZB3$U`,,1RP*+PBA"JC4ILC4V
MK\(H0JHV*;(U-:_"*$*J-RFR.3>G1[(Q`-P1T`)0LL(H0JHQ,BDZBU"S,3(X
MIS<W,`#]$=H"6+(H4*\W*:HQ.DVR,JY8K#,ZBTVQ,C0PIS<V,``?$N0"2K)-
MJC$U.HTR,#`ZBTJG6+(N.EFR2JLQ.HDS,S``*!+N`HDW.3``11+X`D:R,C4U
M.DVR3:LR,SDZC3$P,C`ZB3$V,`!<$@(#2K(Q-3J-,C`U.HM*LBZG-SDP`&X2
M#`-8LBXZ6;(Q-#J),S,P`($2%@-&LC$ZC3$P,C`ZB3$V,`"7$B`#2K(R.HTR
M,#`ZBTJR+J<Q-C``H!(J`XDT,#``S1*$`YDBDQ$.U$A%(,=205!(24-3(,E.
M5$520TA!3D=%(,9/4DU!5"A#*2(`\A*&`YDB$4E3(%1(12##3U!94DE'2%0@
M4%)/4$525%D@3T8B`!P3B0.9(A'#3TU05=-%4E9%(,E.0T]24$]2051%1"X@
M(,?)QBA332DB`$(3BP.9(A%)4R!!(--%4E9)0T4@S4%22R!04D]015)462!/
M1B(`8Q..`YDB$<-/35!5TT525D4@R4Y#3U)03U)!5$5$+B(`EQ.0`YDB$1$1
M$1$1$1$1$1$1$1$@("`@("`@("`@("`@$EO0TL73TR#2Q=35TLY=DB([`*H3
MDP.A020ZBT$DLDTDISDR,`"S$Y4#B3DQ-0#B$Y@#F2*3U$A)4R!04D]'4D%-
M+"!&3U(@5$A%(,-/34U/1$]212TV-"!!3D0B``\4F0.9(E1(12`Q-30Q+S$U
M-S$@1$E32R!$4DE612P@5TE,3"!%3D%"3$4B`$@4F@.9(EE/52!43R!!1$0@
M(CM1)#LB0T]-345.5"([420[(B!"3$]#2U,@5$\@Q\G&($1!5$$B`'$4FP.9
M(D9)3$4N("#465!)0T%,3%DL($E4($E3(%1%6%0@5$A!5"(`FA2=`YDB1$53
M0U))0D53(%1(12!$25-03$%9140@24U!1T4N("#!(@#$%)\#F2)#3TU-14Y4
M($),3T-+($E3(%!23T)!0DQ9(%1(12!-3U-4(@#S%*(#F2)03U!53$%2($]&
M($$@4T522453($]&($585$5.4TE/3B!"3$]#2U,B`"$5I`.9(D1%1DE.140@
M0ED@5$A%(,?)QB`X.4$@4U1!3D1!4D0N("#33TU%(@!0%:<#F2+'R<8@1$5#
M3T1%4E,@5TE,3"!$25-03$%9(%1(12!415A4+"!!3D0B`'H5J0.9(E-/344@
M5T].)U0N("#&3U(@5$A%(,-/34U/1$]212`V-"PB`*\5K`.9420[(L=)1B#6
M245715(@,BXQ(CM1)#LB("C6Q\G&-C0NPLG.*2!"62#$059)1"(`V16M`YDB
MRD%.4T5.(%=)3$P@SL_4($A!3D1,12!42$4@0DQ/0TM3+B(``Q:S`YDBPE54
M($E&(%1(050@4%)/1U)!32!)4R!-3T1)1DE%1"!"62(`.1:T`YE1)#LBUL?)
MT,@NPLG.(CM1)#LB+"!93U4@5TE,3"!3144@0D]42"!415A4($%.1"(`:A:X
M`YDB24U!1T4@5TA%3B!93U4@55-%(%1(12!$14-/1$52("A42$4@5$585"([
M`(06NP.9(D1)4U!,05D@25,@4$%'140I+B(`L1:]`YDB$=E/55(@5$585"!-
M55-4($)%($E.($$@T,74P=/#R<D@1DE,12(`WA:^`YDB3TX@5$A%(%-!344@
M1$E32R!!4R!42$4@Q\G&($9)3$4N("#)1B(`#1?``YDB5$A%(,?)QB!)4R!4
M3R!"12!$25-03$%9140@3TX@04X@S=,MQ,_3(@`\%\$#F2)-04-(24Y%+"!%
M04-(($-!4E))04=%(%)%5%523B`HP](I($U54U0B`&@7P@.9(D)%($9/3$Q/
M5T5$($)9($$@3$E.149%140@*,S&*2X@(-1(12(`EA?$`YDB5$585"!&24Q%
M($-!3B!"12!.3R!-3U)%(%1(04X@,38X($1)4TLB`,$7Q0.9(D),3T-+4R!)
M3B!,14Y'5$@@*#0R-C<R($)95$53*2P@04Y$(@#G%\<#F2(@("`@("`@("`@
M("`@$EO0TL73TR#2Q=35TLY=DB([`/H7R`.A020ZBT$DLDTDISDW,``#&,D#
MB3DV.``U&,H#F2*35$A%4D4@35535"!"12!!5"!,14%35"!/3D4@1E)%12!"
M3$]#2R!/3B([`&88S`.9(E1(12!$25-++B`@U$A%(,?)QB!&24Q%($U!62!"
M12!!3ED@4TE:12XB.P"4&,T#F2+42$4@0T]-345.5"!"3$]#2U,@05)%($E.
M4T525$5$(,+%QL_2Q2(`Q1C.`YDB5$A%($E-04=%($1!5$$L($%.1"!42$4@
MQ\G&(%9%4E-)3TX@5TE,3"([`/,8SP.9(D)%($-(04Y'140@5$\@.#E!+B`@
MU$A%(%1%6%0@1DE,12!724Q,(@`D&=`#F2)"12!30U)!5$-(140L(%-/($U!
M2T4@4U5212!42$%4(%E/52!(059%(CL`4AG1`YDB250@0D%#2T5$(%50($E&
M(%E/52!$3TXG5"!704Y4(%1/($Q/4T4B`(,9T@.9(DE4+B`@Q4Y415(@5$A%
M($9)3$5.04U%4R!&3U(@5$A%(,?)QB!!3D0B.P"P&=,#F2)415A4($9)3$53
M($%4(%1(12!04D]-4%0@04Y$(-?!R=0@*$E4(@#<&=0#F2)$3T533B=4(%)%
M04Q,62!404M%(%1(050@3$].1RDN("#!3D0B``T:U0.9(E)%345-0D52+"`B
M.U$D.R)/3D4@4$E#5%5212!)4R!73U)42"`Q,#(T(@`A&M8#F2)73U)$4R([
M420[(BXB`%8:V0.9(A$1$1$1$1$1$1$1("`@("`@(!);T-+%T],@TL74U=+.
M(-3/(-#2S\/%Q<1=DB(`?1K;`YDB("`@("`@("`@("`26]#2Q=/3(%@@U,\@
MQ=C)U%V2(CL`EAK>`Z%!)#J+022R322GF2*.DR(ZB3(P`*T:X`.+022R(E@B
MIYDBCI,B.HDT.34`MAKC`XDY.3``R!KH`Y@Q-2PB0BU0(CLX.RX`WAKR`Y@X
M+,<H6"D[.I@X+,<H62D[`.P:_`.+1[(NIS$P-3``_AH&!)@Q-2PB0BU0(CLX
M.S4`(!L0!)@X+,<H-38I.SJ8."S'*#4W*3LZF#@LQR@Y-RD[`#4;&@28,34L
M(E4R(CLX.S`[5#M3`#L;)`2.`&$;WP>7-38L.3DZF2*3CA%/3D4@34]-14Y4
M(%!,14%312XN+B(`>1OD!U"RPB@T-2FJ,C4VK,(H-#8IJS$`CQOI!XO"*%`I
MIU"R4*LQ.HDR,#(U`*0;[@=0LE"K,3,R,SI3LC4Q,C`R`,`;\P>!2;(NI#$S
M,C,ZEU.J22S"*%"J22DZ@@#C&_@'4+)0JS(P.#J74*LQ+"XZEU"K,BPN.I<R
M+%"M,C4V`/H;_0>7-#4L4*\R-34ZES0V+,(H,BD`"QP"")<R,#4T+#0X.HDQ
M-0```*D`C0[<J0*%^ZD@A?RB_XX"(,J.`2"I(8T`(*(((,;_H`&B_B#D_R`1
MRI'[))!P.LC0#>;\J<C%_/!8J?^1^\C*T.&NK07@,-`6HCF.K06NK`7@,-`/
MHCF.K`7.JP70PLZM!="]SJP%T+@8F&D#A?N0`N;\I?O)`O`9..D#H@*&FZ3\
MR0#0`8C)`=`!B(2<H`"1FZD(3,/_H@\@R?^I4R#2_ZDP(-+_J3H@TO\@P?5,
MS/_&`:`"L2V%M\BQ+86[R+$MA;RI"(6XA;FENH6:(+'_J?@@D_\@P?6I+"#2
M_ZE!(-+_(*[_J0"%MR#`_Z(((,G_H`"$FZD@A9RF_+&;(-+_R-#XYISDG-#R
MQ/OP"+&;(-+_R-#TJ0`@TO^HJ1^%G+&;(-+_R,0"T/:I""##_^8!3,S_($3E
MI0&--`.I-X4!H@@@QO^IP(7[K8@":0.%_"#D_R#D_ZD8C34#(.3_(.3_I9#0
M/"#D_Z@@Y/\@E;,@W;T@'JNI("#2_R#D_]`=J0T@TO_.-0/0TJ`GN<')D?N(
M$/@@0O')#=#Y\+H@TO^0V:`GN>G)D?N($/@@0O')#=#YJ0@@P_^M-`.%`4S,
M_R`@("`@("`@D)*%DY.@DH64E9*.H(:/DJ"-CY*%("`@("`@("`@("`@("`@
M()"2A9.3H)*%E)62CJ"4CZ"%F(F4H(2)DH6#E(^2F2`@("`@R=NP*<G!D`,I
M?V#)>[`>R6&0`^D@8,E;L!7)09`#:1]@R2"P"LD-\`;)"O`"J2!@J22%^X7\
MJ0B%N*D"A;>I`(6YA0*%O*G[A;L@P/^P>Z(((,;_H@8@Y/_*T/JB`JDPC5?/
MJ2"-6,\@Y/_P!IU7S^@0]:`)BI$MR*E7D2W(J<^1+2#D_R#D_R#D_Z@@Y/^J
MT`.8\#>*()6S(-V]N0`!\`:9?\_(T/6I()E_SR#D__`&R)E_SQ#UF*`0D2W(
MJ8"1+<BISY$MQ@+0`N8"J0@@P_],S/^I`(6;A9R%OB!*S/`1A;"ELX6QYIO0
M`N:<(&3,T.^$CZ(!Z"#D_YT`8.2/T/6EL(7[I;&%_*D`A;ZI"$S#_R!*S/!G
MIH_H\"@@Y/^=`&#HT/<@A<P@Q,RELHT`8(6PI;.-`6"%L>:;T`+FG"!DS)#1
M()+,YIO0`N:<YIO0`N:<I;*%L*6SA;$@9,S0[:(!Z"#D_YT`8.2ST/6B_X:^
MI;.%CZ6PA?NEL87\8*:/Z-`5I;.%CR"%S"#$S*+_AK[FF]`"YIQ@&*6/9;.H
MD"CP)LBFCX2/Z"#D_YT`8.C0]R"%S*D`C0"`I8^-`8`@Q,SFF]`"YIQ@B*:/
MA(_H(.3_G0!@Y(_0]:D`C0!@C@%@8*6^T`,@G,RB#R#)_ZDQHA*DPR#SS*(/
M(,G_I<1I'*@@VLRB""#)_Z6;:0&DG)`!R"#2_Y@@TO^B#R#)_ZDRHA*DPR#S
MS*(/(,G_J58@TO\@S/^I$8T.W&"I(XTT`ZD(A;B%N:D!A;>I-(6[J0.%O"#`
M_Z(/(,G_J3&FL*2Q(//,H@@@QO\@Y/^%LJH@Y/^%LZB*8*(!Z"#D_YT`@.2/
MT/6EL(T`8*6QC0%@H@\@R?^@`"#:S*(((,G_H@"]`&`@TO_HT/>B#R#)_ZDR
MIOND_$SSS*+_Z+T`@)T`8.2/T/6EL(7[I;&%_&"B`+TGS?`&(-+_Z-#U(**S
M(-V](!ZK3,S_C2'-AOV$_J(`O2#-\`8@TO_HT/6D_2"BLR#=O2`>JZ3^(**S
7(-V](!ZK3,S_53(@."`P`$(M4"`X````
`
end
--
Cameron Kaiser * cdkaiser.cris@com * powered by eight bits * operating on faith
 -- supporting the Commodore 64/128:  http://computerworkshops.home.ml.org/ --
   head moderator comp.binaries.cbm * cbm special forces unit $ea31 (tincsf)
personal page http://calvin.ptloma.edu/~spectre/ * "when in doubt, take a pawn"