From c4da436408dee594b06c212414d658559f2180b1 Mon Sep 17 00:00:00 2001
From: Walter Bender <walter@sugarlabs.org>
Date: Wed, 10 Jul 2013 22:36:36 +0000
Subject: more samples from bss

---
diff --git a/samples/graphics-dandilion.tb b/samples/graphics-dandilion.tb
new file mode 100644
index 0000000..6653524
--- /dev/null
+++ b/samples/graphics-dandilion.tb
@@ -0,0 +1,43 @@
+[[0, ["start", 2.0], 400, 200, [null, 37]],
+[1, "forward", 436, 372, [19, 2, 3]],
+[2, "width", 507, 372, [1, null]],
+[3, "back", 436, 414, [1, 4, 21]],
+[4, "width", 494, 414, [3, null]],
+[5, "setpensize", 660, 254, [25, 8, 13]],
+[6, ["number", 1], 859, 296, [8, null]],
+[7, "pensize", 835, 254, [8, null]],
+[8, ["minus2", 0], 762, 254, [5, 7, 6]],
+[9, "setshade", 660, 338, [13, 12, null]],
+[10, ["number", 4], 799, 380, [12, null]],
+[11, "shade", 799, 338, [12, null]],
+[12, ["plus2", 0], 745, 338, [9, 11, 10]],
+[13, ["vspace", 0], 660, 296, [5, 9]],
+[14, "setcolor", 140, 590, [23, 32, 15]],
+[15, "setshade", 140, 632, [14, 16, null]],
+[16, ["number", 0], 225, 632, [15, null]],
+[17, ["repeat", 93], 400, 288, [37, 18, 19, null]],
+[18, ["number", 25], 459, 288, [17, null]],
+[19, ["repeat", 42], 418, 330, [17, 20, 1, 27]],
+[20, ["number", 30], 477, 330, [19, null]],
+[21, "right", 436, 456, [3, 22, null]],
+[22, ["number", 12], 494, 456, [21, null]],
+[23, "setpensize", 140, 548, [34, 24, 14]],
+[24, ["number", 30.0], 242, 548, [23, null]],
+[25, "hat", 660, 200, [null, 26, 5]],
+[26, ["string", "update pen"], 718, 212, [25, null]],
+[27, "stack", 418, 516, [19, 28, null]],
+[28, ["string", "update pen"], 476, 516, [27, null]],
+[29, ["setxy2", 0], 140, 422, [33, 30, 31, 34]],
+[30, ["number", -200], 198, 422, [29, null]],
+[31, ["number", -100], 198, 464, [29, null]],
+[32, ["number", 15], 217, 590, [14, null]],
+[33, "penup", 140, 380, [39, 29]],
+[34, "pendown", 140, 506, [29, 23]],
+[35, "hat", 140, 200, [null, 36, 39]],
+[36, ["string", "setup"], 198, 212, [35, null]],
+[37, "stack", 400, 246, [0, 38, 17]],
+[38, ["string", "setup"], 458, 246, [37, null]],
+[39, "fillscreen2", 140, 254, [35, 40, 41, 42, 33]],
+[40, ["number", 60], 222, 254, [39, null]],
+[41, ["number", 80], 222, 296, [39, null]],
+[42, ["number", 100], 222, 338, [39, null]]]
diff --git a/samples/graphics-palm.tb b/samples/graphics-palm.tb
new file mode 100644
index 0000000..7ebf70e
--- /dev/null
+++ b/samples/graphics-palm.tb
@@ -0,0 +1,60 @@
+[[0, ["start", 2.0], 100, 180, [null, 42]],
+[1, ["repeat", 42], 640, 234, [50, 2, 3, null]],
+[2, ["number", 28.0], 699, 234, [1, null]],
+[3, ["arc", 0], 658, 276, [1, 4, 13, 38]],
+[4, ["number", 360.0], 716, 276, [3, null]],
+[5, "setcolor", 340, 360, [9, 6, 31]],
+[6, ["number", 40], 417, 360, [5, null]],
+[7, "setpensize", 340, 444, [31, 8, 14]],
+[8, ["number", 100], 442, 444, [7, null]],
+[9, "fillscreen2", 340, 234, [40, 10, 12, 11, 5]],
+[10, ["number", 60], 422, 234, [9, null]],
+[11, ["number", 100], 422, 318, [9, null]],
+[12, "black", 422, 276, [9, null]],
+[13, "width", 716, 318, [3, null]],
+[14, "seth", 340, 486, [7, 15, 44]],
+[15, ["number", 15], 439, 486, [14, null]],
+[16, "penup", 900, 490, [21, 20]],
+[17, "pendown", 900, 616, [20, null]],
+[18, "leftpos", 958, 532, [20, null]],
+[19, "bottompos", 958, 574, [20, null]],
+[20, ["setxy2", 0], 900, 532, [16, 18, 19, 17]],
+[21, "seth", 900, 448, [54, 49, 16]],
+[22, ["number", -10.0], 1096, 490, [49, null]],
+[23, "heading", 1072, 448, [49, null]],
+[24, "setpensize", 900, 198, [34, 27, 35]],
+[25, ["number", 7], 1099, 240, [27, null]],
+[26, "pensize", 1075, 198, [27, null]],
+[27, ["minus2", 0], 1002, 198, [24, 26, 25]],
+[28, "setshade", 900, 114, [36, 33, 34]],
+[29, ["number", 3], 1039, 156, [33, null]],
+[30, "shade", 1039, 114, [33, null]],
+[31, "setshade", 340, 402, [5, 32, 7]],
+[32, ["number", 20], 425, 402, [31, null]],
+[33, ["plus2", 0], 985, 114, [28, 30, 29]],
+[34, ["vspace", 0], 900, 156, [28, 24]],
+[35, ["vspace", 20], 900, 240, [24, 54]],
+[36, "hat", 900, 60, [null, 37, 28]],
+[37, ["string", "adjust pen"], 958, 72, [36, null]],
+[38, "stack", 658, 360, [3, 39, null]],
+[39, ["string", "adjust pen"], 716, 360, [38, null]],
+[40, "hat", 340, 180, [null, 41, 9]],
+[41, ["string", "setup"], 398, 192, [40, null]],
+[42, "stack", 100, 226, [0, 43, 52]],
+[43, ["string", "setup"], 158, 226, [42, null]],
+[44, "penup", 340, 528, [14, 45]],
+[45, ["setxy2", 0], 340, 570, [44, 46, 47, 48]],
+[46, "leftpos", 398, 570, [45, null]],
+[47, "bottompos", 398, 612, [45, null]],
+[48, "pendown", 340, 654, [45, null]],
+[49, ["minus2", 0], 999, 448, [21, 23, 22]],
+[50, "hat", 640, 180, [null, 51, 1]],
+[51, ["string", "action"], 698, 192, [50, null]],
+[52, "stack", 100, 268, [42, 53, null]],
+[53, ["string", "action"], 158, 268, [52, null]],
+[54, ["if", 0], 900, 322, [35, 55, 59, 21]],
+[55, ["less2", 0], 956, 288, [54, 57, 56, null]],
+[56, ["number", 1.0], 1036, 330, [55, null]],
+[57, "pensize", 1012, 288, [55, null]],
+[58, ["number", 11.0], 1020, 388, [59, null]],
+[59, "setpensize", 918, 388, [54, 58, null]]]
--
cgit v0.9.1