Web   ·   Wiki   ·   Activities   ·   Blog   ·   Lists   ·   Chat   ·   Meeting   ·   Bugs   ·   Git   ·   Translate   ·   Archive   ·   People   ·   Donate
summaryrefslogtreecommitdiffstats
path: root/samples/clock.ta
blob: 0e981e60b5d4aa4f6addeddce6b8cfc08e22a747 (plain)
1
[[0, "hat", 729, 622, [null, 1, 389]], [1, ["string", "show seconds"], 787, 630, [0, null]], [2, "if", 729, 748, [90, 3, 8, 9]], [3, "equal2", 767, 714, [2, 4, 6, null]], [4, "box", 813, 714, [3, 5, null]], [5, ["string", "old second"], 868, 714, [4, null]], [6, "box", 813, 756, [3, 7, null]], [7, ["string", "seconds"], 868, 756, [6, null]], [8, "stopstack", 781, 816, [2, null]], [9, "setcolor", 729, 834, [2, 10, 11]], [10, ["number", 60], 806, 834, [9, null]], [11, "setshade", 729, 876, [9, 12, 13]], [12, ["number", 100], 814, 876, [11, null]], [13, "seth", 729, 918, [11, 14, 20]], [14, "product2", 828, 918, [13, 15, 17]], [15, "box", 882, 918, [14, 16, null]], [16, ["string", "old second"], 937, 918, [15, null]], [17, "division2", 882, 960, [14, 18, 19]], [18, ["number", 360], 936, 960, [17, null]], [19, ["number", 60], 960, 1006, [17, null]], [20, "setpensize", 729, 960, [13, 21, 22]], [21, ["number", 5], 831, 960, [20, null]], [22, "forward", 729, 1002, [20, 23, 24]], [23, ["number", 225], 800, 1002, [22, null]], [24, "back", 729, 1044, [22, 25, 391]], [25, ["number", 225], 787, 1044, [24, null]], [26, "setshade", 729, 790, [392, 27, 28]], [27, ["number", 50], 814, 790, [26, null]], [28, "setcolor", 729, 832, [26, 29, 30]], [29, ["number", 0], 806, 832, [28, null]], [30, "seth", 729, 874, [28, 31, 37]], [31, "product2", 828, 874, [30, 32, 34]], [32, "box", 882, 874, [31, 33, null]], [33, ["string", "seconds"], 937, 874, [32, null]], [34, "division2", 882, 916, [31, 35, 36]], [35, ["number", 360], 936, 916, [34, null]], [36, ["number", 60], 960, 962, [34, null]], [37, "setpensize", 729, 916, [30, 38, 39]], [38, ["number", 5], 831, 916, [37, null]], [39, "forward", 729, 958, [37, 40, 41]], [40, ["number", 225], 800, 958, [39, null]], [41, "back", 729, 1000, [39, 42, 43]], [42, ["number", 225], 787, 1000, [41, null]], [43, "storein", 729, 1042, [41, 44, 45, 394]], [44, ["string", "old second"], 797, 1042, [43, null]], [45, "box", 797, 1084, [43, 46, null]], [46, ["string", "seconds"], 852, 1084, [45, null]], [47, "hat", 173, 329, [null, 48, 370]], [48, ["string", "dial"], 231, 337, [47, null]], [49, "clean", 173, 421, [370, 50]], [50, "fillscreen", 173, 455, [49, 51, 52, 53]], [51, ["number", 60], 255, 455, [50, null]], [52, ["number", 100], 255, 497, [50, null]], [53, "setpensize", 173, 539, [50, 54, 55]], [54, ["number", 10], 275, 539, [53, null]], [55, "setxy", 173, 581, [53, 56, 57, 58]], [56, ["number", -300], 231, 581, [55, null]], [57, ["number", 0], 231, 623, [55, null]], [58, "repeat", 173, 665, [55, 59, 60, 372]], [59, ["number", 12], 224, 665, [58, null]], [60, "setcolor", 238, 725, [58, 284, 61]], [61, "arc", 238, 767, [60, 62, 63, null]], [62, ["number", 30], 296, 767, [61, null]], [63, ["number", 300], 296, 809, [61, null]], [64, "setxy", 173, 497, [373, 65, 66, 67]], [65, ["number", 0], 231, 497, [64, null]], [66, ["number", 0], 231, 539, [64, null]], [67, "repeat", 173, 581, [64, 68, 70, 375]], [68, ["number", 60], 224, 581, [67, null]], [69, ["hspace", 0], 238, 801, [88, 91]], [70, "setcolor", 238, 641, [67, 287, 71]], [71, "penup", 238, 683, [70, 72]], [72, "forward", 238, 717, [71, 73, 74]], [73, ["number", 290], 309, 717, [72, null]], [74, "pendown", 238, 759, [72, 75]], [75, "forward", 238, 793, [74, 76, 77]], [76, ["number", 10], 309, 793, [75, null]], [77, "penup", 238, 835, [75, 78]], [78, "back", 238, 869, [77, 79, 80]], [79, ["number", 300], 296, 869, [78, null]], [80, "right", 238, 911, [78, 81, null]], [81, ["number", 6], 296, 911, [80, null]], [82, "setxy", 173, 573, [376, 83, 84, 85]], [83, ["number", -20], 231, 573, [82, null]], [84, ["number", 0], 231, 615, [82, null]], [85, "storein", 173, 657, [82, 86, 87, 88]], [86, ["string", "box"], 241, 657, [85, null]], [87, ["number", 12], 241, 699, [85, null]], [88, "repeat", 173, 741, [85, 89, 69, 113]], [89, ["number", 12], 224, 741, [88, null]], [90, ["vspace", 0], 729, 714, [389, 2]], [91, "penup", 294, 819, [69, 92]], [92, "seth", 294, 853, [91, 93, 99]], [93, "product2", 393, 853, [92, 94, 96]], [94, "box", 447, 853, [93, 95, null]], [95, ["string", "box"], 502, 853, [94, null]], [96, "division2", 447, 895, [93, 97, 98]], [97, ["number", 360], 501, 895, [96, null]], [98, ["number", 12], 525, 941, [96, null]], [99, "forward", 294, 895, [92, 100, 101]], [100, ["number", 250], 365, 895, [99, null]], [101, "show", 294, 937, [99, 102, 104]], [102, "box", 352, 937, [101, 103, null]], [103, ["string", "box"], 407, 937, [102, null]], [104, "back", 294, 979, [101, 105, 106]], [105, ["number", 250], 352, 979, [104, null]], [106, "storein", 294, 1021, [104, 107, 108, 112]], [107, ["string", "box"], 362, 1021, [106, null]], [108, "minus2", 362, 1063, [106, 109, 111]], [109, "box", 416, 1063, [108, 110, null]], [110, ["string", "box"], 471, 1063, [109, null]], [111, ["number", 1], 440, 1109, [108, null]], [112, "pendown", 294, 1105, [106, null]], [113, "setxy", 173, 819, [88, 114, 115, 378]], [114, ["number", 0], 231, 819, [113, null]], [115, ["number", 0], 231, 861, [113, null]], [116, "hat", 728, 402, [null, 117, 383]], [117, ["string", "show minutes"], 786, 410, [116, null]], [118, "setcolor", 728, 494, [383, 119, 120]], [119, ["number", 60], 805, 494, [118, null]], [120, "setshade", 728, 536, [118, 121, 122]], [121, ["number", 100], 813, 536, [120, null]], [122, "seth", 728, 578, [120, 123, 129]], [123, "product2", 827, 578, [122, 124, 126]], [124, "box", 881, 578, [123, 125, null]], [125, ["string", "old minute"], 936, 578, [124, null]], [126, "division2", 881, 620, [123, 127, 128]], [127, ["number", 360], 935, 620, [126, null]], [128, ["number", 60], 959, 666, [126, null]], [129, "setpensize", 728, 620, [122, 130, 131]], [130, ["number", 5], 830, 620, [129, null]], [131, "forward", 728, 662, [129, 132, 133]], [132, ["number", 200], 799, 662, [131, null]], [133, "setpensize", 728, 704, [131, 134, 135]], [134, ["number", 25], 830, 704, [133, null]], [135, "forward", 728, 746, [133, 136, 137]], [136, ["number", 1], 799, 746, [135, null]], [137, "back", 728, 788, [135, 138, 139]], [138, ["number", 1], 786, 788, [137, null]], [139, "setpensize", 728, 830, [137, 140, 141]], [140, ["number", 7], 830, 830, [139, null]], [141, "back", 728, 872, [139, 142, 385]], [142, ["number", 200], 786, 872, [141, null]], [143, "setshade", 728, 570, [386, 144, 145]], [144, ["number", 30], 813, 570, [143, null]], [145, "setcolor", 728, 612, [143, 146, 147]], [146, ["number", 30], 805, 612, [145, null]], [147, "seth", 728, 654, [145, 148, 154]], [148, "product2", 827, 654, [147, 149, 151]], [149, "box", 881, 654, [148, 150, null]], [150, ["string", "minutes"], 936, 654, [149, null]], [151, "division2", 881, 696, [148, 152, 153]], [152, ["number", 360], 935, 696, [151, null]], [153, ["number", 60], 959, 742, [151, null]], [154, "setpensize", 728, 696, [147, 155, 156]], [155, ["number", 5], 830, 696, [154, null]], [156, "forward", 728, 738, [154, 157, 158]], [157, ["number", 200], 799, 738, [156, null]], [158, "setpensize", 728, 780, [156, 159, 160]], [159, ["number", 25], 830, 780, [158, null]], [160, "forward", 728, 822, [158, 161, 162]], [161, ["number", 1], 799, 822, [160, null]], [162, "setpensize", 728, 864, [160, 163, 164]], [163, ["number", 5], 830, 864, [162, null]], [164, "back", 728, 906, [162, 165, 166]], [165, ["number", 201], 786, 906, [164, null]], [166, "storein", 728, 948, [164, 167, 168, 388]], [167, ["string", "old minute"], 796, 948, [166, null]], [168, "box", 796, 990, [166, 169, null]], [169, ["string", "minutes"], 851, 990, [168, null]], [170, "hat", 173, 175, [null, 171, 354]], [171, ["string", "alarm"], 231, 183, [170, null]], [172, "seth", 173, 267, [354, 173, 174]], [173, ["number", 0], 272, 267, [172, null]], [174, "setxy", 173, 309, [172, 175, 176, 177]], [175, ["number", -360], 231, 309, [174, null]], [176, ["number", 0], 231, 351, [174, null]], [177, "setcolor", 173, 393, [174, 178, 181]], [178, "random", 250, 393, [177, 179, 180, null]], [179, ["number", 0], 336, 393, [178, null]], [180, ["number", 100], 336, 435, [178, null]], [181, "setpensize", 173, 435, [177, 182, 183]], [182, ["number", 60], 275, 435, [181, null]], [183, "repeat", 173, 477, [181, 184, 185, 194]], [184, ["number", 60], 224, 477, [183, null]], [185, "setshade", 238, 537, [183, 186, 189]], [186, "division2", 323, 537, [185, 187, 188]], [187, "heading", 377, 537, [186, null]], [188, ["number", 6], 401, 583, [186, null]], [189, "arc", 238, 579, [185, 190, 191, 192]], [190, ["number", 6], 296, 579, [189, null]], [191, ["number", 360], 296, 621, [189, null]], [192, "wait", 238, 663, [189, 193, null]], [193, ["number", 1], 296, 663, [192, null]], [194, "setcolor", 173, 555, [183, 195, 196]], [195, ["number", 60], 250, 555, [194, null]], [196, "setshade", 173, 597, [194, 197, 198]], [197, ["number", 100], 258, 597, [196, null]], [198, "repeat", 173, 639, [196, 199, 200, 203]], [199, ["number", 60], 224, 639, [198, null]], [200, "arc", 238, 699, [198, 201, 202, null]], [201, ["number", 6], 296, 699, [200, null]], [202, ["number", 360], 296, 741, [200, null]], [203, "setxy", 173, 717, [198, 204, 205, 356]], [204, ["number", 0], 231, 717, [203, null]], [205, ["number", 0], 231, 759, [203, null]], [206, "hat", 730, 175, [null, 207, 351]], [207, ["string", "show hours"], 788, 183, [206, null]], [208, "setcolor", 730, 267, [351, 209, 210]], [209, ["number", 60], 807, 267, [208, null]], [210, "setshade", 730, 309, [208, 211, 212]], [211, ["number", 100], 815, 309, [210, null]], [212, "seth", 730, 351, [210, 213, 230]], [213, "plus2", 829, 351, [212, 214, 221]], [214, ["identity2", 0], 883, 351, [213, 215]], [215, "product2", 937, 351, [214, 216, 218]], [216, "box", 991, 351, [215, 217, null]], [217, ["string", "old hour"], 1046, 351, [216, null]], [218, "division2", 991, 393, [215, 219, 220]], [219, ["number", 360], 1045, 393, [218, null]], [220, ["number", 12], 1069, 439, [218, null]], [221, ["identity2", 0], 883, 393, [213, 222]], [222, "division2", 937, 393, [221, 223, 228]], [223, "product2", 991, 393, [222, 224, 225]], [224, "box", 1045, 393, [223, 283, null]], [225, "division2", 1045, 435, [223, 226, 227]], [226, ["number", 360], 1099, 435, [225, null]], [227, ["number", 60], 1123, 481, [225, null]], [228, ["identity2", 0], 1015, 439, [222, 229]], [229, ["number", 12], 1069, 439, [228, null]], [230, "setpensize", 730, 393, [212, 231, 232]], [231, ["number", 5], 832, 393, [230, null]], [232, "forward", 730, 435, [230, 233, 234]], [233, ["number", 100], 801, 435, [232, null]], [234, "setpensize", 730, 477, [232, 235, 236]], [235, ["number", 25], 832, 477, [234, null]], [236, "forward", 730, 519, [234, 237, 238]], [237, ["number", 1], 801, 519, [236, null]], [238, "back", 730, 561, [236, 239, 240]], [239, ["number", 1], 788, 561, [238, null]], [240, "setpensize", 730, 603, [238, 241, 242]], [241, ["number", 7], 832, 603, [240, null]], [242, "back", 730, 645, [240, 243, 379]], [243, ["number", 100], 788, 645, [242, null]], [244, "setshade", 730, 343, [380, 245, 246]], [245, ["number", 50], 815, 343, [244, null]], [246, "setcolor", 730, 385, [244, 247, 248]], [247, ["number", 70], 807, 385, [246, null]], [248, "seth", 730, 427, [246, 249, 267]], [249, "plus2", 829, 427, [248, 250, 257]], [250, ["identity2", 0], 883, 427, [249, 251]], [251, "product2", 937, 427, [250, 252, 254]], [252, "box", 991, 427, [251, 253, null]], [253, ["string", "hours"], 1046, 427, [252, null]], [254, "division2", 991, 469, [251, 255, 256]], [255, ["number", 360], 1045, 469, [254, null]], [256, ["number", 12], 1069, 515, [254, null]], [257, ["identity2", 0], 883, 469, [249, 258]], [258, "division2", 937, 469, [257, 259, 265]], [259, "product2", 991, 469, [258, 260, 262]], [260, "box", 1045, 469, [259, 261, null]], [261, ["string", "minutes"], 1100, 469, [260, null]], [262, "division2", 1045, 511, [259, 263, 264]], [263, ["number", 360], 1099, 511, [262, null]], [264, ["number", 60], 1123, 557, [262, null]], [265, ["identity2", 0], 1015, 515, [258, 266]], [266, ["number", 12], 1069, 515, [265, null]], [267, "setpensize", 730, 469, [248, 268, 269]], [268, ["number", 5], 832, 469, [267, null]], [269, "forward", 730, 511, [267, 270, 271]], [270, ["number", 100], 801, 511, [269, null]], [271, "setpensize", 730, 553, [269, 272, 273]], [272, ["number", 25], 832, 553, [271, null]], [273, "forward", 730, 595, [271, 274, 275]], [274, ["number", 1], 801, 595, [273, null]], [275, "setpensize", 730, 637, [273, 276, 277]], [276, ["number", 5], 832, 637, [275, null]], [277, "back", 730, 679, [275, 278, 279]], [278, ["number", 101], 788, 679, [277, null]], [279, "storein", 730, 721, [277, 280, 281, 382]], [280, ["string", "old hour"], 798, 721, [279, null]], [281, "box", 798, 763, [279, 282, null]], [282, ["string", "hours"], 853, 763, [281, null]], [283, ["string", "old minute"], 1100, 393, [224, null]], [284, "division2", 315, 725, [60, 285, 286]], [285, "heading", 369, 725, [284, null]], [286, ["number", 3], 393, 771, [284, null]], [287, "division2", 315, 641, [70, 289, 288]], [288, ["number", 3], 393, 687, [287, null]], [289, "heading", 369, 641, [287, null]], [290, "storein", 422, 259, [361, 291, 292, 293]], [291, ["string", "alarm hour"], 490, 259, [290, null]], [292, ["number", 10], 490, 301, [290, null]], [293, "storein", 422, 343, [290, 294, 295, 363]], [294, ["string", "alarm minute"], 490, 343, [293, null]], [295, ["number", 30], 490, 385, [293, null]], [296, "stack", 422, 411, [367, 297, 298]], [297, ["string", "dial"], 480, 411, [296, null]], [298, "storein", 422, 453, [296, 299, 300, 301]], [299, ["string", "old hour"], 490, 453, [298, null]], [300, ["number", 12], 490, 495, [298, null]], [301, "storein", 422, 537, [298, 302, 303, 304]], [302, ["string", "old minute"], 490, 537, [301, null]], [303, ["number", 0], 490, 579, [301, null]], [304, "storein", 422, 621, [301, 305, 306, 369]], [305, ["string", "old second"], 490, 621, [304, null]], [306, ["number", 0], 490, 663, [304, null]], [307, "storein", 422, 335, [364, 308, 309, 366]], [308, ["string", "timezone"], 490, 335, [307, null]], [309, ["number", "0"], 490, 377, [307, null]], [310, "forever", 422, 445, [369, 357, null]], [311, "storein", 483, 505, [357, 312, 313, 398]], [312, ["string", "hours"], 551, 505, [311, null]], [313, "plus2", 551, 547, [311, 315, 349]], [314, ["string", "localtime().tm_hour"], 685, 589, [349, null]], [315, "box", 605, 547, [313, 316, null]], [316, ["string", "timezone"], 660, 547, [315, null]], [317, "storein", 483, 623, [398, 318, 347, 397]], [318, ["string", "minutes"], 551, 623, [317, null]], [319, ["string", "localtime().tm_min"], 631, 665, [347, null]], [320, "storein", 483, 741, [397, 321, 345, 360]], [321, ["string", "seconds"], 551, 741, [320, null]], [322, ["string", "localtime().tm_sec"], 631, 783, [345, null]], [323, "if", 483, 695, [359, 342, 332, 353]], [324, "box", 613, 653, [344, 325, null]], [325, ["string", "alarm hour"], 668, 653, [324, null]], [326, "box", 613, 695, [344, 327, null]], [327, ["string", "hours"], 668, 695, [326, null]], [328, "box", 613, 571, [343, 329, null]], [329, ["string", "alarm minute"], 668, 571, [328, null]], [330, "box", 613, 613, [343, 331, null]], [331, ["string", "minutes"], 668, 613, [330, null]], [332, "stack", 535, 763, [323, 333, null]], [333, ["string", "alarm"], 593, 763, [332, null]], [334, "wait", 483, 985, [338, 335, 399]], [335, ["number", 1], 541, 985, [334, null]], [336, "stack", 483, 859, [360, 337, 340]], [337, ["string", "show seconds"], 541, 859, [336, null]], [338, "stack", 483, 943, [340, 339, 334]], [339, ["string", "show hours"], 541, 943, [338, null]], [340, "stack", 483, 901, [336, 341, 338]], [341, ["string", "show minutes"], 541, 901, [340, null]], [342, "and2", 521, 613, [323, 343, 344]], [343, "equal2", 567, 571, [342, 328, 330, null]], [344, "equal2", 567, 653, [342, 324, 326, null]], [345, "myfunc", 551, 783, [320, 322, 346, null]], [346, ["number", 100], 631, 825, [345, null]], [347, "myfunc", 551, 665, [317, 319, 348, null]], [348, ["number", 100], 631, 707, [347, null]], [349, "myfunc", 605, 589, [313, 314, 350, null]], [350, ["number", 100], 685, 631, [349, null]], [351, "sandwichtop", 712, 225, [206, 352, 208]], [352, ["string", "erase old hour hand"], 815, 225, [351, null]], [353, ["sandwichcollapsed", 1], 483, 581, [323, null]], [354, "sandwichtop", 155, 225, [170, 355, 172]], [355, ["string", "alarm art"], 258, 225, [354, null]], [356, ["sandwichcollapsed", 1], 173, 267, [203, null]], [357, "sandwichtop", 465, 463, [310, 358, 311]], [358, ["string", "run the clock"], 568, 463, [357, null]], [359, ["vspace", 40], 483, 581, [395, 323]], [360, ["vspace", 0], 483, 825, [320, 336]], [361, "sandwichtop", 404, 217, [400, 362, 290]], [362, ["string", "set the alarm"], 507, 217, [361, null]], [363, ["sandwichcollapsed", 1], 422, 259, [293, 364]], [364, "sandwichtop", 404, 293, [363, 365, 307]], [365, ["string", "set the timezone"], 507, 293, [364, null]], [366, ["sandwichcollapsed", 1], 422, 335, [307, 367]], [367, "sandwichtop", 404, 369, [366, 368, 296]], [368, ["string", "draw the dial"], 507, 369, [367, null]], [369, ["sandwichcollapsed", 1], 422, 411, [304, 310]], [370, "sandwichtop", 155, 379, [47, 371, 49]], [371, ["string", "circle"], 258, 379, [370, null]], [372, ["sandwichcollapsed", 1], 173, 421, [58, 373]], [373, "sandwichtop", 155, 455, [372, 374, 64]], [374, ["string", "minutes"], 258, 455, [373, null]], [375, ["sandwichcollapsed", 1], 173, 497, [67, 376]], [376, "sandwichtop", 155, 531, [375, 377, 82]], [377, ["string", "numbers"], 258, 531, [376, null]], [378, ["sandwichcollapsed", 1], 173, 573, [113, null]], [379, ["sandwichcollapsed", 1], 730, 267, [242, 380]], [380, "sandwichtop", 712, 301, [379, 381, 244]], [381, ["string", "draw new hour hand"], 815, 301, [380, null]], [382, ["sandwichcollapsed", 1], 730, 343, [279, null]], [383, "sandwichtop", 710, 452, [116, 384, 118]], [384, ["string", "erase old minutes hand"], 813, 452, [383, null]], [385, ["sandwichcollapsed", 1], 728, 494, [141, 386]], [386, "sandwichtop", 710, 528, [385, 387, 143]], [387, ["string", "draw new minutes hand"], 813, 528, [386, null]], [388, ["sandwichcollapsed", 1], 728, 570, [166, null]], [389, "sandwichtop", 711, 672, [0, 390, 90]], [390, ["string", "erase old seconds hand"], 814, 672, [389, null]], [391, ["sandwichcollapsed", 1], 729, 714, [24, 392]], [392, "sandwichtop", 711, 748, [391, 393, 26]], [393, ["string", "draw new seconds hand"], 814, 748, [392, null]], [394, ["sandwichcollapsed", 1], 729, 790, [43, null]], [395, "sandwichtop", 465, 539, [399, 396, 359]], [396, ["string", "check alarm"], 568, 539, [395, null]], [397, ["vspace", 0], 483, 707, [317, 320]], [398, ["vspace", 0], 483, 589, [311, 317]], [399, ["sandwichcollapsed", 1], 483, 505, [334, 395]], [400, "start", 422, 175, [null, 361]], [-1, ["turtle", 1], 0, 0, 290.5, 70.0, 50.0, 5.0]]