Solve triangle solitaire puzzle: Difference between revisions

Content added Content deleted

Inline

@@ Line 369: / Line 369: @@
 func init . .
   repeat
-    s$ = input
+    s$ = input & "\n"
-    until s$ = ""
+    until s$ = "\n"
-    nc = len s$ + 1
+    brd$ &= s$
-    for c$ in str_chars s$
+    nc = len s$
-      brd$[] &= c$
-    .
-    brd$[] &= "\n"
   .
+  brd$[] = str_chars brd$
 .
 call init