Data update

Task/Image-noise/EasyLang/image-noise.easy

@@ -1,24 +1,19 @@
-proc pset x y c . .
-   color c
-   move x / 3.2 y / 3.2
-   rect 0.3 0.3
+proc pset x y c .
+   gcolor c
+   grect x / 3.2 y / 3.2 0.3 0.3
 .
 on animate
    fr += 1
    if systime - t0 >= 1
-      move 10 78
-      color -2
-      rect 80 20
-      color -1
-      move 10 80
-      text fr / (systime - t0) & " fps"
+      gcolor -2
+      grect 10 78 80 20
+      gcolor -1
+      gtext 10 80 fr / (systime - t0) & " fps"
       t0 = systime
       fr = 0
    .
    col[] = [ 000 999 ]
-   for x = 0 to 319
-      for y = 0 to 199
-         pset x y col[random 2]
-      .
+   for x = 0 to 319 : for y = 0 to 199
+      pset x y col[random 2]
    .
 .