From:	Aaron <admoman@cc.owu.edu>

--- br	Tue Feb 15 13:59:49 1994
+++ br.new	Tue Feb 15 14:34:09 1994
@@ -1,6 +1,6 @@
 10   REM --------------------------------------------------------------------
 20   REM Biorhythmus (c) by Frank Kaefer 1987-1994 V3.0
-30   REM History:
+30   REM History
 40   REM          V1.0 ZX-80 Basic (ZX-80 with 16 kB RAM)
 50   REM          V2.0 TRS-80 Basic (Video Genie)
 60   REM          V2.1 C-64 Basic
@@ -86,10 +86,10 @@
 860  TAGE=TAH-TAG
 870  GOSUB 2110
 880  IF DRUCKER$="false" THEN PRINT
-890  IF DRUCKER$="false" THEN PRINT "The birthday "; TG"."MG"."JG; " is a "; WOCHENTAG$(GTAG)
+890  IF DRUCKER$="false" THEN PRINT "The birthday "; TG;".";MG;".";JG; " is a "; WOCHENTAG$(GTAG)
 900  IF DRUCKER$="false" THEN PRINT "Age in days: "; TAGE
 910  IF DRUCKER$="true" THEN LPRINT
-920  IF DRUCKER$="true" THEN LPRINT "The birthday "; TG"."MG"."JG; " is a "; WOCHENTAG$(GTAG)
+920  IF DRUCKER$="true" THEN LPRINT "The birthday "; TG;".";MG;".";JG; " is a "; WOCHENTAG$(GTAG)
 930  IF DRUCKER$="true" THEN LPRINT "Age in days: "; TAGE
 940  REM --------------------------------------------------------------------
 950  REM Berechnung der drei Werte fuer das angegebene Datum
@@ -100,12 +100,12 @@
 1000 REM --------------------------------------------------------------------
 1010 REM Ausgabe der Werte
 1020 REM --------------------------------------------------------------------
-1030 IF DRUCKER$="false" THEN PRINT "Biorhythm    "; TH"."MH"."JH
+1030 IF DRUCKER$="false" THEN PRINT "Biorhythm    "; TH;".";MH;".";JH
 1040 IF DRUCKER$="false" THEN PRINT "Physical:    "; PHYS; "%"
 1050 IF DRUCKER$="false" THEN PRINT "Emotional:   "; EMOT; "%"
 1060 IF DRUCKER$="false" THEN PRINT "Mental:      "; GEIST; "%"
 1070 IF DRUCKER$="false" THEN PRINT
-1080 IF DRUCKER$="true" THEN LPRINT "Biorhythm    "; TH"."MH"."JH
+1080 IF DRUCKER$="true" THEN LPRINT "Biorhythm    "; TH;".";MH;".";JH
 1090 IF DRUCKER$="true" THEN LPRINT "Physical:    "; PHYS; "%"
 1100 IF DRUCKER$="true" THEN LPRINT "Emotional:   "; EMOT; "%"
 1110 IF DRUCKER$="true" THEN LPRINT "Mental:      "; GEIST; "%"
@@ -151,14 +151,14 @@
 1510 TAGE=TAH-TAG
 1520 GOSUB 2110
 1530 IF DRUCKER$="false" THEN PRINT
-1540 IF DRUCKER$="false" THEN PRINT "The birthday "; TG"."MG"."JG; " is a "; WOCHENTAG$(GTAG)
+1540 IF DRUCKER$="false" THEN PRINT "The birthday "; TG;".";MG;".";JG; " is a "; WOCHENTAG$(GTAG)
 1550 IF DRUCKER$="false" THEN PRINT "Age in days: "; TAGE
 1560 IF DRUCKER$="false" THEN PRINT
 1570 IF DRUCKER$="false" THEN PRINT TAB(15); "P=Physical, E=Emotional, M=Mental"
 1580 IF DRUCKER$="false" THEN PRINT
 1590 IF DRUCKER$="false" THEN PRINT TAB(15); "bad condition"; TAB(52); "good condition"
 1600 IF DRUCKER$="true" THEN LPRINT
-1610 IF DRUCKER$="true" THEN LPRINT "The birthday "; TG"."MG"."JG; " is a "; WOCHENTAG$(GTAG)
+1610 IF DRUCKER$="true" THEN LPRINT "The birthday "; TG;".";MG;".";JG; " is a "; WOCHENTAG$(GTAG)
 1620 IF DRUCKER$="true" THEN LPRINT "Age in days: "; TAGE
 1630 IF DRUCKER$="true" THEN LPRINT
 1640 IF DRUCKER$="true" THEN LPRINT TAB(15); "P=Physical, E=Emotional, M=Mental"

