Data update

Task/Animation/EasyLang/animation.easy

@@ -0,0 +1,25 @@
+s$ = "Hello world! "
+textsize 16
+lg = len s$
+on timer
+   color 333
+   move 10 20
+   rect 80 20
+   color 999
+   move 12 24
+   text s$
+   if forw = 0
+      s$ = substr s$ lg 1 & substr s$ 1 (lg - 1)
+   else
+      s$ = substr s$ 2 (lg - 1) & substr s$ 1 1
+   .
+   timer 0.2
+.
+on mouse_down
+   if mouse_x > 10 and mouse_x < 90
+      if mouse_y > 20 and mouse_y < 40
+         forw = 1 - forw
+      .
+   .
+.
+timer 0

Task/Animation/MiniScript/animation-1.mini

@@ -0,0 +1,19 @@
+clear
+s = "Hello World! "
+toggle = true
+while true
+	text.row = 12
+	text.column = 15
+	print " " + s + " "
+	wait 0.1
+	if key.available then
+		toggle = not toggle
+		key.clear
+		yield
+	end if
+	if toggle then
+		s = s[-1] + s[:-1]
+	else
+		s = s[1:] + s[0]
+	end if
+end while

Task/Animation/MiniScript/animation-2.mini

@@ -0,0 +1,17 @@
+clear
+txt = "Hello World! "
+width = txt.len * 20 + 4
+gfx.print txt,0,608,color.white, "large"
+toggle = false
+
+while true
+	img1 = gfx.getImage(toggle, 608, width - 1, 32)
+	img2 = gfx.getImage((not toggle) * (width - 1), 608, 1, 32)
+	gfx.drawImage img1, (not toggle), 608
+	gfx.drawImage img2, toggle * (width - 1), 608
+	if key.available then
+		toggle = not toggle
+		key.clear
+	end if
+	yield
+end while

Task/Animation/MiniScript/animation.mini

@@ -1,12 +0,0 @@
-clear
-text.inverse = true
-s = "Hello World! "
-while not key.available
-	text.row = 12
-	text.column = 15
-	print " " + s + " "
-	wait 0.1
-	s = s[-1] + s[:-1]
-end while
-text.inverse = false
-key.clear