Data update

Task/Nested-templated-data/BASIC256/nested-templated-data.basic

@@ -0,0 +1,31 @@
+dim p(7)
+dim p$(7)
+p$[0] = "Payload#0" : p$[1] = "Payload#1"
+p$[2] = "Payload#2" : p$[3] = "Payload#3"
+p$[4] = "Payload#4" : p$[5] = "Payload#5"
+p$[6] = "Payload#6"
+dim q(7) fill false
+dim t(4, 5)
+t[0, 0] = 1: t[0, 1] = 2
+t[1, 0] = 3: t[1, 1] = 4: t[1, 2] = 1
+t[2, 0] = 5
+
+for i = 0 to t[?][]-1
+	for j = 0 to t[?][]-1
+		if t[i, j] <> 0 then
+			q[t[i, j]] = true
+			t[i, j] += 1
+		end if
+	next j
+next i
+
+for i = 0 to t[?][]-1
+	for j = 0 to t[?][]-1
+		if t[i, j] <> 0 then print p$[t[i, j] -1]; " ";
+	next j
+	print
+next i
+
+for i = 0 to q[?]-1
+	if not q[i] then print p$[i]; " is not used"
+next i