updated license and email addresses

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

diff --git a/graphics/spirals/spiral9.bas b/graphics/spirals/spiral9.bas
index c5eec9f..74e3d04 100755 (executable)
--- 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