X-Git-Url: http://www2.svjatoslav.eu/gitweb/?p=qbasicapps.git;a=blobdiff_plain;f=math%2Fbiorythm%2Fbio.bas;fp=math%2Fbiorythm%2Fbio.bas;h=d0a834c4afca154719f65a30dcaa63be779472e8;hp=f04eefc8860e923a438d1a5bdeebd1d9fe0c65e3;hb=08a50b7a860f6aa39f58108a07e2fc13e46260b9;hpb=68c9ea9c1b1c03a3d38bd585f0bdeee6371cb05b

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