From eba6e303eaf72d59d988a248c6da6f6e436543cf Mon Sep 17 00:00:00 2001
From: Walter Bender <walter@walter-laptop.(none)>
Date: Sat, 29 Aug 2009 15:32:58 +0000
Subject: converting samples to json

---
(limited to 'samples/candyvortex.ta')

diff --git a/samples/candyvortex.ta b/samples/candyvortex.ta
index c399cee..5e791ea 100644
--- a/samples/candyvortex.ta
+++ b/samples/candyvortex.ta
@@ -1,152 +1 @@
-(lp0
-(I0
-S'clean'
-p1
-I212
-I77
-(lp2
-NaI1
-atp3
-a(I1
-S'repeat'
-p4
-I212
-I116
-(lp5
-I0
-aI2
-aI3
-aNatp6
-a(I2
-(S'number'
-p7
-I350
-tp8
-I298
-I125
-(lp9
-I1
-aNatp10
-a(I3
-S'setpensize'
-p11
-I307
-I165
-(lp12
-I1
-aI4
-aI5
-atp13
-a(I4
-S'heading'
-p14
-I381
-I182
-(lp15
-I3
-aNatp16
-a(I5
-S'forward'
-p17
-I307
-I219
-(lp18
-I3
-aI6
-aI7
-atp19
-a(I6
-(g7
-S'1000'
-p20
-tp21
-I381
-I228
-(lp22
-I5
-aNatp23
-a(I7
-S'setcolor'
-p24
-I307
-I258
-(lp25
-I5
-aI8
-aI9
-atp26
-a(I8
-S'xcor'
-p27
-I381
-I275
-(lp28
-I7
-aNatp29
-a(I9
-S'setshade'
-p30
-I307
-I312
-(lp31
-I7
-aI10
-aI11
-atp32
-a(I10
-S'ycor'
-p33
-I381
-I329
-(lp34
-I9
-aNatp35
-a(I11
-S'back'
-p36
-I307
-I366
-(lp37
-I9
-aI12
-aI13
-atp38
-a(I12
-(g7
-S'1000'
-p39
-tp40
-I381
-I375
-(lp41
-I11
-aNatp42
-a(I13
-S'left'
-p43
-I307
-I405
-(lp44
-I11
-aI14
-aNatp45
-a(I14
-(g7
-I1
-tp46
-I381
-I414
-(lp47
-I13
-aNatp48
-a(I-1
-S'turtle'
-p49
-I-524
-I384
-F10.0
-F190.8089953765448
-F981.62718344766392
-F11.0
-tp50
-a.
\ No newline at end of file
+[[0, "clean", 227, 73, [1, 51]], [1, "start", 215, 23, [null, 0]], [2, "hat2", 220, 328, [null, 3]], [3, "setcolor", 232, 378, [2, 4, 7]], [4, "random", 306, 376, [3, 5, 6, null]], [5, ["number", "0"], 334, 395, [4, null]], [6, ["number", "100"], 456, 395, [4, null]], [7, "setpensize", 232, 432, [3, 8, 9]], [8, ["number", "40"], 306, 449, [7, null]], [9, "stack1", 232, 486, [7, 10]], [10, "setcolor", 232, 525, [9, 11, 14]], [11, "plus2", 306, 518, [10, 12, 13]], [12, "color", 346, 526, [11, null]], [13, ["number", "10"], 346, 559, [11, null]], [14, "setpensize", 232, 579, [10, 15, 18]], [15, "minus2", 306, 572, [14, 16, 17]], [16, "pensize", 346, 580, [15, null]], [17, ["number", "25"], 365, 613, [15, null]], [18, "stack1", 232, 633, [14, null]], [19, "hat1", 685, 19, [null, 20]], [20, "left", 697, 69, [19, 21, 22]], [21, ["number", "45"], 771, 78, [20, null]], [22, "repeat", 697, 108, [20, 23, 24, 30]], [23, ["number", "4"], 783, 117, [22, null]], [24, "forward", 792, 157, [22, 25, 26]], [25, ["number", "75"], 866, 166, [24, null]], [26, "back", 792, 196, [24, 27, 28]], [27, ["number", "75"], 866, 205, [26, null]], [28, "left", 792, 235, [26, 29, null]], [29, ["number", "90"], 866, 244, [28, null]], [30, "vspace", 697, 198, [22, 31]], [31, "right", 697, 267, [30, 32, 33]], [32, ["number", "45"], 771, 276, [31, null]], [33, "penup", 697, 306, [31, 34]], [34, "forward", 697, 345, [33, 35, 36]], [35, ["number", "90"], 771, 354, [34, null]], [36, "pendown", 697, 384, [34, 37]], [37, "setpensize", 697, 423, [36, 45, 38]], [38, "forward", 697, 477, [37, 39, 40]], [39, ["number", "1"], 771, 486, [38, null]], [40, "penup", 697, 516, [38, 41]], [41, "back", 697, 555, [40, 42, 43]], [42, ["number", "91"], 771, 564, [41, null]], [43, "pendown", 697, 594, [41, 44]], [44, "setpensize", 697, 633, [43, 48, null]], [45, "plus2", 771, 416, [37, 46, 47]], [46, "pensize", 811, 424, [45, null]], [47, ["number", "35"], 811, 457, [45, null]], [48, "minus2", 771, 626, [44, 49, 50]], [49, "pensize", 811, 634, [48, null]], [50, ["number", "35"], 830, 667, [48, null]], [51, "repeat", 227, 112, [0, 52, 53, null]], [52, ["number", "500"], 313, 121, [51, null]], [53, "penup", 322, 161, [51, 54]], [54, "setxy", 322, 200, [53, 55, 58, 61]], [55, "random", 396, 190, [54, 56, 57, null]], [56, ["number", "-600"], 424, 209, [55, null]], [57, ["number", "600"], 546, 209, [55, null]], [58, "random", 396, 227, [54, 59, 60, null]], [59, ["number", "-450"], 424, 246, [58, null]], [60, ["number", "450"], 546, 246, [58, null]], [61, "pendown", 322, 276, [54, 62]], [62, "stack2", 322, 315, [61, null]], [-1, "turtle", 562.0, -180.0, 0.0, 87.0, 50, 15.0]]
\ No newline at end of file
--
cgit v0.9.1