Data commit

Task/Self-describing-numbers/LiveCode/self-describing-numbers-1.livecode

@@ -0,0 +1,11 @@
+function selfDescNumber n
+    local tSelfD, tLen
+    put len(n) into tLen
+    repeat with x = 0 to (tLen - 1)
+        put n into nCopy
+        replace x with empty in nCopy
+        put char (x + 1) of n = (tLen - len(nCopy)) into tSelfD
+        if not tSelfD then exit repeat
+    end repeat
+    return tSelfD
+end selfDescNumber

Task/Self-describing-numbers/LiveCode/self-describing-numbers-2.livecode

@@ -0,0 +1,9 @@
+on mouseUp
+    repeat with n = 0 to 10000000
+        if selfDescNumber(n) then
+            put n into selfNum[n]
+        end if
+    end repeat
+    combine selfNum using comma
+    put selfNum
+end mouseUp

Task/Self-describing-numbers/LiveCode/self-describing-numbers-3.livecode

@@ -0,0 +1 @@
+1210,2020,21200,3211000