(objects :root "2" (SISSProxy :idref "1" :selector "stack:") (LBox :idref "2" :contentsCollectionClass "LCollection" (slot :idref "3" :name "components") (slot :idref "7" :name "transformation") (slot :idref "8" :name "shape") (slot :class "Point" :value "0.5@0.5" :name "pivotRatio") (slot :class "True" :value "true" :name "clipping") (slot :class "False" :value "false" :name "layoutChanged") (slot :idref "10" :name "menuContributors") (slot :idref "11" :name "name") (slot :idref "12" :name "odfScript") (slot :idref "14" :name "ouBackground") (slot :idref "32" :name "savedPage") (slot :idref "36" :name "1")) (IdentityDictionary :idref "3" (slot :keyClass "ByteSymbol" :keyValue "DocViewer" :valueId "4") (slot :keyClass "ByteSymbol" :keyValue "DropHandler" :valueId "5") (slot :keyClass "ByteSymbol" :keyValue "LastFocusHandler" :valueId "6")) (LDocViewer :idref "4" (slot :idref "2" :name "whole") (slot :class "ByteSymbol" :value "menu" :name "mood")) (LDropHandler :idref "5" (slot :idref "2" :name "whole") (slot :class "SmallInteger" :value "127" :name "modifierMask") (slot :class "SmallInteger" :value "0" :name "modifierRejectMask")) (LLastFocusHandler :idref "6" (slot :idref "2" :name "whole")) (MatrixTransform2x3 :idref "7" :value "P2d5wwAAAABDYwAAAAAAAD9necMAAAAA" :basicSize "6") (LBoxShape :idref "8" (slot :idref "9" :name "fill") (slot :class "Point" :value "794@595" :name "extent") (slot :class "Color" :value "0 255" :name "borderColor") (slot :class "SmallInteger" :value "0" :name "borderWidth") (slot :class "False" :value "false" :name "infinite")) (GeziraFillUniform :idref "9" (slot :class "Float" :value "P/AAAAAAAAA=" :name "alpha") (slot :class "Float" :value "P/AAAAAAAAA=" :name "red") (slot :class "Float" :value "P/AAAAAAAAA=" :name "green") (slot :class "Float" :value "P/AAAAAAAAA=" :name "blue")) (Array :idref "10" :basicSize "1" (slot :class "ByteSymbol" :value "LBoxMenuHandler" :name "1")) (ByteString :idref "11" :value "page1" :basicSize "5") (ODFAnimation :idref "12" (slot :idref "13" :name "sequence")) (OrderedCollection :idref "13" :size "0") (LDBJrPage :idref "14" :metaclass "true" :slotsString "" :uniclass "14" (slot :idref "15" :name "ouCardVarInfo") (slot :idref "16" :name "classPool") (slot :idref "19" :name "methods")) (IdentityDictionary :idref "15") (Dictionary :idref "16" (slot :keyClass "ByteSymbol" :keyValue "BackgroundCostume" :valueId "2") (slot :keyClass "ByteSymbol" :keyValue "BackgroundName" :valueId "17") (slot :keyClass "ByteSymbol" :keyValue "BackgroundVarInfo" :valueId "18") (slot :keyClass "ByteSymbol" :keyValue "BkgndID" :valueClass "SmallInteger" :valueValue "583211") (slot :keyClass "ByteSymbol" :keyValue "PageTurnInProgress" :valueClass "False" :valueValue "false") (slot :keyClass "ByteSymbol" :keyValue "TheStack" :valueId "1")) (ByteString :idref "17" :value "a background" :basicSize "12") (IdentityDictionary :idref "18") (IdentityDictionary :idref "19" (slot :keyClass "ByteSymbol" :keyValue "backgroundCostume" :valueId "20") (slot :keyClass "ByteSymbol" :keyValue "backgroundCostume:" :valueId "21") (slot :keyClass "ByteSymbol" :keyValue "backgroundName" :valueId "22") (slot :keyClass "ByteSymbol" :keyValue "backgroundName:" :valueId "23") (slot :keyClass "ByteSymbol" :keyValue "backgroundVarInfo" :valueId "24") (slot :keyClass "ByteSymbol" :keyValue "backgroundVarInfo:" :valueId "25") (slot :keyClass "ByteSymbol" :keyValue "bkgndID" :valueId "26") (slot :keyClass "ByteSymbol" :keyValue "bkgndID:" :valueId "27") (slot :keyClass "ByteSymbol" :keyValue "stack" :valueId "28") (slot :keyClass "ByteSymbol" :keyValue "stack:" :valueId "29") (slot :keyClass "ByteSymbol" :keyValue "theStack" :valueId "30") (slot :keyClass "ByteSymbol" :keyValue "theStack:" :valueId "31")) (ByteString :idref "20" :value "backgroundCostume\r\t^ BackgroundCostume" :basicSize "38") (ByteString :idref "21" :value "backgroundCostume: t1 \r\tBackgroundCostume := t1" :basicSize "47") (ByteString :idref "22" :value "backgroundName\r\t^ BackgroundName" :basicSize "32") (ByteString :idref "23" :value "backgroundName: t1 \r\tBackgroundName := t1" :basicSize "41") (ByteString :idref "24" :value "backgroundVarInfo\r\t^ BackgroundVarInfo" :basicSize "38") (ByteString :idref "25" :value "backgroundVarInfo: t1 \r\tBackgroundVarInfo := t1" :basicSize "47") (ByteString :idref "26" :value "bkgndID\r\t^ BkgndID" :basicSize "18") (ByteString :idref "27" :value "bkgndID: t1 \r\tBkgndID := t1" :basicSize "27") (ByteString :idref "28" :value "stack\r\t^ TheStack" :basicSize "17") (ByteString :idref "29" :value "stack: t1 \r\tTheStack := t1" :basicSize "26") (ByteString :idref "30" :value "theStack\r\t^ TheStack" :basicSize "20") (ByteString :idref "31" :value "theStack: t1 \r\tTheStack := t1" :basicSize "29") (LDBJrPage :idref "32" :uniclass "237" (slot :idref "33" :name "cardName") (slot :class "SmallInteger" :value "7330930" :name "ouPageID") (slot :class "SmallInteger" :value "1" :name "ouCardIndex") (slot :idref "34" :name "viewOrder") (slot :idref "35" :name "viewOrderMask") (slot :idref "36" :name "playfield")) (ByteString :idref "33" :value "phaser2" :basicSize "7") (LCollection :idref "34" :size "1" (slot :class "ByteSymbol" :value "playfield" :name "1")) (ByteString :idref "35" :value "C" :basicSize "1") (LBox :idref "36" :contentsCollectionClass "LCollection" :uniclass "217" (slot :idref "37" :name "components") (slot :idref "40" :name "transformation") (slot :idref "41" :name "shape") (slot :class "Point" :value "0.5@0.5" :name "pivotRatio") (slot :idref "43" :name "kWorld") (slot :class "True" :value "true" :name "cardSpecific") (slot :class "False" :value "false" :name "layoutChanged") (slot :idref "10" :name "menuContributors") (slot :idref "150" :name "name") (slot :idref "151" :name "steppers") (slot :idref "152" :name "1") (slot :idref "169" :name "2") (slot :idref "183" :name "3") (slot :idref "197" :name "4")) (IdentityDictionary :idref "37" (slot :keyClass "ByteSymbol" :keyValue "StepHandler" :valueId "38")) (LStepHandler :idref "38" (slot :idref "36" :name "whole") (slot :class "False" :value "false" :name "stepping") (slot :class "SmallInteger" :value "50" :name "stepTime") (slot :idref "36" :name "target") (slot :class "ByteSymbol" :value "step" :name "selector") (slot :idref "39" :name "arguments")) (Array :idref "39" :basicSize "0") (MatrixTransform2x3 :idref "40" :value "P4AAAAAAAABAAAAAAAAAAD+AAABAAAAA" :basicSize "6") (LBoxShape :idref "41" (slot :idref "42" :name "fill") (slot :class "Point" :value "790@590" :name "extent") (slot :class "Color" :value "0 255" :name "borderColor") (slot :class "SmallInteger" :value "0" :name "borderWidth") (slot :class "False" :value "false" :name "infinite")) (GeziraFillUniform :idref "42" (slot :class "Float" :value "P/AAAAAAAAA=" :name "alpha") (slot :class "Float" :value "P/AAAAAAAAA=" :name "red") (slot :class "Float" :value "P/AAAAAAAAA=" :name "green") (slot :class "Float" :value "P/AAAAAAAAA=" :name "blue")) (KObject :idref "43" (slot :idref "44" :name "properties")) (IdentityDictionary :idref "44" (slot :keyClass "ByteSymbol" :keyValue "formulae" :valueId "45") (slot :keyClass "ByteSymbol" :keyValue "objectsPool" :valueId "149")) (IdentityDictionary :idref "45" (slot :keyClass "ByteSymbol" :keyValue "h0" :valueId "46") (slot :keyClass "ByteSymbol" :keyValue "h1" :valueId "49") (slot :keyClass "ByteSymbol" :keyValue "h2" :valueId "52") (slot :keyClass "ByteSymbol" :keyValue "h3" :valueId "55") (slot :keyClass "ByteSymbol" :keyValue "l1" :valueId "58") (slot :keyClass "ByteSymbol" :keyValue "l2" :valueId "61") (slot :keyClass "ByteSymbol" :keyValue "l3" :valueId "64") (slot :keyClass "ByteSymbol" :keyValue "r1" :valueId "67") (slot :keyClass "ByteSymbol" :keyValue "r2" :valueId "70") (slot :keyClass "ByteSymbol" :keyValue "r3" :valueId "73") (slot :keyClass "ByteSymbol" :keyValue "tt10" :valueId "58") (slot :keyClass "ByteSymbol" :keyValue "tt12" :valueId "76") (slot :keyClass "ByteSymbol" :keyValue "tt13" :valueId "79") (slot :keyClass "ByteSymbol" :keyValue "tt14" :valueId "82") (slot :keyClass "ByteSymbol" :keyValue "tt15" :valueId "85") (slot :keyClass "ByteSymbol" :keyValue "tt16" :valueId "88") (slot :keyClass "ByteSymbol" :keyValue "tt17" :valueId "70") (slot :keyClass "ByteSymbol" :keyValue "tt19" :valueId "61") (slot :keyClass "ByteSymbol" :keyValue "tt21" :valueId "91") (slot :keyClass "ByteSymbol" :keyValue "tt22" :valueId "94") (slot :keyClass "ByteSymbol" :keyValue "tt23" :valueId "97") (slot :keyClass "ByteSymbol" :keyValue "tt24" :valueId "100") (slot :keyClass "ByteSymbol" :keyValue "tt25" :valueId "103") (slot :keyClass "ByteSymbol" :keyValue "tt26" :valueId "73") (slot :keyClass "ByteSymbol" :keyValue "tt28" :valueId "64") (slot :keyClass "ByteSymbol" :keyValue "tt3" :valueId "106") (slot :keyClass "ByteSymbol" :keyValue "tt34" :valueId "109") (slot :keyClass "ByteSymbol" :keyValue "tt35" :valueId "112") (slot :keyClass "ByteSymbol" :keyValue "tt36" :valueId "46") (slot :keyClass "ByteSymbol" :keyValue "tt37" :valueId "116") (slot :keyClass "ByteSymbol" :keyValue "tt38" :valueId "119") (slot :keyClass "ByteSymbol" :keyValue "tt39" :valueId "49") (slot :keyClass "ByteSymbol" :keyValue "tt4" :valueId "123") (slot :keyClass "ByteSymbol" :keyValue "tt40" :valueId "126") (slot :keyClass "ByteSymbol" :keyValue "tt41" :valueId "129") (slot :keyClass "ByteSymbol" :keyValue "tt42" :valueId "52") (slot :keyClass "ByteSymbol" :keyValue "tt43" :valueId "133") (slot :keyClass "ByteSymbol" :keyValue "tt44" :valueId "136") (slot :keyClass "ByteSymbol" :keyValue "tt45" :valueId "55") (slot :keyClass "ByteSymbol" :keyValue "tt5" :valueId "140") (slot :keyClass "ByteSymbol" :keyValue "tt6" :valueId "143") (slot :keyClass "ByteSymbol" :keyValue "tt7" :valueId "146") (slot :keyClass "ByteSymbol" :keyValue "tt8" :valueId "67")) (KEventStream :idref "46" (slot :class "SmallInteger" :value "11606152" :name "lastTime") (slot :class "Float" :value "P564UeuFHrg=" :name "value") (slot :idref "47" :name "source") (slot :class "ByteSymbol" :value "update" :name "type") (slot :class "BlockClosure" :value "[:t1 :t2 :t3 :t4 | \r(t2 formulaAt: t3) isEventStream\r\t\tifFalse: [t2 formulaAt: t3 put: t1].\r\tt4]" :name "closure") (slot :idref "48" :name "sources") (slot :class "ByteSymbol" :value "h0" :name "updating") (slot :class "True" :value "true" :name "visited")) (ByteString :idref "47" :value "h0@20 = h0 + r0" :basicSize "15") (Array :idref "48" :basicSize "1" (slot :class "ByteSymbol" :value "tt35" :name "1")) (KEventStream :idref "49" (slot :class "SmallInteger" :value "11606152" :name "lastTime") (slot :class "Float" :value "v7cKPXCj1wo=" :name "value") (slot :idref "50" :name "source") (slot :class "ByteSymbol" :value "update" :name "type") (slot :class "BlockClosure" :value "[:t1 :t2 :t3 :t4 | \r(t2 formulaAt: t3) isEventStream\r\t\tifFalse: [t2 formulaAt: t3 put: t1].\r\tt4]" :name "closure") (slot :idref "51" :name "sources") (slot :class "ByteSymbol" :value "h1" :name "updating") (slot :class "True" :value "true" :name "visited")) (ByteString :idref "50" :value "h1@20 = h1 + r1" :basicSize "15") (Array :idref "51" :basicSize "1" (slot :class "ByteSymbol" :value "tt38" :name "1")) (KEventStream :idref "52" (slot :class "SmallInteger" :value "11606152" :name "lastTime") (slot :class "Float" :value "P8MzMzMzMzM=" :name "value") (slot :idref "53" :name "source") (slot :class "ByteSymbol" :value "update" :name "type") (slot :class "BlockClosure" :value "[:t1 :t2 :t3 :t4 | \r(t2 formulaAt: t3) isEventStream\r\t\tifFalse: [t2 formulaAt: t3 put: t1].\r\tt4]" :name "closure") (slot :idref "54" :name "sources") (slot :class "ByteSymbol" :value "h2" :name "updating") (slot :class "True" :value "true" :name "visited")) (ByteString :idref "53" :value "h2@20 = h2 + r2" :basicSize "15") (Array :idref "54" :basicSize "1" (slot :class "ByteSymbol" :value "tt41" :name "1")) (KEventStream :idref "55" (slot :class "SmallInteger" :value "11606152" :name "lastTime") (slot :class "Float" :value "v8rhR64UeuE=" :name "value") (slot :idref "56" :name "source") (slot :class "ByteSymbol" :value "update" :name "type") (slot :class "BlockClosure" :value "[:t1 :t2 :t3 :t4 | \r(t2 formulaAt: t3) isEventStream\r\t\tifFalse: [t2 formulaAt: t3 put: t1].\r\tt4]" :name "closure") (slot :idref "57" :name "sources") (slot :class "ByteSymbol" :value "h3" :name "updating") (slot :class "True" :value "true" :name "visited")) (ByteString :idref "56" :value "h3@20 = h3 + r3" :basicSize "15") (Array :idref "57" :basicSize "1" (slot :class "ByteSymbol" :value "tt44" :name "1")) (KEventStream :idref "58" (slot :class "SmallInteger" :value "11606152" :name "lastTime") (slot :class "Float" :value "QEkAAAAAAAA=" :name "value") (slot :idref "59" :name "source") (slot :class "ByteSymbol" :value "expr" :name "type") (slot :class "BlockClosure" :value "[:t1 :t2 | t2 / 2]" :name "closure") (slot :idref "60" :name "sources") (slot :class "True" :value "true" :name "visited")) (ByteString :idref "59" :value "l0 / 2" :basicSize "6") (Array :idref "60" :basicSize "1" (slot :class "ByteSymbol" :value "l0" :name "1")) (KEventStream :idref "61" (slot :class "SmallInteger" :value "11606152" :name "lastTime") (slot :class "Float" :value "QECqqqqqqqs=" :name "value") (slot :idref "62" :name "source") (slot :class "ByteSymbol" :value "expr" :name "type") (slot :class "BlockClosure" :value "[:t1 :t2 | t2 / 3]" :name "closure") (slot :idref "63" :name "sources") (slot :class "True" :value "true" :name "visited")) (ByteString :idref "62" :value "l0 / 3" :basicSize "6") (Array :idref "63" :basicSize "1" (slot :class "ByteSymbol" :value "l0" :name "1")) (KEventStream :idref "64" (slot :class "SmallInteger" :value "11606152" :name "lastTime") (slot :class "Float" :value "QDkAAAAAAAA=" :name "value") (slot :idref "65" :name "source") (slot :class "ByteSymbol" :value "expr" :name "type") (slot :class "BlockClosure" :value "[:t1 :t2 | t2 / 4]" :name "closure") (slot :idref "66" :name "sources") (slot :class "True" :value "true" :name "visited")) (ByteString :idref "65" :value "l0 / 4" :basicSize "6") (Array :idref "66" :basicSize "1" (slot :class "ByteSymbol" :value "l0" :name "1")) (KEventStream :idref "67" (slot :class "SmallInteger" :value "11606152" :name "lastTime") (slot :class "Float" :value "v7cKPXCj1wo=" :name "value") (slot :idref "68" :name "source") (slot :class "ByteSymbol" :value "expr" :name "type") (slot :class "BlockClosure" :value "[:t1 :t2 :t3 | t2 * t3]" :name "closure") (slot :idref "69" :name "sources") (slot :class "True" :value "true" :name "visited")) (ByteString :idref "68" :value "(r0 * 2 + abs(r0)) * -sign(r0)" :basicSize "30") (Array :idref "69" :basicSize "2" (slot :class "ByteSymbol" :value "tt5" :name "1") (slot :class "ByteSymbol" :value "tt7" :name "2")) (KEventStream :idref "70" (slot :class "SmallInteger" :value "11606152" :name "lastTime") (slot :class "Float" :value "P8MzMzMzMzM=" :name "value") (slot :idref "71" :name "source") (slot :class "ByteSymbol" :value "expr" :name "type") (slot :class "BlockClosure" :value "[:t1 :t2 :t3 | t2 * t3]" :name "closure") (slot :idref "72" :name "sources") (slot :class "True" :value "true" :name "visited")) (ByteString :idref "71" :value "(r0 * 2 + abs(r1)) * -sign(r1)" :basicSize "30") (Array :idref "72" :basicSize "2" (slot :class "ByteSymbol" :value "tt14" :name "1") (slot :class "ByteSymbol" :value "tt16" :name "2")) (KEventStream :idref "73" (slot :class "SmallInteger" :value "11606152" :name "lastTime") (slot :class "Float" :value "v8rhR64UeuE=" :name "value") (slot :idref "74" :name "source") (slot :class "ByteSymbol" :value "expr" :name "type") (slot :class "BlockClosure" :value "[:t1 :t2 :t3 | t2 * t3]" :name "closure") (slot :idref "75" :name "sources") (slot :class "True" :value "true" :name "visited")) (ByteString :idref "74" :value "(r0 * 2 + abs(r2)) * -sign(r2)" :basicSize "30") (Array :idref "75" :basicSize "2" (slot :class "ByteSymbol" :value "tt23" :name "1") (slot :class "ByteSymbol" :value "tt25" :name "2")) (KEventStream :idref "76" (slot :class "SmallInteger" :value "11606152" :name "lastTime") (slot :class "Float" :value "P664UeuFHrg=" :name "value") (slot :idref "77" :name "source") (slot :class "ByteSymbol" :value "expr" :name "type") (slot :class "BlockClosure" :value "[:t1 :t2 | t2 * 2]" :name "closure") (slot :idref "78" :name "sources") (slot :class "True" :value "true" :name "visited")) (ByteString :idref "77" :value "r0 * 2" :basicSize "6") (Array :idref "78" :basicSize "1" (slot :class "ByteSymbol" :value "r0" :name "1")) (KEventStream :idref "79" (slot :class "SmallInteger" :value "11606152" :name "lastTime") (slot :class "Float" :value "P7cKPXCj1wo=" :name "value") (slot :idref "80" :name "source") (slot :class "ByteSymbol" :value "call" :name "type") (slot :class "BlockClosure" :value "[:t1 :t2 :t3 | t2 perform: #abs: with: {t3}]" :name "closure") (slot :idref "81" :name "sources") (slot :class "True" :value "true" :name "visited")) (ByteString :idref "80" :value "abs(r1)" :basicSize "7") (Array :idref "81" :basicSize "2" (slot :class "ByteSymbol" :value "THIS" :name "1") (slot :class "ByteSymbol" :value "r1" :name "2")) (KEventStream :idref "82" (slot :class "SmallInteger" :value "11606152" :name "lastTime") (slot :class "Float" :value "P8MzMzMzMzM=" :name "value") (slot :idref "83" :name "source") (slot :class "ByteSymbol" :value "expr" :name "type") (slot :class "BlockClosure" :value "[:t1 :t2 :t3 | t2 + t3]" :name "closure") (slot :idref "84" :name "sources") (slot :class "True" :value "true" :name "visited")) (ByteString :idref "83" :value "r0 * 2 + abs(r1)" :basicSize "16") (Array :idref "84" :basicSize "2" (slot :class "ByteSymbol" :value "tt12" :name "1") (slot :class "ByteSymbol" :value "tt13" :name "2")) (KEventStream :idref "85" (slot :class "SmallInteger" :value "11606152" :name "lastTime") (slot :class "SmallInteger" :value "-1" :name "value") (slot :idref "86" :name "source") (slot :class "ByteSymbol" :value "call" :name "type") (slot :class "BlockClosure" :value "[:t1 :t2 :t3 | t2 perform: #sign: with: {t3}]" :name "closure") (slot :idref "87" :name "sources") (slot :class "True" :value "true" :name "visited")) (ByteString :idref "86" :value "sign(r1)" :basicSize "8") (Array :idref "87" :basicSize "2" (slot :class "ByteSymbol" :value "THIS" :name "1") (slot :class "ByteSymbol" :value "r1" :name "2")) (KEventStream :idref "88" (slot :class "SmallInteger" :value "11606152" :name "lastTime") (slot :class "SmallInteger" :value "1" :name "value") (slot :idref "89" :name "source") (slot :class "ByteSymbol" :value "expr" :name "type") (slot :class "BlockClosure" :value "[:t1 :t2 | t2 negated]" :name "closure") (slot :idref "90" :name "sources") (slot :class "True" :value "true" :name "visited")) (ByteString :idref "89" :value "-sign(r1)" :basicSize "9") (Array :idref "90" :basicSize "1" (slot :class "ByteSymbol" :value "tt15" :name "1")) (KEventStream :idref "91" (slot :class "SmallInteger" :value "11606152" :name "lastTime") (slot :class "Float" :value "P664UeuFHrg=" :name "value") (slot :idref "92" :name "source") (slot :class "ByteSymbol" :value "expr" :name "type") (slot :class "BlockClosure" :value "[:t1 :t2 | t2 * 2]" :name "closure") (slot :idref "93" :name "sources") (slot :class "True" :value "true" :name "visited")) (ByteString :idref "92" :value "r0 * 2" :basicSize "6") (Array :idref "93" :basicSize "1" (slot :class "ByteSymbol" :value "r0" :name "1")) (KEventStream :idref "94" (slot :class "SmallInteger" :value "11606152" :name "lastTime") (slot :class "Float" :value "P8MzMzMzMzM=" :name "value") (slot :idref "95" :name "source") (slot :class "ByteSymbol" :value "call" :name "type") (slot :class "BlockClosure" :value "[:t1 :t2 :t3 | t2 perform: #abs: with: {t3}]" :name "closure") (slot :idref "96" :name "sources") (slot :class "True" :value "true" :name "visited")) (ByteString :idref "95" :value "abs(r2)" :basicSize "7") (Array :idref "96" :basicSize "2" (slot :class "ByteSymbol" :value "THIS" :name "1") (slot :class "ByteSymbol" :value "r2" :name "2")) (KEventStream :idref "97" (slot :class "SmallInteger" :value "11606152" :name "lastTime") (slot :class "Float" :value "P8rhR64UeuE=" :name "value") (slot :idref "98" :name "source") (slot :class "ByteSymbol" :value "expr" :name "type") (slot :class "BlockClosure" :value "[:t1 :t2 :t3 | t2 + t3]" :name "closure") (slot :idref "99" :name "sources") (slot :class "True" :value "true" :name "visited")) (ByteString :idref "98" :value "r0 * 2 + abs(r2)" :basicSize "16") (Array :idref "99" :basicSize "2" (slot :class "ByteSymbol" :value "tt21" :name "1") (slot :class "ByteSymbol" :value "tt22" :name "2")) (KEventStream :idref "100" (slot :class "SmallInteger" :value "11606152" :name "lastTime") (slot :class "SmallInteger" :value "1" :name "value") (slot :idref "101" :name "source") (slot :class "ByteSymbol" :value "call" :name "type") (slot :class "BlockClosure" :value "[:t1 :t2 :t3 | t2 perform: #sign: with: {t3}]" :name "closure") (slot :idref "102" :name "sources") (slot :class "True" :value "true" :name "visited")) (ByteString :idref "101" :value "sign(r2)" :basicSize "8") (Array :idref "102" :basicSize "2" (slot :class "ByteSymbol" :value "THIS" :name "1") (slot :class "ByteSymbol" :value "r2" :name "2")) (KEventStream :idref "103" (slot :class "SmallInteger" :value "11606152" :name "lastTime") (slot :class "SmallInteger" :value "-1" :name "value") (slot :idref "104" :name "source") (slot :class "ByteSymbol" :value "expr" :name "type") (slot :class "BlockClosure" :value "[:t1 :t2 | t2 negated]" :name "closure") (slot :idref "105" :name "sources") (slot :class "True" :value "true" :name "visited")) (ByteString :idref "104" :value "-sign(r2)" :basicSize "9") (Array :idref "105" :basicSize "1" (slot :class "ByteSymbol" :value "tt24" :name "1")) (KEventStream :idref "106" (slot :class "SmallInteger" :value "11606152" :name "lastTime") (slot :class "Float" :value "P664UeuFHrg=" :name "value") (slot :idref "107" :name "source") (slot :class "ByteSymbol" :value "expr" :name "type") (slot :class "BlockClosure" :value "[:t1 :t2 | t2 * 2]" :name "closure") (slot :idref "108" :name "sources") (slot :class "True" :value "true" :name "visited")) (ByteString :idref "107" :value "r0 * 2" :basicSize "6") (Array :idref "108" :basicSize "1" (slot :class "ByteSymbol" :value "r0" :name "1")) (KEventStream :idref "109" (slot :class "SmallInteger" :value "11606152" :name "lastTime") (slot :class "SmallInteger" :value "11606152" :name "value") (slot :idref "110" :name "source") (slot :class "ByteSymbol" :value "timerB" :name "type") (slot :class "BlockClosure" :value "[:t1 :t2 | t1 timerB: t2]" :name "closure") (slot :idref "111" :name "sources") (slot :class "SmallInteger" :value "20" :name "interval") (slot :class "True" :value "true" :name "visited")) (ByteString :idref "110" :value "20" :basicSize "2") (Array :idref "111" :basicSize "0") (KEventStream :idref "112" (slot :class "SmallInteger" :value "11606152" :name "lastTime") (slot :class "Float" :value "P564UeuFHrg=" :name "value") (slot :idref "113" :name "source") (slot :class "ByteSymbol" :value "updateExpr" :name "type") (slot :class "BlockClosure" :value "[:t1 :t2 :t3 | t3\r\t\t+ (t2 get: #r0)]" :name "closure") (slot :idref "114" :name "sources") (slot :class "ByteSymbol" :value "h0" :name "updating") (slot :class "True" :value "true" :name "visited")) (ByteString :idref "113" :value "h0 + r0" :basicSize "7") (Array :idref "114" :basicSize "2" (slot :idref "115" :name "1") (slot :class "ByteSymbol" :value "r0" :name "2")) (Array :idref "115" :basicSize "2" (slot :class "ByteSymbol" :value "ref" :name "1") (slot :class "ByteSymbol" :value "tt34" :name "2")) (KEventStream :idref "116" (slot :class "SmallInteger" :value "11606152" :name "lastTime") (slot :class "SmallInteger" :value "11606152" :name "value") (slot :idref "117" :name "source") (slot :class "ByteSymbol" :value "timerB" :name "type") (slot :class "BlockClosure" :value "[:t1 :t2 | t1 timerB: t2]" :name "closure") (slot :idref "118" :name "sources") (slot :class "SmallInteger" :value "20" :name "interval") (slot :class "True" :value "true" :name "visited")) (ByteString :idref "117" :value "20" :basicSize "2") (Array :idref "118" :basicSize "0") (KEventStream :idref "119" (slot :class "SmallInteger" :value "11606152" :name "lastTime") (slot :class "Float" :value "v7cKPXCj1wo=" :name "value") (slot :idref "120" :name "source") (slot :class "ByteSymbol" :value "updateExpr" :name "type") (slot :class "BlockClosure" :value "[:t1 :t2 :t3 | t3\r\t\t+ (t2 get: #r1)]" :name "closure") (slot :idref "121" :name "sources") (slot :class "ByteSymbol" :value "h1" :name "updating") (slot :class "True" :value "true" :name "visited")) (ByteString :idref "120" :value "h1 + r1" :basicSize "7") (Array :idref "121" :basicSize "2" (slot :idref "122" :name "1") (slot :class "ByteSymbol" :value "r1" :name "2")) (Array :idref "122" :basicSize "2" (slot :class "ByteSymbol" :value "ref" :name "1") (slot :class "ByteSymbol" :value "tt37" :name "2")) (KEventStream :idref "123" (slot :class "SmallInteger" :value "11606152" :name "lastTime") (slot :class "Float" :value "P564UeuFHrg=" :name "value") (slot :idref "124" :name "source") (slot :class "ByteSymbol" :value "call" :name "type") (slot :class "BlockClosure" :value "[:t1 :t2 :t3 | t2 perform: #abs: with: {t3}]" :name "closure") (slot :idref "125" :name "sources") (slot :class "True" :value "true" :name "visited")) (ByteString :idref "124" :value "abs(r0)" :basicSize "7") (Array :idref "125" :basicSize "2" (slot :class "ByteSymbol" :value "THIS" :name "1") (slot :class "ByteSymbol" :value "r0" :name "2")) (KEventStream :idref "126" (slot :class "SmallInteger" :value "11606152" :name "lastTime") (slot :class "SmallInteger" :value "11606152" :name "value") (slot :idref "127" :name "source") (slot :class "ByteSymbol" :value "timerB" :name "type") (slot :class "BlockClosure" :value "[:t1 :t2 | t1 timerB: t2]" :name "closure") (slot :idref "128" :name "sources") (slot :class "SmallInteger" :value "20" :name "interval") (slot :class "True" :value "true" :name "visited")) (ByteString :idref "127" :value "20" :basicSize "2") (Array :idref "128" :basicSize "0") (KEventStream :idref "129" (slot :class "SmallInteger" :value "11606152" :name "lastTime") (slot :class "Float" :value "P8MzMzMzMzM=" :name "value") (slot :idref "130" :name "source") (slot :class "ByteSymbol" :value "updateExpr" :name "type") (slot :class "BlockClosure" :value "[:t1 :t2 :t3 | t3\r\t\t+ (t2 get: #r2)]" :name "closure") (slot :idref "131" :name "sources") (slot :class "ByteSymbol" :value "h2" :name "updating") (slot :class "True" :value "true" :name "visited")) (ByteString :idref "130" :value "h2 + r2" :basicSize "7") (Array :idref "131" :basicSize "2" (slot :idref "132" :name "1") (slot :class "ByteSymbol" :value "r2" :name "2")) (Array :idref "132" :basicSize "2" (slot :class "ByteSymbol" :value "ref" :name "1") (slot :class "ByteSymbol" :value "tt40" :name "2")) (KEventStream :idref "133" (slot :class "SmallInteger" :value "11606152" :name "lastTime") (slot :class "SmallInteger" :value "11606152" :name "value") (slot :idref "134" :name "source") (slot :class "ByteSymbol" :value "timerB" :name "type") (slot :class "BlockClosure" :value "[:t1 :t2 | t1 timerB: t2]" :name "closure") (slot :idref "135" :name "sources") (slot :class "SmallInteger" :value "20" :name "interval") (slot :class "True" :value "true" :name "visited")) (ByteString :idref "134" :value "20" :basicSize "2") (Array :idref "135" :basicSize "0") (KEventStream :idref "136" (slot :class "SmallInteger" :value "11606152" :name "lastTime") (slot :class "Float" :value "v8rhR64UeuE=" :name "value") (slot :idref "137" :name "source") (slot :class "ByteSymbol" :value "updateExpr" :name "type") (slot :class "BlockClosure" :value "[:t1 :t2 :t3 | t3\r\t\t+ (t2 get: #r3)]" :name "closure") (slot :idref "138" :name "sources") (slot :class "ByteSymbol" :value "h3" :name "updating") (slot :class "True" :value "true" :name "visited")) (ByteString :idref "137" :value "h3 + r3" :basicSize "7") (Array :idref "138" :basicSize "2" (slot :idref "139" :name "1") (slot :class "ByteSymbol" :value "r3" :name "2")) (Array :idref "139" :basicSize "2" (slot :class "ByteSymbol" :value "ref" :name "1") (slot :class "ByteSymbol" :value "tt43" :name "2")) (KEventStream :idref "140" (slot :class "SmallInteger" :value "11606152" :name "lastTime") (slot :class "Float" :value "P7cKPXCj1wo=" :name "value") (slot :idref "141" :name "source") (slot :class "ByteSymbol" :value "expr" :name "type") (slot :class "BlockClosure" :value "[:t1 :t2 :t3 | t2 + t3]" :name "closure") (slot :idref "142" :name "sources") (slot :class "True" :value "true" :name "visited")) (ByteString :idref "141" :value "r0 * 2 + abs(r0)" :basicSize "16") (Array :idref "142" :basicSize "2" (slot :class "ByteSymbol" :value "tt3" :name "1") (slot :class "ByteSymbol" :value "tt4" :name "2")) (KEventStream :idref "143" (slot :class "SmallInteger" :value "11606152" :name "lastTime") (slot :class "SmallInteger" :value "1" :name "value") (slot :idref "144" :name "source") (slot :class "ByteSymbol" :value "call" :name "type") (slot :class "BlockClosure" :value "[:t1 :t2 :t3 | t2 perform: #sign: with: {t3}]" :name "closure") (slot :idref "145" :name "sources") (slot :class "True" :value "true" :name "visited")) (ByteString :idref "144" :value "sign(r0)" :basicSize "8") (Array :idref "145" :basicSize "2" (slot :class "ByteSymbol" :value "THIS" :name "1") (slot :class "ByteSymbol" :value "r0" :name "2")) (KEventStream :idref "146" (slot :class "SmallInteger" :value "11606152" :name "lastTime") (slot :class "SmallInteger" :value "-1" :name "value") (slot :idref "147" :name "source") (slot :class "ByteSymbol" :value "expr" :name "type") (slot :class "BlockClosure" :value "[:t1 :t2 | t2 negated]" :name "closure") (slot :idref "148" :name "sources") (slot :class "True" :value "true" :name "visited")) (ByteString :idref "147" :value "-sign(r0)" :basicSize "9") (Array :idref "148" :basicSize "1" (slot :class "ByteSymbol" :value "tt6" :name "1")) (IdentityDictionary :idref "149" (slot :keyClass "ByteSymbol" :keyValue "h0" :valueId "46") (slot :keyClass "ByteSymbol" :keyValue "h1" :valueId "49") (slot :keyClass "ByteSymbol" :keyValue "h2" :valueId "52") (slot :keyClass "ByteSymbol" :keyValue "h3" :valueId "55") (slot :keyClass "ByteSymbol" :keyValue "l0" :valueClass "Float" :valueValue "QFkAAAAAAAA=") (slot :keyClass "ByteSymbol" :keyValue "l1" :valueId "58") (slot :keyClass "ByteSymbol" :keyValue "l2" :valueId "61") (slot :keyClass "ByteSymbol" :keyValue "l3" :valueId "64") (slot :keyClass "ByteSymbol" :keyValue "r0" :valueClass "Float" :valueValue "P564UeuFHrg=") (slot :keyClass "ByteSymbol" :keyValue "r1" :valueId "67") (slot :keyClass "ByteSymbol" :keyValue "r2" :valueId "70") (slot :keyClass "ByteSymbol" :keyValue "r3" :valueId "73")) (ByteString :idref "150" :value "playfield" :basicSize "9") (IdentityDictionary :idref "151" (slot :keyClass "ByteSymbol" :keyValue "step" :valueId "38")) (LBox :idref "152" :uniclass "164" (slot :idref "153" :name "components") (slot :idref "162" :name "transformation") (slot :idref "163" :name "shape") (slot :class "Point" :value "0@0" :name "pivotRatio") (slot :class "False" :value "false" :name "layoutChanged") (slot :idref "10" :name "menuContributors") (slot :class "ByteSymbol" :value "button3" :name "name") (span :familyName "DejaVuSans" :pointSize "12.0" :color "0 255" :style "0" (data :data "setup"))) (IdentityDictionary :idref "153" (slot :keyClass "ByteSymbol" :keyValue "ButtonHandler" :valueId "154") (slot :keyClass "ByteSymbol" :keyValue "Layout" :valueId "157")) (LButtonHandler :idref "154" (slot :idref "155" :name "properties") (slot :idref "152" :name "whole") (slot :class "SmallInteger" :value "111" :name "modifierMask") (slot :class "SmallInteger" :value "16" :name "modifierRejectMask") (slot :idref "152" :name "target") (slot :class "ByteSymbol" :value "fire" :name "selector") (slot :class "False" :value "false" :name "pressed") (slot :class "False" :value "false" :name "entered") (slot :class "False" :value "false" :name "announces")) (IdentityDictionary :idref "155" (slot :keyClass "ByteSymbol" :keyValue "defaultFill" :valueId "156")) (GeziraFillUniform :idref "156" (slot :class "Float" :value "P/AAAAAAAAA=" :name "alpha") (slot :class "Float" :value "P/AAAAAAAAA=" :name "red") (slot :class "Float" :value "P/AAAAAAAAA=" :name "green") (slot :class "Float" :value "P/AAAAAAAAA=" :name "blue")) (LLineEditor :idref "157" (slot :class "SmallInteger" :value "109" :name "modifierMask") (slot :class "SmallInteger" :value "18" :name "modifierRejectMask") (slot :class "Point" :value "2@1" :name "inset") (slot :idref "158" :name "font") (slot :class "Interval" :value "0 1 1" :name "selection") (slot :class "SmallInteger" :value "1" :name "selectionAnchor") (slot :class "Interval" :value "30 500 30" :name "tabArray") (slot :idref "161" :name "undoStack") (slot :class "Float" :value "QC20AAAAAAA=" :name "maxHeight") (slot :class "SmallInteger" :value "0" :name "missingHeight") (slot :class "Float" :value "QA4wAAAAAAA=" :name "maxDescent") (slot :class "False" :value "false" :name "autoVerticalResize") (slot :class "ByteSymbol" :value "center" :name "justification") (slot :class "False" :value "false" :name "valueChanged") (slot :class "True" :value "true" :name "isLabel") (slot :class "Float" :value "QFdygAAAAAA=" :name "naturalLength")) (LFont :idref "158" (slot :idref "159" :name "face") (slot :class "Float" :value "QCgAAAAAAAA=" :name "pointSize")) (LFace :idref "159" (slot :idref "160" :name "family") (slot :class "SmallInteger" :value "0" :name "style")) (LFamily :idref "160" (slot :class "ByteSymbol" :value "DejaVuSans" :name "name")) (OrderedCollection :idref "161" :size "0") (MatrixTransform2x3 :idref "162" :value "P4AAAAAAAABEKGFsAAAAAD+AAABBQm7n" :basicSize "6") (LBoxShape :idref "163" (slot :idref "156" :name "fill") (slot :class "Point" :value "93.7890625@20.625" :name "extent") (slot :class "Color" :value "0 255" :name "borderColor") (slot :class "SmallInteger" :value "1" :name "borderWidth") (slot :class "False" :value "false" :name "infinite") (slot :class "SmallInteger" :value "5" :name "cornerRadius")) (LBox :idref "164" :metaclass "true" :slotsString "" :uniclass "164" (slot :idref "165" :name "scripts") (slot :idref "168" :name "classPool")) (IdentityDictionary :idref "165" (slot :keyClass "ByteSymbol" :keyValue "fire" :valueId "166")) (LScript :idref "166" (slot :idref "167" :name "definition")) (ByteString :idref "167" :value "fire\r\tcontainer setup" :basicSize "21") (Dictionary :idref "168") (LBox :idref "169" :uniclass "178" (slot :idref "170" :name "components") (slot :idref "176" :name "transformation") (slot :idref "177" :name "shape") (slot :class "Point" :value "0@0" :name "pivotRatio") (slot :class "False" :value "false" :name "layoutChanged") (slot :idref "10" :name "menuContributors") (slot :class "ByteSymbol" :value "button2" :name "name") (span :familyName "DejaVuSans" :pointSize "12.0" :color "0 255" :style "0" (data :data "start"))) (IdentityDictionary :idref "170" (slot :keyClass "ByteSymbol" :keyValue "ButtonHandler" :valueId "171") (slot :keyClass "ByteSymbol" :keyValue "Layout" :valueId "174")) (LButtonHandler :idref "171" (slot :idref "172" :name "properties") (slot :idref "169" :name "whole") (slot :class "SmallInteger" :value "111" :name "modifierMask") (slot :class "SmallInteger" :value "16" :name "modifierRejectMask") (slot :idref "169" :name "target") (slot :class "ByteSymbol" :value "fire" :name "selector") (slot :class "False" :value "false" :name "pressed") (slot :class "False" :value "false" :name "entered") (slot :class "False" :value "false" :name "announces")) (IdentityDictionary :idref "172" (slot :keyClass "ByteSymbol" :keyValue "defaultFill" :valueId "173")) (GeziraFillUniform :idref "173" (slot :class "Float" :value "P/AAAAAAAAA=" :name "alpha") (slot :class "Float" :value "P/AAAAAAAAA=" :name "red") (slot :class "Float" :value "P/AAAAAAAAA=" :name "green") (slot :class "Float" :value "P/AAAAAAAAA=" :name "blue")) (LLineEditor :idref "174" (slot :class "SmallInteger" :value "109" :name "modifierMask") (slot :class "SmallInteger" :value "18" :name "modifierRejectMask") (slot :class "Point" :value "2@1" :name "inset") (slot :idref "158" :name "font") (slot :class "Interval" :value "0 1 1" :name "selection") (slot :class "SmallInteger" :value "1" :name "selectionAnchor") (slot :class "Interval" :value "30 500 30" :name "tabArray") (slot :idref "175" :name "undoStack") (slot :class "Float" :value "QC20AAAAAAA=" :name "maxHeight") (slot :class "SmallInteger" :value "0" :name "missingHeight") (slot :class "Float" :value "QA4wAAAAAAA=" :name "maxDescent") (slot :class "False" :value "false" :name "autoVerticalResize") (slot :class "ByteSymbol" :value "center" :name "justification") (slot :class "False" :value "false" :name "valueChanged") (slot :class "True" :value "true" :name "isLabel") (slot :class "Float" :value "QFdygAAAAAA=" :name "naturalLength")) (OrderedCollection :idref "175" :size "0") (MatrixTransform2x3 :idref "176" :value "P4AAAAAAAABD7Kw/AAAAAD+AAABBVCEG" :basicSize "6") (LBoxShape :idref "177" (slot :idref "173" :name "fill") (slot :class "Point" :value "93.7890625@20.625" :name "extent") (slot :class "Color" :value "0 255" :name "borderColor") (slot :class "SmallInteger" :value "1" :name "borderWidth") (slot :class "False" :value "false" :name "infinite") (slot :class "SmallInteger" :value "5" :name "cornerRadius")) (LBox :idref "178" :metaclass "true" :slotsString "" :uniclass "178" (slot :idref "179" :name "scripts") (slot :idref "182" :name "classPool")) (IdentityDictionary :idref "179" (slot :keyClass "ByteSymbol" :keyValue "fire" :valueId "180")) (LScript :idref "180" (slot :idref "181" :name "definition")) (ByteString :idref "181" :value "fire\r\r\tcontainer start" :basicSize "22") (Dictionary :idref "182") (LBox :idref "183" :uniclass "192" (slot :idref "184" :name "components") (slot :idref "190" :name "transformation") (slot :idref "191" :name "shape") (slot :class "Point" :value "0@0" :name "pivotRatio") (slot :class "False" :value "false" :name "layoutChanged") (slot :idref "10" :name "menuContributors") (slot :class "ByteSymbol" :value "button1" :name "name") (span :familyName "DejaVuSans" :pointSize "12.0" :color "0 255" :style "0" (data :data "stop"))) (IdentityDictionary :idref "184" (slot :keyClass "ByteSymbol" :keyValue "ButtonHandler" :valueId "185") (slot :keyClass "ByteSymbol" :keyValue "Layout" :valueId "188")) (LButtonHandler :idref "185" (slot :idref "186" :name "properties") (slot :idref "183" :name "whole") (slot :class "SmallInteger" :value "111" :name "modifierMask") (slot :class "SmallInteger" :value "16" :name "modifierRejectMask") (slot :idref "183" :name "target") (slot :class "ByteSymbol" :value "fire" :name "selector") (slot :class "False" :value "false" :name "pressed") (slot :class "False" :value "false" :name "entered") (slot :class "False" :value "false" :name "announces")) (IdentityDictionary :idref "186" (slot :keyClass "ByteSymbol" :keyValue "defaultFill" :valueId "187")) (GeziraFillUniform :idref "187" (slot :class "Float" :value "P/AAAAAAAAA=" :name "alpha") (slot :class "Float" :value "P/AAAAAAAAA=" :name "red") (slot :class "Float" :value "P/AAAAAAAAA=" :name "green") (slot :class "Float" :value "P/AAAAAAAAA=" :name "blue")) (LLineEditor :idref "188" (slot :class "SmallInteger" :value "109" :name "modifierMask") (slot :class "SmallInteger" :value "18" :name "modifierRejectMask") (slot :class "Point" :value "2@1" :name "inset") (slot :idref "158" :name "font") (slot :class "Interval" :value "0 1 1" :name "selection") (slot :class "SmallInteger" :value "1" :name "selectionAnchor") (slot :class "Interval" :value "30 500 30" :name "tabArray") (slot :idref "189" :name "undoStack") (slot :class "Float" :value "QC20AAAAAAA=" :name "maxHeight") (slot :class "SmallInteger" :value "0" :name "missingHeight") (slot :class "Float" :value "QA4wAAAAAAA=" :name "maxDescent") (slot :class "False" :value "false" :name "autoVerticalResize") (slot :class "ByteSymbol" :value "center" :name "justification") (slot :class "False" :value "false" :name "valueChanged") (slot :class "True" :value "true" :name "isLabel") (slot :class "Float" :value "QFdygAAAAAA=" :name "naturalLength")) (OrderedCollection :idref "189" :size "0") (MatrixTransform2x3 :idref "190" :value "P4AAAAAAAABEDzhjAAAAAD+AAABBQm67" :basicSize "6") (LBoxShape :idref "191" (slot :idref "187" :name "fill") (slot :class "Point" :value "93.7890625@20.625" :name "extent") (slot :class "Color" :value "0 255" :name "borderColor") (slot :class "SmallInteger" :value "1" :name "borderWidth") (slot :class "False" :value "false" :name "infinite") (slot :class "SmallInteger" :value "5" :name "cornerRadius")) (LBox :idref "192" :metaclass "true" :slotsString "" :uniclass "192" (slot :idref "193" :name "scripts") (slot :idref "196" :name "classPool")) (IdentityDictionary :idref "193" (slot :keyClass "ByteSymbol" :keyValue "fire" :valueId "194")) (LScript :idref "194" (slot :idref "195" :name "definition")) (ByteString :idref "195" :value "fire\r\tcontainer stop" :basicSize "20") (Dictionary :idref "196") (LBox :idref "197" :contentsCollectionClass "LCollection" (slot :idref "198" :name "transformation") (slot :idref "199" :name "shape") (slot :class "Point" :value "0@0.5" :name "pivotRatio") (slot :class "False" :value "false" :name "layoutChanged") (slot :idref "10" :name "menuContributors") (slot :idref "201" :name "name") (slot :idref "202" :name "1")) (MatrixTransform2x3 :idref "198" :value "P4AAAAAAAABDxYAAAAAAAD+AAABDjoAA" :basicSize "6") (LBoxShape :idref "199" (slot :idref "200" :name "fill") (slot :class "Point" :value "100.0@10" :name "extent") (slot :class "Color" :value "0 255" :name "borderColor") (slot :class "SmallInteger" :value "0" :name "borderWidth") (slot :class "False" :value "false" :name "infinite")) (GeziraFillUniform :idref "200" (slot :class "Float" :value "P+ZWVlZWVlY=" :name "alpha") (slot :class "Float" :value "P6aFoWhaFoY=" :name "red") (slot :class "Float" :value "P+MMwzDMMw0=" :name "green") (slot :class "Float" :value "P8wnCcJwnCc=" :name "blue")) (ByteString :idref "201" :value "h0" :basicSize "2") (LBox :idref "202" :contentsCollectionClass "LCollection" (slot :idref "203" :name "transformation") (slot :idref "204" :name "shape") (slot :class "Point" :value "0@0.5" :name "pivotRatio") (slot :class "False" :value "false" :name "layoutChanged") (slot :idref "10" :name "menuContributors") (slot :idref "206" :name "name") (slot :idref "207" :name "1")) (MatrixTransform2x3 :idref "203" :value "P4AAAAAAAABCyAAAAAAAAD+AAAAAAAAA" :basicSize "6") (LBoxShape :idref "204" (slot :idref "205" :name "fill") (slot :class "Point" :value "50.0@10" :name "extent") (slot :class "Color" :value "0 255" :name "borderColor") (slot :class "SmallInteger" :value "0" :name "borderWidth") (slot :class "False" :value "false" :name "infinite")) (GeziraFillUniform :idref "205" (slot :class "Float" :value "P+ZWVlZWVlY=" :name "alpha") (slot :class "Float" :value "P+pmmaZpmmc=" :name "red") (slot :class "Float" :value "P+SdJ0nSdJ0=" :name "green") (slot :class "Float" :value "P9wnCcJwnCc=" :name "blue")) (ByteString :idref "206" :value "h1" :basicSize "2") (LBox :idref "207" :contentsCollectionClass "LCollection" (slot :idref "208" :name "transformation") (slot :idref "209" :name "shape") (slot :class "Point" :value "0@0.5" :name "pivotRatio") (slot :class "False" :value "false" :name "layoutChanged") (slot :idref "10" :name "menuContributors") (slot :idref "211" :name "name") (slot :idref "212" :name "1")) (MatrixTransform2x3 :idref "208" :value "P4AAAAAAAABCSAAAAAAAAD+AAAAAAAAA" :basicSize "6") (LBoxShape :idref "209" (slot :idref "210" :name "fill") (slot :class "Point" :value "33.333333333333336@10" :name "extent") (slot :class "Color" :value "0 255" :name "borderColor") (slot :class "SmallInteger" :value "0" :name "borderWidth") (slot :class "False" :value "false" :name "infinite")) (GeziraFillUniform :idref "210" (slot :class "Float" :value "P+ZWVlZWVlY=" :name "alpha") (slot :class "Float" :value "P8uG4bhuG4c=" :name "red") (slot :class "Float" :value "P+AEAQBAEAQ=" :name "green") (slot :class "Float" :value "P+V1XVdV1XU=" :name "blue")) (ByteString :idref "211" :value "h2" :basicSize "2") (LBox :idref "212" :contentsCollectionClass "LCollection" (slot :idref "213" :name "transformation") (slot :idref "214" :name "shape") (slot :class "Point" :value "0@0.5" :name "pivotRatio") (slot :class "False" :value "false" :name "layoutChanged") (slot :idref "10" :name "menuContributors") (slot :idref "216" :name "name")) (MatrixTransform2x3 :idref "213" :value "P4AAAAAAAABCBVVVAAAAAD+AAAAAAAAA" :basicSize "6") (LBoxShape :idref "214" (slot :idref "215" :name "fill") (slot :class "Point" :value "25.0@10" :name "extent") (slot :class "Color" :value "0 255" :name "borderColor") (slot :class "SmallInteger" :value "0" :name "borderWidth") (slot :class "False" :value "false" :name "infinite")) (GeziraFillUniform :idref "215" (slot :class "Float" :value "P+ZWVlZWVlY=" :name "alpha") (slot :class "Float" :value "P9VlWVZVlWU=" :name "red") (slot :class "Float" :value "P+gOA4DgOA4=" :name "green") (slot :class "Float" :value "P+3Hcdx3Hcc=" :name "blue")) (ByteString :idref "216" :value "h3" :basicSize "2") (LBox :idref "217" :metaclass "true" :slotsString "kWorld" :uniclass "217" (slot :idref "218" :name "scripts") (slot :idref "235" :name "variables") (slot :idref "236" :name "classPool")) (IdentityDictionary :idref "218" (slot :keyClass "ByteSymbol" :keyValue "get:from:" :valueId "219") (slot :keyClass "ByteSymbol" :keyValue "put:at:" :valueId "221") (slot :keyClass "ByteSymbol" :keyValue "setup" :valueId "223") (slot :keyClass "ByteSymbol" :keyValue "setupArms" :valueId "225") (slot :keyClass "ByteSymbol" :keyValue "start" :valueId "227") (slot :keyClass "ByteSymbol" :keyValue "step" :valueId "229") (slot :keyClass "ByteSymbol" :keyValue "stop" :valueId "231") (slot :keyClass "ByteSymbol" :keyValue "update" :valueId "233")) (LScript :idref "219" (slot :idref "220" :name "definition")) (ByteString :idref "220" :value "get: n from: box\r\r\tn = 0 ifTrue: [^ box].\r\tbox size = 0 ifTrue: [^ nil].\r\t^ self get: n - 1 from: box first.\r" :basicSize "109") (LScript :idref "221" (slot :idref "222" :name "definition")) (ByteString :idref "222" :value "put: box at: index\r\r\t| last |\r\tindex = 0 ifTrue: [\r\t\tself add: box.\r\t\t^ box leftCenter: (self extent x/2.0)@((self extent y - box height) / 2.0)].\r\tlast := self get: index - 1 from: (self atName: 'h0').\r\tlast add: box.\r\tbox topLeft: last width@0." :basicSize "246") (LScript :idref "223" (slot :idref "224" :name "definition")) (ByteString :idref "224" :value "setup\r\r\t| inspector |\r\tkWorld := KObject new.\r\tkWorld addFormulae: '\r\tr0 = 0.03;\r\tl0 = 100.0;\r\r\tr1 = (r0 * 2 + abs(r0)) * -sign(r0);\r\tl1 = l0 / 2;\r\r\tr2 = (r0 * 2 + abs(r1)) * -sign(r1);\r\tl2 = l0 / 3;\r\r\tr3 = (r0 * 2 + abs(r2)) * -sign(r2);\r\tl3 = l0 / 4;\r\r\th0 = 0;\r\th1 = 0;\r\th2 = 0;\r\th3 = 0;\r\r\th0@20 = h0 + r0;\r\th1@20 = h1 + r1;\r\th2@20 = h2 + r2;\r\th3@20 = h3 + r3;\r'.\r\r\tinspector := KEventStreamInspector object: kWorld.\r\tkWorld evaluateFormulaeAt: Time millisecondClockValue.\r\tinspector open.\r\tself setupArms.\r\t^ kWorld\r\r" :basicSize "520") (LScript :idref "225" (slot :idref "226" :name "definition")) (ByteString :idref "226" :value "setupArms\r\r\t| index b w |\r\tindex := 0.\r\t(self atName: 'h0') ifNotNil: [:a | a delete].\r\t[true] whileTrue: [\r\t\tb := LBox new.\r\t\tb pivotRatio: 0@0.5.\r\t\tb name: 'h', index printString.\r\t\tw := (kWorld nsAt: ('l', index printString) asSymbol) value.\r\t\tw ifNil: [^ self].\r\t\tb width: w.\r\t\tb height: 10.\r\t\tself put: b at: index.\r\t\tindex := index + 1].\r" :basicSize "344") (LScript :idref "227" (slot :idref "228" :name "definition")) (ByteString :idref "228" :value "start\r\r\t| s |\r\ts := LScriptor new.\r\ts object: self.\r\ts instVarNamed: 'selected' put: #step.\r\ts startTicking: nil.\r" :basicSize "114") (LScript :idref "229" (slot :idref "230" :name "definition")) (ByteString :idref "230" :value "step\r\r\tkWorld evaluateFormulaeAt: Time millisecondClockValue.\r\tself update." :basicSize "75") (LScript :idref "231" (slot :idref "232" :name "definition")) (ByteString :idref "232" :value "stop\r\r\t| s |\r\ts := LScriptor new.\r\ts object: self.\r\ts instVarNamed: 'selected' put: #step.\r\ts stopTicking: nil.\r" :basicSize "112") (LScript :idref "233" (slot :idref "234" :name "definition")) (ByteString :idref "234" :value "update\r\r\t| index b v |\r\tindex := 0.\r\t[true] whileTrue: [\r\t\tb := self get: index from: (self atName: 'h0').\r\t\tb ifNil: [^ self].\r\t\tv := (kWorld nsAt: ('h', index printString) asSymbol) value.\r\t\tv ifNil: [^ self].\r\t\tb rotation: v.\r\t\tindex := index + 1].\r" :basicSize "252") (IdentityDictionary :idref "235" (slot :keyClass "ByteSymbol" :keyValue "kWorld" :valueClass "ByteSymbol" :valueValue "kWorld")) (Dictionary :idref "236") (LDBJrPage :idref "237" :metaclass "true" :slotsString "viewOrder viewOrderMask playfield" :uniclass "237" :superclass "14" (slot :idref "238" :name "ouCardVarInfo") (slot :idref "240" :name "classPool") (slot :idref "241" :name "methods")) (IdentityDictionary :idref "238" (slot :keyClass "ByteSymbol" :keyValue "playfield" :valueId "239")) (LDBJrVarInfo :idref "239" (slot :class "ByteSymbol" :value "playfield" :name "getter") (slot :class "ByteSymbol" :value "playfield:" :name "setter") (slot :class "ByteSymbol" :value "card" :name "level") (slot :class "ByteSymbol" :value "costumePart" :name "kind")) (Dictionary :idref "240") (IdentityDictionary :idref "241" (slot :keyClass "ByteSymbol" :keyValue "playfield" :valueId "242") (slot :keyClass "ByteSymbol" :keyValue "playfield:" :valueId "243") (slot :keyClass "ByteSymbol" :keyValue "viewOrder" :valueId "244") (slot :keyClass "ByteSymbol" :keyValue "viewOrder:" :valueId "245") (slot :keyClass "ByteSymbol" :keyValue "viewOrderMask" :valueId "246") (slot :keyClass "ByteSymbol" :keyValue "viewOrderMask:" :valueId "247")) (ByteString :idref "242" :value "playfield\r\t^ playfield" :basicSize "22") (ByteString :idref "243" :value "playfield: t1 \r\tself wiv666playfield: t1" :basicSize "40") (ByteString :idref "244" :value "viewOrder\r\t^ viewOrder" :basicSize "22") (ByteString :idref "245" :value "viewOrder: t1 \r\tself wiv666viewOrder: t1" :basicSize "40") (ByteString :idref "246" :value "viewOrderMask\r\t^ viewOrderMask" :basicSize "30") (ByteString :idref "247" :value "viewOrderMask: t1 \r\tself wiv666viewOrderMask: t1" :basicSize "48"))