Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- {
- "objName": "Stage",
- "variables": [{
- "name": "#DragIdx",
- "value": "0",
- "isPersistent": false
- },
- {
- "name": "#BlockPool",
- "value": 1729,
- "isPersistent": false
- },
- {
- "name": "SCMA#",
- "value": 170,
- "isPersistent": false
- },
- {
- "name": "#Section",
- "value": 9,
- "isPersistent": false
- },
- {
- "name": "dirty",
- "value": "0",
- "isPersistent": false
- },
- {
- "name": "#RunTime",
- "value": 139,
- "isPersistent": false
- },
- {
- "name": "#clip_y",
- "value": "-182",
- "isPersistent": false
- },
- {
- "name": "#clip_y2",
- "value": "182",
- "isPersistent": false
- }],
- "lists": [{
- "listName": "Script",
- "contents": ["(",
- -235,
- "120",
- 51,
- 19,
- "",
- 13,
- "0",
- "0",
- "0",
- "9",
- "6",
- "n",
- -231,
- 118,
- 14,
- 15,
- "",
- "0",
- "0",
- "0",
- 25,
- "",
- "",
- "",
- -214,
- 116,
- 8,
- "11",
- "+",
- "0",
- "0",
- "0",
- 37,
- "",
- "",
- "n",
- -203,
- 118,
- 14,
- 15,
- "",
- "0",
- "0",
- "0",
- "0",
- "",
- "",
- "(",
- -235,
- 98,
- 51,
- 19,
- "",
- 61,
- "0",
- "0",
- "0",
- "9",
- "1",
- "n",
- -231,
- 96,
- 14,
- 15,
- "",
- "0",
- "0",
- "0",
- 73,
- "",
- "",
- "",
- -214,
- 94,
- 8,
- "11",
- "-",
- "0",
- "0",
- "0",
- 85,
- "",
- "",
- "n",
- -203,
- 96,
- 14,
- 15,
- "",
- "0",
- "0",
- "0",
- "0",
- "",
- "",
- "(",
- -235,
- 76,
- 51,
- 19,
- "",
- 109,
- "0",
- "0",
- "0",
- "9",
- "2",
- "n",
- -231,
- 74,
- 14,
- 15,
- "",
- "0",
- "0",
- "0",
- 121,
- "",
- "",
- "",
- -214,
- 72,
- 8,
- "11",
- "*",
- "0",
- "0",
- "0",
- 133,
- "",
- "",
- "n",
- -203,
- 74,
- 14,
- 15,
- "",
- "0",
- "0",
- "0",
- "0",
- "",
- "",
- "(",
- -235,
- 54,
- 51,
- 19,
- "",
- 157,
- "0",
- "0",
- "0",
- "9",
- "3",
- "n",
- -231,
- 52,
- 14,
- 15,
- "",
- "0",
- "0",
- "0",
- 193,
- "",
- "",
- "hat",
- -56,
- 130,
- 132,
- 22,
- "",
- 181,
- "0",
- "0",
- 337,
- "6",
- "155",
- "",
- -52,
- 121,
- 123,
- "11",
- "when green flag clicked",
- "0",
- "0",
- "0",
- "0",
- "",
- "",
- "",
- -214,
- 50,
- 8,
- "11",
- "\/",
- "0",
- "0",
- "0",
- 205,
- "",
- "",
- "n",
- -203,
- 52,
- 14,
- 15,
- "",
- "0",
- "0",
- "0",
- "0",
- "",
- "",
- "---",
- -400,
- 32,
- 32,
- "4",
- "",
- 229,
- "0",
- "0",
- "0",
- "",
- "",
- "?",
- -396,
- 30,
- 23,
- 15,
- " ",
- "0",
- "0",
- "0",
- "0",
- "",
- "",
- "(",
- -235,
- 25,
- 119,
- 19,
- "",
- 253,
- "0",
- "0",
- "0",
- "9",
- "98",
- "",
- -231,
- 21,
- 60,
- "11",
- "pick random",
- "0",
- "0",
- "0",
- 265,
- "",
- "",
- "n",
- -168,
- 23,
- 14,
- 15,
- "",
- "0",
- "0",
- "0",
- 277,
- "",
- "",
- "",
- -151,
- 21,
- 13,
- "11",
- "to",
- "0",
- "0",
- "0",
- 289,
- "",
- "",
- "n",
- -135,
- 23,
- 14,
- 15,
- "",
- "0",
- "0",
- "0",
- "0",
- "",
- "",
- "---",
- -400,
- 3,
- 32,
- "4",
- "",
- 313,
- "0",
- "0",
- "0",
- "",
- "",
- "?",
- -396,
- 1,
- 23,
- 15,
- " ",
- "0",
- "0",
- "0",
- "0",
- "",
- "",
- "<",
- -235,
- -4,
- 45,
- 17,
- "",
- 361,
- "0",
- "0",
- "0",
- "9",
- "7",
- "b",
- -56,
- 108,
- 31,
- 15,
- "",
- 349,
- "0",
- "0",
- 397,
- "2",
- "69",
- "",
- -52,
- 106,
- 22,
- "11",
- "hide",
- "0",
- "0",
- "0",
- "0",
- "",
- "",
- "t",
- -231,
- -5,
- 12,
- 15,
- "",
- "0",
- "0",
- "0",
- 373,
- "",
- "",
- "",
- -216,
- -7,
- 7,
- "11",
- "<",
- "0",
- "0",
- "0",
- 385,
- "",
- "",
- "t",
- -206,
- -5,
- 12,
- 15,
- "",
- "0",
- "0",
- "0",
- "0",
- "",
- "",
- "b",
- -56,
- 93,
- 114,
- 19,
- "",
- 409,
- "0",
- "0",
- 1057,
- "8",
- "41",
- "",
- -52,
- 89,
- 19,
- "11",
- "ask",
- "0",
- "0",
- "0",
- 421,
- "",
- "",
- "t",
- -30,
- 91,
- 37,
- 15,
- "Print:",
- "0",
- "0",
- "0",
- 433,
- "",
- "",
- "",
- 10,
- 89,
- 43,
- "11",
- "and wait",
- "0",
- "0",
- "0",
- "0",
- "",
- "",
- "<",
- -235,
- -24,
- 46,
- 17,
- "",
- 457,
- "0",
- "0",
- "0",
- "9",
- "8",
- "t",
- -231,
- -25,
- 12,
- 15,
- "",
- "0",
- "0",
- "0",
- 1717,
- "",
- "",
- "(",
- 25,
- 71,
- 45,
- 13,
- "",
- 481,
- "0",
- "0",
- "0",
- "8",
- "12",
- "",
- 29,
- 70,
- 37,
- "11",
- "answer",
- "0",
- "0",
- "0",
- "0",
- "",
- "",
- "",
- -52,
- 51,
- 19,
- "11",
- "ask",
- "0",
- "0",
- "0",
- 505,
- "",
- "",
- "t",
- -30,
- 53,
- 19,
- 15,
- "X:",
- "0",
- "0",
- "0",
- 517,
- "",
- "",
- "",
- -8,
- 51,
- 43,
- "11",
- "and wait",
- "0",
- "0",
- "0",
- "0",
- "",
- "",
- "(",
- 9,
- 33,
- 45,
- 13,
- "",
- 541,
- "0",
- "0",
- "0",
- "8",
- "12",
- "",
- 13,
- 32,
- 37,
- "11",
- "answer",
- "0",
- "0",
- "0",
- "0",
- "",
- "",
- "",
- -52,
- 13,
- 19,
- "11",
- "ask",
- "0",
- "0",
- "0",
- 565,
- "",
- "",
- "t",
- -30,
- 15,
- 19,
- 15,
- "Y:",
- "0",
- "0",
- "0",
- 577,
- "",
- "",
- "",
- -8,
- 13,
- 43,
- "11",
- "and wait",
- "0",
- "0",
- "0",
- "0",
- "",
- "",
- "(",
- 47,
- -81,
- 85,
- 15,
- "",
- 601,
- "0",
- "0",
- "0",
- "4",
- "169",
- "",
- 51,
- -83,
- 42,
- "11",
- "width of",
- "0",
- "0",
- "0",
- 973,
- "",
- "",
- "?",
- -182,
- -72,
- 23,
- 15,
- " ",
- "0",
- "0",
- "0",
- "0",
- "",
- "",
- "",
- -52,
- -102,
- 26,
- "11",
- "write",
- "0",
- "0",
- "0",
- 1021,
- "",
- "",
- "",
- -205,
- -94,
- 13,
- "11",
- "or",
- "0",
- "0",
- "0",
- 1045,
- "",
- "",
- "(",
- 9,
- -5,
- 45,
- 13,
- "",
- 661,
- "0",
- "0",
- "0",
- "8",
- "12",
- "",
- 13,
- -6,
- 37,
- "11",
- "answer",
- "0",
- "0",
- "0",
- "0",
- "",
- "",
- "",
- -52,
- -25,
- 19,
- "11",
- "ask",
- "0",
- "0",
- "0",
- 685,
- "",
- "",
- "t",
- -30,
- -23,
- 62,
- 15,
- "Hex Color:",
- "0",
- "0",
- "0",
- 697,
- "",
- "",
- "",
- 35,
- -25,
- 43,
- "11",
- "and wait",
- "0",
- "0",
- "0",
- "0",
- "",
- "",
- "(",
- 87,
- -44,
- 45,
- 13,
- "",
- 721,
- "0",
- "0",
- "0",
- "8",
- "12",
- "",
- 91,
- -45,
- 37,
- "11",
- "answer",
- "0",
- "0",
- "0",
- "0",
- "",
- "",
- "b",
- -56,
- -61,
- 109,
- 17,
- "",
- 745,
- "0",
- "0",
- 793,
- "1",
- "66",
- "",
- -52,
- -64,
- 45,
- "11",
- "go to x:",
- "0",
- "0",
- "0",
- 889,
- "",
- "",
- "(",
- 32,
- -63,
- 16,
- 13,
- "",
- 913,
- "0",
- "0",
- "0",
- "5",
- "99",
- "",
- 15,
- -64,
- 14,
- "11",
- "y:",
- "0",
- "0",
- "0",
- 757,
- "",
- "",
- "---",
- -400,
- -64,
- 32,
- "4",
- "",
- 925,
- "0",
- "0",
- "0",
- "",
- "",
- "b",
- -56,
- -78,
- 197,
- 21,
- "",
- 805,
- "0",
- "0",
- 1105,
- "1",
- "25",
- "",
- -52,
- -83,
- 64,
- "11",
- "change x by",
- "0",
- "0",
- "0",
- 1069,
- "",
- "",
- "",
- -52,
- 70,
- 19,
- "11",
- "set",
- "0",
- "0",
- "0",
- 1117,
- "",
- "",
- "t",
- -205,
- -25,
- 12,
- 15,
- "",
- "0",
- "0",
- "0",
- "0",
- "",
- "",
- "<",
- -235,
- -44,
- 45,
- 17,
- "",
- 853,
- "0",
- "0",
- "0",
- "9",
- "9",
- "t",
- -231,
- -45,
- 12,
- 15,
- "",
- "0",
- "0",
- "0",
- 865,
- "",
- "",
- "",
- -216,
- -47,
- 7,
- "11",
- ">",
- "0",
- "0",
- "0",
- 877,
- "",
- "",
- "t",
- -206,
- -45,
- 12,
- 15,
- "",
- "0",
- "0",
- "0",
- "0",
- "",
- "",
- "(",
- -4,
- -63,
- 16,
- 13,
- "",
- 901,
- "0",
- "0",
- 769,
- "5",
- "99",
- "",
- 0,
- -64,
- 8,
- "11",
- "x",
- "0",
- "0",
- "0",
- "0",
- "",
- "",
- "",
- 36,
- -64,
- 8,
- "11",
- "y",
- "0",
- "0",
- "0",
- "0",
- "",
- "",
- "?",
- -396,
- -66,
- 23,
- 15,
- " ",
- "0",
- "0",
- "0",
- "0",
- "",
- "",
- "<",
- -235,
- -71,
- 80,
- 17,
- "",
- 949,
- "0",
- "0",
- "0",
- "9",
- "4",
- "?",
- -231,
- -72,
- 23,
- 15,
- " ",
- "0",
- "0",
- "0",
- 961,
- "",
- "",
- "",
- -205,
- -74,
- 20,
- "11",
- "and",
- "0",
- "0",
- "0",
- 613,
- "",
- "",
- "(",
- 96,
- -82,
- 32,
- 13,
- "",
- 985,
- "0",
- "0",
- "0",
- "5",
- "99",
- "",
- 100,
- -83,
- 24,
- "11",
- "text",
- "0",
- "0",
- "0",
- "0",
- "",
- "",
- "<",
- -235,
- -91,
- 73,
- 17,
- "",
- 1009,
- "0",
- "0",
- "0",
- "9",
- "10",
- "?",
- -231,
- -92,
- 23,
- 15,
- " ",
- "0",
- "0",
- "0",
- 637,
- "",
- "",
- "(",
- -23,
- -101,
- 32,
- 13,
- "",
- 1033,
- "0",
- "0",
- "0",
- "5",
- "99",
- "",
- -19,
- -102,
- 24,
- "11",
- "text",
- "0",
- "0",
- "0",
- "0",
- "",
- "",
- "?",
- -189,
- -92,
- 23,
- 15,
- " ",
- "0",
- "0",
- "0",
- "0",
- "",
- "",
- "b",
- -56,
- 74,
- 131,
- 19,
- "",
- 817,
- "0",
- "0",
- 1141,
- "5",
- "120",
- "(",
- 15,
- -80,
- 121,
- 17,
- "",
- 1081,
- "0",
- "0",
- "0",
- "9",
- "1",
- "n",
- 19,
- -81,
- 14,
- 15,
- "0",
- "0",
- "0",
- "0",
- 1093,
- "",
- "",
- "",
- 36,
- -83,
- 8,
- "11",
- "-",
- "0",
- "0",
- "0",
- 589,
- "",
- "",
- "b",
- -56,
- -99,
- 70,
- 17,
- "",
- 625,
- "0",
- "0",
- "0",
- "4",
- "168",
- "t",
- -30,
- 72,
- 36,
- 15,
- "text",
- "0",
- "0",
- "0",
- 1129,
- "va",
- "",
- "",
- 9,
- 70,
- 13,
- "11",
- "to",
- "0",
- "0",
- "0",
- 469,
- "",
- "",
- "b",
- -56,
- 55,
- 96,
- 19,
- "",
- 493,
- "0",
- "0",
- 1285,
- "8",
- "41",
- "<",
- -235,
- -111,
- 53,
- 17,
- "",
- 1201,
- "0",
- "0",
- "0",
- "9",
- "88",
- "b",
- -56,
- -40,
- 197,
- 21,
- "",
- 1177,
- "0",
- "0",
- 733,
- "4",
- "91",
- "",
- -52,
- -45,
- 87,
- "11",
- "set pen color to",
- "0",
- "0",
- "0",
- 1681,
- "",
- "",
- "n",
- -176,
- -264,
- 14,
- 15,
- "9",
- "0",
- "0",
- "0",
- "0",
- "",
- "",
- "",
- -231,
- -114,
- 19,
- "11",
- "not",
- "0",
- "0",
- "0",
- 1213,
- "",
- "",
- "?",
- -209,
- -112,
- 23,
- 15,
- " ",
- "0",
- "0",
- "0",
- "0",
- "",
- "",
- "---",
- -400,
- -131,
- 32,
- "4",
- "",
- 1237,
- "0",
- "0",
- "0",
- "",
- "",
- "?",
- -396,
- -133,
- 23,
- 15,
- " ",
- "0",
- "0",
- "0",
- "0",
- "",
- "",
- "(",
- -235,
- -138,
- 102,
- 19,
- "",
- 1261,
- "0",
- "0",
- "0",
- "9",
- "32",
- "",
- -231,
- -142,
- 20,
- "11",
- "join",
- "0",
- "0",
- "0",
- 1273,
- "",
- "",
- "t",
- -208,
- -140,
- 33,
- 15,
- "hello",
- "0",
- "0",
- "0",
- 1345,
- "",
- "",
- "b",
- -56,
- 36,
- 115,
- 19,
- "",
- 1297,
- "0",
- "0",
- 1333,
- "5",
- "120",
- "",
- -52,
- 32,
- 19,
- "11",
- "set",
- "0",
- "0",
- "0",
- 1309,
- "",
- "",
- "t",
- -30,
- 34,
- 20,
- 15,
- "x",
- "0",
- "0",
- "0",
- 1321,
- "va",
- "",
- "",
- -7,
- 32,
- 13,
- "11",
- "to",
- "0",
- "0",
- "0",
- 529,
- "",
- "",
- "b",
- -56,
- 17,
- 96,
- 19,
- "",
- 553,
- "0",
- "0",
- 1405,
- "8",
- "41",
- "t",
- -172,
- -140,
- 34,
- 15,
- "world",
- "0",
- "0",
- "0",
- "0",
- "",
- "",
- "(",
- -235,
- -160,
- 112,
- 19,
- "",
- 1369,
- "0",
- "0",
- "0",
- "9",
- "78",
- "",
- -231,
- -164,
- 33,
- "11",
- "letter",
- "0",
- "0",
- "0",
- 1381,
- "",
- "",
- "n",
- -195,
- -162,
- 14,
- 15,
- "1",
- "0",
- "0",
- "0",
- 1393,
- "",
- "",
- "",
- -178,
- -164,
- 13,
- "11",
- "of",
- "0",
- "0",
- "0",
- 1465,
- "",
- "",
- "b",
- -56,
- -2,
- 115,
- 19,
- "",
- 1417,
- "0",
- "0",
- 1453,
- "5",
- "120",
- "",
- -52,
- -6,
- 19,
- "11",
- "set",
- "0",
- "0",
- "0",
- 1429,
- "",
- "",
- "t",
- -30,
- -4,
- 20,
- 15,
- "y",
- "0",
- "0",
- "0",
- 1441,
- "va",
- "",
- "",
- -7,
- -6,
- 13,
- "11",
- "to",
- "0",
- "0",
- "0",
- 649,
- "",
- "",
- "b",
- -56,
- -21,
- 139,
- 19,
- "",
- 673,
- "0",
- "0",
- 1165,
- "8",
- "41",
- "t",
- -162,
- -162,
- 34,
- 15,
- "world",
- "0",
- "0",
- "0",
- "0",
- "",
- "",
- "(",
- -235,
- -182,
- 96,
- 19,
- "",
- 1489,
- "0",
- "0",
- "0",
- "9",
- "136",
- "",
- -231,
- -186,
- 50,
- "11",
- "length of",
- "0",
- "0",
- "0",
- 1501,
- "",
- "",
- "t",
- -178,
- -184,
- 34,
- 15,
- "world",
- "0",
- "0",
- "0",
- "0",
- "",
- "",
- "---",
- -400,
- -204,
- 32,
- "4",
- "",
- 1525,
- "0",
- "0",
- "0",
- "",
- "",
- "?",
- -396,
- -206,
- 23,
- 15,
- " ",
- "0",
- "0",
- "0",
- "0",
- "",
- "",
- "(",
- -235,
- -211,
- 63,
- 19,
- "",
- 1549,
- "0",
- "0",
- "0",
- "9",
- "5",
- "n",
- -231,
- -213,
- 14,
- 15,
- "",
- "0",
- "0",
- "0",
- 1561,
- "",
- "",
- "",
- -214,
- -215,
- 20,
- "11",
- "mod",
- "0",
- "0",
- "0",
- 1573,
- "",
- "",
- "n",
- -191,
- -213,
- 14,
- 15,
- "",
- "0",
- "0",
- "0",
- "0",
- "",
- "",
- "(",
- -235,
- -233,
- 57,
- 19,
- "",
- 1597,
- "0",
- "0",
- "0",
- "9",
- "101",
- "",
- -231,
- -237,
- 31,
- "11",
- "round",
- "0",
- "0",
- "0",
- 1609,
- "",
- "",
- "n",
- -197,
- -235,
- 14,
- 15,
- "",
- "0",
- "0",
- "0",
- "0",
- "",
- "",
- "---",
- -400,
- -255,
- 32,
- "4",
- "",
- 1633,
- "0",
- "0",
- "0",
- "",
- "",
- "?",
- -396,
- -257,
- 23,
- 15,
- " ",
- "0",
- "0",
- "0",
- "0",
- "",
- "",
- "(",
- -235,
- -262,
- 78,
- 19,
- "",
- 1657,
- "0",
- "0",
- "0",
- "9",
- "31",
- "t",
- -231,
- -264,
- 36,
- 15,
- "sqrt",
- "0",
- "0",
- "0",
- 1669,
- "op",
- "",
- "",
- -192,
- -266,
- 13,
- "11",
- "of",
- "0",
- "0",
- "0",
- 1189,
- "",
- "",
- "(",
- 38,
- -42,
- 98,
- 17,
- "",
- 1693,
- "0",
- "0",
- "0",
- "9",
- "32",
- "",
- 42,
- -45,
- 20,
- "11",
- "join",
- "0",
- "0",
- "0",
- 1705,
- "",
- "",
- "t",
- 65,
- -43,
- 19,
- 15,
- "0x",
- "0",
- "0",
- "0",
- 709,
- "",
- "",
- "",
- -216,
- -27,
- 8,
- "11",
- "=",
- "0",
- "0",
- "0",
- 829,
- "",
- "",
- "n",
- 15,
- -80,
- 20,
- 15,
- "10",
- "0",
- "0",
- "0",
- 0,
- "",
- ""],
- "isPersistent": false,
- "x": 148,
- "y": 32,
- "width": 383,
- "height": 347,
- "visible": false
- },
- {
- "listName": "Roots",
- "contents": [169],
- "isPersistent": false,
- "x": 188,
- "y": 27,
- "width": 378,
- "height": 403,
- "visible": false
- },
- {
- "listName": "TYPE_BLOCK",
- "contents": ["b", "hat", "nst1", "nst2"],
- "isPersistent": false,
- "x": 285,
- "y": 14,
- "width": 348,
- "height": 448,
- "visible": false
- },
- {
- "listName": "TYPE_ARG",
- "contents": ["(", "<", "o"],
- "isPersistent": false,
- "x": 345,
- "y": 102,
- "width": 348,
- "height": 448,
- "visible": false
- },
- {
- "listName": "TYPE_ARG_DST",
- "contents": ["(", "<", "o", "n", "t", "?"],
- "isPersistent": false,
- "x": 36,
- "y": 142,
- "width": 348,
- "height": 448,
- "visible": false
- },
- {
- "listName": "BLOCK_SCHEMA",
- "contents": ["-",
- "*",
- "\/",
- "&",
- "%",
- "+",
- "<",
- "=",
- ">",
- "|",
- "abs",
- "answer",
- "append:toList:",
- "backgroundIndex",
- "bounceOffEdge",
- "broadcast:",
- "changeGraphicEffect:by:",
- "changePenHueBy:",
- "changePenShadeBy:",
- "changePenSizeBy:",
- "changeSizeBy:",
- "changeTempoBy:",
- "changeVar:by:",
- "changeVolumeBy:",
- "changeXposBy:",
- "changeYposBy:",
- "clearPenTrails",
- "CLR_COUNT",
- "color:sees:",
- "comeToFront",
- "computeFunction:of:",
- "concatenate:with:",
- "contentsOfList:",
- "costumeIndex",
- "costumeName",
- "COUNT",
- "createCloneOf",
- "deleteClone",
- "deleteLine:ofList:",
- "distanceTo:",
- "doAsk",
- "doBroadcastAndWait",
- "doForever",
- "doForeverIf",
- "doForLoop",
- "doIf",
- "doIfElse",
- "doPlaySoundAndWait",
- "doRepeat",
- "doReturn",
- "doUntil",
- "doWaitUntil",
- "doWhile",
- "drum:duration:elapsed:from:",
- "filterReset",
- "forward:",
- "fxTest",
- "getAttribute:of:",
- "getLine:ofList:",
- "getParam",
- "getUserId",
- "getUserName",
- "glideSecs:toX:y:elapsed:from:",
- "goBackByLayers:",
- "gotoSpriteOrMouse:",
- "gotoX:y:",
- "heading",
- "heading:",
- "hide",
- "hideAll",
- "hideList:",
- "hideVariable:",
- "INCR_COUNT",
- "insert:at:ofList:",
- "instrument:",
- "isLoud",
- "keyPressed:",
- "letter:of:",
- "lineCountOfList:",
- "list:contains:",
- "lookLike:",
- "midiInstrument:",
- "mousePressed",
- "mouseX",
- "mouseY",
- "nextCostume",
- "nextScene",
- "not",
- "noteOn:duration:elapsed:from:",
- "obsolete",
- "penColor:",
- "penSize:",
- "playDrum",
- "playSound:",
- "pointTowards:",
- "putPenDown",
- "putPenUp",
- "randomFrom:to:",
- "readVariable",
- "rest:elapsed:from:",
- "rounded",
- "say:",
- "say:duration:elapsed:from:",
- "sayNothing",
- "scale",
- "sceneName",
- "scrollAlign",
- "scrollRight",
- "scrollUp",
- "senseVideoMotion",
- "sensor:",
- "sensorPressed:",
- "setGraphicEffect:to:",
- "setLine:ofList:to:",
- "setPenHueTo:",
- "setPenShadeTo:",
- "setRotationStyle",
- "setSizeTo:",
- "setTempoTo:",
- "setVar:to:",
- "setVideoState",
- "setVideoTransparency",
- "setVolumeTo:",
- "show",
- "showList:",
- "showVariable:",
- "soundLevel",
- "sqrt",
- "stampCostume",
- "startScene",
- "startSceneAndWait",
- "stopAll",
- "stopAllSounds",
- "stopScripts",
- "stopSound:",
- "stringLength:",
- "tempo",
- "think:",
- "think:duration:elapsed:from:",
- "timeAndDate",
- "timer",
- "timerReset",
- "timestamp",
- "touching:",
- "touchingColor:",
- "turnAwayFromEdge",
- "turnLeft:",
- "turnRight:",
- "undefined",
- "volume",
- "wait:elapsed:from:",
- "warpSpeed",
- "whenClicked",
- "whenCloned",
- "whenGreenFlag",
- "whenIReceive",
- "whenKeyPressed",
- "whenSceneStarts",
- "whenSensorGreaterThan",
- "xpos",
- "xpos:",
- "xScroll",
- "ypos",
- "ypos:",
- "yScroll",
- "stampPolygon",
- "stampPolyList",
- "write",
- "widthOfText:",
- ".",
- "() - ()",
- "() * ()",
- "() \/ ()",
- "<> and <>",
- "() mod ()",
- "() + ()",
- "[] < []",
- "[] = []",
- "[] > []",
- "<> or <>",
- "abs ()",
- "answer",
- "add [thing] to [list.ls]",
- "backdrop #",
- "if on edge, bounce",
- "broadcast [message1.ev]",
- "change [color.ef] effect by (25)",
- "change pen color by (10)",
- "change pen shade by (10)",
- "change pen size by (1)",
- "change size by (10)",
- "change tempo by (1)",
- "change [var.va] by (1)",
- "change volume by (1)",
- "change x by (10)",
- "change y by (10)",
- "clear",
- "clear counter",
- "color [color.co] is touching [color.co]?",
- "go to front",
- "[sqrt.op] of (9)",
- "join [hello] [world]",
- "Make a List",
- "costume #",
- "costume name",
- "counter",
- "create clone of [myself]",
- "delete this clone",
- "delete (1.?lia) of [list.ls]",
- "distance to [sprite.sp]",
- "ask [What's your name?] and wait",
- "broadcast [message1.ev] and wait",
- "forever",
- "forever if ()",
- "for each () in ()",
- "if <> then",
- "if <> then",
- "play sound [meow.so] until done",
- "repeat (10)",
- "stop script",
- "repeat until <>",
- "wait until <>",
- "while <>",
- "play drum (1) for (1) beats",
- "clear graphic effects",
- "move (10) steps",
- "color fx test ()",
- "[x position.si] of [sprite.sa]",
- "item (1.?li) of [list.ls]",
- "custom block parameter",
- "user id",
- "username",
- "glide (1) secs to x: (0) y: (0)",
- "go back (1) layers",
- "go to [mouse-pointer.pt]",
- "go to x: (0) y: (0)",
- "direction",
- "point in direction (90)",
- "hide",
- "hide all sprites",
- "hide list [list.ls]",
- "hide variable [var.va]",
- "incr counter",
- "insert [thing] at (1.?li) of [list.ls]",
- "set instrument to (1)",
- "loud?",
- "key [space.key] pressed?",
- "letter (1) of [world]",
- "length of [list.ls]",
- "[list.ls] contains [thing]?",
- "switch costume to (.cs)",
- "set instrument to ()",
- "mouse down?",
- "mouse x",
- "mouse y",
- "next costume",
- "next backdrop",
- "not <>",
- "play note (60) for (1) beats",
- "obsolete",
- "set pen color to [0xff0000]",
- "set pen size to (1)",
- "play drum (1) for (1) beats",
- "play sound [meow.so]",
- "point towards [mouse-pointer.pt]",
- "pen down",
- "pen up",
- "pick random () to ()",
- "Make a Variable",
- "rest for (0.25) beats",
- "round ()",
- "say [Hello!]",
- "say [Hello!] for (2) secs",
- "say nothing",
- "size",
- "backdrop name",
- "align scene ()",
- "scroll right ()",
- "scroll up ()",
- "video () on ()",
- "() sensor value",
- "sensor ()?",
- "set (color.ef) effect to (0)",
- "replace item (1.?li) of [list.ls] with [thing]",
- "set pen color to (0)",
- "set pen shade to (50)",
- "set rotation style [left-right.rs]",
- "set size to (100)%",
- "set tempo to (60) bpm",
- "set [var.va] to [0]",
- "turn video ()",
- "set video transparency to ()%",
- "set volume to (100)%",
- "show",
- "show list [list.ls]",
- "show variable [var.va]",
- "loudness",
- "sqrt ()",
- "stamp",
- "switch backdrop to [.bk]",
- "switch backdrop to [.bk] and wait",
- "stop all",
- "stop all sounds",
- "stop [all.st]",
- "stop sound ()",
- "length of [world]",
- "tempo",
- "think [Hmm]",
- "think [Hmm] for (2) secs",
- "current [minute.dt]",
- "timer",
- "reset timer",
- "days since 2000",
- "touching [sprite.sp]?",
- "touching color [color.co]?",
- "point away from edge",
- "turn CW (90) degrees",
- "turn CCW (90) degrees",
- "undefined",
- "volume",
- "wait (1) secs",
- "run without screen refresh",
- "when this sprite clicked",
- "when I start as a clone",
- "when green flag clicked",
- "when I receive [message1.ev]",
- "when [space.key] key pressed",
- "when backdrop switches to [.bk]",
- "when [loudness.wh] > (10)",
- "x position",
- "set x to (0)",
- "x scroll",
- "y position",
- "set y to (0)",
- "y scroll",
- "pen up and fill",
- "stamp polygon from (1) of [list.ls]",
- "write [Hello World]",
- "width of [Hello World]",
- ".",
- "(",
- "(",
- "(",
- "<",
- "(",
- "(",
- "<",
- "<",
- "<",
- "<",
- "(",
- "(",
- "b",
- "(",
- "b",
- "b",
- "b",
- "b",
- "b",
- "b",
- "b",
- "b",
- "b",
- "b",
- "b",
- "b",
- "b",
- "",
- "<",
- "b",
- "(",
- "(",
- "(",
- "(",
- "(",
- "",
- "b",
- "b",
- "b",
- "(",
- "b",
- "b",
- "nst1",
- "",
- "",
- "nst1",
- "nst2",
- "b",
- "nst1",
- "",
- "nst1",
- "b",
- "",
- "",
- "b",
- "b",
- "",
- "(",
- "(",
- "",
- "",
- "(",
- "b",
- "b",
- "b",
- "b",
- "(",
- "b",
- "b",
- "",
- "b",
- "b",
- "",
- "b",
- "b",
- "",
- "<",
- "(",
- "(",
- "<",
- "b",
- "b",
- "<",
- "(",
- "(",
- "b",
- "b",
- "<",
- "b",
- "",
- "b",
- "b",
- "b",
- "b",
- "b",
- "b",
- "b",
- "(",
- "(",
- "b",
- "(",
- "b",
- "b",
- "",
- "(",
- "(",
- "",
- "",
- "",
- "",
- "",
- "",
- "b",
- "b",
- "b",
- "b",
- "b",
- "b",
- "b",
- "b",
- "",
- "",
- "b",
- "b",
- "b",
- "b",
- "(",
- "",
- "b",
- "b",
- "b",
- "",
- "b",
- "b",
- "",
- "(",
- "(",
- "b",
- "b",
- "(",
- "(",
- "b",
- "(",
- "<",
- "<",
- "",
- "b",
- "b",
- "",
- "(",
- "b",
- "nst1",
- "hat",
- "hat",
- "hat",
- "hat",
- "hat",
- "hat",
- "hat",
- "(",
- "b",
- "",
- "(",
- "b",
- "",
- "b",
- "b",
- "b",
- "(",
- ".",
- "9",
- "9",
- "9",
- "9",
- "9",
- "9",
- "9",
- "9",
- "9",
- "9",
- "",
- "8",
- "11",
- "",
- "1",
- "6",
- "",
- "4",
- "4",
- "4",
- "2",
- "",
- "5",
- "",
- "1",
- "1",
- "4",
- "",
- "",
- "",
- "9",
- "9",
- "11",
- "",
- "",
- "",
- "",
- "",
- "11",
- "",
- "8",
- "6",
- "7",
- "",
- "",
- "7",
- "7",
- "",
- "7",
- "",
- "7",
- "7",
- "",
- "",
- "",
- "1",
- "",
- "",
- "11",
- "",
- "",
- "8",
- "",
- "",
- "1",
- "1",
- "1",
- "1",
- "2",
- "",
- "",
- "",
- "",
- "11",
- "",
- "",
- "8",
- "9",
- "11",
- "11",
- "",
- "",
- "8",
- "8",
- "8",
- "",
- "",
- "9",
- "",
- "",
- "4",
- "4",
- "",
- "",
- "1",
- "4",
- "4",
- "9",
- "5",
- "",
- "9",
- "2",
- "2",
- "",
- "",
- "",
- "",
- "",
- "",
- "",
- "",
- "",
- "",
- "11",
- "4",
- "4",
- "1",
- "2",
- "",
- "5",
- "",
- "",
- "",
- "2",
- "",
- "",
- "",
- "",
- "4",
- "",
- "",
- "",
- "",
- "7",
- "",
- "9",
- "",
- "",
- "",
- "8",
- "8",
- "8",
- "",
- "",
- "",
- "",
- "1",
- "1",
- "",
- "",
- "7",
- "7",
- "",
- "",
- "6",
- "6",
- "",
- "",
- "",
- "1",
- "1",
- "",
- "1",
- "1",
- "",
- "4",
- "4",
- "4",
- "4",
- "."],
- "isPersistent": false,
- "x": 164,
- "y": 54,
- "width": 304,
- "height": 289,
- "visible": false
- },
- {
- "listName": "Palette",
- "contents": [1,
- 49,
- 97,
- 145,
- 217,
- 241,
- 301,
- 325,
- 445,
- 841,
- 781,
- 937,
- 997,
- 1153,
- 1225,
- 1249,
- 1357,
- 1477,
- 1513,
- 1537,
- 1585,
- 1621,
- 1645],
- "isPersistent": false,
- "x": 191,
- "y": 9,
- "width": 311,
- "height": 406,
- "visible": false
- },
- {
- "listName": "lists",
- "contents": ["2"],
- "isPersistent": false,
- "x": 221,
- "y": 87,
- "width": 261,
- "height": 249,
- "visible": false
- },
- {
- "listName": "vars",
- "contents": ["text", "hdskghjsfgjkdhafghkjdaadgfhsjkgkahjdf", "x", "0", "y", "0"],
- "isPersistent": false,
- "x": 5,
- "y": 128,
- "width": 190,
- "height": 290,
- "visible": false
- }],
- "scripts": [[16, 22, [["whenGreenFlag"]]]],
- "sounds": [{
- "soundName": "pop",
- "soundID": 0,
- "md5": "83a9787d4cb6f3b7632b4ddfebf74367.wav",
- "sampleCount": 258,
- "rate": 11025,
- "format": ""
- }],
- "costumes": [{
- "costumeName": "white",
- "baseLayerID": 6,
- "baseLayerMD5": "b61b1077b0ea1931abee9dbbfa7903ff.png",
- "bitmapResolution": 2,
- "rotationCenterX": 480,
- "rotationCenterY": 360
- }],
- "currentCostumeIndex": 0,
- "penLayerMD5": "33adb0f5d69f13a94f003224acde09da.png",
- "penLayerID": 0,
- "tempoBPM": 60,
- "videoAlpha": 0.5,
- "children": [{
- "objName": "Editor",
- "variables": [{
- "name": "_ci",
- "value": 5,
- "isPersistent": false
- },
- {
- "name": "_c",
- "value": "4021060021310021310",
- "isPersistent": false
- },
- {
- "name": "_i",
- "value": 19,
- "isPersistent": false
- },
- {
- "name": "_ax",
- "value": -104.35,
- "isPersistent": false
- },
- {
- "name": "_vx",
- "value": 4,
- "isPersistent": false
- },
- {
- "name": "_vy",
- "value": 7.5,
- "isPersistent": false
- },
- {
- "name": "_cc",
- "value": "text",
- "isPersistent": false
- },
- {
- "name": "ii",
- "value": 0.6928406466512702,
- "isPersistent": false
- },
- {
- "name": "cc",
- "value": "",
- "isPersistent": false
- },
- {
- "name": "Len",
- "value": 2.5,
- "isPersistent": false
- },
- {
- "name": "idx",
- "value": "",
- "isPersistent": false
- },
- {
- "name": "sx",
- "value": 24,
- "isPersistent": false
- },
- {
- "name": "sy",
- "value": "11",
- "isPersistent": false
- },
- {
- "name": "#offsetX",
- "value": -21,
- "isPersistent": false
- },
- {
- "name": "#offsetY",
- "value": 7,
- "isPersistent": false
- },
- {
- "name": "#DragDest",
- "value": 805,
- "isPersistent": false
- },
- {
- "name": "#DragDstLink",
- "value": "9",
- "isPersistent": false
- },
- {
- "name": "lmx",
- "value": -93,
- "isPersistent": false
- },
- {
- "name": "lmy",
- "value": 180,
- "isPersistent": false
- },
- {
- "name": "#ClickIdx",
- "value": "0",
- "isPersistent": false
- },
- {
- "name": "#i",
- "value": 17,
- "isPersistent": false
- },
- {
- "name": "#tok",
- "value": "",
- "isPersistent": false
- },
- {
- "name": "#op",
- "value": 1.09375,
- "isPersistent": false
- },
- {
- "name": "#s",
- "value": "0",
- "isPersistent": false
- },
- {
- "name": "#ins",
- "value": 1738,
- "isPersistent": false
- },
- {
- "name": "#c",
- "value": 15,
- "isPersistent": false
- },
- {
- "name": "_vy2",
- "value": 34,
- "isPersistent": false
- },
- {
- "name": "!DrawLow",
- "value": -751,
- "isPersistent": false
- },
- {
- "name": "!DrawHigh",
- "value": 125,
- "isPersistent": false
- },
- {
- "name": "#palette_gap",
- "value": "3",
- "isPersistent": false
- },
- {
- "name": "varIndex#",
- "value": 1,
- "isPersistent": false
- },
- {
- "name": "#ddx",
- "value": -31,
- "isPersistent": false
- },
- {
- "name": "#ddy",
- "value": -102,
- "isPersistent": false
- },
- {
- "name": "#ddscy",
- "value": 0,
- "isPersistent": false
- },
- {
- "name": "#ddscmax",
- "value": 0,
- "isPersistent": false
- },
- {
- "name": "SBarY",
- "value": "120",
- "isPersistent": false
- },
- {
- "name": "SBarY2",
- "value": -313,
- "isPersistent": false
- },
- {
- "name": "Last Event",
- "value": "message1",
- "isPersistent": false
- },
- {
- "name": "#SideBarOpen",
- "value": "140",
- "isPersistent": false
- }],
- "lists": [{
- "listName": "Colors",
- "contents": ["0x6380da",
- "0x4a6cd4",
- "0x344d97",
- "0x9a6ddc",
- "0x8a55d7",
- "0x623c99",
- "0xc45ccb",
- "0xbb42c3",
- "0xbb42c3",
- "0x30a880",
- "0x0e9a6c",
- "0x0a6e4d",
- "0xf08f36",
- "0xee7d16",
- "0xaa590f",
- "0xcf944d",
- "0xc88330",
- "0x8e5d22",
- "0xe5b53a",
- "0xe1a91a",
- "0xa07812",
- "0x49b1e6",
- "0x2ca5e2",
- "0x1f75a1",
- "0x73c133",
- "0x5cb712",
- "0x41820c",
- "0x794aa7",
- "0x632d99",
- "0x46206d",
- "0xddac94",
- "0xcc5b22",
- "0x854322",
- "0xaaaaaa",
- "0xeeeeee",
- "0xaaaaaa",
- "0x777777",
- "0x555555",
- "0x222222"],
- "isPersistent": false,
- "x": 199,
- "y": 69,
- "width": 274,
- "height": 284,
- "visible": false
- },
- {
- "listName": "Stack",
- "contents": [1729,
- "9",
- 805,
- "6",
- 793,
- "9",
- 733,
- "9",
- 1165,
- "9",
- 1453,
- "9",
- 1405,
- "9",
- 1333,
- "9",
- 1285,
- "9",
- 1141,
- "9",
- 1057,
- "9",
- 397,
- "9",
- 337,
- "9",
- 169],
- "isPersistent": false,
- "x": 347,
- "y": 12,
- "width": 371,
- "height": 463,
- "visible": false
- },
- {
- "listName": "KeyList",
- "contents": ["space",
- "up arrow",
- "down arrow",
- "right arrow",
- "left arrow",
- "any",
- "a",
- "b",
- "c",
- "d",
- "e",
- "f",
- "g",
- "h",
- "i",
- "j",
- "k",
- "l",
- "m",
- "n",
- "o",
- "p",
- "q",
- "r",
- "s",
- "t",
- "u",
- "v",
- "w",
- "x",
- "y",
- "z",
- "0",
- "1",
- "2",
- "3",
- "4",
- "5",
- "6",
- "7",
- "8",
- "9"],
- "isPersistent": false,
- "x": 247,
- "y": 53,
- "width": 190,
- "height": 290,
- "visible": false
- },
- {
- "listName": "Example Projects",
- "contents": ["100% Scrollinig Pen Game (by @DarkLava)",
- "{\"objName\":\"Stage\", \"children\": [{\"objName\":\"project\" ,\"variables\":[ {\"name\": \"ScrollX\" , \"value\": \"10\" , \"isPersistent\":false} , {\"name\": \"ScrollY\" , \"value\": \"80\" , \"isPersistent\":false} , {\"name\": \"X\" , \"value\": \"8\" , \"isPersistent\":false} , {\"name\": \"Y\" , \"value\": \"11\" , \"isPersistent\":false} ] ,\"scripts\":[ [ 26 , 1513 , [ [\"whenGreenFlag\" ] , [\"doForever\" ,[ [\"doWaitUntil\" , [\"keyPressed:\" , \"up arrow\" ] ] , [\"setVar:to:\" , \"Y\" , \"-10\" ] , [\"doRepeat\" , \"21\" ,[ [\"changeVar:by:\" , \"ScrollY\" , [\"readVariable\" , \"Y\" ] ] , [\"changeVar:by:\" , \"Y\" , \"1\" ] , [\"wait:elapsed:from:\" , \"0\" ] ] ] ] ] ]] , [ 26 , 24 , [ [\"whenGreenFlag\" ] , [\"setVar:to:\" , \"ScrollX\" , \"0\" ] , [\"setVar:to:\" , \"ScrollY\" , \"80\" ] , [\"setVar:to:\" , \"X\" , \"-600\" ] , [\"deleteLine:ofList:\" , \"all\" , \"X\" ] , [\"deleteLine:ofList:\" , \"all\" , \"Colour\" ] , [\"doRepeat\" , \"8\" ,[ [\"changeVar:by:\" , \"X\" , [\"randomFrom:to:\" , \"90\" , \"160\" ] ] , [\"append:toList:\" , [\"readVariable\" , \"X\" ] , \"X\" ] , [\"append:toList:\" , [\"randomFrom:to:\" , \"0\" , \"35\" ] , \"Colour\" ] ] ] , [\"hide\" ] , [\"doForever\" ,[ [\"clearPenTrails\" ] , [\"putPenUp\" ] , [\"warpSpeed\" ,[ [\"putPenDown\" ] , [\"setPenHueTo:\" , \"111\" ] , [\"setPenShadeTo:\" , \"70\" ] , [\"penSize:\" , \"300\" ] , [\"gotoX:y:\" , \"140\" , \"100\" ] , [\"gotoX:y:\" , \"140\" , \"-100\" ] , [\"gotoX:y:\" , \"-140\" , \"-100\" ] , [\"gotoX:y:\" , \"-140\" , \"100\" ] , [\"gotoX:y:\" , \"140\" , \"100\" ] , [\"gotoX:y:\" , \"0\" , \"0\" ] , [\"setPenShadeTo:\" , \"50\" ] , [\"putPenUp\" ] , [\"setPenHueTo:\" , \"30\" ] , [\"setPenShadeTo:\" , \"25\" ] , [\"penSize:\" , \"100\" ] , [\"gotoX:y:\" , [\"+\" , [\"readVariable\" , \"ScrollX\" ] , \"-10000\" ] , [\"+\" , [\"readVariable\" , \"ScrollY\" ] , \"-175\" ] ] , [\"putPenDown\" ] , [\"gotoX:y:\" , [\"+\" , [\"readVariable\" , \"ScrollX\" ] , \"10000\" ] , [\"+\" , [\"readVariable\" , \"ScrollY\" ] , \"-175\" ] ] , [\"gotoX:y:\" , [\"+\" , [\"readVariable\" , \"ScrollX\" ] , \"10000\" ] , [\"+\" , [\"readVariable\" , \"ScrollY\" ] , \"-225\" ] ] , [\"gotoX:y:\" , [\"+\" , [\"readVariable\" , \"ScrollX\" ] , \"-10000\" ] , [\"+\" , [\"readVariable\" , \"ScrollY\" ] , \"-225\" ] ] , [\"setVar:to:\" , \"X\" , \"0\" ] , [\"putPenUp\" ] , [\"setPenHueTo:\" , \"70\" ] , [\"penSize:\" , \"50\" ] , [\"gotoX:y:\" , [\"+\" , [\"readVariable\" , \"ScrollX\" ] , \"-10000\" ] , [\"+\" , [\"readVariable\" , \"ScrollY\" ] , \"-125\" ] ] , [\"putPenDown\" ] , [\"gotoX:y:\" , [\"+\" , [\"readVariable\" , \"ScrollX\" ] , \"10000\" ] , [\"+\" , [\"readVariable\" , \"ScrollY\" ] , \"-125\" ] ] , [\"putPenUp\" ] , [\"setVar:to:\" , \"X\" , \"0\" ] , [\"doRepeat\" , \"8\" ,[ [\"penSize:\" , \"5\" ] , [\"changeVar:by:\" , \"X\" , \"1\" ] , [\"gotoX:y:\" , [\"+\" , [\"readVariable\" , \"ScrollX\" ] , [\"getLine:ofList:\" , [\"readVariable\" , \"X\" ] , \"X\" ] ] , [\"+\" , [\"readVariable\" , \"ScrollY\" ] , \"-100\" ] ] , [\"putPenDown\" ] , [\"setPenHueTo:\" , \"65\" ] , [\"setPenShadeTo:\" , \"30\" ] , [\"ypos:\" , [\"+\" , [\"readVariable\" , \"ScrollY\" ] , \"-70\" ] ] , [\"setPenShadeTo:\" , \"50\" ] , [\"penSize:\" , \"20\" ] , [\"setPenHueTo:\" , [\"getLine:ofList:\" , [\"readVariable\" , \"X\" ] , \"Colour\" ] ] , [\"ypos:\" , [\"+\" , [\"readVariable\" , \"ScrollY\" ] , \"-71\" ] ] , [\"putPenUp\" ] ] ] , [\"setPenHueTo:\" , \"111\" ] , [\"penSize:\" , \"10\" ] , [\"setPenShadeTo:\" , \"40\" ] , [\"gotoX:y:\" , \"-15\" , \"-15\" ] , [\"putPenDown\" ] , [\"gotoX:y:\" , \"-15\" , \"15\" ] , [\"gotoX:y:\" , \"15\" , \"15\" ] , [\"gotoX:y:\" , \"15\" , \"-15\" ] , [\"gotoX:y:\" , \"-15\" , \"-15\" ] , [\"gotoX:y:\" , \"0\" , \"0\" ] , [\"penSize:\" , \"38\" ] , [\"gotoX:y:\" , \"1\" , \"0\" ] , [\"doIf\" , [\"keyPressed:\" , \"right arrow\" ] ,[ [\"changeVar:by:\" , \"ScrollX\" , \"-5\" ] ] ] , [\"doIf\" , [\"keyPressed:\" , \"left arrow\" ] ,[ [\"changeVar:by:\" , \"ScrollX\" , \"5\" ] ] ] ] ] ] ] ]] ] }],\"info\":{} }",
- "Funky Wave (by @MousieGamesTest)",
- "{\"objName\":\"Stage\", \"children\": [{\"objName\":\"project\" ,\"variables\":[ {\"name\": \"number\" , \"value\": \"740\" , \"isPersistent\":false} ] ,\"scripts\":[ [ 27 , 34 , [ [\"whenGreenFlag\" ] , [\"hide\" ] , [\"setVar:to:\" , \"number\" , \"0\" ] , [\"gotoX:y:\" , \"-105\" , \"0\" ] , [\"putPenUp\" ] , [\"doForever\" ,[ [\"warpSpeed\" ,[ [\"clearPenTrails\" ] , [\"setPenShadeTo:\" , \"99999\" ] , [\"penSize:\" , \"90\" ] , [\"putPenUp\" ] , [\"gotoX:y:\" , \"-240\" , \"180\" ] , [\"putPenDown\" ] , [\"doRepeat\" , \"4\" ,[ [\"xpos:\" , \"240\" ] , [\"changeYposBy:\" , \"-90\" ] , [\"xpos:\" , \"-240\" ] ] ] , [\"setPenShadeTo:\" , \"50\" ] , [\"putPenUp\" ] , [\"gotoX:y:\" , \"-105\" , \"0\" ] , [\"doRepeat\" , \"15\" ,[ [\"putPenUp\" ] , [\"changePenHueBy:\" , \"1\" ] , [\"penSize:\" , \"3\" ] , [\"changeXposBy:\" , \"15\" ] , [\"ypos:\" , \"0\" ] , [\"putPenDown\" ] , [\"ypos:\" , [\"*\" , [\"computeFunction:of:\" , \"sin\" , [\"+\" , [\"*\" , [\"xpos\" ] , \"2\" ] , [\"readVariable\" , \"number\" ] ] ] , \"40\" ] ] ] ] ] ] , [\"changeVar:by:\" , \"number\" , \"10\" ] ] ] ]] ] }],\"info\":{} }",
- "Terdragon Curve (by @Lataliat)",
- "{\"objName\":\"Stage\", \"children\": [{\"objName\":\"project\" ,\"variables\":[ {\"name\": \"var\" , \"value\": \"3465\" , \"isPersistent\":false} ] ,\"scripts\":[ [ 34 , 43 , [ [\"whenGreenFlag\" ] , [\"show\" ] , [\"say:\" , \"Please wait...\" ] , [\"warpSpeed\" ,[ [\"deleteLine:ofList:\" , \"all\" , \"list\" ] , [\"deleteLine:ofList:\" , \"all\" , \"list2\" ] , [\"append:toList:\" , \"F\" , \"list\" ] , [\"doRepeat\" , \"7\" ,[ [\"setVar:to:\" , \"var\" , \"1\" ] , [\"doRepeat\" , [\"lineCountOfList:\" , \"list\" ] ,[ [\"doIf\" , [\"=\" , [\"getLine:ofList:\" , [\"readVariable\" , \"var\" ] , \"list\" ] , \"F\" ] ,[ [\"append:toList:\" , \"F\" , \"list2\" ] , [\"append:toList:\" , \"-\" , \"list2\" ] , [\"append:toList:\" , \"F\" , \"list2\" ] , [\"append:toList:\" , \"+\" , \"list2\" ] , [\"append:toList:\" , \"F\" , \"list2\" ] ] ] , [\"doIf\" , [\"=\" , [\"getLine:ofList:\" , [\"readVariable\" , \"var\" ] , \"list\" ] , \"-\" ] ,[ [\"append:toList:\" , \"-\" , \"list2\" ] ] ] , [\"doIf\" , [\"=\" , [\"getLine:ofList:\" , [\"readVariable\" , \"var\" ] , \"list\" ] , \"+\" ] ,[ [\"append:toList:\" , \"+\" , \"list2\" ] ] ] , [\"changeVar:by:\" , \"var\" , \"1\" ] ] ] , [\"deleteLine:ofList:\" , \"all\" , \"list\" ] , [\"setVar:to:\" , \"var\" , \"1\" ] , [\"doRepeat\" , [\"lineCountOfList:\" , \"list2\" ] ,[ [\"append:toList:\" , [\"getLine:ofList:\" , [\"readVariable\" , \"var\" ] , \"list2\" ] , \"list\" ] , [\"changeVar:by:\" , \"var\" , \"1\" ] ] ] , [\"deleteLine:ofList:\" , \"all\" , \"list2\" ] ] ] ] ] , [\"say:\" , \"\" ] , [\"hide\" ] , [\"broadcast:\" , \"message1\" ] ]] , [ 34 , 728 , [ [\"whenIReceive\" , \"message1\" ] , [\"clearPenTrails\" ] , [\"putPenUp\" ] , [\"gotoX:y:\" , \"-125\" , \"-80\" ] , [\"heading:\" , \"270\" ] , [\"setVar:to:\" , \"var\" , \"1\" ] , [\"setPenHueTo:\" , \"0\" ] , [\"penSize:\" , \"3\" ] , [\"putPenDown\" ] , [\"warpSpeed\" ,[ [\"doRepeat\" , [\"lineCountOfList:\" , \"list\" ] ,[ [\"doIf\" , [\"=\" , [\"getLine:ofList:\" , [\"readVariable\" , \"var\" ] , \"list\" ] , \"F\" ] ,[ [\"forward:\" , \"6\" ] ] ] , [\"doIf\" , [\"=\" , [\"getLine:ofList:\" , [\"readVariable\" , \"var\" ] , \"list\" ] , \"+\" ] ,[ [\"turnLeft:\" , \"120\" ] ] ] , [\"doIf\" , [\"=\" , [\"getLine:ofList:\" , [\"readVariable\" , \"var\" ] , \"list\" ] , \"-\" ] ,[ [\"turnRight:\" , \"120\" ] ] ] , [\"changePenHueBy:\" , [\"\/\" , \"200\" , [\"lineCountOfList:\" , \"list\" ] ] ] , [\"changeVar:by:\" , \"var\" , \"1\" ] ] ] , [\"putPenUp\" ] , [\"heading:\" , \"90\" ] , [\"gotoX:y:\" , \"150\" , \"-80\" ] , [\"show\" ] ] ] , [\"doWaitUntil\" , [\"keyPressed:\" , \"any\" ] ] ]] ] }],\"info\":{} }",
- "Pen Loading Animation (by @Sheep_maker)",
- "{\"objName\":\"Stage\", \"children\": [{\"objName\":\"project\" ,\"variables\":[ {\"name\": \"i\" , \"value\": \"-264\" , \"isPersistent\":false} , {\"name\": \"hi\" , \"value\": \"261.5932025834277\" , \"isPersistent\":false} ] ,\"scripts\":[ [ 21 , 20 , [ [\"whenGreenFlag\" ] , [\"penColor:\" , \"0xE91E63\" ] , [\"penSize:\" , \"20\" ] , [\"hide\" ] , [\"doForever\" ,[ [\"setVar:to:\" , \"hi\" , \"0\" ] , [\"doUntil\" , [\">\" , [\"readVariable\" , \"hi\" ] , \"350\" ] ,[ [\"deleteLine:ofList:\" , \"all\" , \"circleParams\" ] , [\"append:toList:\" , [\"\/\" , [\"readVariable\" , \"hi\" ] , \"4\" ] , \"circleParams\" ] , [\"append:toList:\" , \"8\" , \"circleParams\" ] , [\"doBroadcastAndWait\" , \"createCircle\" ] , [\"changeVar:by:\" , \"hi\" , [\"\/\" , [\"-\" , \"360\" , [\"readVariable\" , \"hi\" ] ] , \"5\" ] ] ] ] , [\"setVar:to:\" , \"hi\" , \"360\" ] , [\"doUntil\" , [\"<\" , [\"readVariable\" , \"hi\" ] , \"0\" ] ,[ [\"deleteLine:ofList:\" , \"all\" , \"circleParams\" ] , [\"append:toList:\" , [\"\/\" , [\"readVariable\" , \"hi\" ] , \"4\" ] , \"circleParams\" ] , [\"append:toList:\" , \"-8\" , \"circleParams\" ] , [\"doBroadcastAndWait\" , \"createCircle\" ] , [\"changeVar:by:\" , \"hi\" , [\"\/\" , [\"-\" , [\"readVariable\" , \"hi\" ] , \"360.5\" ] , \"5\" ] ] ] ] ] ] ]] , [ 26 , 504 , [ [\"whenIReceive\" , \"createCircle\" ] , [\"warpSpeed\" ,[ [\"clearPenTrails\" ] , [\"setVar:to:\" , \"i\" , \"0\" ] , [\"gotoX:y:\" , [\"*\" , [\"computeFunction:of:\" , \"sin\" , [\"readVariable\" , \"i\" ] ] , \"100\" ] , [\"*\" , [\"computeFunction:of:\" , \"cos\" , [\"readVariable\" , \"i\" ] ] , \"100\" ] ] , [\"putPenDown\" ] , [\"doRepeat\" , [\"rounded\" , [\"\/\" , [\"getLine:ofList:\" , \"1\" , \"circleParams\" ] , \"2\" ] ] ,[ [\"changeVar:by:\" , \"i\" , [\"getLine:ofList:\" , \"2\" , \"circleParams\" ] ] , [\"gotoX:y:\" , [\"*\" , [\"computeFunction:of:\" , \"sin\" , [\"readVariable\" , \"i\" ] ] , \"100\" ] , [\"*\" , [\"computeFunction:of:\" , \"cos\" , [\"readVariable\" , \"i\" ] ] , \"100\" ] ] ] ] , [\"putPenUp\" ] ] ] ]] ] }],\"info\":{} }",
- "Random Spirals (by @Scratch-Minion)",
- "{\"objName\":\"Stage\", \"children\": [{\"objName\":\"project\" ,\"variables\":[ {\"name\": \"ScrollX\" , \"value\": \"0\" , \"isPersistent\":false} , {\"name\": \"ScrollY\" , \"value\": \"80\" , \"isPersistent\":false} , {\"name\": \"X\" , \"value\": \"8\" , \"isPersistent\":false} , {\"name\": \"Y\" , \"value\": \"11\" , \"isPersistent\":false} , {\"name\": \"Turn Angle\" , \"value\": \"37\" , \"isPersistent\":false} , {\"name\": \"n\" , \"value\": \"0.1\" , \"isPersistent\":false} , {\"name\": \"Num Colours\" , \"value\": \"13\" , \"isPersistent\":false} , {\"name\": \"Line Length\" , \"value\": \"116.09999999999768\" , \"isPersistent\":false} , {\"name\": \"Pen Colour Change\" , \"value\": \"15.384615384615385\" , \"isPersistent\":false} ] ,\"scripts\":[ [ 26 , 1513 , [ [\"whenGreenFlag\" ] , [\"doForever\" ,[ [\"doWaitUntil\" , [\"keyPressed:\" , \"up arrow\" ] ] , [\"setVar:to:\" , \"Y\" , \"-10\" ] , [\"doRepeat\" , \"21\" ,[ [\"changeVar:by:\" , \"ScrollY\" , [\"readVariable\" , \"Y\" ] ] , [\"changeVar:by:\" , \"Y\" , \"1\" ] , [\"wait:elapsed:from:\" , \"0\" ] ] ] ] ] ]] , [ 26 , 24 , [ [\"whenGreenFlag\" ] , [\"penSize:\" , \"2\" ] , [\"hide\" ] , [\"doForever\" ,[ [\"warpSpeed\" ,[ [\"setVar:to:\" , \"Turn Angle\" , [\"randomFrom:to:\" , \"10\" , \"180\" ] ] , [\"setVar:to:\" , \"n\" , [\"\/\" , [\"randomFrom:to:\" , \"1\" , \"60\" ] , \"10\" ] ] , [\"setVar:to:\" , \"Num Colours\" , [\"randomFrom:to:\" , \"1\" , \"200\" ] ] , [\"setVar:to:\" , \"Pen Colour Change\" , [\"\/\" , \"200\" , [\"readVariable\" , \"Num Colours\" ] ] ] , [\"putPenUp\" ] , [\"clearPenTrails\" ] , [\"heading:\" , \"0\" ] , [\"gotoX:y:\" , \"0\" , \"0\" ] , [\"putPenDown\" ] , [\"setVar:to:\" , \"Line Length\" , \"1\" ] , [\"doUntil\" , [\">\" , [\"ypos\" ] , \"179\" ] ,[ [\"changePenHueBy:\" , [\"readVariable\" , \"Pen Colour Change\" ] ] , [\"forward:\" , [\"readVariable\" , \"Line Length\" ] ] , [\"turnLeft:\" , [\"readVariable\" , \"Turn Angle\" ] ] , [\"changeVar:by:\" , \"Line Length\" , [\"readVariable\" , \"n\" ] ] ] ] ] ] , [\"wait:elapsed:from:\" , \"1.5\" ] ] ] ]] ] }],\"info\":{} }",
- "New Scratch Blocks (by @griffpatch)",
- "{\"objName\":\"Stage\", \"children\": [{\"objName\":\"project\" ,\"variables\":[ {\"name\": \"ang\" , \"value\": \"538010\" , \"isPersistent\":false} , {\"name\": \"h\" , \"value\": \"151.45159937162072\" , \"isPersistent\":false} , {\"name\": \"message\" , \"value\": \"\\\"pen up and fill\\\" - Fills the last shape drawn with the pen\" , \"isPersistent\":false} , {\"name\": \"y\" , \"value\": \"0\" , \"isPersistent\":false} , {\"name\": \"sy\" , \"value\": \"0.2857142857142857\" , \"isPersistent\":false} ] ,\"scripts\":[ [ 27 , 33 , [ [\"whenGreenFlag\" ] , [\"doForever\" ,[ [\"setVar:to:\" , \"message\" , \"This project is using 3 newly imagined Scratch Blocks\" ] , [\"wait:elapsed:from:\" , \"5\" ] , [\"setVar:to:\" , \"message\" , \"\\\"pen up and fill\\\" - Fills the last shape drawn with the pen\" ] , [\"wait:elapsed:from:\" , \"5\" ] , [\"setVar:to:\" , \"message\" , \"\\\"write [Hello World]\\\" - Writes text to the pen canvas\" ] , [\"wait:elapsed:from:\" , \"5\" ] , [\"setVar:to:\" , \"message\" , \"\\\"width of [Hello World]\\\" - reports the width of the text\" ] , [\"wait:elapsed:from:\" , \"5\" ] ] ] ]] , [ 29 , 385 , [ [\"whenGreenFlag\" ] , [\"hide\" ] , [\"penSize:\" , \"4\" ] , [\"setVar:to:\" , \"ang\" , \"0\" ] , [\"doForever\" ,[ [\"warpSpeed\" ,[ [\"changeVar:by:\" , \"ang\" , \"5\" ] , [\"clearPenTrails\" ] , [\"changePenHueBy:\" , \"2\" ] , [\"setVar:to:\" , \"h\" , [\"+\" , \"100\" , [\"*\" , \"60\" , [\"computeFunction:of:\" , \"sin\" , [\"*\" , [\"timer\" ] , \"360\" ] ] ] ] ] , [\"gotoX:y:\" , [\"*\" , \"200\" , [\"computeFunction:of:\" , \"sin\" , [\"readVariable\" , \"ang\" ] ] ] , [\"*\" , [\"readVariable\" , \"h\" ] , [\"computeFunction:of:\" , \"cos\" , [\"readVariable\" , \"ang\" ] ] ] ] , [\"putPenDown\" ] , [\"doRepeat\" , \"5\" ,[ [\"changeVar:by:\" , \"ang\" , [\"\/\" , \"360\" , \"5\" ] ] , [\"gotoX:y:\" , [\"*\" , \"200\" , [\"computeFunction:of:\" , \"sin\" , [\"readVariable\" , \"ang\" ] ] ] , [\"*\" , [\"readVariable\" , \"h\" ] , [\"computeFunction:of:\" , \"cos\" , [\"readVariable\" , \"ang\" ] ] ] ] ] ] , [\"stampPolygon\" ] , [\"changePenHueBy:\" , \"100\" ] , [\"changeVar:by:\" , \"sy\" , \"-1\" ] , [\"changeVar:by:\" , \"y\" , [\"readVariable\" , \"sy\" ] ] , [\"doIf\" , [\"<\" , [\"readVariable\" , \"y\" ] , \"0\" ] ,[ [\"setVar:to:\" , \"y\" , \"0\" ] , [\"setVar:to:\" , \"sy\" , [\"*\" , [\"readVariable\" , \"sy\" ] , \"-0.4\" ] ] ] ] , [\"gotoX:y:\" , [\"*\" , \"-0.5\" , [\"widthOfText:\" , [\"readVariable\" , \"message\" ] ] ] , [\"readVariable\" , \"y\" ] ] , [\"write\" , [\"readVariable\" , \"message\" ] ] , [\"changePenHueBy:\" , \"-100\" ] ] ] ] ] ]] , [ 25 , 253 , [ [\"whenGreenFlag\" ] , [\"doForever\" ,[ [\"setVar:to:\" , \"sy\" , \"10\" ] , [\"setVar:to:\" , \"y\" , \"0\" ] , [\"wait:elapsed:from:\" , \"5\" ] ] ] ]] ] }],\"info\":{} }",
- "100% Pen Trampoline (by @The__Mad__Hatter)",
- "{\"objName\":\"Stage\", \"children\": [{\"objName\":\"project\" ,\"variables\":[ {\"name\": \"x speed\" , \"value\": \"4.738457229234491e-13\" , \"isPersistent\":false} , {\"name\": \"gravity\" , \"value\": \"-5.220982396617483\" , \"isPersistent\":false} , {\"name\": \"bounce back\" , \"value\": \"-5.220982396617483\" , \"isPersistent\":false} , {\"name\": \"y\" , \"value\": \"-43.332605742058455\" , \"isPersistent\":false} , {\"name\": \"x\" , \"value\": \"30\" , \"isPersistent\":false} , {\"name\": \"ScrollY\" , \"value\": \"-50623.64455061931\" , \"isPersistent\":false} ] ,\"scripts\":[ [ 26 , 1225 , [ [\"whenGreenFlag\" ] , [\"doForever\" ,[ [\"doWaitUntil\" , [\"keyPressed:\" , \"up arrow\" ] ] , [\"setVar:to:\" , \"Y\" , \"-10\" ] , [\"doRepeat\" , \"21\" ,[ [\"changeVar:by:\" , \"ScrollY\" , [\"readVariable\" , \"Y\" ] ] , [\"changeVar:by:\" , \"Y\" , \"1\" ] , [\"wait:elapsed:from:\" , \"0\" ] ] ] ] ] ]] , [ 17 , -265 , [ [\"whenGreenFlag\" ] , [\"hide\" ] , [\"setVar:to:\" , \"x speed\" , \"0\" ] , [\"setVar:to:\" , \"gravity\" , \"0\" ] , [\"setVar:to:\" , \"bounce back\" , \"0\" ] , [\"gotoX:y:\" , \"0\" , \"0\" ] , [\"doForever\" ,[ [\"clearPenTrails\" ] , [\"setPenHueTo:\" , \"0\" ] , [\"penSize:\" , \"10\" ] , [\"putPenDown\" ] , [\"changeYposBy:\" , [\"readVariable\" , \"gravity\" ] ] , [\"changeXposBy:\" , [\"readVariable\" , \"x speed\" ] ] , [\"setVar:to:\" , \"x speed\" , [\"*\" , [\"readVariable\" , \"x speed\" ] , \"0.9\" ] ] , [\"doIfElse\" , [\">\" , [\"ypos\" ] , \"-100\" ] ,[ [\"changeVar:by:\" , \"gravity\" , [\"-\" , [\"*\" , [\"computeFunction:of:\" , \"abs\" , [\"\/\" , [\"readVariable\" , \"gravity\" ] , \"5\" ] ] , \"-1\" ] , \"1\" ] ] , [\"setVar:to:\" , \"bounce back\" , [\"readVariable\" , \"gravity\" ] ] ] ,[ [\"changeVar:by:\" , \"gravity\" , [\"+\" , \"1\" , [\"+\" , [\"\/\" , [\"computeFunction:of:\" , \"abs\" , [\"readVariable\" , \"x speed\" ] ] , \"5\" ] , [\"\/\" , [\"computeFunction:of:\" , \"abs\" , [\"readVariable\" , \"bounce back\" ] ] , \"5\" ] ] ] ] ] ] , [\"doIf\" , [\"keyPressed:\" , \"right arrow\" ] ,[ [\"changeVar:by:\" , \"x speed\" , \"1\" ] ] ] , [\"doIf\" , [\"keyPressed:\" , \"left arrow\" ] ,[ [\"changeVar:by:\" , \"x speed\" , \"-1\" ] ] ] , [\"doIf\" , [\"keyPressed:\" , \"up arrow\" ] ,[ [\"doIf\" , [\"<\" , [\"ypos\" ] , \"-100\" ] ,[ [\"changeVar:by:\" , \"gravity\" , \"2\" ] ] ] ] ] , [\"doIf\" , [\"keyPressed:\" , \"down arrow\" ] ,[ [\"changeVar:by:\" , \"gravity\" , \"-1\" ] ] ] , [\"putPenUp\" ] , [\"penSize:\" , \"3\" ] , [\"setVar:to:\" , \"x\" , [\"xpos\" ] ] , [\"setVar:to:\" , \"y\" , [\"ypos\" ] ] , [\"doIfElse\" , [\"<\" , [\"readVariable\" , \"y\" ] , \"-100\" ] ,[ [\"setPenHueTo:\" , \"50\" ] ] ,[ [\"setPenHueTo:\" , \"0\" ] ] ] , [\"gotoX:y:\" , \"-240\" , \"-100\" ] , [\"putPenDown\" ] , [\"doIf\" , [\"<\" , [\"readVariable\" , \"y\" ] , \"-100\" ] ,[ [\"gotoX:y:\" , [\"readVariable\" , \"x\" ] , [\"readVariable\" , \"y\" ] ] ] ] , [\"gotoX:y:\" , \"240\" , \"-100\" ] , [\"putPenUp\" ] , [\"gotoX:y:\" , [\"readVariable\" , \"x\" ] , [\"readVariable\" , \"y\" ] ] ] ] ]] ] }],\"info\":{} }"],
- "isPersistent": false,
- "x": 52,
- "y": 0,
- "width": 413,
- "height": 877.5,
- "visible": false
- }],
- "scripts": [[13910,
- 10,
- [["procDef",
- "draw operator %n %n %n %n %n txt %s",
- ["x", "y", "sx", "sy", "col", "txt"],
- [1, 1, 1, 1, 1, ""],
- true],
- ["penColor:",
- ["getLine:ofList:", ["-", ["*", ["getParam", "col", "r"], 3], 2], "Colors"]],
- ["penSize:", ["-", ["getParam", "sy", "r"], 1]],
- ["gotoX:y:",
- ["-",
- ["+", ["getParam", "x", "r"], ["\/", ["getParam", "sy", "r"], 2]],
- 1],
- ["+",
- ["-", ["getParam", "y", "r"], ["\/", ["getParam", "sy", "r"], 2]],
- 0.5]],
- ["putPenDown"],
- ["xpos:",
- ["-",
- ["-",
- ["+", ["getParam", "x", "r"], ["getParam", "sx", "r"]],
- ["\/", ["getParam", "sy", "r"], 2]],
- 2]],
- ["putPenUp"],
- ["penColor:",
- ["getLine:ofList:", ["-", ["*", ["getParam", "col", "r"], 3], 0], "Colors"]],
- ["gotoX:y:",
- ["+",
- ["+", ["getParam", "x", "r"], ["\/", ["getParam", "sy", "r"], 2]],
- 1],
- ["-",
- ["-", ["getParam", "y", "r"], ["\/", ["getParam", "sy", "r"], 2]],
- 0.5]],
- ["putPenDown"],
- ["xpos:",
- ["-",
- ["+", ["getParam", "x", "r"], ["getParam", "sx", "r"]],
- ["\/", ["getParam", "sy", "r"], 2]]],
- ["putPenUp"],
- ["penSize:", ["-", ["getParam", "sy", "r"], 2]],
- ["penColor:",
- ["getLine:ofList:", ["-", ["*", ["getParam", "col", "r"], 3], 1], "Colors"]],
- ["gotoX:y:",
- ["-",
- ["+", ["getParam", "x", "r"], ["\/", ["getParam", "sy", "r"], 2]],
- 0],
- ["-",
- ["-", ["getParam", "y", "r"], ["\/", ["getParam", "sy", "r"], 2]],
- 0]],
- ["putPenDown"],
- ["xpos:",
- ["-",
- ["-",
- ["+", ["getParam", "x", "r"], ["getParam", "sx", "r"]],
- ["\/", ["getParam", "sy", "r"], 2]],
- 1]],
- ["putPenUp"],
- ["doIf",
- ["not", ["=", ["getParam", "txt", "r"], ""]],
- [["penSize:", 1],
- ["penColor:", -1],
- ["call",
- "write %s at %n %n",
- ["getParam", "txt", "r"],
- ["+", ["getParam", "x", "r"], 4],
- ["-", ["getParam", "y", "r"], 11]]]]]],
- [3350,
- 10,
- [["procDef", "Layout & Draw %n", ["idx"], [1], true],
- ["setVar:to:", "idx", ["getLine:ofList:", ["getParam", "idx", "r"], "Roots"]],
- ["doIfElse",
- [">", ["readVariable", "idx"], "0"],
- [["call",
- "Get Sizes %n %b %n %n",
- ["readVariable", "idx"],
- false,
- ["getLine:ofList:", ["+", ["readVariable", "idx"], 1], "Script"],
- ["getLine:ofList:", ["+", ["readVariable", "idx"], 2], "Script"]],
- ["call", "Draw %n just me %b %b", ["readVariable", "idx"], false, false],
- ["call", "Layout & Draw %n", ["+", ["getParam", "idx", "r"], 1]]],
- null]]],
- [6874,
- 10,
- [["procDef", "sy = Max Height of params %n", ["idx"], [1], true],
- ["setVar:to:", "sy", "0"],
- ["doIfElse",
- [">", ["getParam", "idx", "r"], "0"],
- [["setVar:to:", "idx", ["getParam", "idx", "r"]],
- ["doUntil",
- ["<", ["readVariable", "idx"], "1"],
- [["doIf",
- [">", ["getLine:ofList:", ["+", ["readVariable", "idx"], 4], "Script"], ["readVariable", "sy"]],
- [["setVar:to:", "sy", ["getLine:ofList:", ["+", ["readVariable", "idx"], 4], "Script"]]]],
- ["setVar:to:", "idx", ["getLine:ofList:", ["+", ["readVariable", "idx"], 9], "Script"]]]]],
- null]]],
- [13503,
- 10,
- [["procDef", "Center Y %n height %n", ["idx", "h"], [1, 1], true],
- ["doIfElse",
- [">", ["getParam", "idx", "r"], "0"],
- [["setVar:to:", "idx", ["getParam", "idx", "r"]],
- ["doUntil",
- ["<", ["readVariable", "idx"], "1"],
- [["setVar:to:",
- "sy",
- ["\/",
- ["-",
- ["getLine:ofList:", ["+", ["readVariable", "idx"], 4], "Script"],
- ["getParam", "h", "r"]],
- 2]],
- ["doIf",
- ["<", ["readVariable", "sy"], "0"],
- [["call", "Offset Y %n %n %b", ["readVariable", "idx"], ["readVariable", "sy"], ["not", false]]]],
- ["setVar:to:", "idx", ["getLine:ofList:", ["+", ["readVariable", "idx"], 9], "Script"]]]]],
- null],
- ["setVar:to:", "sy", ["getParam", "h", "r"]]]],
- [12020,
- 10,
- [["procDef",
- "draw numeric entry %n %n %n %n %n %b",
- ["x", "y", "sx", "sy", "val", "down?"],
- [1, 1, 1, 1, 1, false],
- true],
- ["penColor:", ["concatenate:with:", "0x20", "000000"]],
- ["penSize:", ["getParam", "sy", "r"]],
- ["gotoX:y:",
- ["-",
- ["+", ["getParam", "x", "r"], ["\/", ["getParam", "sy", "r"], 2]],
- 1.8],
- ["-",
- ["-", ["getParam", "y", "r"], ["\/", ["getParam", "sy", "r"], 2]],
- 0.5]],
- ["putPenDown"],
- ["changeXposBy:",
- ["-", ["-", ["getParam", "sx", "r"], ["getParam", "sy", "r"]], 1]],
- ["putPenUp"],
- ["penSize:", ["-", ["getParam", "sy", "r"], 1]],
- ["penColor:", -1],
- ["gotoX:y:",
- ["-",
- ["+", ["getParam", "x", "r"], ["\/", ["getParam", "sy", "r"], 2]],
- 1],
- ["-",
- ["-", ["getParam", "y", "r"], ["\/", ["getParam", "sy", "r"], 2]],
- 1]],
- ["putPenDown"],
- ["changeXposBy:",
- ["-", ["-", ["getParam", "sx", "r"], ["getParam", "sy", "r"]], 1]],
- ["putPenUp"],
- ["penColor:", -16777216],
- ["penSize:", 1],
- ["call",
- "write %s at %n %n",
- ["getParam", "val", "r"],
- ["+", ["getParam", "x", "r"], 4],
- ["-", ["getParam", "y", "r"], 11]],
- ["doIf",
- ["getParam", "down?", "b"],
- [["gotoX:y:",
- ["-", ["+", ["getParam", "x", "r"], ["getParam", "sx", "r"]], 5.5],
- ["-", ["getParam", "y", "r"], 6.5]],
- ["putPenDown"],
- ["changeXposBy:", -4],
- ["gotoX:y:", ["+", ["xpos"], 2], ["-", ["getParam", "y", "r"], 9]],
- ["changeYposBy:", 3],
- ["changeYposBy:", -3],
- ["gotoX:y:", ["+", ["xpos"], 2], ["-", ["getParam", "y", "r"], 6.5]],
- ["putPenUp"]]]]],
- [14320,
- 10,
- [["procDef",
- "draw drop down %n %n %n %n %s",
- ["x", "y", "sx", "sy", "txt"],
- [1, 1, 1, 1, ""],
- true],
- ["penColor:", ["concatenate:with:", "0x40", "000000"]],
- ["penSize:", 1],
- ["gotoX:y:",
- ["-", ["getParam", "x", "r"], 0.5],
- ["+", ["getParam", "y", "r"], ["-", 0, ["getParam", "sy", "r"]]]],
- ["putPenDown"],
- ["changeYposBy:", ["-", ["getParam", "sy", "r"], 1]],
- ["changeXposBy:", ["-", ["getParam", "sx", "r"], 1]],
- ["penColor:", ["concatenate:with:", "0x40", "ffffff"]],
- ["changeYposBy:", ["-", 1, ["getParam", "sy", "r"]]],
- ["changeXposBy:", ["-", 1, ["getParam", "sx", "r"]]],
- ["putPenUp"],
- ["penColor:", ["concatenate:with:", "0x", "000000"]],
- ["gotoX:y:",
- ["-", ["+", ["getParam", "x", "r"], ["getParam", "sx", "r"]], 4.5],
- ["-", ["getParam", "y", "r"], 6.5]],
- ["putPenDown"],
- ["changeXposBy:", -4],
- ["gotoX:y:", ["+", ["xpos"], 2], ["-", ["getParam", "y", "r"], 9]],
- ["changeYposBy:", 3],
- ["changeYposBy:", -3],
- ["gotoX:y:", ["+", ["xpos"], 2], ["-", ["getParam", "y", "r"], 6.5]],
- ["putPenUp"],
- ["penSize:", 1],
- ["penColor:", -1],
- ["call",
- "write %s at %n %n",
- ["getParam", "txt", "r"],
- ["+", ["getParam", "x", "r"], 4],
- ["-", ["getParam", "y", "r"], 11]]]],
- [14645,
- 10,
- [["procDef",
- "Draw Nest %n %n %n %n %n col %n else? %s",
- ["x", "y", "width", "height", "n1y", "col", "n2y"],
- [1, 1, 1, 1, 1, 1, ""],
- true],
- ["call",
- "Draw Block %n %n %n %n col %n jg %n %n",
- ["getParam", "x", "r"],
- ["getParam", "y", "r"],
- ["getParam", "width", "r"],
- ["-", ["getParam", "y", "r"], ["getParam", "n1y", "r"]],
- ["getParam", "col", "r"],
- 0,
- 12],
- ["call",
- "Draw Block %n %n %n %n col %n jg %n %n",
- ["getParam", "x", "r"],
- ["+", ["-", ["getParam", "y", "r"], ["getParam", "height", "r"]], 12],
- ["getParam", "width", "r"],
- 12,
- ["getParam", "col", "r"],
- 12,
- 0],
- ["doIfElse",
- ["=", ["getParam", "n2y", "r"], ""],
- null,
- [["call",
- "Draw Block %n %n %n %n col %n jg %n %n",
- ["getParam", "x", "r"],
- ["+", ["getParam", "n2y", "r"], 12],
- ["getParam", "width", "r"],
- 12,
- ["getParam", "col", "r"],
- 12,
- 12]]],
- ["penColor:",
- ["getLine:ofList:", ["-", ["*", ["getParam", "col", "r"], 3], 1], "Colors"]],
- ["penSize:", 10],
- ["gotoX:y:",
- ["+", ["getParam", "x", "r"], 6],
- ["-", ["getParam", "y", "r"], 11]],
- ["putPenDown"],
- ["ypos:",
- ["+", ["-", ["getParam", "y", "r"], ["getParam", "height", "r"]], 11]],
- ["putPenUp"],
- ["penSize:", 1],
- ["penColor:",
- ["getLine:ofList:", ["-", ["*", ["getParam", "col", "r"], 3], 2], "Colors"]],
- ["gotoX:y:",
- ["+", ["getParam", "x", "r"], 0.5],
- ["-", ["getParam", "y", "r"], 4]],
- ["putPenDown"],
- ["ypos:",
- ["+", ["-", ["getParam", "y", "r"], ["getParam", "height", "r"]], 4]],
- ["putPenUp"],
- ["penColor:",
- ["getLine:ofList:", ["-", ["*", ["getParam", "col", "r"], 3], 0], "Colors"]],
- ["gotoX:y:", ["+", ["getParam", "x", "r"], 11.5], ["getParam", "n1y", "r"]],
- ["putPenDown"],
- ["doIfElse",
- ["=", ["getParam", "n2y", "r"], ""],
- [["ypos:",
- ["+", ["-", ["getParam", "y", "r"], ["getParam", "height", "r"]], 12]],
- ["putPenUp"]],
- [["ypos:", ["+", ["getParam", "n2y", "r"], 12]],
- ["putPenUp"],
- ["ypos:", ["getParam", "n2y", "r"]],
- ["putPenDown"],
- ["ypos:",
- ["+", ["-", ["getParam", "y", "r"], ["getParam", "height", "r"]], 12]],
- ["putPenUp"],
- ["penColor:", -1],
- ["penSize:", 1],
- ["call",
- "write %s at %n %n",
- "else",
- ["+", ["getParam", "x", "r"], 6],
- ["+", ["getParam", "n2y", "r"], 2]]]]]],
- [12436,
- 10,
- [["procDef", "Get Sizes %n %b %n %n", ["idx", "isArg?", "x", "y"], [1, false, 1, 1], true],
- ["doIfElse",
- [">", ["getParam", "idx", "r"], "0"],
- [["doIfElse",
- [">", ["getLine:ofList:", ["+", ["getParam", "idx", "r"], 6], "Script"], "0"],
- [["setVar:to:", "cc", ["getLine:ofList:", ["getParam", "idx", "r"], "Script"]],
- ["doIfElse",
- ["=", ["readVariable", "cc"], "<"],
- [["call",
- "Get Sizes %n %b %n %n",
- ["getLine:ofList:", ["+", ["getParam", "idx", "r"], 6], "Script"],
- ["not", false],
- ["+", ["getParam", "x", "r"], 4],
- ["-", ["getParam", "y", "r"], 1]],
- ["setVar:to:",
- "sx",
- ["+", ["-", ["readVariable", "sx"], ["getParam", "x", "r"]], 4]]],
- [["doIfElse",
- ["getParam", "isArg?", "b"],
- [["call",
- "Get Sizes %n %b %n %n",
- ["getLine:ofList:", ["+", ["getParam", "idx", "r"], 6], "Script"],
- ["not", false],
- ["+", ["getParam", "x", "r"], 4],
- ["-", ["getParam", "y", "r"], 1]],
- ["setVar:to:",
- "sx",
- ["+", ["-", ["readVariable", "sx"], ["getParam", "x", "r"]], 4]]],
- [["call",
- "Get Sizes %n %b %n %n",
- ["getLine:ofList:", ["+", ["getParam", "idx", "r"], 6], "Script"],
- ["not", false],
- ["+", ["getParam", "x", "r"], 4],
- ["-", ["getParam", "y", "r"], 2]],
- ["setVar:to:",
- "sx",
- ["+", ["-", ["readVariable", "sx"], ["getParam", "x", "r"]], 5]]]]]],
- ["call", "sy = Max Height of params %n", ["getLine:ofList:", ["+", ["getParam", "idx", "r"], 6], "Script"]],
- ["setVar:to:", "cc", ["getLine:ofList:", ["getParam", "idx", "r"], "Script"]],
- ["doIfElse",
- ["=", ["readVariable", "cc"], "hat"],
- [["call",
- "Center Y %n height %n",
- ["getLine:ofList:", ["+", ["getParam", "idx", "r"], 6], "Script"],
- ["+", ["readVariable", "sy"], 14]],
- ["setVar:to:", "sy", ["-", ["readVariable", "sy"], 3]]],
- [["call",
- "Center Y %n height %n",
- ["getLine:ofList:", ["+", ["getParam", "idx", "r"], 6], "Script"],
- ["readVariable", "sy"]],
- ["doIfElse",
- ["|", ["getParam", "isArg?", "b"], ["=", ["readVariable", "cc"], "<"]],
- [["setVar:to:", "sy", ["+", ["readVariable", "sy"], 2]]],
- [["setVar:to:", "sy", ["+", ["readVariable", "sy"], 4]]]]]],
- ["doIfElse",
- ["=", ["readVariable", "cc"], "nst1"],
- [["append:toList:", ["readVariable", "sx"], "Stack"],
- ["append:toList:", ["readVariable", "sy"], "Stack"],
- ["call",
- "Get Sizes %n %b %n %n",
- ["getLine:ofList:", ["+", ["getParam", "idx", "r"], 7], "Script"],
- false,
- ["+", ["getParam", "x", "r"], 12],
- ["-", ["getParam", "y", "r"], ["readVariable", "sy"]]],
- ["doIfElse",
- ["=",
- ["readVariable", "sy"],
- ["-", ["getParam", "y", "r"], ["getLine:ofList:", "last", "Stack"]]],
- [["setVar:to:", "sy", ["+", ["getLine:ofList:", "last", "Stack"], 18]]],
- [["setVar:to:",
- "sy",
- ["+", ["-", ["getParam", "y", "r"], ["readVariable", "sy"]], 12]]]],
- ["deleteLine:ofList:", "last", "Stack"],
- ["setVar:to:", "sx", ["getLine:ofList:", "last", "Stack"]],
- ["deleteLine:ofList:", "last", "Stack"]],
- [["doIfElse",
- ["=", ["readVariable", "cc"], "nst2"],
- [["append:toList:", ["readVariable", "sx"], "Stack"],
- ["append:toList:", ["readVariable", "sy"], "Stack"],
- ["call",
- "Get Sizes %n %b %n %n",
- ["getLine:ofList:", ["+", ["getParam", "idx", "r"], 7], "Script"],
- false,
- ["+", ["getParam", "x", "r"], 12],
- ["-", ["getParam", "y", "r"], ["readVariable", "sy"]]],
- ["doIfElse",
- ["=",
- ["readVariable", "sy"],
- ["-", ["getParam", "y", "r"], ["getLine:ofList:", "last", "Stack"]]],
- [["setVar:to:", "sy", ["+", ["getLine:ofList:", "last", "Stack"], 18]]],
- [["setVar:to:",
- "sy",
- ["+", ["-", ["getParam", "y", "r"], ["readVariable", "sy"]], 12]]]],
- ["deleteLine:ofList:", "last", "Stack"],
- ["setVar:to:", "sx", ["getLine:ofList:", "last", "Stack"]],
- ["deleteLine:ofList:", "last", "Stack"],
- ["append:toList:", ["readVariable", "sx"], "Stack"],
- ["append:toList:", ["readVariable", "sy"], "Stack"],
- ["call",
- "Get Sizes %n %b %n %n",
- ["getLine:ofList:", ["+", ["getParam", "idx", "r"], 8], "Script"],
- false,
- ["+", ["getParam", "x", "r"], 12],
- ["-", ["getParam", "y", "r"], ["readVariable", "sy"]]],
- ["doIfElse",
- ["=",
- ["readVariable", "sy"],
- ["-", ["getParam", "y", "r"], ["getLine:ofList:", "last", "Stack"]]],
- [["setVar:to:", "sy", ["+", ["getLine:ofList:", "last", "Stack"], 18]]],
- [["setVar:to:",
- "sy",
- ["+", ["-", ["getParam", "y", "r"], ["readVariable", "sy"]], 12]]]],
- ["deleteLine:ofList:", "last", "Stack"],
- ["setVar:to:", "sx", ["getLine:ofList:", "last", "Stack"]],
- ["deleteLine:ofList:", "last", "Stack"]],
- [["doIf", ["=", ["readVariable", "cc"], "---"], [["setVar:to:", "sy", "4"]]]]]]]],
- [["doIfElse",
- ["=", ["getLine:ofList:", ["+", ["getParam", "idx", "r"], 5], "Script"], ""],
- [["call", "Len = Width of %s", ["getLine:ofList:", ["getParam", "idx", "r"], "Script"]]],
- [["call", "Len = Width of %s", ["getLine:ofList:", ["+", ["getParam", "idx", "r"], 5], "Script"]]]],
- ["setVar:to:", "sx", ["+", 2, ["readVariable", "Len"]]],
- ["setVar:to:", "sy", "11"],
- ["setVar:to:", "cc", ["getLine:ofList:", ["getParam", "idx", "r"], "Script"]],
- ["doIfElse",
- ["|", ["=", ["readVariable", "cc"], "t"], ["=", ["readVariable", "cc"], "?"]],
- [["changeVar:by:", "sy", 4],
- ["doIfElse",
- [">", ["getLine:ofList:", ["+", ["getParam", "idx", "r"], 10], "Script"], "0"],
- [["changeVar:by:", "sx", 12]],
- [["changeVar:by:", "sx", 5]]]],
- [["doIfElse",
- ["|", ["=", ["readVariable", "cc"], "n"], ["=", ["readVariable", "cc"], "o"]],
- [["changeVar:by:", "sy", 4],
- ["doIfElse",
- [">", ["getLine:ofList:", ["+", ["getParam", "idx", "r"], 10], "Script"], "0"],
- [["changeVar:by:", "sx", 14]],
- [["changeVar:by:", "sx", 6]]]],
- [["doIfElse",
- ["=", ["readVariable", "cc"], "cb"],
- [["changeVar:by:", "sy", 4], ["changeVar:by:", "sx", 11]],
- null]]]]]]],
- ["setLine:ofList:to:", ["+", ["getParam", "idx", "r"], 1], "Script", ["getParam", "x", "r"]],
- ["setLine:ofList:to:", ["+", ["getParam", "idx", "r"], 2], "Script", ["getParam", "y", "r"]],
- ["setLine:ofList:to:", ["+", ["getParam", "idx", "r"], 3], "Script", ["readVariable", "sx"]],
- ["setLine:ofList:to:", ["+", ["getParam", "idx", "r"], 4], "Script", ["readVariable", "sy"]],
- ["setVar:to:", "idx", ["getLine:ofList:", ["+", ["getParam", "idx", "r"], 9], "Script"]],
- ["doIfElse",
- [">", ["readVariable", "idx"], "0"],
- [["doIfElse",
- ["getParam", "isArg?", "b"],
- [["call",
- "Get Sizes %n %b %n %n",
- ["readVariable", "idx"],
- ["not", false],
- ["+", ["getParam", "x", "r"], ["+", ["readVariable", "sx"], 3]],
- ["getParam", "y", "r"]]],
- [["call",
- "Get Sizes %n %b %n %n",
- ["readVariable", "idx"],
- false,
- ["getParam", "x", "r"],
- ["-", ["getParam", "y", "r"], ["readVariable", "sy"]]]]]],
- [["changeVar:by:", "sx", ["getParam", "x", "r"]],
- ["setVar:to:", "sy", ["-", ["getParam", "y", "r"], ["readVariable", "sy"]]]]]],
- [["setVar:to:", "sx", ["getParam", "x", "r"]],
- ["setVar:to:", "sy", ["getParam", "y", "r"]]]],
- ["setVar:to:", "idx", ["getParam", "idx", "r"]]]],
- [15584,
- 10,
- [["procDef",
- "Draw Block %n %n %n %n col %n jg %n %n",
- ["x", "y", "width", "height", "col", "tox", "box"],
- [1, 1, 1, 1, 1, 1, 1],
- true],
- ["penColor:",
- ["getLine:ofList:", ["-", ["*", ["getParam", "col", "r"], 3], 2], "Colors"]],
- ["penSize:", 3],
- ["gotoX:y:",
- ["+", ["getParam", "x", "r"], 1.5],
- ["+", ["-", ["getParam", "y", "r"], ["getParam", "height", "r"]], 1.5]],
- ["putPenDown"],
- ["changeYposBy:", ["-", ["getParam", "height", "r"], 3]],
- ["changeXposBy:", ["+", 6, ["getParam", "tox", "r"]]],
- ["changeYposBy:", -2],
- ["changeXposBy:", 11],
- ["changeYposBy:", 2],
- ["xpos:",
- ["+", ["getParam", "x", "r"], ["-", ["getParam", "width", "r"], 2.5]]],
- ["penColor:",
- ["getLine:ofList:", ["-", ["*", ["getParam", "col", "r"], 3], 0], "Colors"]],
- ["changeYposBy:", ["-", 3, ["getParam", "height", "r"]]],
- ["xpos:",
- ["+", ["getParam", "x", "r"], ["+", ["getParam", "box", "r"], 17]]],
- ["changeYposBy:", -2],
- ["changeXposBy:", -7],
- ["changeYposBy:", 2],
- ["xpos:", ["+", ["getParam", "x", "r"], 1.5]],
- ["putPenUp"],
- ["penColor:",
- ["getLine:ofList:", ["-", ["*", ["getParam", "col", "r"], 3], 1], "Colors"]],
- ["penSize:", 7],
- ["gotoX:y:",
- ["+", ["getParam", "x", "r"], 4.5],
- ["-", ["getParam", "y", "r"], 4.5]],
- ["putPenDown"],
- ["changeXposBy:", ["+", ["getParam", "tox", "r"], 1]],
- ["gotoX:y:", ["+", ["xpos"], 2], ["-", ["ypos"], 2]],
- ["changeXposBy:", 11],
- ["gotoX:y:", ["+", ["xpos"], 2], ["+", ["ypos"], 2]],
- ["xpos:",
- ["+", ["getParam", "x", "r"], ["-", ["getParam", "width", "r"], 5.5]]],
- ["changeYposBy:", ["-", 9, ["getParam", "height", "r"]]],
- ["xpos:",
- ["+", ["getParam", "x", "r"], ["+", ["getParam", "box", "r"], 16]]],
- ["gotoX:y:", ["-", ["xpos"], 2], ["-", ["ypos"], 2]],
- ["changeXposBy:", -2],
- ["gotoX:y:", ["-", ["xpos"], 2], ["+", ["ypos"], 2]],
- ["xpos:", ["+", ["getParam", "x", "r"], 4.5]],
- ["ypos:", ["-", ["getParam", "y", "r"], 4.5]],
- ["putPenUp"],
- ["doIf",
- [">", ["getParam", "height", "r"], "12"],
- [["penSize:", ["-", ["getParam", "height", "r"], 12]],
- ["setVar:to:", "Len", ["\/", ["-", ["getParam", "height", "r"], 12], 2]],
- ["gotoX:y:",
- ["+", ["getParam", "x", "r"], ["+", ["readVariable", "Len"], 4]],
- ["-", ["getParam", "y", "r"], ["\/", ["getParam", "height", "r"], 2]]],
- ["putPenDown"],
- ["xpos:",
- ["+",
- ["getParam", "x", "r"],
- ["-", ["getParam", "width", "r"], ["+", ["readVariable", "Len"], 4]]]],
- ["putPenUp"]]]]],
- [15111,
- 10,
- [["procDef",
- "Draw Hat %n %n %n %n %n",
- ["x", "y", "width", "height", "col"],
- [1, 1, 1, 1, 1],
- true],
- ["setVar:to:", "#c", ["-", ["getParam", "height", "r"], 7]],
- ["penColor:",
- ["getLine:ofList:", ["-", ["*", ["getParam", "col", "r"], 3], 2], "Colors"]],
- ["penSize:", 3],
- ["gotoX:y:",
- ["+", ["getParam", "x", "r"], 1.5],
- ["+", ["-", ["getParam", "y", "r"], ["getParam", "height", "r"]], 1.5]],
- ["putPenDown"],
- ["changeYposBy:", ["-", ["getParam", "height", "r"], 10]],
- ["gotoX:y:", ["+", ["xpos"], 10], ["+", ["ypos"], 5]],
- ["gotoX:y:", ["+", ["xpos"], 10], ["+", ["ypos"], 2]],
- ["gotoX:y:", ["+", ["xpos"], 10], ["ypos"]],
- ["gotoX:y:", ["+", ["xpos"], 10], ["-", ["ypos"], 2]],
- ["gotoX:y:", ["+", ["xpos"], 10], ["-", ["ypos"], 5]],
- ["xpos:",
- ["+", ["getParam", "x", "r"], ["-", ["getParam", "width", "r"], 3]]],
- ["penColor:",
- ["getLine:ofList:", ["-", ["*", ["getParam", "col", "r"], 3], 0], "Colors"]],
- ["changeYposBy:", ["-", 10, ["getParam", "height", "r"]]],
- ["changeXposBy:", ["-", 19, ["getParam", "width", "r"]]],
- ["changeYposBy:", -2],
- ["changeXposBy:", -7],
- ["changeYposBy:", 2],
- ["changeXposBy:", -7],
- ["putPenUp"],
- ["penColor:",
- ["getLine:ofList:", ["-", ["*", ["getParam", "col", "r"], 3], 1], "Colors"]],
- ["penSize:", 8],
- ["gotoX:y:",
- ["+", ["getParam", "x", "r"], 6],
- ["-", ["getParam", "y", "r"], 11]],
- ["putPenDown"],
- ["gotoX:y:", ["+", ["xpos"], 13], ["+", ["ypos"], 5]],
- ["gotoX:y:", ["+", ["xpos"], 14], ["ypos"]],
- ["gotoX:y:", ["+", ["xpos"], 13], ["-", ["ypos"], 5]],
- ["putPenUp"],
- ["penSize:", ["-", ["getParam", "height", "r"], 9]],
- ["gotoX:y:",
- ["+",
- ["getParam", "x", "r"],
- ["\/", ["-", ["getParam", "height", "r"], 9], 2]],
- ["-",
- ["-", ["getParam", "y", "r"], ["\/", ["readVariable", "#c"], 2]],
- 7]],
- ["putPenDown"],
- ["putPenUp"],
- ["gotoX:y:", ["+", ["getParam", "x", "r"], 13], ["-", ["ypos"], 2]],
- ["putPenDown"],
- ["putPenUp"],
- ["gotoX:y:", ["+", ["getParam", "x", "r"], 19], ["+", ["ypos"], 2]],
- ["putPenDown"],
- ["xpos:",
- ["+",
- ["getParam", "x", "r"],
- ["-", ["getParam", "width", "r"], ["\/", ["readVariable", "#c"], 2]]]],
- ["putPenUp"],
- ["penSize:", ["\/", ["-", ["getParam", "height", "r"], 9], 2]],
- ["gotoX:y:",
- ["+",
- ["+", ["getParam", "x", "r"], ["\/", ["readVariable", "#c"], 4]],
- 0.5],
- ["-",
- ["-", ["getParam", "y", "r"], ["\/", ["readVariable", "#c"], 4]],
- 7]],
- ["putPenDown"],
- ["ypos:",
- ["-",
- ["-", ["getParam", "y", "r"], ["\/", ["readVariable", "#c"], 1.33]],
- 7]],
- ["putPenUp"],
- ["gotoX:y:",
- ["+",
- ["-", ["getParam", "x", "r"], ["\/", ["readVariable", "#c"], 4]],
- ["-", ["getParam", "width", "r"], 1]],
- ["-",
- ["-", ["getParam", "y", "r"], ["\/", ["readVariable", "#c"], 4]],
- 7]],
- ["putPenDown"],
- ["ypos:",
- ["-",
- ["-", ["getParam", "y", "r"], ["\/", ["readVariable", "#c"], 1.33]],
- 6.5]],
- ["putPenUp"]]],
- [10303,
- 10,
- [["procDef",
- "draw text entry %n %n %n %n %s %b",
- ["x", "y", "sx", "sy", "txt", "down?"],
- [1, 1, 1, 1, "", false],
- true],
- ["penColor:", -1],
- ["penSize:", ["\/", ["getParam", "sy", "r"], 2]],
- ["gotoX:y:",
- ["-",
- ["+", ["getParam", "x", "r"], ["\/", ["getParam", "sy", "r"], 4]],
- 0.5],
- ["-",
- ["-", ["getParam", "y", "r"], ["\/", ["getParam", "sy", "r"], 4]],
- 1]],
- ["putPenDown"],
- ["xpos:",
- ["-",
- ["-",
- ["+", ["getParam", "x", "r"], ["getParam", "sx", "r"]],
- ["\/", ["getParam", "sy", "r"], 4]],
- 1]],
- ["changeYposBy:", ["\/", ["getParam", "sy", "r"], -2]],
- ["xpos:",
- ["-",
- ["+", ["getParam", "x", "r"], ["\/", ["getParam", "sy", "r"], 4]],
- 0.5]],
- ["changeYposBy:", ["\/", ["getParam", "sy", "r"], 2]],
- ["putPenUp"],
- ["penColor:", ["concatenate:with:", "0x40", "000000"]],
- ["penSize:", 1],
- ["gotoX:y:",
- ["-", ["getParam", "x", "r"], 0.5],
- ["+", ["getParam", "y", "r"], ["-", 0.5, ["getParam", "sy", "r"]]]],
- ["putPenDown"],
- ["changeYposBy:", ["-", ["getParam", "sy", "r"], 1]],
- ["xpos:",
- ["+", ["getParam", "x", "r"], ["-", ["getParam", "sx", "r"], 0.5]]],
- ["penColor:", ["concatenate:with:", "0x60", "ffffff"]],
- ["changeYposBy:", ["-", 1, ["getParam", "sy", "r"]]],
- ["xpos:", ["-", ["getParam", "x", "r"], 0.5]],
- ["putPenUp"],
- ["penColor:", -16777216],
- ["call",
- "write %s at %n %n",
- ["getParam", "txt", "r"],
- ["+", ["getParam", "x", "r"], 4],
- ["-", ["getParam", "y", "r"], 11]],
- ["doIf",
- ["getParam", "down?", "b"],
- [["gotoX:y:",
- ["-", ["+", ["getParam", "x", "r"], ["getParam", "sx", "r"]], 3.5],
- ["-", ["getParam", "y", "r"], 6.5]],
- ["putPenDown"],
- ["changeXposBy:", -4],
- ["gotoX:y:", ["+", ["xpos"], 2], ["-", ["getParam", "y", "r"], 9]],
- ["changeYposBy:", 3],
- ["changeYposBy:", -3],
- ["gotoX:y:", ["+", ["xpos"], 2], ["-", ["getParam", "y", "r"], 6.5]],
- ["putPenUp"]]]]],
- [12963,
- 10,
- [["procDef", "Offset Y %n %n %b", ["idx", "y", "first?"], [1, 1, false], true],
- ["doIf",
- [">", ["getParam", "idx", "r"], "0"],
- [["doIfElse",
- ["=", ["getParam", "x", "r"], "0"],
- [["setLine:ofList:to:",
- ["+", ["getParam", "idx", "r"], 2],
- "Script",
- ["+",
- ["getLine:ofList:", ["+", ["getParam", "idx", "r"], 2], "Script"],
- ["getParam", "y", "r"]]]],
- [["setLine:ofList:to:",
- ["+", ["getParam", "idx", "r"], 1],
- "Script",
- ["+",
- ["getLine:ofList:", ["+", ["getParam", "idx", "r"], 1], "Script"],
- ["getParam", "x", "r"]]]]],
- ["call",
- "Offset Y %n %n %b",
- ["getLine:ofList:", ["+", ["getParam", "idx", "r"], 6], "Script"],
- ["getParam", "y", "r"],
- false],
- ["call",
- "Offset Y %n %n %b",
- ["getLine:ofList:", ["+", ["getParam", "idx", "r"], 7], "Script"],
- ["getParam", "y", "r"],
- false],
- ["call",
- "Offset Y %n %n %b",
- ["getLine:ofList:", ["+", ["getParam", "idx", "r"], 8], "Script"],
- ["getParam", "y", "r"],
- false],
- ["doIfElse",
- ["getParam", "first?", "b"],
- null,
- [["call",
- "Offset Y %n %n %b",
- ["getLine:ofList:", ["+", ["getParam", "idx", "r"], 9], "Script"],
- ["getParam", "y", "r"],
- false]]]]]]],
- [13503,
- 404,
- [["procDef",
- "draw logic %n %n %n %n %n txt %s",
- ["x", "y", "sx", "sy", "col", "txt"],
- [1, 1, 1, 1, 1, ""],
- true],
- ["penColor:",
- ["getLine:ofList:", ["-", ["*", ["getParam", "col", "r"], 3], 2], "Colors"]],
- ["penSize:", 2],
- ["gotoX:y:",
- ["-", ["getParam", "x", "r"], 1],
- ["-", ["getParam", "y", "r"], ["\/", ["getParam", "sy", "r"], 2]]],
- ["putPenDown"],
- ["gotoX:y:",
- ["+",
- ["getParam", "x", "r"],
- ["-", ["\/", ["getParam", "sy", "r"], 2], 2]],
- ["-", ["getParam", "y", "r"], 1]],
- ["xpos:",
- ["-",
- ["+", ["getParam", "x", "r"], ["getParam", "sx", "r"]],
- ["-", ["\/", ["getParam", "sy", "r"], 2], 3]]],
- ["penColor:",
- ["getLine:ofList:", ["-", ["*", ["getParam", "col", "r"], 3], 1], "Colors"]],
- ["gotoX:y:",
- ["+", ["getParam", "x", "r"], ["getParam", "sx", "r"]],
- ["-", ["getParam", "y", "r"], ["\/", ["getParam", "sy", "r"], 2]]],
- ["penColor:",
- ["getLine:ofList:", ["-", ["*", ["getParam", "col", "r"], 3], 0], "Colors"]],
- ["gotoX:y:",
- ["-",
- ["+", ["getParam", "x", "r"], ["getParam", "sx", "r"]],
- ["-", ["\/", ["getParam", "sy", "r"], 2], 3]],
- ["-", ["getParam", "y", "r"], ["-", ["getParam", "sy", "r"], 1]]],
- ["xpos:",
- ["+",
- ["getParam", "x", "r"],
- ["-", ["\/", ["getParam", "sy", "r"], 2], 2]]],
- ["penColor:",
- ["getLine:ofList:", ["-", ["*", ["getParam", "col", "r"], 3], 1], "Colors"]],
- ["gotoX:y:",
- ["-", ["getParam", "x", "r"], 1],
- ["-", ["getParam", "y", "r"], ["\/", ["getParam", "sy", "r"], 2]]],
- ["putPenUp"],
- ["changeXposBy:", 3],
- ["penSize:", 5],
- ["putPenDown"],
- ["putPenUp"],
- ["gotoX:y:",
- ["-", ["+", ["getParam", "x", "r"], ["getParam", "sx", "r"]], 4],
- ["-", ["getParam", "y", "r"], ["\/", ["getParam", "sy", "r"], 2]]],
- ["putPenDown"],
- ["putPenUp"],
- ["penSize:", ["-", ["getParam", "sy", "r"], 2]],
- ["penColor:",
- ["getLine:ofList:", ["-", ["*", ["getParam", "col", "r"], 3], 1], "Colors"]],
- ["gotoX:y:",
- ["+",
- ["+", ["getParam", "x", "r"], ["\/", ["getParam", "sy", "r"], 2]],
- 2],
- ["-",
- ["-", ["getParam", "y", "r"], ["\/", ["getParam", "sy", "r"], 2]],
- 0]],
- ["putPenDown"],
- ["xpos:",
- ["+",
- ["getParam", "x", "r"],
- ["-",
- ["-", ["getParam", "sx", "r"], ["\/", ["getParam", "sy", "r"], 2]],
- 2]]],
- ["putPenUp"],
- ["doIf",
- ["not", ["=", ["getParam", "txt", "r"], ""]],
- [["penSize:", 1],
- ["penColor:", -1],
- ["call",
- "write %s at %n %n",
- ["getParam", "txt", "r"],
- ["+", ["getParam", "x", "r"], 4],
- ["-", ["getParam", "y", "r"], 11]]]]]],
- [11051,
- 10,
- [["procDef", "Draw %n just me %b %b", ["idx", "just me?", "noclip?"], [1, false, false], true],
- ["setVar:to:", "cc", ["getLine:ofList:", ["getParam", "idx", "r"], "Script"]],
- ["setVar:to:", "#ddy", ["getLine:ofList:", ["+", ["getParam", "idx", "r"], 2], "Script"]],
- ["doIf",
- ["&",
- ["not", ["getParam", "noclip?", "b"]],
- ["<", ["readVariable", "#ddy"], ["readVariable", "#clip_y2"]]],
- [["stopScripts", "this script"]]],
- ["setVar:to:", "sy", ["getLine:ofList:", ["+", ["getParam", "idx", "r"], 4], "Script"]],
- ["doIf",
- ["|",
- ["getParam", "noclip?", "b"],
- ["<", ["-", ["readVariable", "#ddy"], ["readVariable", "sy"]], ["readVariable", "#clip_y"]]],
- [["setVar:to:", "sx", ["getLine:ofList:", ["+", ["getParam", "idx", "r"], 3], "Script"]],
- ["setVar:to:", "_cc", ["getLine:ofList:", ["+", ["getParam", "idx", "r"], 5], "Script"]],
- ["doIfElse",
- ["=", ["readVariable", "cc"], "b"],
- [["call",
- "Draw Block %n %n %n %n col %n jg %n %n",
- ["getLine:ofList:", ["+", ["getParam", "idx", "r"], 1], "Script"],
- ["getLine:ofList:", ["+", ["getParam", "idx", "r"], 2], "Script"],
- ["readVariable", "sx"],
- ["readVariable", "sy"],
- ["getLine:ofList:", ["+", ["getParam", "idx", "r"], 10], "Script"],
- 0,
- 0]],
- [["doIfElse",
- ["=", ["readVariable", "cc"], "hat"],
- [["call",
- "Draw Hat %n %n %n %n %n",
- ["getLine:ofList:", ["+", ["getParam", "idx", "r"], 1], "Script"],
- ["getLine:ofList:", ["+", ["getParam", "idx", "r"], 2], "Script"],
- ["readVariable", "sx"],
- ["readVariable", "sy"],
- ["getLine:ofList:", ["+", ["getParam", "idx", "r"], 10], "Script"]]],
- [["doIfElse",
- ["=", ["readVariable", "cc"], "nst1"],
- [["setVar:to:", "idx", ["getLine:ofList:", ["+", ["getParam", "idx", "r"], 7], "Script"]],
- ["doIfElse",
- [">", ["readVariable", "idx"], "0"],
- [["setVar:to:", "idx", ["getLine:ofList:", ["+", ["readVariable", "idx"], 2], "Script"]]],
- [["setVar:to:",
- "idx",
- ["+",
- ["-",
- ["getLine:ofList:", ["+", ["getParam", "idx", "r"], 2], "Script"],
- ["readVariable", "sy"]],
- 18]]]],
- ["call",
- "Draw Nest %n %n %n %n %n col %n else? %s",
- ["getLine:ofList:", ["+", ["getParam", "idx", "r"], 1], "Script"],
- ["getLine:ofList:", ["+", ["getParam", "idx", "r"], 2], "Script"],
- ["readVariable", "sx"],
- ["readVariable", "sy"],
- ["readVariable", "idx"],
- ["getLine:ofList:", ["+", ["getParam", "idx", "r"], 10], "Script"],
- ""]],
- [["doIfElse",
- ["=", ["readVariable", "cc"], "nst2"],
- [["setVar:to:", "idx", ["getLine:ofList:", ["+", ["getParam", "idx", "r"], 7], "Script"]],
- ["setVar:to:", "#c", ["getLine:ofList:", ["+", ["getParam", "idx", "r"], 8], "Script"]],
- ["doIfElse",
- [">", ["readVariable", "idx"], "0"],
- [["setVar:to:", "idx", ["getLine:ofList:", ["+", ["readVariable", "idx"], 2], "Script"]],
- ["doIfElse",
- [">", ["readVariable", "#c"], "0"],
- [["setVar:to:", "#c", ["getLine:ofList:", ["+", ["readVariable", "#c"], 2], "Script"]]],
- [["setVar:to:",
- "#c",
- ["+",
- ["-",
- ["getLine:ofList:", ["+", ["getParam", "idx", "r"], 2], "Script"],
- ["readVariable", "sy"]],
- 18]]]]],
- [["doIfElse",
- [">", ["readVariable", "#c"], "0"],
- [["setVar:to:", "#c", ["getLine:ofList:", ["+", ["readVariable", "#c"], 2], "Script"]],
- ["setVar:to:", "idx", ["+", ["readVariable", "#c"], 18]]],
- [["setVar:to:",
- "#c",
- ["+",
- ["-",
- ["getLine:ofList:", ["+", ["getParam", "idx", "r"], 2], "Script"],
- ["readVariable", "sy"]],
- 18]],
- ["setVar:to:", "idx", ["+", ["readVariable", "#c"], 18]]]]]],
- ["call",
- "Draw Nest %n %n %n %n %n col %n else? %s",
- ["getLine:ofList:", ["+", ["getParam", "idx", "r"], 1], "Script"],
- ["getLine:ofList:", ["+", ["getParam", "idx", "r"], 2], "Script"],
- ["readVariable", "sx"],
- ["readVariable", "sy"],
- ["readVariable", "idx"],
- ["getLine:ofList:", ["+", ["getParam", "idx", "r"], 10], "Script"],
- ["readVariable", "#c"]]],
- [["doIfElse",
- ["=", ["readVariable", "cc"], "("],
- [["call",
- "draw operator %n %n %n %n %n txt %s",
- ["getLine:ofList:", ["+", ["getParam", "idx", "r"], 1], "Script"],
- ["getLine:ofList:", ["+", ["getParam", "idx", "r"], 2], "Script"],
- ["readVariable", "sx"],
- ["readVariable", "sy"],
- ["getLine:ofList:", ["+", ["getParam", "idx", "r"], 10], "Script"],
- ""]],
- [["doIfElse",
- ["=", ["readVariable", "cc"], "<"],
- [["call",
- "draw logic %n %n %n %n %n txt %s",
- ["getLine:ofList:", ["+", ["getParam", "idx", "r"], 1], "Script"],
- ["getLine:ofList:", ["+", ["getParam", "idx", "r"], 2], "Script"],
- ["readVariable", "sx"],
- ["readVariable", "sy"],
- ["getLine:ofList:", ["+", ["getParam", "idx", "r"], 10], "Script"],
- ""]],
- [["doIfElse",
- ["=", ["readVariable", "cc"], ""],
- [["penSize:", 1],
- ["penColor:", -1],
- ["doIfElse",
- ["=", ["readVariable", "_cc"], ""],
- null,
- [["call",
- "write %s at %n %n",
- ["readVariable", "_cc"],
- ["+", ["getLine:ofList:", ["+", ["getParam", "idx", "r"], 1], "Script"], 2],
- ["-", ["getLine:ofList:", ["+", ["getParam", "idx", "r"], 2], "Script"], 9]]]]],
- [["doIfElse",
- ["=", ["readVariable", "cc"], "t"],
- [["setVar:to:",
- "cc",
- ["letter:of:", 1, ["getLine:ofList:", ["+", ["getParam", "idx", "r"], 10], "Script"]]],
- ["doIfElse",
- ["=", ["readVariable", "cc"], ""],
- [["call",
- "draw text entry %n %n %n %n %s %b",
- ["getLine:ofList:", ["+", ["getParam", "idx", "r"], 1], "Script"],
- ["getLine:ofList:", ["+", ["getParam", "idx", "r"], 2], "Script"],
- ["readVariable", "sx"],
- ["-", ["readVariable", "sy"], 2],
- ["readVariable", "_cc"],
- false]],
- [["doIfElse",
- ["=", ["readVariable", "cc"], "?"],
- [["call",
- "draw text entry %n %n %n %n %s %b",
- ["getLine:ofList:", ["+", ["getParam", "idx", "r"], 1], "Script"],
- ["getLine:ofList:", ["+", ["getParam", "idx", "r"], 2], "Script"],
- ["readVariable", "sx"],
- ["-", ["readVariable", "sy"], 2],
- ["readVariable", "_cc"],
- ["not", false]]],
- [["call",
- "draw drop down %n %n %n %n %s",
- ["getLine:ofList:", ["+", ["getParam", "idx", "r"], 1], "Script"],
- ["getLine:ofList:", ["+", ["getParam", "idx", "r"], 2], "Script"],
- ["readVariable", "sx"],
- ["-", ["readVariable", "sy"], 2],
- ["readVariable", "_cc"]]]]]]],
- [["doIfElse",
- ["=", ["readVariable", "cc"], "n"],
- [["setVar:to:",
- "cc",
- ["letter:of:", 1, ["getLine:ofList:", ["+", ["getParam", "idx", "r"], 10], "Script"]]],
- ["call",
- "draw numeric entry %n %n %n %n %n %b",
- ["getLine:ofList:", ["+", ["getParam", "idx", "r"], 1], "Script"],
- ["getLine:ofList:", ["+", ["getParam", "idx", "r"], 2], "Script"],
- ["readVariable", "sx"],
- ["-", ["readVariable", "sy"], 2],
- ["readVariable", "_cc"],
- [">", ["readVariable", "cc"], ""]]],
- [["doIfElse",
- ["=", ["readVariable", "cc"], "o"],
- [["call",
- "draw operator %n %n %n %n %n txt %s",
- ["getLine:ofList:", ["+", ["getParam", "idx", "r"], 1], "Script"],
- ["getLine:ofList:", ["+", ["getParam", "idx", "r"], 2], "Script"],
- ["readVariable", "sx"],
- ["readVariable", "sy"],
- ["getLine:ofList:", ["+", ["getParam", "idx", "r"], 10], "Script"],
- ["readVariable", "_cc"]]],
- [["doIfElse",
- ["=", ["readVariable", "cc"], "?"],
- [["call",
- "draw boolean entry %n %n %n %n",
- ["getLine:ofList:", ["+", ["getParam", "idx", "r"], 1], "Script"],
- ["getLine:ofList:", ["+", ["getParam", "idx", "r"], 2], "Script"],
- ["readVariable", "sx"],
- ["readVariable", "sy"]]],
- [["doIfElse",
- ["=", ["readVariable", "cc"], "bt"],
- [["penSize:", 1],
- ["penColor:", -11645362],
- ["call",
- "write %s at %n %n",
- ["readVariable", "_cc"],
- ["+", ["getLine:ofList:", ["+", ["getParam", "idx", "r"], 1], "Script"], 2],
- ["-", ["getLine:ofList:", ["+", ["getParam", "idx", "r"], 2], "Script"], 9]]],
- null]]]]]]]]]]]]]]]]]]]]]]],
- ["setVar:to:", "idx", ["getLine:ofList:", ["+", ["getParam", "idx", "r"], 6], "Script"]],
- ["doIf",
- [">", ["readVariable", "idx"], "0"],
- [["call", "Draw %n just me %b %b", ["readVariable", "idx"], false, ["not", false]]]],
- ["setVar:to:", "idx", ["getLine:ofList:", ["+", ["getParam", "idx", "r"], 7], "Script"]],
- ["doIf",
- [">", ["readVariable", "idx"], "0"],
- [["call", "Draw %n just me %b %b", ["readVariable", "idx"], false, ["getParam", "noclip?", "b"]]]],
- ["setVar:to:", "idx", ["getLine:ofList:", ["+", ["getParam", "idx", "r"], 8], "Script"]],
- ["doIf",
- [">", ["readVariable", "idx"], "0"],
- [["call", "Draw %n just me %b %b", ["readVariable", "idx"], false, ["getParam", "noclip?", "b"]]]]]],
- ["setVar:to:", "idx", ["getLine:ofList:", ["+", ["getParam", "idx", "r"], 9], "Script"]],
- ["doIf",
- ["&", [">", ["readVariable", "idx"], "0"], ["not", ["getParam", "just me?", "b"]]],
- [["call", "Draw %n just me %b %b", ["readVariable", "idx"], false, ["getParam", "noclip?", "b"]]]]]],
- [6238,
- 374,
- [["procDef", "draw boolean entry %n %n %n %n", ["x", "y", "sx", "sy"], [1, 1, 1, 1], true],
- ["penColor:", ["concatenate:with:", "0x60", "000000"]],
- ["penSize:", 1],
- ["gotoX:y:",
- ["-", ["getParam", "x", "r"], 1],
- ["-", ["getParam", "y", "r"], ["\/", ["getParam", "sy", "r"], 2]]],
- ["putPenDown"],
- ["gotoX:y:",
- ["+",
- ["getParam", "x", "r"],
- ["-", ["\/", ["getParam", "sy", "r"], 2], 2]],
- ["-", ["getParam", "y", "r"], 1.5]],
- ["xpos:",
- ["-",
- ["+", ["getParam", "x", "r"], ["getParam", "sx", "r"]],
- ["-", ["\/", ["getParam", "sy", "r"], 2], 1]]],
- ["penColor:", ["concatenate:with:", "0x20", "000000"]],
- ["gotoX:y:",
- ["+", ["getParam", "x", "r"], ["getParam", "sx", "r"]],
- ["-", ["getParam", "y", "r"], ["\/", ["getParam", "sy", "r"], 2]]],
- ["penColor:", ["concatenate:with:", "0x60", "ffffff"]],
- ["gotoX:y:",
- ["-",
- ["+", ["getParam", "x", "r"], ["getParam", "sx", "r"]],
- ["-", ["\/", ["getParam", "sy", "r"], 2], 1]],
- ["-", ["getParam", "y", "r"], ["-", ["getParam", "sy", "r"], 1.5]]],
- ["xpos:",
- ["+",
- ["getParam", "x", "r"],
- ["-", ["\/", ["getParam", "sy", "r"], 2], 2]]],
- ["penColor:", ["concatenate:with:", "0x20", "000000"]],
- ["gotoX:y:",
- ["-", ["getParam", "x", "r"], 1],
- ["-", ["getParam", "y", "r"], ["\/", ["getParam", "sy", "r"], 2]]],
- ["putPenUp"]]],
- [12963,
- 476,
- [["penColor:",
- ["getLine:ofList:", ["-", ["*", ["getParam", "col", "r"], 3], 2], "Colors"]],
- ["penSize:", 2],
- ["gotoX:y:",
- ["-", ["getParam", "x", "r"], 1],
- ["-", ["getParam", "y", "r"], ["\/", ["getParam", "sy", "r"], 2]]],
- ["putPenDown"],
- ["gotoX:y:",
- ["+",
- ["getParam", "x", "r"],
- ["-", ["\/", ["getParam", "sy", "r"], 2], 2]],
- ["-", ["getParam", "y", "r"], 1]],
- ["xpos:",
- ["-",
- ["+", ["getParam", "x", "r"], ["getParam", "sx", "r"]],
- ["-", ["\/", ["getParam", "sy", "r"], 2], 3]]],
- ["penColor:",
- ["getLine:ofList:", ["-", ["*", ["getParam", "col", "r"], 3], 1], "Colors"]],
- ["gotoX:y:",
- ["+", ["getParam", "x", "r"], ["getParam", "sx", "r"]],
- ["-", ["getParam", "y", "r"], ["\/", ["getParam", "sy", "r"], 2]]],
- ["penColor:",
- ["getLine:ofList:", ["-", ["*", ["getParam", "col", "r"], 3], 0], "Colors"]],
- ["gotoX:y:",
- ["-",
- ["+", ["getParam", "x", "r"], ["getParam", "sx", "r"]],
- ["-", ["\/", ["getParam", "sy", "r"], 2], 3]],
- ["-", ["getParam", "y", "r"], ["-", ["getParam", "sy", "r"], 1]]],
- ["xpos:",
- ["+",
- ["getParam", "x", "r"],
- ["-", ["\/", ["getParam", "sy", "r"], 2], 2]]],
- ["penColor:",
- ["getLine:ofList:", ["-", ["*", ["getParam", "col", "r"], 3], 1], "Colors"]],
- ["gotoX:y:",
- ["-", ["getParam", "x", "r"], 1],
- ["-", ["getParam", "y", "r"], ["\/", ["getParam", "sy", "r"], 2]]],
- ["putPenUp"],
- ["changeXposBy:", 3],
- ["penSize:", 5],
- ["putPenDown"],
- ["putPenUp"],
- ["gotoX:y:",
- ["-", ["+", ["getParam", "x", "r"], ["getParam", "sx", "r"]], 4],
- ["-", ["getParam", "y", "r"], ["\/", ["getParam", "sy", "r"], 2]]],
- ["putPenDown"],
- ["putPenUp"],
- ["penSize:", ["-", ["getParam", "sy", "r"], 2]],
- ["penColor:",
- ["getLine:ofList:", ["-", ["*", ["getParam", "col", "r"], 3], 1], "Colors"]],
- ["gotoX:y:",
- ["+",
- ["+", ["getParam", "x", "r"], ["\/", ["getParam", "sy", "r"], 2]],
- 2],
- ["-",
- ["-", ["getParam", "y", "r"], ["\/", ["getParam", "sy", "r"], 2]],
- 0]],
- ["putPenDown"],
- ["xpos:",
- ["+",
- ["getParam", "x", "r"],
- ["-",
- ["-", ["getParam", "sx", "r"], ["\/", ["getParam", "sy", "r"], 2]],
- 2]]],
- ["putPenUp"],
- ["doIf",
- ["not", ["=", ["getParam", "txt", "r"], ""]],
- [["penSize:", 1],
- ["penColor:", -1],
- ["call",
- "write %s at %n %n",
- ["getParam", "txt", "r"],
- ["+", ["getParam", "x", "r"], 4],
- ["-", ["getParam", "y", "r"], 11]]]]]],
- [8566,
- 10,
- [["procDef", "Find Drag Block Destination %n %n", ["x", "y"], [1, 1], true],
- ["setVar:to:", "#DragDest", "0"],
- ["doIf",
- ["=", ["getLine:ofList:", ["readVariable", "#DragIdx"], "Script"], "hat"],
- [["stopScripts", "this script"]]],
- ["setVar:to:", "_ci", 0],
- ["setVar:to:", "ii", "1"],
- ["deleteLine:ofList:", "all", "Stack"],
- ["doRepeat",
- ["lineCountOfList:", "Roots"],
- [["append:toList:", ["getLine:ofList:", ["readVariable", "ii"], "Roots"], "Stack"], ["changeVar:by:", "ii", 1]]],
- ["doUntil",
- ["=", ["lineCountOfList:", "Stack"], "0"],
- [["setVar:to:", "idx", ["getLine:ofList:", "last", "Stack"]],
- ["setVar:to:", "#c", ["getLine:ofList:", ["readVariable", "idx"], "Script"]],
- ["deleteLine:ofList:", "last", "Stack"],
- ["doIf",
- ["list:contains:", "TYPE_BLOCK", ["readVariable", "#c"]],
- [["setVar:to:",
- "_vy",
- ["-",
- ["getLine:ofList:", ["+", ["readVariable", "idx"], 2], "Script"],
- ["getParam", "y", "r"]]],
- ["doIf",
- ["&",
- [">", ["readVariable", "_vy"], "-8"],
- ["<",
- ["readVariable", "_vy"],
- ["+", ["getLine:ofList:", ["+", ["readVariable", "idx"], 4], "Script"], 8]]],
- [["setVar:to:",
- "_vx",
- ["-",
- ["getParam", "x", "r"],
- ["getLine:ofList:", ["+", ["readVariable", "idx"], 1], "Script"]]],
- ["doIf",
- ["&", [">", ["readVariable", "_vx"], "-28"], ["<", ["readVariable", "_vx"], "38"]],
- [["doIfElse",
- ["<", ["readVariable", "_vy"], "6"],
- null,
- [["doIfElse",
- [">",
- ["readVariable", "_vy"],
- ["-", ["getLine:ofList:", ["+", ["readVariable", "idx"], 4], "Script"], 6]],
- [["setVar:to:", "#DragDest", ["readVariable", "idx"]],
- ["setVar:to:", "#DragDstLink", "9"],
- ["deleteLine:ofList:", "all", "Stack"],
- ["penColor:", -1],
- ["penSize:", 5],
- ["setVar:to:",
- "_i",
- ["-",
- ["getLine:ofList:", ["+", ["readVariable", "idx"], 2], "Script"],
- ["getLine:ofList:", ["+", ["readVariable", "idx"], 4], "Script"]]],
- ["gotoX:y:", ["getLine:ofList:", ["+", ["readVariable", "idx"], 1], "Script"], ["readVariable", "_i"]],
- ["putPenDown"],
- ["changeXposBy:", ["getLine:ofList:", ["+", ["readVariable", "#DragIdx"], 3], "Script"]],
- ["putPenUp"],
- ["stopScripts", "this script"]],
- [["doIf",
- ["|", ["=", ["readVariable", "#c"], "nst1"], ["=", ["readVariable", "#c"], "nst2"]],
- [["setVar:to:", "_i", ["getLine:ofList:", ["+", ["readVariable", "idx"], 7], "Script"]],
- ["setVar:to:", "_vy2", ["getLine:ofList:", ["+", ["readVariable", "idx"], 8], "Script"]],
- ["doIfElse",
- [">", ["readVariable", "_i"], "0"],
- [["setVar:to:", "_vy", ["getLine:ofList:", ["+", ["readVariable", "_i"], 2], "Script"]],
- ["doIfElse",
- [">", ["readVariable", "_vy2"], "0"],
- [["setVar:to:", "_vy2", ["getLine:ofList:", ["+", ["readVariable", "_vy2"], 2], "Script"]]],
- [["setVar:to:", "_vy2", ["getLine:ofList:", ["+", ["readVariable", "idx"], 2], "Script"]],
- ["changeVar:by:",
- "_vy2",
- ["-", 18, ["getLine:ofList:", ["+", ["readVariable", "idx"], 4], "Script"]]]]]],
- [["doIfElse",
- ["=", ["readVariable", "#c"], "nst1"],
- [["setVar:to:", "_vy", ["getLine:ofList:", ["+", ["readVariable", "idx"], 2], "Script"]],
- ["changeVar:by:",
- "_vy",
- ["-", 18, ["getLine:ofList:", ["+", ["readVariable", "idx"], 4], "Script"]]]],
- [["doIfElse",
- [">", ["readVariable", "_vy2"], "0"],
- [["setVar:to:", "_vy2", ["getLine:ofList:", ["+", ["readVariable", "_vy2"], 2], "Script"]]],
- [["setVar:to:", "_vy2", ["getLine:ofList:", ["+", ["readVariable", "idx"], 2], "Script"]],
- ["changeVar:by:",
- "_vy2",
- ["-", 18, ["getLine:ofList:", ["+", ["readVariable", "idx"], 4], "Script"]]]]],
- ["setVar:to:", "_vy", ["+", ["readVariable", "_vy2"], 18]]]]]],
- ["doIf",
- ["<",
- ["computeFunction:of:", "abs", ["-", ["readVariable", "_vy"], ["getParam", "y", "r"]]],
- "6"],
- [["call", "Show Nest Link %n %n %n", 7, ["getParam", "x", "r"], ["readVariable", "_vy"]],
- ["stopScripts", "this script"]]],
- ["doIf",
- ["&",
- ["=", ["readVariable", "#c"], "nst2"],
- ["<",
- ["computeFunction:of:", "abs", ["-", ["readVariable", "_vy2"], ["getParam", "y", "r"]]],
- "6"]],
- [["call", "Show Nest Link %n %n %n", 8, ["getParam", "x", "r"], ["readVariable", "_vy2"]],
- ["stopScripts", "this script"]]]]]]]]]]],
- ["doIf",
- [">", ["getLine:ofList:", ["+", ["readVariable", "idx"], 6], "Script"], "0"],
- [["append:toList:", ["getLine:ofList:", ["+", ["readVariable", "idx"], 6], "Script"], "Stack"]]],
- ["doIf",
- [">", ["getLine:ofList:", ["+", ["readVariable", "idx"], 7], "Script"], "0"],
- [["append:toList:", ["getLine:ofList:", ["+", ["readVariable", "idx"], 7], "Script"], "Stack"]]],
- ["doIf",
- [">", ["getLine:ofList:", ["+", ["readVariable", "idx"], 8], "Script"], "0"],
- [["append:toList:", ["getLine:ofList:", ["+", ["readVariable", "idx"], 8], "Script"], "Stack"]]]]],
- ["doIf",
- [">", ["getLine:ofList:", ["+", ["readVariable", "idx"], 9], "Script"], "0"],
- [["append:toList:", ["getLine:ofList:", ["+", ["readVariable", "idx"], 9], "Script"], "Stack"]]]]]]]]],
- [7245,
- 379,
- [["procDef", "Find Drag Arg Destination %n %n boolean? %b", ["x", "y", "boolean?"], [1, 1, false], true],
- ["setVar:to:", "#DragDest", 0],
- ["call", "Get Item At %n %n inc palette? %b", ["getParam", "x", "r"], ["getParam", "y", "r"], false],
- ["doUntil",
- ["<", ["lineCountOfList:", "Stack"], "2"],
- [["setVar:to:", "cc", ["getLine:ofList:", ["getLine:ofList:", 1, "Stack"], "Script"]],
- ["doIf",
- ["list:contains:", "TYPE_ARG_DST", ["readVariable", "cc"]],
- [["doIf",
- ["|",
- ["getParam", "boolean?", "b"],
- ["not",
- ["|", ["=", ["readVariable", "cc"], "?"], ["=", ["readVariable", "cc"], "<"]]]],
- [["doIfElse",
- ["|", ["=", ["readVariable", "cc"], "t"], ["=", ["readVariable", "cc"], "n"]],
- [["setVar:to:", "cc", ["getLine:ofList:", ["+", ["getLine:ofList:", 1, "Stack"], 10], "Script"]]],
- [["setVar:to:", "cc", ""]]],
- ["doIf",
- ["|",
- ["=", ["readVariable", "cc"], ""],
- ["=", ["letter:of:", 1, ["readVariable", "cc"]], "?"]],
- [["setVar:to:", "#DragDest", ["getLine:ofList:", 3, "Stack"]],
- ["setVar:to:", "#DragDstLink", ["getLine:ofList:", 2, "Stack"]],
- ["setVar:to:", "idx", ["getLine:ofList:", 1, "Stack"]],
- ["penColor:", ["concatenate:with:", "0x50", "ffffff"]],
- ["penSize:", ["+", ["getLine:ofList:", ["+", ["readVariable", "idx"], 4], "Script"], 5]],
- ["setVar:to:",
- "_vy",
- ["\/", ["getLine:ofList:", ["+", ["readVariable", "idx"], 4], "Script"], 2]],
- ["gotoX:y:",
- ["-",
- ["+", ["getLine:ofList:", ["+", ["readVariable", "idx"], 1], "Script"], ["readVariable", "_vy"]],
- 1],
- ["-", ["getLine:ofList:", ["+", ["readVariable", "idx"], 2], "Script"], ["readVariable", "_vy"]]],
- ["putPenDown"],
- ["setVar:to:",
- "_vx",
- ["-",
- ["-",
- ["getLine:ofList:", ["+", ["readVariable", "idx"], 3], "Script"],
- ["*", 2, ["readVariable", "_vy"]]],
- 1]],
- ["changeXposBy:", ["readVariable", "_vx"]],
- ["penColor:", -1],
- ["changePenSizeBy:", -2],
- ["changeXposBy:", ["-", 0, ["readVariable", "_vx"]]],
- ["putPenUp"],
- ["call", "Draw %n just me %b %b", ["readVariable", "idx"], ["not", false], false],
- ["stopScripts", "this script"]]]]]]],
- ["deleteLine:ofList:", 1, "Stack"],
- ["doUntil",
- ["|",
- ["<", ["lineCountOfList:", "Stack"], "2"],
- ["=", ["getLine:ofList:", 1, "Stack"], "6"]],
- [["deleteLine:ofList:", 1, "Stack"], ["deleteLine:ofList:", 1, "Stack"]]],
- ["deleteLine:ofList:", 1, "Stack"]]]]],
- [9796,
- 10,
- [["procDef", "Seperate Block %n parent %n linkType %n", ["idx", "par", "linkTyp"], [1, 1, 1], true],
- ["setVar:to:", "#DragIdx", ["getParam", "idx", "r"]],
- ["doIfElse",
- [">", ["getParam", "par", "r"], "0"],
- [["doIfElse",
- ["list:contains:", "TYPE_BLOCK", ["getLine:ofList:", ["getParam", "idx", "r"], "Script"]],
- [["setLine:ofList:to:", ["+", ["getParam", "par", "r"], ["getParam", "linkTyp", "r"]], "Script", "0"]],
- [["doIfElse",
- ["list:contains:", "TYPE_ARG", ["getLine:ofList:", ["getParam", "idx", "r"], "Script"]],
- [["call", "Restore Default Input"],
- ["setLine:ofList:to:",
- ["+", ["getParam", "par", "r"], ["getParam", "linkTyp", "r"]],
- "Script",
- ["readVariable", "idx"]],
- ["setLine:ofList:to:",
- ["+", ["readVariable", "idx"], 9],
- "Script",
- ["getLine:ofList:", ["+", ["getParam", "idx", "r"], 9], "Script"]],
- ["setLine:ofList:to:", ["+", ["getParam", "idx", "r"], 9], "Script", "0"]],
- null]]]],
- [["setVar:to:", "_i", "1"],
- ["doRepeat",
- ["lineCountOfList:", "Roots"],
- [["doIfElse",
- ["=", ["getLine:ofList:", ["readVariable", "_i"], "Roots"], ["getParam", "idx", "r"]],
- [["deleteLine:ofList:", ["readVariable", "_i"], "Roots"]],
- [["changeVar:by:", "_i", 1]]]]]]]]],
- [5548,
- 10,
- [["procDef", "Get Item At %n %n inc palette? %b", ["x", "y", "palette?"], [1, 1, false], true],
- ["deleteLine:ofList:", "all", "Stack"],
- ["setVar:to:", "_ci", 0],
- ["setVar:to:", "ii", ["lineCountOfList:", "Roots"]],
- ["doUntil",
- ["|", [">", ["readVariable", "_ci"], "0"], ["<", ["readVariable", "ii"], "1"]],
- [["call",
- "Check Touch %n at %n %n",
- ["getLine:ofList:", ["readVariable", "ii"], "Roots"],
- ["getParam", "x", "r"],
- ["getParam", "y", "r"]],
- ["changeVar:by:", "ii", -1]]],
- ["doIf",
- ["&", ["getParam", "palette?", "b"], ["<", ["readVariable", "_ci"], "1"]],
- [["setVar:to:", "ii", ["lineCountOfList:", "Palette"]],
- ["doUntil",
- ["|", [">", ["readVariable", "_ci"], "0"], ["<", ["readVariable", "ii"], "1"]],
- [["call",
- "Check Touch %n at %n %n",
- ["getLine:ofList:", ["readVariable", "ii"], "Palette"],
- ["getParam", "x", "r"],
- ["getParam", "y", "r"]],
- ["changeVar:by:", "ii", -1]]]]]]],
- [4286,
- 10,
- [["procDef", "Remove from Stack to reveal first Block", [], [], true],
- ["setVar:to:", "_ax", "0"],
- ["doUntil",
- ["<", ["lineCountOfList:", "Stack"], "2"],
- [["setVar:to:", "cc", ["getLine:ofList:", ["getLine:ofList:", 1, "Stack"], "Script"]],
- ["doIf",
- ["not", ["=", ["readVariable", "_ax"], "9"]],
- [["doIf",
- ["|", ["list:contains:", "TYPE_BLOCK", ["readVariable", "cc"]], ["list:contains:", "TYPE_ARG", ["readVariable", "cc"]]],
- [["stopScripts", "this script"]]]]],
- ["deleteLine:ofList:", 1, "Stack"],
- ["setVar:to:", "_ax", ["getLine:ofList:", 1, "Stack"]],
- ["deleteLine:ofList:", 1, "Stack"]]]]],
- [1879,
- 10,
- [["procDef", "Layout Palette %n y: %n", ["idx", "y"], [1, 1], true],
- ["setVar:to:", "idx", ["getLine:ofList:", ["getParam", "idx", "r"], "Palette"]],
- ["doIf",
- [">", ["readVariable", "idx"], "0"],
- [["call",
- "Get Sizes %n %b %n %n",
- ["readVariable", "idx"],
- false,
- ["getLine:ofList:", ["+", ["readVariable", "idx"], 1], "Script"],
- ["getParam", "y", "r"]],
- ["call",
- "Layout Palette %n y: %n",
- ["+", ["getParam", "idx", "r"], 1],
- ["-",
- ["getParam", "y", "r"],
- ["+", ["getLine:ofList:", ["+", ["readVariable", "idx"], 4], "Script"], ["readVariable", "#palette_gap"]]]]]],
- ["call", "invalidate all %n", 0]]],
- [2450,
- 10,
- [["whenIReceive", "palette changed"],
- ["setVar:to:", "#palette_gap", "3"],
- ["call", "Layout Palette %n y: %n", 1, ["readVariable", "SBarY"]],
- ["setVar:to:", "_i", ["getLine:ofList:", "last", "Palette"]],
- ["setVar:to:",
- "SBarY2",
- ["-",
- ["-",
- ["getLine:ofList:", ["+", ["readVariable", "_i"], 2], "Script"],
- ["getLine:ofList:", ["+", ["readVariable", "_i"], 4], "Script"]],
- 32]],
- ["call", "invalidate all %n", 2]]],
- [7930,
- 10,
- [["procDef", "End Drag", [], [], true],
- ["doIfElse",
- ["<",
- ["+", ["readVariable", "lmx"], ["readVariable", "#offsetX"]],
- ["-", ["readVariable", "#SideBarOpen"], 240]],
- [["call", "Delete Block %n", ["readVariable", "#DragIdx"]]],
- [["doIfElse",
- ["=", ["readVariable", "#DragDest"], "0"],
- [["append:toList:", ["readVariable", "#DragIdx"], "Roots"]],
- [["doIfElse",
- ["list:contains:", "TYPE_BLOCK", ["getLine:ofList:", ["readVariable", "#DragIdx"], "Script"]],
- [["setVar:to:", "_cc", ["readVariable", "#DragIdx"]],
- ["doUntil",
- ["<", ["getLine:ofList:", ["+", ["readVariable", "_cc"], 9], "Script"], "1"],
- [["setVar:to:", "_cc", ["getLine:ofList:", ["+", ["readVariable", "_cc"], 9], "Script"]]]],
- ["setLine:ofList:to:",
- ["+", ["readVariable", "_cc"], 9],
- "Script",
- ["getLine:ofList:", ["+", ["readVariable", "#DragDest"], ["readVariable", "#DragDstLink"]], "Script"]],
- ["setLine:ofList:to:", ["+", ["readVariable", "#DragDest"], ["readVariable", "#DragDstLink"]], "Script", ["readVariable", "#DragIdx"]]],
- [["setVar:to:", "_cc", ["getLine:ofList:", ["+", ["readVariable", "#DragDest"], ["readVariable", "#DragDstLink"]], "Script"]],
- ["setLine:ofList:to:",
- ["+", ["readVariable", "#DragIdx"], 9],
- "Script",
- ["getLine:ofList:", ["+", ["readVariable", "_cc"], 9], "Script"]],
- ["setLine:ofList:to:", ["+", ["readVariable", "#DragDest"], ["readVariable", "#DragDstLink"]], "Script", ["readVariable", "#DragIdx"]],
- ["setLine:ofList:to:", ["+", ["readVariable", "_cc"], 9], "Script", "0"],
- ["doIfElse",
- ["list:contains:", "TYPE_ARG", ["getLine:ofList:", ["readVariable", "_cc"], "Script"]],
- [["append:toList:", ["readVariable", "_cc"], "Roots"], ["call", "position to right %n", ["readVariable", "_cc"]]],
- [["call", "Delete Block %n", ["readVariable", "_cc"]]]]]]]]]],
- ["setVar:to:", "#DragIdx", 0],
- ["setVar:to:", "dirty", "2"]]],
- [838,
- 488,
- [["procDef", "Show Nest Link %n %n %n", ["typ", "x", "y"], [1, 1, 1], true],
- ["setVar:to:", "#DragDest", ["readVariable", "idx"]],
- ["setVar:to:", "#DragDstLink", ["getParam", "typ", "r"]],
- ["deleteLine:ofList:", "all", "Stack"],
- ["penColor:", -1],
- ["penSize:", 5],
- ["gotoX:y:",
- ["+", ["-", ["getParam", "x", "r"], ["readVariable", "_vx"]], 12],
- ["getParam", "y", "r"]],
- ["putPenDown"],
- ["changeXposBy:", ["getLine:ofList:", ["+", ["readVariable", "#DragIdx"], 3], "Script"]],
- ["putPenUp"]]],
- [1347,
- 120,
- [["procDef", "Restore Default Input", [], [], false],
- ["setVar:to:", "_ci", "2"],
- ["setVar:to:", "_cc", ["getLine:ofList:", 10, "Script"]],
- ["doUntil",
- ["=", ["getLine:ofList:", ["readVariable", "_ci"], "Stack"], "6"],
- [["changeVar:by:", "_ci", 2]]],
- ["setVar:to:", "_cc", ["\/", ["readVariable", "_ci"], 2]],
- ["setVar:to:",
- "_ax",
- ["getLine:ofList:",
- ["+", ["getLine:ofList:", ["+", ["readVariable", "_ci"], 1], "Stack"], 11],
- "Script"]],
- ["call",
- "Expand Body %n %s only arg %n",
- 1,
- ["getLine:ofList:", ["+", ["readVariable", "_ax"], ["readVariable", "SCMA#"]], "BLOCK_SCHEMA"],
- ["readVariable", "_cc"]]]],
- [4818,
- 10,
- [["procDef", "position to right %n", ["idx"], [1], true],
- ["setVar:to:", "_ax", "0"],
- ["doUntil",
- ["<", ["lineCountOfList:", "Stack"], "2"],
- [["setVar:to:", "ii", ["getLine:ofList:", 1, "Stack"]],
- ["setVar:to:", "cc", ["getLine:ofList:", ["readVariable", "ii"], "Script"]],
- ["doIf",
- ["list:contains:", "TYPE_BLOCK", ["readVariable", "cc"]],
- [["call", "Layout & Draw %n", 1],
- ["setLine:ofList:to:",
- ["+", ["getParam", "idx", "r"], 1],
- "Script",
- ["+",
- ["+",
- ["getLine:ofList:", ["+", ["readVariable", "ii"], 1], "Script"],
- ["getLine:ofList:", ["+", ["readVariable", "ii"], 3], "Script"]],
- 20]],
- ["stopScripts", "this script"]]],
- ["deleteLine:ofList:", 1, "Stack"],
- ["setVar:to:", "_ax", ["getLine:ofList:", 1, "Stack"]],
- ["deleteLine:ofList:", 1, "Stack"]]],
- ["call", "Layout & Draw %n", 1],
- ["setVar:to:", "ii", ["getLine:ofList:", 1, "Stack"]],
- ["setLine:ofList:to:",
- ["+", ["getParam", "idx", "r"], 1],
- "Script",
- ["+",
- ["+",
- ["getLine:ofList:", ["+", ["readVariable", "ii"], 1], "Script"],
- ["getLine:ofList:", ["+", ["readVariable", "ii"], 3], "Script"]],
- 20]]]],
- [838,
- 792,
- [["procDef", "Clone Blocks %n just me? %b", ["idx", "just me?"], [1, false], true],
- ["call", "Add Block %s txt? %s", "", ""],
- ["setVar:to:", "_ci", "0"],
- ["doRepeat",
- 12,
- [["setLine:ofList:to:",
- ["+", ["readVariable", "idx"], ["readVariable", "_ci"]],
- "Script",
- ["getLine:ofList:", ["+", ["getParam", "idx", "r"], ["readVariable", "_ci"]], "Script"]],
- ["changeVar:by:", "_ci", 1]]],
- ["changeVar:by:", "idx", 6],
- ["doIfElse",
- ["getParam", "just me?", "b"],
- [["setVar:to:", "_ci", "3"]],
- [["setVar:to:", "_ci", "4"]]],
- ["doRepeat",
- ["readVariable", "_ci"],
- [["doIf",
- [">", ["getLine:ofList:", ["readVariable", "idx"], "Script"], "0"],
- [["append:toList:", ["readVariable", "idx"], "Stack"],
- ["call", "Clone Blocks %n just me? %b", ["getLine:ofList:", ["readVariable", "idx"], "Script"], false],
- ["setLine:ofList:to:", ["getLine:ofList:", "last", "Stack"], "Script", ["readVariable", "idx"]],
- ["setVar:to:", "idx", ["getLine:ofList:", "last", "Stack"]],
- ["deleteLine:ofList:", "last", "Stack"]]],
- ["changeVar:by:", "idx", 1]]],
- ["doIfElse",
- ["getParam", "just me?", "b"],
- [["setLine:ofList:to:", ["readVariable", "idx"], "Script", "0"], ["changeVar:by:", "idx", -9]],
- [["changeVar:by:", "idx", -10]]],
- ["setVar:to:", "#DragIdx", ["readVariable", "idx"]]]],
- [838,
- 10,
- [["procDef", "Set Run Time", [], [], true],
- ["setVar:to:", "#RunTime", ["+", ["timeAndDate", "second"], ["+", 60, ["timeAndDate", "minute"]]]]]],
- [838,
- 1529,
- [["procDef", "Draw Category %n %s %s", ["cat", "short", "long"], [1, "", ""], true],
- ["gotoX:y:", ["-", ["*", ["getParam", "cat", "r"], 14], 244], 150],
- ["penSize:", 13],
- ["penColor:",
- ["getLine:ofList:", ["-", ["*", ["getParam", "cat", "r"], 3], 1], "Colors"]],
- ["putPenDown"],
- ["doIfElse",
- ["=", ["readVariable", "#Section"], ["getParam", "cat", "r"]],
- [["changeYposBy:", -14],
- ["putPenUp"],
- ["xpos:", -109],
- ["putPenDown"],
- ["xpos:", -230],
- ["putPenUp"],
- ["penColor:", -1],
- ["penSize:", 1],
- ["call",
- "write %s at %n %n",
- ["getParam", "long", "r"],
- ["-", ["xpos"], 2],
- ["-", ["ypos"], 3]]],
- [["putPenUp"],
- ["penColor:", -1],
- ["penSize:", 1],
- ["call",
- "write %s at %n %n",
- ["getParam", "short", "r"],
- ["-", ["xpos"], 2],
- ["-", ["ypos"], 3]]]]]],
- [3889,
- 10,
- [["procDef", "Draw Palette %n", ["idx"], [1], true],
- ["setVar:to:", "idx", ["getLine:ofList:", ["getParam", "idx", "r"], "Palette"]],
- ["doIf",
- [">", ["readVariable", "idx"], "0"],
- [["call", "Draw %n just me %b %b", ["readVariable", "idx"], false, false],
- ["call", "Draw Palette %n", ["+", ["getParam", "idx", "r"], 1]]]]]],
- [4286,
- 374,
- [["procDef", "## Redraw (force: %n )", ["force"], [1], true],
- ["doIf",
- ["&",
- [">", ["readVariable", "#SideBarOpen"], "0"],
- ["|",
- [">", ["getParam", "force", "r"], "1"],
- [">", ["readVariable", "dirty"], "1"]]],
- [["penColor:", ["concatenate:with:", "0x", "d0d0d0"]],
- ["doIfElse",
- ["&", [">", ["readVariable", "#clip_y"], "179"], ["<", ["readVariable", "#clip_y2"], "-179"]],
- [["penSize:", 140],
- ["gotoX:y:", -170, -180],
- ["putPenDown"],
- ["ypos:", 180],
- ["putPenUp"]],
- [["doIf",
- [">", ["-", ["readVariable", "#clip_y"], ["readVariable", "#clip_y2"]], "0"],
- [["call",
- "plain fill rect %n %n %n %n",
- -240,
- ["readVariable", "#clip_y"],
- 140,
- ["-", ["readVariable", "#clip_y"], ["readVariable", "#clip_y2"]]]]]]],
- ["call", "Draw Palette %n", 1],
- ["setVar:to:", "ii", ["\/", 300, ["-", ["readVariable", "SBarY"], ["readVariable", "SBarY2"]]]],
- ["penColor:", -7894901],
- ["penSize:", 3],
- ["gotoX:y:",
- -101.5,
- ["-", 120, ["*", ["-", ["readVariable", "SBarY"], 120], ["readVariable", "ii"]]]],
- ["putPenDown"],
- ["changeYposBy:", ["*", -324, ["readVariable", "ii"]]],
- ["putPenUp"],
- ["doIf",
- [">", ["readVariable", "#clip_y"], "125"],
- [["call", "Draw Script Categories"],
- ["setVar:to:", "#clip_y", "182"],
- ["doIf", [">", ["readVariable", "#clip_y2"], "125"], [["setVar:to:", "#clip_y2", "125"]]]]],
- ["call", "expand clip for palette %n %n %n", 1, ["readVariable", "#clip_y"], ["readVariable", "#clip_y2"]]]],
- ["doIf",
- ["|",
- [">", ["getParam", "force", "r"], "0"],
- [">", ["readVariable", "dirty"], "0"]],
- [["penColor:", -2236706],
- ["doIfElse",
- ["&", [">", ["readVariable", "#clip_y"], "181"], ["<", ["readVariable", "#clip_y2"], "-181"]],
- [["penSize:", 170],
- ["gotoX:y:", ["-", ["readVariable", "#SideBarOpen"], 155], -180],
- ["putPenDown"],
- ["ypos:", 180],
- ["putPenUp"],
- ["changeXposBy:", 170],
- ["putPenDown"],
- ["ypos:", -180],
- ["putPenUp"],
- ["doIf",
- ["=", ["readVariable", "#SideBarOpen"], "0"],
- [["changeXposBy:", 170], ["putPenDown"], ["ypos:", 180], ["putPenUp"]]]],
- [["doIfElse",
- ["=", ["readVariable", "#SideBarOpen"], "0"],
- [["doIf",
- [">", ["-", ["readVariable", "#clip_y"], ["readVariable", "#clip_y2"]], "0"],
- [["call",
- "plain fill rect %n %n %n %n",
- -240,
- ["-", ["readVariable", "#clip_y"], 2],
- 480,
- ["-", ["-", ["readVariable", "#clip_y"], ["readVariable", "#clip_y2"]], 4]]]]],
- [["doIf",
- [">", ["-", ["readVariable", "#clip_y"], ["readVariable", "#clip_y2"]], "0"],
- [["call",
- "plain fill rect %n %n %n %n",
- -100,
- ["-", ["readVariable", "#clip_y"], 2],
- 340,
- ["-", ["-", ["readVariable", "#clip_y"], ["readVariable", "#clip_y2"]], 4]]]]]]]],
- ["penSize:", 1],
- ["call", "Layout & Draw %n", 1],
- ["doIf",
- ["&",
- ["=", ["readVariable", "#SideBarOpen"], "0"],
- ["&", [">", ["readVariable", "#clip_y"], "166"], ["<", ["readVariable", "#clip_y2"], "180"]]],
- [["penColor:", -3092272],
- ["penSize:", 10],
- ["gotoX:y:", -240, 175],
- ["putPenDown"],
- ["changeXposBy:", 80],
- ["putPenUp"],
- ["penColor:", -11184811],
- ["penSize:", 1],
- ["call", "write %s at %n %n", "<-- Left Arrow", -236, 172]]]]],
- ["setVar:to:", "dirty", "0"],
- ["setVar:to:", "#clip_y", "-182"],
- ["setVar:to:", "#clip_y2", "182"]]],
- [1347,
- 722,
- [["procDef", "Ask Drop Down %n", ["idx"], [1], false],
- ["call", "Get block color"],
- ["call", "Get picklist for %s", ["getLine:ofList:", ["+", ["getParam", "idx", "r"], 10], "Script"]],
- ["setVar:to:",
- "#ddx",
- ["-", ["getLine:ofList:", ["+", ["getParam", "idx", "r"], 1], "Script"], 1]],
- ["setVar:to:",
- "#ddy",
- ["-", ["getLine:ofList:", ["+", ["getParam", "idx", "r"], 2], "Script"], 14]],
- ["call", "Make Drop Down (from stack) at par width %n", ["getLine:ofList:", ["+", ["getParam", "idx", "r"], 3], "Script"]]]],
- [10,
- 10,
- [["whenIReceive", "draw"],
- ["hideList:", "Stack"],
- ["deleteLine:ofList:", "all", "Stack"],
- ["setVar:to:", "#ClickIdx", "0"],
- ["setVar:to:", "#DragIdx", "0"],
- ["hide"],
- ["setVar:to:", "#clip_y", "182"],
- ["setVar:to:", "#clip_y2", "-182"],
- ["setVar:to:", "SBarY", "120"],
- ["doUntil",
- [">", ["readVariable", "#SideBarOpen"], "0"],
- [["setVar:to:", "dirty", "0"], ["call", "Scroll All %n %n", 32, 0]]],
- ["setVar:to:", "dirty", "2"],
- ["doForever",
- [["call", "Set Run Time"],
- ["call", "## Redraw (force: %n )", 0],
- ["doIf",
- [">", ["readVariable", "#ClickIdx"], "0"],
- [["doUntil",
- ["|", ["not", ["mousePressed"]], [">", ["readVariable", "#DragIdx"], "0"]],
- [["call", "Set Run Time"],
- ["doIf",
- ["|",
- [">", ["computeFunction:of:", "abs", ["-", ["mouseX"], ["readVariable", "lmx"]]], "2"],
- [">", ["computeFunction:of:", "abs", ["-", ["mouseY"], ["readVariable", "lmy"]]], "2"]],
- [["call", "Remove from Stack to reveal first Block"],
- ["setVar:to:", "#ClickIdx", ["getLine:ofList:", 1, "Stack"]],
- ["doIfElse",
- ["<", ["getLine:ofList:", ["+", ["readVariable", "#ClickIdx"], 10], "Script"], "12"],
- [["setVar:to:",
- "#offsetX",
- ["-", ["getLine:ofList:", ["+", ["readVariable", "#ClickIdx"], 1], "Script"], ["readVariable", "lmx"]]],
- ["setVar:to:",
- "#offsetY",
- ["-", ["getLine:ofList:", ["+", ["readVariable", "#ClickIdx"], 2], "Script"], ["readVariable", "lmy"]]],
- ["doIfElse",
- ["|",
- ["<",
- ["getLine:ofList:", ["+", ["readVariable", "#ClickIdx"], 1], "Script"],
- ["-", ["readVariable", "#SideBarOpen"], 300]],
- ["keyPressed:", ""]],
- [["setVar:to:", "#c", ["getLine:ofList:", ["readVariable", "#ClickIdx"], "Script"]],
- ["call", "Clone Blocks %n just me? %b", ["readVariable", "#ClickIdx"], ["not", ["list:contains:", "TYPE_BLOCK", ["readVariable", "#c"]]]]],
- [["call", "Seperate Block %n parent %n linkType %n", ["readVariable", "#ClickIdx"], ["getLine:ofList:", 3, "Stack"], ["getLine:ofList:", 2, "Stack"]]]]],
- [["setVar:to:", "#DragIdx", "0"]]],
- ["setVar:to:", "#ClickIdx", "0"]]],
- ["wait:elapsed:from:", 0]]]]],
- ["doIfElse",
- [">", ["readVariable", "#ClickIdx"], "0"],
- [["setVar:to:", "#c", ["getLine:ofList:", ["readVariable", "#ClickIdx"], "Script"]],
- ["setVar:to:", "#op", ["getLine:ofList:", ["+", ["getLine:ofList:", 3, "Stack"], 11], "Script"]],
- ["doIfElse",
- ["|", ["=", ["readVariable", "#c"], "t"], ["=", ["readVariable", "#c"], "n"]],
- [["setVar:to:", "_cc", ["getLine:ofList:", ["+", ["readVariable", "#ClickIdx"], 10], "Script"]],
- ["doIf",
- ["=", ["letter:of:", 1, ["readVariable", "_cc"]], "?"],
- [["doIf",
- ["<",
- ["mouseX"],
- ["-",
- ["+",
- ["getLine:ofList:", ["+", ["readVariable", "#ClickIdx"], 1], "Script"],
- ["getLine:ofList:", ["+", ["readVariable", "#ClickIdx"], 3], "Script"]],
- 11]],
- [["setVar:to:", "_cc", ""]]]]],
- ["doIfElse",
- ["=", ["readVariable", "_cc"], ""],
- [["doAsk",
- ["concatenate:with:",
- "Replace '",
- ["concatenate:with:", ["getLine:ofList:", ["+", ["readVariable", "#ClickIdx"], 5], "Script"], "' with?"]]],
- ["setVar:to:", "#s", ["answer"]],
- ["doIf",
- ["not",
- ["=", ["getLine:ofList:", ["+", ["readVariable", "#ClickIdx"], 5], "Script"], ["readVariable", "#s"]]],
- [["doIfElse",
- [">", ["readVariable", "#s"], ""],
- [["setLine:ofList:to:", ["+", ["readVariable", "#ClickIdx"], 5], "Script", ["readVariable", "#s"]],
- ["doBroadcastAndWait", "palette changed"],
- ["setVar:to:", "dirty", "2"]],
- [["doAsk", "Did you want to set this to an empty string? (Y)"],
- ["doIf",
- ["=", ["answer"], "Y"],
- [["setLine:ofList:to:", ["+", ["readVariable", "#ClickIdx"], 5], "Script", ""],
- ["doBroadcastAndWait", "palette changed"],
- ["setVar:to:", "dirty", "2"]]]]]]]],
- [["call", "Ask Drop Down %n", ["readVariable", "#ClickIdx"]],
- ["doIf",
- ["=", ["readVariable", "#s"], "new message..."],
- [["doAsk", "New broadcast message:"], ["setVar:to:", "#s", ["answer"]]]],
- ["doIfElse",
- [">", ["readVariable", "#s"], ""],
- [["setLine:ofList:to:", ["+", ["readVariable", "#ClickIdx"], 5], "Script", ["readVariable", "#s"]],
- ["setVar:to:", "Last Event", ["readVariable", "#s"]],
- ["doBroadcastAndWait", "Reset Last Var List"],
- ["doBroadcastAndWait", "change palette"]],
- [["doBroadcastAndWait", "palette changed"]]],
- ["call", "## Redraw (force: %n )", 2],
- ["doWaitUntil", ["not", ["mousePressed"]]]]]],
- [["call", "Remove from Stack to reveal first Block"],
- ["setVar:to:", "#ClickIdx", ["getLine:ofList:", 1, "Stack"]],
- ["setVar:to:", "#c", ["getLine:ofList:", ["+", ["readVariable", "#ClickIdx"], 11], "Script"]],
- ["doIfElse",
- ["=", ["readVariable", "#c"], "99"],
- [["call", "Click variable"]],
- [["doIfElse",
- ["=", ["readVariable", "#c"], "33"],
- [["call", "Click List"]],
- [["doIf",
- ["=", ["readVariable", "#c"], "155"],
- [["doBroadcastAndWait", "execute"], ["setVar:to:", "dirty", "2"]]]]]]]]]],
- [["call", "invalidate all %n", 2],
- ["doUntil",
- ["not", ["mousePressed"]],
- [["call", "Set Run Time"],
- ["setVar:to:", "lmx", ["mouseX"]],
- ["setVar:to:", "lmy", ["mouseY"]],
- ["doIf",
- [">", ["readVariable", "#DragIdx"], "0"],
- [["doIfElse",
- ["<", ["+", ["mouseX"], ["readVariable", "#offsetX"]], "-95"],
- [["call", "## Redraw (force: %n )", 2], ["setVar:to:", "dirty", "2"]],
- [["call", "## Redraw (force: %n )", 1]]],
- ["call",
- "Get Sizes %n %b %n %n",
- ["readVariable", "#DragIdx"],
- false,
- ["+", ["mouseX"], ["readVariable", "#offsetX"]],
- ["+", ["mouseY"], ["readVariable", "#offsetY"]]],
- ["call", "Get Draw Extents %n", ["readVariable", "#DragIdx"]],
- ["setVar:to:", "#c", ["getLine:ofList:", ["readVariable", "#DragIdx"], "Script"]],
- ["doIfElse",
- ["list:contains:", "TYPE_BLOCK", ["readVariable", "#c"]],
- [["call",
- "Find Drag Block Destination %n %n",
- ["+", ["mouseX"], ["readVariable", "#offsetX"]],
- ["+", ["mouseY"], ["readVariable", "#offsetY"]]]],
- [["setVar:to:",
- "_vy",
- ["-",
- ["+", ["mouseY"], ["readVariable", "#offsetY"]],
- ["\/", ["getLine:ofList:", ["+", ["readVariable", "#DragIdx"], 4], "Script"], 2]]],
- ["call",
- "Find Drag Arg Destination %n %n boolean? %b",
- ["+", ["mouseX"], ["readVariable", "#offsetX"]],
- ["readVariable", "_vy"],
- ["|", ["=", ["readVariable", "#c"], "<"], ["=", ["readVariable", "#c"], "?"]]]]],
- ["call", "Draw %n just me %b %b", ["readVariable", "#DragIdx"], false, false]]]]]]],
- ["doIf", [">", ["readVariable", "#DragIdx"], "0"], [["call", "End Drag"]]],
- ["call", "invalidate all %n", 1],
- ["call", "## Redraw (force: %n )", 1],
- ["doUntil",
- ["mousePressed"],
- [["call", "Set Run Time"],
- ["doIfElse",
- [">", ["readVariable", "dirty"], "0"],
- [["call", "## Redraw (force: %n )", 0]],
- [["wait:elapsed:from:", 0]]]]],
- ["setVar:to:", "lmx", ["mouseX"]],
- ["setVar:to:", "lmy", ["mouseY"]],
- ["doIfElse",
- ["&",
- ["<", ["computeFunction:of:", "abs", ["mouseX"]], "240"],
- ["<", ["computeFunction:of:", "abs", ["mouseY"]], "180"]],
- [["doIfElse",
- ["&",
- [">", ["readVariable", "#SideBarOpen"], "0"],
- ["&", ["<", ["mouseX"], "-112"], [">", ["mouseY"], "130"]]],
- [["doIfElse",
- [">", ["mouseY"], "160"],
- [["call", "Main Menu Click"]],
- [["setVar:to:", "#Section", ["rounded", ["\/", ["+", ["mouseX"], 244], 14]]],
- ["setVar:to:", "SBarY", "120"],
- ["doIf", ["<", ["readVariable", "#Section"], "1"], [["setVar:to:", "#Section", "1"]]],
- ["call", "Reset Last Event Name"],
- ["doBroadcastAndWait", "change palette"]]],
- ["setVar:to:", "#ClickIdx", "0"],
- ["setVar:to:", "#DragIdx", "0"]],
- [["call",
- "Get Item At %n %n inc palette? %b",
- ["readVariable", "lmx"],
- ["readVariable", "lmy"],
- [">", ["readVariable", "#SideBarOpen"], "0"]],
- ["setVar:to:", "#ClickIdx", ["readVariable", "_ci"]]]]],
- [["setVar:to:", "#ClickIdx", "0"], ["setVar:to:", "#DragIdx", "0"]]]]]]],
- [838,
- 111,
- [["procDef", "Get Var index %s", ["name"], [""], true],
- ["setVar:to:", "varIndex#", ["-", ["lineCountOfList:", "vars"], 1]],
- ["doRepeat",
- ["\/", ["lineCountOfList:", "vars"], 2],
- [["doIf",
- ["=", ["getLine:ofList:", ["readVariable", "varIndex#"], "vars"], ["getParam", "name", "r"]],
- [["stopScripts", "this script"]]],
- ["changeVar:by:", "varIndex#", -2]]]]],
- [1347,
- 416,
- [["procDef", "invalidate from %n invalidate %n", ["y", "dirty"], [1, 1], true],
- ["doIf",
- [">", ["+", ["getParam", "y", "r"], 8], ["readVariable", "#clip_y"]],
- [["setVar:to:", "#clip_y", ["+", ["getParam", "y", "r"], 8]]]],
- ["doIf",
- ["<", ["-", ["getParam", "y", "r"], 8], ["readVariable", "#clip_y2"]],
- [["setVar:to:", "#clip_y2", ["-", ["getParam", "y", "r"], 8]]]],
- ["doIf",
- [">", ["getParam", "dirty", "r"], ["readVariable", "dirty"]],
- [["setVar:to:", "dirty", ["getParam", "dirty", "r"]]]]]],
- [1879,
- 1347,
- [["procDef", "Get Draw Extents %n", ["idx"], [1], true],
- ["setVar:to:", "#clip_y", "182"],
- ["setVar:to:", "#clip_y2", "-182"],
- ["setVar:to:", "_i", ["getParam", "idx", "r"]],
- ["setVar:to:", "_vy", ["getLine:ofList:", ["+", ["readVariable", "_i"], 2], "Script"]],
- ["setVar:to:", "#clip_y", ["+", ["readVariable", "_vy"], 12]],
- ["doUntil",
- ["<", ["getLine:ofList:", ["+", ["readVariable", "_i"], 9], "Script"], "1"],
- [["setVar:to:", "_i", ["getLine:ofList:", ["+", ["readVariable", "_i"], 9], "Script"]]]],
- ["setVar:to:",
- "_vy",
- ["-",
- ["getLine:ofList:", ["+", ["readVariable", "_i"], 2], "Script"],
- ["getLine:ofList:", ["+", ["readVariable", "_i"], 4], "Script"]]],
- ["setVar:to:", "#clip_y2", ["-", ["readVariable", "_vy"], 8]],
- ["doIf", [">", ["readVariable", "#clip_y"], "182"], [["setVar:to:", "#clip_y", "182"]]],
- ["doIf", ["<", ["readVariable", "#clip_y2"], "-182"], [["setVar:to:", "#clip_y2", "-182"]]]]],
- [6238,
- 10,
- [["procDef", "expand clip for palette %n %n %n", ["idx", "cy1", "cy2"], [1, 1, 1], true],
- ["setVar:to:", "idx", ["getLine:ofList:", ["getParam", "idx", "r"], "Palette"]],
- ["doIf",
- [">", ["readVariable", "idx"], "0"],
- [["doIf",
- [">",
- ["getLine:ofList:", ["+", ["readVariable", "idx"], 2], "Script"],
- ["getParam", "cy2", "r"]],
- [["doIf",
- ["<",
- ["-",
- ["getLine:ofList:", ["+", ["readVariable", "idx"], 2], "Script"],
- ["getLine:ofList:", ["+", ["readVariable", "idx"], 4], "Script"]],
- ["getParam", "cy1", "r"]],
- [["call", "invalidate from %n invalidate %n", ["getLine:ofList:", ["+", ["readVariable", "idx"], 2], "Script"], 0],
- ["call",
- "invalidate from %n invalidate %n",
- ["-",
- ["getLine:ofList:", ["+", ["readVariable", "idx"], 2], "Script"],
- ["getLine:ofList:", ["+", ["readVariable", "idx"], 4], "Script"]],
- 0]]]]],
- ["call",
- "expand clip for palette %n %n %n",
- ["+", ["getParam", "idx", "r"], 1],
- ["getParam", "cy1", "r"],
- ["getParam", "cy2", "r"]]]]]],
- [1879,
- 1847,
- [["procDef", "Click variable", [], [], false],
- ["setVar:to:", "#ClickIdx", ["getLine:ofList:", ["+", ["readVariable", "#ClickIdx"], 6], "Script"]],
- ["doIfElse",
- ["=", ["getLine:ofList:", ["readVariable", "#ClickIdx"], "Script"], "bt"],
- [["doBroadcastAndWait", "new variable"]],
- [["doIf",
- ["<", ["getLine:ofList:", ["+", ["readVariable", "#ClickIdx"], 1], "Script"], "-199"],
- [["doAsk", "Delete this variable? (Y|N)"],
- ["doIf",
- ["=", ["answer"], "Y"],
- [["call", "Get Var index %s", ["getLine:ofList:", ["+", ["readVariable", "#ClickIdx"], 5], "Script"]],
- ["doIf",
- [">", ["readVariable", "varIndex#"], "0"],
- [["deleteLine:ofList:", ["readVariable", "varIndex#"], "vars"],
- ["deleteLine:ofList:", ["readVariable", "varIndex#"], "vars"],
- ["doBroadcastAndWait", "Reset Last Var List"],
- ["doBroadcastAndWait", "change palette"]]]]]]]]]]],
- [3350,
- 467,
- [["procDef", "get all event names %n", ["idx"], [1], true],
- ["doIf",
- [">", ["getParam", "idx", "r"], "0"],
- [["setVar:to:", "cc", ["getLine:ofList:", ["+", ["getParam", "idx", "r"], 11], "Script"]],
- ["doIfElse",
- ["|",
- ["=", ["readVariable", "cc"], "16"],
- ["|", ["=", ["readVariable", "cc"], "42"], ["=", ["readVariable", "cc"], "156"]]],
- [["setVar:to:", "cc", ["getLine:ofList:", ["+", ["getParam", "idx", "r"], 6], "Script"]],
- ["setVar:to:", "cc", ["getLine:ofList:", ["+", ["readVariable", "cc"], 9], "Script"]],
- ["setVar:to:", "cc", ["getLine:ofList:", ["+", ["readVariable", "cc"], 5], "Script"]],
- ["doIf",
- ["not", ["list:contains:", "Stack", ["readVariable", "cc"]]],
- [["append:toList:", ["readVariable", "cc"], "Stack"]]]],
- null],
- ["call", "get all event names %n", ["getLine:ofList:", ["+", ["getParam", "idx", "r"], 9], "Script"]]]]]],
- [3350,
- 277,
- [["procDef", "invalidate all %n", ["type"], [1], true],
- ["setVar:to:", "#clip_y", "182"],
- ["setVar:to:", "#clip_y2", "-182"],
- ["doIf",
- [">", ["getParam", "type", "r"], ["readVariable", "dirty"]],
- [["setVar:to:", "dirty", ["getParam", "type", "r"]]]]]],
- [2448,
- 596,
- [["procDef", "Check Touch %n at %n %n", ["idx", "x", "y"], [1, 1, 1], true],
- ["doIf",
- [">", ["getParam", "idx", "r"], "0"],
- [["setVar:to:",
- "_vx",
- ["-",
- ["getParam", "x", "r"],
- ["getLine:ofList:", ["+", ["getParam", "idx", "r"], 1], "Script"]]],
- ["setVar:to:",
- "_vy",
- ["-",
- ["getLine:ofList:", ["+", ["getParam", "idx", "r"], 2], "Script"],
- ["getParam", "y", "r"]]],
- ["doIfElse",
- ["&",
- ["&", [">", ["readVariable", "_vx"], "0"], [">", ["readVariable", "_vy"], "0"]],
- ["&",
- ["<",
- ["readVariable", "_vx"],
- ["getLine:ofList:", ["+", ["getParam", "idx", "r"], 3], "Script"]],
- ["<",
- ["readVariable", "_vy"],
- ["getLine:ofList:", ["+", ["getParam", "idx", "r"], 4], "Script"]]]],
- [["call",
- "Check Touch %n at %n %n",
- ["getLine:ofList:", ["+", ["getParam", "idx", "r"], 6], "Script"],
- ["getParam", "x", "r"],
- ["getParam", "y", "r"]],
- ["doIfElse",
- [">", ["readVariable", "_ci"], "0"],
- [["append:toList:", "6", "Stack"], ["append:toList:", ["getParam", "idx", "r"], "Stack"]],
- [["call",
- "Check Touch %n at %n %n",
- ["getLine:ofList:", ["+", ["getParam", "idx", "r"], 7], "Script"],
- ["getParam", "x", "r"],
- ["getParam", "y", "r"]],
- ["doIfElse",
- [">", ["readVariable", "_ci"], "0"],
- [["append:toList:", "7", "Stack"], ["append:toList:", ["getParam", "idx", "r"], "Stack"]],
- [["call",
- "Check Touch %n at %n %n",
- ["getLine:ofList:", ["+", ["getParam", "idx", "r"], 8], "Script"],
- ["getParam", "x", "r"],
- ["getParam", "y", "r"]],
- ["doIfElse",
- [">", ["readVariable", "_ci"], "0"],
- [["append:toList:", "8", "Stack"], ["append:toList:", ["getParam", "idx", "r"], "Stack"]],
- [["setVar:to:", "_ci", ["getParam", "idx", "r"]],
- ["append:toList:", ["getParam", "idx", "r"], "Stack"]]]]]]]],
- [["doIf",
- ["&",
- [">", ["readVariable", "_vy"], "0"],
- ["<",
- ["readVariable", "_vy"],
- ["getLine:ofList:", ["+", ["getParam", "idx", "r"], 4], "Script"]]],
- [["call",
- "Check Touch %n at %n %n",
- ["getLine:ofList:", ["+", ["getParam", "idx", "r"], 7], "Script"],
- ["getParam", "x", "r"],
- ["getParam", "y", "r"]],
- ["doIfElse",
- [">", ["readVariable", "_ci"], "0"],
- [["append:toList:", "7", "Stack"],
- ["append:toList:", ["getParam", "idx", "r"], "Stack"],
- ["stopScripts", "this script"]],
- [["call",
- "Check Touch %n at %n %n",
- ["getLine:ofList:", ["+", ["getParam", "idx", "r"], 8], "Script"],
- ["getParam", "x", "r"],
- ["getParam", "y", "r"]],
- ["doIfElse",
- [">", ["readVariable", "_ci"], "0"],
- [["append:toList:", "8", "Stack"],
- ["append:toList:", ["getParam", "idx", "r"], "Stack"],
- ["stopScripts", "this script"]],
- null]]]]],
- ["call",
- "Check Touch %n at %n %n",
- ["getLine:ofList:", ["+", ["getParam", "idx", "r"], 9], "Script"],
- ["getParam", "x", "r"],
- ["getParam", "y", "r"]],
- ["doIfElse",
- [">", ["readVariable", "_ci"], "0"],
- [["append:toList:", "9", "Stack"], ["append:toList:", ["getParam", "idx", "r"], "Stack"]],
- null]]]]]]],
- [1882.9,
- 814,
- [["procDef", "Get Max Extent", [], [], true],
- ["setVar:to:", "!DrawLow", "150"],
- ["setVar:to:", "!DrawHigh", "-150"],
- ["setVar:to:", "_ci", "1"],
- ["doRepeat",
- ["lineCountOfList:", "Roots"],
- [["setVar:to:", "_i", ["getLine:ofList:", ["readVariable", "_ci"], "Roots"]],
- ["setVar:to:", "_vy", ["getLine:ofList:", ["+", ["readVariable", "_i"], 2], "Script"]],
- ["doIf",
- [">", ["readVariable", "_vy"], ["readVariable", "!DrawHigh"]],
- [["setVar:to:", "!DrawHigh", ["readVariable", "_vy"]]]],
- ["doUntil",
- ["<", ["getLine:ofList:", ["+", ["readVariable", "_i"], 9], "Script"], "1"],
- [["setVar:to:", "_i", ["getLine:ofList:", ["+", ["readVariable", "_i"], 9], "Script"]]]],
- ["setVar:to:",
- "_vy",
- ["-",
- ["getLine:ofList:", ["+", ["readVariable", "_i"], 2], "Script"],
- ["getLine:ofList:", ["+", ["readVariable", "_i"], 4], "Script"]]],
- ["doIf",
- ["<", ["readVariable", "_vy"], ["readVariable", "!DrawLow"]],
- [["setVar:to:", "!DrawLow", ["readVariable", "_vy"]]]],
- ["changeVar:by:", "_ci", 1]]]]],
- [2446.85,
- 1963.45,
- [["procDef", "Scroll Palette %n", ["y"], [1], true],
- ["doIf",
- ["=", ["readVariable", "dirty"], "0"],
- [["setVar:to:", "_ci", "1"],
- ["doIfElse",
- [">", ["getParam", "y", "r"], "0"],
- [["doIf",
- [">", ["+", ["readVariable", "SBarY2"], ["getParam", "y", "r"]], "-160"],
- [["stopScripts", "this script"]]]],
- [["doIf",
- ["<", ["+", ["readVariable", "SBarY"], ["getParam", "y", "r"]], "120"],
- [["stopScripts", "this script"]]]]],
- ["doRepeat",
- ["lineCountOfList:", "Palette"],
- [["call", "Scroll Block %n %n %n", ["getLine:ofList:", ["readVariable", "_ci"], "Palette"], 0, ["getParam", "y", "r"]],
- ["changeVar:by:", "_ci", 1]]],
- ["changeVar:by:", "SBarY", ["getParam", "y", "r"]],
- ["changeVar:by:", "SBarY2", ["getParam", "y", "r"]],
- ["call", "invalidate all %n", 2]]]]],
- [2452.9,
- 2499.3,
- [["procDef", "Scroll Block %n %n %n", ["idx", "x", "y"], [1, 1, 1], true],
- ["doIf",
- [">", ["getParam", "idx", "r"], "0"],
- [["setVar:to:",
- "_vy",
- ["+",
- ["getLine:ofList:", ["+", ["getParam", "idx", "r"], 2], "Script"],
- ["getParam", "y", "r"]]],
- ["setLine:ofList:to:", ["+", ["getParam", "idx", "r"], 2], "Script", ["readVariable", "_vy"]],
- ["call",
- "Scroll Block %n %n %n",
- ["getLine:ofList:", ["+", ["getParam", "idx", "r"], 6], "Script"],
- ["getParam", "x", "r"],
- ["getParam", "y", "r"]],
- ["call",
- "Scroll Block %n %n %n",
- ["getLine:ofList:", ["+", ["getParam", "idx", "r"], 7], "Script"],
- ["getParam", "x", "r"],
- ["getParam", "y", "r"]],
- ["call",
- "Scroll Block %n %n %n",
- ["getLine:ofList:", ["+", ["getParam", "idx", "r"], 8], "Script"],
- ["getParam", "x", "r"],
- ["getParam", "y", "r"]],
- ["call",
- "Scroll Block %n %n %n",
- ["getLine:ofList:", ["+", ["getParam", "idx", "r"], 9], "Script"],
- ["getParam", "x", "r"],
- ["getParam", "y", "r"]]]]]],
- [1099,
- 351,
- [["whenKeyPressed", "up arrow"],
- ["doIfElse",
- [">", ["mouseX"], "-100"],
- [["call", "Scroll All %n %n", 0, -32]],
- [["call", "Scroll Palette %n", -32]]]]],
- [1096,
- 499,
- [["whenKeyPressed", "down arrow"],
- ["doIfElse",
- [">", ["mouseX"], "-100"],
- [["call", "Scroll All %n %n", 0, 32]],
- [["call", "Scroll Palette %n", 32]]]]],
- [844,
- 2227,
- [["procDef",
- "fill rect %n %n %n %n %b",
- ["x", "y", "sx", "sy", "shad?"],
- [1, 1, 1, 1, false],
- true],
- ["doIf",
- ["getParam", "shad?", "b"],
- [["penColor:", ["concatenate:with:", "0x80", "000000"]],
- ["penSize:", 5],
- ["xpos:", ["+", ["getParam", "x", "r"], ["getParam", "sx", "r"]]],
- ["ypos:", ["-", ["getParam", "y", "r"], 4]],
- ["putPenDown"],
- ["changeYposBy:", ["-", 4, ["getParam", "sy", "r"]]],
- ["changeXposBy:", ["-", 4, ["getParam", "sx", "r"]]],
- ["putPenUp"]]],
- ["penColor:", ["getLine:ofList:", ["-", ["*", ["readVariable", "#c"], 3], 1], "Colors"]],
- ["doIfElse",
- [">", ["getParam", "sx", "r"], ["getParam", "sy", "r"]],
- [["setVar:to:", "#op", ["getParam", "sy", "r"]]],
- [["setVar:to:", "#op", ["getParam", "sx", "r"]]]],
- ["doUntil",
- ["<", ["readVariable", "#op"], "2"],
- [["setVar:to:", "#op", ["\/", ["readVariable", "#op"], 2]],
- ["penSize:", ["readVariable", "#op"]],
- ["xpos:",
- ["+",
- ["+", ["getParam", "x", "r"], ["\/", ["readVariable", "#op"], 2]],
- 0.5]],
- ["ypos:",
- ["-",
- ["-", ["getParam", "y", "r"], ["\/", ["readVariable", "#op"], 2]],
- 0.5]],
- ["putPenDown"],
- ["changeXposBy:", ["-", ["-", ["getParam", "sx", "r"], ["readVariable", "#op"]], 1]],
- ["changeYposBy:", ["-", 1, ["-", ["getParam", "sy", "r"], ["readVariable", "#op"]]]],
- ["changeXposBy:", ["-", 1, ["-", ["getParam", "sx", "r"], ["readVariable", "#op"]]]],
- ["changeYposBy:", ["-", ["-", ["getParam", "sy", "r"], ["readVariable", "#op"]], 1]],
- ["putPenUp"]]],
- ["penColor:", ["getLine:ofList:", ["-", ["*", ["readVariable", "#c"], 3], 0], "Colors"]],
- ["penSize:", 1],
- ["xpos:", ["+", ["getParam", "x", "r"], ["getParam", "sx", "r"]]],
- ["ypos:", ["-", ["getParam", "y", "r"], 0.5]],
- ["putPenDown"],
- ["changeYposBy:", ["-", 0, ["getParam", "sy", "r"]]],
- ["changeXposBy:", ["-", 0, ["getParam", "sx", "r"]]],
- ["penColor:", ["getLine:ofList:", ["-", ["*", ["readVariable", "#c"], 3], 2], "Colors"]],
- ["changeYposBy:", ["getParam", "sy", "r"]],
- ["changeXposBy:", ["getParam", "sx", "r"]],
- ["putPenUp"]]],
- [3892,
- 249,
- [["procDef", "Draw Script Categories", [], [], true],
- ["gotoX:y:", -240, 154],
- ["penSize:", 54],
- ["penColor:", ["concatenate:with:", "0x", "555555"]],
- ["putPenDown"],
- ["changeXposBy:", 135],
- ["putPenUp"],
- ["call", "Draw Category %n %s %s", 1, "M", "Motion"],
- ["call", "Draw Category %n %s %s", 2, "L", "Looks"],
- ["call", "Draw Category %n %s %s", 3, "S", "Sound"],
- ["call", "Draw Category %n %s %s", 4, "P", "Pen"],
- ["call", "Draw Category %n %s %s", 5, "D", "Data"],
- ["call", "Draw Category %n %s %s", 6, "E", "Events"],
- ["call", "Draw Category %n %s %s", 7, "C", "Control"],
- ["call", "Draw Category %n %s %s", 8, "S", "Sensing"],
- ["call", "Draw Category %n %s %s", 9, "O", "Operators"],
- ["penSize:", 1],
- ["penColor:", -1],
- ["call", "write %s at %n %n", "New", -226, 165],
- ["call", "write %s at %n %n", "Save", -187, 165],
- ["call", "write %s at %n %n", "Load", -140, 165]]],
- [9145,
- 10,
- [["procDef", "Add Block %s txt? %s", ["schema", "txt"], ["", ""], true],
- ["doIfElse",
- [">", ["readVariable", "#BlockPool"], "0"],
- [["setVar:to:", "idx", ["readVariable", "#BlockPool"]],
- ["setVar:to:", "#BlockPool", ["getLine:ofList:", ["+", ["readVariable", "#BlockPool"], 9], "Script"]],
- ["setLine:ofList:to:", ["+", ["readVariable", "idx"], 1], "Script", ""],
- ["setLine:ofList:to:", ["+", ["readVariable", "idx"], 2], "Script", ""],
- ["setLine:ofList:to:", ["+", ["readVariable", "idx"], 3], "Script", ""],
- ["setLine:ofList:to:", ["+", ["readVariable", "idx"], 4], "Script", ""],
- ["setLine:ofList:to:", ["+", ["readVariable", "idx"], 5], "Script", ["getParam", "txt", "r"]],
- ["setLine:ofList:to:", ["+", ["readVariable", "idx"], 6], "Script", "0"],
- ["setLine:ofList:to:", ["+", ["readVariable", "idx"], 7], "Script", "0"],
- ["setLine:ofList:to:", ["+", ["readVariable", "idx"], 8], "Script", "0"],
- ["setLine:ofList:to:", ["+", ["readVariable", "idx"], 9], "Script", "0"],
- ["setLine:ofList:to:", ["+", ["readVariable", "idx"], 11], "Script", ""]],
- [["append:toList:", "", "Script"],
- ["setVar:to:", "idx", ["lineCountOfList:", "Script"]],
- ["append:toList:", "", "Script"],
- ["append:toList:", "", "Script"],
- ["append:toList:", "", "Script"],
- ["append:toList:", "", "Script"],
- ["append:toList:", ["getParam", "txt", "r"], "Script"],
- ["append:toList:", "0", "Script"],
- ["append:toList:", "0", "Script"],
- ["append:toList:", "0", "Script"],
- ["append:toList:", "0", "Script"],
- ["append:toList:", "", "Script"],
- ["append:toList:", "", "Script"]]],
- ["doIfElse",
- ["=", ["rounded", ["getParam", "schema", "r"]], ["getParam", "schema", "r"]],
- [["setLine:ofList:to:",
- ["readVariable", "idx"],
- "Script",
- ["getLine:ofList:",
- ["+", ["getParam", "schema", "r"], ["*", ["readVariable", "SCMA#"], 2]],
- "BLOCK_SCHEMA"]],
- ["setLine:ofList:to:",
- ["+", ["readVariable", "idx"], 10],
- "Script",
- ["getLine:ofList:",
- ["+", ["getParam", "schema", "r"], ["*", ["readVariable", "SCMA#"], 3]],
- "BLOCK_SCHEMA"]],
- ["setLine:ofList:to:", ["+", ["readVariable", "idx"], 11], "Script", ["getParam", "schema", "r"]]],
- [["setLine:ofList:to:", ["readVariable", "idx"], "Script", ["getParam", "schema", "r"]],
- ["setLine:ofList:to:", ["+", ["readVariable", "idx"], 10], "Script", ""],
- ["setLine:ofList:to:", ["+", ["readVariable", "idx"], 11], "Script", ""]]]]],
- [5548,
- 438,
- [["procDef", "Expand Body %n %s only arg %n", ["idx", "txt", "onlyIdx"], [1, "", 1], true],
- ["doIf",
- ["<", ["getParam", "onlyIdx", "r"], "1"],
- [["append:toList:", ["readVariable", "idx"], "stack"]]],
- ["setVar:to:", "#i", "1"],
- ["setVar:to:", "#tok", ""],
- ["setVar:to:", "#op", 0],
- ["setVar:to:", "#s", 0],
- ["setVar:to:", "#ins", ["+", ["getParam", "idx", "r"], 6]],
- ["setVar:to:", "_c", "1"],
- ["doRepeat",
- ["stringLength:", ["getParam", "txt", "r"]],
- [["setVar:to:", "#c", ["letter:of:", ["readVariable", "#i"], ["getParam", "txt", "r"]]],
- ["doIfElse",
- ["|",
- ["|", ["=", ["readVariable", "#c"], "("], ["=", ["readVariable", "#c"], "["]],
- ["&",
- ["=", ["readVariable", "#c"], "<"],
- ["not",
- ["=",
- ["letter:of:", ["+", ["readVariable", "#i"], 1], ["getParam", "txt", "r"]],
- " "]]]],
- [["setVar:to:", "#op", ["readVariable", "#c"]],
- ["doIf",
- [">", ["readVariable", "#tok"], ""],
- [["doIf",
- ["<", ["getParam", "onlyIdx", "r"], "1"],
- [["call", "Add Block %s txt? %s", "", ["readVariable", "#tok"]],
- ["setLine:ofList:to:", ["readVariable", "#ins"], "Script", ["readVariable", "idx"]],
- ["setVar:to:", "#ins", ["+", ["readVariable", "idx"], 9]]]],
- ["setVar:to:", "#tok", ""],
- ["setVar:to:", "#s", "0"],
- ["changeVar:by:", "_c", 1]]]],
- [["doIfElse",
- ["|",
- ["|", ["=", ["readVariable", "#c"], ")"], ["=", ["readVariable", "#c"], "]"]],
- ["|",
- ["&", [">", ["readVariable", "#op"], ""], ["=", ["readVariable", "#c"], ">"]],
- ["=", ["readVariable", "#c"], "."]]],
- [["doIfElse",
- ["|",
- ["<", ["getParam", "onlyIdx", "r"], "1"],
- ["=", ["getParam", "onlyIdx", "r"], ["readVariable", "_c"]]],
- [["doIfElse",
- ["=", ["readVariable", "#op"], "."],
- [["setLine:ofList:to:", ["+", ["readVariable", "#ins"], 1], "Script", ["readVariable", "#tok"]],
- ["setVar:to:", "#op", ""]],
- [["doIfElse",
- ["=", ["readVariable", "#op"], "("],
- [["call", "Add Block %s txt? %s", "n", ["readVariable", "#tok"]]],
- [["doIfElse",
- ["=", ["readVariable", "#op"], "["],
- [["call", "Add Block %s txt? %s", "t", ["readVariable", "#tok"]]],
- [["call", "Add Block %s txt? %s", "?", " "]]]]],
- ["doIf",
- ["<", ["getParam", "onlyIdx", "r"], "1"],
- [["setLine:ofList:to:", ["readVariable", "#ins"], "Script", ["readVariable", "idx"]]]],
- ["setVar:to:", "#ins", ["+", ["readVariable", "idx"], 9]],
- ["doIfElse",
- ["=", ["readVariable", "#c"], "."],
- [["setVar:to:", "#op", "."]],
- [["setVar:to:", "#op", ""]]]]]],
- [["setVar:to:", "#op", ""]]],
- ["setVar:to:", "#tok", ""],
- ["setVar:to:", "#s", "0"],
- ["doIfElse", ["=", ["readVariable", "#c"], "."], null, [["changeVar:by:", "_c", 1]]]],
- [["doIfElse",
- ["=", ["readVariable", "#c"], " "],
- [["doIf", [">", ["readVariable", "#tok"], ""], [["setVar:to:", "#s", "1"]]]],
- [["doIfElse",
- [">", ["readVariable", "#s"], "0"],
- [["setVar:to:", "#tok", ["concatenate:with:", ["readVariable", "#tok"], ["concatenate:with:", " ", ["readVariable", "#c"]]]],
- ["setVar:to:", "#s", "0"]],
- [["setVar:to:", "#tok", ["concatenate:with:", ["readVariable", "#tok"], ["readVariable", "#c"]]]]]]]]]]],
- ["changeVar:by:", "#i", 1]]],
- ["doIf",
- ["&",
- [">", ["readVariable", "#tok"], ""],
- ["<", ["getParam", "onlyIdx", "r"], "1"]],
- [["call", "Add Block %s txt? %s", "", ["readVariable", "#tok"]],
- ["setLine:ofList:to:", ["readVariable", "#ins"], "Script", ["readVariable", "idx"]]]],
- ["doIf", ["<", ["getParam", "onlyIdx", "r"], "1"], [["call", "pop"]]]]],
- [1347,
- 10,
- [["procDef", "pop", [], [], true],
- ["setVar:to:", "idx", ["getLine:ofList:", "last", "stack"]],
- ["deleteLine:ofList:", "last", "stack"]]],
- [6874,
- 373,
- [["procDef", "Delete Block %n", ["idx"], [1], true],
- ["doIf",
- [">", ["getParam", "idx", "r"], "0"],
- [["call", "Delete Block %n", ["getLine:ofList:", ["+", ["getParam", "idx", "r"], 6], "Script"]],
- ["call", "Delete Block %n", ["getLine:ofList:", ["+", ["getParam", "idx", "r"], 7], "Script"]],
- ["call", "Delete Block %n", ["getLine:ofList:", ["+", ["getParam", "idx", "r"], 8], "Script"]],
- ["call", "Delete Block %n", ["getLine:ofList:", ["+", ["getParam", "idx", "r"], 9], "Script"]],
- ["setLine:ofList:to:", ["+", ["getParam", "idx", "r"], 9], "Script", ["readVariable", "#BlockPool"]],
- ["setVar:to:", "#BlockPool", ["getParam", "idx", "r"]]]]]],
- [3896,
- 786.25,
- [["procDef", "Get picklist for %s", ["pick"], [""], true],
- ["deleteLine:ofList:", "all", "Stack"],
- ["doIfElse",
- ["=", ["getParam", "pick", "r"], "op"],
- [["append:toList:", "abs", "Stack"],
- ["append:toList:", "floor", "Stack"],
- ["append:toList:", "ceiling", "Stack"],
- ["append:toList:", "sqrt", "Stack"],
- ["append:toList:", "sin", "Stack"],
- ["append:toList:", "cos", "Stack"],
- ["append:toList:", "tan", "Stack"],
- ["append:toList:", "asin", "Stack"],
- ["append:toList:", "acos", "Stack"],
- ["append:toList:", "atan", "Stack"],
- ["append:toList:", "ln", "Stack"],
- ["append:toList:", "log", "Stack"],
- ["append:toList:", "e ^", "Stack"],
- ["append:toList:", "10 ^", "Stack"]],
- [["doIfElse",
- ["=", ["getParam", "pick", "r"], "dt"],
- [["append:toList:", "year", "Stack"],
- ["append:toList:", "month", "Stack"],
- ["append:toList:", "date", "Stack"],
- ["append:toList:", "day of week", "Stack"],
- ["append:toList:", "hour", "Stack"],
- ["append:toList:", "minute", "Stack"],
- ["append:toList:", "second", "Stack"]],
- [["doIfElse",
- ["=", ["getParam", "pick", "r"], "va"],
- [["setVar:to:", "_i", "1"],
- ["doRepeat",
- ["\/", ["lineCountOfList:", "vars"], 2],
- [["append:toList:", ["getLine:ofList:", ["readVariable", "_i"], "vars"], "Stack"], ["changeVar:by:", "_i", 2]]]],
- [["doIfElse",
- ["=", ["getParam", "pick", "r"], "ev"],
- [["setVar:to:", "_i", "1"],
- ["doRepeat",
- ["lineCountOfList:", "Roots"],
- [["call", "get all event names %n", ["getLine:ofList:", ["readVariable", "_i"], "Roots"]], ["changeVar:by:", "_i", 1]]],
- ["doIf",
- ["not", ["list:contains:", "Stack", ["readVariable", "Last Event"]]],
- [["append:toList:", ["readVariable", "Last Event"], "Stack"]]],
- ["append:toList:", "new message...", "Stack"]],
- [["doIfElse",
- ["=", ["getParam", "pick", "r"], "ls"],
- [["setVar:to:", "_i", "2"],
- ["doRepeat",
- ["\/", ["-", ["getLine:ofList:", 1, "lists"], 2], 4],
- [["append:toList:", ["getLine:ofList:", ["readVariable", "_i"], "lists"], "Stack"], ["changeVar:by:", "_i", 4]]]],
- [["doIfElse",
- ["=", ["getParam", "pick", "r"], "co"],
- [["append:toList:", ["getParam", "pick", "r"], "Stack"]],
- [["doIfElse",
- ["=", ["getParam", "pick", "r"], "sp"],
- [["append:toList:", ["getParam", "pick", "r"], "Stack"]],
- [["doIfElse",
- ["=", ["getParam", "pick", "r"], "pt"],
- [["append:toList:", "mouse-pointer", "Stack"]],
- [["doIfElse",
- ["=", ["getParam", "pick", "r"], "key"],
- [["setVar:to:", "_i", "1"],
- ["doRepeat",
- ["lineCountOfList:", "KeyList"],
- [["append:toList:", ["getLine:ofList:", ["readVariable", "_i"], "KeyList"], "Stack"], ["changeVar:by:", "_i", 1]]]],
- [["doIfElse",
- ["=", ["getParam", "pick", "r"], "rs"],
- [["append:toList:", "left-right", "Stack"], ["append:toList:", "don't rotate", "Stack"], ["append:toList:", "all around", "Stack"]],
- [["doIfElse",
- ["=", ["getParam", "pick", "r"], "st"],
- [["append:toList:", "all", "Stack"], ["append:toList:", "this script", "Stack"], ["append:toList:", "other scripts in sprite", "Stack"]],
- [["doIfElse",
- ["=", ["getParam", "pick", "r"], "?li"],
- [["append:toList:", "1", "Stack"], ["append:toList:", "last", "Stack"]],
- [["doIfElse",
- ["=", ["getParam", "pick", "r"], "?lia"],
- [["append:toList:", "1", "Stack"], ["append:toList:", "last", "Stack"], ["append:toList:", "all", "Stack"]],
- [["append:toList:", ["getParam", "pick", "r"], "Stack"]]]]]]]]]]]]]]]]]]]]]]]]]]]]],
- [848,
- 3397,
- [["procDef", "plain fill rect %n %n %n %n", ["x", "y", "sx", "sy"], [1, 1, 1, 1], true],
- ["doIfElse",
- [">", ["getParam", "sx", "r"], ["getParam", "sy", "r"]],
- [["setVar:to:", "#op", ["getParam", "sy", "r"]]],
- [["setVar:to:", "#op", ["getParam", "sx", "r"]]]],
- ["doUntil",
- ["<", ["readVariable", "#op"], "2"],
- [["setVar:to:", "#op", ["\/", ["readVariable", "#op"], 2]],
- ["penSize:", ["readVariable", "#op"]],
- ["xpos:",
- ["+",
- ["+", ["getParam", "x", "r"], ["\/", ["readVariable", "#op"], 2]],
- 0.5]],
- ["ypos:",
- ["-",
- ["-", ["getParam", "y", "r"], ["\/", ["readVariable", "#op"], 2]],
- 0.5]],
- ["putPenDown"],
- ["changeXposBy:", ["-", ["-", ["getParam", "sx", "r"], ["readVariable", "#op"]], 1]],
- ["changeYposBy:", ["-", 1, ["-", ["getParam", "sy", "r"], ["readVariable", "#op"]]]],
- ["changeXposBy:", ["-", 1, ["-", ["getParam", "sx", "r"], ["readVariable", "#op"]]]],
- ["changeYposBy:", ["-", ["-", ["getParam", "sy", "r"], ["readVariable", "#op"]], 1]],
- ["putPenUp"]]]]],
- [1349.2,
- 3271.1,
- [["procDef", "Main Menu Click", [], [], false],
- ["doIfElse",
- ["<", ["mouseX"], "-203"],
- [["doAsk", "Start a New Project? (Y\/N)"],
- ["doIf",
- ["=", ["answer"], "Y"],
- [["setVar:to:", "#BlockPool", 0],
- ["deleteLine:ofList:", "all", "Script"],
- ["deleteLine:ofList:", "all", "Roots"],
- ["deleteLine:ofList:", "all", "Palette"],
- ["deleteLine:ofList:", "all", "vars"],
- ["deleteLine:ofList:", "all", "lists"],
- ["append:toList:", "2", "lists"],
- ["setVar:to:", "Last Event", ""],
- ["doBroadcastAndWait", "Reset Last Var List"],
- ["doBroadcastAndWait", "change palette"]]]],
- [["doIfElse",
- ["<", ["mouseX"], "-155"],
- [["doBroadcastAndWait", "Save JSON"]],
- [["call", "Show Load Project Drop Down"]]]]]]],
- [839.5, 379, [["whenIReceive", "LOAD FAILED"], ["stopScripts", "other scripts in sprite"]]],
- [1885.85,
- 2356,
- [["procDef", "Click List", [], [], false],
- ["setVar:to:", "#ClickIdx", ["getLine:ofList:", ["+", ["readVariable", "#ClickIdx"], 6], "Script"]],
- ["doIfElse",
- ["=", ["getLine:ofList:", ["readVariable", "#ClickIdx"], "Script"], "bt"],
- [["doBroadcastAndWait", "new list"]],
- [["doIf",
- ["<", ["getLine:ofList:", ["+", ["readVariable", "#ClickIdx"], 1], "Script"], "-199"],
- [["doAsk", "Delete this list? (Y|N)"],
- ["doIf",
- ["=", ["answer"], "Y"],
- [["setVar:to:", "#tok", ["getLine:ofList:", ["+", ["readVariable", "#ClickIdx"], 5], "Script"]],
- ["doBroadcastAndWait", "delete list"]]]]]]]]],
- [1349.8,
- 959.1,
- [["procDef", "Make Drop Down (from stack) at par width %n", ["pwidth"], [1], false],
- ["setVar:to:", "_i", "1"],
- ["setVar:to:", "_vy2", "0"],
- ["doRepeat",
- ["lineCountOfList:", "Stack"],
- [["call", "Len = Width of %s", ["getLine:ofList:", ["readVariable", "_i"], "Stack"]],
- ["doIf",
- [">", ["readVariable", "Len"], ["readVariable", "_vy2"]],
- [["setVar:to:", "_vy2", ["readVariable", "Len"]]]],
- ["changeVar:by:", "_i", 1]]],
- ["setVar:to:",
- "_vy2",
- ["*",
- ["computeFunction:of:", "ceiling", ["\/", ["+", ["readVariable", "_vy2"], 12], 2]],
- 2]],
- ["setVar:to:", "_vy", ["+", ["*", ["lineCountOfList:", "Stack"], 11], 8]],
- ["setVar:to:", "#ddscmax", 0],
- ["doIf",
- [">", ["readVariable", "_vy"], "358"],
- [["setVar:to:",
- "#ddscmax",
- ["computeFunction:of:", "floor", ["\/", ["-", ["readVariable", "_vy"], 350], 11]]],
- ["setVar:to:", "_vy", "358"]]],
- ["setVar:to:", "#ddscy", 0],
- ["doIf",
- ["<", ["-", ["readVariable", "#ddy"], ["readVariable", "_vy"]], "-179"],
- [["changeVar:by:", "#ddx", ["getParam", "pwidth", "r"]],
- ["setVar:to:", "#ddy", ["-", ["readVariable", "_vy"], 179]]]],
- ["call", "draw dropdown %n %b", ["getParam", "idx", "r"], ["not", false]],
- ["doUntil",
- ["not", ["mousePressed"]],
- [["call", "draw dropdown %n %b", ["getParam", "idx", "r"], false]]],
- ["doUntil", ["mousePressed"], [["call", "draw dropdown %n %b", ["getParam", "idx", "r"], false]]]]],
- [1920.8,
- 3278.7,
- [["procDef", "Show Load Project Drop Down", [], [], false],
- ["deleteLine:ofList:", "all", "Stack"],
- ["append:toList:", ">> Click here to paste in JSON <<", "Stack"],
- ["append:toList:", "", "Stack"],
- ["setVar:to:", "#c", "1"],
- ["doUntil",
- [">", ["readVariable", "#c"], ["lineCountOfList:", "Example Projects"]],
- [["append:toList:", ["getLine:ofList:", ["readVariable", "#c"], "Example Projects"], "Stack"], ["changeVar:by:", "#c", 2]]],
- ["setVar:to:", "#ddx", "-146"],
- ["setVar:to:", "#ddy", "160"],
- ["setVar:to:", "#c", "13"],
- ["call", "Make Drop Down (from stack) at par width %n", 40],
- ["doIf",
- ["=", ["readVariable", "#DragDest"], "1"],
- [["doBroadcastAndWait", "Load JSON"], ["stopScripts", "this script"]]],
- ["setVar:to:", "#DragDest", ["-", ["*", ["readVariable", "#DragDest"], 2], 5]],
- ["doIf",
- [">", ["readVariable", "#DragDest"], "0"],
- [["doIf",
- ["<", ["readVariable", "#DragDest"], ["lineCountOfList:", "Example Projects"]],
- [["setVar:to:", "#DragDest", ["getLine:ofList:", ["+", ["readVariable", "#DragDest"], 1], "Example Projects"]],
- ["doBroadcastAndWait", "Load Example JSON"]]]]]]],
- [1887.1,
- 2773.45,
- [["procDef", "Get block color", [], [], true],
- ["setVar:to:", "_i", "1"],
- ["setVar:to:", "_ax", "0"],
- ["doUntil",
- [">", ["readVariable", "_i"], ["lineCountOfList:", "Stack"]],
- [["setVar:to:", "cc", ["getLine:ofList:", ["getLine:ofList:", ["readVariable", "_i"], "Stack"], "Script"]],
- ["doIf",
- ["not", ["=", ["readVariable", "_ax"], "9"]],
- [["doIf",
- ["|", ["list:contains:", "TYPE_BLOCK", ["readVariable", "cc"]], ["list:contains:", "TYPE_ARG", ["readVariable", "cc"]]],
- [["setVar:to:",
- "#c",
- ["getLine:ofList:", ["+", ["getLine:ofList:", ["readVariable", "_i"], "Stack"], 10], "Script"]],
- ["stopScripts", "this script"]]]]],
- ["changeVar:by:", "_i", 1],
- ["setVar:to:", "_ax", ["getLine:ofList:", ["readVariable", "_i"], "Stack"]],
- ["changeVar:by:", "_i", 1]]]]],
- [1357.95,
- 1771,
- [["procDef", "draw dropdown %n %b", ["idx", "first?"], [1, false], true],
- ["setVar:to:", "_vy", ["+", ["*", ["lineCountOfList:", "Stack"], 11], 8]],
- ["doIf", [">", ["readVariable", "_vy"], "358"], [["setVar:to:", "_vy", "358"]]],
- ["setVar:to:", "_i", ["-", ["mouseX"], ["readVariable", "#ddx"]]],
- ["doIfElse",
- ["|",
- ["<", ["readVariable", "_i"], "0"],
- [">", ["readVariable", "_i"], ["readVariable", "_vy2"]]],
- [["setVar:to:", "#DragDest", 0]],
- [["setVar:to:", "_i", ["-", ["-", ["readVariable", "#ddy"], 4], ["mouseY"]]],
- ["doIfElse",
- ["|",
- ["<", ["readVariable", "_i"], "0"],
- [">", ["readVariable", "_i"], ["-", ["readVariable", "_vy"], 8]]],
- [["setVar:to:", "#DragDest", "0"]],
- [["doIfElse",
- ["<", ["readVariable", "_i"], "15"],
- [["doIf", [">", ["readVariable", "#ddscy"], "0"], [["changeVar:by:", "#ddscy", -1]]]],
- [["doIfElse",
- [">", ["readVariable", "_i"], ["-", ["readVariable", "_vy"], 23]],
- [["doIf",
- ["<", ["readVariable", "#ddscy"], ["readVariable", "#ddscmax"]],
- [["changeVar:by:", "#ddscy", 1]]]],
- null]]],
- ["setVar:to:",
- "#DragDest",
- ["+",
- ["+", ["computeFunction:of:", "floor", ["\/", ["readVariable", "_i"], 11]], 1],
- ["readVariable", "#ddscy"]]]]]]],
- ["call",
- "fill rect %n %n %n %n %b",
- ["readVariable", "#ddx"],
- ["readVariable", "#ddy"],
- ["readVariable", "_vy2"],
- ["readVariable", "_vy"],
- ["getParam", "first?", "b"]],
- ["setVar:to:", "ii", ["+", ["readVariable", "#ddscy"], 1]],
- ["setVar:to:", "_vy", ["-", ["readVariable", "#ddy"], 13]],
- ["setVar:to:", "#s", ""],
- ["doRepeat",
- ["lineCountOfList:", "Stack"],
- [["doIfElse",
- ["=", ["readVariable", "#DragDest"], ["readVariable", "ii"]],
- [["penColor:", -1],
- ["penSize:", 6],
- ["gotoX:y:", ["+", ["readVariable", "#ddx"], 4], ["+", ["readVariable", "_vy"], 0]],
- ["putPenDown"],
- ["changeXposBy:", ["-", ["readVariable", "_vy2"], 8]],
- ["changeYposBy:", 6],
- ["changeXposBy:", ["-", 8, ["readVariable", "_vy2"]]],
- ["changeYposBy:", -6],
- ["putPenUp"],
- ["penColor:", -16711423],
- ["penSize:", 1],
- ["setVar:to:", "#s", ["getLine:ofList:", ["readVariable", "ii"], "Stack"]]],
- [["penColor:", -1], ["penSize:", 1]]],
- ["doIf",
- [">", ["readVariable", "_vy"], "-180"],
- [["call",
- "write %s at %n %n",
- ["getLine:ofList:", ["readVariable", "ii"], "Stack"],
- ["+", ["readVariable", "#ddx"], 7],
- ["readVariable", "_vy"]]]],
- ["changeVar:by:", "_vy", -11],
- ["changeVar:by:", "ii", 1]]]]],
- [4315.15,
- 2731.35,
- [["procDef", "Reset Last Event Name", [], [], false],
- ["deleteLine:ofList:", "all", "Stack"],
- ["setVar:to:", "_i", "1"],
- ["doRepeat",
- ["lineCountOfList:", "Roots"],
- [["call", "get all event names %n", ["getLine:ofList:", ["readVariable", "_i"], "Roots"]], ["changeVar:by:", "_i", 1]]],
- ["doIfElse",
- [">", ["lineCountOfList:", "Stack"], "0"],
- [["setVar:to:", "Last Event", ["getLine:ofList:", "last", "Stack"]]],
- [["setVar:to:", "Last Event", "message1"]]]]],
- [4316,
- 2604.25,
- [["whenIReceive", "Reset Last Var List"],
- ["doIf", ["=", ["readVariable", "Last Event"], ""], [["call", "Reset Last Event Name"]]]]],
- [1097, 674, [["whenKeyPressed", "left arrow"], ["call", "Scroll All %n %n", 32, 0]]],
- [1099, 761, [["whenKeyPressed", "right arrow"], ["call", "Scroll All %n %n", -32, 0]]],
- [3355,
- 944,
- [["procDef", "Scroll All %n %n", ["x", "y"], [1, 1], true],
- ["doIf", [">", ["readVariable", "dirty"], "0"], [["stopScripts", "this script"]]],
- ["doIf",
- ["=", ["getParam", "x", "r"], "0"],
- [["call", "Get Max Extent"],
- ["doIfElse",
- [">", ["getParam", "y", "r"], "0"],
- [["doIf",
- [">", ["+", ["readVariable", "!DrawLow"], ["getParam", "y", "r"]], "150"],
- [["stopScripts", "this script"]]]],
- [["doIf",
- ["<", ["+", ["readVariable", "!DrawHigh"], ["getParam", "y", "r"]], "-150"],
- [["stopScripts", "this script"]]]]],
- ["setVar:to:", "_ci", "1"],
- ["doRepeat",
- ["lineCountOfList:", "Roots"],
- [["setVar:to:", "_i", ["getLine:ofList:", ["readVariable", "_ci"], "Roots"]],
- ["setVar:to:",
- "_vy",
- ["+",
- ["getLine:ofList:", ["+", ["readVariable", "_i"], 2], "Script"],
- ["getParam", "y", "r"]]],
- ["setLine:ofList:to:", ["+", ["readVariable", "_i"], 2], "Script", ["readVariable", "_vy"]],
- ["changeVar:by:", "_ci", 1]]],
- ["call", "invalidate all %n", 1],
- ["stopScripts", "this script"]]],
- ["doIfElse",
- ["<", ["getParam", "x", "r"], "0"],
- [["doIf",
- [">", ["readVariable", "#SideBarOpen"], "0"],
- [["setVar:to:", "#SideBarOpen", 0],
- ["setVar:to:", "_ci", "1"],
- ["doRepeat",
- ["lineCountOfList:", "Roots"],
- [["setVar:to:", "_i", ["getLine:ofList:", ["readVariable", "_ci"], "Roots"]],
- ["setVar:to:",
- "_vx",
- ["-", ["getLine:ofList:", ["+", ["readVariable", "_i"], 1], "Script"], 140]],
- ["setLine:ofList:to:", ["+", ["readVariable", "_i"], 1], "Script", ["readVariable", "_vx"]],
- ["changeVar:by:", "_ci", 1]]],
- ["call", "invalidate all %n", 1],
- ["stopScripts", "this script"]]]],
- [["doIf",
- ["=", ["readVariable", "#SideBarOpen"], "0"],
- [["setVar:to:", "#SideBarOpen", "140"],
- ["setVar:to:", "_ci", "1"],
- ["doRepeat",
- ["lineCountOfList:", "Roots"],
- [["setVar:to:", "_i", ["getLine:ofList:", ["readVariable", "_ci"], "Roots"]],
- ["setVar:to:",
- "_vx",
- ["+", ["getLine:ofList:", ["+", ["readVariable", "_i"], 1], "Script"], 140]],
- ["setLine:ofList:to:", ["+", ["readVariable", "_i"], 1], "Script", ["readVariable", "_vx"]],
- ["changeVar:by:", "_ci", 1]]],
- ["call", "invalidate all %n", 2],
- ["stopScripts", "this script"]]]]]]],
- [10714.6,
- 22,
- [["procDef", "write %s at %n %n", ["txt", "x", "y"], ["", 1, 1], true],
- ["setVar:to:", "_ax", ["+", ["computeFunction:of:", "floor", ["getParam", "y", "r"]], 6.65]],
- ["setVar:to:", "_ci", "1"],
- ["xpos:", ["-", ["getParam", "x", "r"], 0.5]],
- ["doRepeat",
- ["stringLength:", ["getParam", "txt", "r"]],
- [["setVar:to:",
- "_c",
- ["getAttribute:of:", ["letter:of:", ["readVariable", "_ci"], ["getParam", "txt", "r"]], "font"]],
- ["doIfElse",
- ["=", ["readVariable", "_c"], "0"],
- [["changeXposBy:", 4]],
- [["setVar:to:", "_i", "1"],
- ["doRepeat",
- ["letter:of:", 1, ["readVariable", "_c"]],
- [["changeVar:by:", "_i", 1],
- ["doIfElse",
- ["=", ["letter:of:", ["readVariable", "_i"], ["readVariable", "_c"]], "0"],
- [["changeVar:by:", "_i", 1], ["ypos:", ["+", ["readVariable", "_ax"], 0.35]]],
- [["ypos:", ["readVariable", "_ax"]],
- ["putPenDown"],
- ["changeYposBy:", ["-", 0.35, ["letter:of:", ["readVariable", "_i"], ["readVariable", "_c"]]]],
- ["putPenUp"],
- ["changeVar:by:", "_i", 1]]],
- ["doUntil",
- ["=", ["letter:of:", ["readVariable", "_i"], ["readVariable", "_c"]], "0"],
- [["changeYposBy:", ["-", -0.35, ["letter:of:", ["readVariable", "_i"], ["readVariable", "_c"]]]],
- ["changeVar:by:", "_i", 1],
- ["putPenDown"],
- ["changeYposBy:", ["-", 0.35, ["letter:of:", ["readVariable", "_i"], ["readVariable", "_c"]]]],
- ["putPenUp"],
- ["changeVar:by:", "_i", 1]]],
- ["changeXposBy:", 1]]],
- ["changeXposBy:", 1]]],
- ["changeVar:by:", "_ci", 1]]]]],
- [7245,
- 10,
- [["procDef", "Len = Width of %s", ["txt"], [""], true],
- ["setVar:to:", "_ci", "1"],
- ["setVar:to:", "Len", 0],
- ["doRepeat",
- ["stringLength:", ["getParam", "txt", "r"]],
- [["setVar:to:",
- "_c",
- ["getAttribute:of:", ["letter:of:", ["readVariable", "_ci"], ["getParam", "txt", "r"]], "font"]],
- ["doIfElse",
- ["=", ["readVariable", "_c"], "0"],
- [["changeVar:by:", "Len", 4]],
- [["changeVar:by:", "Len", ["+", ["letter:of:", 1, ["readVariable", "_c"]], 1]]]],
- ["changeVar:by:", "_ci", 1]]]]],
- [15.85,
- 4088.3,
- [["procDef", "Add to Examples", [], [], false],
- ["doAsk", "JSON"],
- ["append:toList:", ["answer"], "Example Projects"],
- ["doAsk", "Title"],
- ["insert:at:ofList:", ["answer"], ["lineCountOfList:", "Example Projects"], "Example Projects"]]]],
- "scriptComments": [[167, 16, 321, 243, false, 2877, "Type - ie. 'block'\rx\ry\rsx\rsy\rtxt\rIndex of Param element\rIndex of Nested Element\rIndex of Nested Element\rIndex of Next Sibling\r\r* txt onwards are optional depending on block type"],
- [11220, 353, 150, 200, false, 1404, "Block"],
- [8399, 221, 150, 200, false, 2444, "Drop a 'block'"],
- [255, 2377, 150, 200, false, 3072, "Green flag"],
- [4110, 1594.25, 150, 200, false, 4133, "event"],
- [4122, 1856.25, 150, 200, false, 4150, "list"],
- [4140, 2027.25, 150, 200, false, 4162, "color"],
- [4155, 2101.25, 150, 200, false, 4167, "sprite"],
- [4168, 2175.25, 150, 200, false, 4172, "mouse pointer"],
- [4198, 2408.25, 150, 200, false, 4186, "rotation style"],
- [4213, 2522.25, 150, 200, false, 4192, "stop"]],
- "costumes": [{
- "costumeName": " ",
- "baseLayerID": 1,
- "baseLayerMD5": "005ff0c0e312ccc6e8fcff5cc0c8532f.svg",
- "bitmapResolution": 1,
- "rotationCenterX": 87,
- "rotationCenterY": 79
- }],
- "currentCostumeIndex": 0,
- "scratchX": 4.5,
- "scratchY": -111,
- "scale": 1,
- "direction": 90,
- "rotationStyle": "none",
- "isDraggable": false,
- "indexInLibrary": 2,
- "visible": false,
- "spriteInfo": {
- }
- },
- {
- "objName": "Parser",
- "variables": [{
- "name": "idx",
- "value": 1645,
- "isPersistent": false
- },
- {
- "name": "#i",
- "value": 17,
- "isPersistent": false
- },
- {
- "name": "#tok",
- "value": "",
- "isPersistent": false
- },
- {
- "name": "#c",
- "value": ")",
- "isPersistent": false
- },
- {
- "name": "#op",
- "value": "",
- "isPersistent": false
- },
- {
- "name": "#s",
- "value": "0",
- "isPersistent": false
- },
- {
- "name": "#ins",
- "value": 1198,
- "isPersistent": false
- },
- {
- "name": "#x",
- "value": "1",
- "isPersistent": false
- },
- {
- "name": "#y",
- "value": 186,
- "isPersistent": false
- },
- {
- "name": "#sid",
- "value": "---",
- "isPersistent": false
- },
- {
- "name": "#cat",
- "value": 1,
- "isPersistent": false
- },
- {
- "name": "cTime",
- "value": 94,
- "isPersistent": false
- },
- {
- "name": "vi",
- "value": "2",
- "isPersistent": false
- },
- {
- "name": "varIndex#",
- "value": -1,
- "isPersistent": false
- }],
- "lists": [{
- "listName": "stack",
- "contents": [],
- "isPersistent": false,
- "x": 5,
- "y": 267,
- "width": 386,
- "height": 479,
- "visible": false
- },
- {
- "listName": "PAL_LAYOUT",
- "contents": ["56",
- "147",
- "148",
- "",
- "68",
- "95",
- "",
- "66",
- "65",
- "63",
- "",
- "25",
- "161",
- "26",
- "164",
- "",
- "15",
- "",
- "117",
- "",
- "160",
- "163",
- "67",
- "---",
- "103",
- "102",
- "139",
- "138",
- "",
- "124",
- "69",
- "",
- "81",
- "86",
- "130",
- "",
- "17",
- "113",
- "55",
- "",
- "21",
- "118",
- "",
- "30",
- "64",
- "",
- "34",
- "106",
- "105",
- "---",
- "94",
- "48",
- "133",
- "",
- "93",
- "100",
- "",
- "89",
- "75",
- "",
- "24",
- "123",
- "150",
- "",
- "22",
- "119",
- "137",
- "---",
- "27",
- "",
- "129",
- "",
- "96",
- "97",
- "166",
- "",
- "91",
- "18",
- "115",
- "",
- "19",
- "116",
- "",
- "20",
- "92",
- "",
- "168",
- "169",
- "---",
- "99",
- "",
- "120",
- "23",
- "126",
- "72",
- "",
- "33",
- "",
- "13",
- "",
- "39",
- "74",
- "114",
- "",
- "59",
- "79",
- "80",
- "",
- "125",
- "71",
- "---",
- "155",
- "157",
- "153",
- "158",
- "",
- "159",
- "",
- "156",
- "16",
- "42",
- "---",
- "151",
- "49",
- "43",
- "",
- "46",
- "47",
- "52",
- "51",
- "",
- "134",
- "152",
- "",
- "154",
- "37",
- "38",
- "---",
- "144",
- "145",
- "29",
- "40",
- "",
- "41",
- "12",
- "",
- "77",
- "83",
- "84",
- "85",
- "",
- "127",
- "",
- "141",
- "142",
- "",
- "58",
- "",
- "140",
- "143",
- "62",
- "---",
- "6",
- "1",
- "2",
- "3",
- "",
- "98",
- "",
- "7",
- "8",
- "9",
- "",
- "4",
- "10",
- "88",
- "",
- "32",
- "78",
- "136",
- "",
- "5",
- "101",
- "",
- "31",
- "---"],
- "isPersistent": false,
- "x": 239,
- "y": 61,
- "width": 202,
- "height": 280,
- "visible": false
- }],
- "scripts": [[431,
- 120,
- [["procDef", "Append Sibling %s txt? %s col %n", ["typ", "txt", "col"], ["", "", 1], true],
- ["append:toList:", ["readVariable", "idx"], "stack"],
- ["call", "Add Block %s txt? %s", ["getParam", "typ", "r"], ["getParam", "txt", "r"]],
- ["setLine:ofList:to:", ["+", ["getLine:ofList:", "last", "stack"], 9], "Script", ["readVariable", "idx"]],
- ["deleteLine:ofList:", "last", "stack"]]],
- [2302,
- 10,
- [["procDef", "Append Nested %s txt? %s col %n", ["typ", "txt", "col"], ["", "", 1], true],
- ["append:toList:", ["readVariable", "idx"], "stack"],
- ["call", "Add Block %s txt? %s", ["getParam", "typ", "r"], ["getParam", "txt", "r"]],
- ["setLine:ofList:to:", ["+", ["getLine:ofList:", "last", "stack"], 7], "Script", ["readVariable", "idx"]]]],
- [2755,
- 10,
- [["procDef", "Delete Block %n", ["idx"], [1], true],
- ["doIf",
- [">", ["getParam", "idx", "r"], "0"],
- [["call", "Delete Block %n", ["getLine:ofList:", ["+", ["getParam", "idx", "r"], 6], "Script"]],
- ["call", "Delete Block %n", ["getLine:ofList:", ["+", ["getParam", "idx", "r"], 7], "Script"]],
- ["call", "Delete Block %n", ["getLine:ofList:", ["+", ["getParam", "idx", "r"], 8], "Script"]],
- ["call", "Delete Block %n", ["getLine:ofList:", ["+", ["getParam", "idx", "r"], 9], "Script"]],
- ["setLine:ofList:to:", ["+", ["getParam", "idx", "r"], 9], "Script", ["readVariable", "#BlockPool"]],
- ["setVar:to:", "#BlockPool", ["getParam", "idx", "r"]]]]]],
- [2302,
- 166,
- [["procDef", "Add Root %s at %n %n to palette? %b", ["schema", "x", "y", "palette?"], ["", 1, 1, false], true],
- ["deleteLine:ofList:", "all", "stack"],
- ["call", "Add Block %s txt? %s", ["getParam", "schema", "r"], ""],
- ["doIfElse",
- ["getParam", "palette?", "b"],
- [["append:toList:", ["readVariable", "idx"], "Palette"]],
- [["append:toList:", ["readVariable", "idx"], "Roots"]]],
- ["setLine:ofList:to:", ["+", ["readVariable", "idx"], 1], "Script", ["getParam", "x", "r"]],
- ["setLine:ofList:to:", ["+", ["readVariable", "idx"], 2], "Script", ["getParam", "y", "r"]],
- ["call",
- "Expand Body %n %s",
- ["readVariable", "idx"],
- ["getLine:ofList:", ["+", ["getParam", "schema", "r"], ["readVariable", "SCMA#"]], "BLOCK_SCHEMA"]]]],
- [1651,
- 10,
- [["procDef", "Add Block %s txt? %s", ["schema", "txt"], ["", ""], true],
- ["doIfElse",
- [">", ["readVariable", "#BlockPool"], "0"],
- [["setVar:to:", "idx", ["readVariable", "#BlockPool"]],
- ["setVar:to:", "#BlockPool", ["getLine:ofList:", ["+", ["readVariable", "#BlockPool"], 9], "Script"]],
- ["setLine:ofList:to:", ["+", ["readVariable", "idx"], 1], "Script", ""],
- ["setLine:ofList:to:", ["+", ["readVariable", "idx"], 2], "Script", ""],
- ["setLine:ofList:to:", ["+", ["readVariable", "idx"], 3], "Script", ""],
- ["setLine:ofList:to:", ["+", ["readVariable", "idx"], 4], "Script", ""],
- ["setLine:ofList:to:", ["+", ["readVariable", "idx"], 5], "Script", ["getParam", "txt", "r"]],
- ["setLine:ofList:to:", ["+", ["readVariable", "idx"], 6], "Script", "0"],
- ["setLine:ofList:to:", ["+", ["readVariable", "idx"], 7], "Script", "0"],
- ["setLine:ofList:to:", ["+", ["readVariable", "idx"], 8], "Script", "0"],
- ["setLine:ofList:to:", ["+", ["readVariable", "idx"], 9], "Script", "0"],
- ["setLine:ofList:to:", ["+", ["readVariable", "idx"], 11], "Script", ""]],
- [["append:toList:", "", "Script"],
- ["setVar:to:", "idx", ["lineCountOfList:", "Script"]],
- ["append:toList:", "", "Script"],
- ["append:toList:", "", "Script"],
- ["append:toList:", "", "Script"],
- ["append:toList:", "", "Script"],
- ["append:toList:", ["getParam", "txt", "r"], "Script"],
- ["append:toList:", "0", "Script"],
- ["append:toList:", "0", "Script"],
- ["append:toList:", "0", "Script"],
- ["append:toList:", "0", "Script"],
- ["append:toList:", "", "Script"],
- ["append:toList:", "", "Script"]]],
- ["doIfElse",
- ["=", ["rounded", ["getParam", "schema", "r"]], ["getParam", "schema", "r"]],
- [["setLine:ofList:to:",
- ["readVariable", "idx"],
- "Script",
- ["getLine:ofList:",
- ["+", ["getParam", "schema", "r"], ["*", ["readVariable", "SCMA#"], 2]],
- "BLOCK_SCHEMA"]],
- ["setLine:ofList:to:",
- ["+", ["readVariable", "idx"], 10],
- "Script",
- ["getLine:ofList:",
- ["+", ["getParam", "schema", "r"], ["*", ["readVariable", "SCMA#"], 3]],
- "BLOCK_SCHEMA"]],
- ["setLine:ofList:to:", ["+", ["readVariable", "idx"], 11], "Script", ["getParam", "schema", "r"]]],
- [["setLine:ofList:to:", ["readVariable", "idx"], "Script", ["getParam", "schema", "r"]],
- ["setLine:ofList:to:", ["+", ["readVariable", "idx"], 10], "Script", ""],
- ["setLine:ofList:to:", ["+", ["readVariable", "idx"], 11], "Script", ""]]]]],
- [1121,
- 10,
- [["procDef", "Create Palette %n", ["gap"], [1], true],
- ["setVar:to:", "#sid", "1"],
- ["setVar:to:", "#y", "1"],
- ["doUntil",
- ["=", ["readVariable", "#sid"], ["readVariable", "#Section"]],
- [["doIf",
- ["=", ["getLine:ofList:", ["readVariable", "#y"], "PAL_LAYOUT"], "---"],
- [["changeVar:by:", "#sid", 1]]],
- ["changeVar:by:", "#y", 1]]],
- ["setVar:to:", "#sid", ["getLine:ofList:", ["readVariable", "#y"], "PAL_LAYOUT"]],
- ["setVar:to:", "#x", 0],
- ["doUntil",
- ["=", ["readVariable", "#sid"], "---"],
- [["doIfElse",
- [">", ["readVariable", "#sid"], ""],
- [["doIf",
- [">",
- ["getLine:ofList:", ["+", ["readVariable", "#sid"], ["*", 3, ["readVariable", "SCMA#"]]], "BLOCK_SCHEMA"],
- ""],
- [["setVar:to:", "#x", "1"],
- ["doIfElse",
- ["=", ["readVariable", "#sid"], "99"],
- [["call", "Add Root %s at %n %n to palette? %b", "99", -235, 0, ["not", false]],
- ["setLine:ofList:to:", ["+", ["readVariable", "idx"], 10], "Script", "12"],
- ["setVar:to:", "idx", ["getLine:ofList:", ["+", ["readVariable", "idx"], 6], "Script"]],
- ["setLine:ofList:to:", ["readVariable", "idx"], "Script", "bt"],
- ["setVar:to:", "vi", "1"],
- ["doRepeat",
- ["\/", ["lineCountOfList:", "vars"], 2],
- [["call", "Add Root %s at %n %n to palette? %b", "99", -235, 0, ["not", false]],
- ["setVar:to:", "idx", ["getLine:ofList:", ["+", ["readVariable", "idx"], 6], "Script"]],
- ["setLine:ofList:to:",
- ["+", ["readVariable", "idx"], 5],
- "Script",
- ["getLine:ofList:", ["readVariable", "vi"], "vars"]],
- ["changeVar:by:", "vi", 2]]]],
- [["doIfElse",
- ["=", ["readVariable", "#sid"], "33"],
- [["call", "Add Root %s at %n %n to palette? %b", "33", -235, 0, ["not", false]],
- ["setLine:ofList:to:", ["+", ["readVariable", "idx"], 10], "Script", "12"],
- ["setVar:to:", "idx", ["getLine:ofList:", ["+", ["readVariable", "idx"], 6], "Script"]],
- ["setLine:ofList:to:", ["readVariable", "idx"], "Script", "bt"],
- ["setVar:to:", "vi", "2"],
- ["doRepeat",
- ["\/", ["-", ["getLine:ofList:", 1, "lists"], 2], 4],
- [["call", "Add Root %s at %n %n to palette? %b", "33", -235, 0, ["not", false]],
- ["setVar:to:", "idx", ["getLine:ofList:", ["+", ["readVariable", "idx"], 6], "Script"]],
- ["setLine:ofList:to:",
- ["+", ["readVariable", "idx"], 5],
- "Script",
- ["getLine:ofList:", ["readVariable", "vi"], "lists"]],
- ["changeVar:by:", "vi", 4]]]],
- [["call", "Add Root %s at %n %n to palette? %b", ["readVariable", "#sid"], -235, 0, ["not", false]]]]]]]]],
- [["doIf",
- [">", ["readVariable", "#x"], "0"],
- [["call", "Add Root %s at %n %n to palette? %b", "---", -400, 0, ["not", false]], ["setVar:to:", "#x", 0]]]]],
- ["changeVar:by:", "#y", 1],
- ["setVar:to:", "#sid", ["getLine:ofList:", ["readVariable", "#y"], "PAL_LAYOUT"]]]]]],
- [431,
- 474,
- [["procDef", "Add Child %s", ["schema"], [""], true],
- ["append:toList:", ["readVariable", "idx"], "stack"],
- ["call", "Add Block %s txt? %s", ["getParam", "schema", "r"], ""],
- ["setLine:ofList:to:", ["+", ["getLine:ofList:", "last", "stack"], 9], "Script", ["readVariable", "idx"]],
- ["deleteLine:ofList:", "last", "stack"],
- ["call",
- "Expand Body %n %s",
- ["readVariable", "idx"],
- ["getLine:ofList:", ["+", ["getParam", "schema", "r"], ["readVariable", "SCMA#"]], "BLOCK_SCHEMA"]]]],
- [431,
- 686,
- [["procDef", "Expand Body %n %s", ["idx", "txt"], [1, ""], true],
- ["append:toList:", ["readVariable", "idx"], "stack"],
- ["setVar:to:", "#i", "1"],
- ["setVar:to:", "#tok", ""],
- ["setVar:to:", "#op", 0],
- ["setVar:to:", "#s", 0],
- ["setVar:to:", "#ins", ["+", ["getParam", "idx", "r"], 6]],
- ["doRepeat",
- ["stringLength:", ["getParam", "txt", "r"]],
- [["setVar:to:", "#c", ["letter:of:", ["readVariable", "#i"], ["getParam", "txt", "r"]]],
- ["doIfElse",
- ["|",
- ["|", ["=", ["readVariable", "#c"], "("], ["=", ["readVariable", "#c"], "["]],
- ["&",
- ["=", ["readVariable", "#c"], "<"],
- ["not",
- ["=",
- ["letter:of:", ["+", ["readVariable", "#i"], 1], ["getParam", "txt", "r"]],
- " "]]]],
- [["setVar:to:", "#op", ["readVariable", "#c"]],
- ["doIf",
- [">", ["readVariable", "#tok"], ""],
- [["call", "Add Block %s txt? %s", "", ["readVariable", "#tok"]],
- ["setVar:to:", "#tok", ""],
- ["setVar:to:", "#s", "0"],
- ["setLine:ofList:to:", ["readVariable", "#ins"], "Script", ["readVariable", "idx"]],
- ["setVar:to:", "#ins", ["+", ["readVariable", "idx"], 9]]]]],
- [["doIfElse",
- ["|",
- ["|", ["=", ["readVariable", "#c"], ")"], ["=", ["readVariable", "#c"], "]"]],
- ["|",
- ["&", ["=", ["readVariable", "#c"], ">"], [">", ["readVariable", "#op"], ""]],
- ["=", ["readVariable", "#c"], "."]]],
- [["doIfElse",
- ["=", ["readVariable", "#op"], "."],
- [["setLine:ofList:to:", ["+", ["readVariable", "#ins"], 1], "Script", ["readVariable", "#tok"]],
- ["setVar:to:", "#op", ""],
- ["doIf",
- ["=", ["readVariable", "#tok"], "va"],
- [["setLine:ofList:to:", ["-", ["readVariable", "#ins"], 4], "Script", ["getAttribute:of:", "Last Var", "Runtime"]]]],
- ["doIf",
- ["=", ["readVariable", "#tok"], "ls"],
- [["setLine:ofList:to:", ["-", ["readVariable", "#ins"], 4], "Script", ["getAttribute:of:", "Last List", "Runtime"]]]],
- ["doIf",
- ["=", ["readVariable", "#tok"], "ev"],
- [["setLine:ofList:to:", ["-", ["readVariable", "#ins"], 4], "Script", ["getAttribute:of:", "Last Event", "Editor"]]]]],
- [["doIfElse",
- ["=", ["readVariable", "#op"], "("],
- [["call", "Add Block %s txt? %s", "n", ["readVariable", "#tok"]]],
- [["doIfElse",
- ["=", ["readVariable", "#op"], "["],
- [["call", "Add Block %s txt? %s", "t", ["readVariable", "#tok"]]],
- [["call", "Add Block %s txt? %s", "?", " "]]]]],
- ["setLine:ofList:to:", ["readVariable", "#ins"], "Script", ["readVariable", "idx"]],
- ["setVar:to:", "#ins", ["+", ["readVariable", "idx"], 9]],
- ["doIfElse",
- ["=", ["readVariable", "#c"], "."],
- [["setVar:to:", "#op", "."]],
- [["setVar:to:", "#op", ""]]]]],
- ["setVar:to:", "#tok", ""],
- ["setVar:to:", "#s", "0"]],
- [["doIfElse",
- ["=", ["readVariable", "#c"], " "],
- [["doIf", [">", ["readVariable", "#tok"], ""], [["setVar:to:", "#s", "1"]]]],
- [["doIfElse",
- [">", ["readVariable", "#s"], "0"],
- [["setVar:to:", "#tok", ["concatenate:with:", ["readVariable", "#tok"], ["concatenate:with:", " ", ["readVariable", "#c"]]]],
- ["setVar:to:", "#s", "0"]],
- [["setVar:to:", "#tok", ["concatenate:with:", ["readVariable", "#tok"], ["readVariable", "#c"]]]]]]]]]]],
- ["changeVar:by:", "#i", 1]]],
- ["doIf",
- [">", ["readVariable", "#tok"], ""],
- [["call", "Add Block %s txt? %s", "", ["readVariable", "#tok"]],
- ["setLine:ofList:to:", ["readVariable", "#ins"], "Script", ["readVariable", "idx"]]]],
- ["call", "pop"]]],
- [431,
- 298,
- [["procDef", "Parse Script", [], [], true],
- ["deleteLine:ofList:", "all", "Script"],
- ["deleteLine:ofList:", "all", "Roots"],
- ["deleteLine:ofList:", "all", "stack"],
- ["deleteLine:ofList:", "all", "Palette"],
- ["call", "Create Palette %n", -18]]],
- [10,
- 589,
- [["whenIReceive", "change palette"],
- ["doRepeat",
- ["lineCountOfList:", "Palette"],
- [["call", "Delete Block %n", ["getLine:ofList:", "last", "Palette"]], ["deleteLine:ofList:", "last", "Palette"]]],
- ["call", "Create Palette %n", 0],
- ["doBroadcastAndWait", "palette changed"]]],
- [5,
- 9,
- [["whenGreenFlag"],
- ["hide"],
- ["setVar:to:", "SCMA#", "1"],
- ["doUntil",
- ["=", ["getLine:ofList:", ["readVariable", "SCMA#"], "BLOCK_SCHEMA"], "."],
- [["changeVar:by:", "SCMA#", 1]]],
- ["setVar:to:", "cTime", ["+", ["timeAndDate", "second"], ["+", 60, ["timeAndDate", "minute"]]]],
- ["doBroadcastAndWait", "Reset Last Var List"],
- ["doIfElse",
- [">", ["computeFunction:of:", "abs", ["-", ["readVariable", "cTime"], ["readVariable", "#RunTime"]]], "1"],
- [["doBroadcastAndWait", "change palette"], ["broadcast:", "draw"]],
- [["doBroadcastAndWait", "execute"], ["broadcast:", "draw"]]]]],
- [431,
- 5,
- [["procDef", "pop", [], [], true],
- ["setVar:to:", "idx", ["getLine:ofList:", "last", "stack"]],
- ["deleteLine:ofList:", "last", "stack"]]],
- [9,
- 420,
- [["procDef", "Append Param %s txt? %s", ["schema", "txt"], ["", ""], true],
- ["append:toList:", ["readVariable", "idx"], "stack"],
- ["call", "Add Block %s txt? %s", ["getParam", "schema", "r"], ["getParam", "txt", "r"]],
- ["setLine:ofList:to:", ["+", ["getLine:ofList:", "last", "stack"], 6], "Script", ["readVariable", "idx"]]]]],
- "scriptComments": [[786, 1280.5, 150, 200, false, 372, "Prev #ins +1 = 10\rPut picklist in #10"],
- [124, 22, 234, 304, false, 467, "Type - ie. 'block'\rx\ry\rsx\rsy\rtxt\rIndex of Param element\rIndex of Nested Element\rIndex of Nested Element\rIndex of Next Sibling\rColor Lookup\rschema index\r\r* txt onwards are optional depending on block type"]],
- "costumes": [{
- "costumeName": "costume1",
- "baseLayerID": 2,
- "baseLayerMD5": "d36f6603ec293d2c2198d3ea05109fe0.png",
- "bitmapResolution": 2,
- "rotationCenterX": 0,
- "rotationCenterY": 0
- }],
- "currentCostumeIndex": 0,
- "scratchX": 18,
- "scratchY": 33,
- "scale": 1,
- "direction": 90,
- "rotationStyle": "none",
- "isDraggable": false,
- "indexInLibrary": 1,
- "visible": false,
- "spriteInfo": {
- }
- },
- {
- "objName": "Runtime",
- "variables": [{
- "name": "thread#",
- "value": "1",
- "isPersistent": false
- },
- {
- "name": "varIndex#",
- "value": 1,
- "isPersistent": false
- },
- {
- "name": "execIdx",
- "value": "0",
- "isPersistent": false
- },
- {
- "name": "heapIdx",
- "value": "0",
- "isPersistent": false
- },
- {
- "name": "inst",
- "value": "",
- "isPersistent": false
- },
- {
- "name": "paramIdx",
- "value": 1021,
- "isPersistent": false
- },
- {
- "name": "vName",
- "value": "y",
- "isPersistent": false
- },
- {
- "name": "vVal",
- "value": "",
- "isPersistent": false
- },
- {
- "name": "heapPool#",
- "value": 1,
- "isPersistent": false
- },
- {
- "name": "askYieldHeapIdx",
- "value": 0,
- "isPersistent": false
- },
- {
- "name": "yieldThread",
- "value": "",
- "isPersistent": false
- },
- {
- "name": "run_dirty",
- "value": "true",
- "isPersistent": false
- },
- {
- "name": "listIdx",
- "value": "0",
- "isPersistent": false
- },
- {
- "name": "tmp",
- "value": "",
- "isPersistent": false
- },
- {
- "name": "p1",
- "value": 199.23893961835267,
- "isPersistent": false
- },
- {
- "name": "p2",
- "value": -10.701570023755087,
- "isPersistent": false
- },
- {
- "name": "newThreadTimeout",
- "value": 12.373,
- "isPersistent": false
- },
- {
- "name": "warpSpeed",
- "value": "0",
- "isPersistent": false
- },
- {
- "name": "Last List",
- "value": "list",
- "isPersistent": false
- },
- {
- "name": "Last Var",
- "value": "y",
- "isPersistent": false
- },
- {
- "name": "#ANSWER",
- "value": "20bcd5",
- "isPersistent": false
- },
- {
- "name": "wasActive",
- "value": "true",
- "isPersistent": false
- },
- {
- "name": "activeThreads#",
- "value": 0,
- "isPersistent": false
- },
- {
- "name": "#TimerRoot",
- "value": 1.675,
- "isPersistent": false
- },
- {
- "name": "peri",
- "value": 5.086396835705245e-11,
- "isPersistent": false
- },
- {
- "name": "ind",
- "value": 4.533333333333333,
- "isPersistent": false
- },
- {
- "name": "incx",
- "value": 62.954669815612824,
- "isPersistent": false
- },
- {
- "name": "incy",
- "value": 68.33612817977225,
- "isPersistent": false
- },
- {
- "name": "td",
- "value": 0.035558059493036795,
- "isPersistent": false
- },
- {
- "name": "penSize",
- "value": "4",
- "isPersistent": false
- },
- {
- "name": "_ax",
- "value": 6.65,
- "isPersistent": false
- },
- {
- "name": "_ci",
- "value": 38,
- "isPersistent": false
- },
- {
- "name": "_c",
- "value": "40310016012101210",
- "isPersistent": false
- },
- {
- "name": "_i",
- "value": 17,
- "isPersistent": false
- },
- {
- "name": "Len",
- "value": 203,
- "isPersistent": false
- }],
- "lists": [{
- "listName": "threads",
- "contents": [],
- "isPersistent": false,
- "x": 365,
- "y": 10,
- "width": 230,
- "height": 303,
- "visible": false
- },
- {
- "listName": "heap",
- "contents": [4, "", "", 0, 1, "Hex Color:"],
- "isPersistent": false,
- "x": 8,
- "y": 81,
- "width": 296,
- "height": 383,
- "visible": false
- },
- {
- "listName": "stack",
- "contents": [],
- "isPersistent": false,
- "x": 360,
- "y": 21,
- "width": 294,
- "height": 394,
- "visible": false
- },
- {
- "listName": "tmpList",
- "contents": [],
- "isPersistent": false,
- "x": 18,
- "y": 215,
- "width": 154,
- "height": 254,
- "visible": false
- },
- {
- "listName": "poly",
- "contents": [],
- "isPersistent": false,
- "x": 225,
- "y": 154,
- "width": 130,
- "height": 230,
- "visible": false
- }],
- "scripts": [[2232,
- 10,
- [["procDef", "inst - say %n", ["inst"], [1], false],
- ["setVar:to:", "paramIdx", ["getLine:ofList:", ["+", ["readVariable", "execIdx"], 6], "Script"]],
- ["setVar:to:", "paramIdx", ["getLine:ofList:", ["+", ["readVariable", "paramIdx"], 9], "Script"]],
- ["call", "Eval %n", ["readVariable", "paramIdx"]],
- ["say:", ["getLine:ofList:", "last", "stack"]],
- ["doIfElse",
- ["=", ["getParam", "inst", "r"], "102"],
- [["deleteLine:ofList:", "last", "stack"],
- ["setVar:to:", "execIdx", ["getLine:ofList:", ["+", ["readVariable", "execIdx"], 9], "Script"]],
- ["setVar:to:", "run_dirty", "true"]],
- [["setVar:to:", "paramIdx", ["getLine:ofList:", ["+", ["readVariable", "paramIdx"], 9], "Script"]],
- ["setVar:to:", "paramIdx", ["getLine:ofList:", ["+", ["readVariable", "paramIdx"], 9], "Script"]],
- ["call", "Eval %n", ["readVariable", "paramIdx"]],
- ["call", "Yield Thread for %n secs", ["getLine:ofList:", "last", "stack"]],
- ["deleteLine:ofList:", "last", "stack"]]]]],
- [1654,
- 10,
- [["procDef", "inst - var %n", ["inst"], [1], false],
- ["setVar:to:", "paramIdx", ["getLine:ofList:", ["+", ["readVariable", "execIdx"], 6], "Script"]],
- ["setVar:to:", "paramIdx", ["getLine:ofList:", ["+", ["readVariable", "paramIdx"], 9], "Script"]],
- ["call", "Eval %n", ["readVariable", "paramIdx"]],
- ["setVar:to:", "paramIdx", ["getLine:ofList:", ["+", ["readVariable", "paramIdx"], 9], "Script"]],
- ["setVar:to:", "paramIdx", ["getLine:ofList:", ["+", ["readVariable", "paramIdx"], 9], "Script"]],
- ["call", "Eval %n", ["readVariable", "paramIdx"]],
- ["setVar:to:", "vVal", ["getLine:ofList:", "last", "stack"]],
- ["deleteLine:ofList:", "last", "stack"],
- ["setVar:to:", "vName", ["getLine:ofList:", "last", "stack"]],
- ["deleteLine:ofList:", "last", "stack"],
- ["doIfElse",
- ["=", ["getParam", "inst", "r"], "120"],
- [["call", "Set Variable %s to %s", ["readVariable", "vName"], ["readVariable", "vVal"]]],
- [["call", "Change var %s by %n", ["readVariable", "vName"], ["readVariable", "vVal"]]]],
- ["setVar:to:", "execIdx", ["getLine:ofList:", ["+", ["readVariable", "execIdx"], 9], "Script"]]]],
- [7169,
- 10,
- [["procDef", "Exec cmd 96-127", [], [], false],
- ["doIfElse",
- ["|", ["=", ["readVariable", "inst"], "102"], ["=", ["readVariable", "inst"], "103"]],
- [["call", "inst - say %n", ["readVariable", "inst"]], ["setVar:to:", "run_dirty", "true"]],
- [["doIfElse",
- ["=", ["readVariable", "inst"], "124"],
- [["show"],
- ["setVar:to:", "execIdx", ["getLine:ofList:", ["+", ["readVariable", "execIdx"], 9], "Script"]],
- ["setVar:to:", "run_dirty", "true"]],
- [["doIfElse",
- ["=", ["readVariable", "inst"], "120"],
- [["call", "inst - var %n", ["readVariable", "inst"]]],
- [["doIfElse",
- ["=", ["readVariable", "inst"], "96"],
- [["putPenDown"],
- ["setVar:to:", "execIdx", ["getLine:ofList:", ["+", ["readVariable", "execIdx"], 9], "Script"]],
- ["setVar:to:", "run_dirty", "true"],
- ["deleteLine:ofList:", "all", "poly"],
- ["append:toList:", ["xpos"], "poly"],
- ["append:toList:", ["ypos"], "poly"]],
- [["doIfElse",
- ["=", ["readVariable", "inst"], "97"],
- [["putPenUp"],
- ["setVar:to:", "execIdx", ["getLine:ofList:", ["+", ["readVariable", "execIdx"], 9], "Script"]],
- ["setVar:to:", "run_dirty", "true"],
- ["deleteLine:ofList:", "all", "poly"]],
- [["doIfElse",
- ["=", ["readVariable", "inst"], "114"],
- [["call", "Eval 2 params %b start %n", ["not", false], ["readVariable", "execIdx"]],
- ["setVar:to:", "paramIdx", ["getLine:ofList:", ["+", ["readVariable", "paramIdx"], 9], "Script"]],
- ["setVar:to:", "paramIdx", ["getLine:ofList:", ["+", ["readVariable", "paramIdx"], 9], "Script"]],
- ["call", "Eval %n", ["readVariable", "paramIdx"]],
- ["setVar:to:", "tmp", ["getLine:ofList:", "last", "stack"]],
- ["deleteLine:ofList:", "last", "stack"],
- ["doIfElse",
- ["=", ["readVariable", "p1"], "last"],
- [["call", "LIST Get length of list %s", ["readVariable", "p2"]],
- ["call", "LIST Replace row %n of %s with %s", ["readVariable", "vVal"], ["readVariable", "p2"], ["readVariable", "tmp"]]],
- [["doIfElse",
- ["=", ["readVariable", "p1"], "random"],
- [["call", "LIST Get length of list %s", ["readVariable", "p2"]],
- ["call",
- "LIST Replace row %n of %s with %s",
- ["randomFrom:to:", 1, ["readVariable", "vVal"]],
- ["readVariable", "p2"],
- ["readVariable", "tmp"]]],
- [["call",
- "LIST Replace row %n of %s with %s",
- ["computeFunction:of:", "floor", ["readVariable", "p1"]],
- ["readVariable", "p2"],
- ["readVariable", "tmp"]]]]]],
- ["setVar:to:", "execIdx", ["getLine:ofList:", ["+", ["readVariable", "execIdx"], 9], "Script"]]],
- [["doIfElse",
- ["=", ["readVariable", "inst"], "115"],
- [["call", "Eval 2nd Param and progress"], ["setPenHueTo:", ["readVariable", "vVal"]]],
- [["doIfElse",
- ["=", ["readVariable", "inst"], "116"],
- [["call", "Eval 2nd Param and progress"], ["setPenShadeTo:", ["readVariable", "vVal"]]],
- [["doIfElse",
- ["=", ["readVariable", "inst"], "117"],
- [["call", "Eval 2nd Param and progress"],
- ["doIfElse",
- ["=", ["readVariable", "vVal"], "left-right"],
- [["setRotationStyle", "left-right"]],
- [["doIfElse",
- ["=", ["readVariable", "vVal"], "don't rotate"],
- [["setRotationStyle", "don't rotate"]],
- [["setRotationStyle", "all around"]]]]],
- ["setVar:to:", "run_dirty", "true"]],
- [["doIfElse",
- ["=", ["readVariable", "inst"], "118"],
- [["call", "Eval 2nd Param and progress"], ["setSizeTo:", ["readVariable", "vVal"]], ["setVar:to:", "run_dirty", "true"]],
- [["setVar:to:", "execIdx", ["getLine:ofList:", ["+", ["readVariable", "execIdx"], 9], "Script"]]]]]]]]]]]]]]]]]]]]]]]],
- [520,
- 256,
- [["procDef", "Set x,y: x? %b change? %b", ["x?", "change?"], [false, false], true],
- ["setVar:to:", "paramIdx", ["getLine:ofList:", ["+", ["readVariable", "execIdx"], 6], "Script"]],
- ["setVar:to:", "paramIdx", ["getLine:ofList:", ["+", ["readVariable", "paramIdx"], 9], "Script"]],
- ["call", "Eval %n", ["readVariable", "paramIdx"]],
- ["doIfElse",
- ["getParam", "change?", "b"],
- [["doIfElse",
- ["getParam", "x?", "b"],
- [["changeXposBy:", ["getLine:ofList:", "last", "stack"]]],
- [["changeYposBy:", ["getLine:ofList:", "last", "stack"]]]]],
- [["doIfElse",
- ["getParam", "x?", "b"],
- [["xpos:", ["getLine:ofList:", "last", "stack"]]],
- [["ypos:", ["getLine:ofList:", "last", "stack"]]]]]],
- ["deleteLine:ofList:", "last", "stack"],
- ["setVar:to:", "execIdx", ["getLine:ofList:", ["+", ["readVariable", "execIdx"], 9], "Script"]],
- ["setVar:to:", "run_dirty", "true"],
- ["doIf",
- [">", ["lineCountOfList:", "poly"], "0"],
- [["append:toList:", ["xpos"], "poly"], ["append:toList:", ["ypos"], "poly"]]]]],
- [1045,
- 513,
- [["procDef", "Exec cmd 160-191", [], [], false],
- ["doIfElse",
- ["|", ["=", ["readVariable", "inst"], "161"], ["=", ["readVariable", "inst"], "164"]],
- [["call", "Set x,y: x? %b change? %b", ["=", ["readVariable", "inst"], "161"], false]],
- [["doIfElse",
- ["=", ["readVariable", "inst"], "166"],
- [["call", "Stamp Polygon"],
- ["setVar:to:", "execIdx", ["getLine:ofList:", ["+", ["readVariable", "execIdx"], 9], "Script"]]],
- [["doIfElse",
- ["=", ["readVariable", "inst"], "167"],
- [["call", "Stamp Poly List"],
- ["setVar:to:", "execIdx", ["getLine:ofList:", ["+", ["readVariable", "execIdx"], 9], "Script"]]],
- [["doIfElse",
- ["=", ["readVariable", "inst"], "168"],
- [["call", "Eval 2nd Param and progress"],
- ["call", "exec write %n %n %n %s", ["xpos"], ["ypos"], ["readVariable", "penSize"], ["readVariable", "vVal"]]],
- [["setVar:to:", "execIdx", ["getLine:ofList:", ["+", ["readVariable", "execIdx"], 9], "Script"]]]]]]]]]]]],
- [10,
- 149,
- [["procDef", "EXECUTE", [], [], false],
- ["hide"],
- ["setSizeTo:", 100],
- ["heading:", 90],
- ["deleteLine:ofList:", "all", "poly"],
- ["doAsk", "Run Project? (Y\/N)"],
- ["doIf",
- ["not", ["=", ["letter:of:", 1, ["answer"]], "y"]],
- [["stopScripts", "this script"]]],
- ["setVar:to:", "penSize", ["readVariable", "penSize"]],
- ["penSize:", 1],
- ["gotoX:y:", 0, 0],
- ["putPenUp"],
- ["clearPenTrails"],
- ["show"],
- ["deleteLine:ofList:", "all", "threads"],
- ["deleteLine:ofList:", "all", "heap"],
- ["deleteLine:ofList:", "all", "tmpList"],
- ["setVar:to:", "#ANSWER", ""],
- ["setVar:to:", "heapPool#", 0],
- ["setVar:to:", "thread#", "1"],
- ["setVar:to:", "askYieldHeapIdx", 0],
- ["setVar:to:", "run_dirty", ""],
- ["setVar:to:", "#TimerRoot", ["timer"]],
- ["setVar:to:", "newThreadTimeout", ["timer"]],
- ["doRepeat",
- ["lineCountOfList:", "Roots"],
- [["doIf",
- ["=",
- ["getLine:ofList:", ["+", ["getLine:ofList:", ["readVariable", "thread#"], "Roots"], 11], "Script"],
- "155"],
- [["append:toList:",
- ["getLine:ofList:", ["+", ["getLine:ofList:", ["readVariable", "thread#"], "Roots"], 9], "Script"],
- "heap"],
- ["append:toList:", ["lineCountOfList:", "heap"], "threads"],
- ["append:toList:", "", "threads"],
- ["append:toList:", "0", "threads"],
- ["append:toList:", "", "heap"],
- ["append:toList:", "", "heap"]]],
- ["changeVar:by:", "thread#", 1]]],
- ["doUntil", ["=", ["lineCountOfList:", "threads"], "0"], [["call", "EXEC ALL THREADS"]]],
- ["putPenUp"],
- ["wait:elapsed:from:", 0.5],
- ["hide"],
- ["doBroadcastAndWait", "change palette"]]],
- [4273,
- 10,
- [["procDef", "Exec cmd 64-95", [], [], false],
- ["doIfElse",
- ["=", ["readVariable", "inst"], "69"],
- [["hide"],
- ["setVar:to:", "execIdx", ["getLine:ofList:", ["+", ["readVariable", "execIdx"], 9], "Script"]],
- ["setVar:to:", "run_dirty", "true"]],
- [["doIfElse",
- ["=", ["readVariable", "inst"], "66"],
- [["setVar:to:", "paramIdx", ["getLine:ofList:", ["+", ["readVariable", "execIdx"], 6], "Script"]],
- ["setVar:to:", "paramIdx", ["getLine:ofList:", ["+", ["readVariable", "paramIdx"], 9], "Script"]],
- ["call", "Eval %n", ["readVariable", "paramIdx"]],
- ["setVar:to:", "paramIdx", ["getLine:ofList:", ["+", ["readVariable", "paramIdx"], 9], "Script"]],
- ["setVar:to:", "paramIdx", ["getLine:ofList:", ["+", ["readVariable", "paramIdx"], 9], "Script"]],
- ["call", "Eval %n", ["readVariable", "paramIdx"]],
- ["setVar:to:", "vVal", ["getLine:ofList:", "last", "stack"]],
- ["deleteLine:ofList:", "last", "stack"],
- ["gotoX:y:", ["getLine:ofList:", "last", "stack"], ["readVariable", "vVal"]],
- ["deleteLine:ofList:", "last", "stack"],
- ["setVar:to:", "execIdx", ["getLine:ofList:", ["+", ["readVariable", "execIdx"], 9], "Script"]],
- ["setVar:to:", "run_dirty", "true"],
- ["doIf",
- [">", ["lineCountOfList:", "poly"], "0"],
- [["append:toList:", ["xpos"], "poly"], ["append:toList:", ["ypos"], "poly"]]]],
- [["doIfElse",
- ["=", ["readVariable", "inst"], "68"],
- [["call", "Eval 2nd Param and progress"], ["heading:", ["readVariable", "vVal"]], ["setVar:to:", "run_dirty", "true"]],
- [["doIfElse",
- ["=", ["readVariable", "inst"], "74"],
- [["call", "Eval 2 params %b start %n", ["not", false], ["readVariable", "execIdx"]],
- ["setVar:to:", "paramIdx", ["getLine:ofList:", ["+", ["readVariable", "paramIdx"], 9], "Script"]],
- ["setVar:to:", "paramIdx", ["getLine:ofList:", ["+", ["readVariable", "paramIdx"], 9], "Script"]],
- ["call", "Eval %n", ["readVariable", "paramIdx"]],
- ["setVar:to:", "tmp", ["getLine:ofList:", "last", "stack"]],
- ["deleteLine:ofList:", "last", "stack"],
- ["doIfElse",
- ["=", ["readVariable", "p2"], "last"],
- [["call", "LIST Get length of list %s", ["readVariable", "tmp"]],
- ["call", "LIST Insert row %n of %s with %s", ["readVariable", "vVal"], ["readVariable", "tmp"], ["readVariable", "p1"]]],
- [["doIfElse",
- ["=", ["readVariable", "p2"], "random"],
- [["call", "LIST Get length of list %s", ["readVariable", "tmp"]],
- ["call",
- "LIST Insert row %n of %s with %s",
- ["randomFrom:to:", 1, ["readVariable", "vVal"]],
- ["readVariable", "tmp"],
- ["readVariable", "p1"]]],
- [["call",
- "LIST Insert row %n of %s with %s",
- ["computeFunction:of:", "floor", ["readVariable", "p2"]],
- ["readVariable", "tmp"],
- ["readVariable", "p1"]]]]]],
- ["setVar:to:", "execIdx", ["getLine:ofList:", ["+", ["readVariable", "execIdx"], 9], "Script"]]],
- [["doIfElse",
- ["=", ["readVariable", "inst"], "91"],
- [["call", "Eval 2nd Param and progress"], ["penColor:", ["readVariable", "vVal"]]],
- [["doIfElse",
- ["=", ["readVariable", "inst"], "92"],
- [["call", "Eval 2nd Param and progress"],
- ["setVar:to:", "penSize", ["readVariable", "vVal"]],
- ["penSize:", ["readVariable", "vVal"]]],
- [["doIfElse",
- ["=", ["readVariable", "inst"], "65"],
- [["call", "Eval 2nd Param and progress"],
- ["doIfElse",
- ["=", ["readVariable", "vVal"], "mouse-pointer"],
- [["gotoSpriteOrMouse:", "_mouse_"],
- ["doIf",
- [">", ["lineCountOfList:", "poly"], "0"],
- [["append:toList:", ["xpos"], "poly"], ["append:toList:", ["ypos"], "poly"]]]],
- null],
- ["setVar:to:", "run_dirty", "true"]],
- [["doIfElse",
- ["=", ["readVariable", "inst"], "95"],
- [["call", "Eval 2nd Param and progress"],
- ["doIfElse", ["=", ["readVariable", "vVal"], "mouse-pointer"], [["pointTowards:", "_mouse_"]], null],
- ["setVar:to:", "run_dirty", "true"]],
- [["setVar:to:", "execIdx", ["getLine:ofList:", ["+", ["readVariable", "execIdx"], 9], "Script"]]]]]]]]]]]]]]]]]]]],
- [2781,
- 10,
- [["procDef", "Eval 2nd Param and progress", [], [], true],
- ["setVar:to:", "paramIdx", ["getLine:ofList:", ["+", ["readVariable", "execIdx"], 6], "Script"]],
- ["setVar:to:", "paramIdx", ["getLine:ofList:", ["+", ["readVariable", "paramIdx"], 9], "Script"]],
- ["call", "Eval %n", ["readVariable", "paramIdx"]],
- ["setVar:to:", "vVal", ["getLine:ofList:", "last", "stack"]],
- ["deleteLine:ofList:", "last", "stack"],
- ["setVar:to:", "execIdx", ["getLine:ofList:", ["+", ["readVariable", "execIdx"], 9], "Script"]]]],
- [4770,
- 10,
- [["procDef", "Eval %s of...", ["func"], [""], true],
- ["deleteLine:ofList:", "last", "stack"],
- ["setVar:to:", "paramIdx", ["getLine:ofList:", ["+", ["readVariable", "paramIdx"], 9], "Script"]],
- ["setVar:to:", "paramIdx", ["getLine:ofList:", ["+", ["readVariable", "paramIdx"], 9], "Script"]],
- ["call", "Eval %n", ["readVariable", "paramIdx"]],
- ["doIfElse",
- ["<", ["getParam", "func", "r"], "floor"],
- [["doIfElse",
- ["<", ["getParam", "func", "r"], "atan"],
- [["doIfElse",
- ["<", ["getParam", "func", "r"], "acos"],
- [["doIfElse",
- ["=", ["getParam", "func", "r"], "10 ^"],
- [["setLine:ofList:to:", "last", "stack", ["computeFunction:of:", "10 ^", ["getLine:ofList:", "last", "stack"]]]],
- [["setLine:ofList:to:", "last", "stack", ["computeFunction:of:", "abs", ["getLine:ofList:", "last", "stack"]]]]]],
- [["doIfElse",
- ["=", ["getParam", "func", "r"], "acos"],
- [["setLine:ofList:to:", "last", "stack", ["computeFunction:of:", "acos", ["getLine:ofList:", "last", "stack"]]]],
- [["setLine:ofList:to:", "last", "stack", ["computeFunction:of:", "asin", ["getLine:ofList:", "last", "stack"]]]]]]]],
- [["doIfElse",
- ["<", ["getParam", "func", "r"], "cos"],
- [["doIfElse",
- ["=", ["getParam", "func", "r"], "atan"],
- [["setLine:ofList:to:", "last", "stack", ["computeFunction:of:", "atan", ["getLine:ofList:", "last", "stack"]]]],
- [["setLine:ofList:to:", "last", "stack", ["computeFunction:of:", "ceiling", ["getLine:ofList:", "last", "stack"]]]]]],
- [["doIfElse",
- ["=", ["getParam", "func", "r"], "cos"],
- [["setLine:ofList:to:", "last", "stack", ["computeFunction:of:", "cos", ["getLine:ofList:", "last", "stack"]]]],
- [["setLine:ofList:to:", "last", "stack", ["computeFunction:of:", "e ^", ["getLine:ofList:", "last", "stack"]]]]]]]]]],
- [["doIfElse",
- ["<", ["getParam", "func", "r"], "sqrt"],
- [["doIfElse",
- ["<", ["getParam", "func", "r"], "log"],
- [["doIfElse",
- ["=", ["getParam", "func", "r"], "floor"],
- [["setLine:ofList:to:", "last", "stack", ["computeFunction:of:", "floor", ["getLine:ofList:", "last", "stack"]]]],
- [["setLine:ofList:to:", "last", "stack", ["computeFunction:of:", "ln", ["getLine:ofList:", "last", "stack"]]]]]],
- [["doIfElse",
- ["=", ["getParam", "func", "r"], "log"],
- [["setLine:ofList:to:", "last", "stack", ["computeFunction:of:", "log", ["getLine:ofList:", "last", "stack"]]]],
- [["setLine:ofList:to:", "last", "stack", ["computeFunction:of:", "sin", ["getLine:ofList:", "last", "stack"]]]]]]]],
- [["doIfElse",
- ["=", ["getParam", "func", "r"], "sqrt"],
- [["setLine:ofList:to:", "last", "stack", ["computeFunction:of:", "sqrt", ["getLine:ofList:", "last", "stack"]]]],
- [["setLine:ofList:to:", "last", "stack", ["computeFunction:of:", "tan", ["getLine:ofList:", "last", "stack"]]]]]]]]]]],
- [10, 83, [["whenIReceive", "execute"], ["call", "EXECUTE"]]],
- [3737,
- 10,
- [["procDef", "Exec cmd 32-63", [], [], false],
- ["doIfElse",
- ["|",
- ["=", ["readVariable", "inst"], "43"],
- ["|",
- ["=", ["readVariable", "inst"], "49"],
- ["|", ["=", ["readVariable", "inst"], "51"], ["=", ["readVariable", "inst"], "52"]]]],
- [["call", "Push Heap %n", ["readVariable", "heapIdx"]],
- ["doIf",
- ["=", ["readVariable", "inst"], "49"],
- [["setVar:to:", "paramIdx", ["getLine:ofList:", ["+", ["readVariable", "execIdx"], 6], "Script"]],
- ["setVar:to:", "paramIdx", ["getLine:ofList:", ["+", ["readVariable", "paramIdx"], 9], "Script"]],
- ["call", "Eval %n", ["readVariable", "paramIdx"]],
- ["setLine:ofList:to:", ["+", ["readVariable", "heapIdx"], 2], "heap", ["getLine:ofList:", "last", "stack"]],
- ["deleteLine:ofList:", "last", "stack"]]],
- ["call", "Into Loop or Out of nesting %s", ""]],
- [["doIfElse",
- ["=", ["readVariable", "inst"], "41"],
- [["call", "Push Heap %n", ["readVariable", "heapIdx"]],
- ["setVar:to:", "paramIdx", ["getLine:ofList:", ["+", ["readVariable", "execIdx"], 6], "Script"]],
- ["setVar:to:", "paramIdx", ["getLine:ofList:", ["+", ["readVariable", "paramIdx"], 9], "Script"]],
- ["call", "Eval %n", ["readVariable", "paramIdx"]],
- ["setVar:to:", "execIdx", "-101"],
- ["setLine:ofList:to:", ["readVariable", "heapIdx"], "heap", ["readVariable", "execIdx"]],
- ["setLine:ofList:to:", ["+", ["readVariable", "heapIdx"], 2], "heap", ["getLine:ofList:", "last", "stack"]],
- ["deleteLine:ofList:", "last", "stack"],
- ["setVar:to:", "askYieldHeapIdx", ["readVariable", "heapIdx"]],
- ["broadcast:", "exec - ask"]],
- [["doIfElse",
- ["|", ["=", ["readVariable", "inst"], "46"], ["=", ["readVariable", "inst"], "47"]],
- [["call", "inst - if %n", ["readVariable", "inst"]]],
- [["doIfElse",
- ["=", ["readVariable", "inst"], "56"],
- [["call", "Eval 2nd Param and progress"],
- ["forward:", ["readVariable", "vVal"]],
- ["setVar:to:", "run_dirty", "true"],
- ["doIf",
- [">", ["lineCountOfList:", "poly"], "0"],
- [["append:toList:", ["xpos"], "poly"], ["append:toList:", ["ypos"], "poly"]]]],
- [["doIfElse",
- ["=", ["readVariable", "inst"], "39"],
- [["call", "Eval 2 params %b start %n", ["not", false], ["readVariable", "execIdx"]],
- ["doIfElse",
- ["=", ["readVariable", "p1"], "all"],
- [["call", "LIST Delete all from list %s", ["readVariable", "p2"]]],
- [["doIfElse",
- ["=", ["readVariable", "p1"], "last"],
- [["call", "LIST Get length of list %s", ["readVariable", "p2"]],
- ["call", "LIST Delete row %n of list %s", ["readVariable", "vVal"], ["readVariable", "p2"]]],
- [["call", "LIST Delete row %n of list %s", ["computeFunction:of:", "floor", ["readVariable", "p1"]], ["readVariable", "p2"]]]]]],
- ["setVar:to:", "execIdx", ["getLine:ofList:", ["+", ["readVariable", "execIdx"], 9], "Script"]]],
- [["doIfElse",
- ["=", ["readVariable", "inst"], "42"],
- [["call", "Push Heap %n", ["readVariable", "heapIdx"]],
- ["setVar:to:", "paramIdx", ["getLine:ofList:", ["+", ["readVariable", "execIdx"], 6], "Script"]],
- ["setVar:to:", "paramIdx", ["getLine:ofList:", ["+", ["readVariable", "paramIdx"], 9], "Script"]],
- ["call", "Eval %n", ["readVariable", "paramIdx"]],
- ["setVar:to:", "execIdx", "-103"],
- ["setVar:to:", "vVal", ["getLine:ofList:", "last", "stack"]],
- ["deleteLine:ofList:", "last", "stack"],
- ["setLine:ofList:to:", ["readVariable", "heapIdx"], "heap", ["readVariable", "execIdx"]],
- ["setLine:ofList:to:", ["+", ["readVariable", "heapIdx"], 2], "heap", ["readVariable", "vVal"]],
- ["call", "Broadcast %s event %s", ["readVariable", "vVal"], ["readVariable", "vVal"]],
- ["doIf", ["=", ["readVariable", "vVal"], "0"], [["call", "Into Loop or Out of nesting %s", ""]]]],
- [["setVar:to:", "execIdx", ["getLine:ofList:", ["+", ["readVariable", "execIdx"], 9], "Script"]]]]]]]]]]]]]]]],
- [2232,
- 487,
- [["procDef", "Yield Thread for %n secs", ["n"], [1], false],
- ["call", "Push Heap %n", ["readVariable", "heapIdx"]],
- ["setVar:to:", "execIdx", "-102"],
- ["setLine:ofList:to:", ["readVariable", "heapIdx"], "heap", ["readVariable", "execIdx"]],
- ["setLine:ofList:to:",
- ["+", ["readVariable", "heapIdx"], 2],
- "heap",
- ["+", ["timer"], ["getParam", "n", "r"]]],
- ["setVar:to:", "yieldThread", "wait"]]],
- [1654,
- 517,
- [["procDef", "Get Variable %s", ["name"], [""], true],
- ["call", "Get Var index %s", ["getParam", "name", "r"]],
- ["doIfElse",
- [">", ["readVariable", "varIndex#"], "0"],
- [["append:toList:", ["getLine:ofList:", ["+", ["readVariable", "varIndex#"], 1], "vars"], "stack"]],
- [["append:toList:", "", "stack"]]]]],
- [1045,
- 10,
- [["procDef", "Change var %s by %n", ["name", "val"], ["", 1], true],
- ["call", "Get Var index %s", ["getParam", "name", "r"]],
- ["doIfElse",
- [">", ["readVariable", "varIndex#"], "0"],
- [["setLine:ofList:to:",
- ["+", ["readVariable", "varIndex#"], 1],
- "vars",
- ["+",
- ["getLine:ofList:", ["+", ["readVariable", "varIndex#"], 1], "vars"],
- ["getParam", "val", "r"]]]],
- [["append:toList:", ["getParam", "name", "r"], "vars"],
- ["append:toList:", ["+", "", ["getParam", "val", "r"]], "vars"]]]]],
- [2781,
- 256,
- [["procDef", "Shift Lists from %n to %n by %n", ["from", "to(excl)", "shift"], [1, 1, 1], true],
- ["setVar:to:", "tmp", ["+", ["getParam", "from", "r"], 1]],
- ["doRepeat",
- ["\/", ["-", ["getParam", "to(excl)", "r"], ["getParam", "from", "r"]], 4],
- [["setLine:ofList:to:",
- ["readVariable", "tmp"],
- "lists",
- ["+", ["getParam", "shift", "r"], ["getLine:ofList:", ["readVariable", "tmp"], "lists"]]],
- ["changeVar:by:", "tmp", 4]]]]],
- [5665,
- 10,
- [["procDef", "LIST Insert row %n of %s with %s", ["row#", "list", "value"], [1, "", ""], true],
- ["call", "LIST idx for list %s dont %b", ["getParam", "list", "r"], false],
- ["setVar:to:",
- "vVal",
- ["+", ["getLine:ofList:", ["+", ["readVariable", "listIdx"], 2], "lists"], 1]],
- ["setVar:to:", "vName", ["getLine:ofList:", ["+", ["readVariable", "listIdx"], 1], "lists"]],
- ["doIfElse",
- ["|",
- ["<", ["getParam", "row#", "r"], "1"],
- [">", ["getParam", "row#", "r"], ["readVariable", "vVal"]]],
- null,
- [["doIf",
- [">", ["readVariable", "vVal"], ["getLine:ofList:", ["+", ["readVariable", "listIdx"], 3], "lists"]],
- [["setLine:ofList:to:",
- ["+", ["readVariable", "listIdx"], 3],
- "lists",
- ["+", 10, ["getLine:ofList:", ["+", ["readVariable", "listIdx"], 3], "lists"]]],
- ["call", "Shift Lists from %n to %n by %n", ["+", ["readVariable", "listIdx"], 4], ["getLine:ofList:", 1, "lists"], 10],
- ["doRepeat",
- 10,
- [["insert:at:ofList:", "", ["+", ["readVariable", "vName"], ["readVariable", "vVal"]], "lists"]]]]],
- ["deleteLine:ofList:", ["+", ["readVariable", "vName"], ["readVariable", "vVal"]], "lists"],
- ["insert:at:ofList:",
- ["getParam", "value", "r"],
- ["+", ["readVariable", "vName"], ["getParam", "row#", "r"]],
- "lists"],
- ["setLine:ofList:to:", ["+", ["readVariable", "listIdx"], 2], "lists", ["readVariable", "vVal"]]]]]],
- [2781,
- 465,
- [["procDef", "Eval 2 params %b start %n", ["skip first?", "idx"], [false, 1], true],
- ["setVar:to:", "paramIdx", ["getLine:ofList:", ["+", ["getParam", "idx", "r"], 6], "Script"]],
- ["doIf",
- ["getParam", "skip first?", "b"],
- [["setVar:to:", "paramIdx", ["getLine:ofList:", ["+", ["readVariable", "paramIdx"], 9], "Script"]]]],
- ["call", "Eval %n", ["readVariable", "paramIdx"]],
- ["setVar:to:", "paramIdx", ["getLine:ofList:", ["+", ["readVariable", "paramIdx"], 9], "Script"]],
- ["setVar:to:", "paramIdx", ["getLine:ofList:", ["+", ["readVariable", "paramIdx"], 9], "Script"]],
- ["call", "Eval %n", ["readVariable", "paramIdx"]],
- ["setVar:to:", "p2", ["getLine:ofList:", "last", "stack"]],
- ["deleteLine:ofList:", "last", "stack"],
- ["setVar:to:", "p1", ["getLine:ofList:", "last", "stack"]],
- ["deleteLine:ofList:", "last", "stack"]]],
- [3239,
- 277,
- [["procDef", "Broadcast %s event %s", ["message", "event"], ["", ""], true],
- ["setVar:to:", "vVal", 0],
- ["setVar:to:", "p1", "1"],
- ["doRepeat",
- ["lineCountOfList:", "Roots"],
- [["setVar:to:", "p2", ["getLine:ofList:", ["readVariable", "p1"], "Roots"]],
- ["doIf",
- ["=", ["getLine:ofList:", ["+", ["readVariable", "p2"], 11], "Script"], "156"],
- [["setVar:to:", "tmp", ["getLine:ofList:", ["+", ["readVariable", "p2"], 6], "Script"]],
- ["setVar:to:", "tmp", ["getLine:ofList:", ["+", ["readVariable", "tmp"], 9], "Script"]],
- ["doIf",
- ["=",
- ["getLine:ofList:", ["+", ["readVariable", "tmp"], 5], "Script"],
- ["getParam", "message", "r"]],
- [["call", "Start Thread %n event %s", ["readVariable", "p2"], ["getParam", "event", "r"]],
- ["changeVar:by:", "vVal", 1]]]]],
- ["changeVar:by:", "p1", 1]]]]],
- [3239,
- 712,
- [["procDef", "Push Heap %n", ["prevHeapIdx"], [1], true],
- ["setLine:ofList:to:", ["getParam", "prevHeapIdx", "r"], "heap", ["readVariable", "execIdx"]],
- ["doIfElse",
- [">", ["readVariable", "heapPool#"], "0"],
- [["setVar:to:", "heapIdx", ["readVariable", "heapPool#"]],
- ["setVar:to:", "heapPool#", ["getLine:ofList:", ["readVariable", "heapPool#"], "heap"]],
- ["setLine:ofList:to:", ["+", ["readVariable", "heapIdx"], 1], "heap", ["getParam", "prevHeapIdx", "r"]]],
- [["append:toList:", "", "heap"],
- ["setVar:to:", "heapIdx", ["lineCountOfList:", "heap"]],
- ["append:toList:", ["getParam", "prevHeapIdx", "r"], "heap"],
- ["append:toList:", "", "heap"]]]]],
- [520,
- 1297,
- [["procDef", "LIST Delete row %n of list %s", ["row#", "list"], [1, ""], true],
- ["call", "LIST idx for list %s dont %b", ["getParam", "list", "r"], false],
- ["setVar:to:", "vVal", ["getLine:ofList:", ["+", ["readVariable", "listIdx"], 2], "lists"]],
- ["setVar:to:", "vName", ["getLine:ofList:", ["+", ["readVariable", "listIdx"], 1], "lists"]],
- ["doIfElse",
- ["|",
- ["<", ["getParam", "row#", "r"], "1"],
- [">", ["getParam", "row#", "r"], ["readVariable", "vVal"]]],
- null,
- [["deleteLine:ofList:", ["+", ["readVariable", "vName"], ["getParam", "row#", "r"]], "lists"],
- ["insert:at:ofList:", "", ["+", ["readVariable", "vName"], ["readVariable", "vVal"]], "lists"],
- ["setLine:ofList:to:",
- ["+", ["readVariable", "listIdx"], 2],
- "lists",
- ["-", ["readVariable", "vVal"], 1]]]]]],
- [520,
- 1047,
- [["procDef", "LIST Replace row %n of %s with %s", ["row#", "list", "value"], [1, "", ""], true],
- ["call", "LIST idx for list %s dont %b", ["getParam", "list", "r"], false],
- ["setVar:to:", "vVal", ["getLine:ofList:", ["+", ["readVariable", "listIdx"], 2], "lists"]],
- ["doIfElse",
- ["|",
- ["<", ["getParam", "row#", "r"], "1"],
- [">", ["getParam", "row#", "r"], ["readVariable", "vVal"]]],
- null,
- [["setLine:ofList:to:",
- ["+",
- ["getLine:ofList:", ["+", ["readVariable", "listIdx"], 1], "lists"],
- ["getParam", "row#", "r"]],
- "lists",
- ["getParam", "value", "r"]]]]]],
- [520,
- 913,
- [["procDef", "LIST Get length of list %s", ["list"], [""], true],
- ["call", "LIST idx for list %s dont %b", ["getParam", "list", "r"], false],
- ["setVar:to:", "vVal", ["getLine:ofList:", ["+", ["readVariable", "listIdx"], 2], "lists"]]]],
- [520,
- 1763,
- [["procDef", "LIST %s contains %s", ["list", "val"], ["", ""], true],
- ["call", "LIST idx for list %s dont %b", ["getParam", "list", "r"], false],
- ["setVar:to:", "vVal", ["getLine:ofList:", ["+", ["readVariable", "listIdx"], 1], "lists"]],
- ["doRepeat",
- ["getLine:ofList:", ["+", ["readVariable", "listIdx"], 2], "lists"],
- [["changeVar:by:", "vVal", 1],
- ["doIf",
- ["=", ["getLine:ofList:", ["readVariable", "vVal"], "lists"], ["getParam", "val", "r"]],
- [["changeVar:by:",
- "vVal",
- ["-", 0, ["getLine:ofList:", ["+", ["readVariable", "listIdx"], 1], "lists"]]],
- ["stopScripts", "this script"]]]]],
- ["setVar:to:", "vVal", "0"]]],
- [520,
- 1633,
- [["procDef", "LIST Delete all from list %s", ["list"], [""], true],
- ["call", "LIST idx for list %s dont %b", ["getParam", "list", "r"], false],
- ["setLine:ofList:to:", ["+", ["readVariable", "listIdx"], 2], "lists", "0"]]],
- [2781,
- 866,
- [["procDef", "Thread Ending", [], [], false],
- ["deleteLine:ofList:", ["readVariable", "thread#"], "threads"],
- ["setVar:to:", "tmp", ["getLine:ofList:", ["readVariable", "thread#"], "threads"]],
- ["deleteLine:ofList:", ["readVariable", "thread#"], "threads"],
- ["deleteLine:ofList:", ["readVariable", "thread#"], "threads"],
- ["doIf",
- [">", ["readVariable", "tmp"], ""],
- [["setVar:to:", "p1", "2"],
- ["doRepeat",
- ["\/", ["lineCountOfList:", "threads"], 3],
- [["doIf",
- ["=", ["getLine:ofList:", ["readVariable", "p1"], "threads"], ["readVariable", "tmp"]],
- [["stopScripts", "this script"]]],
- ["changeVar:by:", "p1", 3]]],
- ["setVar:to:", "p1", "1"],
- ["doRepeat",
- ["\/", ["lineCountOfList:", "threads"], 3],
- [["setVar:to:", "heapIdx", ["getLine:ofList:", ["readVariable", "p1"], "threads"]],
- ["doIf",
- ["=", ["getLine:ofList:", ["readVariable", "heapIdx"], "heap"], "-103"],
- [["doIf",
- ["=", ["getLine:ofList:", ["+", ["readVariable", "heapIdx"], 2], "heap"], ["readVariable", "tmp"]],
- [["setLine:ofList:to:", ["readVariable", "heapIdx"], "heap", "-100"]]]]],
- ["changeVar:by:", "p1", 3]]]]]]],
- [3239,
- 10,
- [["procDef", "LIST Get row %n of list %s", ["row#", "list"], [1, ""], true],
- ["call", "LIST idx for list %s dont %b", ["getParam", "list", "r"], false],
- ["setVar:to:", "vVal", ["getLine:ofList:", ["+", ["readVariable", "listIdx"], 2], "lists"]],
- ["doIfElse",
- ["|",
- ["<", ["getParam", "row#", "r"], "1"],
- [">", ["getParam", "row#", "r"], ["readVariable", "vVal"]]],
- [["setVar:to:", "vVal", ""]],
- [["setVar:to:",
- "vVal",
- ["getLine:ofList:",
- ["+",
- ["getLine:ofList:", ["+", ["readVariable", "listIdx"], 1], "lists"],
- ["getParam", "row#", "r"]],
- "lists"]]]]]],
- [1045,
- 268,
- [["procDef", "Get Var index %s", ["name"], [""], true],
- ["setVar:to:", "varIndex#", ["-", ["lineCountOfList:", "vars"], 1]],
- ["doRepeat",
- ["\/", ["lineCountOfList:", "vars"], 2],
- [["doIf",
- ["=", ["getLine:ofList:", ["readVariable", "varIndex#"], "vars"], ["getParam", "name", "r"]],
- [["stopScripts", "this script"]]],
- ["changeVar:by:", "varIndex#", -2]]]]],
- [2232,
- 687,
- [["whenIReceive", "new variable"],
- ["doAsk", "New Variable Name:"],
- ["doIf",
- [">", ["answer"], ""],
- [["setVar:to:", "Last Var", ["answer"]],
- ["call", "Get Var index %s", ["answer"]],
- ["doIf",
- ["<", ["readVariable", "varIndex#"], "1"],
- [["call", "Set Variable %s to %s", ["answer"], ""]]],
- ["doBroadcastAndWait", "change palette"]]]]],
- [1654,
- 1553,
- [["whenIReceive", "new list"],
- ["doAsk", "New List Name:"],
- ["doIf",
- [">", ["answer"], ""],
- [["setVar:to:", "Last List", ["answer"]],
- ["call", "LIST Get row %n of list %s", 1, ["answer"]],
- ["doBroadcastAndWait", "change palette"]]]]],
- [1654,
- 863,
- [["procDef", "LIST Remove %s", ["list"], [""], true],
- ["call", "LIST idx for list %s dont %b", ["getParam", "list", "r"], false],
- ["setVar:to:", "vVal", ["getLine:ofList:", ["+", ["readVariable", "listIdx"], 1], "lists"]],
- ["doRepeat",
- ["getLine:ofList:", ["+", ["readVariable", "listIdx"], 3], "lists"],
- [["deleteLine:ofList:", ["readVariable", "vVal"], "lists"]]],
- ["call", "Shift Lists from %n to %n by %n", 2, ["getLine:ofList:", 1, "lists"], -4],
- ["call",
- "Shift Lists from %n to %n by %n",
- ["readVariable", "listIdx"],
- ["getLine:ofList:", 1, "lists"],
- ["-", 0, ["getLine:ofList:", ["+", ["readVariable", "listIdx"], 3], "lists"]]],
- ["deleteLine:ofList:", ["readVariable", "listIdx"], "lists"],
- ["deleteLine:ofList:", ["readVariable", "listIdx"], "lists"],
- ["deleteLine:ofList:", ["readVariable", "listIdx"], "lists"],
- ["deleteLine:ofList:", ["readVariable", "listIdx"], "lists"],
- ["setLine:ofList:to:", 1, "lists", ["-", ["getLine:ofList:", 1, "lists"], 4]]]],
- [1654,
- 1270,
- [["procDef", "LIST Get Reporter %s", ["list"], [""], true],
- ["call", "LIST idx for list %s dont %b", ["getParam", "list", "r"], false],
- ["setVar:to:", "tmp", ["getLine:ofList:", ["+", ["readVariable", "listIdx"], 1], "lists"]],
- ["doRepeat",
- ["getLine:ofList:", ["+", ["readVariable", "listIdx"], 2], "lists"],
- [["changeVar:by:", "tmp", 1], ["append:toList:", ["getLine:ofList:", ["readVariable", "tmp"], "lists"], "tmpList"]]],
- ["setVar:to:", "vVal", ["contentsOfList:", "tmpList"]],
- ["deleteLine:ofList:", "all", "tmpList"]]],
- [1654,
- 1739,
- [["whenIReceive", "delete list"],
- ["call", "LIST Remove %s", ["getAttribute:of:", "#tok", "Editor"]],
- ["doBroadcastAndWait", "Reset Last Var List"],
- ["doBroadcastAndWait", "change palette"]]],
- [520,
- 2102,
- [["whenIReceive", "Reset Last Var List"],
- ["call", "Get Var index %s", ["readVariable", "Last Var"]],
- ["doIf",
- ["<", ["readVariable", "varIndex#"], "1"],
- [["doIfElse",
- [">", ["lineCountOfList:", "vars"], "0"],
- [["setVar:to:", "Last Var", ["getLine:ofList:", ["-", ["lineCountOfList:", "vars"], 1], "vars"]]],
- [["setVar:to:", "Last Var", "var"]]]]],
- ["call", "LIST idx for list %s dont %b", ["readVariable", "Last List"], ["not", false]],
- ["doIf",
- ["<", ["readVariable", "listIdx"], "1"],
- [["doIfElse",
- [">", ["getLine:ofList:", 1, "lists"], "2"],
- [["setVar:to:", "Last List", ["getLine:ofList:", ["-", ["getLine:ofList:", 1, "lists"], 4], "lists"]]],
- [["setVar:to:", "Last List", "list"]]]]]]],
- [2232,
- 945,
- [["procDef", "LIST Add row to %s value %s", ["list", "value"], ["", ""], true],
- ["call", "LIST idx for list %s dont %b", ["getParam", "list", "r"], false],
- ["setVar:to:",
- "vVal",
- ["+", ["getLine:ofList:", ["+", ["readVariable", "listIdx"], 2], "lists"], 1]],
- ["setVar:to:",
- "vName",
- ["+", ["getLine:ofList:", ["+", ["readVariable", "listIdx"], 1], "lists"], ["readVariable", "vVal"]]],
- ["doIf",
- [">", ["readVariable", "vVal"], ["getLine:ofList:", ["+", ["readVariable", "listIdx"], 3], "lists"]],
- [["setLine:ofList:to:",
- ["+", ["readVariable", "listIdx"], 3],
- "lists",
- ["+", 10, ["getLine:ofList:", ["+", ["readVariable", "listIdx"], 3], "lists"]]],
- ["call", "Shift Lists from %n to %n by %n", ["+", ["readVariable", "listIdx"], 4], ["getLine:ofList:", 1, "lists"], 10],
- ["doRepeat", 10, [["insert:at:ofList:", "", ["readVariable", "vName"], "lists"]]]]],
- ["setLine:ofList:to:", ["readVariable", "vName"], "lists", ["getParam", "value", "r"]],
- ["setLine:ofList:to:", ["+", ["readVariable", "listIdx"], 2], "lists", ["readVariable", "vVal"]]]],
- [3239,
- 1058,
- [["procDef", "LIST idx for list %s dont %b", ["list", "don't create"], ["", false], true],
- ["setVar:to:", "listIdx", "2"],
- ["doRepeat",
- ["\/", ["-", ["getLine:ofList:", 1, "lists"], 2], 4],
- [["setVar:to:", "vName", ["getLine:ofList:", ["readVariable", "listIdx"], "lists"]],
- ["doIf",
- ["=", ["readVariable", "vName"], ["getParam", "list", "r"]],
- [["stopScripts", "this script"]]],
- ["changeVar:by:", "listIdx", 4]]],
- ["doIfElse",
- ["getParam", "don't create", "b"],
- [["setVar:to:", "listIdx", "0"]],
- [["call", "Shift Lists from %n to %n by %n", 2, ["readVariable", "listIdx"], 4],
- ["setLine:ofList:to:", 1, "lists", ["+", 4, ["getLine:ofList:", 1, "lists"]]],
- ["insert:at:ofList:", "10", ["readVariable", "listIdx"], "lists"],
- ["insert:at:ofList:", "0", ["readVariable", "listIdx"], "lists"],
- ["insert:at:ofList:", ["+", ["lineCountOfList:", "lists"], 2], ["readVariable", "listIdx"], "lists"],
- ["insert:at:ofList:", ["getParam", "list", "r"], ["readVariable", "listIdx"], "lists"],
- ["doRepeat", 10, [["append:toList:", "", "lists"]]]]]]],
- [10,
- 1181,
- [["procDef", "Exec cmd 128-159", [], [], false],
- ["doIfElse",
- ["=", ["readVariable", "inst"], "134"],
- [["doUntil",
- ["<", ["readVariable", "heapIdx"], "1"],
- [["setVar:to:", "paramIdx", ["getLine:ofList:", ["+", ["readVariable", "execIdx"], 6], "Script"]],
- ["setVar:to:", "paramIdx", ["getLine:ofList:", ["+", ["readVariable", "paramIdx"], 9], "Script"]],
- ["call", "Eval %n", ["readVariable", "paramIdx"]],
- ["doIfElse",
- ["=", ["getLine:ofList:", "last", "stack"], "all"],
- [["deleteLine:ofList:", "all", "threads"], ["setVar:to:", "heapIdx", "0"], ["setVar:to:", "execIdx", "0"]],
- [["deleteLine:ofList:", "last", "stack"],
- ["setVar:to:", "vVal", ["getLine:ofList:", ["+", ["readVariable", "heapIdx"], 1], "heap"]],
- ["call", "Delete Heap %n", ["readVariable", "heapIdx"]],
- ["setVar:to:", "heapIdx", ["readVariable", "vVal"]]]]]]],
- [["doIfElse",
- ["=", ["readVariable", "inst"], "151"],
- [["setVar:to:", "paramIdx", ["getLine:ofList:", ["+", ["readVariable", "execIdx"], 6], "Script"]],
- ["setVar:to:", "paramIdx", ["getLine:ofList:", ["+", ["readVariable", "paramIdx"], 9], "Script"]],
- ["call", "Eval %n", ["readVariable", "paramIdx"]],
- ["call", "Yield Thread for %n secs", ["getLine:ofList:", "last", "stack"]],
- ["deleteLine:ofList:", "last", "stack"]],
- [["doIfElse",
- ["=", ["readVariable", "inst"], "147"],
- [["call", "Eval 2nd Param and progress"], ["turnRight:", ["readVariable", "vVal"]], ["setVar:to:", "run_dirty", "true"]],
- [["doIfElse",
- ["=", ["readVariable", "inst"], "148"],
- [["call", "Eval 2nd Param and progress"], ["turnLeft:", ["readVariable", "vVal"]], ["setVar:to:", "run_dirty", "true"]],
- [["doIfElse",
- ["=", ["readVariable", "inst"], "156"],
- [["setVar:to:", "execIdx", ["getLine:ofList:", ["+", ["readVariable", "execIdx"], 9], "Script"]]],
- [["doIfElse",
- ["=", ["readVariable", "inst"], "129"],
- [["stampCostume"],
- ["setVar:to:", "run_dirty", "true"],
- ["setVar:to:", "execIdx", ["getLine:ofList:", ["+", ["readVariable", "execIdx"], 9], "Script"]]],
- [["doIfElse",
- ["=", ["readVariable", "inst"], "152"],
- [["call", "Push Heap %n", ["readVariable", "heapIdx"]],
- ["setVar:to:", "execIdx", ["getLine:ofList:", ["+", ["readVariable", "execIdx"], 7], "Script"]],
- ["setLine:ofList:to:", ["readVariable", "heapIdx"], "heap", ["readVariable", "execIdx"]],
- ["setVar:to:",
- "warpSpeed",
- ["+", ["getLine:ofList:", ["+", ["readVariable", "thread#"], 2], "threads"], 1]],
- ["setLine:ofList:to:", ["+", ["readVariable", "thread#"], 2], "threads", ["readVariable", "warpSpeed"]]],
- [["doIfElse",
- ["=", ["readVariable", "inst"], "142"],
- [["setVar:to:", "#TimerRoot", ["timer"]],
- ["setVar:to:", "execIdx", ["getLine:ofList:", ["+", ["readVariable", "execIdx"], 9], "Script"]]],
- [["setVar:to:", "execIdx", ["getLine:ofList:", ["+", ["readVariable", "execIdx"], 9], "Script"]]]]]]]]]]]]]]]]]]]],
- [1654,
- 737,
- [["whenIReceive", "exec - ask"],
- ["doAsk", ["getLine:ofList:", ["+", ["readVariable", "askYieldHeapIdx"], 2], "heap"]],
- ["setVar:to:", "#ANSWER", ["answer"]],
- ["setVar:to:", "askYieldHeapIdx", 0]]],
- [1045,
- 1536,
- [["procDef", "Start Thread %n event %s", ["idx", "event"], [1, ""], true],
- ["doIfElse",
- [">", ["readVariable", "heapPool#"], "0"],
- [["setVar:to:", "tmp", ["readVariable", "heapPool#"]],
- ["setVar:to:", "heapPool#", ["getLine:ofList:", ["readVariable", "heapPool#"], "heap"]],
- ["setLine:ofList:to:", ["readVariable", "tmp"], "heap", ["getParam", "idx", "r"]],
- ["setLine:ofList:to:", ["+", ["readVariable", "tmp"], 1], "heap", "0"]],
- [["append:toList:", ["getParam", "idx", "r"], "heap"],
- ["setVar:to:", "tmp", ["lineCountOfList:", "heap"]],
- ["append:toList:", "0", "heap"],
- ["append:toList:", "", "heap"]]],
- ["doIfElse",
- [">", ["timer"], ["readVariable", "newThreadTimeout"]],
- [["insert:at:ofList:", ["readVariable", "tmp"], 1, "threads"],
- ["insert:at:ofList:", ["getParam", "event", "r"], 2, "threads"],
- ["insert:at:ofList:", "0", 3, "threads"],
- ["changeVar:by:", "thread#", 3]],
- [["append:toList:", ["readVariable", "tmp"], "threads"],
- ["append:toList:", ["getParam", "event", "r"], "threads"],
- ["append:toList:", "0", "threads"]]]]],
- [5670,
- 582,
- [["procDef", "exec thread %n safe %n", ["thread#", "safeTime"], [1, 1], false],
- ["setVar:to:", "yieldThread", ""],
- ["doUntil",
- ["|", [">", ["readVariable", "yieldThread"], ""], ["<", ["readVariable", "heapIdx"], "1"]],
- [["doIfElse",
- ["<", ["readVariable", "execIdx"], "1"],
- [["doIf",
- ["<", ["readVariable", "execIdx"], "-100"],
- [["doIfElse",
- ["=", ["readVariable", "execIdx"], "-101"],
- [["doIf",
- [">", ["readVariable", "askYieldHeapIdx"], "0"],
- [["setVar:to:", "yieldThread", "wait"], ["stopScripts", "this script"]]]],
- [["doIfElse",
- ["=", ["readVariable", "execIdx"], "-102"],
- [["doIf",
- ["<", ["timer"], ["getLine:ofList:", ["+", ["readVariable", "heapIdx"], 2], "heap"]],
- [["setVar:to:", "yieldThread", "wait"], ["stopScripts", "this script"]]]],
- [["setVar:to:", "yieldThread", "wait"], ["stopScripts", "this script"]]]]]]],
- ["doIf",
- [">", ["readVariable", "heapIdx"], "0"],
- [["doIfElse",
- [">", ["readVariable", "warpSpeed"], "0"],
- [["doIfElse",
- [">", ["timer"], ["getParam", "safeTime", "r"]],
- [["call", "Into Loop or Out of nesting %s", "wait"]],
- [["call", "Into Loop or Out of nesting %s", ""]]]],
- [["doIfElse",
- [">", ["timer"], ["getParam", "safeTime", "r"]],
- [["call", "Into Loop or Out of nesting %s", "wait"]],
- [["call", "Into Loop or Out of nesting %s", "true"]]]]]]],
- ["doIf", ["<", ["readVariable", "heapIdx"], "1"], [["stopScripts", "this script"]]]],
- [["setVar:to:", "inst", ["getLine:ofList:", ["+", ["readVariable", "execIdx"], 11], "Script"]],
- ["doIfElse",
- ["<", ["readVariable", "inst"], "128"],
- [["doIfElse",
- ["<", ["readVariable", "inst"], "64"],
- [["doIfElse",
- ["<", ["readVariable", "inst"], "32"],
- [["call", "Exec cmd 0-31"]],
- [["call", "Exec cmd 32-63"]]]],
- [["doIfElse",
- ["<", ["readVariable", "inst"], "96"],
- [["call", "Exec cmd 64-95"]],
- [["call", "Exec cmd 96-127"]]]]]],
- [["doIfElse",
- ["<", ["readVariable", "inst"], "192"],
- [["doIfElse",
- ["<", ["readVariable", "inst"], "160"],
- [["call", "Exec cmd 128-159"]],
- [["call", "Exec cmd 160-191"]]]],
- [["doIfElse", ["<", ["readVariable", "inst"], "224"], [["call", "Exec cmd 192-223"]], null]]]]]]]]]]],
- [4776.6,
- 1486,
- [["procDef", "Exec cmd 0-31", [], [], false],
- ["doIfElse",
- ["=", ["readVariable", "inst"], "23"],
- [["call", "inst - var %n", ["readVariable", "inst"]]],
- [["doIfElse",
- ["|", ["=", ["readVariable", "inst"], "25"], ["=", ["readVariable", "inst"], "26"]],
- [["call", "Set x,y: x? %b change? %b", ["=", ["readVariable", "inst"], "25"], ["not", false]]],
- [["doIfElse",
- ["=", ["readVariable", "inst"], "27"],
- [["clearPenTrails"],
- ["setVar:to:", "execIdx", ["getLine:ofList:", ["+", ["readVariable", "execIdx"], 9], "Script"]],
- ["setVar:to:", "run_dirty", "true"]],
- [["doIfElse",
- ["=", ["readVariable", "inst"], "13"],
- [["call", "Eval 2 params %b start %n", ["not", false], ["readVariable", "execIdx"]],
- ["call", "LIST Add row to %s value %s", ["readVariable", "p2"], ["readVariable", "p1"]],
- ["setVar:to:", "execIdx", ["getLine:ofList:", ["+", ["readVariable", "execIdx"], 9], "Script"]]],
- [["doIfElse",
- ["=", ["readVariable", "inst"], "16"],
- [["call", "Eval 2nd Param and progress"], ["call", "Broadcast %s event %s", ["readVariable", "vVal"], 0]],
- [["doIfElse",
- ["=", ["readVariable", "inst"], "18"],
- [["call", "Eval 2nd Param and progress"], ["changePenHueBy:", ["readVariable", "vVal"]]],
- [["doIfElse",
- ["=", ["readVariable", "inst"], "19"],
- [["call", "Eval 2nd Param and progress"], ["changePenShadeBy:", ["readVariable", "vVal"]]],
- [["doIfElse",
- ["=", ["readVariable", "inst"], "20"],
- [["call", "Eval 2nd Param and progress"],
- ["setVar:to:", "penSize", ["readVariable", "vVal"]],
- ["changePenSizeBy:", ["readVariable", "vVal"]]],
- [["doIfElse",
- ["=", ["readVariable", "inst"], "21"],
- [["call", "Eval 2nd Param and progress"], ["changeSizeBy:", ["readVariable", "vVal"]], ["setVar:to:", "run_dirty", "true"]],
- [["doIfElse",
- ["=", ["readVariable", "inst"], "15"],
- [["bounceOffEdge"],
- ["setVar:to:", "execIdx", ["getLine:ofList:", ["+", ["readVariable", "execIdx"], 9], "Script"]],
- ["setVar:to:", "run_dirty", "true"]],
- [["setVar:to:", "execIdx", ["getLine:ofList:", ["+", ["readVariable", "execIdx"], 9], "Script"]]]]]]]]]]]]]]]]]]]]]]]],
- [5672,
- 2290,
- [["procDef", "inst - if %n", ["inst"], [1], false],
- ["setVar:to:", "paramIdx", ["getLine:ofList:", ["+", ["readVariable", "execIdx"], 6], "Script"]],
- ["setVar:to:", "paramIdx", ["getLine:ofList:", ["+", ["readVariable", "paramIdx"], 9], "Script"]],
- ["call", "Eval %n", ["readVariable", "paramIdx"]],
- ["doIfElse",
- ["=", ["getLine:ofList:", "last", "stack"], "true"],
- [["call", "Push Heap %n", ["readVariable", "heapIdx"]],
- ["setVar:to:", "execIdx", ["getLine:ofList:", ["+", ["readVariable", "execIdx"], 7], "Script"]],
- ["setLine:ofList:to:", ["readVariable", "heapIdx"], "heap", ["readVariable", "execIdx"]]],
- [["doIfElse",
- ["=", ["getParam", "inst", "r"], "47"],
- [["call", "Push Heap %n", ["readVariable", "heapIdx"]],
- ["setVar:to:", "execIdx", ["getLine:ofList:", ["+", ["readVariable", "execIdx"], 8], "Script"]],
- ["setLine:ofList:to:", ["readVariable", "heapIdx"], "heap", ["readVariable", "execIdx"]]],
- [["setVar:to:", "execIdx", ["getLine:ofList:", ["+", ["readVariable", "execIdx"], 9], "Script"]]]]]],
- ["deleteLine:ofList:", "last", "stack"]]],
- [6294,
- 22,
- [["procDef", "Into Loop or Out of nesting %s", ["yield"], [""], false],
- ["setVar:to:", "vVal", ["getLine:ofList:", ["+", ["readVariable", "heapIdx"], 1], "heap"]],
- ["doIf",
- ["<", ["readVariable", "vVal"], "1"],
- [["call", "Delete Heap %n", ["readVariable", "heapIdx"]],
- ["setVar:to:", "heapIdx", "0"],
- ["setVar:to:", "execIdx", "0"],
- ["stopScripts", "this script"]]],
- ["setVar:to:", "execIdx", ["getLine:ofList:", ["readVariable", "vVal"], "heap"]],
- ["doIf",
- ["<", ["readVariable", "execIdx"], "-99"],
- [["call", "Delete Heap %n", ["readVariable", "heapIdx"]],
- ["setVar:to:", "heapIdx", ["readVariable", "vVal"]],
- ["setVar:to:", "execIdx", ["getLine:ofList:", ["+", ["readVariable", "execIdx"], 9], "Script"]],
- ["stopScripts", "this script"]]],
- ["setVar:to:", "inst", ["getLine:ofList:", ["+", ["readVariable", "execIdx"], 11], "Script"]],
- ["doIfElse",
- ["=", ["readVariable", "inst"], "43"],
- [["setVar:to:", "execIdx", ["getLine:ofList:", ["+", ["readVariable", "execIdx"], 7], "Script"]],
- ["setLine:ofList:to:", ["readVariable", "heapIdx"], "heap", ["readVariable", "execIdx"]],
- ["setVar:to:", "yieldThread", ["getParam", "yield", "r"]],
- ["stopScripts", "this script"]],
- [["doIfElse",
- ["=", ["readVariable", "inst"], "49"],
- [["setVar:to:", "vName", ["getLine:ofList:", ["+", ["readVariable", "heapIdx"], 2], "heap"]],
- ["doIfElse",
- ["<", ["readVariable", "vName"], "1"],
- [["call", "Delete Heap %n", ["readVariable", "heapIdx"]],
- ["setVar:to:", "heapIdx", ["readVariable", "vVal"]],
- ["setVar:to:", "execIdx", ["getLine:ofList:", ["+", ["readVariable", "execIdx"], 9], "Script"]]],
- [["setLine:ofList:to:",
- ["+", ["readVariable", "heapIdx"], 2],
- "heap",
- ["-", ["readVariable", "vName"], 1]],
- ["setVar:to:", "execIdx", ["getLine:ofList:", ["+", ["readVariable", "execIdx"], 7], "Script"]],
- ["setLine:ofList:to:", ["readVariable", "heapIdx"], "heap", ["readVariable", "execIdx"]]]],
- ["setVar:to:", "yieldThread", ["getParam", "yield", "r"]],
- ["stopScripts", "this script"]],
- [["doIfElse",
- ["|", ["=", ["readVariable", "inst"], "51"], ["=", ["readVariable", "inst"], "52"]],
- [["setVar:to:", "yieldThread", ["getParam", "yield", "r"]],
- ["setVar:to:", "paramIdx", ["getLine:ofList:", ["+", ["readVariable", "execIdx"], 6], "Script"]],
- ["setVar:to:", "paramIdx", ["getLine:ofList:", ["+", ["readVariable", "paramIdx"], 9], "Script"]],
- ["call", "Eval %n", ["readVariable", "paramIdx"]],
- ["doIfElse",
- ["=", ["getLine:ofList:", "last", "stack"], "true"],
- [["setVar:to:", "vVal", ["getLine:ofList:", ["+", ["readVariable", "heapIdx"], 1], "heap"]],
- ["call", "Delete Heap %n", ["readVariable", "heapIdx"]],
- ["setVar:to:", "heapIdx", ["readVariable", "vVal"]],
- ["setVar:to:", "execIdx", ["getLine:ofList:", ["+", ["readVariable", "execIdx"], 9], "Script"]]],
- [["doIfElse",
- ["=", ["getLine:ofList:", ["+", ["readVariable", "execIdx"], 11], "Script"], "51"],
- [["setVar:to:", "execIdx", ["getLine:ofList:", ["+", ["readVariable", "execIdx"], 7], "Script"]],
- ["setLine:ofList:to:", ["readVariable", "heapIdx"], "heap", ["readVariable", "execIdx"]]],
- [["setVar:to:", "execIdx", "-100"],
- ["setLine:ofList:to:", ["readVariable", "heapIdx"], "heap", ["readVariable", "execIdx"]],
- ["setVar:to:", "yieldThread", "wait"]]]]],
- ["deleteLine:ofList:", "last", "stack"],
- ["stopScripts", "this script"]],
- [["doIfElse",
- ["=", ["readVariable", "inst"], "152"],
- [["call", "Delete Heap %n", ["readVariable", "heapIdx"]],
- ["setVar:to:", "heapIdx", ["readVariable", "vVal"]],
- ["setVar:to:", "execIdx", ["getLine:ofList:", ["+", ["readVariable", "execIdx"], 9], "Script"]],
- ["setVar:to:",
- "warpSpeed",
- ["-", ["getLine:ofList:", ["+", ["readVariable", "thread#"], 2], "threads"], 1]],
- ["setLine:ofList:to:", ["+", ["readVariable", "thread#"], 2], "threads", ["readVariable", "warpSpeed"]]],
- [["doIf", ["=", ["readVariable", "inst"], "103"], [["say:", ""]]],
- ["call", "Delete Heap %n", ["readVariable", "heapIdx"]],
- ["setVar:to:", "heapIdx", ["readVariable", "vVal"]],
- ["setVar:to:", "execIdx", ["getLine:ofList:", ["+", ["readVariable", "execIdx"], 9], "Script"]]]]]]]]]]]],
- [6302,
- 2066,
- [["procDef", "Eval %n", ["idx"], [1], false],
- ["doIf",
- ["<", ["getParam", "idx", "r"], "1"],
- [["append:toList:", "", "stack"], ["stopScripts", "this script"]]],
- ["setVar:to:", "inst", ["getLine:ofList:", ["+", ["getParam", "idx", "r"], 11], "Script"]],
- ["doIf",
- ["<", ["readVariable", "inst"], "1"],
- [["append:toList:", ["getLine:ofList:", ["+", ["getParam", "idx", "r"], 5], "Script"], "stack"],
- ["stopScripts", "this script"]]],
- ["doIfElse",
- ["<", ["readVariable", "inst"], "128"],
- [["doIfElse",
- ["<", ["readVariable", "inst"], "64"],
- [["doIfElse",
- ["<", ["readVariable", "inst"], "32"],
- [["doIf",
- ["<", ["readVariable", "inst"], "11"],
- [["call", "eval (a op b) %n at idx %n", ["readVariable", "inst"], ["getParam", "idx", "r"]],
- ["setVar:to:", "paramIdx", ["getParam", "idx", "r"]],
- ["stopScripts", "this script"]]],
- ["doIf",
- ["=", ["readVariable", "inst"], "12"],
- [["append:toList:", ["readVariable", "#ANSWER"], "stack"], ["stopScripts", "this script"]]],
- ["doIf",
- ["=", ["readVariable", "inst"], "31"],
- [["setVar:to:", "paramIdx", ["getLine:ofList:", ["+", ["getParam", "idx", "r"], 6], "Script"]],
- ["call", "Eval %n", ["readVariable", "paramIdx"]],
- ["call", "Eval %s of...", ["getLine:ofList:", "last", "stack"]],
- ["setVar:to:", "paramIdx", ["getParam", "idx", "r"]],
- ["stopScripts", "this script"]]]],
- [["doIf",
- ["=", ["readVariable", "inst"], "32"],
- [["setVar:to:", "paramIdx", ["getLine:ofList:", ["+", ["getParam", "idx", "r"], 6], "Script"]],
- ["setVar:to:", "paramIdx", ["getLine:ofList:", ["+", ["readVariable", "paramIdx"], 9], "Script"]],
- ["call", "Eval %n", ["readVariable", "paramIdx"]],
- ["setVar:to:", "paramIdx", ["getLine:ofList:", ["+", ["readVariable", "paramIdx"], 9], "Script"]],
- ["call", "Eval %n", ["readVariable", "paramIdx"]],
- ["setVar:to:", "paramIdx", ["getLine:ofList:", "last", "stack"]],
- ["deleteLine:ofList:", "last", "stack"],
- ["setLine:ofList:to:", "last", "stack", ["concatenate:with:", ["getLine:ofList:", "last", "stack"], ["readVariable", "paramIdx"]]],
- ["setVar:to:", "paramIdx", ["getParam", "idx", "r"]],
- ["stopScripts", "this script"]]],
- ["doIf",
- ["=", ["readVariable", "inst"], "33"],
- [["call",
- "LIST Get Reporter %s",
- ["getLine:ofList:",
- ["+", ["getLine:ofList:", ["+", ["getParam", "idx", "r"], 6], "Script"], 5],
- "Script"]],
- ["append:toList:", ["readVariable", "vVal"], "stack"],
- ["stopScripts", "this script"]]],
- ["doIf",
- ["=", ["readVariable", "inst"], "59"],
- [["call", "Eval 2 params %b start %n", ["not", false], ["getParam", "idx", "r"]],
- ["doIfElse",
- ["=", ["readVariable", "p1"], "last"],
- [["call", "LIST Get length of list %s", ["readVariable", "p2"]],
- ["call", "LIST Get row %n of list %s", ["readVariable", "vVal"], ["readVariable", "p2"]]],
- [["doIfElse",
- ["=", ["readVariable", "p1"], "random"],
- [["call", "LIST Get length of list %s", ["readVariable", "p2"]],
- ["call", "LIST Get row %n of list %s", ["randomFrom:to:", 1, ["readVariable", "vVal"]], ["readVariable", "p2"]]],
- [["call", "LIST Get row %n of list %s", ["computeFunction:of:", "floor", ["readVariable", "p1"]], ["readVariable", "p2"]]]]]],
- ["append:toList:", ["readVariable", "vVal"], "stack"],
- ["setVar:to:", "paramIdx", ["getParam", "idx", "r"]],
- ["stopScripts", "this script"]]],
- ["doIf",
- ["=", ["readVariable", "inst"], "62"],
- [["append:toList:", ["getUserName"], "stack"],
- ["setVar:to:", "paramIdx", ["getParam", "idx", "r"]],
- ["stopScripts", "this script"]]]]]],
- [["doIfElse",
- ["<", ["readVariable", "inst"], "96"],
- [["doIfElse",
- ["<", ["readVariable", "inst"], "80"],
- [["doIf",
- ["=", ["readVariable", "inst"], "67"],
- [["append:toList:", ["heading"], "stack"], ["stopScripts", "this script"]]],
- ["doIf",
- ["=", ["readVariable", "inst"], "77"],
- [["setVar:to:", "paramIdx", ["getLine:ofList:", ["+", ["getParam", "idx", "r"], 6], "Script"]],
- ["setVar:to:", "paramIdx", ["getLine:ofList:", ["+", ["readVariable", "paramIdx"], 9], "Script"]],
- ["call", "Eval %n", ["readVariable", "paramIdx"]],
- ["setLine:ofList:to:", "last", "stack", ["keyPressed:", ["getLine:ofList:", "last", "stack"]]],
- ["setVar:to:", "paramIdx", ["getParam", "idx", "r"]],
- ["stopScripts", "this script"]]],
- ["doIf",
- ["=", ["readVariable", "inst"], "78"],
- [["call", "Eval 2 params %b start %n", ["not", false], ["getParam", "idx", "r"]],
- ["append:toList:", ["letter:of:", ["readVariable", "p1"], ["readVariable", "p2"]], "stack"],
- ["setVar:to:", "paramIdx", ["getParam", "idx", "r"]],
- ["stopScripts", "this script"]]],
- ["doIf",
- ["=", ["readVariable", "inst"], "79"],
- [["setVar:to:", "paramIdx", ["getLine:ofList:", ["+", ["getParam", "idx", "r"], 6], "Script"]],
- ["setVar:to:", "paramIdx", ["getLine:ofList:", ["+", ["readVariable", "paramIdx"], 9], "Script"]],
- ["call", "Eval %n", ["readVariable", "paramIdx"]],
- ["call", "LIST Get length of list %s", ["getLine:ofList:", "last", "stack"]],
- ["setLine:ofList:to:", "last", "stack", ["readVariable", "vVal"]],
- ["setVar:to:", "paramIdx", ["getParam", "idx", "r"]],
- ["stopScripts", "this script"]]]],
- [["doIf",
- ["=", ["readVariable", "inst"], "80"],
- [["call", "Eval 2 params %b start %n", false, ["getParam", "idx", "r"]],
- ["call", "LIST %s contains %s", ["readVariable", "p1"], ["readVariable", "p2"]],
- ["doIfElse",
- [">", ["readVariable", "vVal"], "0"],
- [["append:toList:", "true", "stack"]],
- [["append:toList:", "false", "stack"]]],
- ["setVar:to:", "paramIdx", ["getParam", "idx", "r"]],
- ["stopScripts", "this script"]]],
- ["doIf",
- ["=", ["readVariable", "inst"], "83"],
- [["append:toList:", ["mousePressed"], "stack"], ["stopScripts", "this script"]]],
- ["doIf",
- ["=", ["readVariable", "inst"], "84"],
- [["append:toList:", ["mouseX"], "stack"], ["stopScripts", "this script"]]],
- ["doIf",
- ["=", ["readVariable", "inst"], "85"],
- [["append:toList:", ["mouseY"], "stack"], ["stopScripts", "this script"]]],
- ["doIf",
- ["=", ["readVariable", "inst"], "88"],
- [["setVar:to:", "paramIdx", ["getLine:ofList:", ["+", ["getParam", "idx", "r"], 6], "Script"]],
- ["setVar:to:", "paramIdx", ["getLine:ofList:", ["+", ["readVariable", "paramIdx"], 9], "Script"]],
- ["call", "Eval %n", ["readVariable", "paramIdx"]],
- ["doIfElse",
- ["=", ["getLine:ofList:", "last", "stack"], "true"],
- [["setLine:ofList:to:", "last", "stack", "false"]],
- [["setLine:ofList:to:", "last", "stack", "true"]]],
- ["setVar:to:", "paramIdx", ["getParam", "idx", "r"]],
- ["stopScripts", "this script"]]]]]],
- [["doIf",
- ["=", ["readVariable", "inst"], "98"],
- [["call", "Eval 2 params %b start %n", ["not", false], ["getParam", "idx", "r"]],
- ["append:toList:", ["randomFrom:to:", ["readVariable", "p1"], ["readVariable", "p2"]], "stack"],
- ["setVar:to:", "paramIdx", ["getParam", "idx", "r"]],
- ["stopScripts", "this script"]]],
- ["doIf",
- ["=", ["readVariable", "inst"], "99"],
- [["setVar:to:", "paramIdx", ["getLine:ofList:", ["+", ["getParam", "idx", "r"], 6], "Script"]],
- ["call", "Eval %n", ["readVariable", "paramIdx"]],
- ["setVar:to:", "paramIdx", ["getLine:ofList:", "last", "stack"]],
- ["deleteLine:ofList:", "last", "stack"],
- ["call", "Get Variable %s", ["readVariable", "paramIdx"]],
- ["setVar:to:", "paramIdx", ["getParam", "idx", "r"]],
- ["stopScripts", "this script"]]],
- ["doIf",
- ["=", ["readVariable", "inst"], "101"],
- [["setVar:to:", "paramIdx", ["getLine:ofList:", ["+", ["getParam", "idx", "r"], 6], "Script"]],
- ["setVar:to:", "paramIdx", ["getLine:ofList:", ["+", ["readVariable", "paramIdx"], 9], "Script"]],
- ["call", "Eval %n", ["readVariable", "paramIdx"]],
- ["setLine:ofList:to:", "last", "stack", ["rounded", ["getLine:ofList:", "last", "stack"]]],
- ["setVar:to:", "paramIdx", ["getParam", "idx", "r"]],
- ["stopScripts", "this script"]]]]]]]],
- [["doIfElse",
- ["<", ["readVariable", "inst"], "160"],
- [["doIf",
- ["=", ["readVariable", "inst"], "136"],
- [["setVar:to:", "paramIdx", ["getLine:ofList:", ["+", ["getParam", "idx", "r"], 6], "Script"]],
- ["setVar:to:", "paramIdx", ["getLine:ofList:", ["+", ["readVariable", "paramIdx"], 9], "Script"]],
- ["call", "Eval %n", ["readVariable", "paramIdx"]],
- ["setLine:ofList:to:", "last", "stack", ["stringLength:", ["getLine:ofList:", "last", "stack"]]],
- ["setVar:to:", "paramIdx", ["getParam", "idx", "r"]],
- ["stopScripts", "this script"]]],
- ["doIf",
- ["=", ["readVariable", "inst"], "140"],
- [["setVar:to:", "paramIdx", ["getLine:ofList:", ["+", ["getParam", "idx", "r"], 6], "Script"]],
- ["setVar:to:", "paramIdx", ["getLine:ofList:", ["+", ["readVariable", "paramIdx"], 9], "Script"]],
- ["call", "Eval %n", ["readVariable", "paramIdx"]],
- ["setVar:to:", "tmp", ["getLine:ofList:", "last", "stack"]],
- ["doIfElse",
- ["=", ["readVariable", "tmp"], "year"],
- [["setLine:ofList:to:", "last", "stack", ["timeAndDate", "year"]]],
- [["doIfElse",
- ["=", ["readVariable", "tmp"], "month"],
- [["setLine:ofList:to:", "last", "stack", ["timeAndDate", "month"]]],
- [["doIfElse",
- ["=", ["readVariable", "tmp"], "date"],
- [["setLine:ofList:to:", "last", "stack", ["timeAndDate", "date"]]],
- [["doIfElse",
- ["=", ["readVariable", "tmp"], "day of week"],
- [["setLine:ofList:to:", "last", "stack", ["timeAndDate", "day of week"]]],
- [["doIfElse",
- ["=", ["readVariable", "tmp"], "hour"],
- [["setLine:ofList:to:", "last", "stack", ["timeAndDate", "hour"]]],
- [["doIfElse",
- ["=", ["readVariable", "tmp"], "minute"],
- [["setLine:ofList:to:", "last", "stack", ["timeAndDate", "minute"]]],
- [["setLine:ofList:to:", "last", "stack", ["timeAndDate", "second"]]]]]]]]]]]]]],
- ["setVar:to:", "paramIdx", ["getParam", "idx", "r"]],
- ["stopScripts", "this script"]]],
- ["doIf",
- ["=", ["readVariable", "inst"], "141"],
- [["append:toList:", ["-", ["timer"], ["readVariable", "#TimerRoot"]], "stack"], ["stopScripts", "this script"]]]],
- [["doIf",
- ["=", ["readVariable", "inst"], "160"],
- [["append:toList:", ["xpos"], "stack"], ["stopScripts", "this script"]]],
- ["doIf",
- ["=", ["readVariable", "inst"], "163"],
- [["append:toList:", ["ypos"], "stack"], ["stopScripts", "this script"]]],
- ["doIf",
- ["=", ["readVariable", "inst"], "169"],
- [["setVar:to:", "paramIdx", ["getLine:ofList:", ["+", ["getParam", "idx", "r"], 6], "Script"]],
- ["setVar:to:", "paramIdx", ["getLine:ofList:", ["+", ["readVariable", "paramIdx"], 9], "Script"]],
- ["call", "Eval %n", ["readVariable", "paramIdx"]],
- ["call", "Len = Width of %s", ["getLine:ofList:", "last", "stack"]],
- ["setLine:ofList:to:", "last", "stack", ["readVariable", "Len"]],
- ["setVar:to:", "paramIdx", ["getParam", "idx", "r"]],
- ["stopScripts", "this script"]]]]]]],
- ["append:toList:", "", "stack"]]],
- [7179,
- 2010,
- [["procDef", "eval (a op b) %n at idx %n", ["op", "idx"], [1, 1], false],
- ["setVar:to:", "paramIdx", ["getLine:ofList:", ["+", ["getParam", "idx", "r"], 6], "Script"]],
- ["call", "Eval %n", ["readVariable", "paramIdx"]],
- ["setVar:to:", "paramIdx", ["getLine:ofList:", ["+", ["readVariable", "paramIdx"], 9], "Script"]],
- ["setVar:to:", "paramIdx", ["getLine:ofList:", ["+", ["readVariable", "paramIdx"], 9], "Script"]],
- ["call", "Eval %n", ["readVariable", "paramIdx"]],
- ["setVar:to:", "paramIdx", ["getLine:ofList:", "last", "stack"]],
- ["deleteLine:ofList:", "last", "stack"],
- ["doIfElse",
- ["<", ["getParam", "op", "r"], "9"],
- [["doIfElse",
- ["<", ["getParam", "op", "r"], "5"],
- [["doIfElse",
- ["<", ["getParam", "op", "r"], "3"],
- [["doIfElse",
- ["=", ["getParam", "op", "r"], "1"],
- [["setLine:ofList:to:", "last", "stack", ["-", ["getLine:ofList:", "last", "stack"], ["readVariable", "paramIdx"]]]],
- [["setLine:ofList:to:", "last", "stack", ["*", ["getLine:ofList:", "last", "stack"], ["readVariable", "paramIdx"]]]]]],
- [["doIfElse",
- ["=", ["getParam", "op", "r"], "3"],
- [["setLine:ofList:to:", "last", "stack", ["\/", ["getLine:ofList:", "last", "stack"], ["readVariable", "paramIdx"]]]],
- [["setLine:ofList:to:",
- "last",
- "stack",
- ["&",
- ["=", ["getLine:ofList:", "last", "stack"], "true"],
- ["=", ["readVariable", "paramIdx"], "true"]]]]]]]],
- [["doIfElse",
- ["<", ["getParam", "op", "r"], "7"],
- [["doIfElse",
- ["=", ["getParam", "op", "r"], "5"],
- [["setLine:ofList:to:", "last", "stack", ["%", ["getLine:ofList:", "last", "stack"], ["readVariable", "paramIdx"]]]],
- [["setLine:ofList:to:", "last", "stack", ["+", ["getLine:ofList:", "last", "stack"], ["readVariable", "paramIdx"]]]]]],
- [["doIfElse",
- ["=", ["getParam", "op", "r"], "7"],
- [["setLine:ofList:to:", "last", "stack", ["<", ["getLine:ofList:", "last", "stack"], ["readVariable", "paramIdx"]]]],
- [["setLine:ofList:to:", "last", "stack", ["=", ["getLine:ofList:", "last", "stack"], ["readVariable", "paramIdx"]]]]]]]]]],
- [["doIfElse",
- ["=", ["getParam", "op", "r"], "9"],
- [["setLine:ofList:to:", "last", "stack", [">", ["getLine:ofList:", "last", "stack"], ["readVariable", "paramIdx"]]]],
- [["setLine:ofList:to:",
- "last",
- "stack",
- ["|",
- ["=", ["getLine:ofList:", "last", "stack"], "true"],
- ["=", ["readVariable", "paramIdx"], "true"]]]]]]]]],
- [7926,
- 50,
- [["procDef",
- "fill triangle %n %n %n %n %n %n resolution: %n outline %b",
- ["Ax", "Ay", "Bx", "By", "Cx", "Cy", "res", "outline?"],
- [1, 1, 1, 1, 1, 1, 1, false],
- true],
- ["call",
- "fill tri, inner 1 %n %n %n %n %n %n %n %n %n %n",
- ["getParam", "Ax", "r"],
- ["getParam", "Ay", "r"],
- ["getParam", "Bx", "r"],
- ["getParam", "By", "r"],
- ["getParam", "Cx", "r"],
- ["getParam", "Cy", "r"],
- ["computeFunction:of:",
- "sqrt",
- ["+",
- ["*",
- ["-", ["getParam", "Bx", "r"], ["getParam", "Cx", "r"]],
- ["-", ["getParam", "Bx", "r"], ["getParam", "Cx", "r"]]],
- ["*",
- ["-", ["getParam", "By", "r"], ["getParam", "Cy", "r"]],
- ["-", ["getParam", "By", "r"], ["getParam", "Cy", "r"]]]]],
- ["computeFunction:of:",
- "sqrt",
- ["+",
- ["*",
- ["-", ["getParam", "Ax", "r"], ["getParam", "Cx", "r"]],
- ["-", ["getParam", "Ax", "r"], ["getParam", "Cx", "r"]]],
- ["*",
- ["-", ["getParam", "Ay", "r"], ["getParam", "Cy", "r"]],
- ["-", ["getParam", "Ay", "r"], ["getParam", "Cy", "r"]]]]],
- ["computeFunction:of:",
- "sqrt",
- ["+",
- ["*",
- ["-", ["getParam", "Ax", "r"], ["getParam", "Bx", "r"]],
- ["-", ["getParam", "Ax", "r"], ["getParam", "Bx", "r"]]],
- ["*",
- ["-", ["getParam", "Ay", "r"], ["getParam", "By", "r"]],
- ["-", ["getParam", "Ay", "r"], ["getParam", "By", "r"]]]]],
- ["*", ["getParam", "res", "r"], 1.7]],
- ["penSize:", ["readVariable", "penSize"]],
- ["doIf",
- ["getParam", "outline?", "b"],
- [["gotoX:y:", ["getParam", "Ax", "r"], ["getParam", "Ay", "r"]],
- ["putPenDown"],
- ["penSize:", ["getParam", "res", "r"]],
- ["gotoX:y:", ["getParam", "Bx", "r"], ["getParam", "By", "r"]],
- ["gotoX:y:", ["getParam", "Cx", "r"], ["getParam", "Cy", "r"]],
- ["gotoX:y:", ["getParam", "Ax", "r"], ["getParam", "Ay", "r"]],
- ["putPenUp"]]]]],
- [7927,
- 410,
- [["procDef",
- "fill tri, inner 2 %n %n %n %n %n %n %n %n %n %n %n %n %n %n %n",
- ["Ax",
- "Ay",
- "Bx",
- "By",
- "Cx",
- "Cy",
- "Aox",
- "Aoy",
- "Box",
- "Boy",
- "Cox",
- "Coy",
- "ind",
- "rate",
- "res*1.4"],
- [1,
- 1,
- 1,
- 1,
- 1,
- 1,
- 1,
- 1,
- 1,
- 1,
- 1,
- 1,
- 1,
- 1,
- 1],
- false],
- ["gotoX:y:", ["rounded", ["readVariable", "incx"]], ["rounded", ["readVariable", "incy"]]],
- ["penSize:", ["getParam", "ind", "r"]],
- ["putPenDown"],
- ["putPenUp"],
- ["setVar:to:", "td", ["+", ["getParam", "rate", "r"], 1]],
- ["doUntil",
- ["<",
- ["*", ["getParam", "ind", "r"], ["readVariable", "td"]],
- ["getParam", "res*1.4", "r"]],
- [["penSize:", 1],
- ["gotoX:y:",
- ["+",
- ["*", ["getParam", "Aox", "r"], ["readVariable", "td"]],
- ["getParam", "Ax", "r"]],
- ["+",
- ["*", ["getParam", "Aoy", "r"], ["readVariable", "td"]],
- ["getParam", "Ay", "r"]]],
- ["putPenDown"],
- ["penSize:", ["*", ["getParam", "ind", "r"], ["readVariable", "td"]]],
- ["gotoX:y:",
- ["+",
- ["*", ["getParam", "Box", "r"], ["readVariable", "td"]],
- ["getParam", "Bx", "r"]],
- ["+",
- ["*", ["getParam", "Boy", "r"], ["readVariable", "td"]],
- ["getParam", "By", "r"]]],
- ["gotoX:y:",
- ["+",
- ["*", ["getParam", "Cox", "r"], ["readVariable", "td"]],
- ["getParam", "Cx", "r"]],
- ["+",
- ["*", ["getParam", "Coy", "r"], ["readVariable", "td"]],
- ["getParam", "Cy", "r"]]],
- ["gotoX:y:",
- ["+",
- ["*", ["getParam", "Aox", "r"], ["readVariable", "td"]],
- ["getParam", "Ax", "r"]],
- ["+",
- ["*", ["getParam", "Aoy", "r"], ["readVariable", "td"]],
- ["getParam", "Ay", "r"]]],
- ["putPenUp"],
- ["changeVar:by:", "td", ["*", ["readVariable", "td"], ["getParam", "rate", "r"]]]]],
- ["penSize:", 1],
- ["gotoX:y:",
- ["+",
- ["*", ["getParam", "Aox", "r"], ["readVariable", "td"]],
- ["getParam", "Ax", "r"]],
- ["+",
- ["*", ["getParam", "Aoy", "r"], ["readVariable", "td"]],
- ["getParam", "Ay", "r"]]],
- ["putPenDown"],
- ["penSize:", ["*", ["getParam", "ind", "r"], ["readVariable", "td"]]],
- ["gotoX:y:",
- ["+",
- ["*", ["getParam", "Box", "r"], ["readVariable", "td"]],
- ["getParam", "Bx", "r"]],
- ["+",
- ["*", ["getParam", "Boy", "r"], ["readVariable", "td"]],
- ["getParam", "By", "r"]]],
- ["gotoX:y:",
- ["+",
- ["*", ["getParam", "Cox", "r"], ["readVariable", "td"]],
- ["getParam", "Cx", "r"]],
- ["+",
- ["*", ["getParam", "Coy", "r"], ["readVariable", "td"]],
- ["getParam", "Cy", "r"]]],
- ["gotoX:y:",
- ["+",
- ["*", ["getParam", "Aox", "r"], ["readVariable", "td"]],
- ["getParam", "Ax", "r"]],
- ["+",
- ["*", ["getParam", "Aoy", "r"], ["readVariable", "td"]],
- ["getParam", "Ay", "r"]]],
- ["putPenUp"]]],
- [7924,
- 1186,
- [["procDef",
- "fill corner %n %n %n %n %n %n %n %n %n %n %n",
- ["Ax", "Ay", "B-Ax", "B-Ay", "C-Ax", "C-Ay", "Aox", "Aoy", "ind", "rate", "res*1.4"],
- [1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1],
- false],
- ["doIf",
- [">",
- ["*", ["getParam", "ind", "r"], ["+", ["getParam", "rate", "r"], 1]],
- ["getParam", "res*1.4", "r"]],
- [["setVar:to:", "td", ["*", ["+", ["getParam", "rate", "r"], 1], 0.56]],
- ["doUntil",
- ["<",
- ["*", ["getParam", "ind", "r"], ["readVariable", "td"]],
- ["getParam", "res*1.4", "r"]],
- [["penSize:", 1],
- ["gotoX:y:",
- ["+",
- ["getParam", "Ax", "r"],
- ["*", ["getParam", "B-Ax", "r"], ["readVariable", "td"]]],
- ["+",
- ["getParam", "Ay", "r"],
- ["*", ["getParam", "B-Ay", "r"], ["readVariable", "td"]]]],
- ["putPenDown"],
- ["penSize:", ["*", ["getParam", "ind", "r"], ["readVariable", "td"]]],
- ["gotoX:y:",
- ["+",
- ["getParam", "Ax", "r"],
- ["*", ["getParam", "Aox", "r"], ["readVariable", "td"]]],
- ["+",
- ["getParam", "Ay", "r"],
- ["*", ["getParam", "Aoy", "r"], ["readVariable", "td"]]]],
- ["gotoX:y:",
- ["+",
- ["getParam", "Ax", "r"],
- ["*", ["getParam", "C-Ax", "r"], ["readVariable", "td"]]],
- ["+",
- ["getParam", "Ay", "r"],
- ["*", ["getParam", "C-Ay", "r"], ["readVariable", "td"]]]],
- ["putPenUp"],
- ["changeVar:by:", "td", ["*", ["readVariable", "td"], ["getParam", "rate", "r"]]]]],
- ["penSize:", 1],
- ["gotoX:y:",
- ["+",
- ["getParam", "Ax", "r"],
- ["*", ["getParam", "B-Ax", "r"], ["readVariable", "td"]]],
- ["+",
- ["getParam", "Ay", "r"],
- ["*", ["getParam", "B-Ay", "r"], ["readVariable", "td"]]]],
- ["putPenDown"],
- ["penSize:", ["*", ["getParam", "ind", "r"], ["readVariable", "td"]]],
- ["gotoX:y:",
- ["+",
- ["getParam", "Ax", "r"],
- ["*", ["getParam", "Aox", "r"], ["readVariable", "td"]]],
- ["+",
- ["getParam", "Ay", "r"],
- ["*", ["getParam", "Aoy", "r"], ["readVariable", "td"]]]],
- ["gotoX:y:",
- ["+",
- ["getParam", "Ax", "r"],
- ["*", ["getParam", "C-Ax", "r"], ["readVariable", "td"]]],
- ["+",
- ["getParam", "Ay", "r"],
- ["*", ["getParam", "C-Ay", "r"], ["readVariable", "td"]]]],
- ["putPenUp"]]]]],
- [7933,
- 1870,
- [["procDef",
- "fill tri, inner 1 %n %n %n %n %n %n %n %n %n %n",
- ["Ax", "Ay", "Bx", "By", "Cx", "Cy", "lena", "lenb", "lenc", "res*1.4"],
- [1, 1, 1, 1, 1, 1, 1, 1, 1, 1],
- false],
- ["setVar:to:",
- "peri",
- ["+",
- ["+", ["getParam", "lena", "r"], ["getParam", "lenb", "r"]],
- ["getParam", "lenc", "r"]]],
- ["setVar:to:",
- "ind",
- ["+",
- ["computeFunction:of:",
- "sqrt",
- ["\/",
- ["*",
- ["*",
- ["-",
- ["+", ["getParam", "lenb", "r"], ["getParam", "lenc", "r"]],
- ["getParam", "lena", "r"]],
- ["-",
- ["+", ["getParam", "lenc", "r"], ["getParam", "lena", "r"]],
- ["getParam", "lenb", "r"]]],
- ["-",
- ["+", ["getParam", "lena", "r"], ["getParam", "lenb", "r"]],
- ["getParam", "lenc", "r"]]],
- ["readVariable", "peri"]]],
- ["\/", ["getParam", "res*1.4", "r"], 1.5]]],
- ["doIf",
- [">", ["readVariable", "ind"], ["getParam", "res*1.4", "r"]],
- [["setVar:to:",
- "incx",
- ["\/",
- ["+",
- ["+",
- ["*", ["getParam", "lena", "r"], ["getParam", "Ax", "r"]],
- ["*", ["getParam", "lenb", "r"], ["getParam", "Bx", "r"]]],
- ["*", ["getParam", "lenc", "r"], ["getParam", "Cx", "r"]]],
- ["readVariable", "peri"]]],
- ["setVar:to:",
- "incy",
- ["\/",
- ["+",
- ["+",
- ["*", ["getParam", "lena", "r"], ["getParam", "Ay", "r"]],
- ["*", ["getParam", "lenb", "r"], ["getParam", "By", "r"]]],
- ["*", ["getParam", "lenc", "r"], ["getParam", "Cy", "r"]]],
- ["readVariable", "peri"]]],
- ["doIfElse",
- ["<",
- ["+", ["readVariable", "peri"], 2500],
- ["*", ["readVariable", "ind"], ["readVariable", "ind"]]],
- [["penSize:", 1],
- ["gotoX:y:",
- ["*", ["+", ["getParam", "Ax", "r"], ["readVariable", "incx"]], 0.5],
- ["*", ["+", ["getParam", "Ay", "r"], ["readVariable", "incy"]], 0.5]],
- ["putPenDown"],
- ["penSize:", ["*", ["readVariable", "ind"], 0.5]],
- ["gotoX:y:",
- ["*", ["+", ["getParam", "Bx", "r"], ["readVariable", "incx"]], 0.5],
- ["*", ["+", ["getParam", "By", "r"], ["readVariable", "incy"]], 0.5]],
- ["gotoX:y:",
- ["*", ["+", ["getParam", "Cx", "r"], ["readVariable", "incx"]], 0.5],
- ["*", ["+", ["getParam", "Cy", "r"], ["readVariable", "incy"]], 0.5]],
- ["gotoX:y:",
- ["*", ["+", ["getParam", "Ax", "r"], ["readVariable", "incx"]], 0.5],
- ["*", ["+", ["getParam", "Ay", "r"], ["readVariable", "incy"]], 0.5]],
- ["putPenUp"],
- ["call",
- "fill corners %n %n %n %n %n %n %n %n %n %n %n %n %n %n",
- ["getParam", "Ax", "r"],
- ["getParam", "Ay", "r"],
- ["getParam", "Bx", "r"],
- ["getParam", "By", "r"],
- ["getParam", "Cx", "r"],
- ["getParam", "Cy", "r"],
- ["-", ["readVariable", "incx"], ["getParam", "Ax", "r"]],
- ["-", ["readVariable", "incy"], ["getParam", "Ay", "r"]],
- ["-", ["readVariable", "incx"], ["getParam", "Bx", "r"]],
- ["-", ["readVariable", "incy"], ["getParam", "By", "r"]],
- ["-", ["readVariable", "incx"], ["getParam", "Cx", "r"]],
- ["-", ["readVariable", "incy"], ["getParam", "Cy", "r"]],
- ["readVariable", "ind"],
- ["getParam", "res*1.4", "r"]]],
- [["doIfElse",
- ["&",
- ["<", ["getParam", "lena", "r"], ["getParam", "lenb", "r"]],
- ["<", ["getParam", "lena", "r"], ["getParam", "lenc", "r"]]],
- [["call",
- "fill tri, inner 2 %n %n %n %n %n %n %n %n %n %n %n %n %n %n %n",
- ["getParam", "Ax", "r"],
- ["getParam", "Ay", "r"],
- ["getParam", "Bx", "r"],
- ["getParam", "By", "r"],
- ["getParam", "Cx", "r"],
- ["getParam", "Cy", "r"],
- ["-", ["readVariable", "incx"], ["getParam", "Ax", "r"]],
- ["-", ["readVariable", "incy"], ["getParam", "Ay", "r"]],
- ["-", ["readVariable", "incx"], ["getParam", "Bx", "r"]],
- ["-", ["readVariable", "incy"], ["getParam", "By", "r"]],
- ["-", ["readVariable", "incx"], ["getParam", "Cx", "r"]],
- ["-", ["readVariable", "incy"], ["getParam", "Cy", "r"]],
- ["readVariable", "ind"],
- ["-",
- -0.5,
- ["\/",
- ["readVariable", "ind"],
- ["*",
- ["computeFunction:of:",
- "sqrt",
- ["+",
- ["*",
- ["-", ["readVariable", "incx"], ["getParam", "Ax", "r"]],
- ["-", ["readVariable", "incx"], ["getParam", "Ax", "r"]]],
- ["*",
- ["-", ["readVariable", "incy"], ["getParam", "Ay", "r"]],
- ["-", ["readVariable", "incy"], ["getParam", "Ay", "r"]]]]],
- 4.1]]],
- ["getParam", "res*1.4", "r"]]],
- [["doIfElse",
- ["|",
- [">", ["getParam", "lenb", "r"], ["getParam", "lena", "r"]],
- [">", ["getParam", "lenb", "r"], ["getParam", "lenc", "r"]]],
- [["call",
- "fill tri, inner 2 %n %n %n %n %n %n %n %n %n %n %n %n %n %n %n",
- ["getParam", "Cx", "r"],
- ["getParam", "Cy", "r"],
- ["getParam", "Bx", "r"],
- ["getParam", "By", "r"],
- ["getParam", "Ax", "r"],
- ["getParam", "Ay", "r"],
- ["-", ["readVariable", "incx"], ["getParam", "Cx", "r"]],
- ["-", ["readVariable", "incy"], ["getParam", "Cy", "r"]],
- ["-", ["readVariable", "incx"], ["getParam", "Bx", "r"]],
- ["-", ["readVariable", "incy"], ["getParam", "By", "r"]],
- ["-", ["readVariable", "incx"], ["getParam", "Ax", "r"]],
- ["-", ["readVariable", "incy"], ["getParam", "Ay", "r"]],
- ["readVariable", "ind"],
- ["-",
- -0.5,
- ["\/",
- ["readVariable", "ind"],
- ["*",
- ["computeFunction:of:",
- "sqrt",
- ["+",
- ["*",
- ["-", ["readVariable", "incx"], ["getParam", "Cx", "r"]],
- ["-", ["readVariable", "incx"], ["getParam", "Cx", "r"]]],
- ["*",
- ["-", ["readVariable", "incy"], ["getParam", "Cy", "r"]],
- ["-", ["readVariable", "incy"], ["getParam", "Cy", "r"]]]]],
- 4.1]]],
- ["getParam", "res*1.4", "r"]]],
- [["call",
- "fill tri, inner 2 %n %n %n %n %n %n %n %n %n %n %n %n %n %n %n",
- ["getParam", "Bx", "r"],
- ["getParam", "By", "r"],
- ["getParam", "Ax", "r"],
- ["getParam", "Ay", "r"],
- ["getParam", "Cx", "r"],
- ["getParam", "Cy", "r"],
- ["-", ["readVariable", "incx"], ["getParam", "Bx", "r"]],
- ["-", ["readVariable", "incy"], ["getParam", "By", "r"]],
- ["-", ["readVariable", "incx"], ["getParam", "Ax", "r"]],
- ["-", ["readVariable", "incy"], ["getParam", "Ay", "r"]],
- ["-", ["readVariable", "incx"], ["getParam", "Cx", "r"]],
- ["-", ["readVariable", "incy"], ["getParam", "Cy", "r"]],
- ["readVariable", "ind"],
- ["-",
- -0.5,
- ["\/",
- ["readVariable", "ind"],
- ["*",
- ["computeFunction:of:",
- "sqrt",
- ["+",
- ["*",
- ["-", ["readVariable", "incx"], ["getParam", "Bx", "r"]],
- ["-", ["readVariable", "incx"], ["getParam", "Bx", "r"]]],
- ["*",
- ["-", ["readVariable", "incy"], ["getParam", "By", "r"]],
- ["-", ["readVariable", "incy"], ["getParam", "By", "r"]]]]],
- 4.1]]],
- ["getParam", "res*1.4", "r"]]]]]]]]]]]],
- [7938,
- 2858,
- [["procDef",
- "fill corners %n %n %n %n %n %n %n %n %n %n %n %n %n %n",
- ["Ax",
- "Ay",
- "Bx",
- "By",
- "Cx",
- "Cy",
- "Aox",
- "Aoy",
- "Box",
- "Boy",
- "Cox",
- "Coy",
- "ind",
- "res*1.4"],
- [1,
- 1,
- 1,
- 1,
- 1,
- 1,
- 1,
- 1,
- 1,
- 1,
- 1,
- 1,
- 1,
- 1],
- false],
- ["call",
- "fill corner %n %n %n %n %n %n %n %n %n %n %n",
- ["getParam", "Ax", "r"],
- ["getParam", "Ay", "r"],
- ["-",
- ["getParam", "Bx", "r"],
- ["-", ["getParam", "Ax", "r"], ["getParam", "Aox", "r"]]],
- ["-",
- ["getParam", "By", "r"],
- ["-", ["getParam", "Ay", "r"], ["getParam", "Aoy", "r"]]],
- ["-",
- ["getParam", "Cx", "r"],
- ["-", ["getParam", "Ax", "r"], ["getParam", "Aox", "r"]]],
- ["-",
- ["getParam", "Cy", "r"],
- ["-", ["getParam", "Ay", "r"], ["getParam", "Aoy", "r"]]],
- ["getParam", "Aox", "r"],
- ["getParam", "Aoy", "r"],
- ["getParam", "ind", "r"],
- ["-",
- -0.5,
- ["\/",
- ["getParam", "ind", "r"],
- ["*",
- ["computeFunction:of:",
- "sqrt",
- ["+",
- ["*", ["getParam", "Aox", "r"], ["getParam", "Aox", "r"]],
- ["*", ["getParam", "Aoy", "r"], ["getParam", "Aoy", "r"]]]],
- 4.1]]],
- ["getParam", "res*1.4", "r"]],
- ["call",
- "fill corner %n %n %n %n %n %n %n %n %n %n %n",
- ["getParam", "Bx", "r"],
- ["getParam", "By", "r"],
- ["-",
- ["getParam", "Ax", "r"],
- ["-", ["getParam", "Bx", "r"], ["getParam", "Box", "r"]]],
- ["-",
- ["getParam", "Ay", "r"],
- ["-", ["getParam", "By", "r"], ["getParam", "Boy", "r"]]],
- ["-",
- ["getParam", "Cx", "r"],
- ["-", ["getParam", "Bx", "r"], ["getParam", "Box", "r"]]],
- ["-",
- ["getParam", "Cy", "r"],
- ["-", ["getParam", "By", "r"], ["getParam", "Boy", "r"]]],
- ["getParam", "Box", "r"],
- ["getParam", "Boy", "r"],
- ["getParam", "ind", "r"],
- ["-",
- -0.5,
- ["\/",
- ["getParam", "ind", "r"],
- ["*",
- ["computeFunction:of:",
- "sqrt",
- ["+",
- ["*", ["getParam", "Box", "r"], ["getParam", "Box", "r"]],
- ["*", ["getParam", "Boy", "r"], ["getParam", "Boy", "r"]]]],
- 4.1]]],
- ["getParam", "res*1.4", "r"]],
- ["call",
- "fill corner %n %n %n %n %n %n %n %n %n %n %n",
- ["getParam", "Cx", "r"],
- ["getParam", "Cy", "r"],
- ["-",
- ["getParam", "Ax", "r"],
- ["-", ["getParam", "Cx", "r"], ["getParam", "Cox", "r"]]],
- ["-",
- ["getParam", "Ay", "r"],
- ["-", ["getParam", "Cy", "r"], ["getParam", "Coy", "r"]]],
- ["-",
- ["getParam", "Bx", "r"],
- ["-", ["getParam", "Cx", "r"], ["getParam", "Cox", "r"]]],
- ["-",
- ["getParam", "By", "r"],
- ["-", ["getParam", "Cy", "r"], ["getParam", "Coy", "r"]]],
- ["getParam", "Cox", "r"],
- ["getParam", "Coy", "r"],
- ["getParam", "ind", "r"],
- ["-",
- -0.5,
- ["\/",
- ["getParam", "ind", "r"],
- ["*",
- ["computeFunction:of:",
- "sqrt",
- ["+",
- ["*", ["getParam", "Cox", "r"], ["getParam", "Cox", "r"]],
- ["*", ["getParam", "Coy", "r"], ["getParam", "Coy", "r"]]]],
- 4.1]]],
- ["getParam", "res*1.4", "r"]]]],
- [7937.95,
- 3112.75,
- [["procDef", "Stamp Poly List", [], [], true],
- ["call", "Eval 2 params %b start %n", ["not", false], ["readVariable", "execIdx"]],
- ["call", "LIST idx for list %s dont %b", ["readVariable", "p2"], ["not", false]],
- ["doIf", ["<", ["readVariable", "listIdx"], "1"], [["stopScripts", "this script"]]],
- ["setVar:to:",
- "tmp",
- ["+", ["getLine:ofList:", ["+", ["readVariable", "listIdx"], 1], "lists"], ["readVariable", "p1"]]],
- ["doRepeat",
- ["-",
- ["\/",
- ["-", ["getLine:ofList:", ["+", ["readVariable", "listIdx"], 2], "lists"], ["readVariable", "p1"]],
- 2],
- 2],
- [["doIf",
- ["=", ["getLine:ofList:", ["+", ["readVariable", "tmp"], 4], "lists"], ""],
- [["stopScripts", "this script"]]],
- ["call",
- "fill triangle %n %n %n %n %n %n resolution: %n outline %b",
- ["getLine:ofList:", ["readVariable", "tmp"], "lists"],
- ["getLine:ofList:", ["+", ["readVariable", "tmp"], 1], "lists"],
- ["getLine:ofList:", ["+", ["readVariable", "tmp"], 2], "lists"],
- ["getLine:ofList:", ["+", ["readVariable", "tmp"], 3], "lists"],
- ["getLine:ofList:", ["+", ["readVariable", "tmp"], 4], "lists"],
- ["getLine:ofList:", ["+", ["readVariable", "tmp"], 5], "lists"],
- ["readVariable", "penSize"],
- ["not", false]],
- ["changeVar:by:", "tmp", 2]]]]],
- [519,
- 10,
- [["procDef", "Set Variable %s to %s", ["name", "val"], ["", ""], true],
- ["call", "Get Var index %s", ["getParam", "name", "r"]],
- ["doIfElse",
- [">", ["readVariable", "varIndex#"], "0"],
- [["setLine:ofList:to:", ["+", ["readVariable", "varIndex#"], 1], "vars", ["getParam", "val", "r"]]],
- [["append:toList:", ["getParam", "name", "r"], "vars"],
- ["append:toList:", ["getParam", "val", "r"], "vars"]]]]],
- [520.1,
- 879.8,
- [["procDef", "Delete Heap %n", ["idx"], [1], true],
- ["setLine:ofList:to:", ["getParam", "idx", "r"], "heap", ["readVariable", "heapPool#"]],
- ["setVar:to:", "heapPool#", ["getParam", "idx", "r"]]]],
- [10, 10, [["whenGreenFlag"], ["hide"]]],
- [7937.95,
- 3550.75,
- [["procDef", "Stamp Polygon", [], [], true],
- ["doIf",
- [">", ["lineCountOfList:", "poly"], "5"],
- [["doIf",
- ["not",
- ["&",
- ["=",
- ["getLine:ofList:", 1, "poly"],
- ["getLine:ofList:", ["-", ["lineCountOfList:", "poly"], 1], "poly"]],
- ["=", ["getLine:ofList:", 2, "poly"], ["getLine:ofList:", "last", "poly"]]]],
- [["gotoX:y:", ["getLine:ofList:", 1, "poly"], ["getLine:ofList:", 2, "poly"]],
- ["append:toList:", ["getLine:ofList:", 1, "poly"], "poly"],
- ["append:toList:", ["getLine:ofList:", 2, "poly"], "poly"]]],
- ["putPenUp"],
- ["setVar:to:", "p1", ["getLine:ofList:", 1, "poly"]],
- ["deleteLine:ofList:", 1, "poly"],
- ["setVar:to:", "p2", ["getLine:ofList:", 1, "poly"]],
- ["deleteLine:ofList:", 1, "poly"],
- ["doRepeat",
- ["-", ["\/", ["lineCountOfList:", "poly"], 2], 1],
- [["call",
- "fill triangle %n %n %n %n %n %n resolution: %n outline %b",
- ["readVariable", "p1"],
- ["readVariable", "p2"],
- ["getLine:ofList:", 1, "poly"],
- ["getLine:ofList:", 2, "poly"],
- ["getLine:ofList:", 3, "poly"],
- ["getLine:ofList:", 4, "poly"],
- ["readVariable", "penSize"],
- ["not", false]],
- ["deleteLine:ofList:", 1, "poly"],
- ["deleteLine:ofList:", 1, "poly"]]],
- ["deleteLine:ofList:", "all", "poly"],
- ["gotoX:y:", ["readVariable", "p1"], ["readVariable", "p2"]]]]]],
- [1658,
- 1891,
- [["procDef", "write %s at %n %n", ["txt", "x", "y"], ["", 1, 1], true],
- ["setVar:to:", "_ax", ["+", ["computeFunction:of:", "floor", ["getParam", "y", "r"]], 6.65]],
- ["setVar:to:", "_ci", "1"],
- ["xpos:", ["-", ["getParam", "x", "r"], 0.5]],
- ["doRepeat",
- ["stringLength:", ["getParam", "txt", "r"]],
- [["setVar:to:",
- "_c",
- ["getAttribute:of:", ["letter:of:", ["readVariable", "_ci"], ["getParam", "txt", "r"]], "font"]],
- ["doIfElse",
- ["=", ["readVariable", "_c"], "0"],
- [["changeXposBy:", 4]],
- [["setVar:to:", "_i", "1"],
- ["doRepeat",
- ["letter:of:", 1, ["readVariable", "_c"]],
- [["changeVar:by:", "_i", 1],
- ["doIfElse",
- ["=", ["letter:of:", ["readVariable", "_i"], ["readVariable", "_c"]], "0"],
- [["changeVar:by:", "_i", 1], ["ypos:", ["+", ["readVariable", "_ax"], 0.35]]],
- [["ypos:", ["readVariable", "_ax"]],
- ["putPenDown"],
- ["changeYposBy:", ["-", 0.35, ["letter:of:", ["readVariable", "_i"], ["readVariable", "_c"]]]],
- ["putPenUp"],
- ["changeVar:by:", "_i", 1]]],
- ["doUntil",
- ["=", ["letter:of:", ["readVariable", "_i"], ["readVariable", "_c"]], "0"],
- [["changeYposBy:", ["-", -0.35, ["letter:of:", ["readVariable", "_i"], ["readVariable", "_c"]]]],
- ["changeVar:by:", "_i", 1],
- ["putPenDown"],
- ["changeYposBy:", ["-", 0.35, ["letter:of:", ["readVariable", "_i"], ["readVariable", "_c"]]]],
- ["putPenUp"],
- ["changeVar:by:", "_i", 1]]],
- ["changeXposBy:", 1]]],
- ["changeXposBy:", 1]]],
- ["changeVar:by:", "_ci", 1]]]]],
- [1666,
- 2858,
- [["procDef", "Len = Width of %s", ["txt"], [""], true],
- ["setVar:to:", "_ci", "1"],
- ["setVar:to:", "Len", 0],
- ["doRepeat",
- ["stringLength:", ["getParam", "txt", "r"]],
- [["setVar:to:",
- "_c",
- ["getAttribute:of:", ["letter:of:", ["readVariable", "_ci"], ["getParam", "txt", "r"]], "font"]],
- ["doIfElse",
- ["=", ["readVariable", "_c"], "0"],
- [["changeVar:by:", "Len", 4]],
- [["changeVar:by:", "Len", ["+", ["letter:of:", 1, ["readVariable", "_c"]], 1]]]],
- ["changeVar:by:", "_ci", 1]]]]],
- [1046.55,
- 2129,
- [["procDef", "EXEC ALL THREADS", [], [], true],
- ["deleteLine:ofList:", "all", "stack"],
- ["setVar:to:", "thread#", "1"],
- ["setVar:to:", "newThreadTimeout", ["+", ["timer"], 0.03]],
- ["doUntil",
- [">", ["readVariable", "thread#"], ["lineCountOfList:", "threads"]],
- [["setVar:to:", "heapIdx", ["getLine:ofList:", ["readVariable", "thread#"], "threads"]],
- ["setVar:to:", "warpSpeed", ["getLine:ofList:", ["+", ["readVariable", "thread#"], 2], "threads"]],
- ["setVar:to:", "execIdx", ["getLine:ofList:", ["readVariable", "heapIdx"], "heap"]],
- ["setVar:to:", "run_dirty", ""],
- ["call", "exec thread %n safe %n", ["readVariable", "thread#"], ["readVariable", "newThreadTimeout"]],
- ["doIfElse",
- [">", ["readVariable", "heapIdx"], "0"],
- [["setLine:ofList:to:", ["readVariable", "heapIdx"], "heap", ["readVariable", "execIdx"]],
- ["doIfElse",
- ["|", [">", ["readVariable", "run_dirty"], ""], ["=", ["readVariable", "yieldThread"], "wait"]],
- [["setLine:ofList:to:", ["readVariable", "thread#"], "threads", ["readVariable", "heapIdx"]], ["changeVar:by:", "thread#", 3]],
- [["append:toList:", ["readVariable", "heapIdx"], "threads"],
- ["append:toList:", ["getLine:ofList:", ["+", ["readVariable", "thread#"], 1], "threads"], "threads"],
- ["append:toList:", ["getLine:ofList:", ["+", ["readVariable", "thread#"], 2], "threads"], "threads"],
- ["deleteLine:ofList:", ["readVariable", "thread#"], "threads"],
- ["deleteLine:ofList:", ["readVariable", "thread#"], "threads"],
- ["deleteLine:ofList:", ["readVariable", "thread#"], "threads"]]]],
- [["call", "Thread Ending"]]]]]]],
- [1047.35,
- 1114.55,
- [["procDef", "exec write %n %n %n %s", ["x", "y", "w", "txt"], [1, 1, 1, ""], true],
- ["penSize:", 1],
- ["call",
- "write %s at %n %n",
- ["getParam", "txt", "r"],
- ["rounded", ["getParam", "x", "r"]],
- ["rounded", ["getParam", "y", "r"]]],
- ["penSize:", ["getParam", "w", "r"]],
- ["gotoX:y:", ["getParam", "x", "r"], ["getParam", "y", "r"]]]],
- [251.3,
- 1080.35,
- [["procDef", "Exec cmd 192-223", [], [], false],
- ["setVar:to:", "execIdx", ["getLine:ofList:", ["+", ["readVariable", "execIdx"], 9], "Script"]]]]],
- "scriptComments": [[456, 775.5, 180, 56, false, 327, "When Green Flag Clicked"],
- [157, 914, 103, 120, false, 342, "Pointer to prev heap item\r2nd number reserved for count loops"],
- [6453, 466.5, 150, 200, false, 1785, "Forever"],
- [6453, 114.5, 150, 200, false, 1758, "Not nested..."],
- [3911, 360.5, 150, 200, false, 654, "ask"],
- [6506, 2557.5, 150, 200, false, 1953, "answer"],
- [6506, 2438.5, 150, 200, false, 1944, "="],
- [6506, 2847.5, 150, 200, false, 1973, "join"],
- [7453, 68, 150, 200, false, 81, "say, say wait"],
- [4039, 671, 150, 200, false, 681, "if else"],
- [6506, 5641.5, 150, 200, false, 2186, "Variable"],
- [175, 1236.5, 150, 200, false, 1374, "Stop Scripts"],
- [3911, 134.5, 150, 200, false, 635, "repeat (n)"],
- [6468, 620.5, 150, 200, false, 1798, "Repeat (n)"],
- [6596, 985, 150, 200, false, 1831, "repeat until"],
- [190, 1654.5, 150, 200, false, 1405, "Wait (n) secs"],
- [1329, 571, 150, 200, false, 255, "Set x,y\rChange x,y"],
- [4235, 73, 150, 200, false, 621, "forever\rrepeat (n)\rrepeat until <>"],
- [4432, 65.5, 150, 200, false, 355, "hide"],
- [7349, 164.5, 150, 200, false, 90, "Show"],
- [7364, 287.5, 150, 200, false, 99, "Set Var"],
- [4935.6, 1541.5, 150, 200, false, 1626, "Change var by"],
- [4447, 188.5, 150, 200, false, 364, "Goto x,y"],
- [6506, 5492.5, 150, 200, false, 2173, "Random"],
- [4965.6, 1695.5, 150, 200, false, 1641, "Clear"],
- [3941, 745.5, 150, 200, false, 689, "Forward"],
- [4462, 664.5, 150, 200, false, 406, "Point in direction"],
- [6506, 2651.5, 150, 200, false, 1959, "[sqrt] of (n)"],
- [5904, 755.5, 100, 105, false, 1549, "Ask"],
- [5919, 893.5, 100, 54, false, 1557, "Wait (n) secs"],
- [3607.95, 1089, 220, 270, true, 1333, "last index of list name\rlist 1 name\rlist 1 start idx - 1 (+1)\rlist 1 length (+2)\rlist 1 actual length (+3)\rRow 1 of list\r"],
- [4980.6, 1818.5, 150, 200, false, 1650, "Append to list"],
- [3956, 956.5, 150, 200, false, 703, "Delete n of list l"],
- [6506, 3303.5, 150, 200, false, 2014, "Item n of list l"],
- [4477, 779.5, 150, 200, false, 413, "insert t at n of list l"],
- [6521, 4377.5, 150, 200, false, 2098, "length of list l"],
- [6521, 4631.5, 150, 200, false, 2118, "[list] contains [t]"],
- [6521, 5165.5, 150, 200, false, 2152, "Not <o>"],
- [7409, 699.5, 150, 200, false, 128, "Replace [i] of [l] with [v]"],
- [4995.6, 1949.5, 150, 200, false, 1663, "Broadcast"],
- [168, 870, 150, 200, false, 340, "Parent thread"],
- [235, 2070.5, 150, 200, false, 1435, "When I receive [m]"],
- [1311, 1861.5, 121, 131, false, 1517, "Only spawn new threads in the upcoming thread pool if there is time"],
- [3166.95, 1025.5, 223, 202, true, 1101, "see if there are any other threads still running for this message.\rresume threads waiting on this event"],
- [3971, 1292.5, 150, 200, false, 730, "Broadcast & wait"],
- [4507, 1376.5, 150, 200, false, 466, "Set pen size"],
- [7424, 1203.5, 150, 200, false, 175, "set pen color"],
- [7439, 1296.5, 150, 200, false, 181, "set pen shade"],
- [7454, 1389.5, 150, 200, false, 187, "set rotation style"],
- [7469, 1671.5, 150, 200, false, 201, "set size to"],
- [5010.6, 2042.5, 150, 200, false, 1669, "change pen color"],
- [5025.6, 2135.5, 150, 200, false, 1675, "change pen shade"],
- [5040.6, 2228.5, 150, 200, false, 1681, "change pen size"],
- [4522, 1494.5, 150, 200, false, 474, "go to [mouse]"],
- [4537, 1774.5, 150, 200, false, 490, "point towards"],
- [6497, 6160.5, 150, 200, false, 2225, "length of string"],
- [6521, 4228.5, 150, 200, false, 2085, "letter n of [s]"],
- [6512, 5866.5, 150, 200, false, 2203, "round"],
- [250, 2150.5, 150, 200, false, 1442, "stamp!"],
- [265, 2273.5, 150, 200, false, 1451, "run without screen refresh"],
- [168, 892, 150, 200, false, 341, "Run without screen refresh nesting"],
- [6504, 1574.5, 150, 200, false, 1883, "without screen refresh"],
- [6506, 3889.5, 150, 200, false, 2057, "64-80-96"],
- [6491, 3860.5, 150, 200, false, 2054, "64-96-128"],
- [5070.6, 2461.5, 150, 200, false, 1696, "If on edge bounce"],
- [6506, 3707.5, 150, 200, false, 2046, "Username"],
- [6497, 6375.5, 150, 200, false, 2244, "current [minute]"],
- [4492, 1283.5, 150, 200, false, 460, "Set Pen Color []"],
- [5055.6, 2346.5, 150, 200, false, 1689, "change size"],
- [6506, 3168.5, 150, 200, false, 2002, "List Reporter"],
- [280, 2469.5, 150, 200, false, 1472, "Reset Timer"]],
- "costumes": [{
- "costumeName": "cat1-a",
- "baseLayerID": 3,
- "baseLayerMD5": "f88bf1935daea28f8ca098462a31dbb0.svg",
- "bitmapResolution": 1,
- "rotationCenterX": 47,
- "rotationCenterY": 50
- }],
- "currentCostumeIndex": 0,
- "scratchX": -203,
- "scratchY": 0,
- "scale": 1,
- "direction": 90,
- "rotationStyle": "normal",
- "isDraggable": false,
- "indexInLibrary": 3,
- "visible": false,
- "spriteInfo": {
- }
- },
- {
- "objName": "Garbage",
- "variables": [{
- "name": "root",
- "value": 2,
- "isPersistent": false
- },
- {
- "name": "idx",
- "value": 25,
- "isPersistent": false
- }],
- "lists": [{
- "listName": "fresh",
- "contents": [],
- "isPersistent": false,
- "x": 331,
- "y": 106,
- "width": 284,
- "height": 384,
- "visible": false
- },
- {
- "listName": "stack",
- "contents": [],
- "isPersistent": false,
- "x": 7,
- "y": 31,
- "width": 284,
- "height": 384,
- "visible": false
- }],
- "scripts": [[298,
- 10,
- [["procDef", "Copy %n", ["idx"], [1], true],
- ["doIfElse",
- [">", ["getParam", "idx", "r"], "0"],
- [["setVar:to:", "idx", ["getParam", "idx", "r"]],
- ["append:toList:", ["+", ["lineCountOfList:", "fresh"], 1], "stack"],
- ["doRepeat",
- 12,
- [["append:toList:", ["getLine:ofList:", ["readVariable", "idx"], "Script"], "fresh"], ["changeVar:by:", "idx", 1]]],
- ["call", "Copy %n", ["getLine:ofList:", ["+", ["getParam", "idx", "r"], 6], "Script"]],
- ["setLine:ofList:to:", ["+", ["getLine:ofList:", "last", "stack"], 6], "fresh", ["readVariable", "idx"]],
- ["call", "Copy %n", ["getLine:ofList:", ["+", ["getParam", "idx", "r"], 7], "Script"]],
- ["setLine:ofList:to:", ["+", ["getLine:ofList:", "last", "stack"], 7], "fresh", ["readVariable", "idx"]],
- ["call", "Copy %n", ["getLine:ofList:", ["+", ["getParam", "idx", "r"], 8], "Script"]],
- ["setLine:ofList:to:", ["+", ["getLine:ofList:", "last", "stack"], 8], "fresh", ["readVariable", "idx"]],
- ["call", "Copy %n", ["getLine:ofList:", ["+", ["getParam", "idx", "r"], 9], "Script"]],
- ["setLine:ofList:to:", ["+", ["getLine:ofList:", "last", "stack"], 9], "fresh", ["readVariable", "idx"]],
- ["setVar:to:", "idx", ["getLine:ofList:", "last", "stack"]],
- ["deleteLine:ofList:", "last", "stack"]],
- [["setVar:to:", "idx", 0]]]]],
- [15,
- 103,
- [["procDef", "Garbage Collect", [], [], true],
- ["setVar:to:", "root", "1"],
- ["deleteLine:ofList:", "all", "fresh"],
- ["doRepeat",
- ["lineCountOfList:", "Roots"],
- [["deleteLine:ofList:", "all", "stack"],
- ["call", "Copy %n", ["getLine:ofList:", ["readVariable", "root"], "Roots"]],
- ["setLine:ofList:to:", ["readVariable", "root"], "Roots", ["readVariable", "idx"]],
- ["changeVar:by:", "root", 1]]],
- ["deleteLine:ofList:", "all", "stack"],
- ["deleteLine:ofList:", "all", "Script"],
- ["deleteLine:ofList:", "all", "Palette"],
- ["setVar:to:", "idx", "1"],
- ["doRepeat",
- ["lineCountOfList:", "fresh"],
- [["append:toList:", ["getLine:ofList:", ["readVariable", "idx"], "fresh"], "Script"], ["changeVar:by:", "idx", 1]]],
- ["deleteLine:ofList:", "all", "fresh"],
- ["setVar:to:", "#BlockPool", 0]]],
- [12, 14, [["call", "Garbage Collect"]]]],
- "costumes": [{
- "costumeName": "costume1",
- "baseLayerID": 2,
- "baseLayerMD5": "d36f6603ec293d2c2198d3ea05109fe0.png",
- "bitmapResolution": 2,
- "rotationCenterX": 0,
- "rotationCenterY": 0
- }],
- "currentCostumeIndex": 0,
- "scratchX": -92,
- "scratchY": -2,
- "scale": 1,
- "direction": 90,
- "rotationStyle": "normal",
- "isDraggable": false,
- "indexInLibrary": 5,
- "visible": false,
- "spriteInfo": {
- }
- },
- {
- "objName": "Alert",
- "scripts": [[35,
- 27,
- [["whenIReceive", "draw"],
- ["gotoX:y:", 191, 131],
- ["setGraphicEffect:to:", "ghost", 50],
- ["show"],
- ["doRepeat", 3, [["wait:elapsed:from:", 0.2], ["hide"], ["wait:elapsed:from:", 0.2], ["show"]]],
- ["wait:elapsed:from:", 5],
- ["hide"]]],
- [219, 27, [["whenGreenFlag"], ["hide"]]]],
- "costumes": [{
- "costumeName": "run",
- "baseLayerID": 4,
- "baseLayerMD5": "81cb0c5c0dc7193c797bf109eb38a4b0.svg",
- "bitmapResolution": 1,
- "rotationCenterX": 35,
- "rotationCenterY": 40
- },
- {
- "costumeName": "run2",
- "baseLayerID": 5,
- "baseLayerMD5": "fb32301638aee822585580bafbd560d6.png",
- "bitmapResolution": 2,
- "rotationCenterX": 66,
- "rotationCenterY": 69
- }],
- "currentCostumeIndex": 1,
- "scratchX": 191,
- "scratchY": 131,
- "scale": 1,
- "direction": 90,
- "rotationStyle": "none",
- "isDraggable": false,
- "indexInLibrary": 4,
- "visible": false,
- "spriteInfo": {
- }
- },
- {
- "objName": "SaveLoad",
- "variables": [{
- "name": "root",
- "value": 2,
- "isPersistent": false
- },
- {
- "name": "schema#",
- "value": "0",
- "isPersistent": false
- },
- {
- "name": "first?",
- "value": "{\"objName\":\"Stage\", \"children\": [{\"objName\":\"project\" ,\"variables\":[ {\"name\": \"text\" , \"value\": \"hdskghjsfgjkdhafghkjdaadgfhsjkgkahjdf\" , \"isPersistent\":false} , {\"name\": \"x\" , \"value\": \"0\" , \"isPersistent\":false} , {\"name\": \"y\" , \"value\": \"0\" , \"isPersistent\":false} ] ,\"scripts\":[ [ 54 , 60 , [ [\"whenGreenFlag\" ] , [\"hide\" ] , [\"doAsk\" , \"Print:\" ] , [\"setVar:to:\" , \"text\" , [\"answer\" ] ] , [\"doAsk\" , \"X:\" ] , [\"setVar:to:\" , \"x\" , [\"answer\" ] ] , [\"doAsk\" , \"Y:\" ] , [\"setVar:to:\" , \"y\" , [\"answer\" ] ] , [\"doAsk\" , \"Hex Color:\" ] , [\"penColor:\" , [\"concatenate:with:\" , \"0x\" , [\"answer\" ] ] ] , [\"gotoX:y:\" , [\"readVariable\" , \"x\" ] , [\"readVariable\" , \"y\" ] ] , [\"changeXposBy:\" , [\"-\" , \"0\" , [\"widthOfText:\" , [\"readVariable\" , \"text\" ] ] ] ] , [\"write\" , [\"readVariable\" , \"text\" ] ] ]] ] }],\"info\":{} }",
- "isPersistent": false
- },
- {
- "name": "idx",
- "value": 1033,
- "isPersistent": false
- },
- {
- "name": "tok",
- "value": "\"text",
- "isPersistent": false
- },
- {
- "name": "i",
- "value": 5,
- "isPersistent": false
- },
- {
- "name": "c",
- "value": "t",
- "isPersistent": false
- },
- {
- "name": "JSON",
- "value": "{\"objName\":\"Stage\", \"children\": [{\"objName\":\"project\" ,\"variables\":[ {\"name\": \"ang\" , \"value\": \"202210\" , \"isPersistent\":false} , {\"name\": \"h\" , \"value\": \"99.62301136206634\" , \"isPersistent\":false} , {\"name\": \"message\" , \"value\": \"This project is using 3 newly imagined Scratch Blocks\" , \"isPersistent\":false} ] ,\"scripts\":[ [ 27 , 30 , [ [\"whenGreenFlag\" ] , [\"doForever\" ,[ [\"setVar:to:\" , \"message\" , \"This project is using 3 newly imagined Scratch Blocks\" ] , [\"wait:elapsed:from:\" , \"5\" ] , [\"setVar:to:\" , \"message\" , \"\\\"pen up and fill\\\" - Fills the last shape drawn with the pen\" ] , [\"wait:elapsed:from:\" , \"5\" ] , [\"setVar:to:\" , \"message\" , \"\\\"write [Hello World]\\\" - Writes text to the pen canvas\" ] , [\"wait:elapsed:from:\" , \"5\" ] , [\"setVar:to:\" , \"message\" , \"\\\"width of [Hello World]\\\" - reports the width of the text\" ] , [\"wait:elapsed:from:\" , \"5\" ] ] ] ]] , [ 27 , 256 , [ [\"whenGreenFlag\" ] , [\"hide\" ] , [\"penSize:\" , \"4\" ] , [\"setVar:to:\" , \"ang\" , \"0\" ] , [\"doForever\" ,[ [\"warpSpeed\" ,[ [\"changeVar:by:\" , \"ang\" , \"5\" ] , [\"clearPenTrails\" ] , [\"changePenHueBy:\" , \"2\" ] , [\"setVar:to:\" , \"h\" , [\"+\" , \"100\" , [\"*\" , \"60\" , [\"computeFunction:of:\" , \"sin\" , [\"*\" , [\"timer\" ] , \"360\" ] ] ] ] ] , [\"gotoX:y:\" , [\"*\" , \"200\" , [\"computeFunction:of:\" , \"sin\" , [\"readVariable\" , \"ang\" ] ] ] , [\"*\" , [\"readVariable\" , \"h\" ] , [\"computeFunction:of:\" , \"cos\" , [\"readVariable\" , \"ang\" ] ] ] ] , [\"putPenDown\" ] , [\"doRepeat\" , \"5\" ,[ [\"changeVar:by:\" , \"ang\" , [\"\/\" , \"360\" , \"5\" ] ] , [\"gotoX:y:\" , [\"*\" , \"200\" , [\"computeFunction:of:\" , \"sin\" , [\"readVariable\" , \"ang\" ] ] ] , [\"*\" , [\"readVariable\" , \"h\" ] , [\"computeFunction:of:\" , \"cos\" , [\"readVariable\" , \"ang\" ] ] ] ] ] ] , [\"stampPolygon\" ] , [\"changePenHueBy:\" , \"100\" ] , [\"gotoX:y:\" , [\"*\" , \"-0.5\" , [\"widthOfText:\" , [\"readVariable\" , \"message\" ] ] ] , \"0\" ] , [\"write\" , [\"readVariable\" , \"message\" ] ] , [\"changePenHueBy:\" , \"-100\" ] ] ] ] ] ]] ] }],\"info\":{} }",
- "isPersistent": false
- },
- {
- "name": "jsonIdx",
- "value": 1949,
- "isPersistent": false
- },
- {
- "name": "end",
- "value": 1948,
- "isPersistent": false
- },
- {
- "name": "prev",
- "value": "}",
- "isPersistent": false
- },
- {
- "name": "name",
- "value": "info",
- "isPersistent": false
- },
- {
- "name": "OP",
- "value": "}",
- "isPersistent": false
- },
- {
- "name": "vname",
- "value": "message",
- "isPersistent": false
- },
- {
- "name": "vval",
- "value": "This project is using 3 newly imagined Scratch Blocks",
- "isPersistent": false
- },
- {
- "name": "varIndex#",
- "value": 0,
- "isPersistent": false
- },
- {
- "name": "#i",
- "value": 25,
- "isPersistent": false
- },
- {
- "name": "#tok",
- "value": "",
- "isPersistent": false
- },
- {
- "name": "#op",
- "value": "",
- "isPersistent": false
- },
- {
- "name": "#s",
- "value": "0",
- "isPersistent": false
- },
- {
- "name": "#ins",
- "value": 1918,
- "isPersistent": false
- },
- {
- "name": "_c",
- "value": 3,
- "isPersistent": false
- },
- {
- "name": "#c",
- "value": ")",
- "isPersistent": false
- }],
- "lists": [{
- "listName": "json",
- "contents": ["Below is the JSON text created from your project. To save this you must click on it then press Ctrl+A to select all, then Ctrl+C to copy it. Paste this into a text editor or one of the scratch forums to keep it safe!", "{\"objName\":\"Stage\", \"children\": [{\"objName\":\"project\" ,\"variables\":[ {\"name\": \"text\" , \"value\": \"hdskghjsfgjkdhafghkjdaadgfhsjkgkahjdf\" , \"isPersistent\":false} , {\"name\": \"x\" , \"value\": \"0\" , \"isPersistent\":false} , {\"name\": \"y\" , \"value\": \"0\" , \"isPersistent\":false} ] ,\"scripts\":[ [ 54 , 60 , [ [\"whenGreenFlag\" ] , [\"hide\" ] , [\"doAsk\" , \"Print:\" ] , [\"setVar:to:\" , \"text\" , [\"answer\" ] ] , [\"doAsk\" , \"X:\" ] , [\"setVar:to:\" , \"x\" , [\"answer\" ] ] , [\"doAsk\" , \"Y:\" ] , [\"setVar:to:\" , \"y\" , [\"answer\" ] ] , [\"doAsk\" , \"Hex Color:\" ] , [\"penColor:\" , [\"concatenate:with:\" , \"0x\" , [\"answer\" ] ] ] , [\"gotoX:y:\" , [\"readVariable\" , \"x\" ] , [\"readVariable\" , \"y\" ] ] , [\"changeXposBy:\" , [\"-\" , \"0\" , [\"widthOfText:\" , [\"readVariable\" , \"text\" ] ] ] ] , [\"write\" , [\"readVariable\" , \"text\" ] ] ]] ] }],\"info\":{} }"],
- "isPersistent": false,
- "x": 72,
- "y": 57,
- "width": 341,
- "height": 689,
- "visible": false
- },
- {
- "listName": "TYPE_ANYTOKEN",
- "contents": ["[", "]", "{", "}", ",", ":", " ", "\t"],
- "isPersistent": false,
- "x": 363,
- "y": 101,
- "width": 249,
- "height": 274,
- "visible": false
- },
- {
- "listName": "TYPE_TOKEN",
- "contents": ["[", "]", "{", "}", ",", ":"],
- "isPersistent": false,
- "x": 257,
- "y": 122,
- "width": 226,
- "height": 274,
- "visible": false
- },
- {
- "listName": "stack",
- "contents": [],
- "isPersistent": false,
- "x": 7,
- "y": 139,
- "width": 182,
- "height": 272,
- "visible": false
- },
- {
- "listName": "debug",
- "contents": [],
- "isPersistent": false,
- "x": 51,
- "y": 55,
- "width": 433,
- "height": 309,
- "visible": false
- }],
- "scripts": [[10,
- 445,
- [["procDef", "Scripts", [], [], true],
- ["append:toList:", ",\"scripts\":[", "json"],
- ["setVar:to:", "root", "1"],
- ["doRepeat",
- ["lineCountOfList:", "Roots"],
- [["call",
- "Script root %n first? %b",
- ["getLine:ofList:", ["readVariable", "root"], "Roots"],
- ["=", ["readVariable", "root"], "1"]],
- ["changeVar:by:", "root", 1]]],
- ["append:toList:", "]", "json"]]],
- [10,
- 668,
- [["procDef", "Script root %n first? %b", ["idx", "first?"], [1, false], true],
- ["doIfElse",
- ["getParam", "first?", "b"],
- [["append:toList:", "[", "json"]],
- [["append:toList:", ", [", "json"]]],
- ["append:toList:",
- ["+", 110, ["getLine:ofList:", ["+", ["getParam", "idx", "r"], 1], "Script"]],
- "json"],
- ["append:toList:", ",", "json"],
- ["append:toList:",
- ["-", 190, ["getLine:ofList:", ["+", ["getParam", "idx", "r"], 2], "Script"]],
- "json"],
- ["append:toList:", ", [", "json"],
- ["call", "Block %n first? %b", ["getParam", "idx", "r"], ["not", false]],
- ["append:toList:", "]]", "json"]]],
- [10,
- 1016,
- [["procDef", "Block %n first? %b", ["idx", "first?"], [1, false], true],
- ["doIf", ["<", ["getParam", "idx", "r"], "1"], [["stopScripts", "this script"]]],
- ["setVar:to:", "schema#", ["getLine:ofList:", ["+", ["getParam", "idx", "r"], 11], "Script"]],
- ["setVar:to:", "first?", ["getParam", "first?", "b"]],
- ["doIfElse",
- ["&",
- [">", ["readVariable", "schema#"], "0"],
- ["=", ["rounded", ["readVariable", "schema#"]], ["readVariable", "schema#"]]],
- [["doIf", ["not", ["getParam", "first?", "b"]], [["append:toList:", ",", "json"]]],
- ["append:toList:",
- ["concatenate:with:", "[\"", ["concatenate:with:", ["getLine:ofList:", ["readVariable", "schema#"], "BLOCK_SCHEMA"], "\""]],
- "json"],
- ["setVar:to:", "idx", ["getLine:ofList:", ["+", ["getParam", "idx", "r"], 6], "Script"]],
- ["doIfElse",
- ["|", ["=", ["readVariable", "schema#"], "99"], ["=", ["readVariable", "schema#"], "33"]],
- [["append:toList:", ",", "json"],
- ["call", "appendString %s", ["getLine:ofList:", ["+", ["readVariable", "idx"], 5], "Script"]]],
- [["doIf",
- [">", ["readVariable", "idx"], "0"],
- [["call", "Block %n first? %b", ["readVariable", "idx"], false]]]]],
- ["setVar:to:", "schema#", ["getLine:ofList:", ["+", ["getParam", "idx", "r"], 7], "Script"]],
- ["doIf",
- [">", ["readVariable", "schema#"], "0"],
- [["append:toList:", ",[", "json"],
- ["call", "Block %n first? %b", ["readVariable", "schema#"], ["not", false]],
- ["append:toList:", "]", "json"]]],
- ["setVar:to:", "schema#", ["getLine:ofList:", ["+", ["getParam", "idx", "r"], 8], "Script"]],
- ["doIf",
- [">", ["readVariable", "schema#"], "0"],
- [["append:toList:", ",[", "json"],
- ["call", "Block %n first? %b", ["readVariable", "schema#"], ["not", false]],
- ["append:toList:", "]", "json"]]],
- ["append:toList:", "]", "json"],
- ["setVar:to:", "first?", "false"]],
- [["setVar:to:", "schema#", ["getLine:ofList:", ["getParam", "idx", "r"], "Script"]],
- ["doIfElse",
- ["=", ["readVariable", "schema#"], "t"],
- [["doIf", ["not", ["getParam", "first?", "b"]], [["append:toList:", ",", "json"]]],
- ["call", "appendString %s", ["getLine:ofList:", ["+", ["getParam", "idx", "r"], 5], "Script"]],
- ["setVar:to:", "first?", "false"]],
- [["doIfElse",
- ["=", ["readVariable", "schema#"], "n"],
- [["doIf", ["not", ["getParam", "first?", "b"]], [["append:toList:", ",", "json"]]],
- ["call", "appendString %s", ["getLine:ofList:", ["+", ["getParam", "idx", "r"], 5], "Script"]],
- ["setVar:to:", "first?", "false"]],
- null]]]]],
- ["setVar:to:", "schema#", ["getLine:ofList:", ["+", ["getParam", "idx", "r"], 9], "Script"]],
- ["doIf",
- [">", ["readVariable", "schema#"], "0"],
- [["call", "Block %n first? %b", ["readVariable", "schema#"], ["=", ["readVariable", "first?"], "true"]]]]]],
- [10,
- 149,
- [["procDef", "Construct JSON", [], [], true],
- ["deleteLine:ofList:", "all", "json"],
- ["append:toList:", "{\"objName\":\"Stage\", \"children\": [{\"objName\":\"project\"", "json"],
- ["call", "Variables"],
- ["call", "Scripts"],
- ["append:toList:", "}],\"info\":{}", "json"],
- ["append:toList:", "}", "json"],
- ["setVar:to:", "first?", ["contentsOfList:", "json"]],
- ["deleteLine:ofList:", "all", "json"],
- ["append:toList:", ["readVariable", "first?"], "json"],
- ["showList:", "json"]]],
- [2075,
- 10,
- [["procDef", "appendString %s", ["txt"], [""], true],
- ["setVar:to:", "tok", "\""],
- ["setVar:to:", "i", "1"],
- ["doRepeat",
- ["stringLength:", ["getParam", "txt", "r"]],
- [["setVar:to:", "c", ["letter:of:", ["readVariable", "i"], ["getParam", "txt", "r"]]],
- ["doIf",
- ["|", ["=", ["readVariable", "c"], "\\"], ["=", ["readVariable", "c"], "\""]],
- [["setVar:to:", "tok", ["concatenate:with:", ["readVariable", "tok"], "\\"]]]],
- ["setVar:to:", "tok", ["concatenate:with:", ["readVariable", "tok"], ["readVariable", "c"]]],
- ["changeVar:by:", "i", 1]]],
- ["append:toList:", ["concatenate:with:", ["readVariable", "tok"], "\""], "json"]]],
- [10, 2752, [["not", false]]],
- [3705,
- 10,
- [["procDef", "Expand Body %n %s only arg %n", ["idx", "txt", "onlyIdx"], [1, "", 1], true],
- ["doIf",
- ["<", ["getParam", "onlyIdx", "r"], "1"],
- [["append:toList:", ["readVariable", "idx"], "stack"]]],
- ["setVar:to:", "#i", "1"],
- ["setVar:to:", "#tok", ""],
- ["setVar:to:", "#op", 0],
- ["setVar:to:", "#s", 0],
- ["setVar:to:", "#ins", ["+", ["getParam", "idx", "r"], 6]],
- ["setVar:to:", "_c", "1"],
- ["doRepeat",
- ["stringLength:", ["getParam", "txt", "r"]],
- [["setVar:to:", "#c", ["letter:of:", ["readVariable", "#i"], ["getParam", "txt", "r"]]],
- ["doIfElse",
- ["|",
- ["|", ["=", ["readVariable", "#c"], "("], ["=", ["readVariable", "#c"], "["]],
- ["&",
- ["=", ["readVariable", "#c"], "<"],
- ["not",
- ["=",
- ["letter:of:", ["+", ["readVariable", "#i"], 1], ["getParam", "txt", "r"]],
- " "]]]],
- [["setVar:to:", "#op", ["readVariable", "#c"]],
- ["doIf",
- [">", ["readVariable", "#tok"], ""],
- [["doIf",
- ["<", ["getParam", "onlyIdx", "r"], "1"],
- [["call", "Add Block %s txt? %s", "", ["readVariable", "#tok"]],
- ["setLine:ofList:to:", ["readVariable", "#ins"], "Script", ["readVariable", "idx"]],
- ["setVar:to:", "#ins", ["+", ["readVariable", "idx"], 9]]]],
- ["setVar:to:", "#tok", ""],
- ["setVar:to:", "#s", "0"],
- ["changeVar:by:", "_c", 1]]]],
- [["doIfElse",
- ["|",
- ["|", ["=", ["readVariable", "#c"], ")"], ["=", ["readVariable", "#c"], "]"]],
- ["|",
- ["&", [">", ["readVariable", "#op"], ""], ["=", ["readVariable", "#c"], ">"]],
- ["=", ["readVariable", "#c"], "."]]],
- [["doIfElse",
- ["|",
- ["<", ["getParam", "onlyIdx", "r"], "1"],
- ["=", ["getParam", "onlyIdx", "r"], ["readVariable", "_c"]]],
- [["doIfElse",
- ["=", ["readVariable", "#op"], "."],
- [["setLine:ofList:to:", ["+", ["readVariable", "#ins"], 1], "Script", ["readVariable", "#tok"]],
- ["setVar:to:", "#op", ""]],
- [["doIfElse",
- ["=", ["readVariable", "#op"], "("],
- [["call", "Add Block %s txt? %s", "n", ["readVariable", "#tok"]]],
- [["doIfElse",
- ["=", ["readVariable", "#op"], "["],
- [["call", "Add Block %s txt? %s", "t", ["readVariable", "#tok"]]],
- [["call", "Add Block %s txt? %s", "?", " "]]]]],
- ["doIf",
- ["<", ["getParam", "onlyIdx", "r"], "1"],
- [["setLine:ofList:to:", ["readVariable", "#ins"], "Script", ["readVariable", "idx"]]]],
- ["setVar:to:", "#ins", ["+", ["readVariable", "idx"], 9]],
- ["doIfElse",
- ["=", ["readVariable", "#c"], "."],
- [["setVar:to:", "#op", "."]],
- [["setVar:to:", "#op", ""]]]]]],
- [["setVar:to:", "#op", ""]]],
- ["setVar:to:", "#tok", ""],
- ["setVar:to:", "#s", "0"],
- ["doIfElse", ["=", ["readVariable", "#c"], "."], null, [["changeVar:by:", "_c", 1]]]],
- [["doIfElse",
- ["=", ["readVariable", "#c"], " "],
- [["doIf", [">", ["readVariable", "#tok"], ""], [["setVar:to:", "#s", "1"]]]],
- [["doIfElse",
- [">", ["readVariable", "#s"], "0"],
- [["setVar:to:", "#tok", ["concatenate:with:", ["readVariable", "#tok"], ["concatenate:with:", " ", ["readVariable", "#c"]]]],
- ["setVar:to:", "#s", "0"]],
- [["setVar:to:", "#tok", ["concatenate:with:", ["readVariable", "#tok"], ["readVariable", "#c"]]]]]]]]]]],
- ["changeVar:by:", "#i", 1]]],
- ["doIf",
- ["&",
- [">", ["readVariable", "#tok"], ""],
- ["<", ["getParam", "onlyIdx", "r"], "1"]],
- [["call", "Add Block %s txt? %s", "", ["readVariable", "#tok"]],
- ["setLine:ofList:to:", ["readVariable", "#ins"], "Script", ["readVariable", "idx"]]]],
- ["doIf", ["<", ["getParam", "onlyIdx", "r"], "1"], [["call", "pop"]]]]],
- [3705,
- 2036,
- [["procDef", "Add Block %s txt? %s", ["schema", "txt"], ["", ""], true],
- ["doIfElse",
- [">", ["readVariable", "#BlockPool"], "0"],
- [["setVar:to:", "idx", ["readVariable", "#BlockPool"]],
- ["setVar:to:", "#BlockPool", ["getLine:ofList:", ["+", ["readVariable", "#BlockPool"], 9], "Script"]],
- ["setLine:ofList:to:", ["+", ["readVariable", "idx"], 1], "Script", ""],
- ["setLine:ofList:to:", ["+", ["readVariable", "idx"], 2], "Script", ""],
- ["setLine:ofList:to:", ["+", ["readVariable", "idx"], 3], "Script", ""],
- ["setLine:ofList:to:", ["+", ["readVariable", "idx"], 4], "Script", ""],
- ["setLine:ofList:to:", ["+", ["readVariable", "idx"], 5], "Script", ["getParam", "txt", "r"]],
- ["setLine:ofList:to:", ["+", ["readVariable", "idx"], 6], "Script", "0"],
- ["setLine:ofList:to:", ["+", ["readVariable", "idx"], 7], "Script", "0"],
- ["setLine:ofList:to:", ["+", ["readVariable", "idx"], 8], "Script", "0"],
- ["setLine:ofList:to:", ["+", ["readVariable", "idx"], 9], "Script", "0"],
- ["setLine:ofList:to:", ["+", ["readVariable", "idx"], 11], "Script", ""]],
- [["append:toList:", "", "Script"],
- ["setVar:to:", "idx", ["lineCountOfList:", "Script"]],
- ["append:toList:", "", "Script"],
- ["append:toList:", "", "Script"],
- ["append:toList:", "", "Script"],
- ["append:toList:", "", "Script"],
- ["append:toList:", ["getParam", "txt", "r"], "Script"],
- ["append:toList:", "0", "Script"],
- ["append:toList:", "0", "Script"],
- ["append:toList:", "0", "Script"],
- ["append:toList:", "0", "Script"],
- ["append:toList:", "", "Script"],
- ["append:toList:", "", "Script"]]],
- ["doIfElse",
- ["=", ["rounded", ["getParam", "schema", "r"]], ["getParam", "schema", "r"]],
- [["setLine:ofList:to:",
- ["readVariable", "idx"],
- "Script",
- ["getLine:ofList:",
- ["+", ["getParam", "schema", "r"], ["*", ["readVariable", "SCMA#"], 2]],
- "BLOCK_SCHEMA"]],
- ["setLine:ofList:to:",
- ["+", ["readVariable", "idx"], 10],
- "Script",
- ["getLine:ofList:",
- ["+", ["getParam", "schema", "r"], ["*", ["readVariable", "SCMA#"], 3]],
- "BLOCK_SCHEMA"]],
- ["setLine:ofList:to:", ["+", ["readVariable", "idx"], 11], "Script", ["getParam", "schema", "r"]]],
- [["setLine:ofList:to:", ["readVariable", "idx"], "Script", ["getParam", "schema", "r"]],
- ["setLine:ofList:to:", ["+", ["readVariable", "idx"], 10], "Script", ""],
- ["setLine:ofList:to:", ["+", ["readVariable", "idx"], 11], "Script", ""]]]]],
- [3237,
- 10,
- [["procDef", "get schema# from name %s", ["schema name"], [""], true],
- ["setVar:to:", "schema#", ["-", ["readVariable", "SCMA#"], 1]],
- ["doRepeat",
- ["readVariable", "schema#"],
- [["doIf",
- ["=", ["getLine:ofList:", ["readVariable", "schema#"], "BLOCK_SCHEMA"], ["getParam", "schema name", "r"]],
- [["stopScripts", "this script"]]],
- ["changeVar:by:", "schema#", -1]]]]],
- [2075,
- 2130,
- [["procDef", "parse params %n", ["pidx"], [1], false],
- ["setVar:to:", "c", ["getLine:ofList:", ["getParam", "pidx", "r"], "Script"]],
- ["doIf", ["<", ["readVariable", "c"], "1"], [["stopScripts", "this script"]]],
- ["setVar:to:", "i", ["getLine:ofList:", ["readVariable", "c"], "Script"]],
- ["doIf",
- ["|",
- ["=", ["readVariable", "i"], "t"],
- ["|", ["=", ["readVariable", "i"], "n"], ["=", ["readVariable", "i"], "?"]]],
- [["doIfElse",
- ["=", ["readVariable", "OP"], ""],
- [["setLine:ofList:to:", ["+", ["readVariable", "c"], 5], "Script", ["readVariable", "tok"]],
- ["call", "Next Token"],
- ["doIf", ["=", ["readVariable", "OP"], ","], [["call", "Next Token"]]]],
- [["doIfElse",
- ["=", ["readVariable", "OP"], "["],
- [["call", "_import json scripts %b", ["not", false]],
- ["setLine:ofList:to:",
- ["+", ["readVariable", "idx"], 9],
- "Script",
- ["getLine:ofList:", ["+", ["getLine:ofList:", ["getParam", "pidx", "r"], "Script"], 9], "Script"]],
- ["setLine:ofList:to:", ["+", ["getLine:ofList:", ["getParam", "pidx", "r"], "Script"], 9], "Script", "0"],
- ["call", "Delete Block %n", ["getLine:ofList:", ["getParam", "pidx", "r"], "Script"]],
- ["setLine:ofList:to:", ["getParam", "pidx", "r"], "Script", ["readVariable", "idx"]]],
- [["append:toList:", "BAD: Unknown OP", "debug"], ["doBroadcastAndWait", "LOAD FAILED"]]]]]]],
- ["call", "parse params %n", ["+", ["getLine:ofList:", ["getParam", "pidx", "r"], "Script"], 9]]]],
- [2702,
- 10,
- [["procDef", "Delete Block %n", ["idx"], [1], true],
- ["doIf",
- [">", ["getParam", "idx", "r"], "0"],
- [["call", "Delete Block %n", ["getLine:ofList:", ["+", ["getParam", "idx", "r"], 6], "Script"]],
- ["call", "Delete Block %n", ["getLine:ofList:", ["+", ["getParam", "idx", "r"], 7], "Script"]],
- ["call", "Delete Block %n", ["getLine:ofList:", ["+", ["getParam", "idx", "r"], 8], "Script"]],
- ["call", "Delete Block %n", ["getLine:ofList:", ["+", ["getParam", "idx", "r"], 9], "Script"]],
- ["setLine:ofList:to:", ["+", ["getParam", "idx", "r"], 9], "Script", ["readVariable", "#BlockPool"]],
- ["setVar:to:", "#BlockPool", ["getParam", "idx", "r"]]]]]],
- [557,
- 396,
- [["procDef", "pop", [], [], true],
- ["setVar:to:", "idx", ["getLine:ofList:", "last", "stack"]],
- ["deleteLine:ofList:", "last", "stack"]]],
- [860,
- 616,
- [["procDef", "Set Variable %s to %s", ["name", "val"], ["", ""], true],
- ["call", "Get Var index %s", ["getParam", "name", "r"]],
- ["doIfElse",
- [">", ["readVariable", "varIndex#"], "0"],
- [["setLine:ofList:to:", ["+", ["readVariable", "varIndex#"], 1], "vars", ["getParam", "val", "r"]]],
- [["append:toList:", ["getParam", "name", "r"], "vars"],
- ["append:toList:", ["getParam", "val", "r"], "vars"]]]]],
- [2702,
- 322,
- [["procDef", "_import json scripts %b", ["just me?"], [false], false],
- ["doIf",
- ["not", ["=", ["readVariable", "OP"], "["]],
- [["doIf", ["=", ["readVariable", "OP"], "]"], [["stopScripts", "this script"]]],
- ["append:toList:", "BAD: script must begin with a [", "debug"],
- ["doBroadcastAndWait", "LOAD FAILED"]]],
- ["call", "Next Token"],
- ["call", "get schema# from name %s", ["readVariable", "tok"]],
- ["doIf",
- ["<", ["readVariable", "schema#"], "1"],
- [["append:toList:", "BAD: Schema# < 1", "debug"], ["doBroadcastAndWait", "LOAD FAILED"]]],
- ["call", "Add Block %s txt? %s", ["readVariable", "schema#"], ""],
- ["append:toList:", ["concatenate:with:", ">> block: ", ["readVariable", "tok"]], "debug"],
- ["append:toList:", ["concatenate:with:", "block: ", ["readVariable", "tok"]], "stack"],
- ["append:toList:", ["readVariable", "idx"], "stack"],
- ["call",
- "Expand Body %n %s only arg %n",
- ["readVariable", "idx"],
- ["getLine:ofList:", ["+", ["readVariable", "schema#"], ["readVariable", "SCMA#"]], "BLOCK_SCHEMA"],
- 0],
- ["call", "Next Token"],
- ["doIf",
- ["=", ["readVariable", "OP"], ","],
- [["call", "Next Token"],
- ["doIfElse",
- ["|", ["=", ["readVariable", "schema#"], "33"], ["=", ["readVariable", "schema#"], "99"]],
- [["setLine:ofList:to:",
- ["+", ["getLine:ofList:", ["+", ["readVariable", "idx"], 6], "Script"], 5],
- "Script",
- ["readVariable", "tok"]],
- ["call", "Next Token"]],
- [["call", "parse params %n", ["+", ["readVariable", "idx"], 6]],
- ["doIf",
- ["not", ["=", ["readVariable", "OP"], "]"]],
- [["call", "parse nested script %n", ["+", ["getLine:ofList:", "last", "stack"], 7]],
- ["doIf",
- ["not", ["=", ["readVariable", "OP"], "]"]],
- [["call", "parse nested script %n", ["+", ["getLine:ofList:", "last", "stack"], 8]],
- ["doIf",
- ["not", ["=", ["readVariable", "OP"], "]"]],
- [["append:toList:", "BAD: ] expected...", "debug"], ["doBroadcastAndWait", "LOAD FAILED"]]]]]]]]]]],
- ["doIf",
- ["not", ["=", ["readVariable", "OP"], "]"]],
- [["append:toList:", "BAD: ] expected...", "debug"], ["doBroadcastAndWait", "LOAD FAILED"]]],
- ["call", "pop"],
- ["append:toList:", ["concatenate:with:", "<< ", ["getLine:ofList:", "last", "stack"]], "debug"],
- ["deleteLine:ofList:", "last", "stack"],
- ["call", "Next Token"],
- ["doIf", ["=", ["readVariable", "OP"], "]"], [["stopScripts", "this script"]]],
- ["doIf",
- ["not", ["=", ["readVariable", "OP"], ","]],
- [["append:toList:", "BAD: ',' expected...", "debug"], ["doBroadcastAndWait", "LOAD FAILED"]]],
- ["call", "Next Token"],
- ["doIf",
- ["not", ["getParam", "just me?", "b"]],
- [["append:toList:", ["readVariable", "idx"], "stack"],
- ["call", "_import json scripts %b", false],
- ["setLine:ofList:to:", ["+", ["getLine:ofList:", "last", "stack"], 9], "Script", ["readVariable", "idx"]],
- ["call", "pop"]]]]],
- [860,
- 862,
- [["procDef", "_import sprite", [], [], false],
- ["call", "Next Token"],
- ["doUntil",
- ["=", ["readVariable", "OP"], "}"],
- [["setVar:to:", "name", ["readVariable", "tok"]],
- ["call", "Next Token"],
- ["doIf",
- ["not", ["=", ["readVariable", "OP"], ":"]],
- [["append:toList:", "BAD: ':' expected", "debug"], ["append:toList:", ["readVariable", "OP"], "debug"], ["doBroadcastAndWait", "LOAD FAILED"]]],
- ["call", "Next Token"],
- ["doIfElse",
- ["=", ["readVariable", "name"], "variables"],
- [["doIf",
- ["not", ["=", ["readVariable", "OP"], "["]],
- [["append:toList:", "BAD: [ expected", "debug"], ["doBroadcastAndWait", "LOAD FAILED"]]],
- ["call", "Next Token"],
- ["doUntil",
- ["not", ["=", ["readVariable", "OP"], "{"]],
- [["setVar:to:", "vname", ""],
- ["setVar:to:", "vval", ""],
- ["call", "Next Token"],
- ["doUntil",
- ["=", ["readVariable", "OP"], "}"],
- [["call", "_next json attr"],
- ["doIfElse",
- ["=", ["readVariable", "name"], "name"],
- [["setVar:to:", "vname", ["readVariable", "tok"]]],
- [["doIf",
- ["=", ["readVariable", "name"], "value"],
- [["setVar:to:", "vval", ["readVariable", "tok"]]]]]],
- ["call", "Next Token"],
- ["doIf", ["=", ["readVariable", "OP"], ","], [["call", "Next Token"]]]]],
- ["doIf",
- [">", ["readVariable", "vname"], ""],
- [["call", "Set Variable %s to %s", ["readVariable", "vname"], ["readVariable", "vval"]]]],
- ["call", "Next Token"],
- ["doIf", ["=", ["readVariable", "OP"], ","], [["call", "Next Token"]]]]],
- ["doIf",
- ["not", ["=", ["readVariable", "OP"], "]"]],
- [["append:toList:", "BAD: ] expected", "debug"], ["doBroadcastAndWait", "LOAD FAILED"]]],
- ["call", "Next Token"],
- ["doIf", ["=", ["readVariable", "OP"], ","], [["call", "Next Token"]]]],
- [["doIfElse",
- ["=", ["readVariable", "name"], "scripts"],
- [["doIf",
- ["not", ["=", ["readVariable", "OP"], "["]],
- [["append:toList:", "BAD: [ expected", "debug"], ["doBroadcastAndWait", "LOAD FAILED"]]],
- ["call", "Next Token"],
- ["doUntil",
- ["not", ["=", ["readVariable", "OP"], "["]],
- [["call", "Next Token"],
- ["append:toList:", ["readVariable", "tok"], "stack"],
- ["call", "Next Token"],
- ["call", "Next Token"],
- ["append:toList:", ["readVariable", "tok"], "stack"],
- ["call", "Next Token"],
- ["call", "Next Token"],
- ["doIf",
- ["not", ["=", ["readVariable", "OP"], "["]],
- [["append:toList:", "BAD: [ expected", "debug"], ["doBroadcastAndWait", "LOAD FAILED"]]],
- ["call", "Next Token"],
- ["call", "_import json scripts %b", false],
- ["append:toList:", ["readVariable", "idx"], "Roots"],
- ["setLine:ofList:to:",
- ["+", ["readVariable", "idx"], 2],
- "Script",
- ["-", 190, ["getLine:ofList:", "last", "stack"]]],
- ["deleteLine:ofList:", "last", "stack"],
- ["setLine:ofList:to:",
- ["+", ["readVariable", "idx"], 1],
- "Script",
- ["-", ["getLine:ofList:", "last", "stack"], 110]],
- ["deleteLine:ofList:", "last", "stack"],
- ["append:toList:",
- ["concatenate:with:", "one script done with \"", ["concatenate:with:", ["readVariable", "tok"], ["concatenate:with:", "\" at ", ["readVariable", "jsonIdx"]]]],
- "debug"],
- ["call", "Next Token"],
- ["call", "Next Token"],
- ["doIf", ["=", ["readVariable", "OP"], ","], [["call", "Next Token"]]]]],
- ["doIf",
- ["not", ["=", ["readVariable", "OP"], "]"]],
- [["append:toList:", "BAD: ] expected", "debug"], ["doBroadcastAndWait", "LOAD FAILED"]]],
- ["append:toList:", ["concatenate:with:", "OUT Sprite ] at ", ["readVariable", "jsonIdx"]], "debug"],
- ["call", "Next Token"],
- ["doIf", ["=", ["readVariable", "OP"], ","], [["call", "Next Token"]]]],
- [["call", "eat unknown"]]]]]]]]],
- [2075,
- 2871,
- [["procDef", "parse nested script %n", ["setIdx"], [1], false],
- ["call", "Next Token"],
- ["doIf",
- ["not", ["=", ["readVariable", "OP"], "["]],
- [["append:toList:", "BAD: [ expected...", "debug"], ["doBroadcastAndWait", "LOAD FAILED"]]],
- ["call", "_import json scripts %b", false],
- ["setLine:ofList:to:", ["getParam", "setIdx", "r"], "Script", ["readVariable", "idx"]],
- ["call", "Next Token"],
- ["doIf", ["=", ["readVariable", "OP"], ","], [["call", "Next Token"]]]]],
- [557,
- 10,
- [["whenIReceive", "Load JSON"],
- ["doAsk", "Enter JSON:"],
- ["deleteLine:ofList:", "all", "debug"],
- ["doIf",
- [">", ["answer"], ""],
- [["call", "Import JSON %s", ["answer"]], ["deleteLine:ofList:", "all", "debug"], ["doBroadcastAndWait", "change palette"]]]]],
- [10,
- 10,
- [["whenGreenFlag"],
- ["hideList:", "json"],
- ["hideList:", "debug"],
- ["deleteLine:ofList:", "all", "json"],
- ["hide"]]],
- [557,
- 945,
- [["procDef", "Import JSON %s", ["json"], [""], false],
- ["deleteLine:ofList:", "all", "stack"],
- ["doIf", ["=", ["getParam", "json", "r"], ""], [["stopScripts", "this script"]]],
- ["setVar:to:", "JSON", ["getParam", "json", "r"]],
- ["setVar:to:", "end", ["stringLength:", ["getParam", "json", "r"]]],
- ["setVar:to:", "jsonIdx", "1"],
- ["deleteLine:ofList:", "all", "Script"],
- ["deleteLine:ofList:", "all", "Roots"],
- ["deleteLine:ofList:", "all", "Palette"],
- ["deleteLine:ofList:", "all", "vars"],
- ["deleteLine:ofList:", "all", "lists"],
- ["append:toList:", "2", "lists"],
- ["setVar:to:", "#BlockPool", 0],
- ["setVar:to:", "dirty", "2"],
- ["call", "Next Token"],
- ["doIf",
- ["not", ["=", ["readVariable", "OP"], "{"]],
- [["append:toList:", "BAD: '{' expected", "debug"], ["doBroadcastAndWait", "LOAD FAILED"]]],
- ["call", "Next Token"],
- ["doUntil",
- ["=", ["readVariable", "OP"], "}"],
- [["setVar:to:", "name", ["readVariable", "tok"]],
- ["call", "Next Token"],
- ["doIf",
- ["not", ["=", ["readVariable", "OP"], ":"]],
- [["append:toList:", "BAD: ':' expected", "debug"], ["doBroadcastAndWait", "LOAD FAILED"]]],
- ["call", "Next Token"],
- ["doIfElse",
- ["=", ["readVariable", "name"], "children"],
- [["doIf",
- ["not", ["=", ["readVariable", "OP"], "["]],
- [["append:toList:", "BAD: '[' expected", "debug"], ["doBroadcastAndWait", "LOAD FAILED"]]],
- ["call", "Next Token"],
- ["doUntil",
- ["not", ["=", ["readVariable", "OP"], "{"]],
- [["call", "_import sprite"],
- ["call", "Next Token"],
- ["doIf", ["=", ["readVariable", "OP"], ","], [["call", "Next Token"]]]]],
- ["call", "Next Token"],
- ["doIf", ["=", ["readVariable", "OP"], ","], [["call", "Next Token"]]]],
- [["call", "eat unknown"]]]]]]],
- [557,
- 2171,
- [["procDef", "eat unknown", [], [], false],
- ["doIfElse",
- ["=", ["readVariable", "OP"], "["],
- [["setVar:to:", "i", "1"],
- ["doUntil",
- ["<", ["readVariable", "i"], "1"],
- [["call", "Next Token"],
- ["doIfElse",
- ["=", ["readVariable", "OP"], "["],
- [["changeVar:by:", "i", 1]],
- [["doIf", ["=", ["readVariable", "OP"], "]"], [["changeVar:by:", "i", -1]]]]]]]],
- [["doIfElse",
- ["=", ["readVariable", "OP"], "{"],
- [["setVar:to:", "i", "1"],
- ["doUntil",
- ["<", ["readVariable", "i"], "1"],
- [["call", "Next Token"],
- ["doIfElse",
- ["=", ["readVariable", "OP"], "{"],
- [["changeVar:by:", "i", 1]],
- [["doIf", ["=", ["readVariable", "OP"], "}"], [["changeVar:by:", "i", -1]]]]]]]],
- null]]],
- ["call", "Next Token"],
- ["doIf", ["=", ["readVariable", "OP"], ","], [["call", "Next Token"]]]]],
- [557,
- 506,
- [["procDef", "Variables", [], [], true],
- ["append:toList:", ",\"variables\":[", "json"],
- ["setVar:to:", "root", "1"],
- ["setVar:to:", "first?", "0"],
- ["doRepeat",
- ["\/", ["lineCountOfList:", "vars"], 2],
- [["doIf", [">", ["readVariable", "first?"], "0"], [["append:toList:", ",", "json"]]],
- ["append:toList:", "{\"name\":", "json"],
- ["call", "appendString %s", ["getLine:ofList:", ["readVariable", "root"], "vars"]],
- ["append:toList:", ", \"value\":", "json"],
- ["call", "appendString %s", ["getLine:ofList:", ["+", ["readVariable", "root"], 1], "vars"]],
- ["append:toList:", ", \"isPersistent\":false}", "json"],
- ["changeVar:by:", "first?", 1],
- ["changeVar:by:", "root", 2]]],
- ["append:toList:", "]", "json"]]],
- [10,
- 2507,
- [["procDef", "_next json attr", [], [], false],
- ["setVar:to:", "name", ["readVariable", "tok"]],
- ["call", "Next Token"],
- ["doIf",
- ["not", ["=", ["readVariable", "OP"], ":"]],
- [["append:toList:", ["concatenate:with:", "BAD: attr ", ["concatenate:with:", ["readVariable", "name"], " not followed by ':'"]], "debug"],
- ["doBroadcastAndWait", "LOAD FAILED"]]],
- ["call", "Next Token"]]],
- [860,
- 120,
- [["procDef", "wait for mouse", [], [], false],
- ["doUntil", ["not", ["mousePressed"]], [["wait:elapsed:from:", 0.1]]],
- ["doForever",
- [["doIf",
- ["mousePressed"],
- [["doIf",
- [">", ["computeFunction:of:", "abs", ["mouseX"]], "190"],
- [["hideList:", "json"], ["stopScripts", "this script"]]],
- ["doIf",
- [">", ["computeFunction:of:", "abs", ["mouseY"]], "137"],
- [["hideList:", "json"], ["stopScripts", "this script"]]],
- ["doUntil", ["not", ["mousePressed"]], [["wait:elapsed:from:", 0.01]]]]],
- ["wait:elapsed:from:", 0.01]]]]],
- [2075,
- 366,
- [["whenIReceive", "LOAD FAILED"],
- ["stopScripts", "other scripts in sprite"],
- ["deleteLine:ofList:", "all", "Script"],
- ["deleteLine:ofList:", "all", "Roots"],
- ["deleteLine:ofList:", "all", "Palette"],
- ["deleteLine:ofList:", "all", "vars"],
- ["deleteLine:ofList:", "all", "lists"],
- ["append:toList:", "2", "lists"],
- ["showList:", "debug"],
- ["append:toList:", ["concatenate:with:", "Last char index: ", ["readVariable", "jsonIdx"]], "debug"],
- ["wait:elapsed:from:", 0.02],
- ["append:toList:", "Oh no... something went wrong :(", "debug"],
- ["wait:elapsed:from:", 0.02],
- ["setVar:to:", "#c", ["-", ["lineCountOfList:", "debug"], 5]],
- ["setVar:to:", "#c", ["getLine:ofList:", ["readVariable", "#c"], "debug"]],
- ["wait:elapsed:from:", 0.02],
- ["setVar:to:", "#c", ["-", ["lineCountOfList:", "debug"], 5]],
- ["setVar:to:", "#c", ["getLine:ofList:", ["readVariable", "#c"], "debug"]],
- ["call", "wait for mouse"],
- ["hideList:", "debug"],
- ["doBroadcastAndWait", "change palette"],
- ["broadcast:", "draw"]]],
- [557,
- 214,
- [["whenIReceive", "Load Example JSON"],
- ["deleteLine:ofList:", "all", "debug"],
- ["doIf",
- [">", ["getAttribute:of:", "#DragDest", "Editor"], ""],
- [["call", "Import JSON %s", ["getAttribute:of:", "#DragDest", "Editor"]],
- ["deleteLine:ofList:", "all", "debug"],
- ["doBroadcastAndWait", "change palette"]]]]],
- [860,
- 10,
- [["whenIReceive", "Save JSON"],
- ["call", "Construct JSON"],
- ["insert:at:ofList:", "Below is the JSON text created from your project. To save this you must click on it then press Ctrl+A to select all, then Ctrl+C to copy it. Paste this into a text editor or one of the scratch forums to keep it safe!", 1, "json"],
- ["call", "wait for mouse"]]],
- [2075,
- 912,
- [["procDef", "Next Token", [], [], false],
- ["setVar:to:", "prev", ["readVariable", "tok"]],
- ["setVar:to:", "tok", ""],
- ["setVar:to:", "OP", ""],
- ["doIf", [">", ["readVariable", "jsonIdx"], ["readVariable", "end"]], [["stopScripts", "this script"]]],
- ["setVar:to:", "c", ["letter:of:", ["readVariable", "jsonIdx"], ["readVariable", "JSON"]]],
- ["doUntil",
- ["not",
- ["|", ["=", ["readVariable", "c"], " "], ["=", ["readVariable", "c"], "\t"]]],
- [["changeVar:by:", "jsonIdx", 1],
- ["setVar:to:", "c", ["letter:of:", ["readVariable", "jsonIdx"], ["readVariable", "JSON"]]],
- ["doIf", [">", ["readVariable", "jsonIdx"], ["readVariable", "end"]], [["stopScripts", "this script"]]]]],
- ["doIf",
- ["list:contains:", "TYPE_TOKEN", ["readVariable", "c"]],
- [["setVar:to:", "tok", ["readVariable", "c"]],
- ["setVar:to:", "OP", ["readVariable", "c"]],
- ["changeVar:by:", "jsonIdx", 1],
- ["stopScripts", "this script"]]],
- ["doIf",
- ["=", ["readVariable", "c"], "\""],
- [["changeVar:by:", "jsonIdx", 1],
- ["setVar:to:", "c", ["letter:of:", ["readVariable", "jsonIdx"], ["readVariable", "JSON"]]],
- ["doUntil",
- ["=", ["readVariable", "c"], "\""],
- [["doIfElse",
- ["=", ["readVariable", "c"], "\\"],
- [["changeVar:by:", "jsonIdx", 1],
- ["setVar:to:",
- "tok",
- ["concatenate:with:", ["readVariable", "tok"], ["letter:of:", ["readVariable", "jsonIdx"], ["readVariable", "JSON"]]]]],
- [["setVar:to:", "tok", ["concatenate:with:", ["readVariable", "tok"], ["readVariable", "c"]]]]],
- ["doIf", [">", ["readVariable", "jsonIdx"], ["readVariable", "end"]], [["stopScripts", "this script"]]],
- ["changeVar:by:", "jsonIdx", 1],
- ["setVar:to:", "c", ["letter:of:", ["readVariable", "jsonIdx"], ["readVariable", "JSON"]]]]],
- ["changeVar:by:", "jsonIdx", 1],
- ["stopScripts", "this script"]]],
- ["doUntil",
- ["list:contains:", "TYPE_ANYTOKEN", ["readVariable", "c"]],
- [["setVar:to:", "tok", ["concatenate:with:", ["readVariable", "tok"], ["readVariable", "c"]]],
- ["changeVar:by:", "jsonIdx", 1],
- ["doIf", [">", ["readVariable", "jsonIdx"], ["readVariable", "end"]], [["stopScripts", "this script"]]],
- ["setVar:to:", "c", ["letter:of:", ["readVariable", "jsonIdx"], ["readVariable", "JSON"]]]]]]]],
- "scriptComments": [[2271, 323, 150, 200, false, 192, "Need to encode..."],
- [1120, 2260.5, 150, 200, false, 771, "[ x, y, [script]]"],
- [1068, 2313, 150, 200, false, 776, "x"],
- [1068, 2383, 150, 200, false, 780, "y"],
- [2900, 1341.5, 216, 60, false, 651, "End of this block, and siblings?"],
- [2861, 1530, 150, 200, false, 663, "No Siblings"],
- [2375, 2826, 150, 200, false, 519, "new param"],
- [2930, 1052.5, 150, 200, false, 631, "Nested Content follows"],
- [2861, 855, 205, 57, false, 611, "parameters"],
- [1010, 2780, 150, 200, false, 813, "Out of script ] too"],
- [995, 3011, 150, 200, false, 827, "Then comma"]],
- "costumes": [{
- "costumeName": "costume1",
- "baseLayerID": 2,
- "baseLayerMD5": "d36f6603ec293d2c2198d3ea05109fe0.png",
- "bitmapResolution": 2,
- "rotationCenterX": 0,
- "rotationCenterY": 0
- }],
- "currentCostumeIndex": 0,
- "scratchX": -24,
- "scratchY": -34,
- "scale": 1,
- "direction": 90,
- "rotationStyle": "none",
- "isDraggable": false,
- "indexInLibrary": 6,
- "visible": false,
- "spriteInfo": {
- }
- },
- {
- "target": "Editor",
- "cmd": "getVar:",
- "param": "Len",
- "color": 15629590,
- "label": "Editor: Len",
- "mode": 1,
- "sliderMin": 0,
- "sliderMax": 100,
- "isDiscrete": true,
- "x": 5,
- "y": 240,
- "visible": false
- },
- {
- "target": "Parser",
- "cmd": "getVar:",
- "param": "idx",
- "color": 15629590,
- "label": "Parser: idx",
- "mode": 1,
- "sliderMin": 0,
- "sliderMax": 100,
- "isDiscrete": true,
- "x": 5,
- "y": 141,
- "visible": false
- },
- {
- "target": "Editor",
- "cmd": "getVar:",
- "param": "idx",
- "color": 15629590,
- "label": "Editor: idx",
- "mode": 1,
- "sliderMin": 0,
- "sliderMax": 100,
- "isDiscrete": true,
- "x": 112,
- "y": 297,
- "visible": false
- },
- {
- "target": "Editor",
- "cmd": "getVar:",
- "param": "sx",
- "color": 15629590,
- "label": "Editor: sx",
- "mode": 1,
- "sliderMin": 0,
- "sliderMax": 100,
- "isDiscrete": true,
- "x": 223,
- "y": 297,
- "visible": false
- },
- {
- "target": "Editor",
- "cmd": "getVar:",
- "param": "sy",
- "color": 15629590,
- "label": "Editor: sy",
- "mode": 1,
- "sliderMin": 0,
- "sliderMax": 100,
- "isDiscrete": true,
- "x": 331,
- "y": 5,
- "visible": false
- },
- {
- "target": "Editor",
- "cmd": "getVar:",
- "param": "_ci",
- "color": 15629590,
- "label": "Editor: _ci",
- "mode": 1,
- "sliderMin": 0,
- "sliderMax": 100,
- "isDiscrete": true,
- "x": 5,
- "y": 5,
- "visible": false
- },
- {
- "target": "Stage",
- "cmd": "getVar:",
- "param": "#DragIdx",
- "color": 15629590,
- "label": "#DragIdx",
- "mode": 1,
- "sliderMin": 0,
- "sliderMax": 100,
- "isDiscrete": true,
- "x": 5,
- "y": 32,
- "visible": false
- },
- {
- "target": "Editor",
- "cmd": "getVar:",
- "param": "#offsetX",
- "color": 15629590,
- "label": "Editor: #offsetX",
- "mode": 1,
- "sliderMin": 0,
- "sliderMax": 100,
- "isDiscrete": true,
- "x": 5,
- "y": 59,
- "visible": false
- },
- {
- "target": "Editor",
- "cmd": "getVar:",
- "param": "#offsetY",
- "color": 15629590,
- "label": "Editor: #offsetY",
- "mode": 1,
- "sliderMin": 0,
- "sliderMax": 100,
- "isDiscrete": true,
- "x": 5,
- "y": 86,
- "visible": false
- },
- {
- "target": "Editor",
- "cmd": "getVar:",
- "param": "#DragDest",
- "color": 15629590,
- "label": "Editor: #DragDest",
- "mode": 1,
- "sliderMin": 0,
- "sliderMax": 100,
- "isDiscrete": true,
- "x": 5,
- "y": 113,
- "visible": false
- },
- {
- "target": "Editor",
- "cmd": "getVar:",
- "param": "#DragDstLink",
- "color": 15629590,
- "label": "Editor: #DragDstLink",
- "mode": 1,
- "sliderMin": 0,
- "sliderMax": 100,
- "isDiscrete": true,
- "x": 5,
- "y": 168,
- "visible": false
- },
- {
- "target": "Editor",
- "cmd": "getVar:",
- "param": "lmx",
- "color": 15629590,
- "label": "Editor: lmx",
- "mode": 1,
- "sliderMin": 0,
- "sliderMax": 100,
- "isDiscrete": true,
- "x": 48,
- "y": 140,
- "visible": false
- },
- {
- "target": "Editor",
- "cmd": "getVar:",
- "param": "lmy",
- "color": 15629590,
- "label": "Editor: lmy",
- "mode": 1,
- "sliderMin": 0,
- "sliderMax": 100,
- "isDiscrete": true,
- "x": 265,
- "y": 221,
- "visible": false
- },
- {
- "target": "Editor",
- "cmd": "getVar:",
- "param": "#ClickIdx",
- "color": 15629590,
- "label": "Editor: #ClickIdx",
- "mode": 1,
- "sliderMin": 0,
- "sliderMax": 100,
- "isDiscrete": true,
- "x": 132,
- "y": 171,
- "visible": false
- },
- {
- "target": "Stage",
- "cmd": "getVar:",
- "param": "SCMA#",
- "color": 15629590,
- "label": "SCMA#",
- "mode": 1,
- "sliderMin": 0,
- "sliderMax": 100,
- "isDiscrete": true,
- "x": 40,
- "y": 85,
- "visible": false
- },
- {
- "target": "Parser",
- "cmd": "getVar:",
- "param": "#i",
- "color": 15629590,
- "label": "Parser: #i",
- "mode": 1,
- "sliderMin": 0,
- "sliderMax": 100,
- "isDiscrete": true,
- "x": 141,
- "y": 195,
- "visible": false
- },
- {
- "target": "Parser",
- "cmd": "getVar:",
- "param": "#tok",
- "color": 15629590,
- "label": "Parser: #tok",
- "mode": 1,
- "sliderMin": 0,
- "sliderMax": 100,
- "isDiscrete": true,
- "x": 53,
- "y": 212,
- "visible": false
- },
- {
- "target": "Parser",
- "cmd": "getVar:",
- "param": "#c",
- "color": 15629590,
- "label": "Parser: #c",
- "mode": 1,
- "sliderMin": 0,
- "sliderMax": 100,
- "isDiscrete": true,
- "x": 317,
- "y": 85,
- "visible": false
- },
- {
- "target": "Parser",
- "cmd": "getVar:",
- "param": "#op",
- "color": 15629590,
- "label": "Parser: #op",
- "mode": 1,
- "sliderMin": 0,
- "sliderMax": 100,
- "isDiscrete": true,
- "x": 216,
- "y": 88,
- "visible": false
- },
- {
- "target": "Parser",
- "cmd": "getVar:",
- "param": "#s",
- "color": 15629590,
- "label": "Parser: #s",
- "mode": 1,
- "sliderMin": 0,
- "sliderMax": 100,
- "isDiscrete": true,
- "x": 246,
- "y": 98,
- "visible": false
- },
- {
- "target": "Parser",
- "cmd": "getVar:",
- "param": "#ins",
- "color": 15629590,
- "label": "Parser: #ins",
- "mode": 1,
- "sliderMin": 0,
- "sliderMax": 100,
- "isDiscrete": true,
- "x": 137,
- "y": 81,
- "visible": false
- },
- {
- "target": "Parser",
- "cmd": "getVar:",
- "param": "#x",
- "color": 15629590,
- "label": "Parser: #x",
- "mode": 1,
- "sliderMin": 0,
- "sliderMax": 100,
- "isDiscrete": true,
- "x": 274,
- "y": 168,
- "visible": false
- },
- {
- "target": "Parser",
- "cmd": "getVar:",
- "param": "#y",
- "color": 15629590,
- "label": "Parser: #y",
- "mode": 1,
- "sliderMin": 0,
- "sliderMax": 100,
- "isDiscrete": true,
- "x": 8,
- "y": 134,
- "visible": false
- },
- {
- "target": "Parser",
- "cmd": "getVar:",
- "param": "#sid",
- "color": 15629590,
- "label": "Parser: #sid",
- "mode": 1,
- "sliderMin": 0,
- "sliderMax": 100,
- "isDiscrete": true,
- "x": 376,
- "y": 137,
- "visible": false
- },
- {
- "target": "Parser",
- "cmd": "getVar:",
- "param": "#cat",
- "color": 15629590,
- "label": "Parser: #cat",
- "mode": 1,
- "sliderMin": 0,
- "sliderMax": 100,
- "isDiscrete": true,
- "x": 107,
- "y": 287,
- "visible": false
- },
- {
- "target": "Stage",
- "cmd": "getVar:",
- "param": "#BlockPool",
- "color": 15629590,
- "label": "#BlockPool",
- "mode": 1,
- "sliderMin": 0,
- "sliderMax": 100,
- "isDiscrete": true,
- "x": 143,
- "y": 5,
- "visible": false
- },
- {
- "target": "Editor",
- "cmd": "getVar:",
- "param": "_vy2",
- "color": 15629590,
- "label": "Editor: _vy2",
- "mode": 1,
- "sliderMin": 0,
- "sliderMax": 100,
- "isDiscrete": true,
- "x": 143,
- "y": 62,
- "visible": false
- },
- {
- "target": "Stage",
- "cmd": "getVar:",
- "param": "dirty",
- "color": 15629590,
- "label": "dirty",
- "mode": 1,
- "sliderMin": 0,
- "sliderMax": 100,
- "isDiscrete": true,
- "x": 115,
- "y": 278,
- "visible": false
- },
- {
- "target": "Stage",
- "cmd": "timer",
- "param": null,
- "color": 2926050,
- "label": "timer",
- "mode": 1,
- "sliderMin": 0,
- "sliderMax": 100,
- "isDiscrete": true,
- "x": 379,
- "y": 326,
- "visible": false
- },
- {
- "target": "Parser",
- "cmd": "getVar:",
- "param": "cTime",
- "color": 15629590,
- "label": "Parser: cTime",
- "mode": 1,
- "sliderMin": 0,
- "sliderMax": 100,
- "isDiscrete": true,
- "x": 21,
- "y": 268,
- "visible": false
- },
- {
- "target": "Stage",
- "cmd": "getVar:",
- "param": "#RunTime",
- "color": 15629590,
- "label": "#RunTime",
- "mode": 1,
- "sliderMin": 0,
- "sliderMax": 100,
- "isDiscrete": true,
- "x": 259,
- "y": 108,
- "visible": false
- },
- {
- "target": "Runtime",
- "cmd": "getVar:",
- "param": "thread#",
- "color": 15629590,
- "label": "Runtime: thread#",
- "mode": 1,
- "sliderMin": 0,
- "sliderMax": 100,
- "isDiscrete": true,
- "x": 41,
- "y": 312,
- "visible": false
- },
- {
- "target": "Runtime",
- "cmd": "getVar:",
- "param": "varIndex#",
- "color": 15629590,
- "label": "Runtime: varIndex#",
- "mode": 1,
- "sliderMin": 0,
- "sliderMax": 100,
- "isDiscrete": true,
- "x": 93,
- "y": 296,
- "visible": false
- },
- {
- "target": "Runtime",
- "cmd": "getVar:",
- "param": "inst",
- "color": 15629590,
- "label": "Runtime: inst",
- "mode": 1,
- "sliderMin": 0,
- "sliderMax": 100,
- "isDiscrete": true,
- "x": 303,
- "y": 38,
- "visible": false
- },
- {
- "target": "Runtime",
- "cmd": "getVar:",
- "param": "paramIdx",
- "color": 15629590,
- "label": "Runtime: paramIdx",
- "mode": 1,
- "sliderMin": 0,
- "sliderMax": 100,
- "isDiscrete": true,
- "x": 256,
- "y": 81,
- "visible": false
- },
- {
- "target": "Runtime",
- "cmd": "getVar:",
- "param": "vName",
- "color": 15629590,
- "label": "Runtime: vName",
- "mode": 1,
- "sliderMin": 0,
- "sliderMax": 100,
- "isDiscrete": true,
- "x": 87,
- "y": 33,
- "visible": false
- },
- {
- "target": "Runtime",
- "cmd": "getVar:",
- "param": "vVal",
- "color": 15629590,
- "label": "Runtime: vVal",
- "mode": 1,
- "sliderMin": 0,
- "sliderMax": 100,
- "isDiscrete": true,
- "x": 222,
- "y": 155,
- "visible": false
- },
- {
- "target": "Runtime",
- "cmd": "getVar:",
- "param": "heapPool#",
- "color": 15629590,
- "label": "Runtime: heapPool#",
- "mode": 1,
- "sliderMin": 0,
- "sliderMax": 100,
- "isDiscrete": true,
- "x": 281,
- "y": 226,
- "visible": false
- },
- {
- "target": "Runtime",
- "cmd": "getVar:",
- "param": "heapIdx",
- "color": 15629590,
- "label": "Runtime: heapIdx",
- "mode": 1,
- "sliderMin": 0,
- "sliderMax": 100,
- "isDiscrete": true,
- "x": 294,
- "y": 254,
- "visible": false
- },
- {
- "target": "Runtime",
- "cmd": "getVar:",
- "param": "execIdx",
- "color": 15629590,
- "label": "Runtime: execIdx",
- "mode": 1,
- "sliderMin": 0,
- "sliderMax": 100,
- "isDiscrete": true,
- "x": 294,
- "y": 219,
- "visible": false
- },
- {
- "target": "Garbage",
- "cmd": "getVar:",
- "param": "root",
- "color": 15629590,
- "label": "Garbage: root",
- "mode": 1,
- "sliderMin": 0,
- "sliderMax": 100,
- "isDiscrete": true,
- "x": 183,
- "y": 196,
- "visible": false
- },
- {
- "target": "Garbage",
- "cmd": "getVar:",
- "param": "idx",
- "color": 15629590,
- "label": "Garbage: idx",
- "mode": 1,
- "sliderMin": 0,
- "sliderMax": 100,
- "isDiscrete": true,
- "x": 225,
- "y": 15,
- "visible": false
- },
- {
- "target": "Stage",
- "cmd": "answer",
- "param": null,
- "color": 2926050,
- "label": "answer",
- "mode": 1,
- "sliderMin": 0,
- "sliderMax": 100,
- "isDiscrete": true,
- "x": 247,
- "y": 237,
- "visible": false
- },
- {
- "target": "Editor",
- "cmd": "getVar:",
- "param": "!DrawLow",
- "color": 15629590,
- "label": "Editor: !DrawLow",
- "mode": 1,
- "sliderMin": 0,
- "sliderMax": 100,
- "isDiscrete": true,
- "x": 33,
- "y": 173,
- "visible": false
- },
- {
- "target": "Editor",
- "cmd": "getVar:",
- "param": "!DrawHigh",
- "color": 15629590,
- "label": "Editor: !DrawHigh",
- "mode": 1,
- "sliderMin": 0,
- "sliderMax": 100,
- "isDiscrete": true,
- "x": 157,
- "y": 188,
- "visible": false
- },
- {
- "target": "Runtime",
- "cmd": "getVar:",
- "param": "askYieldHeapIdx",
- "color": 15629590,
- "label": "Runtime: askYieldHeapIdx",
- "mode": 1,
- "sliderMin": 0,
- "sliderMax": 100,
- "isDiscrete": true,
- "x": 239,
- "y": 95,
- "visible": false
- },
- {
- "target": "Runtime",
- "cmd": "getVar:",
- "param": "yieldThread",
- "color": 15629590,
- "label": "Runtime: yieldThread",
- "mode": 1,
- "sliderMin": 0,
- "sliderMax": 100,
- "isDiscrete": true,
- "x": 360,
- "y": 56,
- "visible": false
- },
- {
- "target": "Runtime",
- "cmd": "getVar:",
- "param": "run_dirty",
- "color": 15629590,
- "label": "Runtime: run_dirty",
- "mode": 1,
- "sliderMin": 0,
- "sliderMax": 100,
- "isDiscrete": true,
- "x": 144,
- "y": 321,
- "visible": false
- },
- {
- "target": "Runtime",
- "cmd": "getVar:",
- "param": "listIdx",
- "color": 15629590,
- "label": "Runtime: listIdx",
- "mode": 1,
- "sliderMin": 0,
- "sliderMax": 100,
- "isDiscrete": true,
- "x": 322,
- "y": 105,
- "visible": false
- },
- {
- "target": "Runtime",
- "cmd": "getVar:",
- "param": "tmp",
- "color": 15629590,
- "label": "Runtime: tmp",
- "mode": 1,
- "sliderMin": 0,
- "sliderMax": 100,
- "isDiscrete": true,
- "x": 256,
- "y": 48,
- "visible": false
- },
- {
- "target": "Runtime",
- "cmd": "getVar:",
- "param": "p1",
- "color": 15629590,
- "label": "Runtime: p1",
- "mode": 1,
- "sliderMin": 0,
- "sliderMax": 100,
- "isDiscrete": true,
- "x": 269,
- "y": 266,
- "visible": false
- },
- {
- "target": "Runtime",
- "cmd": "getVar:",
- "param": "p2",
- "color": 15629590,
- "label": "Runtime: p2",
- "mode": 1,
- "sliderMin": 0,
- "sliderMax": 100,
- "isDiscrete": true,
- "x": 322,
- "y": 69,
- "visible": false
- },
- {
- "target": "Editor",
- "cmd": "getVar:",
- "param": "#palette_gap",
- "color": 15629590,
- "label": "Editor: #palette_gap",
- "mode": 1,
- "sliderMin": 0,
- "sliderMax": 100,
- "isDiscrete": true,
- "x": 311,
- "y": 230,
- "visible": false
- },
- {
- "target": "Stage",
- "cmd": "getVar:",
- "param": "#Section",
- "color": 15629590,
- "label": "#Section",
- "mode": 1,
- "sliderMin": 0,
- "sliderMax": 100,
- "isDiscrete": true,
- "x": 17,
- "y": 239,
- "visible": false
- },
- {
- "target": "Runtime",
- "cmd": "getVar:",
- "param": "warpSpeed",
- "color": 15629590,
- "label": "Runtime: warpSpeed",
- "mode": 1,
- "sliderMin": 0,
- "sliderMax": 100,
- "isDiscrete": true,
- "x": 323,
- "y": 172,
- "visible": false
- },
- {
- "target": "Parser",
- "cmd": "getVar:",
- "param": "vi",
- "color": 15629590,
- "label": "Parser: vi",
- "mode": 1,
- "sliderMin": 0,
- "sliderMax": 100,
- "isDiscrete": true,
- "x": 401,
- "y": 288,
- "visible": false
- },
- {
- "target": "Editor",
- "cmd": "getVar:",
- "param": "#ddx",
- "color": 15629590,
- "label": "Editor: #ddx",
- "mode": 1,
- "sliderMin": 0,
- "sliderMax": 100,
- "isDiscrete": true,
- "x": 23,
- "y": 276,
- "visible": false
- },
- {
- "target": "Editor",
- "cmd": "getVar:",
- "param": "#ddy",
- "color": 15629590,
- "label": "Editor: #ddy",
- "mode": 1,
- "sliderMin": 0,
- "sliderMax": 100,
- "isDiscrete": true,
- "x": 315,
- "y": 169,
- "visible": false
- },
- {
- "target": "Editor",
- "cmd": "getVar:",
- "param": "#ddscy",
- "color": 15629590,
- "label": "Editor: #ddscy",
- "mode": 1,
- "sliderMin": 0,
- "sliderMax": 100,
- "isDiscrete": true,
- "x": 299,
- "y": 294,
- "visible": false
- },
- {
- "target": "Editor",
- "cmd": "getVar:",
- "param": "#ddscmax",
- "color": 15629590,
- "label": "Editor: #ddscmax",
- "mode": 1,
- "sliderMin": 0,
- "sliderMax": 100,
- "isDiscrete": true,
- "x": 249,
- "y": 248,
- "visible": false
- },
- {
- "target": "Stage",
- "cmd": "getVar:",
- "param": "#clip_y",
- "color": 15629590,
- "label": "#clip_y",
- "mode": 1,
- "sliderMin": 0,
- "sliderMax": 100,
- "isDiscrete": true,
- "x": 45,
- "y": 148,
- "visible": false
- },
- {
- "target": "Stage",
- "cmd": "getVar:",
- "param": "#clip_y2",
- "color": 15629590,
- "label": "#clip_y2",
- "mode": 1,
- "sliderMin": 0,
- "sliderMax": 100,
- "isDiscrete": true,
- "x": 50,
- "y": 171,
- "visible": false
- },
- {
- "target": "Editor",
- "cmd": "getVar:",
- "param": "SBarY",
- "color": 15629590,
- "label": "Editor: SBarY",
- "mode": 1,
- "sliderMin": 0,
- "sliderMax": 100,
- "isDiscrete": true,
- "x": 176,
- "y": 123,
- "visible": false
- },
- {
- "target": "Editor",
- "cmd": "getVar:",
- "param": "SBarY2",
- "color": 15629590,
- "label": "Editor: SBarY2",
- "mode": 1,
- "sliderMin": 0,
- "sliderMax": 100,
- "isDiscrete": true,
- "x": 335,
- "y": 123,
- "visible": false
- },
- {
- "target": "SaveLoad",
- "cmd": "getVar:",
- "param": "root",
- "color": 15629590,
- "label": "SaveLoad: root",
- "mode": 1,
- "sliderMin": 0,
- "sliderMax": 100,
- "isDiscrete": true,
- "x": 160,
- "y": 299,
- "visible": false
- },
- {
- "target": "SaveLoad",
- "cmd": "getVar:",
- "param": "schema#",
- "color": 15629590,
- "label": "SaveLoad: schema#",
- "mode": 1,
- "sliderMin": 0,
- "sliderMax": 100,
- "isDiscrete": true,
- "x": 29,
- "y": 34,
- "visible": false
- },
- {
- "target": "SaveLoad",
- "cmd": "getVar:",
- "param": "first?",
- "color": 15629590,
- "label": "SaveLoad: first?",
- "mode": 1,
- "sliderMin": 0,
- "sliderMax": 100,
- "isDiscrete": true,
- "x": 136,
- "y": 38,
- "visible": false
- },
- {
- "target": "SaveLoad",
- "cmd": "getVar:",
- "param": "idx",
- "color": 15629590,
- "label": "SaveLoad: idx",
- "mode": 1,
- "sliderMin": 0,
- "sliderMax": 100,
- "isDiscrete": true,
- "x": 343,
- "y": 192,
- "visible": false
- },
- {
- "target": "SaveLoad",
- "cmd": "getVar:",
- "param": "i",
- "color": 15629590,
- "label": "SaveLoad: i",
- "mode": 1,
- "sliderMin": 0,
- "sliderMax": 100,
- "isDiscrete": true,
- "x": 30,
- "y": 90,
- "visible": false
- },
- {
- "target": "SaveLoad",
- "cmd": "getVar:",
- "param": "c",
- "color": 15629590,
- "label": "SaveLoad: c",
- "mode": 1,
- "sliderMin": 0,
- "sliderMax": 100,
- "isDiscrete": true,
- "x": 32,
- "y": 268,
- "visible": false
- },
- {
- "target": "SaveLoad",
- "cmd": "getVar:",
- "param": "JSON",
- "color": 15629590,
- "label": "SaveLoad: JSON",
- "mode": 1,
- "sliderMin": 0,
- "sliderMax": 100,
- "isDiscrete": true,
- "x": 374,
- "y": 195,
- "visible": false
- },
- {
- "target": "SaveLoad",
- "cmd": "getVar:",
- "param": "end",
- "color": 15629590,
- "label": "SaveLoad: end",
- "mode": 1,
- "sliderMin": 0,
- "sliderMax": 100,
- "isDiscrete": true,
- "x": 245,
- "y": 105,
- "visible": false
- },
- {
- "target": "SaveLoad",
- "cmd": "getVar:",
- "param": "tok",
- "color": 15629590,
- "label": "SaveLoad: tok",
- "mode": 2,
- "sliderMin": 0,
- "sliderMax": 100,
- "isDiscrete": true,
- "x": 176,
- "y": 97,
- "visible": false
- },
- {
- "target": "SaveLoad",
- "cmd": "getVar:",
- "param": "prev",
- "color": 15629590,
- "label": "SaveLoad: prev",
- "mode": 1,
- "sliderMin": 0,
- "sliderMax": 100,
- "isDiscrete": true,
- "x": 180,
- "y": 95,
- "visible": false
- },
- {
- "target": "SaveLoad",
- "cmd": "getVar:",
- "param": "name",
- "color": 15629590,
- "label": "SaveLoad: name",
- "mode": 1,
- "sliderMin": 0,
- "sliderMax": 100,
- "isDiscrete": true,
- "x": 259,
- "y": 277,
- "visible": false
- },
- {
- "target": "SaveLoad",
- "cmd": "getVar:",
- "param": "OP",
- "color": 15629590,
- "label": "SaveLoad: OP",
- "mode": 1,
- "sliderMin": 0,
- "sliderMax": 100,
- "isDiscrete": true,
- "x": 104,
- "y": 167,
- "visible": false
- },
- {
- "target": "SaveLoad",
- "cmd": "getVar:",
- "param": "vname",
- "color": 15629590,
- "label": "SaveLoad: vname",
- "mode": 1,
- "sliderMin": 0,
- "sliderMax": 100,
- "isDiscrete": true,
- "x": 56,
- "y": 122,
- "visible": false
- },
- {
- "target": "SaveLoad",
- "cmd": "getVar:",
- "param": "vval",
- "color": 15629590,
- "label": "SaveLoad: vval",
- "mode": 1,
- "sliderMin": 0,
- "sliderMax": 100,
- "isDiscrete": true,
- "x": 250,
- "y": 83,
- "visible": false
- },
- {
- "target": "SaveLoad",
- "cmd": "getVar:",
- "param": "jsonIdx",
- "color": 15629590,
- "label": "SaveLoad: jsonIdx",
- "mode": 1,
- "sliderMin": 0,
- "sliderMax": 100,
- "isDiscrete": true,
- "x": 4,
- "y": 6,
- "visible": false
- },
- {
- "target": "Runtime",
- "cmd": "getVar:",
- "param": "Last List",
- "color": 15629590,
- "label": "Runtime: Last List",
- "mode": 1,
- "sliderMin": 0,
- "sliderMax": 100,
- "isDiscrete": true,
- "x": 300,
- "y": 185,
- "visible": false
- },
- {
- "target": "Runtime",
- "cmd": "getVar:",
- "param": "Last Var",
- "color": 15629590,
- "label": "Runtime: Last Var",
- "mode": 1,
- "sliderMin": 0,
- "sliderMax": 100,
- "isDiscrete": true,
- "x": 353,
- "y": 232,
- "visible": false
- },
- {
- "target": "Runtime",
- "cmd": "getVar:",
- "param": "#ANSWER",
- "color": 15629590,
- "label": "Runtime: #ANSWER",
- "mode": 1,
- "sliderMin": 0,
- "sliderMax": 100,
- "isDiscrete": true,
- "x": 248,
- "y": 93,
- "visible": false
- },
- {
- "target": "Runtime",
- "cmd": "getVar:",
- "param": "wasActive",
- "color": 15629590,
- "label": "Runtime: wasActive",
- "mode": 1,
- "sliderMin": 0,
- "sliderMax": 100,
- "isDiscrete": true,
- "x": 16,
- "y": 147,
- "visible": false
- },
- {
- "target": "Editor",
- "cmd": "getVar:",
- "param": "Last Event",
- "color": 15629590,
- "label": "Editor: Last Event",
- "mode": 1,
- "sliderMin": 0,
- "sliderMax": 100,
- "isDiscrete": true,
- "x": 101,
- "y": 201,
- "visible": false
- },
- {
- "target": "Runtime",
- "cmd": "getVar:",
- "param": "#TimerRoot",
- "color": 15629590,
- "label": "Runtime: #TimerRoot",
- "mode": 1,
- "sliderMin": 0,
- "sliderMax": 100,
- "isDiscrete": true,
- "x": 274,
- "y": 193,
- "visible": false
- },
- {
- "target": "Runtime",
- "cmd": "getVar:",
- "param": "newThreadTimeout",
- "color": 15629590,
- "label": "Runtime: newThreadTimeout",
- "mode": 2,
- "sliderMin": 0,
- "sliderMax": 100,
- "isDiscrete": true,
- "x": 396,
- "y": 15,
- "visible": false
- },
- {
- "target": "Runtime",
- "cmd": "getVar:",
- "param": "penSize",
- "color": 15629590,
- "label": "Runtime: penSize",
- "mode": 1,
- "sliderMin": 0,
- "sliderMax": 100,
- "isDiscrete": true,
- "x": 64,
- "y": 86,
- "visible": false
- },
- {
- "target": "Editor",
- "cmd": "getVar:",
- "param": "#SideBarOpen",
- "color": 15629590,
- "label": "Editor: #SideBarOpen",
- "mode": 1,
- "sliderMin": 0,
- "sliderMax": 100,
- "isDiscrete": true,
- "x": 309,
- "y": 190,
- "visible": false
- },
- {
- "objName": "font",
- "variables": [{
- "name": "◻",
- "value": "57015101510151070",
- "isPersistent": false
- },
- {
- "name": "a",
- "value": "505100211111002111110021111100340",
- "isPersistent": false
- },
- {
- "name": "b",
- "value": "5700312100213100213100330",
- "isPersistent": false
- },
- {
- "name": "c",
- "value": "50330021310021310021310021310",
- "isPersistent": false
- },
- {
- "name": "d",
- "value": "5033002131002131003121070",
- "isPersistent": false
- },
- {
- "name": "e",
- "value": "503300211111002111110021111100320",
- "isPersistent": false
- },
- {
- "name": "f",
- "value": "40310016012101210",
- "isPersistent": false
- },
- {
- "name": "g",
- "value": "503300213111002131110031211100260",
- "isPersistent": false
- },
- {
- "name": "h",
- "value": "5700310021002100340",
- "isPersistent": false
- },
- {
- "name": "i",
- "value": "11150",
- "isPersistent": false
- },
- {
- "name": "j",
- "value": "30810116000",
- "isPersistent": false
- },
- {
- "name": "k",
- "value": "4700410031110021310",
- "isPersistent": false
- },
- {
- "name": "l",
- "value": "300600610",
- "isPersistent": false
- },
- {
- "name": "m",
- "value": "502500210034002100340",
- "isPersistent": false
- },
- {
- "name": "n",
- "value": "502500310021002100340",
- "isPersistent": false
- },
- {
- "name": "o",
- "value": "503300213100213100213100330",
- "isPersistent": false
- },
- {
- "name": "p",
- "value": "502700312100213100213100330",
- "isPersistent": false
- },
- {
- "name": "q",
- "value": "503300213100213100312100270",
- "isPersistent": false
- },
- {
- "name": "r",
- "value": "40250031002100210",
- "isPersistent": false
- },
- {
- "name": "s",
- "value": "5031210021111100211111002111110021210",
- "isPersistent": false
- },
- {
- "name": "t",
- "value": "4021060021310021310",
- "isPersistent": false
- },
- {
- "name": "u",
- "value": "502400610061005100250",
- "isPersistent": false
- },
- {
- "name": "v",
- "value": "502300510061005100230",
- "isPersistent": false
- },
- {
- "name": "w",
- "value": "502300520032005200230",
- "isPersistent": false
- },
- {
- "name": "x",
- "value": "50213100311100410031110021310",
- "isPersistent": false
- },
- {
- "name": "y",
- "value": "5023310051110061005100230",
- "isPersistent": false
- },
- {
- "name": "z",
- "value": "502131002122002111110022210021310",
- "isPersistent": false
- },
- {
- "name": "0",
- "value": "501501510151015100150",
- "isPersistent": false
- },
- {
- "name": "1",
- "value": "50001141070061000",
- "isPersistent": false
- },
- {
- "name": "2",
- "value": "5011320131110121210121210012310",
- "isPersistent": false
- },
- {
- "name": "3",
- "value": "50113101510121210121210012120",
- "isPersistent": false
- },
- {
- "name": "4",
- "value": "50320021110011210131070",
- "isPersistent": false
- },
- {
- "name": "5",
- "value": "541101212101212101212101320",
- "isPersistent": false
- },
- {
- "name": "6",
- "value": "50150121210121210121210011220",
- "isPersistent": false
- },
- {
- "name": "7",
- "value": "510101330112020",
- "isPersistent": false
- },
- {
- "name": "8",
- "value": "5012120121210121210121210012120",
- "isPersistent": false
- },
- {
- "name": "9",
- "value": "50122101212101212101212100150",
- "isPersistent": false
- },
- {
- "name": "!",
- "value": "5000051100000",
- "isPersistent": false
- },
- {
- "name": "@",
- "value": "502400114100111211001112110023110",
- "isPersistent": false
- },
- {
- "name": "#",
- "value": "502111001500211100150021110",
- "isPersistent": false
- },
- {
- "name": "$",
- "value": "5021210011111107001111110011210",
- "isPersistent": false
- },
- {
- "name": "%",
- "value": "5011310041003100210011310",
- "isPersistent": false
- },
- {
- "name": "^",
- "value": "50002100110021000",
- "isPersistent": false
- },
- {
- "name": "&",
- "value": "500012120121210012130041110",
- "isPersistent": false
- },
- {
- "name": "*",
- "value": "51111100130500130111110",
- "isPersistent": false
- },
- {
- "name": "(",
- "value": "5023001131015100000",
- "isPersistent": false
- },
- {
- "name": ")",
- "value": "5000015100113100230",
- "isPersistent": false
- },
- {
- "name": "-",
- "value": "503100310031003100310",
- "isPersistent": false
- },
- {
- "name": "+",
- "value": "503100310015003100310",
- "isPersistent": false
- },
- {
- "name": "=",
- "value": "5021110021110021110021110021110",
- "isPersistent": false
- },
- {
- "name": "_",
- "value": "506100610061006100610",
- "isPersistent": false
- },
- {
- "name": "[",
- "value": "500701510151000",
- "isPersistent": false
- },
- {
- "name": "]",
- "value": "500151015107000",
- "isPersistent": false
- },
- {
- "name": "\"",
- "value": "50020002000",
- "isPersistent": false
- },
- {
- "name": "'",
- "value": "5000001202000",
- "isPersistent": false
- },
- {
- "name": ".",
- "value": "300061000",
- "isPersistent": false
- },
- {
- "name": "\/",
- "value": "505100410031002100110",
- "isPersistent": false
- },
- {
- "name": "?",
- "value": "501101013111012100120",
- "isPersistent": false
- },
- {
- "name": ":",
- "value": "500000211100000",
- "isPersistent": false
- },
- {
- "name": ",",
- "value": "500000610051000",
- "isPersistent": false
- },
- {
- "name": "A",
- "value": "5025001121013100112100250",
- "isPersistent": false
- },
- {
- "name": "B",
- "value": "570121210121210121210012120",
- "isPersistent": false
- },
- {
- "name": "C",
- "value": "50150151015101510011310",
- "isPersistent": false
- },
- {
- "name": "D",
- "value": "5701510151015100150",
- "isPersistent": false
- },
- {
- "name": "E",
- "value": "5701212101212101212101510",
- "isPersistent": false
- },
- {
- "name": "F",
- "value": "57012101210121010",
- "isPersistent": false
- },
- {
- "name": "G",
- "value": "5015015101510121210011130",
- "isPersistent": false
- },
- {
- "name": "H",
- "value": "57003100310031070",
- "isPersistent": false
- },
- {
- "name": "I",
- "value": "5151015107015101510",
- "isPersistent": false
- },
- {
- "name": "J",
- "value": "5051006100610061060",
- "isPersistent": false
- },
- {
- "name": "K",
- "value": "570031003100211102320",
- "isPersistent": false
- },
- {
- "name": "L",
- "value": "5700610061006100610",
- "isPersistent": false
- },
- {
- "name": "M",
- "value": "57001100210011070",
- "isPersistent": false
- },
- {
- "name": "N",
- "value": "57002100310041070",
- "isPersistent": false
- },
- {
- "name": "O",
- "value": "501501510151015100150",
- "isPersistent": false
- },
- {
- "name": "P",
- "value": "5701210121012100120",
- "isPersistent": false
- },
- {
- "name": "Q",
- "value": "50150151015101410014110",
- "isPersistent": false
- },
- {
- "name": "R",
- "value": "570121012101210012130",
- "isPersistent": false
- },
- {
- "name": "S",
- "value": "5012210121210121210121210011220",
- "isPersistent": false
- },
- {
- "name": "T",
- "value": "51010701010",
- "isPersistent": false
- },
- {
- "name": "U",
- "value": "56006100610061060",
- "isPersistent": false
- },
- {
- "name": "V",
- "value": "55005100610051050",
- "isPersistent": false
- },
- {
- "name": "W",
- "value": "57005100410051070",
- "isPersistent": false
- },
- {
- "name": "X",
- "value": "5232002111003100211102320",
- "isPersistent": false
- },
- {
- "name": "Y",
- "value": "52002100340021020",
- "isPersistent": false
- },
- {
- "name": "Z",
- "value": "514201311101212101113102410",
- "isPersistent": false
- },
- {
- "name": "<",
- "value": "403100211100113101510",
- "isPersistent": false
- },
- {
- "name": ">",
- "value": "415100113100211100310",
- "isPersistent": false
- }],
- "costumes": [{
- "costumeName": "costume1",
- "baseLayerID": 2,
- "baseLayerMD5": "d36f6603ec293d2c2198d3ea05109fe0.png",
- "bitmapResolution": 2,
- "rotationCenterX": 0,
- "rotationCenterY": 0
- }],
- "currentCostumeIndex": 0,
- "scratchX": -116.5,
- "scratchY": 165,
- "scale": 1,
- "direction": 90,
- "rotationStyle": "none",
- "isDraggable": false,
- "indexInLibrary": 7,
- "visible": false,
- "spriteInfo": {
- }
- },
- {
- "listName": "Colors",
- "contents": ["0x6380da",
- "0x4a6cd4",
- "0x344d97",
- "0x9a6ddc",
- "0x8a55d7",
- "0x623c99",
- "0xc45ccb",
- "0xbb42c3",
- "0xbb42c3",
- "0x30a880",
- "0x0e9a6c",
- "0x0a6e4d",
- "0xf08f36",
- "0xee7d16",
- "0xaa590f",
- "0xcf944d",
- "0xc88330",
- "0x8e5d22",
- "0xe5b53a",
- "0xe1a91a",
- "0xa07812",
- "0x49b1e6",
- "0x2ca5e2",
- "0x1f75a1",
- "0x73c133",
- "0x5cb712",
- "0x41820c",
- "0x794aa7",
- "0x632d99",
- "0x46206d",
- "0xddac94",
- "0xcc5b22",
- "0x854322",
- "0xaaaaaa",
- "0xeeeeee",
- "0xaaaaaa",
- "0x777777",
- "0x555555",
- "0x222222"],
- "isPersistent": false,
- "x": 199,
- "y": 69,
- "width": 274,
- "height": 284,
- "visible": false
- },
- {
- "listName": "Stack",
- "contents": [1729,
- "9",
- 805,
- "6",
- 793,
- "9",
- 733,
- "9",
- 1165,
- "9",
- 1453,
- "9",
- 1405,
- "9",
- 1333,
- "9",
- 1285,
- "9",
- 1141,
- "9",
- 1057,
- "9",
- 397,
- "9",
- 337,
- "9",
- 169],
- "isPersistent": false,
- "x": 347,
- "y": 12,
- "width": 371,
- "height": 463,
- "visible": false
- },
- {
- "listName": "KeyList",
- "contents": ["space",
- "up arrow",
- "down arrow",
- "right arrow",
- "left arrow",
- "any",
- "a",
- "b",
- "c",
- "d",
- "e",
- "f",
- "g",
- "h",
- "i",
- "j",
- "k",
- "l",
- "m",
- "n",
- "o",
- "p",
- "q",
- "r",
- "s",
- "t",
- "u",
- "v",
- "w",
- "x",
- "y",
- "z",
- "0",
- "1",
- "2",
- "3",
- "4",
- "5",
- "6",
- "7",
- "8",
- "9"],
- "isPersistent": false,
- "x": 247,
- "y": 53,
- "width": 190,
- "height": 290,
- "visible": false
- },
- {
- "listName": "Example Projects",
- "contents": ["100% Scrollinig Pen Game (by @DarkLava)",
- "{\"objName\":\"Stage\", \"children\": [{\"objName\":\"project\" ,\"variables\":[ {\"name\": \"ScrollX\" , \"value\": \"10\" , \"isPersistent\":false} , {\"name\": \"ScrollY\" , \"value\": \"80\" , \"isPersistent\":false} , {\"name\": \"X\" , \"value\": \"8\" , \"isPersistent\":false} , {\"name\": \"Y\" , \"value\": \"11\" , \"isPersistent\":false} ] ,\"scripts\":[ [ 26 , 1513 , [ [\"whenGreenFlag\" ] , [\"doForever\" ,[ [\"doWaitUntil\" , [\"keyPressed:\" , \"up arrow\" ] ] , [\"setVar:to:\" , \"Y\" , \"-10\" ] , [\"doRepeat\" , \"21\" ,[ [\"changeVar:by:\" , \"ScrollY\" , [\"readVariable\" , \"Y\" ] ] , [\"changeVar:by:\" , \"Y\" , \"1\" ] , [\"wait:elapsed:from:\" , \"0\" ] ] ] ] ] ]] , [ 26 , 24 , [ [\"whenGreenFlag\" ] , [\"setVar:to:\" , \"ScrollX\" , \"0\" ] , [\"setVar:to:\" , \"ScrollY\" , \"80\" ] , [\"setVar:to:\" , \"X\" , \"-600\" ] , [\"deleteLine:ofList:\" , \"all\" , \"X\" ] , [\"deleteLine:ofList:\" , \"all\" , \"Colour\" ] , [\"doRepeat\" , \"8\" ,[ [\"changeVar:by:\" , \"X\" , [\"randomFrom:to:\" , \"90\" , \"160\" ] ] , [\"append:toList:\" , [\"readVariable\" , \"X\" ] , \"X\" ] , [\"append:toList:\" , [\"randomFrom:to:\" , \"0\" , \"35\" ] , \"Colour\" ] ] ] , [\"hide\" ] , [\"doForever\" ,[ [\"clearPenTrails\" ] , [\"putPenUp\" ] , [\"warpSpeed\" ,[ [\"putPenDown\" ] , [\"setPenHueTo:\" , \"111\" ] , [\"setPenShadeTo:\" , \"70\" ] , [\"penSize:\" , \"300\" ] , [\"gotoX:y:\" , \"140\" , \"100\" ] , [\"gotoX:y:\" , \"140\" , \"-100\" ] , [\"gotoX:y:\" , \"-140\" , \"-100\" ] , [\"gotoX:y:\" , \"-140\" , \"100\" ] , [\"gotoX:y:\" , \"140\" , \"100\" ] , [\"gotoX:y:\" , \"0\" , \"0\" ] , [\"setPenShadeTo:\" , \"50\" ] , [\"putPenUp\" ] , [\"setPenHueTo:\" , \"30\" ] , [\"setPenShadeTo:\" , \"25\" ] , [\"penSize:\" , \"100\" ] , [\"gotoX:y:\" , [\"+\" , [\"readVariable\" , \"ScrollX\" ] , \"-10000\" ] , [\"+\" , [\"readVariable\" , \"ScrollY\" ] , \"-175\" ] ] , [\"putPenDown\" ] , [\"gotoX:y:\" , [\"+\" , [\"readVariable\" , \"ScrollX\" ] , \"10000\" ] , [\"+\" , [\"readVariable\" , \"ScrollY\" ] , \"-175\" ] ] , [\"gotoX:y:\" , [\"+\" , [\"readVariable\" , \"ScrollX\" ] , \"10000\" ] , [\"+\" , [\"readVariable\" , \"ScrollY\" ] , \"-225\" ] ] , [\"gotoX:y:\" , [\"+\" , [\"readVariable\" , \"ScrollX\" ] , \"-10000\" ] , [\"+\" , [\"readVariable\" , \"ScrollY\" ] , \"-225\" ] ] , [\"setVar:to:\" , \"X\" , \"0\" ] , [\"putPenUp\" ] , [\"setPenHueTo:\" , \"70\" ] , [\"penSize:\" , \"50\" ] , [\"gotoX:y:\" , [\"+\" , [\"readVariable\" , \"ScrollX\" ] , \"-10000\" ] , [\"+\" , [\"readVariable\" , \"ScrollY\" ] , \"-125\" ] ] , [\"putPenDown\" ] , [\"gotoX:y:\" , [\"+\" , [\"readVariable\" , \"ScrollX\" ] , \"10000\" ] , [\"+\" , [\"readVariable\" , \"ScrollY\" ] , \"-125\" ] ] , [\"putPenUp\" ] , [\"setVar:to:\" , \"X\" , \"0\" ] , [\"doRepeat\" , \"8\" ,[ [\"penSize:\" , \"5\" ] , [\"changeVar:by:\" , \"X\" , \"1\" ] , [\"gotoX:y:\" , [\"+\" , [\"readVariable\" , \"ScrollX\" ] , [\"getLine:ofList:\" , [\"readVariable\" , \"X\" ] , \"X\" ] ] , [\"+\" , [\"readVariable\" , \"ScrollY\" ] , \"-100\" ] ] , [\"putPenDown\" ] , [\"setPenHueTo:\" , \"65\" ] , [\"setPenShadeTo:\" , \"30\" ] , [\"ypos:\" , [\"+\" , [\"readVariable\" , \"ScrollY\" ] , \"-70\" ] ] , [\"setPenShadeTo:\" , \"50\" ] , [\"penSize:\" , \"20\" ] , [\"setPenHueTo:\" , [\"getLine:ofList:\" , [\"readVariable\" , \"X\" ] , \"Colour\" ] ] , [\"ypos:\" , [\"+\" , [\"readVariable\" , \"ScrollY\" ] , \"-71\" ] ] , [\"putPenUp\" ] ] ] , [\"setPenHueTo:\" , \"111\" ] , [\"penSize:\" , \"10\" ] , [\"setPenShadeTo:\" , \"40\" ] , [\"gotoX:y:\" , \"-15\" , \"-15\" ] , [\"putPenDown\" ] , [\"gotoX:y:\" , \"-15\" , \"15\" ] , [\"gotoX:y:\" , \"15\" , \"15\" ] , [\"gotoX:y:\" , \"15\" , \"-15\" ] , [\"gotoX:y:\" , \"-15\" , \"-15\" ] , [\"gotoX:y:\" , \"0\" , \"0\" ] , [\"penSize:\" , \"38\" ] , [\"gotoX:y:\" , \"1\" , \"0\" ] , [\"doIf\" , [\"keyPressed:\" , \"right arrow\" ] ,[ [\"changeVar:by:\" , \"ScrollX\" , \"-5\" ] ] ] , [\"doIf\" , [\"keyPressed:\" , \"left arrow\" ] ,[ [\"changeVar:by:\" , \"ScrollX\" , \"5\" ] ] ] ] ] ] ] ]] ] }],\"info\":{} }",
- "Funky Wave (by @MousieGamesTest)",
- "{\"objName\":\"Stage\", \"children\": [{\"objName\":\"project\" ,\"variables\":[ {\"name\": \"number\" , \"value\": \"740\" , \"isPersistent\":false} ] ,\"scripts\":[ [ 27 , 34 , [ [\"whenGreenFlag\" ] , [\"hide\" ] , [\"setVar:to:\" , \"number\" , \"0\" ] , [\"gotoX:y:\" , \"-105\" , \"0\" ] , [\"putPenUp\" ] , [\"doForever\" ,[ [\"warpSpeed\" ,[ [\"clearPenTrails\" ] , [\"setPenShadeTo:\" , \"99999\" ] , [\"penSize:\" , \"90\" ] , [\"putPenUp\" ] , [\"gotoX:y:\" , \"-240\" , \"180\" ] , [\"putPenDown\" ] , [\"doRepeat\" , \"4\" ,[ [\"xpos:\" , \"240\" ] , [\"changeYposBy:\" , \"-90\" ] , [\"xpos:\" , \"-240\" ] ] ] , [\"setPenShadeTo:\" , \"50\" ] , [\"putPenUp\" ] , [\"gotoX:y:\" , \"-105\" , \"0\" ] , [\"doRepeat\" , \"15\" ,[ [\"putPenUp\" ] , [\"changePenHueBy:\" , \"1\" ] , [\"penSize:\" , \"3\" ] , [\"changeXposBy:\" , \"15\" ] , [\"ypos:\" , \"0\" ] , [\"putPenDown\" ] , [\"ypos:\" , [\"*\" , [\"computeFunction:of:\" , \"sin\" , [\"+\" , [\"*\" , [\"xpos\" ] , \"2\" ] , [\"readVariable\" , \"number\" ] ] ] , \"40\" ] ] ] ] ] ] , [\"changeVar:by:\" , \"number\" , \"10\" ] ] ] ]] ] }],\"info\":{} }",
- "Terdragon Curve (by @Lataliat)",
- "{\"objName\":\"Stage\", \"children\": [{\"objName\":\"project\" ,\"variables\":[ {\"name\": \"var\" , \"value\": \"3465\" , \"isPersistent\":false} ] ,\"scripts\":[ [ 34 , 43 , [ [\"whenGreenFlag\" ] , [\"show\" ] , [\"say:\" , \"Please wait...\" ] , [\"warpSpeed\" ,[ [\"deleteLine:ofList:\" , \"all\" , \"list\" ] , [\"deleteLine:ofList:\" , \"all\" , \"list2\" ] , [\"append:toList:\" , \"F\" , \"list\" ] , [\"doRepeat\" , \"7\" ,[ [\"setVar:to:\" , \"var\" , \"1\" ] , [\"doRepeat\" , [\"lineCountOfList:\" , \"list\" ] ,[ [\"doIf\" , [\"=\" , [\"getLine:ofList:\" , [\"readVariable\" , \"var\" ] , \"list\" ] , \"F\" ] ,[ [\"append:toList:\" , \"F\" , \"list2\" ] , [\"append:toList:\" , \"-\" , \"list2\" ] , [\"append:toList:\" , \"F\" , \"list2\" ] , [\"append:toList:\" , \"+\" , \"list2\" ] , [\"append:toList:\" , \"F\" , \"list2\" ] ] ] , [\"doIf\" , [\"=\" , [\"getLine:ofList:\" , [\"readVariable\" , \"var\" ] , \"list\" ] , \"-\" ] ,[ [\"append:toList:\" , \"-\" , \"list2\" ] ] ] , [\"doIf\" , [\"=\" , [\"getLine:ofList:\" , [\"readVariable\" , \"var\" ] , \"list\" ] , \"+\" ] ,[ [\"append:toList:\" , \"+\" , \"list2\" ] ] ] , [\"changeVar:by:\" , \"var\" , \"1\" ] ] ] , [\"deleteLine:ofList:\" , \"all\" , \"list\" ] , [\"setVar:to:\" , \"var\" , \"1\" ] , [\"doRepeat\" , [\"lineCountOfList:\" , \"list2\" ] ,[ [\"append:toList:\" , [\"getLine:ofList:\" , [\"readVariable\" , \"var\" ] , \"list2\" ] , \"list\" ] , [\"changeVar:by:\" , \"var\" , \"1\" ] ] ] , [\"deleteLine:ofList:\" , \"all\" , \"list2\" ] ] ] ] ] , [\"say:\" , \"\" ] , [\"hide\" ] , [\"broadcast:\" , \"message1\" ] ]] , [ 34 , 728 , [ [\"whenIReceive\" , \"message1\" ] , [\"clearPenTrails\" ] , [\"putPenUp\" ] , [\"gotoX:y:\" , \"-125\" , \"-80\" ] , [\"heading:\" , \"270\" ] , [\"setVar:to:\" , \"var\" , \"1\" ] , [\"setPenHueTo:\" , \"0\" ] , [\"penSize:\" , \"3\" ] , [\"putPenDown\" ] , [\"warpSpeed\" ,[ [\"doRepeat\" , [\"lineCountOfList:\" , \"list\" ] ,[ [\"doIf\" , [\"=\" , [\"getLine:ofList:\" , [\"readVariable\" , \"var\" ] , \"list\" ] , \"F\" ] ,[ [\"forward:\" , \"6\" ] ] ] , [\"doIf\" , [\"=\" , [\"getLine:ofList:\" , [\"readVariable\" , \"var\" ] , \"list\" ] , \"+\" ] ,[ [\"turnLeft:\" , \"120\" ] ] ] , [\"doIf\" , [\"=\" , [\"getLine:ofList:\" , [\"readVariable\" , \"var\" ] , \"list\" ] , \"-\" ] ,[ [\"turnRight:\" , \"120\" ] ] ] , [\"changePenHueBy:\" , [\"\/\" , \"200\" , [\"lineCountOfList:\" , \"list\" ] ] ] , [\"changeVar:by:\" , \"var\" , \"1\" ] ] ] , [\"putPenUp\" ] , [\"heading:\" , \"90\" ] , [\"gotoX:y:\" , \"150\" , \"-80\" ] , [\"show\" ] ] ] , [\"doWaitUntil\" , [\"keyPressed:\" , \"any\" ] ] ]] ] }],\"info\":{} }",
- "Pen Loading Animation (by @Sheep_maker)",
- "{\"objName\":\"Stage\", \"children\": [{\"objName\":\"project\" ,\"variables\":[ {\"name\": \"i\" , \"value\": \"-264\" , \"isPersistent\":false} , {\"name\": \"hi\" , \"value\": \"261.5932025834277\" , \"isPersistent\":false} ] ,\"scripts\":[ [ 21 , 20 , [ [\"whenGreenFlag\" ] , [\"penColor:\" , \"0xE91E63\" ] , [\"penSize:\" , \"20\" ] , [\"hide\" ] , [\"doForever\" ,[ [\"setVar:to:\" , \"hi\" , \"0\" ] , [\"doUntil\" , [\">\" , [\"readVariable\" , \"hi\" ] , \"350\" ] ,[ [\"deleteLine:ofList:\" , \"all\" , \"circleParams\" ] , [\"append:toList:\" , [\"\/\" , [\"readVariable\" , \"hi\" ] , \"4\" ] , \"circleParams\" ] , [\"append:toList:\" , \"8\" , \"circleParams\" ] , [\"doBroadcastAndWait\" , \"createCircle\" ] , [\"changeVar:by:\" , \"hi\" , [\"\/\" , [\"-\" , \"360\" , [\"readVariable\" , \"hi\" ] ] , \"5\" ] ] ] ] , [\"setVar:to:\" , \"hi\" , \"360\" ] , [\"doUntil\" , [\"<\" , [\"readVariable\" , \"hi\" ] , \"0\" ] ,[ [\"deleteLine:ofList:\" , \"all\" , \"circleParams\" ] , [\"append:toList:\" , [\"\/\" , [\"readVariable\" , \"hi\" ] , \"4\" ] , \"circleParams\" ] , [\"append:toList:\" , \"-8\" , \"circleParams\" ] , [\"doBroadcastAndWait\" , \"createCircle\" ] , [\"changeVar:by:\" , \"hi\" , [\"\/\" , [\"-\" , [\"readVariable\" , \"hi\" ] , \"360.5\" ] , \"5\" ] ] ] ] ] ] ]] , [ 26 , 504 , [ [\"whenIReceive\" , \"createCircle\" ] , [\"warpSpeed\" ,[ [\"clearPenTrails\" ] , [\"setVar:to:\" , \"i\" , \"0\" ] , [\"gotoX:y:\" , [\"*\" , [\"computeFunction:of:\" , \"sin\" , [\"readVariable\" , \"i\" ] ] , \"100\" ] , [\"*\" , [\"computeFunction:of:\" , \"cos\" , [\"readVariable\" , \"i\" ] ] , \"100\" ] ] , [\"putPenDown\" ] , [\"doRepeat\" , [\"rounded\" , [\"\/\" , [\"getLine:ofList:\" , \"1\" , \"circleParams\" ] , \"2\" ] ] ,[ [\"changeVar:by:\" , \"i\" , [\"getLine:ofList:\" , \"2\" , \"circleParams\" ] ] , [\"gotoX:y:\" , [\"*\" , [\"computeFunction:of:\" , \"sin\" , [\"readVariable\" , \"i\" ] ] , \"100\" ] , [\"*\" , [\"computeFunction:of:\" , \"cos\" , [\"readVariable\" , \"i\" ] ] , \"100\" ] ] ] ] , [\"putPenUp\" ] ] ] ]] ] }],\"info\":{} }",
- "Random Spirals (by @Scratch-Minion)",
- "{\"objName\":\"Stage\", \"children\": [{\"objName\":\"project\" ,\"variables\":[ {\"name\": \"ScrollX\" , \"value\": \"0\" , \"isPersistent\":false} , {\"name\": \"ScrollY\" , \"value\": \"80\" , \"isPersistent\":false} , {\"name\": \"X\" , \"value\": \"8\" , \"isPersistent\":false} , {\"name\": \"Y\" , \"value\": \"11\" , \"isPersistent\":false} , {\"name\": \"Turn Angle\" , \"value\": \"37\" , \"isPersistent\":false} , {\"name\": \"n\" , \"value\": \"0.1\" , \"isPersistent\":false} , {\"name\": \"Num Colours\" , \"value\": \"13\" , \"isPersistent\":false} , {\"name\": \"Line Length\" , \"value\": \"116.09999999999768\" , \"isPersistent\":false} , {\"name\": \"Pen Colour Change\" , \"value\": \"15.384615384615385\" , \"isPersistent\":false} ] ,\"scripts\":[ [ 26 , 1513 , [ [\"whenGreenFlag\" ] , [\"doForever\" ,[ [\"doWaitUntil\" , [\"keyPressed:\" , \"up arrow\" ] ] , [\"setVar:to:\" , \"Y\" , \"-10\" ] , [\"doRepeat\" , \"21\" ,[ [\"changeVar:by:\" , \"ScrollY\" , [\"readVariable\" , \"Y\" ] ] , [\"changeVar:by:\" , \"Y\" , \"1\" ] , [\"wait:elapsed:from:\" , \"0\" ] ] ] ] ] ]] , [ 26 , 24 , [ [\"whenGreenFlag\" ] , [\"penSize:\" , \"2\" ] , [\"hide\" ] , [\"doForever\" ,[ [\"warpSpeed\" ,[ [\"setVar:to:\" , \"Turn Angle\" , [\"randomFrom:to:\" , \"10\" , \"180\" ] ] , [\"setVar:to:\" , \"n\" , [\"\/\" , [\"randomFrom:to:\" , \"1\" , \"60\" ] , \"10\" ] ] , [\"setVar:to:\" , \"Num Colours\" , [\"randomFrom:to:\" , \"1\" , \"200\" ] ] , [\"setVar:to:\" , \"Pen Colour Change\" , [\"\/\" , \"200\" , [\"readVariable\" , \"Num Colours\" ] ] ] , [\"putPenUp\" ] , [\"clearPenTrails\" ] , [\"heading:\" , \"0\" ] , [\"gotoX:y:\" , \"0\" , \"0\" ] , [\"putPenDown\" ] , [\"setVar:to:\" , \"Line Length\" , \"1\" ] , [\"doUntil\" , [\">\" , [\"ypos\" ] , \"179\" ] ,[ [\"changePenHueBy:\" , [\"readVariable\" , \"Pen Colour Change\" ] ] , [\"forward:\" , [\"readVariable\" , \"Line Length\" ] ] , [\"turnLeft:\" , [\"readVariable\" , \"Turn Angle\" ] ] , [\"changeVar:by:\" , \"Line Length\" , [\"readVariable\" , \"n\" ] ] ] ] ] ] , [\"wait:elapsed:from:\" , \"1.5\" ] ] ] ]] ] }],\"info\":{} }",
- "New Scratch Blocks (by @griffpatch)",
- "{\"objName\":\"Stage\", \"children\": [{\"objName\":\"project\" ,\"variables\":[ {\"name\": \"ang\" , \"value\": \"538010\" , \"isPersistent\":false} , {\"name\": \"h\" , \"value\": \"151.45159937162072\" , \"isPersistent\":false} , {\"name\": \"message\" , \"value\": \"\\\"pen up and fill\\\" - Fills the last shape drawn with the pen\" , \"isPersistent\":false} , {\"name\": \"y\" , \"value\": \"0\" , \"isPersistent\":false} , {\"name\": \"sy\" , \"value\": \"0.2857142857142857\" , \"isPersistent\":false} ] ,\"scripts\":[ [ 27 , 33 , [ [\"whenGreenFlag\" ] , [\"doForever\" ,[ [\"setVar:to:\" , \"message\" , \"This project is using 3 newly imagined Scratch Blocks\" ] , [\"wait:elapsed:from:\" , \"5\" ] , [\"setVar:to:\" , \"message\" , \"\\\"pen up and fill\\\" - Fills the last shape drawn with the pen\" ] , [\"wait:elapsed:from:\" , \"5\" ] , [\"setVar:to:\" , \"message\" , \"\\\"write [Hello World]\\\" - Writes text to the pen canvas\" ] , [\"wait:elapsed:from:\" , \"5\" ] , [\"setVar:to:\" , \"message\" , \"\\\"width of [Hello World]\\\" - reports the width of the text\" ] , [\"wait:elapsed:from:\" , \"5\" ] ] ] ]] , [ 29 , 385 , [ [\"whenGreenFlag\" ] , [\"hide\" ] , [\"penSize:\" , \"4\" ] , [\"setVar:to:\" , \"ang\" , \"0\" ] , [\"doForever\" ,[ [\"warpSpeed\" ,[ [\"changeVar:by:\" , \"ang\" , \"5\" ] , [\"clearPenTrails\" ] , [\"changePenHueBy:\" , \"2\" ] , [\"setVar:to:\" , \"h\" , [\"+\" , \"100\" , [\"*\" , \"60\" , [\"computeFunction:of:\" , \"sin\" , [\"*\" , [\"timer\" ] , \"360\" ] ] ] ] ] , [\"gotoX:y:\" , [\"*\" , \"200\" , [\"computeFunction:of:\" , \"sin\" , [\"readVariable\" , \"ang\" ] ] ] , [\"*\" , [\"readVariable\" , \"h\" ] , [\"computeFunction:of:\" , \"cos\" , [\"readVariable\" , \"ang\" ] ] ] ] , [\"putPenDown\" ] , [\"doRepeat\" , \"5\" ,[ [\"changeVar:by:\" , \"ang\" , [\"\/\" , \"360\" , \"5\" ] ] , [\"gotoX:y:\" , [\"*\" , \"200\" , [\"computeFunction:of:\" , \"sin\" , [\"readVariable\" , \"ang\" ] ] ] , [\"*\" , [\"readVariable\" , \"h\" ] , [\"computeFunction:of:\" , \"cos\" , [\"readVariable\" , \"ang\" ] ] ] ] ] ] , [\"stampPolygon\" ] , [\"changePenHueBy:\" , \"100\" ] , [\"changeVar:by:\" , \"sy\" , \"-1\" ] , [\"changeVar:by:\" , \"y\" , [\"readVariable\" , \"sy\" ] ] , [\"doIf\" , [\"<\" , [\"readVariable\" , \"y\" ] , \"0\" ] ,[ [\"setVar:to:\" , \"y\" , \"0\" ] , [\"setVar:to:\" , \"sy\" , [\"*\" , [\"readVariable\" , \"sy\" ] , \"-0.4\" ] ] ] ] , [\"gotoX:y:\" , [\"*\" , \"-0.5\" , [\"widthOfText:\" , [\"readVariable\" , \"message\" ] ] ] , [\"readVariable\" , \"y\" ] ] , [\"write\" , [\"readVariable\" , \"message\" ] ] , [\"changePenHueBy:\" , \"-100\" ] ] ] ] ] ]] , [ 25 , 253 , [ [\"whenGreenFlag\" ] , [\"doForever\" ,[ [\"setVar:to:\" , \"sy\" , \"10\" ] , [\"setVar:to:\" , \"y\" , \"0\" ] , [\"wait:elapsed:from:\" , \"5\" ] ] ] ]] ] }],\"info\":{} }",
- "100% Pen Trampoline (by @The__Mad__Hatter)",
- "{\"objName\":\"Stage\", \"children\": [{\"objName\":\"project\" ,\"variables\":[ {\"name\": \"x speed\" , \"value\": \"4.738457229234491e-13\" , \"isPersistent\":false} , {\"name\": \"gravity\" , \"value\": \"-5.220982396617483\" , \"isPersistent\":false} , {\"name\": \"bounce back\" , \"value\": \"-5.220982396617483\" , \"isPersistent\":false} , {\"name\": \"y\" , \"value\": \"-43.332605742058455\" , \"isPersistent\":false} , {\"name\": \"x\" , \"value\": \"30\" , \"isPersistent\":false} , {\"name\": \"ScrollY\" , \"value\": \"-50623.64455061931\" , \"isPersistent\":false} ] ,\"scripts\":[ [ 26 , 1225 , [ [\"whenGreenFlag\" ] , [\"doForever\" ,[ [\"doWaitUntil\" , [\"keyPressed:\" , \"up arrow\" ] ] , [\"setVar:to:\" , \"Y\" , \"-10\" ] , [\"doRepeat\" , \"21\" ,[ [\"changeVar:by:\" , \"ScrollY\" , [\"readVariable\" , \"Y\" ] ] , [\"changeVar:by:\" , \"Y\" , \"1\" ] , [\"wait:elapsed:from:\" , \"0\" ] ] ] ] ] ]] , [ 17 , -265 , [ [\"whenGreenFlag\" ] , [\"hide\" ] , [\"setVar:to:\" , \"x speed\" , \"0\" ] , [\"setVar:to:\" , \"gravity\" , \"0\" ] , [\"setVar:to:\" , \"bounce back\" , \"0\" ] , [\"gotoX:y:\" , \"0\" , \"0\" ] , [\"doForever\" ,[ [\"clearPenTrails\" ] , [\"setPenHueTo:\" , \"0\" ] , [\"penSize:\" , \"10\" ] , [\"putPenDown\" ] , [\"changeYposBy:\" , [\"readVariable\" , \"gravity\" ] ] , [\"changeXposBy:\" , [\"readVariable\" , \"x speed\" ] ] , [\"setVar:to:\" , \"x speed\" , [\"*\" , [\"readVariable\" , \"x speed\" ] , \"0.9\" ] ] , [\"doIfElse\" , [\">\" , [\"ypos\" ] , \"-100\" ] ,[ [\"changeVar:by:\" , \"gravity\" , [\"-\" , [\"*\" , [\"computeFunction:of:\" , \"abs\" , [\"\/\" , [\"readVariable\" , \"gravity\" ] , \"5\" ] ] , \"-1\" ] , \"1\" ] ] , [\"setVar:to:\" , \"bounce back\" , [\"readVariable\" , \"gravity\" ] ] ] ,[ [\"changeVar:by:\" , \"gravity\" , [\"+\" , \"1\" , [\"+\" , [\"\/\" , [\"computeFunction:of:\" , \"abs\" , [\"readVariable\" , \"x speed\" ] ] , \"5\" ] , [\"\/\" , [\"computeFunction:of:\" , \"abs\" , [\"readVariable\" , \"bounce back\" ] ] , \"5\" ] ] ] ] ] ] , [\"doIf\" , [\"keyPressed:\" , \"right arrow\" ] ,[ [\"changeVar:by:\" , \"x speed\" , \"1\" ] ] ] , [\"doIf\" , [\"keyPressed:\" , \"left arrow\" ] ,[ [\"changeVar:by:\" , \"x speed\" , \"-1\" ] ] ] , [\"doIf\" , [\"keyPressed:\" , \"up arrow\" ] ,[ [\"doIf\" , [\"<\" , [\"ypos\" ] , \"-100\" ] ,[ [\"changeVar:by:\" , \"gravity\" , \"2\" ] ] ] ] ] , [\"doIf\" , [\"keyPressed:\" , \"down arrow\" ] ,[ [\"changeVar:by:\" , \"gravity\" , \"-1\" ] ] ] , [\"putPenUp\" ] , [\"penSize:\" , \"3\" ] , [\"setVar:to:\" , \"x\" , [\"xpos\" ] ] , [\"setVar:to:\" , \"y\" , [\"ypos\" ] ] , [\"doIfElse\" , [\"<\" , [\"readVariable\" , \"y\" ] , \"-100\" ] ,[ [\"setPenHueTo:\" , \"50\" ] ] ,[ [\"setPenHueTo:\" , \"0\" ] ] ] , [\"gotoX:y:\" , \"-240\" , \"-100\" ] , [\"putPenDown\" ] , [\"doIf\" , [\"<\" , [\"readVariable\" , \"y\" ] , \"-100\" ] ,[ [\"gotoX:y:\" , [\"readVariable\" , \"x\" ] , [\"readVariable\" , \"y\" ] ] ] ] , [\"gotoX:y:\" , \"240\" , \"-100\" ] , [\"putPenUp\" ] , [\"gotoX:y:\" , [\"readVariable\" , \"x\" ] , [\"readVariable\" , \"y\" ] ] ] ] ]] ] }],\"info\":{} }"],
- "isPersistent": false,
- "x": 52,
- "y": 0,
- "width": 413,
- "height": 877.5,
- "visible": false
- },
- {
- "listName": "stack",
- "contents": [],
- "isPersistent": false,
- "x": 5,
- "y": 267,
- "width": 386,
- "height": 479,
- "visible": false
- },
- {
- "listName": "PAL_LAYOUT",
- "contents": ["56",
- "147",
- "148",
- "",
- "68",
- "95",
- "",
- "66",
- "65",
- "63",
- "",
- "25",
- "161",
- "26",
- "164",
- "",
- "15",
- "",
- "117",
- "",
- "160",
- "163",
- "67",
- "---",
- "103",
- "102",
- "139",
- "138",
- "",
- "124",
- "69",
- "",
- "81",
- "86",
- "130",
- "",
- "17",
- "113",
- "55",
- "",
- "21",
- "118",
- "",
- "30",
- "64",
- "",
- "34",
- "106",
- "105",
- "---",
- "94",
- "48",
- "133",
- "",
- "93",
- "100",
- "",
- "89",
- "75",
- "",
- "24",
- "123",
- "150",
- "",
- "22",
- "119",
- "137",
- "---",
- "27",
- "",
- "129",
- "",
- "96",
- "97",
- "166",
- "",
- "91",
- "18",
- "115",
- "",
- "19",
- "116",
- "",
- "20",
- "92",
- "",
- "168",
- "169",
- "---",
- "99",
- "",
- "120",
- "23",
- "126",
- "72",
- "",
- "33",
- "",
- "13",
- "",
- "39",
- "74",
- "114",
- "",
- "59",
- "79",
- "80",
- "",
- "125",
- "71",
- "---",
- "155",
- "157",
- "153",
- "158",
- "",
- "159",
- "",
- "156",
- "16",
- "42",
- "---",
- "151",
- "49",
- "43",
- "",
- "46",
- "47",
- "52",
- "51",
- "",
- "134",
- "152",
- "",
- "154",
- "37",
- "38",
- "---",
- "144",
- "145",
- "29",
- "40",
- "",
- "41",
- "12",
- "",
- "77",
- "83",
- "84",
- "85",
- "",
- "127",
- "",
- "141",
- "142",
- "",
- "58",
- "",
- "140",
- "143",
- "62",
- "---",
- "6",
- "1",
- "2",
- "3",
- "",
- "98",
- "",
- "7",
- "8",
- "9",
- "",
- "4",
- "10",
- "88",
- "",
- "32",
- "78",
- "136",
- "",
- "5",
- "101",
- "",
- "31",
- "---"],
- "isPersistent": false,
- "x": 239,
- "y": 61,
- "width": 202,
- "height": 280,
- "visible": false
- },
- {
- "listName": "threads",
- "contents": [],
- "isPersistent": false,
- "x": 365,
- "y": 10,
- "width": 230,
- "height": 303,
- "visible": false
- },
- {
- "listName": "heap",
- "contents": [4, "", "", 0, 1, "Hex Color:"],
- "isPersistent": false,
- "x": 8,
- "y": 81,
- "width": 296,
- "height": 383,
- "visible": false
- },
- {
- "listName": "stack",
- "contents": [],
- "isPersistent": false,
- "x": 360,
- "y": 21,
- "width": 294,
- "height": 394,
- "visible": false
- },
- {
- "listName": "tmpList",
- "contents": [],
- "isPersistent": false,
- "x": 18,
- "y": 215,
- "width": 154,
- "height": 254,
- "visible": false
- },
- {
- "listName": "poly",
- "contents": [],
- "isPersistent": false,
- "x": 225,
- "y": 154,
- "width": 130,
- "height": 230,
- "visible": false
- },
- {
- "listName": "fresh",
- "contents": [],
- "isPersistent": false,
- "x": 331,
- "y": 106,
- "width": 284,
- "height": 384,
- "visible": false
- },
- {
- "listName": "stack",
- "contents": [],
- "isPersistent": false,
- "x": 7,
- "y": 31,
- "width": 284,
- "height": 384,
- "visible": false
- },
- {
- "listName": "TYPE_ANYTOKEN",
- "contents": ["[", "]", "{", "}", ",", ":", " ", "\t"],
- "isPersistent": false,
- "x": 363,
- "y": 101,
- "width": 249,
- "height": 274,
- "visible": false
- },
- {
- "listName": "TYPE_TOKEN",
- "contents": ["[", "]", "{", "}", ",", ":"],
- "isPersistent": false,
- "x": 257,
- "y": 122,
- "width": 226,
- "height": 274,
- "visible": false
- },
- {
- "listName": "stack",
- "contents": [],
- "isPersistent": false,
- "x": 7,
- "y": 139,
- "width": 182,
- "height": 272,
- "visible": false
- },
- {
- "listName": "debug",
- "contents": [],
- "isPersistent": false,
- "x": 51,
- "y": 55,
- "width": 433,
- "height": 309,
- "visible": false
- },
- {
- "listName": "Script",
- "contents": ["(",
- -235,
- "120",
- 51,
- 19,
- "",
- 13,
- "0",
- "0",
- "0",
- "9",
- "6",
- "n",
- -231,
- 118,
- 14,
- 15,
- "",
- "0",
- "0",
- "0",
- 25,
- "",
- "",
- "",
- -214,
- 116,
- 8,
- "11",
- "+",
- "0",
- "0",
- "0",
- 37,
- "",
- "",
- "n",
- -203,
- 118,
- 14,
- 15,
- "",
- "0",
- "0",
- "0",
- "0",
- "",
- "",
- "(",
- -235,
- 98,
- 51,
- 19,
- "",
- 61,
- "0",
- "0",
- "0",
- "9",
- "1",
- "n",
- -231,
- 96,
- 14,
- 15,
- "",
- "0",
- "0",
- "0",
- 73,
- "",
- "",
- "",
- -214,
- 94,
- 8,
- "11",
- "-",
- "0",
- "0",
- "0",
- 85,
- "",
- "",
- "n",
- -203,
- 96,
- 14,
- 15,
- "",
- "0",
- "0",
- "0",
- "0",
- "",
- "",
- "(",
- -235,
- 76,
- 51,
- 19,
- "",
- 109,
- "0",
- "0",
- "0",
- "9",
- "2",
- "n",
- -231,
- 74,
- 14,
- 15,
- "",
- "0",
- "0",
- "0",
- 121,
- "",
- "",
- "",
- -214,
- 72,
- 8,
- "11",
- "*",
- "0",
- "0",
- "0",
- 133,
- "",
- "",
- "n",
- -203,
- 74,
- 14,
- 15,
- "",
- "0",
- "0",
- "0",
- "0",
- "",
- "",
- "(",
- -235,
- 54,
- 51,
- 19,
- "",
- 157,
- "0",
- "0",
- "0",
- "9",
- "3",
- "n",
- -231,
- 52,
- 14,
- 15,
- "",
- "0",
- "0",
- "0",
- 193,
- "",
- "",
- "hat",
- -56,
- 130,
- 132,
- 22,
- "",
- 181,
- "0",
- "0",
- 337,
- "6",
- "155",
- "",
- -52,
- 121,
- 123,
- "11",
- "when green flag clicked",
- "0",
- "0",
- "0",
- "0",
- "",
- "",
- "",
- -214,
- 50,
- 8,
- "11",
- "\/",
- "0",
- "0",
- "0",
- 205,
- "",
- "",
- "n",
- -203,
- 52,
- 14,
- 15,
- "",
- "0",
- "0",
- "0",
- "0",
- "",
- "",
- "---",
- -400,
- 32,
- 32,
- "4",
- "",
- 229,
- "0",
- "0",
- "0",
- "",
- "",
- "?",
- -396,
- 30,
- 23,
- 15,
- " ",
- "0",
- "0",
- "0",
- "0",
- "",
- "",
- "(",
- -235,
- 25,
- 119,
- 19,
- "",
- 253,
- "0",
- "0",
- "0",
- "9",
- "98",
- "",
- -231,
- 21,
- 60,
- "11",
- "pick random",
- "0",
- "0",
- "0",
- 265,
- "",
- "",
- "n",
- -168,
- 23,
- 14,
- 15,
- "",
- "0",
- "0",
- "0",
- 277,
- "",
- "",
- "",
- -151,
- 21,
- 13,
- "11",
- "to",
- "0",
- "0",
- "0",
- 289,
- "",
- "",
- "n",
- -135,
- 23,
- 14,
- 15,
- "",
- "0",
- "0",
- "0",
- "0",
- "",
- "",
- "---",
- -400,
- 3,
- 32,
- "4",
- "",
- 313,
- "0",
- "0",
- "0",
- "",
- "",
- "?",
- -396,
- 1,
- 23,
- 15,
- " ",
- "0",
- "0",
- "0",
- "0",
- "",
- "",
- "<",
- -235,
- -4,
- 45,
- 17,
- "",
- 361,
- "0",
- "0",
- "0",
- "9",
- "7",
- "b",
- -56,
- 108,
- 31,
- 15,
- "",
- 349,
- "0",
- "0",
- 397,
- "2",
- "69",
- "",
- -52,
- 106,
- 22,
- "11",
- "hide",
- "0",
- "0",
- "0",
- "0",
- "",
- "",
- "t",
- -231,
- -5,
- 12,
- 15,
- "",
- "0",
- "0",
- "0",
- 373,
- "",
- "",
- "",
- -216,
- -7,
- 7,
- "11",
- "<",
- "0",
- "0",
- "0",
- 385,
- "",
- "",
- "t",
- -206,
- -5,
- 12,
- 15,
- "",
- "0",
- "0",
- "0",
- "0",
- "",
- "",
- "b",
- -56,
- 93,
- 114,
- 19,
- "",
- 409,
- "0",
- "0",
- 1057,
- "8",
- "41",
- "",
- -52,
- 89,
- 19,
- "11",
- "ask",
- "0",
- "0",
- "0",
- 421,
- "",
- "",
- "t",
- -30,
- 91,
- 37,
- 15,
- "Print:",
- "0",
- "0",
- "0",
- 433,
- "",
- "",
- "",
- 10,
- 89,
- 43,
- "11",
- "and wait",
- "0",
- "0",
- "0",
- "0",
- "",
- "",
- "<",
- -235,
- -24,
- 46,
- 17,
- "",
- 457,
- "0",
- "0",
- "0",
- "9",
- "8",
- "t",
- -231,
- -25,
- 12,
- 15,
- "",
- "0",
- "0",
- "0",
- 1717,
- "",
- "",
- "(",
- 25,
- 71,
- 45,
- 13,
- "",
- 481,
- "0",
- "0",
- "0",
- "8",
- "12",
- "",
- 29,
- 70,
- 37,
- "11",
- "answer",
- "0",
- "0",
- "0",
- "0",
- "",
- "",
- "",
- -52,
- 51,
- 19,
- "11",
- "ask",
- "0",
- "0",
- "0",
- 505,
- "",
- "",
- "t",
- -30,
- 53,
- 19,
- 15,
- "X:",
- "0",
- "0",
- "0",
- 517,
- "",
- "",
- "",
- -8,
- 51,
- 43,
- "11",
- "and wait",
- "0",
- "0",
- "0",
- "0",
- "",
- "",
- "(",
- 9,
- 33,
- 45,
- 13,
- "",
- 541,
- "0",
- "0",
- "0",
- "8",
- "12",
- "",
- 13,
- 32,
- 37,
- "11",
- "answer",
- "0",
- "0",
- "0",
- "0",
- "",
- "",
- "",
- -52,
- 13,
- 19,
- "11",
- "ask",
- "0",
- "0",
- "0",
- 565,
- "",
- "",
- "t",
- -30,
- 15,
- 19,
- 15,
- "Y:",
- "0",
- "0",
- "0",
- 577,
- "",
- "",
- "",
- -8,
- 13,
- 43,
- "11",
- "and wait",
- "0",
- "0",
- "0",
- "0",
- "",
- "",
- "(",
- 47,
- -81,
- 85,
- 15,
- "",
- 601,
- "0",
- "0",
- "0",
- "4",
- "169",
- "",
- 51,
- -83,
- 42,
- "11",
- "width of",
- "0",
- "0",
- "0",
- 973,
- "",
- "",
- "?",
- -182,
- -72,
- 23,
- 15,
- " ",
- "0",
- "0",
- "0",
- "0",
- "",
- "",
- "",
- -52,
- -102,
- 26,
- "11",
- "write",
- "0",
- "0",
- "0",
- 1021,
- "",
- "",
- "",
- -205,
- -94,
- 13,
- "11",
- "or",
- "0",
- "0",
- "0",
- 1045,
- "",
- "",
- "(",
- 9,
- -5,
- 45,
- 13,
- "",
- 661,
- "0",
- "0",
- "0",
- "8",
- "12",
- "",
- 13,
- -6,
- 37,
- "11",
- "answer",
- "0",
- "0",
- "0",
- "0",
- "",
- "",
- "",
- -52,
- -25,
- 19,
- "11",
- "ask",
- "0",
- "0",
- "0",
- 685,
- "",
- "",
- "t",
- -30,
- -23,
- 62,
- 15,
- "Hex Color:",
- "0",
- "0",
- "0",
- 697,
- "",
- "",
- "",
- 35,
- -25,
- 43,
- "11",
- "and wait",
- "0",
- "0",
- "0",
- "0",
- "",
- "",
- "(",
- 87,
- -44,
- 45,
- 13,
- "",
- 721,
- "0",
- "0",
- "0",
- "8",
- "12",
- "",
- 91,
- -45,
- 37,
- "11",
- "answer",
- "0",
- "0",
- "0",
- "0",
- "",
- "",
- "b",
- -56,
- -61,
- 109,
- 17,
- "",
- 745,
- "0",
- "0",
- 793,
- "1",
- "66",
- "",
- -52,
- -64,
- 45,
- "11",
- "go to x:",
- "0",
- "0",
- "0",
- 889,
- "",
- "",
- "(",
- 32,
- -63,
- 16,
- 13,
- "",
- 913,
- "0",
- "0",
- "0",
- "5",
- "99",
- "",
- 15,
- -64,
- 14,
- "11",
- "y:",
- "0",
- "0",
- "0",
- 757,
- "",
- "",
- "---",
- -400,
- -64,
- 32,
- "4",
- "",
- 925,
- "0",
- "0",
- "0",
- "",
- "",
- "b",
- -56,
- -78,
- 197,
- 21,
- "",
- 805,
- "0",
- "0",
- 1105,
- "1",
- "25",
- "",
- -52,
- -83,
- 64,
- "11",
- "change x by",
- "0",
- "0",
- "0",
- 1069,
- "",
- "",
- "",
- -52,
- 70,
- 19,
- "11",
- "set",
- "0",
- "0",
- "0",
- 1117,
- "",
- "",
- "t",
- -205,
- -25,
- 12,
- 15,
- "",
- "0",
- "0",
- "0",
- "0",
- "",
- "",
- "<",
- -235,
- -44,
- 45,
- 17,
- "",
- 853,
- "0",
- "0",
- "0",
- "9",
- "9",
- "t",
- -231,
- -45,
- 12,
- 15,
- "",
- "0",
- "0",
- "0",
- 865,
- "",
- "",
- "",
- -216,
- -47,
- 7,
- "11",
- ">",
- "0",
- "0",
- "0",
- 877,
- "",
- "",
- "t",
- -206,
- -45,
- 12,
- 15,
- "",
- "0",
- "0",
- "0",
- "0",
- "",
- "",
- "(",
- -4,
- -63,
- 16,
- 13,
- "",
- 901,
- "0",
- "0",
- 769,
- "5",
- "99",
- "",
- 0,
- -64,
- 8,
- "11",
- "x",
- "0",
- "0",
- "0",
- "0",
- "",
- "",
- "",
- 36,
- -64,
- 8,
- "11",
- "y",
- "0",
- "0",
- "0",
- "0",
- "",
- "",
- "?",
- -396,
- -66,
- 23,
- 15,
- " ",
- "0",
- "0",
- "0",
- "0",
- "",
- "",
- "<",
- -235,
- -71,
- 80,
- 17,
- "",
- 949,
- "0",
- "0",
- "0",
- "9",
- "4",
- "?",
- -231,
- -72,
- 23,
- 15,
- " ",
- "0",
- "0",
- "0",
- 961,
- "",
- "",
- "",
- -205,
- -74,
- 20,
- "11",
- "and",
- "0",
- "0",
- "0",
- 613,
- "",
- "",
- "(",
- 96,
- -82,
- 32,
- 13,
- "",
- 985,
- "0",
- "0",
- "0",
- "5",
- "99",
- "",
- 100,
- -83,
- 24,
- "11",
- "text",
- "0",
- "0",
- "0",
- "0",
- "",
- "",
- "<",
- -235,
- -91,
- 73,
- 17,
- "",
- 1009,
- "0",
- "0",
- "0",
- "9",
- "10",
- "?",
- -231,
- -92,
- 23,
- 15,
- " ",
- "0",
- "0",
- "0",
- 637,
- "",
- "",
- "(",
- -23,
- -101,
- 32,
- 13,
- "",
- 1033,
- "0",
- "0",
- "0",
- "5",
- "99",
- "",
- -19,
- -102,
- 24,
- "11",
- "text",
- "0",
- "0",
- "0",
- "0",
- "",
- "",
- "?",
- -189,
- -92,
- 23,
- 15,
- " ",
- "0",
- "0",
- "0",
- "0",
- "",
- "",
- "b",
- -56,
- 74,
- 131,
- 19,
- "",
- 817,
- "0",
- "0",
- 1141,
- "5",
- "120",
- "(",
- 15,
- -80,
- 121,
- 17,
- "",
- 1081,
- "0",
- "0",
- "0",
- "9",
- "1",
- "n",
- 19,
- -81,
- 14,
- 15,
- "0",
- "0",
- "0",
- "0",
- 1093,
- "",
- "",
- "",
- 36,
- -83,
- 8,
- "11",
- "-",
- "0",
- "0",
- "0",
- 589,
- "",
- "",
- "b",
- -56,
- -99,
- 70,
- 17,
- "",
- 625,
- "0",
- "0",
- "0",
- "4",
- "168",
- "t",
- -30,
- 72,
- 36,
- 15,
- "text",
- "0",
- "0",
- "0",
- 1129,
- "va",
- "",
- "",
- 9,
- 70,
- 13,
- "11",
- "to",
- "0",
- "0",
- "0",
- 469,
- "",
- "",
- "b",
- -56,
- 55,
- 96,
- 19,
- "",
- 493,
- "0",
- "0",
- 1285,
- "8",
- "41",
- "<",
- -235,
- -111,
- 53,
- 17,
- "",
- 1201,
- "0",
- "0",
- "0",
- "9",
- "88",
- "b",
- -56,
- -40,
- 197,
- 21,
- "",
- 1177,
- "0",
- "0",
- 733,
- "4",
- "91",
- "",
- -52,
- -45,
- 87,
- "11",
- "set pen color to",
- "0",
- "0",
- "0",
- 1681,
- "",
- "",
- "n",
- -176,
- -264,
- 14,
- 15,
- "9",
- "0",
- "0",
- "0",
- "0",
- "",
- "",
- "",
- -231,
- -114,
- 19,
- "11",
- "not",
- "0",
- "0",
- "0",
- 1213,
- "",
- "",
- "?",
- -209,
- -112,
- 23,
- 15,
- " ",
- "0",
- "0",
- "0",
- "0",
- "",
- "",
- "---",
- -400,
- -131,
- 32,
- "4",
- "",
- 1237,
- "0",
- "0",
- "0",
- "",
- "",
- "?",
- -396,
- -133,
- 23,
- 15,
- " ",
- "0",
- "0",
- "0",
- "0",
- "",
- "",
- "(",
- -235,
- -138,
- 102,
- 19,
- "",
- 1261,
- "0",
- "0",
- "0",
- "9",
- "32",
- "",
- -231,
- -142,
- 20,
- "11",
- "join",
- "0",
- "0",
- "0",
- 1273,
- "",
- "",
- "t",
- -208,
- -140,
- 33,
- 15,
- "hello",
- "0",
- "0",
- "0",
- 1345,
- "",
- "",
- "b",
- -56,
- 36,
- 115,
- 19,
- "",
- 1297,
- "0",
- "0",
- 1333,
- "5",
- "120",
- "",
- -52,
- 32,
- 19,
- "11",
- "set",
- "0",
- "0",
- "0",
- 1309,
- "",
- "",
- "t",
- -30,
- 34,
- 20,
- 15,
- "x",
- "0",
- "0",
- "0",
- 1321,
- "va",
- "",
- "",
- -7,
- 32,
- 13,
- "11",
- "to",
- "0",
- "0",
- "0",
- 529,
- "",
- "",
- "b",
- -56,
- 17,
- 96,
- 19,
- "",
- 553,
- "0",
- "0",
- 1405,
- "8",
- "41",
- "t",
- -172,
- -140,
- 34,
- 15,
- "world",
- "0",
- "0",
- "0",
- "0",
- "",
- "",
- "(",
- -235,
- -160,
- 112,
- 19,
- "",
- 1369,
- "0",
- "0",
- "0",
- "9",
- "78",
- "",
- -231,
- -164,
- 33,
- "11",
- "letter",
- "0",
- "0",
- "0",
- 1381,
- "",
- "",
- "n",
- -195,
- -162,
- 14,
- 15,
- "1",
- "0",
- "0",
- "0",
- 1393,
- "",
- "",
- "",
- -178,
- -164,
- 13,
- "11",
- "of",
- "0",
- "0",
- "0",
- 1465,
- "",
- "",
- "b",
- -56,
- -2,
- 115,
- 19,
- "",
- 1417,
- "0",
- "0",
- 1453,
- "5",
- "120",
- "",
- -52,
- -6,
- 19,
- "11",
- "set",
- "0",
- "0",
- "0",
- 1429,
- "",
- "",
- "t",
- -30,
- -4,
- 20,
- 15,
- "y",
- "0",
- "0",
- "0",
- 1441,
- "va",
- "",
- "",
- -7,
- -6,
- 13,
- "11",
- "to",
- "0",
- "0",
- "0",
- 649,
- "",
- "",
- "b",
- -56,
- -21,
- 139,
- 19,
- "",
- 673,
- "0",
- "0",
- 1165,
- "8",
- "41",
- "t",
- -162,
- -162,
- 34,
- 15,
- "world",
- "0",
- "0",
- "0",
- "0",
- "",
- "",
- "(",
- -235,
- -182,
- 96,
- 19,
- "",
- 1489,
- "0",
- "0",
- "0",
- "9",
- "136",
- "",
- -231,
- -186,
- 50,
- "11",
- "length of",
- "0",
- "0",
- "0",
- 1501,
- "",
- "",
- "t",
- -178,
- -184,
- 34,
- 15,
- "world",
- "0",
- "0",
- "0",
- "0",
- "",
- "",
- "---",
- -400,
- -204,
- 32,
- "4",
- "",
- 1525,
- "0",
- "0",
- "0",
- "",
- "",
- "?",
- -396,
- -206,
- 23,
- 15,
- " ",
- "0",
- "0",
- "0",
- "0",
- "",
- "",
- "(",
- -235,
- -211,
- 63,
- 19,
- "",
- 1549,
- "0",
- "0",
- "0",
- "9",
- "5",
- "n",
- -231,
- -213,
- 14,
- 15,
- "",
- "0",
- "0",
- "0",
- 1561,
- "",
- "",
- "",
- -214,
- -215,
- 20,
- "11",
- "mod",
- "0",
- "0",
- "0",
- 1573,
- "",
- "",
- "n",
- -191,
- -213,
- 14,
- 15,
- "",
- "0",
- "0",
- "0",
- "0",
- "",
- "",
- "(",
- -235,
- -233,
- 57,
- 19,
- "",
- 1597,
- "0",
- "0",
- "0",
- "9",
- "101",
- "",
- -231,
- -237,
- 31,
- "11",
- "round",
- "0",
- "0",
- "0",
- 1609,
- "",
- "",
- "n",
- -197,
- -235,
- 14,
- 15,
- "",
- "0",
- "0",
- "0",
- "0",
- "",
- "",
- "---",
- -400,
- -255,
- 32,
- "4",
- "",
- 1633,
- "0",
- "0",
- "0",
- "",
- "",
- "?",
- -396,
- -257,
- 23,
- 15,
- " ",
- "0",
- "0",
- "0",
- "0",
- "",
- "",
- "(",
- -235,
- -262,
- 78,
- 19,
- "",
- 1657,
- "0",
- "0",
- "0",
- "9",
- "31",
- "t",
- -231,
- -264,
- 36,
- 15,
- "sqrt",
- "0",
- "0",
- "0",
- 1669,
- "op",
- "",
- "",
- -192,
- -266,
- 13,
- "11",
- "of",
- "0",
- "0",
- "0",
- 1189,
- "",
- "",
- "(",
- 38,
- -42,
- 98,
- 17,
- "",
- 1693,
- "0",
- "0",
- "0",
- "9",
- "32",
- "",
- 42,
- -45,
- 20,
- "11",
- "join",
- "0",
- "0",
- "0",
- 1705,
- "",
- "",
- "t",
- 65,
- -43,
- 19,
- 15,
- "0x",
- "0",
- "0",
- "0",
- 709,
- "",
- "",
- "",
- -216,
- -27,
- 8,
- "11",
- "=",
- "0",
- "0",
- "0",
- 829,
- "",
- "",
- "n",
- 15,
- -80,
- 20,
- 15,
- "10",
- "0",
- "0",
- "0",
- 0,
- "",
- ""],
- "isPersistent": false,
- "x": 148,
- "y": 32,
- "width": 383,
- "height": 347,
- "visible": false
- },
- {
- "listName": "TYPE_BLOCK",
- "contents": ["b", "hat", "nst1", "nst2"],
- "isPersistent": false,
- "x": 285,
- "y": 14,
- "width": 348,
- "height": 448,
- "visible": false
- },
- {
- "listName": "TYPE_ARG",
- "contents": ["(", "<", "o"],
- "isPersistent": false,
- "x": 345,
- "y": 102,
- "width": 348,
- "height": 448,
- "visible": false
- },
- {
- "listName": "TYPE_ARG_DST",
- "contents": ["(", "<", "o", "n", "t", "?"],
- "isPersistent": false,
- "x": 36,
- "y": 142,
- "width": 348,
- "height": 448,
- "visible": false
- },
- {
- "listName": "BLOCK_SCHEMA",
- "contents": ["-",
- "*",
- "\/",
- "&",
- "%",
- "+",
- "<",
- "=",
- ">",
- "|",
- "abs",
- "answer",
- "append:toList:",
- "backgroundIndex",
- "bounceOffEdge",
- "broadcast:",
- "changeGraphicEffect:by:",
- "changePenHueBy:",
- "changePenShadeBy:",
- "changePenSizeBy:",
- "changeSizeBy:",
- "changeTempoBy:",
- "changeVar:by:",
- "changeVolumeBy:",
- "changeXposBy:",
- "changeYposBy:",
- "clearPenTrails",
- "CLR_COUNT",
- "color:sees:",
- "comeToFront",
- "computeFunction:of:",
- "concatenate:with:",
- "contentsOfList:",
- "costumeIndex",
- "costumeName",
- "COUNT",
- "createCloneOf",
- "deleteClone",
- "deleteLine:ofList:",
- "distanceTo:",
- "doAsk",
- "doBroadcastAndWait",
- "doForever",
- "doForeverIf",
- "doForLoop",
- "doIf",
- "doIfElse",
- "doPlaySoundAndWait",
- "doRepeat",
- "doReturn",
- "doUntil",
- "doWaitUntil",
- "doWhile",
- "drum:duration:elapsed:from:",
- "filterReset",
- "forward:",
- "fxTest",
- "getAttribute:of:",
- "getLine:ofList:",
- "getParam",
- "getUserId",
- "getUserName",
- "glideSecs:toX:y:elapsed:from:",
- "goBackByLayers:",
- "gotoSpriteOrMouse:",
- "gotoX:y:",
- "heading",
- "heading:",
- "hide",
- "hideAll",
- "hideList:",
- "hideVariable:",
- "INCR_COUNT",
- "insert:at:ofList:",
- "instrument:",
- "isLoud",
- "keyPressed:",
- "letter:of:",
- "lineCountOfList:",
- "list:contains:",
- "lookLike:",
- "midiInstrument:",
- "mousePressed",
- "mouseX",
- "mouseY",
- "nextCostume",
- "nextScene",
- "not",
- "noteOn:duration:elapsed:from:",
- "obsolete",
- "penColor:",
- "penSize:",
- "playDrum",
- "playSound:",
- "pointTowards:",
- "putPenDown",
- "putPenUp",
- "randomFrom:to:",
- "readVariable",
- "rest:elapsed:from:",
- "rounded",
- "say:",
- "say:duration:elapsed:from:",
- "sayNothing",
- "scale",
- "sceneName",
- "scrollAlign",
- "scrollRight",
- "scrollUp",
- "senseVideoMotion",
- "sensor:",
- "sensorPressed:",
- "setGraphicEffect:to:",
- "setLine:ofList:to:",
- "setPenHueTo:",
- "setPenShadeTo:",
- "setRotationStyle",
- "setSizeTo:",
- "setTempoTo:",
- "setVar:to:",
- "setVideoState",
- "setVideoTransparency",
- "setVolumeTo:",
- "show",
- "showList:",
- "showVariable:",
- "soundLevel",
- "sqrt",
- "stampCostume",
- "startScene",
- "startSceneAndWait",
- "stopAll",
- "stopAllSounds",
- "stopScripts",
- "stopSound:",
- "stringLength:",
- "tempo",
- "think:",
- "think:duration:elapsed:from:",
- "timeAndDate",
- "timer",
- "timerReset",
- "timestamp",
- "touching:",
- "touchingColor:",
- "turnAwayFromEdge",
- "turnLeft:",
- "turnRight:",
- "undefined",
- "volume",
- "wait:elapsed:from:",
- "warpSpeed",
- "whenClicked",
- "whenCloned",
- "whenGreenFlag",
- "whenIReceive",
- "whenKeyPressed",
- "whenSceneStarts",
- "whenSensorGreaterThan",
- "xpos",
- "xpos:",
- "xScroll",
- "ypos",
- "ypos:",
- "yScroll",
- "stampPolygon",
- "stampPolyList",
- "write",
- "widthOfText:",
- ".",
- "() - ()",
- "() * ()",
- "() \/ ()",
- "<> and <>",
- "() mod ()",
- "() + ()",
- "[] < []",
- "[] = []",
- "[] > []",
- "<> or <>",
- "abs ()",
- "answer",
- "add [thing] to [list.ls]",
- "backdrop #",
- "if on edge, bounce",
- "broadcast [message1.ev]",
- "change [color.ef] effect by (25)",
- "change pen color by (10)",
- "change pen shade by (10)",
- "change pen size by (1)",
- "change size by (10)",
- "change tempo by (1)",
- "change [var.va] by (1)",
- "change volume by (1)",
- "change x by (10)",
- "change y by (10)",
- "clear",
- "clear counter",
- "color [color.co] is touching [color.co]?",
- "go to front",
- "[sqrt.op] of (9)",
- "join [hello] [world]",
- "Make a List",
- "costume #",
- "costume name",
- "counter",
- "create clone of [myself]",
- "delete this clone",
- "delete (1.?lia) of [list.ls]",
- "distance to [sprite.sp]",
- "ask [What's your name?] and wait",
- "broadcast [message1.ev] and wait",
- "forever",
- "forever if ()",
- "for each () in ()",
- "if <> then",
- "if <> then",
- "play sound [meow.so] until done",
- "repeat (10)",
- "stop script",
- "repeat until <>",
- "wait until <>",
- "while <>",
- "play drum (1) for (1) beats",
- "clear graphic effects",
- "move (10) steps",
- "color fx test ()",
- "[x position.si] of [sprite.sa]",
- "item (1.?li) of [list.ls]",
- "custom block parameter",
- "user id",
- "username",
- "glide (1) secs to x: (0) y: (0)",
- "go back (1) layers",
- "go to [mouse-pointer.pt]",
- "go to x: (0) y: (0)",
- "direction",
- "point in direction (90)",
- "hide",
- "hide all sprites",
- "hide list [list.ls]",
- "hide variable [var.va]",
- "incr counter",
- "insert [thing] at (1.?li) of [list.ls]",
- "set instrument to (1)",
- "loud?",
- "key [space.key] pressed?",
- "letter (1) of [world]",
- "length of [list.ls]",
- "[list.ls] contains [thing]?",
- "switch costume to (.cs)",
- "set instrument to ()",
- "mouse down?",
- "mouse x",
- "mouse y",
- "next costume",
- "next backdrop",
- "not <>",
- "play note (60) for (1) beats",
- "obsolete",
- "set pen color to [0xff0000]",
- "set pen size to (1)",
- "play drum (1) for (1) beats",
- "play sound [meow.so]",
- "point towards [mouse-pointer.pt]",
- "pen down",
- "pen up",
- "pick random () to ()",
- "Make a Variable",
- "rest for (0.25) beats",
- "round ()",
- "say [Hello!]",
- "say [Hello!] for (2) secs",
- "say nothing",
- "size",
- "backdrop name",
- "align scene ()",
- "scroll right ()",
- "scroll up ()",
- "video () on ()",
- "() sensor value",
- "sensor ()?",
- "set (color.ef) effect to (0)",
- "replace item (1.?li) of [list.ls] with [thing]",
- "set pen color to (0)",
- "set pen shade to (50)",
- "set rotation style [left-right.rs]",
- "set size to (100)%",
- "set tempo to (60) bpm",
- "set [var.va] to [0]",
- "turn video ()",
- "set video transparency to ()%",
- "set volume to (100)%",
- "show",
- "show list [list.ls]",
- "show variable [var.va]",
- "loudness",
- "sqrt ()",
- "stamp",
- "switch backdrop to [.bk]",
- "switch backdrop to [.bk] and wait",
- "stop all",
- "stop all sounds",
- "stop [all.st]",
- "stop sound ()",
- "length of [world]",
- "tempo",
- "think [Hmm]",
- "think [Hmm] for (2) secs",
- "current [minute.dt]",
- "timer",
- "reset timer",
- "days since 2000",
- "touching [sprite.sp]?",
- "touching color [color.co]?",
- "point away from edge",
- "turn CW (90) degrees",
- "turn CCW (90) degrees",
- "undefined",
- "volume",
- "wait (1) secs",
- "run without screen refresh",
- "when this sprite clicked",
- "when I start as a clone",
- "when green flag clicked",
- "when I receive [message1.ev]",
- "when [space.key] key pressed",
- "when backdrop switches to [.bk]",
- "when [loudness.wh] > (10)",
- "x position",
- "set x to (0)",
- "x scroll",
- "y position",
- "set y to (0)",
- "y scroll",
- "pen up and fill",
- "stamp polygon from (1) of [list.ls]",
- "write [Hello World]",
- "width of [Hello World]",
- ".",
- "(",
- "(",
- "(",
- "<",
- "(",
- "(",
- "<",
- "<",
- "<",
- "<",
- "(",
- "(",
- "b",
- "(",
- "b",
- "b",
- "b",
- "b",
- "b",
- "b",
- "b",
- "b",
- "b",
- "b",
- "b",
- "b",
- "b",
- "",
- "<",
- "b",
- "(",
- "(",
- "(",
- "(",
- "(",
- "",
- "b",
- "b",
- "b",
- "(",
- "b",
- "b",
- "nst1",
- "",
- "",
- "nst1",
- "nst2",
- "b",
- "nst1",
- "",
- "nst1",
- "b",
- "",
- "",
- "b",
- "b",
- "",
- "(",
- "(",
- "",
- "",
- "(",
- "b",
- "b",
- "b",
- "b",
- "(",
- "b",
- "b",
- "",
- "b",
- "b",
- "",
- "b",
- "b",
- "",
- "<",
- "(",
- "(",
- "<",
- "b",
- "b",
- "<",
- "(",
- "(",
- "b",
- "b",
- "<",
- "b",
- "",
- "b",
- "b",
- "b",
- "b",
- "b",
- "b",
- "b",
- "(",
- "(",
- "b",
- "(",
- "b",
- "b",
- "",
- "(",
- "(",
- "",
- "",
- "",
- "",
- "",
- "",
- "b",
- "b",
- "b",
- "b",
- "b",
- "b",
- "b",
- "b",
- "",
- "",
- "b",
- "b",
- "b",
- "b",
- "(",
- "",
- "b",
- "b",
- "b",
- "",
- "b",
- "b",
- "",
- "(",
- "(",
- "b",
- "b",
- "(",
- "(",
- "b",
- "(",
- "<",
- "<",
- "",
- "b",
- "b",
- "",
- "(",
- "b",
- "nst1",
- "hat",
- "hat",
- "hat",
- "hat",
- "hat",
- "hat",
- "hat",
- "(",
- "b",
- "",
- "(",
- "b",
- "",
- "b",
- "b",
- "b",
- "(",
- ".",
- "9",
- "9",
- "9",
- "9",
- "9",
- "9",
- "9",
- "9",
- "9",
- "9",
- "",
- "8",
- "11",
- "",
- "1",
- "6",
- "",
- "4",
- "4",
- "4",
- "2",
- "",
- "5",
- "",
- "1",
- "1",
- "4",
- "",
- "",
- "",
- "9",
- "9",
- "11",
- "",
- "",
- "",
- "",
- "",
- "11",
- "",
- "8",
- "6",
- "7",
- "",
- "",
- "7",
- "7",
- "",
- "7",
- "",
- "7",
- "7",
- "",
- "",
- "",
- "1",
- "",
- "",
- "11",
- "",
- "",
- "8",
- "",
- "",
- "1",
- "1",
- "1",
- "1",
- "2",
- "",
- "",
- "",
- "",
- "11",
- "",
- "",
- "8",
- "9",
- "11",
- "11",
- "",
- "",
- "8",
- "8",
- "8",
- "",
- "",
- "9",
- "",
- "",
- "4",
- "4",
- "",
- "",
- "1",
- "4",
- "4",
- "9",
- "5",
- "",
- "9",
- "2",
- "2",
- "",
- "",
- "",
- "",
- "",
- "",
- "",
- "",
- "",
- "",
- "11",
- "4",
- "4",
- "1",
- "2",
- "",
- "5",
- "",
- "",
- "",
- "2",
- "",
- "",
- "",
- "",
- "4",
- "",
- "",
- "",
- "",
- "7",
- "",
- "9",
- "",
- "",
- "",
- "8",
- "8",
- "8",
- "",
- "",
- "",
- "",
- "1",
- "1",
- "",
- "",
- "7",
- "7",
- "",
- "",
- "6",
- "6",
- "",
- "",
- "",
- "1",
- "1",
- "",
- "1",
- "1",
- "",
- "4",
- "4",
- "4",
- "4",
- "."],
- "isPersistent": false,
- "x": 164,
- "y": 54,
- "width": 304,
- "height": 289,
- "visible": false
- },
- {
- "listName": "Palette",
- "contents": [1,
- 49,
- 97,
- 145,
- 217,
- 241,
- 301,
- 325,
- 445,
- 841,
- 781,
- 937,
- 997,
- 1153,
- 1225,
- 1249,
- 1357,
- 1477,
- 1513,
- 1537,
- 1585,
- 1621,
- 1645],
- "isPersistent": false,
- "x": 191,
- "y": 9,
- "width": 311,
- "height": 406,
- "visible": false
- },
- {
- "listName": "lists",
- "contents": ["2"],
- "isPersistent": false,
- "x": 221,
- "y": 87,
- "width": 261,
- "height": 249,
- "visible": false
- },
- {
- "listName": "vars",
- "contents": ["text", "hdskghjsfgjkdhafghkjdaadgfhsjkgkahjdf", "x", "0", "y", "0"],
- "isPersistent": false,
- "x": 5,
- "y": 128,
- "width": 190,
- "height": 290,
- "visible": false
- },
- {
- "listName": "Roots",
- "contents": [169],
- "isPersistent": false,
- "x": 188,
- "y": 27,
- "width": 378,
- "height": 403,
- "visible": false
- },
- {
- "listName": "json",
- "contents": ["Below is the JSON text created from your project. To save this you must click on it then press Ctrl+A to select all, then Ctrl+C to copy it. Paste this into a text editor or one of the scratch forums to keep it safe!", "{\"objName\":\"Stage\", \"children\": [{\"objName\":\"project\" ,\"variables\":[ {\"name\": \"text\" , \"value\": \"hdskghjsfgjkdhafghkjdaadgfhsjkgkahjdf\" , \"isPersistent\":false} , {\"name\": \"x\" , \"value\": \"0\" , \"isPersistent\":false} , {\"name\": \"y\" , \"value\": \"0\" , \"isPersistent\":false} ] ,\"scripts\":[ [ 54 , 60 , [ [\"whenGreenFlag\" ] , [\"hide\" ] , [\"doAsk\" , \"Print:\" ] , [\"setVar:to:\" , \"text\" , [\"answer\" ] ] , [\"doAsk\" , \"X:\" ] , [\"setVar:to:\" , \"x\" , [\"answer\" ] ] , [\"doAsk\" , \"Y:\" ] , [\"setVar:to:\" , \"y\" , [\"answer\" ] ] , [\"doAsk\" , \"Hex Color:\" ] , [\"penColor:\" , [\"concatenate:with:\" , \"0x\" , [\"answer\" ] ] ] , [\"gotoX:y:\" , [\"readVariable\" , \"x\" ] , [\"readVariable\" , \"y\" ] ] , [\"changeXposBy:\" , [\"-\" , \"0\" , [\"widthOfText:\" , [\"readVariable\" , \"text\" ] ] ] ] , [\"write\" , [\"readVariable\" , \"text\" ] ] ]] ] }],\"info\":{} }"],
- "isPersistent": false,
- "x": 72,
- "y": 57,
- "width": 341,
- "height": 689,
- "visible": false
- }],
- "info": {
- "flashVersion": "MAC 29,0,0,140",
- "projectID": "217202077",
- "scriptCount": 172,
- "swfVersion": "v459.1",
- "hasCloudData": false,
- "spriteCount": 7,
- "userAgent": "Mozilla\/5.0 (Macintosh; Intel Mac OS X 10_13_4) AppleWebKit\/537.36 (KHTML, like Gecko) Chrome\/65.0.3325.181 Safari\/537.36",
- "videoOn": false
- }
- }
Add Comment
Please, Sign In to add comment