X-Git-Url: http://www2.svjatoslav.eu/gitweb/?p=qbasicapps.git;a=blobdiff_plain;f=graphics%2Fspirals%2Fspiral9.bas;h=74e3d04e1f6caced0c9b6145e5d922efb845ee48;hp=c5eec9f3a8f194b97002a06023e368909dba8f80;hb=8d86b3981cd6ccb427dc8fd428a34313f5b55fe2;hpb=79a4fa7075f6db68147ed79e380f79a3c9276d44 diff --git a/graphics/spirals/spiral9.bas b/graphics/spirals/spiral9.bas old mode 100755 new mode 100644 index c5eec9f..74e3d04 --- a/graphics/spirals/spiral9.bas +++ b/graphics/spirals/spiral9.bas @@ -2,7 +2,7 @@ ' made by Svjatoslav Agejenko ' in 2003.12 ' H-Page: svjatoslav.eu -' E-Mail: svjatoslavagejenko@gmail.com +' E-Mail: svjatoslav@svjatoslav.eu DECLARE SUB fill (x1, y1, x2, y2, xx1, yy1, xx2, yy2, hel) DIM SHARED torux(1 TO 10000)