🚀 go-pugleaf

Checksum: 3017545307 (verify with brik -cv)
Submitted-by: Fatri <fatri@turing.u-strasbg.fr>
Posting-number: Volume 8, Issue 11
Archive-name: fatcal.fat

BEGIN_DOC fatcal.doc
*******************************************************************************

                             FATCAL.lib

                     Fatri Mohamed January 1993

                    Checksum : #D1E  Bytes : 1141



Some will say 'Yet another calendar program ?', this one is cute and
very simple to use.

There are two commands : CAL and Cal.

CAL displays the current month and a menu bar with:
[CURR ] [MON- ] [MON+ ] [YEAR-] [YEAR+] [EXIT ]

CURR  : current month.
MON-  : previous month.
MON+  : next month.
YEAR- : previous year.
YEAR+ : next year.
EXIT  : exit the program.

Cal takes two reals from the stack ( the month and the year ) and
displays the corresponding month. 

The months that can be displayed range from Oct 1582 to Dec 9999.

I hope you'll find this library cute and usefull.

* Thanks to Detlef Muller for its great RPL48 package.

This library is freeware, so feel free to do anything you want with it.

   ***************************************************************
   * WARNING : Thought this library works fine on my HP48 Rev E. *
   * I cannot guarantee it would work on another ROM Rev.        *
   * Nor can I be taken for responsible for any kind of damage.  *
   * I however tested it seriously and didn't notice any bug     *   
   *************************************************************** 

Any comments ? Feel free to email me.

Fatri. ( fatri@turing.u-strasbg.fr )
*******************************************************************************
END_DOC


BEGIN_ASC fatcal.asc
%%HP: T(1);
"04B205E800F06414453414C4023416C656E6461627F0F6383800000005180050
000D9D20119200030090770B2130D9D20A5D630D470C2A209E00002020202020
2020202020202020202020202020202020213020223020233020243020253020
2630202730202830202930213030213130213230213330213430213530213630
2137302138302139302230302231302232302233302234302235302236302237
30223830223930233030233137E3161F514EF9A2262056B3161F5141FB26B74B
1EF9A2479A23392010000002851016102C23093CC0404A2CDBA27DC81D00402C
E30A752674726D8DC1803A2479A2B5CC0D4FA22620593CC0AEC81D00402CE301
C040CBD30337507E316AEC818E9206A000C2A2010000C0000B0000A416E6B000
0645626F0000D416273686F000014072796C6B0000D41697D0000A457E656D00
00A457C697B0000145776D000035560747B0000F43647B0000E4F667B0000445
636D17304423000D115562111920C6000EF11640C36E8E300ED3099040D6F109
76116B316880413FC1155621E8C463F04097611E1B20730005000091000B1777
7104104241051772310111525101515251055621119208600085B4697611BB72
6E0E301C0407FE30B9F06530402CE301C040CBD30D5040F8511FF22155621300
40FEF30976110CA3055621E1B203700050000F4000758DE07588E07507707705
0AA0058800050040047588A02588E0270730774588A0258A20250150457788E0
278DE0250150757104030040C87F4442303004084C46CA13094040083169FA05
D5040083169FA0555621B20403C3700CA3032230EF116122701C0402CE309082
67B040CBD303375008F11FEF3012270530402CE30B7040CBD30C87F443370852
3079470B1293B21308F63100D9D20FDE8199040D9D20736C1FC4363914013735
E5E4029E20F632008BE40D9D20852306B436137C11DE40B21306B436137C1B21
30B21308F63000D9D20E1A81CB983736C1CF14679E60D9D20E0CC0D4FA21F514
CB9A28813006FA2881300061632230D4FA21F51488130CB9A2CB9A2881305161
629E20F63200B21300CA3062D25B2D43F12500D47039140137355E23647A20C2
A20D000034552525C2A20D0000D4F4E4D2C2A20D0000D4F4E4B2C2A20F000095
541425D2C2A20F000095541425B296756B213068F04CF1A32A17056F1444230D
9D20C1B463D816FC292B2040F563639916B681547A205E236D9D20E041667205
AAB36CB916D9D2044230D1CC1834166720551616B213088130006168341629E2
0F63200B2130D9D20E04162620588130D1CC1A88A2CB916D9D20D0AC18341626
20551616B213088130006168341629E20F63200B2130D9D20E04168341667205
881305161629E20F63200B2130D9D20E04168341626205881305161629E20F63
200B2130FC292B213032230C9B26E8F60B21306B3168C170C5416137C1794700
9B8344193B2130E4A204100063DFFBBCFFAF7FFE4A20A70000000000000B4000
0000000000000000000000000000000000000000000000000000000000000000
0B1000303414C4000303416C610061000010008106E1D0"
END_ASC

BYTES: #D1Eh 1141

BEGIN_UU fatcal.uue
begin 644 fatcal.lib
M2%!(4#0X+45`*U".``]&051#04P@0V%L96YD87(/;X.#````4($`!0#0V0(1
M*0`P``EWL!(#G2V@U3;0=,"B`ND```("`@("`@("`@("`@("`@("`@("`@(2
M`P(B`P(R`P)"`P)2`P)B`P)R`P*"`P*2`Q(#`Q(3`Q(C`Q(S`Q)#`Q)3`Q)C
M`Q)S`Q*#`Q*3`R(#`R(3`R(C`R(S`R)#`R)3`R)C`R)S`R*#`R*3`S(#`S(3
M<SYA\17DGRIB`F4[8?$5%+]B>[3AGRITJ3*3`@$``"!8`6$!PC*0PPP$I,*]
M*M>,T0`$PCZ@5V)')];8'`BC0I<J6\S0]"IB`I7##.J,T0`$PCX0#`2\/3!S
M!><3ILX8Z"E@"@`L*A````P`L```2F%N"P!@5";V``!-87)C:`\`$`0GE\:V
M``!-87D-`*!4YU;6``!*=6QY"P`05'?6``!397!T"P#P-$:W``!.;W8+`$!4
M-M9Q`T0R`-`15281D0)L`.`?800\YN@#X#V0"01M'Y!G$;83A@@4\QQ191*.
M3#8/!'D6X;$"-P!0```9`+!Q=Q=``2044'$G$Q`1)140%2454&42$2F`!@!8
M2Y9G$;LGYN`#P4!P[P.;#U8#!,(^$`P$O#W0!02/%?$O$E4F,0`$[S^09Q'`
M.E!E$AXK,`<`!0#P!`!7V`Y7B`Y7<`=W4*`*4(@`4``$0%>("E*(#G)P`W=4
MB`I2J`)2$`54=X@.<M@.4A`%5Q=`,``$C/=$)`,#0(#$9*PQD`0$@!.6KU!=
M0``X8?D*5642*T`P/`?`.C`B`_X1%B('P4`@[`,)*'8+!+P],',%@!_Q_@,A
M<E`#!,(^L`<$O#W`>$\T<X`E`Y=TL"$Y*S&`;Q,`G2WP[1B90-#9`C?&\4QC
MDT$0<U->3B#I`F\C`+A.T-D"6#)@2V,QQQ'M!"LQ8$MC,<>Q$@,K,8!O`P"=
M+>"A&+R)<V,<_$%VZ0:=+>#`#$VO$E]!O*F"&`-@KX(8`P`6-B(#3:\27T&(
M,<";*KRI@A@#%18FZ0)O(P`K,0"L`R8MM=(T'U(`30>301!S4^4R1J<"+"K0
M``!#55)2+"K0``!-3TXM+"K0``!-3TXK+"KP``!914%2+2PJ\```645!4BMI
M5[82`X8/Q!\ZHG%0]D%$,M#9`AQ+-HUASY*R`@1?-C:986L81:<"Y3+6V0(.
M%&8G4*H[QIMAG2U`)`,=S(%#878"56%A*S&`&`,`%H9#89(N\#8"L!(#G2W@
M0&%B`H48`QW,H8@JO!G6V0(-RH%#86("56%A*S&`&`,`%H9#89(N\#8"L!(#
MG2W@0&$X%&8G4(@Q4&%ADB[P-@*P$@.=+>!`83@4)B90B#%086&2+O`V`K`2
M`\^2LA(#(S+`N6*.;[`2`[83AAP'7!06<QR7=`"Y.$21LQ(#3BI``0`V_;_+
M__KW[Z0">@```````+`$````````````````````````````````````````
8````L`$``T-!3``P,!3&%@`6```!`!A@
`
end
sum -r/size 23700/1611 section (from "begin" to "end")
sum -r/size 23392/1149 entire input file
END_UU