Codigo Programa 1.tb
[[0, ["start", 245], 217, 64, [null, 15]], [1, "show", 271, 336, [5, 2, 22]], [2, ["string", "Mouse del lado derecho"], 366, 336, [1, null]], [3, "show", 271, 438, [5, 4, 24]], [4, ["string", "Mouse del lado izquierdo"], 366, 438, [3, null]], [5, ["ifelse", [21, 21]], 253, 270, [11, 16, 1, 3, 20]], [6, ["equal2", 0], 0, 264, [null, 9, null, null]], [7, ["storein", 0], 253, 144, [15, 8, 13, 11]], [8, ["string", "X"], 382, 144, [7, null]], [9, "box", 56, 264, [6, null, null]], [10, ["string", "X"], 0, 330, [null, null]], [11, ["vspace", 0], 253, 228, [7, 5]], [12, "clean", 253, 582, [20, null]], [13, "mousex", 382, 186, [7, null]], [14, "box", 0, 294, [null, null, null]], [15, ["forever", 219], 235, 110, [0, 7, null]], [16, ["greater2", 0], 359, 236, [5, 17, 19, null]], [17, "box", 415, 236, [16, 18, null]], [18, ["string", "X"], 484, 236, [17, null]], [19, ["number", 0.0], 439, 278, [16, null]], [20, "wait", 253, 540, [5, 21, 12]], [21, ["number", 0.5], 344, 540, [20, null]], [22, "right", 271, 378, [1, 23, null]], [23, ["number", 10.0], 368, 378, [22, null]], [24, "left", 271, 480, [3, 25, null]], [25, ["number", 10.0], 381, 480, [24, null]], [-1, ["turtle", "Yertle"], 0.0, 0.0, 350.0, 0, 50, 5], [-1, "_saved_font_scale", 0, 0, 2.0]]