fixed file permissions

[qbasicapps.git] / math / biorythm / bio.bas

diff --git a/math/biorythm/bio.bas b/math/biorythm/bio.bas
index f04eefc..d0a834c 100755 (executable)
--- a/math/biorythm/bio.bas
+++ b/math/biorythm/bio.bas
@@ -1,7 +1,10 @@
+CHDIR ".\qbasicapps\math\biorythm"\r
+\r
+\r
 ' Biorythm calculator\r
 ' made by Svjatoslav Agejenko\r
 ' in 2003.12\r
-' email: svjatoslavagejenko@gmail.com\r
+' email: svjatoslav@svjatoslav.eu\r
 \r
 DECLARE FUNCTION gety& (zx2!, re&)\r
 DECLARE SUB getdata (zt!, y1&, y2&, y3&)\r