From cf8d97feb6fb51e423b563a1d64b84ab6d5aad5f Mon Sep 17 00:00:00 2001
From: Walter Bender <walter.bender@gmail.com>
Date: Mon, 25 Apr 2011 01:45:26 +0000
Subject: new sample projects

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

diff --git a/samples/spectrum_analyzer.ta b/samples/spectrum_analyzer.ta
new file mode 100644
index 0000000..bb850d3
--- /dev/null
+++ b/samples/spectrum_analyzer.ta
@@ -0,0 +1,53 @@
+[[0, ["start", 2.0], 114, 36, [null, 31]],
+[1, ["myfunc1arg", 0], 297, 138, [35, 2, 4, null]],
+[2, ["string", "int(x)"], 378, 138, [1, null]],
+[3, ["number", 100.0], 456, 222, [4, null]],
+[4, ["division2", 0], 378, 180, [1, 5, 3]],
+[5, "pitch", 432, 180, [4, null]],
+[6, "forever", 114, 120, [31, 35, null]],
+[7, "repeat", 644, 157, [10, 8, 16, 9]],
+[8, ["number", 30.0], 692, 157, [7, null]],
+[9, ["vspace", 0], 644, 235, [7, null]],
+[10, "storeinbox1", 644, 115, [30, 11, 7]],
+[11, ["number", 2.0], 763, 115, [10, null]],
+[12, "storeinbox1", 706, 631, [19, 15, null]],
+[13, ["number", 1.0], 879, 673, [15, null]],
+[14, "box1", 879, 631, [15, null]],
+[15, ["plus2", 0], 825, 631, [12, 14, 13]],
+[16, "addturtle", 706, 217, [7, 17, 45]],
+[17, "box1", 764, 217, [16, null]],
+[18, "penup", 706, 343, [44, 20]],
+[19, "pendown", 706, 589, [20, 12]],
+[20, ["setxy2", 60], 706, 385, [18, 27, 22, 19]],
+[21, ["number", 30.0], 950, 427, [26, null]],
+[22, ["number", -200.0], 764, 547, [20, null]],
+[23, "leftpos", 818, 507, [27, null]],
+[24, "width", 926, 385, [26, null]],
+[25, "box1", 980, 467, [42, null]],
+[26, ["division2", 0], 872, 385, [28, 24, 21]],
+[27, ["plus2", 40], 764, 385, [20, 28, 23]],
+[28, ["product2", 20], 818, 385, [27, 26, 52]],
+[29, "hat1", 644, 31, [null, 30]],
+[30, "clean", 644, 73, [29, 10]],
+[31, "stack1", 114, 78, [0, 6]],
+[32, "addturtle", 230, 450, [38, 36, 33]],
+[33, "forward", 230, 492, [32, 34, null]],
+[34, ["number", 1.0], 302, 492, [33, null]],
+[35, "storeinbox2", 178, 138, [6, 1, 39]],
+[36, "box2", 288, 450, [32, null]],
+[37, "box2", 308, 340, [41, null]],
+[38, "if", 178, 382, [39, 48, 32, null]],
+[39, ["vspace", 80], 178, 180, [35, 38]],
+[40, ["number", 1.0], 332, 382, [41, null]],
+[41, ["greater2", 0], 262, 340, [48, 37, 40, null]],
+[42, ["minus2", 0], 926, 467, [52, 25, 43]],
+[43, ["number", 1.0], 1004, 509, [42, null]],
+[44, "setcolor", 706, 301, [45, 47, 18]],
+[45, "setshade", 706, 259, [16, 46, 44]],
+[46, ["number", 25.0], 792, 259, [45, null]],
+[47, "box1", 784, 301, [44, null]],
+[48, ["and2", 0], 216, 300, [38, 49, 41]],
+[49, ["less2", 0], 262, 258, [48, 50, 51, null]],
+[50, "box2", 308, 258, [49, null]],
+[51, ["number", 21.0], 332, 300, [49, null]],
+[52, ["identity2", 0], 872, 467, [28, 42]]]
--
cgit v0.9.1