updated license and email addresses

[qbasicapps.git] / graphics / spirals / spiral9.bas

diff --git a/graphics/spirals/spiral9.bas b/graphics/spirals/spiral9.bas
old mode 100644 (file)
new mode 100755 (executable)
index c5eec9f..74e3d04
--- a/graphics/spirals/spiral9.bas
+++ b/graphics/spirals/spiral9.bas
@@ -2,7 +2,7 @@
 ' made by Svjatoslav Agejenko\r
 ' in 2003.12\r
 ' H-Page: svjatoslav.eu\r
 ' made by Svjatoslav Agejenko\r
 ' in 2003.12\r
 ' H-Page: svjatoslav.eu\r

-' E-Mail: svjatoslavagejenko@gmail.com\r
+' E-Mail: svjatoslav@svjatoslav.eu\r

  \r
 DECLARE SUB fill (x1, y1, x2, y2, xx1, yy1, xx2, yy2, hel)\r
 DIM SHARED torux(1 TO 10000)\r
  \r
 DECLARE SUB fill (x1, y1, x2, y2, xx1, yy1, xx2, yy2, hel)\r
 DIM SHARED torux(1 TO 10000)\r