[comp.binaries.ibm.pc] v04i128: cal, print calendar

vojta@bosco.Berkeley.EDU (09/25/89)

Checksum:   77040189  (Verify with "brik -cv")
Posting-number: Volume 04, Issue 128
Submitted-by: vojta@bosco.Berkeley.EDU
Archive-name: cal/part01

[ This newsgroup is alive again.  For a week or two everything going
out will be minimally tested or not tested at all.  -- R.D. ]

Here's a clone of the Un*x cal(1) program.  Enclosed are a binary and
man page.  The source has been submitted to comp.sources.misc because
it is of more general interest.  (I originally obtained this from
comp.sources.amiga.)

--Paul Vojta, vojta@math.berkeley.edu


[
Checksums obtained with the 4.3BSD "sum" or System V "sum -r" command.

checksum     size (bytes)  file (between BEGIN--cut and END--cut lines)
    3991         5651      part01

checksum     size (bytes)  file
   56968         4017      cal.zoo
   56968         4017      x.zoo

-- R.D.
]

cal part01/01
BEGIN--cut here--cut here
begin 644 cal.zoo
M6D]/(#$N-3`@07)C:&EV92X:``#<I\3](@```-[___\!!-RGQ/T"`6<-``!?z
M````_Q)8G(@1)@X```@-```!````````````8V%L+F-O;0``````````?Q?Cy
M0"DC*```UQ$HD0`<`$;+!G@@$,#1M$4F!#0<-J,=(T\&`(02`&#%,#L>>@"`x
M(&<`KI&Q"$P#M\@*@`%6!`P2]F>'N#H-D.P0=J>`K@H"UND`L@A<(E,(`/#Sw
M%0C`(C\`9B0+<H45#Q!T6/!(0`<%CP9T8/`008>`JG7L5%D%NV!L'7M6R<9;v
MQTV7"@&T$C0+`4M`NJ96L>[;2N>>DZ^P`*BJP\O"AT7<5GR+LHC>@'B7^[4:u
M,(S?*G'XM@P8-WK1LT5V.CI;$6X1OT'D_,TCM6)?[2M3:,'8RP,`'0RB%``Xt
M263&MKUR&``2%PB0OD!E_1E8X-0'`*<..,X`%BW=O%6KC@PZYR^1#P8`T-4#s
MD'B=`"Q8:#'9:^.?C8S;H2QS\H8.B#)NO%''&6B`T$89;;PA1QXN-*``"4VDr
M,4<;8=`Q!AIED`%"''7T5\8<#3X(B`_4`5!'!;0$P)L&='3PU8FT"""+`GM)q
ML@X#M"S`FV\(T'+`7K0`@,\PN/SS3S[#;(%.`0!,,>,Z56#QQ150+'(-.F$`p
M$,DX)BRB#RP*R.-*'1<\\4\-41A30`-'H$,!`$\\D<4C!5AYQ`+)U#'.D@`8o
M4\0_``RC)@FFK:!,$%["0H*8>>TUSCHQRD+"7E:BA8464D#AG`)U'"!+`^APn
M-&.,>PTC)97\>'!`+D8F)B8N_ORS0C##A(+>,%4LPLX@[#AP$@!0H`-/`H,0m
M(T`B1M"3B!7V-))LL$PH4.RQ1LB#FK5T*!"(,6P<D(@=^%R["!T(#&),`-_Jl
M,X@?#-7QP3_@HJ,``=/"BP^\^J#C10#%$O!KL+'X,RUJ!OQ#AP#H.%+`M,CRk
M(Y*)3!QCA#[72>S/=>OZPT`?*J#F3S3F_$.+*$[94?#!Z`!#+S$$/%S'`HL8j
MX4\!`0"`K#[K%/"/S.M`LR[%=3!`L,$(R[&R3.P*0,<`Z?0!P+K\F'B!O>CPi
M,4"]X.*+#C1/L[R.%<<8T`X`-</+#SI?7&TL+C5#@<L[P**3Q<(LFXW.`&H+h
M@(MPP?XBL+$2ZU/SSPWT$8'96A_2-0$[XYP.+O?$_</?>E\7[#+]3`LU`'XXg
M`'7A",3,S\WK8/"S;P9L3H?0)A.=<M[K$C!`'2`,718Z=AR-+#XNLWXR`>AHf
MDC?5L\ADK+U:'[#X(N5T@:NNO#H@,3[7_>,$O3Z,;2+3J@#PCP$4#^(#Q0/Xe
M84#8%-<<"L4MU)S+!0#<D\[NN`P`;%]!WN,&`8O`(S+)B[!!^-P1`/S%SQW]d
M$YDTTE,-M:5N?"^I@Q!PH8NX82%S@)L8QOR@#P'T(01L`Q8NL!$W$*S,7VW#c
M1=2")8$3-FX=V1AAW$2`P:!8`!?4<1L(@(4:?#2"%C0(@!6PY$"AH(]LPTDAb
MV8+5P'Z%L$JY`]G_TB,,M3'.9.A@`[_61L)@.>,U&:3'X/Q`O3I(`!>J"(`.a
M1?@&-:(#`0X,A/FP88`ZM"!V"*C#"7IHK@,8@Q!MC`$?C:&`/[91!A9S```Dz
MQ@\(+')BZ%D'"BQ6MM;E#AV?V"(!D"4/7"AO!=5J6,SDD0O[R>]FZZ+'`:R6y
MCFPX)5FY.$+\TM&_`8#KARA`EQWL$3-_[,`(_/B##C*F`#Y0H)>9R(5P[I&/x
M`L"@9/:PI3X0P3^9)7.9^9@)#%"CKG/9TAZ(H,`@)C:`G?EC';X0G_;H<`#Qw
MD:\.18@9/EK`D0!,['1]*$#@KB//%!C!'J?C`P10$TT[Z`,05ZF#SIR`,W5Pv
MTUP!^*8Q"."]7:)C%/L8&#`+H#S4$`!D.R"$(OT`LRB:8Q$B!<`Z#"`ZCMH,u
MF/OT7K+2X8%_,,]YN=H5.Q#@K'_LKH<3]9X3PF4$`EPS?MD4QC;!%<Z8&569t
M2$46O=AE(FU0S049-=9-GZ=3`3@UF11EYB"`)H2OYH(,2!VKB2I@5D@$0*P4s
M8Z<<"9`-`_3A`V%S9`<>Z0^.9*QP#O"8%`EA`IF>DQU;S:GU#"!'`US#`']Hr
M0&,?6P<CX-$/0#"@_O@'CT70HK"V9*D1#!`-?)1V`)T=;3+1RLP5I-8`R70Kq
M,U$+T448(YG*8^8BA.$\26IV?_WS+&A-%C/2FA8?M#4&2V^;B]SF8[?.PZFNp
M<,$1*,`+>!T(`/.H*T*&!`L"VBW'WN+&B^<VCZN\\FKN%$&`(`6+$$<CF"(8o
M4(N.!`-9_G@8'1+0RZVNXP@>5001`N!>=#`AOB93!!,"4-]9X5>__)69?SL0n
M8"+@988(-H""!=#@8&QUJUKX`A:R$`4H7$$*J3J`(L#1G3D$0!7?&4:(O4!Bm
M*YPXQ2T.`"GF40H9;V$*4JC"=BKBB^LHX@%#`$0^L((/)7-E'DI>`1W<H>06l
MU,$`OJC9D9.<#QC(@01*SL$=/N"V999C$>C``B#2`8/Z_F*9YQA`,`:QP`&Hk
M8\OKN,8BJC&(B['S'M*X!S8&857G:<$+/QZB(?(AA45`8P#&"!9%L;`"8PP#j
M':``@!R0,(A]%$`.!K#'$0201S19`4R+4,8"['&(>XBIU9+00A9H9PPB_*,!i
MA[#&"JP!!2F@PP,`N!0G5@`-)PAAH@KHA!P@$`4K),$(ZWB&)"R!CHR4!!U!h
M&D:G"S"'`XQ(.":*02#R`0C?<&`1P=B!,NS@565$83:1H#0RB$TN="PB/2H`g
MP!R^H6U]*$`.DTGU(JR!CD0$)0&T``)EE#%P2D4C"W)(`&IW<NV:75H"`I!#f
M%.X0ZE$+H`X"0)*H!4"`.JB@$4=XP0J.4``Z>*`1CWA%1YXP.P>@_`6).,(`e
M<EZ`G!]@'0>0PA`E$0`O:`$03R`YS&6^B#\,8`7/,*,5I#"%X`5@"X>>@SF&d
M\8L,#"`7-1O2MHV6"*</(Q#_\+I_OGT=G$A!$1;PNB).,0$5A4`+PY`"V`&@c
M"Z\G?"]XAPPN+,`#MS')NG=`6`0")?@']`#QC$L\.BR>4U]H(`#H:(6^);"=b
M=66$G9X?`!T"`(1T3`(`OO``YD\O!P3X0@28O_<<#(`+BC8M/<\(P`*`40>Fa
MN<$IV#C&`5CABYOG?.<L]_EV<JZ"G+.@N#W(R!R0P(,!R('D!0`"(D;-=A,1z
M*G>J:L0?$G"2%.Q%`;PW@2+,P-,KZ"4$Z*^#!HYQA`O4;!T:(,$`_(&,]2=`y
M*BU!`'N1<Q70;<)W';M@)(LP##<E#!GQ%`3`"NBW7S)0`$=``M]`!_0P)(#0x
M`SI0!P%P!!TX'&T'#T@"&8OP!0*P`QZ``0%P96'C@F,0%<"`#GF@:2QP!RE0w
M=48``%MP@)J6`=WW,HW@?K0``7OA#\``="F((CZP%[_B8D@P#)D@<-`0`%>@v
M`A'P!"S0?72P`%/0A&PC!'NQ!<,P)%CP8\%"`B2H:1TP<@1`!Q<`"&<@`/NPu
M"#17A"JG#/N%#F*@;_YB)&>H;9XV!TRP`-M0!R0@/AHP``'0(HO@`8UX!SO@t
MA1`@!<2Q%_8@#("0+5KP/8VX;>M``C9&"QD`!;O0B/]P`U6G!?[P!4;7`[%Rs
M!PV0")(X`/17`=<1"#]`?/B@*OPP#'1HA\:G<SSG<T.((AJP%U)`"RA0A._Gr
MBLA`!QF`;D,2AE^`(D!0AG*@`"&H`H-P!2P``#M`*]N!)+F0%+O``5?S`[Z1q
M`($P##(G#O60@#8U##*&!5#``T$`:CR@!8E'`"#P#^*@!?K(`V'@CWLP!P+`p
M`B`0)`1)"RRP%[#``_90#O4E9['``XK@#?<0#K?P$MJV0)E""RI`*?&P"-J@o
M",>`"2PP`',P``3``$Z@"],P`/<@#@7P```0"P4P#>@0DIQA"2W@2;I0"P60n
MD]&`#DL):2V@!SX!#*B@E"PF#5N0!9PQ`0_W8U&`B'30<]YR!0)@*FIX!;]`m
M":%S`(L@EKL@E?<P#TL)!0PY`-/P*V\B";O0&V^9"!60"7M9!<=2!`2@CT``l
M!#,@#;N06_.0"%7``/I8`#(0`-'`8N!PF+N`E&\9#>J@F8&@#Y$I!Z17`$]@k
M,T6@`)+@DRM1`(YDF3?YEBR@``PYDXE0!`@P#>H@!(QI`%@`!+$@`"N!!):)j
MF?-@FXPI/47@2`!P"5\P#"80`("@/(IT'<WYG``0G==QG0#P`0#``=D)`,"Fi
MG=_9G>$9GM>AG3L``%H``'B0G`!07]0``/,``!$0`#`0`$X0`&T0`$H0!FY0h
M!PF9!SMD!&4@!G+@GPNR0TV0D!>R0T$`!W*0!FR`H&$`H`"@!'7@!F6P0Q;*g
M!A0:!`-2!W/@'TU2!G!`!P@B!F4@!SOT!&-`!V^`HBH*`/QA!R>:HCM$!&4Pf
M!C4:HT```$G0).@)`%EB!@#`!IH&`'H``(4``(X``)@```D``BTPI0E0I5/:e
M`E4*`EJZI5(ZI0#`"P`@#`#@#````E.@I4T``E1`.R!P!6I:("!@!%HZ!=>Id
M`'9:I54*`'9ZG5M:IEI:IF(0!AJ2D&=0!P?B!MD"``*PJ`10`#,X!$_@!,`Bc
M!9+*!%-`!0`0$`#<I\3]`@%G#P``I`T```43^X[D+Z$"``##`0```0``````b
M`````&-A;"YM86X``````````'\VOT`I(R@``!4('!*$"8H8*4`H7,B0814Ga
M2;"`@"+GS1DY8=JT*2/GQ!P03<*XJ1.&3<.3#`D:1-A`H$`G09H4:=EP3$D0z
M+4#`D9/&#1T0-MF4<4,FC)R6"J9D<?($RI0D4V@R#`IBRY8V;WRBZ0(B3QFCy
M79`2*3)EB)0D4*@D>>)$ZL(O"(;`#0/79)J/8716O)@1Q!TT:<:@T=N3SL<Wx
M=7[F#3JTJ!P09=+00<,1A)DWC\.X57@FC9VA(+!J!8'9<NF\G3^[Z?I5C@N%w
M0O*`(%/&3)@Z;.BP`"&9L$^\FX&6;&S4]./)98#6D2-GZ$_1DU^#2/)S#.;Fv
M8^BPD8U&)!FA'Y$'IX/1S1S):;):KM@&!'(02G"G$>G^#8@CS<]@GK^:,5&Cu
M'_4$PA1EP-'">&6T(49E,=Q0@PP@H!#&3T*%,<=/`A;AQAEL>`>"A]:QD54:t
M9<R1@@M("5'%$5$IT)`3;]"1W&03@@`&53CD<`((S9G!47CVY0A"$*\1X<)Ns
M;L18'P@QY)`CB@(%40452#PA17!'&"4;$Z\)41X=2+DDYIADEFFF2Q055@89r
M(.#P0@TO"(E20S4,6<<93#J9PYQ\]AE#F`H$!-RGQ/T"````````````````q
M`````````````````````````````````````````````!(``#"M"`@`````p
,````````````````o
`n
end
END--cut here--cut here