From 0d6d2e5dad79cea2af762ef65e94940aebe16cc6 Mon Sep 17 00:00:00 2001 From: Walter Bender Date: Thu, 14 Jun 2012 15:53:57 +0000 Subject: slight change to sample: use xcor instead of box --- diff --git a/samples/math-galton-path.ta b/samples/math-galton-path.ta index b3f1567..4ba6997 100644 --- a/samples/math-galton-path.ta +++ b/samples/math-galton-path.ta @@ -1,57 +1,61 @@ -[[0, ["start", 1.5], 64, 216, [null, 27]], -[1, ["setxy2", 0], 792, 245, [4, 2, 3, 11]], -[2, ["number", 0], 845, 245, [1, null]], -[3, "toppos", 845, 277, [1, null]], -[4, "penup", 792, 213, [22, 1]], -[5, "repeat", 792, 340, [11, 6, 8, 7]], -[6, ["number", 70], 836, 340, [5, null]], -[7, ["vspace", 80], 792, 399, [5, 41]], -[8, ["setxy2", 60], 846, 385, [5, 16, 14, null]], -[9, ["number", -0.5], 1022, 449, [23, null]], -[10, ["number", -10], 940, 539, [14, null]], -[11, "pendown", 792, 308, [1, 5]], -[12, "setpensize", 64, 280, [27, 13, 28]], -[13, ["number", 1], 159, 280, [12, null]], -[14, ["plus2", 0], 899, 507, [8, 15, 10]], -[15, "ycor", 940, 507, [14, null]], -[16, ["plus2", 0], 899, 385, [8, 17, 24]], -[17, "xcor", 940, 385, [16, null]], -[18, ["random", 0], 1022, 481, [23, 19, 20, null]], -[19, ["number", 0], 1098, 481, [18, null]], -[20, ["number", 1], 1098, 513, [18, null]], -[21, "stack1", 118, 509, [26, null]], -[22, "hat1", 792, 181, [null, 4]], -[23, ["plus2", 0], 981, 449, [24, 9, 18]], -[24, ["product2", 0], 940, 417, [16, 25, 23]], -[25, ["number", 20], 981, 417, [24, null]], -[26, "forever", 64, 495, [32, 21, null]], -[27, "clean", 64, 248, [0, 12]], -[28, "storeinbox1", 64, 312, [12, 29, 30]], -[29, ["number", -400], 174, 312, [28, null]], -[30, "repeat", 64, 344, [28, 31, 33, 32]], -[31, ["number", 80], 108, 344, [30, null]], -[32, ["vspace", 40], 64, 403, [30, 26]], -[33, ["storein", 0], 118, 389, [30, 35, 34, 36]], -[34, ["number", 0], 180, 421, [33, null]], -[35, "box1", 180, 389, [33, null]], -[36, "storeinbox1", 118, 452, [33, 39, null]], -[37, ["number", 10], 269, 484, [39, null]], -[38, "box1", 269, 452, [39, null]], -[39, ["plus2", 0], 228, 452, [36, 38, 37]], -[40, ["storein", 0], 485, 196, [42, 50, 45, 48]], -[41, "stack2", 792, 551, [7, null]], -[42, "hat2", 485, 164, [null, 40]], -[43, "box", 588, 228, [45, 51, null]], -[44, "ycor", 237, 0, [null, null]], -[45, ["plus2", 0], 547, 228, [40, 43, 46]], -[46, ["number", 1], 588, 260, [45, null]], -[47, "forward", 485, 323, [53, 49, 55]], -[48, ["vspace", 0], 485, 259, [40, 53]], -[49, "box", 549, 323, [47, 52, null]], -[50, "xcor", 547, 196, [40, null]], -[51, "xcor", 635, 228, [43, null]], -[52, "xcor", 596, 323, [49, null]], -[53, "setpensize", 485, 291, [48, 54, 47]], -[54, ["number", 18], 580, 291, [53, null]], -[55, "setpensize", 485, 355, [47, 56, null]], -[56, ["number", 1], 580, 355, [55, null]]] \ No newline at end of file +[[0, ["start", 1.5], 20, 20, [null, 27]], +[1, ["setxy2", 0], 480, 84, [4, 2, 3, 11]], +[2, ["number", 0], 524, 84, [1, null]], +[3, "toppos", 524, 116, [1, null]], +[4, "penup", 480, 52, [22, 1]], +[5, "repeat", 480, 179, [11, 6, 8, 7]], +[6, ["number", 70], 519, 179, [5, null]], +[7, ["vspace", 80], 480, 238, [5, 35]], +[8, ["setxy2", 80], 529, 224, [5, 16, 14, null]], +[9, ["number", -0.5], 696, 288, [23, null]], +[10, ["number", -10], 614, 408, [14, null]], +[11, "pendown", 480, 147, [1, 5]], +[12, "setpensize", 20, 84, [27, 13, 52]], +[13, ["number", 1], 102, 84, [12, null]], +[14, ["plus2", 0], 573, 376, [8, 15, 10]], +[15, "ycor", 614, 376, [14, null]], +[16, ["plus2", 0], 573, 224, [8, 17, 24]], +[17, "xcor", 614, 224, [16, null]], +[18, ["random", 0], 696, 320, [23, 19, 20, null]], +[19, ["number", 0], 763, 320, [18, null]], +[20, ["number", 1], 763, 352, [18, null]], +[21, "stack1", 66, 472, [26, null]], +[22, "hat1", 480, 20, [null, 4]], +[23, ["plus2", 0], 655, 288, [24, 9, 18]], +[24, ["product2", 0], 614, 256, [16, 25, 23]], +[25, ["number", 20], 655, 256, [24, null]], +[26, "forever", 20, 458, [53, 21, null]], +[27, "clean", 20, 52, [0, 12]], +[28, ["number", -400.0], 64, 180, [50, null]], +[29, "repeat", 20, 243, [50, 30, 32, 31]], +[30, ["number", 80], 59, 243, [29, null]], +[31, ["vspace", 40], 20, 302, [29, 59]], +[32, ["storein", 0], 69, 288, [29, 58, 33, 54]], +[33, ["number", 0], 124, 320, [32, null]], +[34, ["storein", 0], 220, 52, [36, 43, 38, 41]], +[35, "stack2", 480, 390, [7, null]], +[36, "hat2", 220, 20, [null, 34]], +[37, "box", 316, 84, [38, 44, null]], +[38, ["plus2", 0], 275, 84, [34, 37, 39]], +[39, ["number", 1], 316, 116, [38, null]], +[40, "forward", 220, 179, [46, 42, 48]], +[41, ["vspace", 0], 220, 115, [34, 46]], +[42, "box", 274, 179, [40, 45, null]], +[43, "xcor", 275, 52, [34, null]], +[44, "xcor", 357, 84, [37, null]], +[45, "xcor", 315, 179, [42, null]], +[46, "setpensize", 220, 147, [41, 47, 40]], +[47, ["number", 18], 302, 147, [46, null]], +[48, "setpensize", 220, 211, [40, 49, null]], +[49, ["number", 1], 302, 211, [48, null]], +[50, ["setxy2", 0], 20, 180, [56, 28, 51, 29]], +[51, ["number", 0], 64, 212, [50, null]], +[52, "penup", 20, 116, [12, 56]], +[53, "pendown", 20, 426, [59, 26]], +[54, "forward", 69, 351, [32, 55, null]], +[55, ["number", 10.0], 123, 351, [54, null]], +[56, "seth", 20, 148, [52, 57, 50]], +[57, ["number", 90.0], 64, 148, [56, null]], +[58, "xcor", 124, 288, [32, null]], +[59, "seth", 20, 394, [31, 60, 53]], +[60, ["number", 0], 64, 394, [59, null]]] -- cgit v0.9.1