ペンプラットフォーマー　PEN platformer
@Stage\n\nforever\n    set [username v] to [13579tt]\nend\n\nwhen I receive [green flag v]\nstop [other scripts in sprite v]\nstop all sounds\nset volume to (100) %\nwait (1) seconds\nbroadcast (soundinc v)\nforever\n    start sound [Sounds of the Boreal Forest.mp3 v]\n    play sound [tobu candyland.mp3 v] until done\n    start sound [Sounds of the Boreal Forest.mp3 v]\n    play sound [Kaled v] until done\nend\n\nwhen I receive [start s plat v]\nhide\nbroadcast (green flag v)\n\nwhen I receive [setup v]\nbroadcast (alivecheck v)\n\nwhen I receive [alivecheck v]\nrepeat until <(alive) = [1]>\n    set [ghost v] to [100]\n    wait (0.1) seconds\n    set [ghost v] to [0]\n    wait (0.1) seconds\nend\nset [ghost v] to [0]\n\nwhen flag clicked\nset volume to (100) %\n\nwhen I receive [start s plat v]\nreset timer\n\nwhen I receive [win v]\nstop [other scripts in sprite v]\nstop all sounds\nset volume to (100) %\nstart sound [YOU WON! v]\nrepeat (3)\n    broadcast (particle v)\n    wait (0.5) seconds\nend\n\nwhen flag clicked\nforever\n    set volume to (sound) %\nend\n\nwhen I receive [soundinc v]\nforever\n    set volume to (sound) %\nend\n\nwhen I receive [single v]\nstop [other scripts in sprite v]\nset volume to (50) %\n\nwait (1) seconds\n\nwhen I receive [startmenu v]\nstart sound [Plugged \(post mastering\) v]\n\n@station\n\nwhen I receive [tick v]\nposition (((x) + ()) - (SCROLL X)) ((y) - (SCROLL Y))\n\nwhen I receive [setup v]\nclear graphic effects\nhide\nset [x v] to [0]\nset [y v] to [0]\nswitch costume to (costume1 v)\nnew platform at [1200] [0]\nnew platform at [3400] [0]\nnew platform at [4200] [0]\nnew platform at [600] [220]\nnew platform at [100000] [9]\nnext costume\n\ndefine position (x) (y)\ngo to x: (x) y: (y)\nif <<(x) = (x position)> and <(y) = (y position)>> then\n    show\n    if <touching (player v)?> then\n        if <not <(costume [name v]) = (station)>> then\n            set [station v] to (costume [name v])\n            broadcast (char.change v)\n        end\n    end\nelse\n    hide\nend\nset [ghost v] effect to (100)\ngo to [back v] layer\ngo [forward v] (3) layers\n\nwhen I receive [reset v]\nset [tlck v] to [0]\ndelete this clone\n\ndefine new platform at (x) (y)\ncreate clone of (_myself_ v)\nchange [x v] by (x)\nchange [y v] by (y)\nnext costume\n\nwhen flag clicked\nhide\n\nwhen flag clicked\nhide variable [achievements v]\nset [brightness v] to [0]\n\nwhen I receive [win v]\nstop [other scripts in sprite v]\n\n@player\n\nwhen I receive [green flag v]\nset [checkpoint v] to [0]\nhide\ngo to [front v] layer\ngo [backward v] (1) layers\n\ndefine game on!\nset [scroll x v] to (item (checkpoint) of [checkpoint-x v])\nset [scroll y v] to (item (checkpoint) of [checkpoint y v])\nset [x v] to (item (checkpoint) of [checkpoint-x v])\nset [y v] to (item (checkpoint) of [checkpoint y v])\nset [sy v] to [0]\nset [in air v] to [0]\nset [exit v] to []\nset rotation style [all around v]\npoint in direction (90)\nswitch costume to (base v)\nset [ghost v] effect to (0)\nclear graphic effects\nset size to (75) %\nshow\n\ndefine Tick\nif <(alive) = [1]> then\n    if <<key (right arrow v) pressed?> or <<mouse down?> and <(mouse x) > [10]>>> then\n        if <<(station) = [1]> or <(station) = [5]>> then\n            change player x by [7]\n        end\n        if <(station) = [2]> then\n            change player x by [4.5]\n        end\n        if <(station) = [3]> then\n            change player x by [11]\n        end\n        if <(station) = [4]> then\n            change player x by [6.5]\n        end\n    else\n        if <<key (left arrow v) pressed?> or <<mouse down?> and <(mouse x) < [-10]>>> then\n            if <<(station) = [1]> or <(station) = [5]>> then\n                change player x by [-7]\n            end\n            if <(station) = [2]> then\n                change player x by [-4.5]\n            end\n            if <(station) = [3]> then\n                change player x by [-11]\n            end\n            if <(station) = [4]> then\n                change player x by [-6.5]\n            end\n        end\n    end\n    if <<key (up arrow v) pressed?> or <<mouse down?> and <(mouse y) > (y position)>>> then\n        set [activity check v] to (TlCK)\n        if <not <(station) = [4]>> then\n            if <(in air) < [4]> then\n                change [jumps v] by (0.25)\n                if <<(station) = [1]> or <(station) = [5]>> then\n                    set [sy v] to [15.5]\n                end\n                if <(station) = [2]> then\n                    set [sy v] to [30]\n                    change [nano.sj v] by (0.25)\n                end\n                if <(station) = [3]> then\n                    set [sy v] to [12]\n                end\n            end\n        else\n            set [sy v] to [5]\n            change [tera.fly v] by (1)\n        end\n    end\n    if <touching (platforms v)?> then\nend\nif <not <(station) = [5]>> then\n    change [sy v] by (-2)\nelse\n    if <(sy) > [0]> then\n        change [sy v] by (-2)\n    else\n        change [sy v] by (-0.1)\n    end\nend\nif <(sy) < [-20]> then\n    set [sy v] to [-20]\nend\nchange player y by (sy)\nchange [scroll x v] by (round (((x) - (SCROLL X)) / (10)))\nif <(SCROLL X) < [0]> then\n    set [scroll x v] to [0]\nend\nif <[11000] < (SCROLL X)> then\n    set [scroll x v] to [11000]\n    if <[11240] < (x)> then\n        set [exit v] to [win]\n    end\nend\nchange [scroll y v] by (round (((y) - (SCROLL Y)) / (10)))\nif <(SCROLL Y) < [-40]> then\n    set [scroll y v] to [-40]\nend\nif <[380] < (SCROLL Y)> then\n    set [scroll y v] to [380]\nend\nposition\n\ndefine change player y by (sy)\nchange [y v] by (sy)\nchange [in air v] by (1)\nposition\nrepeat until <not <touching (platforms v)?>>\n    if <(sy) > [0]> then\n        change [y v] by (-1)\n    else\n        change [y v] by (1)\n        set [in air v] to [0]\n    end\n    position\n    set [sy v] to [0]\nend\n\ndefine change player x by (sx)\nchange [x v] by (sx)\nposition\nif <touching (platforms v)?> then\n    repeat (10)\n        change [y v] by (1)\n        position\n        if <not <touching (platforms v)?>> then\n            stop [this script v]\n        end\n    end\n    change [y v] by (-10)\n    repeat until <not <touching (platforms v)?>>\n        if <(sx) > [0]> then\n            change [x v] by (-1)\n        else\n            change [x v] by (1)\n        end\n        position\n    end\nend\n\ndefine game-die\nset [alive v] to [0]\nset [exit v] to []\nchange [deaths v] by (1)\nif <touching (water v)?> then\n    start sound [Splash v]\nend\nrepeat (5)\n    set [ghost v] to [100]\n    wait (0.1) seconds\n    if <touching (water v)?> then\n        change y by (-10)\n    end\n    set [ghost v] to [0]\n    wait (0.1) seconds\n    if <touching (water v)?> then\n        change y by (-10)\n    end\nend\n\ndefine game - win\nbroadcast (win v)\nforever\n    wait (1) seconds\nend\n\nwhen I receive [green flag v]\nforever\n    broadcast (reset v) and wait\n    broadcast (setup v) and wait\n    game on!\n    repeat until <(EXIT) > []>\n        if <(alive) = [1]> then\n            test die\n        end\n        set [ghost v] effect to (100)\n        Tick\n        broadcast (tick v)\n        change [tlck v] by (1)\n    end\n    if <(EXIT) = [win]> then\n        game - win\n        set [scroll x v] to [0]\n        set [scroll y v] to [0]\n    else\n        game-die\n    end\nend\n\ndefine test die\nif <<touching (saw v)?> or <touching (water v)?>> then\n    set [exit v] to [die]\nend\nif <key (r v) pressed?> then\n    set [respawned? v] to [1]\n    set [exit v] to [die]\nend\n\nwhen I receive [crashed v]\nstop [other scripts in sprite v]\n\nwhen flag clicked\nset [jumps v] to [0]\nset [deaths v] to [0]\nset [tera.fly v] to [0]\nset [nano.sj v] to [0]\nset [respawned? v] to [0]\nset [chatted \(times\) v] to [0]\nhide\n\ndefine position\ngo to x: (((x) + ()) - (SCROLL X)) y: ((y) - (SCROLL Y))\n\nwhen I receive [win v]\nwait (1) seconds\nstop [other scripts in sprite v]\n\n@costume\n\nwhen I receive [start s plat v]\nforever\n    go to [front v] layer\n    go [backward v] (6) layers\n    show\n    set [ghost v] effect to (ghost)\n    if <<key (right arrow v) pressed?> or <<mouse down?> and <(mouse x) > [10]>>> then\n        set [activity check v] to (TlCK)\n        if <(station) = [1]> then\n            switch costume to (1 v)\n        end\n        if <(station) = [2]> then\n            switch costume to (3 v)\n        end\n        if <(station) = [3]> then\n            switch costume to (4 v)\n        end\n        if <(station) = [4]> then\n            switch costume to (7 v)\n        end\n        if <(station) = [5]> then\n            switch costume to (9 v)\n        end\n    else\n        if <<key (left arrow v) pressed?> or <<mouse down?> and <(mouse x) > [10]>>> then\n            set [activity check v] to (TlCK)\n            if <(station) = [1]> then\n                switch costume to (2 v)\n            end\n            if <(station) = [2]> then\n                switch costume to (3 v)\n            end\n            if <(station) = [3]> then\n                switch costume to (5 v)\n            end\n            if <(station) = [4]> then\n                switch costume to (8 v)\n            end\n            if <(station) = [5]> then\n                switch costume to (10 v)\n            end\n        else\n            if <(station) = [1]> then\n                switch costume to (1 v)\n            end\n            if <(station) = [2]> then\n                switch costume to (3 v)\n            end\n            if <(station) = [3]> then\n                switch costume to (6 v)\n            end\n            if <(station) = [4]> then\n                switch costume to (7 v)\n            end\n            if <(station) = [5]> then\n                switch costume to (9 v)\n            end\n        end\n    end\n    if <(alive) = [0]> then\n        position\n        go to [back v] layer\n    end\n    Save My Data\n    say (item (join (item (1) of [my list \(new\) v]) (item (2) of [my list \(new\) v])) of [chat v])\n    set [brightness v] effect to (brightness)\n    set size to (size) %\n    change [size v] by (((size) - (75)) / (-10))\nend\n\nwhen flag clicked\nhide\n\nwhen I receive [tick v]\ngo to [front v] layer\nposition\n\nwhen I receive [char.change v]\nset language to (en v)::tts\nset voice to (tenor v)::tts\nif <(station) = [2]> then\n    speak [You are now playing as Nano.]::tts\nend\nif <(station) = [3]> then\n    speak [You are now playing as Pico.]::tts\nend\nif <(station) = [4]> then\n    speak [You are now playing as Tera.]::tts\nend\nif <(station) = [5]> then\n    speak [You are now playing as Giga.]::tts\nend\n\ndefine carchange\nif <(station) = [1]> then\n    hide variable [power v]\nend\nif <(station) = [2]> then\n    set [power v] to [14]\n    show variable [power v]\nend\nif <(station) = [3]> then\n    set [power v] to [15]\n    show variable [power v]\nend\nif <(station) = [4]> then\n    set [tera.fly v] to [0]\n    set [power v] to [16]\n    show variable [power v]\nend\nif <(station) = [5]> then\n    set [power v] to [30]\n    show variable [power v]\nend\nset [size v] to [25]\nset [brightness v] to [100]\nrepeat (10)\n    change [brightness v] by (-10)\nend\n\nwhen I receive [char.change v]\nstart sound [Teleport2 v]\ncarchange\nset [pre.station v] to (station)\nrepeat until < or <not <(station) = (pre.station)>>>\n    wait (1) seconds\n    change [power v] by (-1)\nend\nwait (0.5) seconds\nwait until <(alive) = [1]>\nset [size v] to [150]\nif <(station) = (pre.station)> then\n    set [station v] to [1]\n    start sound [Teleport2 v]\n    carchange\nend\nset language to (en v)::tts\nset voice to (tenor v)::tts\nspeak [You are now playing as Gobo.]::tts\n\ndefine Save My Data\ndelete all of [my list \(new\) v]\nif <(length of (chat.output)) = [1]> then\n    add [0] to [my list \(new\) v]\n    add (chat.output) to [my list \(new\) v]\nelse\n    add (letter (1) of (chat.output)) to [my list \(new\) v]\n    add (letter (2) of (chat.output)) to [my list \(new\) v]\nend\nadd (size) to [my list \(new\) v]\nadd (brightness) to [my list \(new\) v]\nadd (ghost) to [my list \(new\) v]\nadd (costume [number v]) to [my list \(new\) v]\nadd (x position) to [my list \(new\) v]\nadd (y position) to [my list \(new\) v]\nadd (SCROLL X) to [my list \(new\) v]\nadd (SCROLL Y) to [my list \(new\) v]\nadd (pick random (9999) to (999999)) to [my list \(new\) v]\nadd (username) to [my list \(new\) v]\n\nwhen I receive [alivecheck v]\nrepeat until <(alive) = [1]>\n    set [ghost v] to [100]\n    wait (0.1) seconds\n    set [ghost v] to [0]\n    wait (0.1) seconds\nend\nset [ghost v] to [0]\n\nwhen I receive [tick v]\nif <(TlCK) > [25]> then\n    if <[50] > (TlCK)> then\n        set [alive v] to [1]\n    end\nend\n\nwhen flag clicked\nhide variable [fps.prob v]\nhide variable [fps v]\nset [fps.prob v] to [0]\nset [fps v] to [?]\nset [alive v] to [0]\nforever\n    if <(alive) = [1]> then\n        set [tick.ermittler v] to (TlCK)\n        wait (1) seconds\n        set [fps v] to ((TlCK) - (tick.ermittler))\n        if <[45] < (FPS)> then\n            stop [all v]\n        else\n            if <(FPS) = [0]> then\n                if <not <(FPS) = [?]>> then\n                    change [fps.prob v] by (1)\n                end\n            else\n                set [fps.prob v] to [0]\n            end\n            if <(FPS.prob) > [4]> then\n                broadcast (start s plat v)\n            end\n        end\n    else\n        set [fps v] to [?]\n    end\nend\n\nwhen flag clicked\nhide variable [power v]\n\n\n\nwhen I receive [reset v]\nset [activity check v] to [0]\n\nwhen I receive [start v]\nset [station v] to [1]\nforever\n    if <[1800] < ((TlCK) - (activity check))> then\n        set [alive v] to [0]\n        wait until <<[4000] < ((TlCK) - (activity check))> or <not <[1800] < ((TlCK) - (activity check))>>>\n        if <[1000] > ((TlCK) - (activity check))> then\n            set [alive v] to [1]\n        else\n            wait (0) seconds\n            stop [other scripts in sprite v]\n            set [fps.prob v] to [INACTIVITY TIMEOUT ⏲ Press green flag]\n            show variable [fps.prob v]\n            broadcast (crashed v)\n            stop [this script v]\n        end\n    end\nend\n\nwhen [any v] key pressed\nset [activity check v] to (TlCK)\n\ndefine position\ngo to x: ([x position v] of [player v]) y: ([y position v] of [player v])\n\nwhen I receive [win v]\nwait (1) seconds\nstop [other scripts in sprite v]\n\n@Players\n\nwhen I receive [initialise  v]\nset size to (75) %\nhide\nset [username v] to (username)\nset [clone id v] to [0]\nrepeat (10)\n    change [clone id v] by (1)\n    create clone of (_myself_ v)\nend\n\nwhen I receive [tick v]\nif <(Clone ID) = (@PlayerSlot)> then\n    delete this clone\nelse\n    change [koordx v] by (((koordx) - ((item (((Clone ID) * (12)) - (3)) of [cloud list v]) + (item (((Clone ID) * (12)) - (5)) of [cloud list v]))) / (-3))\n    change [koordy v] by (((koordy) - ((item (((Clone ID) * (12)) - (2)) of [cloud list v]) + (item (((Clone ID) * (12)) - (4)) of [cloud list v]))) / (-3))\n    (Clone ID) ((x position) + (((x position) - (((koordx) + ()) - (SCROLL X))) / (-1))) ((y position) + (((y position) - ((koordy) - (SCROLL Y))) / (-1)))\nend\n\ndefine (id) (x) (y)\nif <(item (id) of [active check v]) = [Off]> then\n    hide\nelse\n    go to x: (x) y: (y)\n    if <[1] = [1]> then\n        show\n        if <touching (_edge_ v)?> then\n            set [ghost v] effect to (35)\n            switch costume to (arrow v)\n            if <(koordx) < (SCROLL X)> then\n                point in direction ((-90) + ((y position) / (4)))\n                change x by (20)\n            else\n                point in direction ((90) + ((y position) / (-4)))\n                change x by (-20)\n            end\n        else\n            point in direction (90)\n            switch costume to (item (((id) * (12)) - (6)) of [cloud list v])\n            show\n            set [ghost v] effect to (item (((id) * (12)) - (7)) of [cloud list v])\n        end\n    else\n        hide\n    end\n    set [brightness v] effect to (item (((id) * (12)) - (8)) of [cloud list v])\n    change size by (((size) - (item (((id) * (12)) - (9)) of [cloud list v])) / (-10))\n    go to [front v] layer\n    if <[00] = (join (item (((id) * (12)) - (11)) of [cloud list v]) (item (((id) * (12)) - (10)) of [cloud list v]))> then\n        if <(toggle player names?) = [0]> then\n            think (item (((id) * (12)) - (0)) of [cloud list v])\n        else\n            think []\n        end\n    else\n        say (item (join (item (((id) * (12)) - (11)) of [cloud list v]) (item (((id) * (12)) - (10)) of [cloud list v])) of [chat v])\n    end\nend\n\nif  then\nelse\nend\n\nforever\n    set [☁ p8 v] to [0]\nend\n\nwhen I start as a clone\nset [koordx v] to [0]\nset [koordy v] to [0]\ngo to x: (0) y: (0)\n\nforever\n    set [☁ p9 v] to [0]\nend\n\nforever\n    set [☁ p7 v] to [0]\nend\n\nwhen I receive [win v]\nstop [other scripts in sprite v]\n\n@Cloud\n\ndefine Decode (data)\ndelete all of [cloud list v]\nset [output v] to []\nset [i v] to [0]\nrepeat ((length of (data)) / (2))\n    change [i v] by (2)\n    switch costume to (join (letter ((I) - (1)) of (data)) (letter (I) of (data)))\n    if <(costume [name v]) = [~]> then\n        add (Output) to [cloud list v]\n        set [output v] to []\n    else\n        set [output v] to (join (Output) (costume [name v]))\n    end\nend\n\ndefine Encode\nset [output v] to []\nset [n v] to [0]\nrepeat (length of [my list \(new\) v])\n    set [i v] to [0]\n    change [n v] by (1)\n    repeat (length of (item (n) of [my list \(new\) v]))\n        change [i v] by (1)\n        switch costume to (letter (I) of (item (n) of [my list \(new\) v]))\n        if <(costume [number v]) < [10]> then\n            set [output v] to (join (Output) (join [0] (costume [number v])))\n        else\n            set [output v] to (join (Output) (costume [number v]))\n        end\n    end\n    set [output v] to (join (Output) [53])\nend\n\ndefine Update Players List (id)\nif <(id) = [1]> then\n    set [player list v] to [0]\n    delete all of [check v]\n    repeat (10)\n        change [player list v] by (1)\n        add (item (((Player List) * (12)) - (1)) of [cloud list v]) to [check v]\n    end\nelse\n    if <(id) = [2]> then\n        set [player list v] to [0]\n        repeat (10)\n            change [player list v] by (1)\n            if <not <(@PlayerSlot) = (Player List)>> then\n                if <(item (Player List) of [check v]) = (item (((Player List) * (12)) - (1)) of [cloud list v])> then\n                    replace item (Player List) of [active check v] with [Off]\n                else\n                    replace item (Player List) of [active check v] with [On]\n                end\n            end\n        end\n    end\nend\n\nwhen I receive [initialise  v]\ndelete all of [active check v]\nrepeat (10)\n    add [off] to [active check v]\nend\n\nwhen I receive [start v]\nforever\n    Update Players List [1]\n    wait (1) seconds\n    Update Players List [2]\nend\n\nwhen I receive [get data v]\nDecode Data\n\ndefine Save Data (id)\nEncode\nif <(id) = [1]> then\n    set [☁ p1 v] to (Output)\nelse\n    if <(id) = [2]> then\n        set [☁ p2 v] to (Output)\n    else\n        if <(id) = [3]> then\n            set [☁ p3 v] to (Output)\n        else\n            if <(id) = [4]> then\n                set [☁ p4 v] to (Output)\n            else\n                if <(id) = [5]> then\n                    set [☁ p5 v] to (Output)\n                else\n                    if <(id) = [6]> then\n                        set [☁ p6 v] to (Output)\n                    else\n                        if <(id) = [7]> then\n                            set [☁ p7 v] to (Output)\n                        else\n                            if <(id) = [8]> then\n                                set [☁ p8 v] to (Output)\n                            else\n                                if <(id) = [9]> then\n                                    set [☁ p9 v] to (Output)\n                                else\n                                    if <(id) = [10]> then\n                                        set [☁ p10 v] to (Output)\n                                    end\n                                end\n                            end\n                        end\n                    end\n                end\n            end\n        end\n    end\nend\n\nwhen I receive [start v]\nforever\n    Decode Data\n    Save Data (@PlayerSlot)\n    Determine Players\nend\n\ndefine Decode Data\nDecode (join (☁ P1) (join (☁ P2) (join (☁ P3) (join (☁ P4) (join (☁ P5) (join (☁ P6) (join (☁ P7) (join (☁ P8) (join (☁ P9) (☁ P10))))))))))\n\ndefine Determine Players\nset [players v] to [1]\nset [i v] to [0]\nrepeat (10)\n    change [i v] by (1)\n    if <(item (I) of [active check v]) = [On]> then\n        change [players v] by (1)\n    end\nend\n\nwhen I receive [check v]\nSave Data (@PlayerSlot)\n\nwhen I receive [reconnect v]\nforever\n    Decode Data\n    Save Data (@PlayerSlot)\n    Determine Players\nend\n\nwhen I receive [disconnect v]\nstop [other scripts in sprite v]\n\nwhen I receive [reconnect v]\nforever\n    Update Players List [1]\n    wait (1) seconds\n    Update Players List [2]\nend\n\nwhen I receive [disconnect v]\ndelete all of [active check v]\nrepeat (10)\n    add [off] to [active check v]\nend\n\nwhen I receive [win v]\nstop [other scripts in sprite v]\n\n@art\n\nwhen I receive [green flag v]\nset [ghost v] effect to (20)\nhide\n\nwhen I receive [tick v]\nif <(modus) = [0]> then\n    position (((x) + ()) - (SCROLL X)) ((y) - (SCROLL Y))\nend\nif <(modus) = [1]> then\n    position ((((x) + ()) - (SCROLL X)) + (([sin v] of ((timer) * (40)) ) * (200))) ((y) - (SCROLL Y))\nend\n\nwhen I receive [setup v]\nclear graphic effects\nhide\nset [x v] to [0]\nset [y v] to [0]\nswitch costume to (1 v)\nnew platform at [600] [0]\nnew platform at [600] [0]\nnew platform at [600] [0]\nnew platform at [600] [100]\nnew platform at [600] [100]\nnew platform at [600] [200]\nnew platform at [600] [0]\nnew platform at [600] [0]\nnew platform at [0] [-400]\nnew platform at [600] [0]\nnew platform at [300] [0]\nnew platform at [300] [0]\nnew platform at [900] [0]\nnew platform at [900] [0]\nnew platform at [600] [0]\nnew platform at [600] [150]\nnew platform at [600] [-150]\nnew platform at [600] [0]\nnew platform at [600] [0]\ncreate clone of (_myself_ v)\nnew moving platform at [7000] [40]\nnew moving platform at [8900] [100]\nset [x v] to [100000000]\n\ndefine position (x) (y)\ngo to x: (x) y: (y)\nif <<(x) = (x position)> and <(y) = (y position)>> then\n    show\nelse\n    hide\nend\nset [ghost v] effect to (20)\ngo to [back v] layer\ngo [forward v] (20) layers\n\nwhen I receive [reset v]\ndelete this clone\n\ndefine new platform at (x) (y)\nset [modus v] to [0]\ncreate clone of (_myself_ v)\nchange [x v] by (x)\nchange [y v] by (y)\nnext costume\n\nwhen flag clicked\nhide\n\ndefine new moving platform at (xpos) (ypos)\nset [modus v] to [1]\nset [x v] to (xpos)\nset [y v] to (ypos)\nswitch costume to (moving v)\ncreate clone of (_myself_ v)\n\nwhen I receive [win v]\nstop [other scripts in sprite v]\n\n@platforms\n\nwhen I receive [green flag v]\nset [ghost v] effect to (0)\nhide\n\nwhen I receive [tick v]\nif <(modus) = [0]> then\n    position (((x) + ()) - (SCROLL X)) ((y) - (SCROLL Y))\nelse\n    position ((((x) + ()) - (SCROLL X)) + ((([sin v] of ((timer) * (40)) ) * (200)) + (0))) (((y) - (SCROLL Y)) + ())\nend\n\nwhen I receive [setup v]\nclear graphic effects\nhide\nset [x v] to [0]\nset [y v] to [0]\nswitch costume to (1 v)\nnew platform at [0] [0]\nnew platform at [600] [0]\nnew platform at [600] [0]\nnew platform at [600] [0]\nnew platform at [600] [0]\nnew platform at [600] [200]\nnew platform at [600] [200]\nnew platform at [600] [0]\nnew platform at [600] [0]\nnew platform at [0] [-400]\nnew platform at [600] [0]\nnew platform at [600] [0]\nnew platform at [600] [0]\nnew platform at [1200] [0]\nnew platform at [600] [0]\nnew platform at [600] [150]\nnew platform at [600] [-150]\nnew platform at [600] [0]\nnew platform at [600] [0]\nnew moving platform at [7000] [40]\nnew moving platform at [8900] [100]\n\ndefine position (x) (y)\ngo to x: (x) y: (y)\nif <<(x) = (x position)> and <(y) = (y position)>> then\n    show\nelse\n    hide\nend\ngo to [back v] layer\ngo [forward v] (40) layers\n\nwhen I receive [reset v]\ndelete this clone\n\ndefine new platform at (x) (y)\nset [modus v] to [0]\nchange [x v] by (x)\nchange [y v] by (y)\ncreate clone of (_myself_ v)\nnext costume\n\nwhen flag clicked\nhide\n\nwhen I start as a clone\ngo to [front v] layer\n\ndefine new moving platform at (xpos) (ypos)\nset [modus v] to [1]\nset [x v] to (xpos)\nset [y v] to (ypos)\nswitch costume to (moving v)\ncreate clone of (_myself_ v)\n\nwhen I receive [win v]\nstop [other scripts in sprite v]\n\n@particle\n\nwhen I start as a clone\ngo to [back v] layer\nset [ghost v] effect to (50)\nswitch costume to (pick random (1) to (3))\ngo to x: (pick random (-260) to (260)) y: (100000)\nshow\n\nwhen I start as a clone\nforever\n    go to [back v] layer\n    turn right (5) degrees\n    change y by (-1)\n    if <(y position) < [-150]> then\n        delete this clone\n    end\nend\n\nwhen flag clicked\nhide\nhide\nset size to (150) %\nforever\n    wait (0.4) seconds\n    create clone of (_myself_ v)\nend\n\n@scrolling b.ground.1\n\nwhen I start as a clone\nswitch costume to (tick v)\nif <(id) = [0]> then\n    go to x: (500) y: (10)\nend\nset [ghost v] effect to (99)\ngo to [back v] layer\nshow\n\nwhen flag clicked\nhide\nset [id v] to [0]\n\nwhen I receive [start game v]\n\nwhen I receive [start s plat v]\nstop [other scripts in sprite v]\n\nrepeat (4)\n\nwhen I receive [tick v]\ngo to [back v] layer\nif <not <[untick] = (costume [name v])>> then\n    change x by (-2)\n    if <(x position) = [330]> then\n        create clone of (_myself_ v)\n    end\n    if <(x position) < [-470]> then\n        delete this clone\n    end\nend\n\nwhen flag clicked\ncreate clone of (_myself_ v)\n\nwhen I receive [scrolling b ground v]\ngo to [back v] layer\nif <not <[untick] = (costume [name v])>> then\n    change x by (-2)\n    if <(x position) = [330]> then\n        create clone of (_myself_ v)\n    end\n    if <(x position) < [-470]> then\n        delete this clone\n    end\nend\n\n@Sprite2\n\nwhen I receive [start v]\nstop [other scripts in sprite v]\nhide\n\nwhen I receive [win v]\nhide\nstop [other scripts in sprite v]\nstop all sounds\n\nwhen I receive [run v]\nwait (1) seconds\ngo to x: (0) y: (-40)\nshow\nset size to (20) %\nreset timer\nforever\n    turn right (15) degrees\n    go to [front v] layer\n    change size by (((size) - (90)) / (-5))\nend\n\nwhen flag clicked\nhide\n\nwhen I receive [single v]\nstop [other scripts in sprite v]\nhide\n\n@Banners\n\nwhen I receive [start v]\n\nwhen I receive [initialise  v]\nswitch costume to (connecting v)\nshow\ngo to [front v] layer\nset [ghost v] effect to (100)\nrepeat (4)\n    change [ghost v] effect by (-25)\nend\nclear graphic effects\ngo to x: (0) y: (0)\nset [full? v] to [False]\nset [kick v] to [False]\nset [moved? v] to [800]\n\ndefine Get Player Slot\nset [@playerslot v] to [0]\nbroadcast (Get Data v) and wait\nset [moved? v] to [0]\ndelete all of [check v]\nrepeat (10)\n    change [moved? v] by (1)\n    add (item (((Moved?) * (12)) - (1)) of [cloud list v]) to [check v]\nend\nwait (3) seconds\nbroadcast (Get Data v) and wait\nset [moved? v] to [0]\nrepeat (10)\n    change [moved? v] by (1)\n    if <(item (Moved?) of [check v]) = (item (((Moved?) * (12)) - (1)) of [cloud list v])> then\n        wait (2) seconds\n        broadcast (Get Data v) and wait\n        if <(item (Moved?) of [check v]) = (item (((Moved?) * (12)) - (1)) of [cloud list v])> then\n            set [@playerslot v] to (Moved?)\n            stop [this script v]\n        else\n            Get Player Slot\n            stop [this script v]\n        end\n    end\n    if <(Moved?) = [10]> then\n        stop [other scripts in sprite v]\n        set [full? v] to [True]\n        repeat (100)\n            switch costume to (full v)\n            go to [front v] layer\n            show\n            clear graphic effects\n        end\n        switch costume to (costume1 v)\n        hide\n        wait (1) seconds\n        broadcast (single v)\n        forever\n            wait (1) seconds\n        end\n    end\nend\n\nwhen I receive [start v]\n\nwhen I receive [start v]\nbroadcast (start s plat v)\nwait (1.5) seconds\ngo to x: (0) y: (20)\nshow\nset [ghost v] effect to (100)\nif <(Players) = [1]> then\n    switch costume to (new v)\nelse\n    switch costume to (con v)\nend\ntransit\nforever\n    show\n    set [last.players v] to (Players)\n    wait (0.1) seconds\n    if <(last.players) < (Players)> then\n        set [ghost v] effect to (100)\n        switch costume to (join v)\n        transit\n    end\n    if <(Players) < (last.players)> then\n        set [ghost v] effect to (100)\n        switch costume to (left v)\n        transit\n    end\nend\n\nwhen flag clicked\nhide variable [players v]\n\nwhen I receive [run v]\nset [username v] to (username)\ngo to x: (0) y: (0)\nwait (1) seconds\nbroadcast (Initialise  v) and wait\nGet Player Slot\nset [moved? v] to [600]\nif <not <(Full?) = [true]>> then\n    broadcast (start v)\n    stop [this script v]\nend\nstop [other scripts in sprite v]\nset [full? v] to [True]\nbroadcast (single v)\nrepeat (100)\n    switch costume to (full v)\n    go to [front v] layer\n    show\n    clear graphic effects\nend\nhide\nstop [this script v]\n\nTest player slot (@PlayerSlot)\n\nwhen I receive [start v]\nset voice to (tenor v)::tts\nspeak [Welcome,]::tts\nspeak (username)::tts\nspeak [Your Player ID is]::tts\nspeak (@PlayerSlot)::tts\nwait (0.7) seconds\nspeak [You are playing as Gobo.]::tts\nforever\n    if <not <(item (((@PlayerSlot) * (12)) - (0)) of [cloud list v]) = (username)>> then\n        broadcast (disconnect v)\n        delete all of [cloud list v]\n        wait (pick random (0.9) to (1.9)) seconds\n        Get Player Slot\n        broadcast (reconnect v)\n        wait (0.7) seconds\n    end\nend\n\nwhen flag clicked\nhide\n\ndefine transit\nrepeat (10)\n    go to [front v] layer\n    change [ghost v] effect by (-8.1)\n    change y by ((y position) / (-2))\nend\nrepeat (10)\n    wait (0.1) seconds\n    go to [front v] layer\nend\nrepeat (10)\n    go to [front v] layer\n    change [ghost v] effect by (8.1)\n    change y by (((y position) - (20)) / (-2))\nend\n\nwhen I receive [green flag v]\nshow\nset [ghost v] effect to (100)\nset [achievements v] to [0]\ndelete all of [achievements v]\nadd [0] to [achievements v]\nrepeat (15)\n    add [0] to [achievements v]\nend\nwait (7) seconds\nforever\n    set [achievements v] to ((item (1) of [achievements v]) + ((item (2) of [achievements v]) + ((item (3) of [achievements v]) + ((item (4) of [achievements v]) + ((item (5) of [achievements v]) + ((item (6) of [achievements v]) + ((item (7) of [achievements v]) + ((item (8) of [achievements v]) + ((item (9) of [achievements v]) + ((item (9) of [achievements v]) + ((item (10) of [achievements v]) + ((item (11) of [achievements v]) + (item (12) of [achievements v])))))))))))))\n    if <(item (15) of [achievements v]) = [0]> then\n        if <(timer) > [30]> then\n            replace item (15) of [achievements v] with [1]\n            set [achievements v] to ((item (1) of [achievements v]) + ((item (2) of [achievements v]) + ((item (3) of [achievements v]) + ((item (4) of [achievements v]) + ((item (5) of [achievements v]) + ((item (6) of [achievements v]) + ((item (7) of [achievements v]) + ((item (8) of [achievements v]) + ((item (9) of [achievements v]) + ((item (9) of [achievements v]) + ((item (10) of [achievements v]) + ((item (11) of [achievements v]) + (item (12) of [achievements v])))))))))))))\n            switch costume to (l+f v)\n            go to x: (0) y: (20)\n            transit\n        end\n    end\n    if <(item (1) of [achievements v]) = [0]> then\n        if <(jumps) > [4.9]> then\n            start sound [Collect v]\n            replace item (1) of [achievements v] with [1]\n            set [achievements v] to ((item (1) of [achievements v]) + ((item (2) of [achievements v]) + ((item (3) of [achievements v]) + ((item (4) of [achievements v]) + ((item (5) of [achievements v]) + ((item (6) of [achievements v]) + ((item (7) of [achievements v]) + ((item (8) of [achievements v]) + ((item (9) of [achievements v]) + ((item (9) of [achievements v]) + ((item (10) of [achievements v]) + ((item (11) of [achievements v]) + (item (12) of [achievements v])))))))))))))\n            switch costume to (1 v)\n            go to x: (0) y: (20)\n            transit\n        end\n    end\n    if <(item (2) of [achievements v]) = [0]> then\n        if <(jumps) > [19.9]> then\n            start sound [Collect v]\n            replace item (2) of [achievements v] with [1]\n            set [achievements v] to ((item (1) of [achievements v]) + ((item (2) of [achievements v]) + ((item (3) of [achievements v]) + ((item (4) of [achievements v]) + ((item (5) of [achievements v]) + ((item (6) of [achievements v]) + ((item (7) of [achievements v]) + ((item (8) of [achievements v]) + ((item (9) of [achievements v]) + ((item (9) of [achievements v]) + ((item (10) of [achievements v]) + ((item (11) of [achievements v]) + (item (12) of [achievements v])))))))))))))\n            switch costume to (2 v)\n            go to x: (0) y: (20)\n            transit\n        end\n    end\n    if <(item (3) of [achievements v]) = [0]> then\n        if <(deaths) > [9.9]> then\n            start sound [Collect v]\n            replace item (3) of [achievements v] with [1]\n            set [achievements v] to ((item (1) of [achievements v]) + ((item (2) of [achievements v]) + ((item (3) of [achievements v]) + ((item (4) of [achievements v]) + ((item (5) of [achievements v]) + ((item (6) of [achievements v]) + ((item (7) of [achievements v]) + ((item (8) of [achievements v]) + ((item (9) of [achievements v]) + ((item (9) of [achievements v]) + ((item (10) of [achievements v]) + ((item (11) of [achievements v]) + (item (12) of [achievements v])))))))))))))\n            switch costume to (3 v)\n            go to x: (0) y: (20)\n            transit\n        end\n    end\n    if <(item (4) of [achievements v]) = [0]> then\n        if <(station) = [2]> then\n            start sound [Collect v]\n            replace item (4) of [achievements v] with [1]\n            set [achievements v] to ((item (1) of [achievements v]) + ((item (2) of [achievements v]) + ((item (3) of [achievements v]) + ((item (4) of [achievements v]) + ((item (5) of [achievements v]) + ((item (6) of [achievements v]) + ((item (7) of [achievements v]) + ((item (8) of [achievements v]) + ((item (9) of [achievements v]) + ((item (9) of [achievements v]) + ((item (10) of [achievements v]) + ((item (11) of [achievements v]) + (item (12) of [achievements v])))))))))))))\n            switch costume to (4 v)\n            go to x: (0) y: (20)\n            transit\n        end\n    end\n    if <(item (5) of [achievements v]) = [0]> then\n        if <(station) = [3]> then\n            start sound [Collect v]\n            replace item (5) of [achievements v] with [1]\n            set [achievements v] to ((item (1) of [achievements v]) + ((item (2) of [achievements v]) + ((item (3) of [achievements v]) + ((item (4) of [achievements v]) + ((item (5) of [achievements v]) + ((item (6) of [achievements v]) + ((item (7) of [achievements v]) + ((item (8) of [achievements v]) + ((item (9) of [achievements v]) + ((item (9) of [achievements v]) + ((item (10) of [achievements v]) + ((item (11) of [achievements v]) + (item (12) of [achievements v])))))))))))))\n            switch costume to (5 v)\n            go to x: (0) y: (20)\n            transit\n        end\n    end\n    if <(item (6) of [achievements v]) = [0]> then\n        if <(respawned?) = [1]> then\n            start sound [Collect v]\n            replace item (6) of [achievements v] with [1]\n            set [achievements v] to ((item (1) of [achievements v]) + ((item (2) of [achievements v]) + ((item (3) of [achievements v]) + ((item (4) of [achievements v]) + ((item (5) of [achievements v]) + ((item (6) of [achievements v]) + ((item (7) of [achievements v]) + ((item (8) of [achievements v]) + ((item (9) of [achievements v]) + ((item (9) of [achievements v]) + ((item (10) of [achievements v]) + ((item (11) of [achievements v]) + (item (12) of [achievements v])))))))))))))\n            switch costume to (6 v)\n            go to x: (0) y: (20)\n            transit\n        end\n    end\n    if <(item (7) of [achievements v]) = [0]> then\n        if <(station) = [5]> then\n            start sound [Collect v]\n            replace item (7) of [achievements v] with [1]\n            set [achievements v] to ((item (1) of [achievements v]) + ((item (2) of [achievements v]) + ((item (3) of [achievements v]) + ((item (4) of [achievements v]) + ((item (5) of [achievements v]) + ((item (6) of [achievements v]) + ((item (7) of [achievements v]) + ((item (8) of [achievements v]) + ((item (9) of [achievements v]) + ((item (9) of [achievements v]) + ((item (10) of [achievements v]) + ((item (11) of [achievements v]) + (item (12) of [achievements v])))))))))))))\n            switch costume to (7 v)\n            go to x: (0) y: (20)\n            transit\n        end\n    end\n    if <(item (9) of [achievements v]) = [0]> then\n        if <(chatted \(times\)) > [0]> then\n            start sound [Collect v]\n            replace item (9) of [achievements v] with [1]\n            set [achievements v] to ((item (1) of [achievements v]) + ((item (2) of [achievements v]) + ((item (3) of [achievements v]) + ((item (4) of [achievements v]) + ((item (5) of [achievements v]) + ((item (6) of [achievements v]) + ((item (7) of [achievements v]) + ((item (8) of [achievements v]) + ((item (9) of [achievements v]) + ((item (9) of [achievements v]) + ((item (10) of [achievements v]) + ((item (11) of [achievements v]) + (item (12) of [achievements v])))))))))))))\n            switch costume to (9 v)\n            go to x: (0) y: (20)\n            transit\n        end\n    end\n    if <(item (10) of [achievements v]) = [0]> then\n        if <(chatted \(times\)) > [5]> then\n            start sound [Collect v]\n            replace item (10) of [achievements v] with [1]\n            set [achievements v] to ((item (1) of [achievements v]) + ((item (2) of [achievements v]) + ((item (3) of [achievements v]) + ((item (4) of [achievements v]) + ((item (5) of [achievements v]) + ((item (6) of [achievements v]) + ((item (7) of [achievements v]) + ((item (8) of [achievements v]) + ((item (9) of [achievements v]) + ((item (9) of [achievements v]) + ((item (10) of [achievements v]) + ((item (11) of [achievements v]) + (item (12) of [achievements v])))))))))))))\n            switch costume to (10 v)\n            go to x: (0) y: (20)\n            transit\n        end\n    end\n    if <(item (11) of [achievements v]) = [0]> then\n        if <(nano.sj) > [4.9]> then\n            start sound [Collect v]\n            replace item (11) of [achievements v] with [1]\n            set [achievements v] to ((item (1) of [achievements v]) + ((item (2) of [achievements v]) + ((item (3) of [achievements v]) + ((item (4) of [achievements v]) + ((item (5) of [achievements v]) + ((item (6) of [achievements v]) + ((item (7) of [achievements v]) + ((item (8) of [achievements v]) + ((item (9) of [achievements v]) + ((item (9) of [achievements v]) + ((item (10) of [achievements v]) + ((item (11) of [achievements v]) + (item (12) of [achievements v])))))))))))))\n            switch costume to (11 v)\n            go to x: (0) y: (20)\n            transit\n        end\n    end\n    if <(item (12) of [achievements v]) = [0]> then\n        if <(checkpoint) = [2]> then\n            start sound [Collect v]\n            replace item (12) of [achievements v] with [1]\n            set [achievements v] to ((item (1) of [achievements v]) + ((item (2) of [achievements v]) + ((item (3) of [achievements v]) + ((item (4) of [achievements v]) + ((item (5) of [achievements v]) + ((item (6) of [achievements v]) + ((item (7) of [achievements v]) + ((item (8) of [achievements v]) + ((item (9) of [achievements v]) + ((item (9) of [achievements v]) + ((item (10) of [achievements v]) + ((item (11) of [achievements v]) + (item (12) of [achievements v])))))))))))))\n            switch costume to (12 v)\n            go to x: (0) y: (20)\n            transit\n        end\n    end\n    if <(item (13) of [achievements v]) = [0]> then\n        if <[250] < (tera.fly)> then\n            start sound [Collect v]\n            replace item (13) of [achievements v] with [1]\n            set [achievements v] to ((item (1) of [achievements v]) + ((item (2) of [achievements v]) + ((item (3) of [achievements v]) + ((item (4) of [achievements v]) + ((item (5) of [achievements v]) + ((item (6) of [achievements v]) + ((item (7) of [achievements v]) + ((item (8) of [achievements v]) + ((item (9) of [achievements v]) + ((item (9) of [achievements v]) + ((item (10) of [achievements v]) + ((item (11) of [achievements v]) + (item (12) of [achievements v])))))))))))))\n            switch costume to (13 v)\n            go to x: (0) y: (20)\n            transit\n        end\n    end\n    if <(item (14) of [achievements v]) = [0]> then\n        if <(station) = [4]> then\n            start sound [Collect v]\n            replace item (14) of [achievements v] with [1]\n            set [achievements v] to ((item (1) of [achievements v]) + ((item (2) of [achievements v]) + ((item (3) of [achievements v]) + ((item (4) of [achievements v]) + ((item (5) of [achievements v]) + ((item (6) of [achievements v]) + ((item (7) of [achievements v]) + ((item (8) of [achievements v]) + ((item (9) of [achievements v]) + ((item (9) of [achievements v]) + ((item (10) of [achievements v]) + ((item (11) of [achievements v]) + (item (12) of [achievements v])))))))))))))\n            switch costume to (14 v)\n            go to x: (0) y: (20)\n            transit\n        end\n    end\nend\n\nwhen flag clicked\ndelete all of [chat v]\ndelete all of [select a phrase v]\nadd [Hi!] to [chat v]\nadd [1: Hi!] to [select a phrase v]\nadd [Hello!] to [chat v]\nadd [2: Hello!] to [select a phrase v]\nadd [How are you?] to [chat v]\nadd [3: How are you?] to [select a phrase v]\nadd [I'm fine, thanks] to [chat v]\nadd [4: I'm fine, thanks!] to [select a phrase v]\nadd [Not so good :\(] to [chat v]\nadd [5: Not so good :\(] to [select a phrase v]\nadd [How did you do this?] to [chat v]\nadd [6: How did you do this?] to [select a phrase v]\nadd [Help me!] to [chat v]\nadd [7: Help me!] to [select a phrase v]\nadd [Come with me!] to [chat v]\nadd [8: Come with me!] to [select a phrase v]\nadd [Follow me! ;\)] to [chat v]\nadd [9: Follow me ;\)] to [select a phrase v]\nadd [Let me show you something] to [chat v]\nadd [A: Let me show you something] to [select a phrase v]\nadd [Yes] to [chat v]\nadd [B: Yes] to [select a phrase v]\nadd [No] to [chat v]\nadd [C: No] to [select a phrase v]\nadd [Bye!] to [chat v]\nadd [D: Bye!] to [select a phrase v]\nadd [Heyo!] to [chat v]\nadd [E: Heyo!] to [select a phrase v]\nadd [Gtg. See you later!] to [chat v]\nadd [F: Gtg. See you later!] to [select a phrase v]\nadd [OK] to [chat v]\nadd [G: OK] to [select a phrase v]\nadd [Stay away from me! I have Corona] to [chat v]\nadd [H: Stay away from me! I have Corona] to [select a phrase v]\nadd [Is it lagging for you?] to [chat v]\nadd [I: Is it laggin for you?] to [select a phrase v]\nadd [Go away!] to [chat v]\nadd [J: Go away!] to [select a phrase v]\nadd [Please let me alone!] to [chat v]\nadd [K: Please let me alone] to [select a phrase v]\nadd [] to [chat v]\ndelete all of [chars v]\nadd [1] to [chars v]\nadd [2] to [chars v]\nadd [3] to [chars v]\nadd [4] to [chars v]\nadd [5] to [chars v]\nadd [6] to [chars v]\nadd [7] to [chars v]\nadd [8] to [chars v]\nadd [9] to [chars v]\nadd [a] to [chars v]\nadd [b] to [chars v]\nadd [c] to [chars v]\nadd [d] to [chars v]\nadd [e] to [chars v]\nadd [f] to [chars v]\nadd [g] to [chars v]\nadd [h] to [chars v]\nadd [i] to [chars v]\nadd [j] to [chars v]\nadd [k] to [chars v]\nset [chat v] to [0]\nshow list [select a phrase v]\n\nwhen I receive [start s plat v]\nif <(multiplayer?) = [1]> then\n    forever\n        wait until <key (t v) pressed?>\n        set [chat v] to [1]\n        hide list [select a phrase v]\n        wait (0.5) seconds\n        chat output\n        set [chat v] to [0]\n        show list [select a phrase v]\n        wait (0.5) seconds\n    end\nend\n\ndefine chat output\nrepeat until <not <(chat.output) = [0]>>\n    if <key (1 v) pressed?> then\n        set [chat.output v] to [1]\n        change [chatted \(times\) v] by (1)\n    end\n    if <key (2 v) pressed?> then\n        set [chat.output v] to [2]\n        change [chatted \(times\) v] by (1)\n    end\n    if <key (3 v) pressed?> then\n        set [chat.output v] to [3]\n        change [chatted \(times\) v] by (1)\n    end\n    if <key (4 v) pressed?> then\n        set [chat.output v] to [4]\n        change [chatted \(times\) v] by (1)\n    end\n    if <key (5 v) pressed?> then\n        set [chat.output v] to [5]\n        change [chatted \(times\) v] by (1)\n    end\n    if <key (6 v) pressed?> then\n        set [chat.output v] to [6]\n        change [chatted \(times\) v] by (1)\n    end\n    if <key (7 v) pressed?> then\n        set [chat.output v] to [7]\n        change [chatted \(times\) v] by (1)\n    end\n    if <key (9 v) pressed?> then\n        set [chat.output v] to [9]\n        change [chatted \(times\) v] by (1)\n    end\n    if <key (8 v) pressed?> then\n        set [chat.output v] to [8]\n        change [chatted \(times\) v] by (1)\n    end\n    if <key (a v) pressed?> then\n        set [chat.output v] to [10]\n        change [chatted \(times\) v] by (1)\n    end\n    if <key (b v) pressed?> then\n        set [chat.output v] to [11]\n        change [chatted \(times\) v] by (1)\n    end\n    if <key (c v) pressed?> then\n        set [chat.output v] to [12]\n        change [chatted \(times\) v] by (1)\n    end\n    if <key (d v) pressed?> then\n        set [chat.output v] to [13]\n        change [chatted \(times\) v] by (1)\n    end\n    if <key (e v) pressed?> then\n        set [chat.output v] to [14]\n        change [chatted \(times\) v] by (1)\n    end\n    if <key (f v) pressed?> then\n        set [chat.output v] to [15]\n        change [chatted \(times\) v] by (1)\n    end\n    if <key (g v) pressed?> then\n        set [chat.output v] to [16]\n        change [chatted \(times\) v] by (1)\n    end\n    if <key (h v) pressed?> then\n        set [chat.output v] to [17]\n        change [chatted \(times\) v] by (1)\n    end\n    if <key (i v) pressed?> then\n        set [chat.output v] to [18]\n        change [chatted \(times\) v] by (1)\n    end\n    if <key (j v) pressed?> then\n        set [chat.output v] to [19]\n        change [chatted \(times\) v] by (1)\n    end\n    if <key (k v) pressed?> then\n        set [chat.output v] to [20]\n        change [chatted \(times\) v] by (1)\n    end\n    if <key (t v) pressed?> then\n        set [chat.output v] to [21]\n        change [chatted \(times\) v] by (0)\n    end\nend\n\nwhen I receive [start s plat v]\nset [chat.output v] to [0]\nforever\n    wait until <not <(chat.output) = [0]>>\n    wait (2) seconds\n    set [chat.output v] to [0]\nend\n\nwhen flag clicked\nset [toggle player names? v] to [0]\nhide variable [toggle player names? v]\n\nwhen [n v] key pressed\nif <(toggle player names?) = [0]> then\n    set [toggle player names? v] to [1]\nelse\n    set [toggle player names? v] to [0]\nend\nshow variable [toggle player names? v]\nwait (1) seconds\nhide variable [toggle player names? v]\n\ndefine Test player slot (slot)\nadd [0] to [my list \(new\) v]\nadd [0] to [my list \(new\) v]\nadd [0] to [my list \(new\) v]\nadd [0] to [my list \(new\) v]\nadd [0] to [my list \(new\) v]\nadd [0] to [my list \(new\) v]\nadd [0] to [my list \(new\) v]\nadd [0] to [my list \(new\) v]\nadd [0] to [my list \(new\) v]\nadd [0] to [my list \(new\) v]\nadd [0] to [my list \(new\) v]\nadd (username) to [my list \(new\) v]\nbroadcast (check v) and wait\nbroadcast (Get Data v) and wait\nif <not <(item (((@PlayerSlot) * (12)) - (1)) of [cloud list v]) = (item (12) of [my list \(new\) v])>> then\n    set [full? v] to [true]\nend\n\ndelete all of [my list \(new\) v]\n\ndelete all of [my list \(new\) v]\n\ndelete all of [cloud list v]\n\nwhen I receive [single v]\nhide\n\nwhen I receive [win v]\nstop [other scripts in sprite v]\n\n@checkpoints\n\nwhen I receive [green flag v]\nset [ghost v] effect to (20)\nhide\n\nwhen I receive [tick v]\nposition (((x) + ()) - (SCROLL X)) ((y) - (SCROLL Y))\n\nwhen I receive [setup v]\ndelete all of [checkpoint-x v]\nadd [0] to [checkpoint-x v]\nadd [0] to [checkpoint y v]\nclear graphic effects\nhide\nset [x v] to [0]\nset [y v] to [0]\nswitch costume to (0 v)\nnew checkpoint at [2742] [292] check [2]\nnew checkpoint at [6101] [-6] check [3]\nnew checkpoint at [9723] [-23] check [4]\n\ndefine position (x) (y)\nset [ghost v] effect to (50)\ngo to x: (x) y: (y)\nif <<(x) = (x position)> and <(y) = (y position)>> then\n    show\n    if <(checkpoint) > ((my.check.number) - (1))> then\n        switch costume to (on v)\n    else\n        switch costume to (off v)\n        if <touching (player v)?> then\n            if <(my.check.number) > (checkpoint)> then\n                start sound [Collect v]\n                set [checkpoint v] to (my.check.number)\n            end\n        end\n    end\nelse\n    hide\nend\ngo to [back v] layer\ngo [forward v] (20) layers\n\nwhen I receive [reset v]\ndelete this clone\n\ndefine new checkpoint at (x) (y) check (n)\nset [x v] to (x)\nadd (x) to [checkpoint-x v]\nset [y v] to (y)\nadd (y) to [checkpoint y v]\nset [my.check.number v] to (n)\ncreate clone of (_myself_ v)\n\nwhen flag clicked\nhide\n\nwhen I receive [win v]\nstop [other scripts in sprite v]\n\n@saw\n\nwhen I receive [green flag v]\nset [ghost v] effect to (20)\nhide\n\nwhen I receive [tick v]\nif <(trapped?) = [0]> then\n    set size to (100) %\n    position (((x) + ()) - (SCROLL X)) ((y) - (SCROLL Y))\nend\nif <(trapped?) = [1]> then\n    set size to (75) %\n    position (((x) + ()) - (SCROLL X)) (((y) - (SCROLL Y)) + (([cos v] of (((timer) + (2)) * (100)) ) * (100)))\nend\nif <(trapped?) = [2]> then\n    set size to (75) %\n    position ((((x) + ()) - (SCROLL X)) + (([cos v] of (((timer) + (0)) * (100)) ) * (100))) (((y) - (SCROLL Y)) + ())\nend\n\nwhen I receive [setup v]\nclear graphic effects\nhide\nset [x v] to [0]\nset [y v] to [0]\nswitch costume to (kostüm1 v)\nnew saw at [2350] [95] trapped? [0]\nnew saw at [2493] [170] trapped? [0]\nnew saw at [3265] [270] trapped? [0]\nnew saw at [3531] [275] trapped? [0]\nnew saw at [4300] [320] trapped? [2]\nnew saw at [4580] [375] trapped? [1]\nnew saw at [6410] [0] trapped? [1]\nnew saw at [5915] [0] trapped? [1]\nnew saw at [6589] [-50] trapped? [0]\nnew saw at [9581] [-24] trapped? [0]\nnew saw at [100000000000] [170] trapped? [0]\n\ndefine position (x) (y)\ngo to x: (x) y: (y)\nif <<(x) = (x position)> and <(y) = (y position)>> then\n    show\nelse\n    hide\nend\nswitch costume to (saw v)\nset [ghost v] effect to (20)\ngo to [back v] layer\npoint in direction (([sin v] of ((timer) * (100)) ) * (100))\n\nwhen I receive [reset v]\ndelete this clone\n\ndefine new saw at (x) (y) trapped? (t)\nset [x v] to (x)\nset [y v] to (y)\nset [trapped? v] to (t)\ncreate clone of (_myself_ v)\n\nwhen flag clicked\nhide\n\nwhen I receive [win v]\nstop [other scripts in sprite v]\n\n@transitions\n\nforever\n    set [username v] to [1357t]\nend\n\nwhen I receive [run v]\nshow\ngo to [front v] layer\nset [ghost v] effect to (100)\nrepeat (10)\n    change [ghost v] effect by (-10)\nend\n\nwhen I receive [start v]\nrepeat (10)\n    change [ghost v] effect by (10)\nend\nhide\n\nwhen I receive [show v]\nstop [other scripts in sprite v]\nshow\nclear graphic effects\ngo to [front v] layer\nwait (1) seconds\nstop [all v]\n\nwhen flag clicked\nshow\ngo to [front v] layer\nset [ghost v] effect to (0)\nwait (1) seconds\nrepeat (10)\n    change [ghost v] effect by (10)\nend\n\nwhen flag clicked\nswitch costume to (white v)\n\nwhen I receive [single v]\nshow\ngo to [front v] layer\nset [ghost v] effect to (100)\nrepeat (10)\n    change [ghost v] effect by (-10)\nend\nwait (2) seconds\nbroadcast (start s plat v)\nrepeat (10)\n    change [ghost v] effect by (10)\nend\nhide\n\n@Gobo\n\nwhen flag clicked\nwait (1) seconds\nshow\npoint in direction (90)\nset size to (70) %\nstart sound [Drum Boing v]\nswitch costume to (gobo-b v)\ngo to x: (-200) y: (80)\nrepeat (10)\n    change y by (((y position) - (-40)) / (-2))\nend\nwait (0.2) seconds\nrepeat (54)\n    change x by ((200) / (54))\n    if <(costume [number v]) = [18]> then\n        switch costume to (gobo-b2 v)\n    end\n    next costume\nend\nwait (1) seconds\nswitch costume to (gobo-b v)\nstart sound [Zoop v]\nswitch costume to (yeah v)\nset [brightness v] effect to (100)\nset size to (20) %\nset [intro-id v] to [0]\ncreate clone of (_myself_ v)\nbroadcast (particle v)\nrepeat (10)\n    change [brightness v] effect by (-10)\n    change y by (((y position) - (0)) / (-2))\n    change size by (((size) - ((([cos v] of ((timer) * (100)) ) * (20)) + (70))) / (-2))\nend\nbroadcast (startmenu v)\nforever\n    set size to ((([cos v] of ((timer) * (100)) ) * (20)) + (70)) %\nend\n\nwhen flag clicked\nwait (1) seconds\nrepeat (10)\n    change x by (0)\nend\nwait (0.2) seconds\nrepeat (8)\n    wait ((9) / (54)) seconds\n    start sound [Beat Box1 v]\nend\n\nwhen I start as a clone\nif <(intro-id) = [0]> then\n    show\n    switch costume to (title v)\n    set size to (20) %\n    go to x: (0) y: (0)\n    repeat (20)\n        change [brightness v] effect by (-5)\n        point in direction ((([sin v] of ((timer) * (100)) ) * (5)) + (90))\n        change size by (((size) - (100)) / (-5))\n    end\n    forever\n        set [ghost v] effect to (20)\n        point in direction ((([sin v] of ((timer) * (100)) ) * (5)) + (90))\n        set size to (100) %\n    end\nend\n\nwhen flag clicked\nforever\n    broadcast (scrolling b ground v)\nend\n\nwhen I receive [run v]\nhide\nstop [other scripts in sprite v]\nwait (1) seconds\nhide\ndelete this clone\n\nif <(costume [name v]) = [yeah]> then\nend\n\nwhen I receive [next step v]\nif <(costume [name v]) = [yeah]> then\n    hide\nend\n\nwhen I receive [single v]\nhide\nstop [other scripts in sprite v]\nwait (1) seconds\nhide\ndelete this clone\n\n@Figur3\n\ndefine pos button id: (id)\nif <(id) = [1]> then\n    show\n    switch costume to (costume2 v)\n    forever\n        go to (mouse-pointer v)\n        if <(button_0) = [1]> then\n            set [ghost v] effect to (20)\n            go to [front v] layer\n            show\n        else\n            set [ghost v] effect to (100)\n        end\n    end\nend\nif <(id) = [0]> then\n    go to x: (-220) y: (160)\n    show\n    switch costume to (kostüm2 v)\n    set [ghost v] effect to (80)\n    forever\n        change size by (((size) + (-100)) / (-5))\n        if <touching (mouse-pointer v)?> then\n            change size by (((size) + (-124)) / (-5))\n            set [ghost v] effect to (40)\n            point in direction ((90) + ((16) * ([sin v] of ((timer) * (300)) )))\n            set [button_0 v] to [1]\n            if <mouse down?> then\n                if <(costume [number v]) = [2]> then\n                    switch costume to (kostüm1 v)\n                    set [sound v] to [0]\n                else\n                    set [sound v] to [100]\n                    switch costume to (kostüm2 v)\n                end\n                wait until <not <<mouse down?> and <touching (mouse-pointer v)?>>>\n            end\n        else\n            point in direction (90)\n            set [ghost v] effect to (70)\n            set [button_0 v] to [0]\n        end\n    end\nend\nif <(id) = [3]> then\n    go to x: (0) y: (-100)\n    show\n    switch costume to (kostüm5 v)\n    set [button_2 v] to [0]\n    set [ghost v] effect to (48)\n    set size to (10) %\n    forever\n        forever\n            repeat until <touching (mouse-pointer v)?>\n                point in direction ((([cos v] of ((timer) * (100)) ) * (5)) + (90))\n                change size by (((size) + (-125)) / (-5))\n                change y by (((y position) + (20)) / (-15))\n            end\n            repeat until <not <touching (mouse-pointer v)?>>\n                point in direction ((([cos v] of ((timer) * (100)) ) * (5)) + (90))\n                change y by (((y position) + (20)) / (-15))\n                change size by (((size) + (-150)) / (-5))\n                if <mouse down?> then\n                    broadcast (run v)\n                end\n            end\n        end\n    end\nend\nif <(id) = [2]> then\n    go to x: (0) y: (-150)\n    show\n    switch costume to (kostüm4 v)\n    set [button_2 v] to [0]\n    set [ghost v] effect to (48)\n    set size to (10) %\n    forever\n        forever\n            repeat until <touching (mouse-pointer v)?>\n                point in direction ((([cos v] of ((timer) * (100)) ) * (5)) + (90))\n                change size by (((size) + (-125)) / (-5))\n                change y by (((y position) + (125)) / (-15))\n            end\n            repeat until <not <touching (mouse-pointer v)?>>\n                point in direction ((([cos v] of ((timer) * (100)) ) * (5)) + (90))\n                change y by (((y position) + (125)) / (-15))\n                change size by (((size) + (-150)) / (-5))\n                if <mouse down?> then\n                    repeat (10)\n                        change [ghost v] effect by (10)\n                        change size by ((size) / (-10))\n                    end\n                    broadcast (next step v)\n                    wait (0.5) seconds\n                    switch costume to (kostüm3 v)\n                    repeat (10)\n                        change [ghost v] effect by (-10)\n                        change size by (((size) - (100)) / (-10))\n                        point in direction ((([cos v] of ((timer) * (100)) ) * (5)) + (90))\n                        change y by (((y position) + (125)) / (-15))\n                    end\n                    forever\n                        repeat until <touching (mouse-pointer v)?>\n                            point in direction ((([cos v] of ((timer) * (100)) ) * (5)) + (90))\n                            change y by (((y position) + (125)) / (-15))\n                            change size by (((size) + (-125)) / (-5))\n                        end\n                        repeat until <not <touching (mouse-pointer v)?>>\n                            point in direction ((([cos v] of ((timer) * (100)) ) * (5)) + (90))\n                            change y by (((y position) + (125)) / (-15))\n                            change size by (((size) + (-150)) / (-5))\n                            if <mouse down?> then\n                                broadcast (single v)\n                            end\n                        end\n                    end\n                end\n            end\n        end\n    end\nend\n\nwhen flag clicked\nswitch costume to (main v)\nset [ghost v] effect to (70)\nhide\n\nwhen I start as a clone\npos button id: (button_clone_id)\n\nwhen I receive [next step v]\nif <(costume [name v]) = [Kostüm4]> then\n    set [button_clone_id v] to [3]\n    create clone of (_myself_ v)\nend\n\nwhen flag clicked\nset [sound v] to [100]\nset [button_clone_id v] to [0]\ncreate clone of (_myself_ v)\nwait (0.1) seconds\nset [button_clone_id v] to [1]\ncreate clone of (_myself_ v)\n\nwhen I receive [startmenu v]\nset [button_clone_id v] to [2]\ncreate clone of (_myself_ v)\n\n\n\nwhen I receive [single v]\nset [multiplayer? v] to [0]\nif <(costume [name v]) = [Kostüm3]> then\n    delete this clone\nend\nif <(costume [name v]) = [Kostüm5]> then\n    delete this clone\nend\n\nwhen I receive [run v]\nset [multiplayer? v] to [1]\nif <(costume [name v]) = [Kostüm3]> then\n    delete this clone\nend\nif <(costume [name v]) = [Kostüm5]> then\n    delete this clone\nend\n\nwhen I receive [single v]\nset [station v] to [1]\n\n@Download\n\n@particles\n\nwhen flag clicked\nswitch costume to (costume2 v)\nhide\n\nwhen I start as a clone\nset [y v] to [30]\nshow\neff (pick random (-10) to (10))\n\ndefine eff (x)\nset [-1 v] to [1]\nshow\nswitch costume to (costume1 v)\nset [color v] effect to (0)\nset [ghost v] effect to (0)\nset [brightness v] effect to (pick random (-25) to (25))\nforever\n    go to [front v] layer\n    change x by ((x) * (-1))\n    change y by (y)\n    change [y v] by (-2)\n    if <(y position) < [-170]> then\n        delete this clone\n    end\n    if <touching (_edge_ v)?> then\n        if <(-1) = [1]> then\n            set [-1 v] to [-1]\n        else\n            set [-1 v] to [1]\n        end\n    end\nend\n\nwhen I receive [particle v]\nif <(costume [number v]) = [2]> then\n    go to x: (pick random (-240) to (240)) y: (-3000)\n    repeat (10)\n        create clone of (_myself_ v)\n    end\nend\n\n@Sprite5\n\nwhen I receive [win v]\nset [brightness v] effect to (100)\nswitch costume to (costume1 v)\nshow\ngo to x: (0) y: (-100)\nset [time v] to (timer)\ngo to [front v] layer\nforever\n    show variable [time v]\n    hide variable [power v]\n    change y by ((y position) / (-10))\nend\n\nwhen flag clicked\nhide variable [time v]\n\nwhen flag clicked\nhide\n\nwhen I receive [win v]\nrepeat (25)\n    change [brightness v] effect by (-4)\nend\n\ngo [backward v] (1) layers\n\n@water\n\nwhen I receive [green flag v]\nset [ghost v] effect to (0)\nhide\n\nwhen I receive [tick v]\nposition (((y) - (SCROLL Y)) + (([sin v] of ((timer) * (100)) ) * (10)))\n\nwhen I receive [setup v]\nclear graphic effects\nhide\nset [y v] to [-60]\nswitch costume to (kostüm1 v)\n\ndefine position (y)\ngo to x: (0) y: (y)\nif <(y) = (y position)> then\n    show\nelse\n    hide\nend\nset [ghost v] effect to (45)\npoint in direction ((([cos v] of ((timer) * (100)) ) * (2)) + (90))\ngo to [front v] layer\ngo [backward v] (10) layers\n\nwhen I receive [reset v]\ndelete this clone\n\nwhen flag clicked\nhide\n\nwhen I start as a clone\ngo to [back v] layer\n\nwhen I receive [show v]\nforever\n    stop [other scripts in sprite v]\n    hide\nend\n\nwhen I receive [win v]\nstop [other scripts in sprite v]\n\n
love, favorite and follow and I check out your projeccs :3\nArrow keys\nClimb up the LADDER\nuh, Hi, new new platformer with (hopefully) great graphics\nYeah, I think this is good leave a love and fav :)\nSequel coming out sometime soon :D (as soon as I stop reading r/slash stories)