From eba6e303eaf72d59d988a248c6da6f6e436543cf Mon Sep 17 00:00:00 2001 From: Walter Bender Date: Sat, 29 Aug 2009 15:32:58 +0000 Subject: converting samples to json --- (limited to 'samples/csquiral.ta') diff --git a/samples/csquiral.ta b/samples/csquiral.ta index 647b5b2..5e791ea 100644 --- a/samples/csquiral.ta +++ b/samples/csquiral.ta @@ -1,210 +1 @@ -(lp0 -(I0 -S'clean' -p1 -I207 -I67 -(lp2 -NaI1 -atp3 -a(I1 -S'setpensize' -p4 -I207 -I106 -(lp5 -I0 -aI2 -aI3 -atp6 -a(I2 -(S'number' -p7 -S'25' -p8 -tp9 -I281 -I123 -(lp10 -I1 -aNatp11 -a(I3 -S'storeinbox1' -p12 -I207 -I160 -(lp13 -I1 -aI4 -aI5 -atp14 -a(I4 -(g7 -S'0' -p15 -tp16 -I281 -I177 -(lp17 -I3 -aNatp18 -a(I5 -S'repeat' -p19 -I207 -I214 -(lp20 -I3 -aI6 -aI7 -aNatp21 -a(I6 -(g7 -S'1300' -p22 -tp23 -I293 -I223 -(lp24 -I5 -aNatp25 -a(I7 -S'setcolor' -p26 -I302 -I263 -(lp27 -I5 -aI8 -aI11 -atp28 -a(I8 -S'xcor' -p29 -I376 -I280 -(lp30 -I7 -aI9 -atp31 -a(I9 -S'division' -p32 -I469 -I272 -(lp33 -I8 -aI10 -atp34 -a(I10 -(g7 -S'6' -p35 -tp36 -I508 -I280 -(lp37 -I9 -aNatp38 -a(I11 -S'setshade' -p39 -I302 -I317 -(lp40 -I7 -aI12 -aI13 -atp41 -a(I12 -S'heading' -p42 -I376 -I334 -(lp43 -I11 -aNatp44 -a(I13 -S'forward' -p45 -I302 -I371 -(lp46 -I11 -aI14 -aI15 -atp47 -a(I14 -S'box1' -p48 -I376 -I380 -(lp49 -I13 -aNatp50 -a(I15 -S'right' -p51 -I302 -I410 -(lp52 -I13 -aI16 -aI17 -atp53 -a(I16 -(g7 -S'91' -p54 -tp55 -I376 -I419 -(lp56 -I15 -aNatp57 -a(I17 -g12 -I302 -I449 -(lp58 -I15 -aI18 -aNatp59 -a(I18 -g48 -I376 -I466 -(lp60 -I17 -aI19 -atp61 -a(I19 -S'plus' -p62 -I469 -I458 -(lp63 -I18 -aI20 -atp64 -a(I20 -(g7 -S'1' -p65 -tp66 -I508 -I466 -(lp67 -I19 -aNatp68 -a(I-1 -S'turtle' -p69 -F906.80942086435073 -F86.478356202884811 -F220.0 -F-17.117197178042431 -F129.0 -F25.0 -tp70 -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