Initial data commit

2023-07-01 11:58:00 -04:00 · 2023-07-01 11:58:00 -04:00 · f23f22d71c
commit f23f22d71c
parent 72d218235f
199087 changed files with 3378941 additions and 0 deletions
--- a/Task/Conditional-structures/M2000-Interpreter/conditional-structures-8.m2000
+++ b/Task/Conditional-structures/M2000-Interpreter/conditional-structures-8.m2000
@ -0,0 +1,19 @@
+Module Checkit {
+      Rem : Dim beta(10)  ' remove Rem to get error when call beta() without Gosub
+      Rem : Gosub beta() ' remove again Rem  and erase next line to use beta() correct
+      'beta()
+      sub beta()
+            local i
+            for i=1 to 10
+                  alfa(i)
+            next i
+      end sub
+      sub alfa(x)
+      goto 100
+      Print "no print"
+      End Sub
+
+      100 Print "ok this printed", x
+              Return
+}
+Checkit