B 0 148000 M0  3401"SCREEN WIDTH";WI:(WI2)WI2WIWI1>WIWI10v(:" Complex mathematics is taking place"|2<N$(20),D(12),L$(61),P(23)FE(28),I(33),M$(36),H$(40)P I120:N$N$" ":I_ ZI161:L$L$" ":IdI136:M$M$" ":InI140:H$H$" ":IMxM$"JANFEBMARAPRMAYJUNJULAUGSEPOCTNOVDEC"{I123:P(I):P(I)(P(I)(WI1)611):II128:E(I):E(I)(E(I)(WI1)611):II133:I(I):I(I)(I(I)(WI1)611):I I112:D(I):I"ENTER YOUR NAME";N$N$"."4"ENTER YOUR DATE OF BIRTH">1050m"ENTER DATE FOR CHART (MONTH,YEAR)";S2,S3"FOR CONTINUOUS PRINT OUT TYPE 'C'";C$S212 S21210S3100S3S31900S31900210S3S212B3B212210S11:D10S31B3330#"YB31S311,D1D1365I6Y4(Y4)D1D11P@Y_JB212380nTYB2112}^D1D1D(Y)hYr(B23)((B34)B34)D1D11|D1D1D(B2)B11S3B3460S21500Y1S21D1D1D(Y)Y (S22)((S34)S34)D1D11)5006YS212ED1D1D(Y)LYo(S23)((S34)S34)D1D11P1D1(D123)23E1D1(D128)28I1D1(D133)33MD(S2)MMS2&11400V(S22)((S34)S34)MM1:J1M DK161NL$(K)" "XK/bL$(WI2)":";lP1P11JvP124650SP11eL$(P(P1))"P"qE1E11E129690E11L$(E(E1))"E"I1I11I134730I11L$(I(I1))"I"E(E1)I(I1)760L$(E(E1))"+"E(E1)P(P1)780!L$(E(E1))"+"7 P(P1)I(I1)800IL$(P(P1))"+"R " "n*E(E1)WI2"*";:ZZ14P(P1)WI2"*";:ZZ1>I(I1)WI2"*";:ZZ1H4Z):Z0RJ10" ";\J;fI1WI:L$(I);:IpK139zH$(K)" "KH$(WI28)":"+P(P1)359509H$(2)"*"HH$(40)"P"\I(I1)341000{H$(2)"*"H$(2)"*":980H$(3)"*"H$(40)"I"I(I1)34P(P1)35H$(40)"+"J1300FF0170230$"DAY";:B1."MONTH";:B2!8"YEAR";:B31BB2121050FLB129B221110]VB3100B3B31900o`B319811050ujt1470~D101190" YOU HAVE LIVED FOR ";D1;D11" DAY":1190" DAYS"14701270WI47);"PASSIVE CRITICAL ACTIVE"(1270.I(M$,(MM1)31,3);S3OUnLL1WI27:"<";:LL1WI21:">";:: 1270(2"Chart prepared for ";N$;" Birthdate";<pB1;B2;B3:1470FC$"C"1380P"NEXT MONTH (YES OR NO)";XX$+ZXX$"NO"1400KdS2S21:S213S21:S3S31VnFF1:axFF0:31,39,47,53,58,60,61,59,56,50,43,35,27,19,12,6,3,1,2,4,9,15,2231,38,44,50,54,58,60,61,60,58,54,50,44,38,31,24,18,12,8,4,2,1,24,8,12,18,24B31,37,42,47,52,55,58,60,61,61,59,57,54,50,45,39,34,28,23,17,12,8a5,3,1,1,2,4,7,10,15,20,2531,28,31,30,31,30,31,31,30,31,30,31XX12::XX