Google
 

Trailing-Edge - PDP-10 Archives - walsh_goodStuff_1600 - more-games/astrol.exe
There are no other files named astrol.exe in the archive.
?p  ?xCO&+vKb)<41`INX#uuQF:|:F0#

?{4E@H#V"?#SA{4o
NofQ<  9YINX{INX\/F+x0wkE@H
h'Pv
`S +:40  "Q * ' Z( \(  (,!p-\N^4) @1-\Na4)1!8"X8*8 ( (-|p+R4;  )Q * . Z/ \/  /,!p,!p 00 D1-\PS41 @2-\PP4200 @2-\PS41 @3-\PP43N @3-\Pg4(43  @4-\PS44 @4-\PP4402"!8)X8*8 / /-|p@@N@@O ) DO ) * DP FP P P <*,PF DQ FQ Q Q DR : ZR : ZS $#$.R + F<51:9] R1:#9[ : ZR DM, D5-\N^45 
"5-\PU45@S'DM,4D5-\Na45\$,@5-\PU45-@S4$#$S.S$,.F<51:n9b5:$ZR.$.-\PP4-.@5-\N^45$	@S.S-hH F<6.:1z+sB:ZR:ZS$<$.R@@R1:9R1:<9Z[[$Ia4 +8(I4,A1,4(I2,1X),I3,2(1X,I2),A1,I2,1X,I3,A1,I2,1X,A5,5X,5A5)  - D[ .3DN+<-\K<4.4
/O@N $
 DT $ DO Ia D[ TX@A "JbTUUVVWWXXYYZZ[$Ia4 +W('1'//' ---DATE--- -TIME -ZONE- -LAT- -LONG- ','COMMENTS--------'/I5,A1,I2,'/',I2,I3,':',I2,I4,':',I2,I3,A1,I2,I4,A1,I2,1X,5A5)   -\PP4X @5-\PP4W @5-\Pg4545 @6-\PP4W6"$.V.W$$ @6-\PP460 @\@B\"$}%.V &`.T"(.U H5&(.$&Z7 .&(.",.
U .$/
$,7 N5&,. 0.T.&02$07 .0(/-\Oj4 <\,P @] B] 02DU+y>T"`T 03DUgO 13FUgOA4$
 1.V &`.T"(.U H5&(.$&Z7 .&(.",.
U .$/
$,7 N5&,.-\Oj4 <\,P @] B] 2 2 <],P	 <3,PF$ D^ F^ $ D_ 43D[gO 43F[gOA4$ $2 D_ : ZS"$.-\Oj4 <3,P> <^,P @_ B` 5 5 <3,PF <_,P D` _ ` Da : ZR ah&h! Dh8 _ ` ( < ,P+ <*,PF-\Oq4 @a _ ` ( < ,P+ (h*XH1-\Ot41 <,P @5 B5-\Oj4a <*,P! <5,P <Q,P!"@h\1:9$ ^ Db _ Db 6`6R Dc bD bF"F5 7R"F5-\Na457 8`8 @6!* 
b 
5
 9`9R
 L6-\Na466 @7!(@b!*0
R"H7-\Na47:7 @8b 
:
R D8-\Na48;8 
;
` @9 <Rb N9-\Na499 @:!*@
b
5 <R
 J:-\Na4:=: @;"bb =R P;-\Na4;>;>?R@^!$ b bF ?`@R D5-\Na45@ @5 bH 
A
R H6-\Na46A5 @6 
bJ"
b
 BR
 L7-\Na47B6 C` @7!0nRb P8-\Na487 @8!.@bb CR N9-\Na49D8 @9
!2R
 J:-\Na4:D9 @:!2@b!2@c ER"F;-\Na4;E: @;!4	 b bV FaFR T<-\Na4<G; @<b GR R=-\Na4=H<H?R@_ Iaa?RD_ IaaRD`"`` : ZR $h\XD.-\Na4.h8h\ @5-\Na45h8h\ @5-\Na45h8h\ @6-\Na46h8h\ @6-\Na46h8h\ @h` h`D D5-\045 @5!&h8!(h8 H6-\M%465 @6-\M
46@ ah3h/R && 
&*/@7-\PP4aJ?R7@he1:9,JaKRDcKaL!&aOR F6-\Na46P5!(	Xa @6 dH"
^
 
P
R
 J7-\N^47Q6 @7 
^L QR H8-\N^48R7 @8
c!.$R
 L9-\N^49R8 @9"c^ SR N:-\N^4:S9?R@g TaTR Dd UaUR De VaVR De VaWR Df WaXR Df eD e F5-\Na45X @5-\N^45Y5 @6!(@e"
e
 J6-\N^46Y6 @7-\Na46Z7 @7 
d
e L8-\Na48Z7 @8-\N^48[8 @9 ff N9-\N^49[9 @:-\Na49\: @: fP fR"R;"R;-\N^4;\: @<-\Na4;]< @<!4@f!6@f"V="V=-\Na4=] @>-\N^4=^> @>-\N^4_>< @?-\Na4=^ @?-\N^4=_? @@-\Na4_@? @@ ee XA-\N^4A_@ @A-\Na4A`A @B-\N^4=`B @B-\Na4=aB?R@h aa baa baaa-\Na4_ ca caa @5-\N^4_5 da @5 _F F6-\Na465 dae @6 eafR"H7-\Na476?R@h fa-\N^4` @5 gag haaR D5-\Na45h5 @6 iai jaaR F6-\Na46j6!(Ta 
k
a
a @7-\Na4`7?R@i : ZR ahJhER Dg : ZS R&$-\PP4k R&( @5-\PP4l5 
R&, @5-\PP4l5?`Rg"@g!$ R8!(8 H5-\M%45 @5"$.-\PP4Og 
a
3
/
R@ @6-\0465 @6-\M
46@ @7-\N^478 W"@S"$.-\PP4Og @5-\N^45 RS R(. @In"$.-\PP4Og @5-\Na45 RS R(. @Ix1:9 R RN D5-\N^45 @5"ge H6-\Na465 @6-\N^46 @7-\Ls4647g 
R&* R&./
 @7-\PP4`m?R7 @<"g Re D5-\Na45 @5 RN H6-\Na465 @6-\L]46 @A R $`XDJ-\N^4J8 W"@S R1:9| mRg D5-\Na45n`?R@C nRh"D5-\Na45o`?R@D bD bF 7R D5-\N^45o @5!& b!(@b pR F6-\N^46p5 q` @6 
q
R
b J7-\N^476!,	  ,M>LU bD bF rR D5-\N^45r @5"bb sR F6-\N^46s5 t` @6!*
R
b J7-\N^476 @7 bHb!,0
R H8-\N^48t7!,	  ,M>LV : ZR $hAXD	-\N^4	hS @5 $h<XD
-\N^4
5 @he $hAXD-\N^4hS @5 $h<XD-\Na45 @hi $hAXD-\Na4hS @hn1:9 : ZR : ZS"e R( .D In"j R( .D Ix R( . $ IxXD$ $ InXD%-\Ls4$4%u @5-\;454u $<$R. @Z1:9 R ee Dr"j Ri Dw R nn D{ R1:9"e Ds"j Dw"n D| vavR"D5-\Na45w"@h : ZR $hwXD= $hrXD>-\Ls4=4>)h @5-\;454u $<$.S @["$.S5D R rr ww {{ D5-\M%45 @h R {h D5-\L]45R &<$R @R wax vavR"F5-\N^45xR @i ) &<$R\ D5-\Na45 @5 RR H6-\N^465 @6-\Na4i6 @7-\N^4i @7-\Na4677 @8-\L]48R @S R <) D5-\;454u &<$R @U R AR &<$R DS R $<XDq-\Na4q @5 $AXDs-\N^4s5 @5-\Na4i5 @6-\N^4i @6 $AXDz-\Na4z66 @7-\L]47R $<$R @T R1:9: 2 2 <],P	-\Oj4S <y,P <,P @i Bj z z <i,P+ <{,P Dj Fk | | <i,P+ <},P Dk Fl ~ ~ <i,P+ <,P Dl Fm   <i,P+ <,P Dm Fn   <i,P+ <,P	$ Dn Fo-\Oq4
j @5-\Oj45 <j,P <P,P!"@o-\Oq4
k @5-\Oj45 <k,P <P,P!"@p-\Oq4
l @5-\Oj45 <l,P <P,P!"@p-\Oq4
m @5-\Oj45 <m,P <P,P!"@q-\Oq4
n @5-\Oj45 <n,P <P,P!"@q op Dr pq Dr oq Ds op Ds-\Na4r @5 rs"s F5-\Na455 @6 ss H6-\Na466 @7 
r
r J7-\Na477 @8-\Na4r '8 @8 
s
sL9-\Na49N8@9"s7sN:-\Na4: T9 @: rr"ss R;-\Na4; N: @; rss T<-\Na4< @; @< rss V=-\Na4= %< @= rr X>-\Na4> = @>-\Na4s z> @? P?-\Na4? \? @@"s9s X@-\Na4@ 
C JF-\Na4F xE @F"s>s XG-\Na4G `F @G rs XH sH XH-\Na4H @G @I DI-\Na4I I @J-\Na4H J @J s>s XK-\Na4K 	pJ @K-\Na4C 	`K @L s7s XL-\Na4L 	`L @M"ssE XM-\Na4M 	PM"@t h & <j,P-\Oq4
j @5-\Oj45 <,P t & <,P  @5 B6-\;4
54u S @3 q) D5-\;454u S @o"$.S5D	-\Na4s @5 rs D5-\Na45 |5 @6"rs F6-\Na46 z6 @7 sHs"H7-\Na47 7 @8"
s
5
s J8-\Na48 '8 @9 
s
6
sL9-\Na49G9@:sssN:-\Na4:j:@;rrsR;-\Na4;s X?-\Na4?@? @@ s5s X@-\Na4@ 	p@ @A"rsss XA-\Na4A 	@A @B"rrsss XB-\Na4B 	B? @* )4 D5-\Na45 @5 R* F6-\N^465 @6-\Na4i6 @7-\N^4i @7-\Na4677 @8-\L]48R @+ S3:9   <^,P+ <,P	 	 
	 <^,P4 <
,P <Q,P4( H5 J5-\O4
5 <,P! <,P 
R . <,P! @i : ZR 
 DhI? &<$"\\ D5-\;454u 4`	$ R 
3FI?-R1:9	-\PP4[P4Y
\  @5-\;454u @   <^,P+  
 <^,P4 H5 J5-\Oq4
5@6-\Oj46h<,P"@aaD5-\;454u@"t D5-\;454u @"t D5-\;454u @ : ZR!$@h Da-\PU4a @h h-\PP4a 
 TX@	` "	gb : ZR : ZS (.R~1:9	b R1:9	a +	q(/' GMT=',I2,2(':',I2),'    GST=',I2,2(':',I2),'    LMT=',I2,2(':',I2),'    LST=',I2,2(':',I2))-\Oq4] @u-\Oj4u <],P"@v!$@t v F5-\PS45 u."*.
u @5-\PS45.
&*$*/ HR   <],P	 <,PF <,P	  
 <^,P4 <^,P4 <,P$ Dv Fw-\Oq4v @w-\Oj4w <v,P"@x TX@
 "
b R(

 uvwx +
(' DAY OF THE WEEK (FROM LMT) IS ',A9,' (RULED BY ',A8/' JD=',I7,F7.6,7X,' BESSELIAN YEAR = ',I5,F10.9)   X&$ (. Hx ) Dy : Za $.-\PP4) @y-\N^4y @5-\Na4y5 @5-\N^4u @6-\N^4y6 @6-\Na4y65 @7-\N^4y @7-\N^4y7 @8-\N^4u @8-\Na4y8 @9-\Na4y98 @9-\N^4i9 @:-\Na4u @:-\Na4i: @;-\Na4y;:"@;-\Ls474;) @<-\;4<4u $<$ @U-\N^4i @5 yy D5-\Na455 @6-\N^45 @6-\Ls4646) @7-\;474u &<$ @V yy D5-\Na45 @5-\N^45 @6-\N^4i6 @6-\N^4i @7"FM& F7-\Pa47 @ @8-\04u @8-\04i8 @9-\L]498"@9-\Na4976"@:-\Ls454:O@ @:-\;4:4u (<$ @ V : ZS ) &<$aV De RDe Df : ZS-\Na4i @5 $heXD
x-\Na4
x5 @5-\L]45 @6-\046 @6-\04u6 @7-\L]47 @z OD-\N^4i @5 &heXF-\Na45 @5 &heXF-\N^4 @6-\Ls4546y"&.a @6-\PP4O6"@7-\;474O @z-\PP4a zz @hi1:9
t"jj jF* $<$aFV"`V S3:x9
o yy D5-\Na45 @5-\N^45 @6-\N^4i6 @6-\04u @7-\Na4i7 @7-\Na4y76"@8-\Ls4548) @8-\;484u &<$a @W"$.a-\PP4 @5-\;454u &<$a @X a1:9
# : Za"$.-\PP4 @5 FM&` F5-\Pa45 @"@6-\Pa46 @ @6"E H7-\;474u 65"@7-\;474u *<$
 @(W"$.-\PP4E @5-\;454u &<$ @X1:96-\Na4i @5-\N^4u5 @5 )E D6-\Na465"@6-\M%46 @7-\Na46 @7-\Na4u7 @8-\Ls4748 @8-\;484O @a : Za"$.-\PP4a y F5 @5-\N^45 @6-\N^4i @6-\Na456 @7-\04u @7-\Na4i77"@8-\Ls4648) @8-\;484u (<$ @ Y1:9b-\N^4i @5 ) D5-\Na455 @6-\N^45 @6-\Ls4646y @7-\;474O @a : Za"$.-\PP4a y F5 @5-\Na45 @6-\N^4i @6-\N^456 @7-\Ls4647)  @7-\;474u (<$ @ Y1:9
 : ZS : Za!$ &<$ S. R D5-\;454u @ :1:9
 S1:9
 4 D5-\;454u @ , : ZR &<$ \ D5-\;454u @Z1:9
"F:&ZR:ZS$<$.R 
2 $<$S.R  F4r &<$S.R $RXD
5-\Pa4
5-@{4$<$S.R-\PU4{ @! $<$S R. !-\PP4{ 
* R1:9
)"$	.U4D{ :1ZR9: ZS!$	@ &<$.RR Da $<$.R-\PU4a @.*!$a-\PU4 @| $<$.R |   F4r $<$.R .*-\PP4a p"@a $<$.R-\PU4a @! $<$ R. !-\PP4a 
G R3:{9
E 42D[+
f "
gb +
t(/19X,'PROGRESSED (GEOCENTRIC) LONGITUDES'//' YEAR  SUN   MERC VENUS  MARS JUPIT SATUR ',' URAN  NEPT PLUTO  MOON  NODE')     :
 ZR"$
. D| TX@
x"| : ZS $<$ R.! $<$ R.4r $<$.R'b1:9
z R 1:<9
u+',I3,1X,11(1X,I2,A1,I2))',+'42D[+'DATE  SUN   MERC VENUS  MARS JUPIT SATUR  URAN','  NEPT PLUTO  MOON  NODE'/I6)   $.U&$ T. H} $`.}$$Z7 .$("&(. (.}$(Z7 .((/ FIj 13DU+
}&*2$*7 .*(
. HIj :
3ZRTX@IcVA:)ZS:$<$R.!$<$9R.4r+$<$.R'b1:99URANR1NEPT9PLUTORIMOONPLNODEUSP.F.'/1X,12(I3,A1,I2)/7X,8(1X,A5)/1X,10(I3,A1,I2)/1X,10(I3,A1,I2)//) 3 TX@4     5     6     7     8     9     10    11    12'/1X,12(I3,A1,I2)/1X,12(I3,A1,I2)/1X,12(I3,A1,I2)/1X,12(I3,A1,I2)/1X,12(I3,A1,I2)/1X,12(I3,A1,I2)/1X,12(I3,A1,I2)/1X,12(I3,A1,I2)/' RISING',14X,'I.C.',13X,'DESC.',14X,'M.C.'/1X,4(I3,A1,I2,12X)///////)   $..p DR $..i DS R IS DR S IS DS 7 8 Dk Fl@@S : Z}!$@ &<$\ D5-\;454u  @5-\Pa455`O:S S( }( ' 
( Hj Jk }1:9C"$.S-\PP4 @5-\PP4S @5-\PP4S55 @6-\PU46 @S TX@[ "cb R(
' S(
' : Z} (
j3:S9_ +p(' RULING PLANET IS ',A8/' SIGNIFICATOR (PLANET RULING THE RISING SIGN) IS ',A8/' RISING PLANETS :',6(1X,A8)/17X,6(1X,A8))    .i D4@ 3 D4|  D h - D!$ TX@u "vb +(/' DISTRIBUTION OF ELEMENTS IS AS FOLLOWS:'//8X,'.-----CARDINAL------.-------FIXED-------.','------MUTABLE------.')     : ZR : ZS : ZS $$ &$S.R. + HHV1:9 S1:9 R1:9@@~ : ZR $ &<$..4 .47 .(((/ DS $ &<$..4 .4&($(/ D} : ZS + &$ ($}.S.2DHV+) $$ &$}.S. 
R(
 (H- HHV $$ &$}.S. 
R(
 (H. HH]+-.:1z+ S D~ $ DS+ R1:9 : ZR TX@1 ";bhI: : ZS : ZS $$ &$S.R.HV1:94 S1:93 R +B(1X,A5,'  .',6(1X,2A1),' .',6(1X,2A1),' .',6(1X,2A1),' .')  "R.~5DN TX@E ";bI< : ZS : ZS $$ &$S.HX1:9G S1:9F  R1:9/ TX@Q "Rb +Z(8X,'.-------------------.-------------------','.-------------------.')     : ZR : ZS &<$R \ &<$\ D5-\Pa45 "@5-\Pa45  4  &$.R"@6-\PU46 @;o1:9[ R1:9Z TX@k "sb : ZS : ZR $$S.;o1:9m S1:9l +(/' ALL PLANETARY ANGLES ARE TABULATED BELOW'//5X,'SUN MER VEN MAR JUP SAT URA NEP PLU MOO NOD PF. AS','C MC.'/' SUN',14I4/' MER',14I4/' VEN',14I4/' MAR',14I4/' JUP',14I4/' SAT',14I4/' URA',14I4/' NEP',14I4/' PLU',14I4/' MOO',14I4/' NOD',14I4/' PF.',14I4/' ASC',14I4/' MC.',14I4/) TX@ "b +%(' IMPORTANT ASPECTS ARE AS FOLLOWS ("EXACT" ','ORBS PERTAIN TO THE '/' TRUE ANGLE BETWEEN OBJECTS ',' #1 AND #2)'//' OBJECT#1  OBJECT#2   ASPECT (DEG)    ORB(EXACT)',' APPLYING/WANING'/)    : ZR $. D| | ZS &<$R \ &<$\ D5-\Pa45 "@5-\Pa45  4"@~!$~-\PU4 @a a4d# a z4D# a z DS S T-\PP4~"@5-\Pa45 @ R &<$SR D5-\N^45 @5 R *<$
R(R H6-\N^465 @6 
(\
\
) L7-\N^476 @7-\Na45 @8-\Na4687 @8-\LF48R @9-\;494 @~ S T-\PP4~"@5-\Pa45 @ + D R&$ S&(.4do R&$ S&(/4D5df!$ &<$R\\ D5-\;454u  @5-\Pa45 &<$S\ @\+o!$ &<$S\\ D5-\;454u  @5-\Pa45 &<$R\ @\  D S T-\PP4* @5 *<$
R (\ ,<$
S0\ H5-\;454u5 @6 (\0\ N6-\;464u56 @a &<$R \ &<$S\ D5-\;454u 4` S T-\PP4* @5 *<$
S (\ ,<$
R0\ H5-\;454u5 @6 (\0\ N6-\;464u56 @a"ua5$  D TX@ "b R(
' S(
' S(
7ST+#(1X,2(A8,2X),A8,'(',I3,')',F7.2,'(',F5.2,')',5X,A1)     S1:9( R1:9& TX@' "(b +.(/' PARALLEL ASPECTS (IF ANY) ARE AS FOLLOWS:'/)   : ZR $. D| | ZS &<$ $SXD4-\Pa44 @5 &<$R $SXD7-\Pa475 @5-\Pa45 
' S(
'~ $<$R!4s'c $<$S!4s'c +O(6X,A8,' PARALLEL ',A8,' WITHIN ',F4.1,3H' (,I2,A1,I2,' & ',I2,A1,I2,')')   S1:91 R1:9. TX@T "Ub +Z(/' ESSENTIAL DIGNITIES (IF ANY) FOLLOW :'/)  : ZR $ &<$..4 Da a4d} &$a. Y4D} &$a.R Y DS TX@e "lb R(
' S( D5(
?
@ a(
L +o(6X,A8,' IS ',2A6,' IN ',A10) "$ &$a.R.Y5$} R Y &<$R/!$5D} TX@w "yb RY +}('+',43X,' (BY EXACT DEGREE , ',I2,')')  R1:9Z TX@ "b +(/' MUTUAL RECEPTIONS (IF ANY) FOLLOW :'/)    : ZR $ &<$..4 D 4d9 $. D| | ZS $ &<$..4 Da a4d$ &$. Y &$a.R$Y-\PP4 5@$ TX@ "b R(
' S(
' +#(6X,A8,'AND ',A8,'ARE MUTUALLY RECEPTIVE BY ','EXALTED SIGNS')   +9 $$a.R Y-\PP4  $$.S @5 Y-\PP4 5 5@9 TX@. "2b R(
' S(
'R+9(6X,A8,'ANDT',A8,'ARE?MUTUALLYRECEPTIVE BYS','NATURALPSIGNS')W ("S1:9THE ','DISPOSITOR OF")'/)    : ZR@@h $ &<$..4 D| |4dM | IS DhID ( 6 
7 Hj Jk1:9G $ D! $ DR@@ R ID DS : ZS S ID DS1:9V $ DS S DIL S & F 4dj TX@_ "b : Z IY (
j3:9`  : Z ( 6 
7 Hj Jk1:9e@@ S(  '  ( Dk Fl + DIY:S S R FIK S IK D| | ID S/IK4D| S:IK"$ S.IK5Dp>S"$.S5Dt:R"$ R.4$T4Dy+  | & F S/5d TX@ "b : Z IY (
j3:9 +(3X,12(A2,A8))  S(  j  k Dy Fz : Z ( 6 
7 Hj Jk + DhIY1:9
@@ |(  '  (3Dy2Fz+"S.|4Dt+n S( |( ' 
( Hj Jk S D S  FIY"S.|4D+n"S.|4D( TX@# "b : Z IY (
j3:9$  TX@* "Jb : ZS $<$! $<$4u $<$'e1:9+ : ZR : ZS $<$ R.! $<$ R.4r $<$ R.'b S1:92 R1:91 : ZR : ZS $<$ R.! $<$ R.4r $<$.R'b S1:9? R1:	9> +i(//23X,'MERC VENUS  MARS JUPIT SATUR  URAN  NEPT',' PLUTO'/' HELIOCENTRIC--------'/' LONGITUDE',11X,8(1X,I2,A1,I2)/' LATITUDE',12X,8(1X,I2,A1,I2)/' DECLINATION',9X,8(1X,I2,A1,I2)/' GEOCENTRIC----------'/' PARTS',15X,8(1X,I2,A1,I2)/' NORTH PLANETARY NODE',8(1X,I2,A1,I2)/' SOUTH PLANETARY NODE',8(1X,I2,A1,I2))    <^,P+ <,P  
 <^,P4 <^,P4 <,P <,PF Da TX@t "uba +}(/' TO GET SIDEREAL LONGITUDES SUBTRACT ',F8.4,' DEG. FROM ALL LONGITUDES') $ DV : ZR [2DhI<+ $. DV1:9 TX@ "	b V( D5(
K
L +(//' CHART BELOW USES TROPICAL GEOCENTRIC ',2A7,' HOUSE SYSTEM',/,'1') V  F ^ : ZR"$.-\PP4  @5-\N^45 
 @a"$.-\PP4  @5-\Na45 $ @ aa  D5-\M%45  @5-\PU45 @ . D : Z|  a-\PP4 FMa-\PU4 @S!$,-\PP4 FM-\PU4 @S $#$S.S , F<53:9& R1:9 ! DB% : ZR $ DS &<$S V." R  D5-\;454u @5 ,<$
R 
0\
RJ6-\;464u5@a"ua4$G:S+:-\PP4SaOR @HTR$HTXDM-\N^4M@ @5-\PU45 @H< R $HTXDR-\Na4R  @5-\PU45 @HH R $HTXDW-\N^4W! @5-\PU45 @ R $HTXD\-\Na4\! @5-\PU45 @" R.H< DHB" R.HH DHN+v R $HTXDe-\N^4e@ @5 H<-\PP45 @5-\PU45 @H< R $HTXDm-\Na4m @ @5 HH-\PP45 @5-\PU45 @HH" R.H< DHB" R.HH DHN R H<-\PP4 
,3J <5g
O
A + *#$
S 
S.
3H0<5gO ,3N0<5gOAG4$c R H<5d $#$S.S R(  H- F<5 $#$. R(  H. F<5+& $#$S.S R(  H. F<5 $#$. R(  H- F<5 R1:98 : ZR $ DS &<$S V." R  D5-\;454u @5"*.
R-\PP4 R @6-\;464u5 @a"ua4$8:S+*-\PP4S  aO R @HT R $HTXD>-\N^4> 
 5-\PU45 @S R $HTXDC-\Na4C $ ,"@5-\PU45 @S $#$S.S R   F<5 R1:
9(5:UZR5TX@NH"Tb:,ZS5$#$R.<51:#9OR1:9L+V(' ',70A1) : ZR hH<-\PP4 
 5-\PU45 @ $hHZXDm-\Na4m $ ,"@5-\PU45 @ $#$. , F<5 $#$S.S + F<5 $#$. + F<51:9V TX@{ "|b +(/' INTERCEPTED SIGNS (IF ANY) FOLLOW')  : ZR!$@hHTO D5-\PS45 @5!&@hHTO F6-\PS46/55@ TX@
" R(
@
F +(6X,A10,4X,A10) R1:	9 "b +(/////////' DO YOU WANT ANOTHER HOROSCOPE ? ','(TYPE YES OR NO) -----'/)    "B~[ +(A3)  "3D[+& " b +&(' ENTER ANOTHER SET OF BIRTH DATA ........'/)    +&-\Pq+  +0  Y~j y~jZ"6@     }FS.    P`THLINEP
CHART"v@B3 Jx 63G%R65@$jhEPHEMPROGR#qj`":cxx"B["5L hmbs
!lf3qW9F!sf3q
8w"2Y9#!RRx"qa#!8J`"1+."v[Rx"VpQ"\."QnFI!~&3qe0q	!{Lf3^;2!p:y"YLf\EPr"4
"Df3!5oY"~3!0=8!w%q!QF3!
v"|":c}y!rMF!rJ\"'<5!TUY"o!3A	!rv3!yILf!X'oN!5(zp!;o>;!3oY!<e@A!zp!2/.
!hzp!YLf!08(z!2JpQ!/
7 8h9, ADM!q
lE!8I] z5a#z\!=8(z!6N
!49Lf!P~O"_04"O:/QzV6!2Fd-#%q""h+!Qj? _.
#4Lf">hf3#G@#3Q3!7O.
!R8\!
f3!tL
e="3r@{an@"63"1*3Vz	!syLf8e4D2IMA0+y~j 0"~$-"08(q+hZS!79r2zy0^X%<C+>x%2GF!6s{|Fg<Mn)Y0	04#sNViS5 [vL/(QFjw`fUD+S	N#j9&(a w$Out#vX(zp$4BF3M 1d{Yl+5# `TH!Qf3+     ?kBGNO   $Ix2<5$RAz?-X$I.7*` b#rX=^
r":dQYj6"';|7U"7:$-JMONDAY    TUESDAY   WEDNESDAY THURSDAY  FRIDAY    SATURDAY  SUNDAY    MOON)     MARS)     MERCURY)  JUPITER)  VENUS)    SATURN)   SUN)      SUN       MERCURY   VENUS     MARS      JUPITER   SATURN    URANUS    NEPTUNE   PLUTO     MOON      MOONNODE  PARS F.   ASCEND.   M.C.                NONE      CONJUNCT  SEMISEX.  SEMISQ.   SEXTILE   QUINTILE  SQUARE    TRINE     INCONJ.   OPPOSED   EXALTE    D         FALLEN              NATURA    L         DETRIM    ENTAL     HARMON    IOUS      INHARM    ONIOUS    ARIES     TAURUS    GEMINI    CANCER    LEO       VIRGO     LIBRA     SCORPIO   SAGITARIUSCAPRICORN AQUARIUS  PISCES    ...CAMP   ANUS...   ...MORI   NUS....   ...PLAC   IDUS...   REGIOMO   NTANUS    ...PORP   HYRY...   ....EQU   AL.....   ....ZAR   IEL....   ..ALCIB   ITUS...   .....KO   CH.....   $-<KZ	
	qKhZ(d ;x`7qVUZ.0YS
8Q<}\_Ooc*
l]5:
c&|BxX"63g!yHx,"IS3"3|"R"|%!rJO!TQ"p]!y'D!r|e""OC"4q8!h&3!vCFJ"cr!Up-{"Y=1;@o48qR!WI+I!rxy7!X2*D!x]lk!|e!r/X"*n.!{~P 2{' edG U}m 'L% 1Ne 5]& |<g [	o =M=X 4~^ Sz
r \k4 <;u$!1 0xc& b 80Ab tgjq!	xh!38~!>	r!SkwA    T    G    C    L    V    =    S    /    K    Q    P              I              I    I              I    I    I         I    V                   V              V    I              V    I    I    V    I    I    I         I    X                   X              X    I              X    I    I    S    U    M    E    V    E    M    A    J    U    S    A    U    R    N    E    P    L    M    O    M    N    P    F    A    S    M    C    FIRE EARTHAIR  WATER     MORINPLACIREGIOPORPHEQUALZARIEALCIBJA   FE   MR   AP   MY   JN   JL   AU   SE   OC   NO   DE    \Jh @Ji<Jp0<0|+1\+J,>pJZpJ+p@hJ4@pJ4@(JN@0JX@xJ;@J;@8JZ@(JH@PJR@PJS@hJ4@J@ J@J4@J4	(pJG[(/<0"`S<pX<0 p3@Jq+J*|J-<J~Z`J+JG!  @w+J<Jr p7 p+J4,>,>,> &w p,J/,&.<7@p+J- p,J/"Jr J`.< p`Js w,&,&5 J.< pdJs:." Q,& p,&>`9J*.<9J@@,^,^,^+J4d @@& 0b.".")B}5@J0,~m<!<P\Jd<Jr p[pl<0@X+J:Zp.</ pQ \Je+J=@@Je!<P\Jd7@Jg+J@ <Jh \Jf@@Jg!<P\JdXX\Jd Jt7@JfD<7@JgA< \Je <Jd[`x Ji,x,^x Jh+J JQ< \Jd:J  \Je<Jt pJ`|Ju < \Je@@Jf+JD@@Je Q< \Jd<Jt pJ`|Ju+JD7Jw Jx \Je @JWXQ< \Jd Jy \Je+JD[`x Ji,x+J_Z \Jd@@Je@@Je<Jr \Jf+JD7Jg JfX\J@@Jg@@Jf+JF>x! Z @
&JyU`eB+Jo@)@G 
"+Jl
&J}+L6$1,>Ps.@
p.46$	+XJ^.
.4Je.JdSEQIN@JvSEQOUT@Jw@JW
%5 Source level error at user's loc	
	`Z(X^.>R.~(3~+K	~+K "K
	b+Z. h+ggM?}
&K	b+J~,
?NO CORE AVAILABLE - CAN NOT PROCEED
!*K1**,^,~*x,> JK4 *K1**K4  pZ@K'`|+KPw,~ "p h a`~+K!h  ``~+K"$Kf!K#dKf/"+KP,~@@@ @@0@x@@@`edX91,>Ps,K!"QBK' <K',+KSMI 1,>Ps,K Kh+K>_MI 1,>Ps,K Ki BK( pd"~l"
 BK(!"GBK'+KTI5R1,>Ps,K & Kk BK(*\KS pd"~l" BK(*\KS p.&d"~l"$ BK)*\KS p.&d"~l"
 BK)*\KS.&Sp*\KSXp BK0@@K1 Kk BK*(FQFK' <K',+KEV4i91,>Ps+KaS,i@1,>Ps+Ka_,i@1,>Ps+KaK>21,>Ps+KaK>401,>Ps+Ka[<I71,>Ps
&Kl w @)@. 
"5BKb
&Kr,~.
.4SEQIN^KgSEQOUT^KhRANDOM^KjK0
%0 THE FOLLOWING ROUTINE IS NOT IMPLEMENTED IN FOROTS: 
a.3@1,>PsO@L0+KwgR~@1,>Ps@@L0,>,>@6 w+L"L10B+K!"A`X#p5@K|/#p!"X#p+L\p+La.9'1,>Ps,>,>O@L0+L,>
6+ _4`L
"`Q@,> <L2,,^,> <L5,
,^*bL	+L,> <L6,,^7@L0+L,> <L9,
,^+L,> <L;,
,^Z5"L,> <L<,
,^,7@L0,
,> <L>,,^,,> <LA,,^,> <LD,
,^(@qd1@,,
1@#+L%0@*+L,> <LE,,^+L,^,^,^,~(' Type G to Continue, X to Exit, T To trace.'/2H *,$)(A1)(1H 14A5/)(1H A5,1X,O6)PAUSESTOP .pXL-p XL.p L/p L0p XL'X~L,p xC~01,>Ps#p2`LV+LT4@LS+ "`LV @LW,> <LX,M%,^p+  @LW,> <LX,M
,^7!pLW,~ LV,~+PK0LY@,~ 0 9~j Y~jxLWACOS OF ARG > 1.0 IN MAGNITUDECNM`1,>Ps#p2bLm+Lj"pp+ Lm4@Lh @Ll,> <Ln,M%,^ p BLl,> <Ln,M
,^,~PLm7ap"`,~+PK0Lo@,~9~jM0xLlASIN OF ARG > 1.0 IN MAGNITUDECR
,^6M,~5L|M,~M,~+``+M4@MM7M"`,~4"M+DK0MM ,~MM7M"`,~MY~j9~jxMCR`FM$7M" M$7 "` M#,~ &`V-G {G ZCv\ 7f ]V#QI+0`} 9~jgG@1,>Ps7cp+M3  )@/ @( X@M0(B{4 M1B? BM7"P" M7B M7@,~B@ BM7""X+M,4BM6+PK0
M7#p+M'  ,~attempt to take SQRT of negative argKc3@ p p+MGKc3K  ,MG 
,~Kc3J  ,MG ,~Kc3I  ,MG ,~Kc3H4BM]5@MJ5"M\+DK0
MIU ,~,>,># $)D/$@,>4dMTX $(F) + MT5FMT5"MR"` ,Mk+M[#  ,> <M^,N9,^@,> <M_,N,^5&M[",^,^,^,~! ,~xxKc#@ p p+MkKc#K  ,Mk @,~Kc#J  ,Mk @,~Kc#I  ,Mk @,~Kc#H4BN5@Mo5"My+DK0
MnU ,~ DN!$ @N BN5"Mv#`+ N
,Mv!"B,~+ My(BdB+ My5BMt  N,~ +7`N+N`d +DK0M}+DK0
M}U `d @6 N+Mx N`B"`+Mx/Nid +N+DK0M}#N,> <N,N9,^ @,> <N,PP,^@,> <N,N,^+MU",MvN+ My+Ms! ,~xxNKc1,>Ps p3"N0+N3bN/+N+DK0
NU ,~+DK0N  ,~ DN0 FN1@@N1%"j"%N.)/;`:XDN*5fN#aF+N#.&@(|h&fN1 N-N. N- N1N,DN/@ N0 N1,~!t0_'"S'qf!um.	.#Y% !vyO^	RXC2|t(1,>Ps p4@NI @N8,> <NR,N9,^N8,~{e^bC2|p1,>Ps p5`N=4@NI+PK0NR#p3@NL+NK)r. !@NP! n@NP(|h"NM NM BNQ NNNNNONQNPNO,~+DK0
NJ NP,~  ,~ 0_i/X3 6P'M 5( bB W
R`@xN8ATTEMPTyTOTAKELOGOFNEGATIVEARGG?@1,>PspNyNz+N+Ncg&t@1,>Ps3pNz+=+NcG?1,>PsRpNz+Ncg&p1,>Ps p BNy#`3bNx+Nu DN{Nz3bN{+Nm%"(D?d$ "@($)B
&1ahfc"j9~c	B=!Z	w6?c1f
nS*veWxtj[3:hP@be|/y?fb	$}	z'iQD"hD"*U**U*U`*U*Uu*U*pIFo]o%g,&o}o%g* O #p  O O+0O +O"INM`1,>Ps O* O #p  4@OV@lO5 O$O@O  @O BO O+0O*"O+ O+  2 Og+OY2 Og , O O`LL@O4LO4`L.,0O 0O+0O2 7   @O BOd
~ZLO3`Oh+OW @O+ O+ +  O+0O;  0N| 0N| ,0N~ F
+ + + &+0OB&0&0+0OE&.,1lO+O= @+ + +  +0OL O O+0ON 6@O+OU @O+ O+ +  O+0OU 6@O !
O*,,~4LOU O O+OU ,Oh(Bd ~)@7?,Oi3&Oi+O,d ~@A(B{B3  @O+ O+ +  O+0Oe  @O BO+O- 0 sL#B6 0
 pIex:1,>Ps p+O{S51,>Ps+OrIO1,>Ps+OrSMm1,>Ps #p  +OI
dP1,>Ps p ",~g:=@1,>Ps #p  +POIad_P@M7 8BO~BV ,~S1d,>_({5 P hd ~(B)w27 "`,^,~Id ,P ,~Id@$,P$,~Ie(,P(,~I	d,>,>p,>px +0P /P,^,~I	d@,>,>p,>px$+0P$/P,^,~I	e,>,>p,>p
x(+0P
(/P ,^,~Iid,>,>p,>p @x+ + +  +0P( /P*,^,~Iid@,>,>p,>p Dx+ + + $+0P2$/P3,^,~Iie,>,>p,>p H
x+ 
+ 
+ (+0P;
(/P=,^,~I!d,>,>p,>p p+0PD"x+ +  /PE,^,~I!d@,>,>p,>p$p+0PL"x+ + $/PN,^,~g:9d,~M2|1,>Ps p+PWS; 1,>Ps+PVSO1,>Ps p+P\M3!d_P@M7 8BP[BV,~SAd% *5"P^h"`(.7 "`,~C1,>Ps#p,~S01,>Ps#p+"Pf,~U ,~g&=`1,>Ps#p7!p"`,~SNL{@1,>Ps pFp4 Pn p,~"p+"Pp,~U ,~KbN@1,>Ps,
,~PtY\PuQ<X\Pv*+