Data update

Task/Repeat/Applesoft-BASIC/repeat.basic

@@ -0,0 +1,20 @@
+ 100  FOR I = 768 TO 794
+ 110      READ B: POKE I,B: NEXT
+ 120  DATA165,185,72,165,184,72
+ 130  DATA165,118,72,165,117,72
+ 140  DATA169,176,72,32,123,221
+ 150  DATA32,82,231,32,65,217
+ 160  DATA76,210,215
+ 170  POKE 1014,0: POKE 1015,3
+
+ 200  LET P = 400:N = 4
+ 210  GOSUB 300"REPEAT P N
+ 220  END
+
+ 300      IF N <  = 0 THEN  RETURN
+ 310      LET N = N - 1
+ 320      & P
+ 330  GOTO 300
+
+ 400  PRINT "EXAMPLE"
+ 410  RETURN