＃Reverse Platformer!!＃  「GAMES」
@Stage\n\nwhen I receive [s v]\nif <<(mode) = [editor]> or <(mode) = [playing]>> then\n    if <(theme) = [d]> then\n        switch backdrop to (d v)\n    end\n    if <(theme) = [g]> then\n        switch backdrop to (g v)\n    end\nend\n\nwhen flag clicked\nforever\n    if <<(mode) = [editor]> or <(mode) = [playing]>> then\n        if <(theme) = [d]> then\n            switch backdrop to (d v)\n        end\n        if <(theme) = [g]> then\n            switch backdrop to (g v)\n        end\n    end\nend\n\nwhen flag clicked\nset [theme v] to [g]\nset [input v] to []\n\nwhen flag clicked\nwait (0.5) seconds\nset volume to (100) %\nforever\n    play sound [Happy Fun Candy Time  v] until done\n    wait (1) seconds\n    play sound [561695_Happy v] until done\n    wait (1) seconds\nend\n\nwhen I receive [hide v]\nset volume to (20) %\nwait (2.5) seconds\nset volume to (100) %\n\nwhen I receive [hide v]\nerase all\nset [mode v] to [loading]\n\n@Hitbox\n\ndefine Physics\ngo to [back v] layer\nif <([abs v] of (sx) ) < [8]> then\n    if  then\n        change [sx v] by (2.1)\n    else\n        if  then\n            change [sx v] by (-2.1)\n        end\n    end\nend\nif <(sy) < [-9]> then\n    set [sy v] to [-9]\nend\nif  then\n    if <not <[collision v] contains [4]?>> then\n        if <(in air) < [4]> then\n            set [sy v] to [8]\n        end\n    end\nend\nif <[collision v] contains [4]?> then\n    if <key (up arrow v) pressed?> then\n        set [sy v] to [3]\n    else\n        change [sy v] by (-1)\n    end\nelse\n    change [sy v] by (-1)\nend\nset [sx v] to ((sx) * (0.7))\ny (sy)\nx (sx)\nchange [scroll x v] by (round (((x) - (SCROLL X)) / (10)))\nchange [scroll y v] by (round (((y) - (SCROLL Y)) / (3)))\nset [scroll x v] to (round (SCROLL X))\nif <(SCROLL Y) < [-100]> then\n    set [scroll y v] to [-100]\nend\ngoto\nset [die v] to [0]\nif <<<[collision v] contains [2]?> or <[collision v] contains [5]?>> or <[collision v] contains [12]?>> then\n    set [die v] to [1]\nend\nif <[collision v] contains [3]?> then\n    set [sy v] to [14]\n    set [bb v] to [100]\nend\nif <(y) < [-300]> then\n    set [die v] to [1]\nend\nif <[collision v] contains [10]?> then\n    change [x v] by (sx)\n    change [y v] by (sy)\n    set [paused v] to [1]\n    set [die v] to [0]\n    broadcast (win v)\nend\nTtest\nif <[collision v] contains [9]?> then\n    set [checkpoint v] to (item # of [9] in [collision v])\n    start sound [Collect v]\nend\nsay []\nif <[collision v] contains [8]?> then\n    create clone of (_myself_ v)\nend\n\ndefine y (sy)\nchange [y v] by (sy)\nchange [in air v] by (1)\ngoto\nrepeat until <not <<<[collision v] contains [21]?> or <[collision v] contains [11]?>> or <[collision v] contains [1]?>>>\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    goto\n    set [sy v] to [0]\nend\n\ndefine x (sx)\nchange [x v] by (sx)\ngoto\nif <<<[collision v] contains [21]?> or <[collision v] contains [11]?>> or <[collision v] contains [1]?>> then\n    repeat (10)\n        change [y v] by (1)\n        goto\n        if <not <<<[collision v] contains [21]?> or <[collision v] contains [11]?>> or <[collision v] contains [1]?>>> then\n            stop [this script v]\n        end\n    end\n    change [y v] by (-10)\n    repeat until <not <<<[collision v] contains [21]?> or <[collision v] contains [11]?>> or <[collision v] contains [1]?>>>\n        if <(sx) > [0]> then\n            change [x v] by (-1)\n        else\n            change [x v] by (1)\n        end\n        goto\n        set [sx v] to [0]\n    end\n    set [x v] to (x)\n    if <(walljump) = [1]> then\n        if  then\n            if <([abs v] of (sx) ) = (sx)> then\n                set [sx v] to [-10]\n            else\n                set [sx v] to [10]\n            end\n            set [sy v] to [10]\n        end\n    end\nend\n\ndefine goto\nset [ghost v] effect to (0)\ngo to x: ((x) - (SCROLL X)) y: ((y) - (SCROLL Y))\nTtest\n\ndefine Die\nstart sound [crashed oof v]\nset [paused v] to [1]\nif <(y position) < [-100]> then\n    set [sy v] to [0]\nelse\n    set [sy v] to [10]\nend\nset [sx v] to [-3]\nrepeat (25)\n    change [ghost v] effect by (5)\n    turn right (5) degrees\n    change x by (sx)\n    change y by (sy)\n    change [sy v] by (-1.3)\nend\npoint in direction (90)\nset [paused v] to [0]\nset [fps v] to [31]\n\nshow\nwait (0.1) seconds\nhide\nwait (0.1) seconds\n\nwhen flag clicked\nforever\n    change [cooldown v] by (-2.7)\n    if <(mode) = [playing]> then\n        change [last v] by (-1)\n        if <(pick random (1) to (60)) = [1]> then\n            if <(last) < [0]> then\n                set [last v] to [5]\n                switch costume to (7 v)\n                repeat (5)\n                    next costume\n                end\n                repeat (1)\n                    switch costume to (10 v)\n                end\n                repeat (1)\n                    switch costume to (8 v)\n                end\n                repeat (1)\n                    switch costume to (11 v)\n                end\n                repeat (1)\n                    switch costume to (7 v)\n                end\n            end\n        else\n            if <<<key (right arrow v) pressed?> or <<mouse down?> and <(mouse x) > [10]>>> and <<key (up arrow v) pressed?> or <<mouse down?> and <(mouse y) > (y position)>>>> then\n                switch costume to (5 v)\n            else\n                if <<<key (left arrow v) pressed?> or <<mouse down?> and <[-10] > (mouse x)>>> and <<key (up arrow v) pressed?> or <<mouse down?> and <(mouse y) > (y position)>>>> then\n                    switch costume to (6 v)\n                else\n                    if <<key (left arrow v) pressed?> or <<mouse down?> and <[-10] > (mouse x)>>> then\n                        switch costume to (2 v)\n                    else\n                        if <<key (right arrow v) pressed?> or <<mouse down?> and <(mouse x) > [10]>>> then\n                            switch costume to (3 v)\n                        else\n                            if <<key (up arrow v) pressed?> or <<mouse down?> and <(mouse y) > (y position)>>> then\n                                switch costume to (4 v)\n                            else\n                                switch costume to (1 v)\n                            end\n                        end\n                    end\n                end\n            end\n        end\n    end\nend\n\ndefine Import level\nset [checkpoint v] to [0]\nset [shrinked? v] to [0]\ndelete all of [mode v]\ndelete all of [x v]\ndelete all of [y v]\ndelete all of [sign v]\nadd platfom [0] [-100] [1]\nadd platfom [0] [-75] [9]\nif <not <(input) = []>> then\n    Encode save codes [1]\nelse\n    set [walljump v] to [0]\nend\n@CSCHECK\n\nwhen I receive [edit v]\nset [pos_in_histr v] to [0]\ndelete all of [history v]\nset [mode v] to [editor]\nImport level\nset [ghost v] effect to (100)\nset [change v] to [0]\nset [paused v] to [0]\nset [x v] to [0]\nset [y v] to [0]\nset [sy v] to [0]\nset [in air v] to [0]\nset [scroll x v] to [0]\nset [scroll y v] to [0]\nset [blockselected v] to [1]\nset [. v] to [0]\nHistr\nforever\n    change [direction of the saw v] by (1)\n    set size to (50) %\n    if <(mode) = [editor]> then\n        set [checkpoint v] to [0]\n        if <<(blockselected) = [8]> or <(blockselected) = [1000]>> then\n            broadcast (update v) and wait\n        else\n            broadcast (update v)\n        end\n        if <(e?true) > [0]> then\n            if <key (e v) pressed?> then\n                ask [Please enter the text you want to have on the sign ] and wait\n                if <not <(answer) = []>> then\n                    replace item (e?true) of [sign v] with (answer)\n                    set [change v] to [1]\n                end\n            end\n        end\n        hide\n        set [sx v] to [0]\n        set [sy v] to [0]\n        set [x v] to [0]\n        set [y v] to [-75]\n        set [paused v] to [0]\n        if <(.) = [1]> then\n            Histr\n            set [. v] to [0]\n        end\n        if <(change) = [1]> then\n            set [change v] to [0]\n            set [. v] to [1]\n        end\n    else\n        show\n        if <(die) = [0]> then\n            if <(paused) = [0]> then\n                broadcast (update v)\n                set [die v] to [0]\n                Physics\n                set x to (round (x position))\n            else\n                start sound [win v]\n                repeat until <not <(mode) = [playing]>>\n                    change x by (((x position) - ((item (item # of [10] in [mode v]) of [x v]) - (SCROLL X))) / (-5))\n                    change y by (((y position) - (((item (item # of [10] in [mode v]) of [y v]) - (3)) - (SCROLL Y))) / (-5))\n                    go to [back v] layer\n                end\n            end\n        else\n            Die\n            set [die v] to [0]\n            set [sy v] to [0]\n            set [sx v] to [0]\n            if <(checkpoint) = [0]> then\n                set [x v] to [0]\n                set [y v] to [-75]\n                set [scroll y v] to [0]\n                set [scroll x v] to [0]\n            else\n                set [x v] to (item (checkpoint) of [x v])\n                set [y v] to ((item (checkpoint) of [y v]) + (0))\n                set [scroll y v] to (y)\n                set [scroll x v] to (x)\n            end\n        end\n    end\nend\n\ndefine Editormovemnet\nif <key (right arrow v) pressed?> then\n    change [scroll x v] by (6.25)\nend\nif <key (left arrow v) pressed?> then\n    change [scroll x v] by (-6.25)\nend\nif <key (down arrow v) pressed?> then\n    if <(SCROLL Y) > [-100]> then\n        change [scroll y v] by (-6.25)\n    end\nend\nif <key (up arrow v) pressed?> then\n    change [scroll y v] by (6.25)\nend\nif <key (1 v) pressed?> then\n    set [blockselected v] to [1]\nend\nif <key (2 v) pressed?> then\n    set [blockselected v] to [2]\nend\nif <key (3 v) pressed?> then\n    set [blockselected v] to [3]\nend\nif <key (4 v) pressed?> then\n    set [blockselected v] to [4]\nend\nif <key (5 v) pressed?> then\n    set [blockselected v] to [5]\nend\nif <key (6 v) pressed?> then\n    set [blockselected v] to [8]\nend\nif <key (7 v) pressed?> then\n    set [blockselected v] to [9]\nend\nif <key (8 v) pressed?> then\n    set [blockselected v] to [10]\nend\nif <key (m v) pressed?> then\n    set [scroll y v] to [0]\n    set [scroll x v] to [0]\nend\n\nwhen I receive [loadcode v]\nImport level\nHistr\n\ndefine Encode save codes (mode)\nif <(mode) = [1]> then\n    set [status v] to [0]\n    set [zeile v] to [1]\n    set [zwische v] to []\n    delete all of [ouoot v]\n    add [] to [ouoot v]\n    if <not <(input) = []>> then\n        if <not <[history v] contains (input)?>> then\n            set [scroll x v] to [0]\n            set [scroll y v] to [0]\n        end\n        repeat (length of (input))\n            change [status v] by (1)\n            if <not <<(letter (status) of (input)) = [ß]> or <(letter (status) of (input)) = [}]>>> then\n                set [zwische v] to (join (zwische) (letter (status) of (input)))\n            else\n                if <not < (zwische) contains [\(]?>> then\n                    replace item (length of [ouoot v]) of [ouoot v] with (join (item (length of [ouoot v]) of [ouoot v]) (item (zwische) of [characterst v]))\n                else\n                    replace item (length of [ouoot v]) of [ouoot v] with (join (item (length of [ouoot v]) of [ouoot v]) (zwische))\n                end\n                set [zwische v] to []\n                if <(letter (status) of (input)) = [}]> then\n                    add [] to [ouoot v]\n                end\n            end\n        end\n    end\n    set [status v] to [0]\n    repeat (((length of [ouoot v]) - (2)) / (4))\n        change [status v] by (1)\n        add ((item (status) of [ouoot v]) * (25)) to [x v]\n    end\n    repeat (((length of [ouoot v]) - (2)) / (4))\n        change [status v] by (1)\n        add ((item (status) of [ouoot v]) * (25)) to [y v]\n    end\n    repeat (((length of [ouoot v]) - (2)) / (4))\n        change [status v] by (1)\n        add (item (status) of [ouoot v]) to [mode v]\n    end\n    repeat (((length of [ouoot v]) - (2)) / (4))\n        change [status v] by (1)\n        add (item (status) of [ouoot v]) to [sign v]\n    end\n    delete (length of [ouoot v]) of [ouoot v]\n    if <<(item (length of [ouoot v]) of [ouoot v]) = [d]> or <(item (length of [ouoot v]) of [ouoot v]) = [g]>> then\n        set [theme v] to (item (length of [ouoot v]) of [ouoot v])\n        delete (length of [ouoot v]) of [ouoot v]\n        if <(item (length of [ouoot v]) of [ouoot v]) = [yes]> then\n            set [walljump v] to [1]\n        else\n            set [walljump v] to [0]\n        end\n        delete (length of [ouoot v]) of [ouoot v]\n    else\n        broadcast (error v)\n        set [input v] to []\n        Import level\n    end\nend\n\nstart sound [Collect v]\n\ndefine Ttest\ndelete all of [collision v]\nset [i v] to [0]\nrepeat (length of [mode v])\n    add [0] to [collision v]\n    change [i v] by (1)\n    if <((item (i) of [x v]) - ((22) + ((1) / (2)))) < (x)> then\n        if <not <((item (i) of [x v]) - ((-20) + ((1) / (2)))) < (x)>> then\n            if <((item (i) of [y v]) - ((22) + ((1) / (2)))) < (y)> then\n                if <not <((item (i) of [y v]) - ((-22) + ((1) / (2)))) < (y)>> then\n                    replace item (i) of [collision v] with ([floor v] of (item (i) of [mode v]) )\n                end\n            end\n        end\n    end\nend\n\nwhen I receive [reset v]\nset [input v] to []\nImport level\n\nset [error v] to [8hhhhhhhh]\n\nwhen I start as a clone\nset size to (80) %\nswitch costume to (sign v)\nshow\nset [ghost v] effect to (100)\ngo to x: ((item (item # of [8] in [collision v]) of [x v]) - (SCROLL X)) y: ((item (item # of [8] in [collision v]) of [y v]) - (SCROLL Y))\nsay (item (item # of [8] in [collision v]) of [sign v])\n\nwhen I receive [update v]\ndelete this clone\n\nwhen I receive [edit v]\nforever\n    if <(mode) = [editor]> then\n        Editormovemnet\n    end\nend\n\nwhen flag clicked\n\nwhen I receive [p v]\nif <[1] < (pos_in_histr)> then\n    change [pos_in_histr v] by (-1)\n    set [input v] to (item (pos_in_histr) of [history v])\n    Import level\nend\n\nwhen I receive [n v]\nif <(pos_in_histr) < (length of [history v])> then\n    change [pos_in_histr v] by (1)\n    set [input v] to (item (pos_in_histr) of [history v])\n    Import level\nend\n\nstart sound [crashed oof v]\n\nwhen flag clicked\nhide\n\ndefine @CSCHECK\ndelete all of [cs v]\nset [i v] to [0]\nrepeat (length of [mode v])\n    change [i v] by (1)\n    add [0] to [cs v]\n    set [e v] to [0]\n    repeat (length of [mode v])\n        change [e v] by (1)\n        if <(item (e) of [y v]) = ((item (i) of [y v]) + (25))> then\n            if <(item (e) of [x v]) = (item (i) of [x v])> then\n                replace item (length of [cs v]) of [cs v] with [1]\n            end\n        end\n    end\nend\n\ndefine remove platform (x) (y)\nset [o v] to [2]\nrepeat until <<<(item (o) of [x v]) = (x)> and <(item (o) of [y v]) = (y)>> or <(o) > (length of [mode v])>>\n    change [o v] by (1)\nend\nif <<(item (o) of [x v]) = (x)> and <(item (o) of [y v]) = (y)>> then\n    delete (o) of [x v]\n    delete (o) of [y v]\n    delete (o) of [mode v]\n    delete (o) of [sign v]\nend\n@CSCHECK\n\ndefine add platfom (xpos) (ypos) (id)\nset [o v] to [1]\nrepeat until <<<(item (o) of [x v]) = (xpos)> and <(item (o) of [y v]) = (ypos)>> or <(o) > (length of [mode v])>>\n    change [o v] by (1)\nend\nif <(o) > (length of [mode v])> then\n    add (xpos) to [x v]\n    add (ypos) to [y v]\n    add (id) to [mode v]\n    add [0] to [sign v]\nend\n@CSCHECK\n\ndefine Histr\nbroadcast (getdta v) and wait\nchange [pos_in_histr v] by (1)\ninsert (output) at (pos_in_histr) of [history v] \n\n@ParticlesWin\n\nwhen I start as a clone\nshow\neff (pick random (-10) to (10))\n\ndefine eff (x)\nset [-1 v] to [1]\nset [color v] effect to (0)\nset [ghost v] effect to (20)\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 <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\n    if <(y position) < [-170]> then\n        delete this clone\n    end\nend\n\nwhen flag clicked\nset size to (80) %\ngo to x: (0) y: (-180)\nhide\n\nwhen I receive [win v]\nset [y v] to [30]\nswitch costume to (costume1 v)\ngo to x: (pick random (-200) to (200)) y: (-180)\nrepeat (10)\n    create clone of (_myself_ v)\nend\nwait (0.2) seconds\ngo to x: (pick random (-200) to (200)) y: (-180)\nrepeat (10)\n    create clone of (_myself_ v)\nend\n\n@Blocks\n\nwhen flag clicked\nhide\n\ndefine Stamp (theme)\nset size to (102) %\nsay []\nhide\nset [i v] to [0]\nset [zähler v] to [0]\nset [z2 v] to [0]\nrepeat (length of [mode v])\n    clear graphic effects\n    change [i v] by (1)\n    if <not <<(item (i) of [mode v]) = [1]> or <<(item (i) of [mode v]) = [11]> or <(item (i) of [mode v]) = [21]>>>> then\n        if <<([abs v] of ((item (i) of [x v]) - (SCROLL X)) ) < [240]> and <([abs v] of ((item (i) of [y v]) - (SCROLL Y)) ) < [160]>> then\n            change [zähler v] by (1)\n            change [z2 v] by (0)\n            go to x: ((item (i) of [x v]) - (SCROLL X)) y: ((item (i) of [y v]) - (SCROLL Y))\n            if <(item (i) of [mode v]) = [4]> then\n                if <((round ((timer) / (0.2))) / (2)) = ([floor v] of ((round ((timer) / (0.2))) / (2)) )> then\n                    switch costume to (water.ani1 v)\n                else\n                    switch costume to (water.ani2 v)\n                end\n                if <(theme) = [d]> then\n                if <(theme) = [g]> then\n                    clear graphic effects\n                end\n            else\n                if <(item (i) of [mode v]) = [2]> then\n                    if <((round ((timer) / (0.2))) / (2)) = ([floor v] of ((round ((timer) / (0.2))) / (2)) )> then\n                        switch costume to (lava ani 1 v)\n                    else\n                        switch costume to (lava ani 2 v)\n                    end\n                else\n                    switch costume to (round (item (i) of [mode v]))\n                end\n            end\n            Cc (theme)\n            if <<(item (i) of [x v]) = [0]> and <(item (i) of [y v]) = [-100]>> then\n                switch costume to (begin v)\n                set [brightness v] effect to (10)\n            end\n            if <(item (i) of [mode v]) = [2]> then\n            if <(item (i) of [mode v]) = [12]> then\n            point in direction (90)\n            if <(item (i) of [mode v]) = [5]> then\n                point in direction (direction of the saw)\n            end\n            if <(item (i) of [mode v]) = [9]> then\n                if <(checkpoint) = (i)> then\n                    set [brightness v] effect to (30)\n                end\n            end\n            stamp\n        end\n    end\nend\nset [i v] to [1]\nrepeat ((length of [mode v]) - (1))\n    point in direction (90)\n    change [i v] by (1)\n    if <<(item (i) of [mode v]) = [1]> or <<(item (i) of [mode v]) = [11]> or <(item (i) of [mode v]) = [21]>>> then\n        if <<([abs v] of ((item (i) of [x v]) - (SCROLL X)) ) < [240]> and <([abs v] of ((item (i) of [y v]) - (SCROLL Y)) ) < [160]>> then\n            change [zähler v] by (1)\n            go to x: ((item (i) of [x v]) - (SCROLL X)) y: ((item (i) of [y v]) - (SCROLL Y))\n            clear graphic effects\n            if <(theme) = [d]> then\n                switch costume to (22 v)\n            end\n            if <(theme) = [g]> then\n                switch costume to (item (i) of [mode v])\n            end\n            Cc (theme)\n            point in direction (90)\n            if <<(item (i) of [x v]) = [0]> and <(item (i) of [y v]) = [-100]>> then\n                switch costume to (begin v)\n                set [brightness v] effect to (10)\n            end\n            stamp\n        end\n    end\nend\ngo to x: ((item (1) of [x v]) - (SCROLL X)) y: ((item (1) of [y v]) - (SCROLL Y))\nswitch costume to (begin v)\nclear graphic effects\nstamp\nif <(mode) = [editor]> then\n    if <(blockselected) < [1000]> then\n        go to (mouse-pointer v)\n        show\n        if <not <touching (shrinked v)?>> then\n            if <((mouse y) mod (25)) > ((12.5) - ((SCROLL Y) mod (25)))> then\n                set y to (((([floor v] of (((mouse y) + (25)) / (25)) ) * (25)) + (0)) - ((SCROLL Y) mod (25)))\n            else\n                set y to (((([floor v] of ((mouse y) / (25)) ) * (25)) + (0)) - ((SCROLL Y) mod (25)))\n            end\n            if <((mouse x) mod (25)) > ((12.5) - ((SCROLL X) mod (25)))> then\n                set x to (((([floor v] of (((mouse x) + (25)) / (25)) ) * (25)) + (0)) - ((SCROLL X) mod (25)))\n            else\n                set x to (((([floor v] of ((mouse x) / (25)) ) * (25)) + (0)) - ((SCROLL X) mod (25)))\n            end\n            if <not <<(blockselected) = [10]> and <[mode v] contains [10]?>>> then\n                set [a v] to [1]\n                repeat until <<<(item (a) of [x v]) = ((SCROLL X) + (x position))> and <(item (a) of [y v]) = ((y position) + (SCROLL Y))>> or <(a) > (length of [mode v])>>\n                    change [a v] by (1)\n                end\n                show\n                clear graphic effects\n                set [ghost v] effect to (70)\n                if <(blockselected) = [1]> then\n                    switch costume to (1w v)\n                else\n                    if <(blockselected) = [4]> then\n                        switch costume to (4w v)\n                    else\n                        if <(blockselected) = [2]> then\n                            switch costume to (12 v)\n                        else\n                            switch costume to (blockselected)\n                        end\n                    end\n                end\n            else\n                set [blockselected v] to [1]\n            end\n            if <not <<(item (a) of [x v]) = ((SCROLL X) + (x position))> and <(item (a) of [y v]) = ((y position) + (SCROLL Y))>>> then\n                if <not <<((SCROLL X) + (x position)) = [0]> and <<((y position) + (SCROLL Y)) = [-75]> or <<((y position) + (SCROLL Y)) = [-50]> or <<((y position) + (SCROLL Y)) = [-25]> or <((y position) + (SCROLL Y)) = [0]>>>>>> then\n                    point in direction (90)\n                    if <(blockselected) = [5]> then\n                        point in direction (direction of the saw)\n                    end\n                    if <mouse down?> then\n                        if <not <touching (shrinked v)?>> then\n                            if <(blockselected) = [8]> then\n                                delete all of [zw.data v]\n                                add ((SCROLL X) + (x position)) to [zw.data v]\n                                add ((y position) + (SCROLL Y)) to [zw.data v]\n                                set [ghost v] effect to (0)\n                                stamp\n                                hide\n                                ask [Enter the text you want to have on the sign \(nothing inappropiate or mean please\)] and wait\n                                set [say v] to (answer)\n                                add platfom (item (1) of [zw.data v]) (item (2) of [zw.data v]) [8]\n                                show\n                            else\n                                if <(blockselected) = [1]> then\n                                    if <(pick random (1) to (3)) = [1]> then\n                                        add platfom ((SCROLL X) + (x position)) ((y position) + (SCROLL Y)) ((blockselected) + (10))\n                                    else\n                                        if <(pick random (1) to (2)) = [1]> then\n                                            add platfom ((SCROLL X) + (x position)) ((y position) + (SCROLL Y)) ((blockselected) + (20))\n                                        else\n                                            add platfom ((SCROLL X) + (x position)) ((y position) + (SCROLL Y)) (blockselected)\n                                        end\n                                    end\n                                else\n                                    add platfom ((SCROLL X) + (x position)) ((y position) + (SCROLL Y)) (blockselected)\n                                end\n                            end\n                        end\n                    end\n                    if <not <touching (shrinked v)?>> then\n                        stamp\n                    end\n                else\n                    set [ghost v] effect to (100)\n                end\n            else\n                hide\n            end\n        end\n    else\n        go to (mouse-pointer v)\n        show\n        if <not <touching (shrinked v)?>> then\n            switch costume to (rubber v)\n            if <mouse down?> then\n                if <not <touching (shrinked v)?>> then\n                    set [ghost v] effect to (20)\n                    set [rtr v] to [0]\n                    repeat (length of [mode v])\n                        change [rtr v] by (1)\n                        if <<[-10] < ((mouse x) - (((SCROLL X) * (-1)) + (item (rtr) of [x v])))> and <((mouse x) - (((SCROLL X) * (-1)) + (item (rtr) of [x v]))) < [10]>> then\n                            if <<[-10] < ((mouse y) - (((SCROLL Y) * (-1)) + (item (rtr) of [y v])))> and <((mouse y) - (((SCROLL Y) * (-1)) + (item (rtr) of [y v]))) < [10]>> then\n                                remove platform (item (rtr) of [x v]) (item (rtr) of [y v])\n                            end\n                        end\n                    end\n                end\n            else\n                set [ghost v] effect to (60)\n            end\n            show\n            stamp\n        end\n    end\nend\nhide\nif <(mode) = [editor]> then\n    if <[mode v] contains [8]?> then\n        show\n        switch costume to (sign v)\n        go to (mouse-pointer v)\n        set [rtr v] to [0]\n        set [e?true v] to [0]\n        repeat (length of [mode v])\n            change [rtr v] by (1)\n            if <(item (rtr) of [mode v]) = [8]> then\n                if <<[-10] < ((mouse x) - (((SCROLL X) * (-1)) + (item (rtr) of [x v])))> and <((mouse x) - (((SCROLL X) * (-1)) + (item (rtr) of [x v]))) < [10]>> then\n                    if <<[-10] < ((mouse y) - (((SCROLL Y) * (-1)) + (item (rtr) of [y v])))> and <((mouse y) - (((SCROLL Y) * (-1)) + (item (rtr) of [y v]))) < [10]>> then\n                        set [e?true v] to (rtr)\n                        set size to (80) %\n                        go to x: ((item (rtr) of [x v]) - (SCROLL X)) y: ((item (rtr) of [y v]) - (SCROLL Y))\n                        say (join (item (rtr) of [sign v]) [ \[press e to edit\]])\n                        stop [this script v]\n                    end\n                end\n            end\n        end\n    end\n    show\n    set [ghost v] effect to (100)\nend\nchange [f v] by (1)\n\nif <(item (i) of [mode v]) = [3]> then\n    set [brightness v] effect to (0)\nend\n\nwhen I receive [update v]\nerase all\nStamp (theme)\n\ndefine Cc (theme)\nif <(item (i) of [cs v]) = [1]> then\n    if <(item (i) of [mode v]) = [1]> then\n        switch costume to (1w v)\n    end\n    if <(item (i) of [mode v]) = [3]> then\n        switch costume to (3w v)\n    end\n    if <(item (i) of [mode v]) = [11]> then\n        switch costume to (11w v)\n    end\n    if <(item (i) of [mode v]) = [21]> then\n        switch costume to (21w v)\n    end\n    if <(item (i) of [mode v]) = [12]> then\n        switch costume to (2w v)\n    end\n    if <(item (i) of [mode v]) = [4]> then\n        switch costume to (4w v)\n    end\n    if <(item (i) of [mode v]) = [2]> then\n        switch costume to (2w v)\n    end\nend\n\ndefine @CSCHECK improved (element)\nset [e v] to [0]\nrepeat (length of [mode v])\n    change [e v] by (1)\n    if <(item (e) of [y v]) = ((item (element) of [y v]) + (25))> then\n        if <(item (e) of [x v]) = (item (element) of [x v])> then\n            replace item (element) of [cs v] with [1]\n        end\n    end\nend\nset [e v] to [0]\nrepeat (length of [mode v])\n    change [e v] by (1)\n    if <(item (e) of [y v]) = ((item (element) of [y v]) + (-25))> then\n        if <(item (e) of [x v]) = (item (element) of [x v])> then\n            replace item (e) of [cs v] with [1]\n        end\n    end\nend\n\n@CSCHECK improved [11]\n\nwhen flag clicked\nforever\n    set [f v] to [0]\n    wait (1) seconds\n    set [fps v] to (f)\nend\n\nset [shrinked? v] to [0]\n\ndefine add platfom (xpos) (ypos) (id)\nif <not <(say) = []>> then\n    set [o v] to [1]\n    repeat until <<<(item (o) of [x v]) = (xpos)> and <(item (o) of [y v]) = (ypos)>> or <(o) > (length of [mode v])>>\n        change [o v] by (1)\n    end\n    add (xpos) to [x v]\n    add (ypos) to [y v]\n    add (id) to [mode v]\n    add (say) to [sign v]\n    add [0] to [cs v]\n    @CSCHECK improved (length of [x v])\n    set [change v] to [1]\nend\nset [say v] to [0]\n\ndefine remove platform (x) (y)\nset [o v] to [3]\nrepeat until <<<(item (o) of [x v]) = (x)> and <(item (o) of [y v]) = (y)>> or <(o) > (length of [mode v])>>\n    change [o v] by (1)\nend\nif <<(item (o) of [x v]) = (x)> and <(item (o) of [y v]) = (y)>> then\n    delete (o) of [x v]\n    delete (o) of [y v]\n    delete (o) of [sign v]\n    delete (o) of [mode v]\n    delete (o) of [cs v]\n    set [change v] to [1]\nend\n@CSCHECK\n\ndefine @CSCHECK\ndelete all of [cs v]\nset [i v] to [0]\nrepeat (length of [mode v])\n    change [i v] by (1)\n    add [0] to [cs v]\n    set [e v] to [0]\n    repeat (length of [mode v])\n        change [e v] by (1)\n        if <(item (e) of [y v]) = ((item (i) of [y v]) + (25))> then\n            if <(item (e) of [x v]) = (item (i) of [x v])> then\n                replace item (length of [cs v]) of [cs v] with [1]\n            end\n        end\n    end\nend\n\ndefine Histr\nbroadcast (getdta v) and wait\nchange [pos_in_histr v] by (1)\ninsert (output) at (pos_in_histr) of [history v] \n\n@Shrinked\n\nwhen I start as a clone\nforever\n    repeat (10)\n        change x by (((x position) - (90)) / (-3))\n        change [ghost v] effect by (10)\n    end\n    hide\n    wait until <<(load) = [1]> and <(mode) = [editor]>>\n    set [ghost v] effect to (100)\n    go to x: (30) y: (0)\n    switch costume to (costume2 v)\n    show\n    go to [back v] layer\n    go [forward v] (30) layers\n    repeat (10)\n        change [ghost v] effect by (-100)\n        go to [back v] layer\n        go [forward v] (10) layers\n        xb\n    end\n    repeat until <<not <(load) = [1]>> or <not <(mode) = [editor]>>>\n        go to [back v] layer\n        go [forward v] (1) layers\n        xb\n    end\nend\n\nchange [ghost v] effect by (-10)\n\ndefine xb\nset [velocity.1 v] to (((velocity.1) * (0.6)) + (((x position) - (0)) * (-0.3)))\nchange x by ([floor v] of (velocity.1) )\n\nwhen flag clicked\nswitch costume to (normal v)\nforever\n    hide\n    wait until <<(mode) = [playing]> or <(mode) = [editor]>>\n    create clone of (_myself_ v)\n    go to x: (0) y: (0)\n    show\n    repeat until <not <<(mode) = [playing]> or <(mode) = [editor]>>>\n        go to [back v] layer\n        go [forward v] (1) layers\n        switch costume to (shrinked v)\n        if <(shrinked?) = [0]> then\n            switch costume to (normal v)\n        end\n    end\nend\n\n@Blockl"\n\nwhen flag clicked\nClone\n\ndefine Clone\nset size to (90) %\nshow\nset [this var. is dedicated to griffpatch v] to [0]\ngo to x: (-245) y: (-167)\nrepeat (5)\n    change x by (30)\n    change [this var. is dedicated to griffpatch v] by (1)\n    create clone of (_myself_ v)\nend\nchange [this var. is dedicated to griffpatch v] by (2)\nrepeat (3)\n    change x by (30)\n    change [this var. is dedicated to griffpatch v] by (1)\n    create clone of (_myself_ v)\nend\nhide\n\nwhen I start as a clone\nforever\n    hide\n    wait until <(mode) = [editor]>\n    set [ghost v] effect to (100)\n    show\n    if <<(mode) = [editor]> and <not <<[mode v] contains [10]?> and <(This var. is dedicated to griffpatch) = [10]>>>> then\n        set y to (-197)\n        repeat (10)\n            switch costume to (This var. is dedicated to griffpatch)\n            if <(This var. is dedicated to griffpatch) = [4]> then\n                if <((round ((timer) / (0.2))) / (2)) = ([floor v] of ((round ((timer) / (0.2))) / (2)) )> then\n                    switch costume to (This var. is dedicated to griffpatch)\n                else\n                    switch costume to (water-ani-2 v)\n                end\n            else\n                if <(This var. is dedicated to griffpatch) = [2]> then\n                    if <((round ((timer) / (0.2))) / (2)) = ([floor v] of ((round ((timer) / (0.2))) / (2)) )> then\n                        switch costume to (kostüm2 v)\n                    else\n                        switch costume to (kostüm3 v)\n                    end\n                end\n                change [ghost v] effect by (-1.5)\n                if <(This var. is dedicated to griffpatch) = [5]> then\n                    point in direction (direction of the saw)\n                end\n            end\n            change [ghost v] effect by (-1.5)\n            change y by (((y position) - (-167)) / (-2))\n            if <(This var. is dedicated to griffpatch) = [5]> then\n                point in direction (direction of the saw)\n            end\n        end\n    end\n    repeat until <not <(mode) = [editor]>>\n        think []\n        show\n        point in direction (90)\n        switch costume to (This var. is dedicated to griffpatch)\n        if <(This var. is dedicated to griffpatch) = [4]> then\n            if <((round ((timer) / (0.2))) / (2)) = ([floor v] of ((round ((timer) / (0.2))) / (2)) )> then\n                switch costume to (This var. is dedicated to griffpatch)\n            else\n                switch costume to (water-ani-2 v)\n            end\n        end\n        if <(This var. is dedicated to griffpatch) = [2]> then\n            if <((round ((timer) / (0.2))) / (2)) = ([floor v] of ((round ((timer) / (0.2))) / (2)) )> then\n                switch costume to (kostüm2 v)\n            else\n                switch costume to (kostüm3 v)\n            end\n        end\n        set [ghost v] effect to (70)\n        if <touching (mouse-pointer v)?> then\n            set [ghost v] effect to (58)\n        end\n        if <(This var. is dedicated to griffpatch) = (blockselected)> then\n            set [ghost v] effect to (10)\n        end\n        if <(This var. is dedicated to griffpatch) = [5]> then\n            point in direction (direction of the saw)\n        end\n        if <<mouse down?> and <touching (mouse-pointer v)?>> then\n            wait until <not <mouse down?>>\n            set [blockselected v] to (This var. is dedicated to griffpatch)\n        end\n        if <(This var. is dedicated to griffpatch) = [10]> then\n            if <[mode v] contains [10]?> then\n                hide\n            end\n        end\n    end\nend\n\nif <(This var. is dedicated to griffpatch) = [1]> then\n    think [ground]\nend\nif <(This var. is dedicated to griffpatch) = [2]> then\n    think [spike]\nend\nif <(This var. is dedicated to griffpatch) = [3]> then\n    think [spring]\nend\nif <(This var. is dedicated to griffpatch) = [4]> then\n    think [water]\nend\nif <(This var. is dedicated to griffpatch) = [5]> then\n    think [saw]\nend\nif <(This var. is dedicated to griffpatch) = [8]> then\n    think [sign]\nend\nif <(This var. is dedicated to griffpatch) = [9]> then\n    think [checkpoint]\nend\nif <(This var. is dedicated to griffpatch) = [10]> then\n    think [end flag]\nend\n\n@x\n\nwait (1) seconds\n\ndefine new counter @ (x) (y)\nset [x v] to (x)\nset [y v] to (y)\nset [yc v] to [6]\ncreate clone of (_myself_ v)\nrepeat (14)\n    change [yc v] by (1)\n    set [x v] to ((x) + (((yc) - (6)) * (9)))\n    set [y v] to (y)\n    create clone of (_myself_ v)\nend\n\nwhen I start as a clone\nif <(yc) > [5]> then\n    switch costume to (0 v)\n    forever\n        if <<(mode) = [editor]> and <(load) = [1]>> then\n            show\n            set [brightness v] effect to (20)\n            set [ghost v] effect to (35)\n            show\n            switch costume to (0 v)\n            switch costume to (letter ((yc) - ((15) + ((0) - (length of (join [y ] (round (SCROLL Y))))))) of (join [y ] (round (SCROLL Y))))\n            go to x: ((x) - (-7)) y: (y)\n            set size to (30) %\n            go to [front v] layer\n        else\n            hide\n        end\n    end\nend\n\nwhen flag clicked\nhide\nnew counter @ [140] [-124]\n\n@y\n\nwait (1) seconds\n\ndefine new counter @ (x) (y)\nset [x v] to (x)\nset [y v] to (y)\nset [yc v] to [6]\ncreate clone of (_myself_ v)\nrepeat (14)\n    change [yc v] by (1)\n    set [x v] to ((x) + (((yc) - (6)) * (9)))\n    set [y v] to (y)\n    create clone of (_myself_ v)\nend\n\nwhen I start as a clone\nif <(yc) > [5]> then\n    switch costume to (0 v)\n    forever\n        if <<(mode) = [editor]> and <(load) = [1]>> then\n            show\n            set [brightness v] effect to (20)\n            set [ghost v] effect to (35)\n            show\n            switch costume to (0 v)\n            switch costume to (letter ((yc) - ((15) + ((0) - (length of (join [x ] (round (SCROLL X))))))) of (join [x ] (round (SCROLL X))))\n            go to x: ((x) - (-7)) y: (y)\n            set size to (30) %\n            go to [front v] layer\n        else\n            hide\n        end\n    end\nend\n\nwhen flag clicked\nhide\nnew counter @ [140] [-100]\n\n@walljump?\n\ndefine Off\nswitch costume to (costume1 v)\nrepeat (5)\n    next costume\nend\n\ndefine On\nswitch costume to (costume3 v)\nrepeat (1)\n    switch costume to (costume7 v)\nend\nrepeat (1)\n    switch costume to (costume6 v)\nend\nrepeat (1)\n    switch costume to (costume5 v)\nend\nrepeat (1)\n    switch costume to (costume4 v)\nend\nrepeat (1)\n    switch costume to (costume1 v)\nend\n\nwhen flag clicked\nswitch costume to (costume1 v)\nforever\n    hide\n    wait until <(mode) = [editor]>\n    wait (0) seconds\n    set [ghost v] effect to (100)\n    if <(walljump) = [0]> then\n        switch costume to (costume1 v)\n    else\n        switch costume to (costume3 v)\n    end\n    go to x: (194) y: (-194)\n    show\n    go to [front v] layer\n    if <(mode) = [editor]> then\n        repeat (10)\n            change [ghost v] effect by (-9)\n            change y by (((y position) - (-164)) / (-2))\n        end\n    end\n    repeat until <not <(mode) = [editor]>>\n        if <(walljump) = [0]> then\n            switch costume to (costume1 v)\n        else\n            switch costume to (costume3 v)\n        end\n        if <<mouse down?> and <touching (mouse-pointer v)?>> then\n            wait until <not <mouse down?>>\n            if <(answer) = (s)> then\n                if <(walljump) = [0]> then\n                    set [walljump v] to [1]\n                    Off\n                else\n                    set [walljump v] to [0]\n                    On\n                end\n                set [change v] to [1]\n                wait (0.3) seconds\n            end\n        end\n        set [s v] to (answer)\n    end\nend\n\n@buttons+export\n\nwhen flag clicked\nhide\nforever\n    set [vel2 v] to [0]\n    point in direction (90)\n    set [load v] to [0]\n    wait until <(mode) = [editor]>\n    set volume to (100) %\n    set [clone-id v] to [1]\n    create clone of (_myself_ v)\n    point in direction (90)\n    set [clone-id v] to [2]\n    create clone of (_myself_ v)\n    set [clone-id v] to [3]\n    create clone of (_myself_ v)\n    set [clone-id v] to [4]\n    create clone of (_myself_ v)\n    set [clone-id v] to [5]\n    create clone of (_myself_ v)\n    set [clone-id v] to [6]\n    create clone of (_myself_ v)\n    set [clone-id v] to [7]\n    create clone of (_myself_ v)\n    set [clone-id v] to [8]\n    create clone of (_myself_ v)\n    wait until <(mode) = [playing]>\n    wait (1) seconds\n    set [clone-id v] to [1]\n    create clone of (_myself_ v)\nend\n\nwhen I start as a clone\nset size to (100) %\nif <(mode) = [editor]> then\n    set [ghost v] effect to (100)\n    show\n    if <(clone-id) = [1]> then\n        go to x: (218) y: (157)\n        switch costume to (... v)\n        set size to (100) %\n    end\n    if <(clone-id) = [2]> then\n        go to x: (150) y: (157)\n        set size to (100) %\n        switch costume to (save v)\n    end\n    if <(clone-id) = [3]> then\n        set size to (100) %\n        go to x: (75) y: (157)\n        switch costume to (load v)\n        show\n    end\n    if <(clone-id) = [4]> then\n        go to x: (-25) y: (157)\n        switch costume to (play v)\n        set size to (100) %\n    end\n    if <(clone-id) = [5]> then\n        go to x: (50) y: (-165)\n        switch costume to (eraser v)\n        set size to (100) %\n    end\n    if <(clone-id) = [6]> then\n        go to x: (170) y: (90)\n        set size to (100) %\n        switch costume to (reset v)\n    end\n    if <(clone-id) = [7]> then\n        set size to (100) %\n        go to x: (170) y: (40)\n        switch costume to (theme v)\n    end\n    if <(clone-id) = [8]> then\n        set size to (100) %\n        go to x: (170) y: (-10)\n        switch costume to (go to ... v)\n    end\n    set [ghost v] effect to (100)\n    wait (0) seconds\n    if <(clone-id) < [6]> then\n        if <(clone-id) < [5]> then\n            set y to (187)\n        end\n        if <(mode) = [editor]> then\n            repeat (10)\n                change [ghost v] effect by (-8)\n                if <(clone-id) < [5]> then\n                    change y by (((y position) - (157)) / (-5))\n                end\n                sb\n            end\n        end\n        repeat until <not <(mode) = [editor]>>\n            if <(clone-id) < [5]> then\n                change y by (((y position) - (157)) / (-5))\n            end\n            if <(clone-id) = [2]> then\n                show\n                if <(length of [mode v]) = [1]> then\n                    hide\n                end\n            end\n            sb\n            set [brightness v] effect to (<touching (mouse-pointer v)?> * (20))\n            set [ghost v] effect to (20)\n            if <<touching (mouse-pointer v)?> and <mouse down?>> then\n                set [brightness v] effect to (45)\n                wait until <not <<mouse down?> and <touching (mouse-pointer v)?>>>\n                if <touching (mouse-pointer v)?> then\n                    set [blockselected v] to [1]\n                    if <(clone-id) = [1]> then\n                        change [load v] by (-1)\n                        set [load v] to ([abs v] of (load) )\n                    end\n                    if <(clone-id) = [2]> then\n                        hide\n                        Decode Save Codes\n                        delete all of [save your level v]\n                        add [Triple click on the code below and then copy \(Ctrl+C\) and past \(Ctrl+V\) it to] to [save your level v]\n                        add [your computer to save the level you made:] to [save your level v]\n                        add [] to [save your level v]\n                        add (output) to [save your level v]\n                        hide list [save your level v]\n                        ask [Enter the code here to confirm that you have all of it!] and wait\n                        repeat until <(answer) = (item (4) of [save your level v])>\n                            ask [You didn't copy the whole code Remember to TRIPLE click on the code and then press Ctrl key + c key to copy  it and Ctrl key + V key to past it. If you need help, ask in comments.] and wait\n                        end\n                        show list [save your level v]\n                        show\n                    end\n                    if <(clone-id) = [3]> then\n                        hide\n                        ask [Enter your level code] and wait\n                        show\n                        set [input v] to (answer)\n                        broadcast (loadcode v)\n                    end\n                    if <(clone-id) = [4]> then\n                        set [mode v] to [playing]\n                        hide\n                        set [scroll y v] to [0]\n                        set [scroll x v] to [1]\n                        set [paused v] to [0]\n                    end\n                    if <(clone-id) = [5]> then\n                        set [blockselected v] to [1000]\n                    end\n                end\n            end\n        end\n        repeat (4)\n            change y by ((3) * ((-1) + (<([abs v] of (y position) ) = (y position)> * (2))))\n            change [ghost v] effect by (25)\n        end\n        delete this clone\n    else\n        forever\n            set [ghost v] effect to (100)\n            repeat until <<(mode) = [editor]> and <(load) = [1]>>\n                sb\n                if <not <(mode) = [editor]>> then\n                    delete this clone\n                end\n            end\n            wait (((clone-id) - (5)) / (6)) seconds\n            set x to (230)\n            if <<(mode) = [editor]> and <(load) = [1]>> then\n                repeat (10)\n                    if <(theme) = [d]> then\n                        set [color v] effect to (150)\n                    end\n                    if <(theme) = [g]> then\n                        set [color v] effect to (0)\n                    end\n                    sb\n                    change [ghost v] effect by (-8)\n                    change x by (((x position) - (200)) / (-5))\n                    if <not <(load) = [1]>> then\n                        set [ghost v] effect to (100)\n                    end\n                end\n            end\n            repeat until <not <<(mode) = [editor]> and <(load) = [1]>>>\n                if <(theme) = [d]> then\n                    set [color v] effect to (150)\n                end\n                if <(theme) = [g]> then\n                    set [color v] effect to (0)\n                end\n                if <(clone-id) = [2]> then\n                    show\n                    if <(length of [mode v]) = [1]> then\n                        hide\n                    end\n                end\n                sb\n                set [brightness v] effect to (<touching (mouse-pointer v)?> * (20))\n                set [ghost v] effect to (8)\n                change x by (((x position) - (200)) / (-5))\n                if <<touching (mouse-pointer v)?> and <mouse down?>> then\n                    set [brightness v] effect to (45)\n                    wait until <not <mouse down?>>\n                    if <(clone-id) = [6]> then\n                        set [change v] to [1]\n                        broadcast (s v)\n                        broadcast (reset v)\n                    end\n                    if <(clone-id) = [7]> then\n                        set [change v] to [1]\n                        broadcast (s v)\n                        if <(theme) = [d]> then\n                            set [theme v] to [g]\n                        else\n                            if <(theme) = [g]> then\n                                set [theme v] to [d]\n                            end\n                        end\n                    end\n                    if <(clone-id) = [8]> then\n                        hide\n                        ask [enter x position?] and wait\n                        set [scroll x v] to (answer)\n                        ask [enter y position?] and wait\n                        set [scroll y v] to (answer)\n                        show\n                    end\n                end\n            end\n            if <not <(mode) = [editor]>> then\n                show\n                delete this clone\n            end\n        end\n    end\nend\nif <(mode) = [playing]> then\n    set [ghost v] effect to (100)\n    show\n    if <(clone-id) = [1]> then\n        go to x: (160) y: (187)\n        switch costume to (editor v)\n    end\nend\nrepeat (10)\n    change y by (((y position) - (157)) / (-5))\n    change [ghost v] effect by (-8)\nend\nrepeat until <not <(mode) = [playing]>>\n    change y by (((y position) - (157)) / (-5))\n    sb\n    set [brightness v] effect to (<touching (mouse-pointer v)?> * (20))\n    if <<touching (mouse-pointer v)?> and <mouse down?>> then\n        set [brightness v] effect to (45)\n        wait until <not <mouse down?>>\n        if <(clone-id) = [1]> then\n            set [mode v] to [editor]\n            set [scroll x v] to [0]\n            set [scroll y v] to [0]\n        end\n    end\nend\ndelete this clone\n\nwhen flag clicked\ndelete all of [characterst v]\nadd [1] to [characterst v]\nadd [2] to [characterst v]\nadd [3] to [characterst v]\nadd [4] to [characterst v]\nadd [5] to [characterst v]\nadd [6] to [characterst v]\nadd [7] to [characterst v]\nadd [8] to [characterst v]\nadd [9] to [characterst v]\nadd [0] to [characterst v]\nadd [y] to [characterst v]\nadd [e] to [characterst v]\nadd [s] to [characterst v]\nadd [n] to [characterst v]\nadd [o] to [characterst v]\nadd [-] to [characterst v]\nadd [ ] to [characterst v]\nadd [a] to [characterst v]\nadd [b] to [characterst v]\nadd [c] to [characterst v]\nadd [d] to [characterst v]\nadd [f] to [characterst v]\nadd [g] to [characterst v]\nadd [h] to [characterst v]\nadd [i] to [characterst v]\nadd [j] to [characterst v]\nadd [k] to [characterst v]\nadd [l] to [characterst v]\nadd [m] to [characterst v]\nadd [p] to [characterst v]\nadd [q] to [characterst v]\nadd [r] to [characterst v]\nadd [t] to [characterst v]\nadd [u] to [characterst v]\nadd [v] to [characterst v]\nadd [w] to [characterst v]\nadd [x] to [characterst v]\nadd [z] to [characterst v]\nadd [-] to [characterst v]\nadd [_] to [characterst v]\nadd [.] to [characterst v]\nadd [:] to [characterst v]\nadd [?] to [characterst v]\nadd [!] to [characterst v]\nadd [,] to [characterst v]\nadd [\)] to [characterst v]\nadd [\(] to [characterst v]\n\ndefine Decode Save Codes\ndelete all of [in v]\nset [status v] to [2]\nrepeat ((length of [x v]) - (2))\n    change [status v] by (1)\n    add ((item (status) of [x v]) / (25)) to [in v]\nend\nset [status v] to [2]\nrepeat ((length of [y v]) - (2))\n    change [status v] by (1)\n    add ((item (status) of [y v]) / (25)) to [in v]\nend\nset [status v] to [2]\nrepeat ((length of [mode v]) - (2))\n    change [status v] by (1)\n    add (item (status) of [mode v]) to [in v]\nend\nset [status v] to [2]\nrepeat ((length of [sign v]) - (2))\n    change [status v] by (1)\n    add (join [\(] (join (item (status) of [sign v]) [\)])) to [in v]\nend\nif <(walljump) = [1]> then\n    add [yes] to [in v]\nelse\n    add [no] to [in v]\nend\nadd (theme) to [in v]\nset [status v] to [0]\nset [output v] to []\nrepeat ((((length of [in v]) - (2)) / (4)) * (3))\n    change [status v] by (1)\n    set [instatus v] to [0]\n    change [instatus v] by (1)\n    set [output v] to (join (output) (item # of (letter (instatus) of (item (status) of [in v])) in [characterst v]))\n    repeat (length of (item (status) of [in v]))\n        change [instatus v] by (1)\n        set [output v] to (join (output) [ß])\n        set [output v] to (join (output) (item # of (letter (instatus) of (item (status) of [in v])) in [characterst v]))\n    end\n    set [output v] to (join (output) [}])\nend\nrepeat until <((length of [in v]) - (2)) = (status)>\n    change [status v] by (1)\n    set [instatus v] to [0]\n    repeat (length of (item (status) of [in v]))\n        change [instatus v] by (1)\n        set [output v] to (join (output) (letter (instatus) of (item (status) of [in v])))\n    end\n    set [output v] to (join (output) [}])\nend\nrepeat until <(length of [in v]) = (status)>\n    change [status v] by (1)\n    set [instatus v] to [0]\n    change [instatus v] by (1)\n    set [output v] to (join (output) (item # of (letter (instatus) of (item (status) of [in v])) in [characterst v]))\n    repeat (length of (item (status) of [in v]))\n        change [instatus v] by (1)\n        set [output v] to (join (output) [ß])\n        set [output v] to (join (output) (item # of (letter (instatus) of (item (status) of [in v])) in [characterst v]))\n    end\n    set [output v] to (join (output) [}])\nend\nset [status v] to [-1]\nset [input v] to []\nrepeat ((length of (output)) / (2))\n    change [status v] by (3)\n    set [input v] to (join (input) (join (letter ((status) - (2)) of (output)) (letter (join (letter ((status) - (1)) of (output)) (letter (status) of (output))) of [apple])))\nend\n\nwhen flag clicked\nshow list [save your level v]\n\ndefine sb\nif <<(mode) = [editor]> and <(clone-id) = [1]>> then\n    change size by (((size) - ((100) + (<touching (mouse-pointer v)?> * (10)))) / (-4))\n    rb\nelse\n    change size by (((size) - ((100) + (<touching (mouse-pointer v)?> * (10)))) / (-4))\nend\n\ndefine rb\nset [vel2 v] to (((vel2) * (0.75)) + ((((90) + (<(load) = [1]> * (-90))) - (direction)) * (0.18)))\nturn right (round (vel2)) degrees\n\nset size to (100) %\n\nwhen I receive [getdta v]\nDecode Save Codes\n\nwhen I start as a clone\nforever\n    wait until <touching (mouse-pointer v)?>\n    start sound [Tap Conga v]\n    wait until <not <touching (mouse-pointer v)?>>\nend\n\n@bs\n\nwhen flag clicked\nforever\n    repeat (3)\n        change [ghost v] effect by (-25)\n        change y by (((y position) - (-173)) / (-3))\n        go to [back v] layer\n    end\n    hide\n    wait until <(mode) = [editor]>\n    wait (1) seconds\n    go to x: (-140) y: (-173)\n    set [m v] to (blockselected)\n    show\n    switch costume to (ground v)\n    set [ghost v] effect to (100)\n    repeat (3)\n        change [ghost v] effect by (-25)\n        change y by (((y position) - (-133)) / (-3))\n        go to [back v] layer\n    end\n    repeat (9)\n        change y by (((y position) - (-133)) / (-3))\n        go to [back v] layer\n    end\n    repeat until <not <(mode) = [editor]>>\n        show\n        set [ghost v] effect to (25)\n        if <not <(m) = (blockselected)>> then\n            cost\n        end\n    end\nend\n\ndefine cost\nset [m v] to (blockselected)\nrepeat (4)\n    change [ghost v] effect by (25)\n    change y by (1)\nend\nif <(blockselected) = [1000]> then\n    switch costume to (eraser v)\nend\nif <(blockselected) = [1]> then\n    switch costume to (ground v)\nend\nif <(blockselected) = [2]> then\n    switch costume to (lava v)\nend\nif <(blockselected) = [3]> then\n    switch costume to (spring v)\nend\nif <(blockselected) = [4]> then\n    switch costume to (water v)\nend\nif <(blockselected) = [5]> then\n    switch costume to (saw v)\nend\nif <(blockselected) = [8]> then\n    switch costume to (sign v)\nend\nif <(blockselected) = [9]> then\n    switch costume to (checkpoint flag v)\nend\nif <(blockselected) = [10]> then\n    switch costume to (end flag v)\nend\ngo to x: (-140) y: (-173)\nrepeat (3)\n    change [ghost v] effect by (-25)\n    change y by (((y position) - (-133)) / (-3))\n    go to [back v] layer\nend\nrepeat (9)\n    change y by (((y position) - (-133)) / (-3))\n    go to [back v] layer\nend\n\n@undo redo\n\nwhen flag clicked\nhide\nforever\n    set [vel2 v] to [0]\n    point in direction (90)\n    set [load v] to [0]\n    wait until <(mode) = [editor]>\n    set [clone-id v] to [1]\n    create clone of (_myself_ v)\n    point in direction (90)\n    set [clone-id v] to [2]\n    create clone of (_myself_ v)\n    wait until <not <(mode) = [editor]>>\nend\n\nwhen I start as a clone\nset size to (100) %\nif <(mode) = [editor]> then\n    set [ghost v] effect to (100)\n    show\n    if <(clone-id) = [1]> then\n        go to x: (-200) y: (187)\n        switch costume to (go to ...2 v)\n        set size to (100) %\n    end\n    if <(clone-id) = [2]> then\n        go to x: (-165) y: (187)\n        set size to (100) %\n        switch costume to (go to ...3 v)\n    end\nend\nforever\n    if <(theme) = [d]> then\n        set [color v] effect to (150)\n    end\n    if <(theme) = [g]> then\n        set [color v] effect to (0)\n    end\n    repeat (10)\n        if <(mode) = [editor]> then\n            change [ghost v] effect by (-8)\n            change y by (((y position) - (157)) / (-5))\n            if <(clone-id) = [1]> then\n                if <(pos_in_histr) = [1]> then\n                    set [ghost v] effect to (90)\n                end\n            end\n            if <(clone-id) = [2]> then\n                if <(pos_in_histr) = (length of [history v])> then\n                    set [ghost v] effect to (90)\n                end\n            end\n        end\n    end\n    repeat until <not <(mode) = [editor]>>\n        if <(theme) = [d]> then\n            set [color v] effect to (150)\n        end\n        if <(theme) = [g]> then\n            set [color v] effect to (0)\n        end\n        set [ghost v] effect to (25)\n        if <(clone-id) = [1]> then\n            if <(pos_in_histr) = [1]> then\n                set [ghost v] effect to (90)\n            end\n        end\n        if <(clone-id) = [2]> then\n            if <(pos_in_histr) = (length of [history v])> then\n                set [ghost v] effect to (90)\n            end\n        end\n        change y by (((y position) - (157)) / (-5))\n        sb\n        set [brightness v] effect to (<touching (mouse-pointer v)?> * (20))\n        if <<touching (mouse-pointer v)?> and <mouse down?>> then\n            set [brightness v] effect to (45)\n            wait until <not <mouse down?>>\n            set [blockselected v] to [1]\n            if <(clone-id) = [1]> then\n                broadcast (p v)\n                if <not <(username) = [TimMcCool]>> then\n                    change [☁ stats: clicks on undo v] by (1)\n                end\n            end\n            if <(clone-id) = [2]> then\n                broadcast (n v)\n            end\n        end\n    end\n    delete this clone\nend\n\ndefine sb\nchange size by (((size) - ((100) + (<touching (mouse-pointer v)?> * (10)))) / (-4))\n\nset size to (100) %\n\nwhen I start as a clone\nforever\n    wait until <touching (mouse-pointer v)?>\n    start sound [Tap Conga v]\n    wait until <not <touching (mouse-pointer v)?>>\nend\n\n@blank\n\nwhen flag clicked\ngo to [front v] layer\nshow\ngo to x: (0) y: (0)\nset [theme v] to [g]\nerase all\nswitch costume to (costume2 v)\nset [mode v] to [intro]\nset [brightness v] effect to (0)\nwait (0.3) seconds\nset [mode v] to [homescreen]\nrepeat (10)\n    go to [front v] layer\n    change [ghost v] effect by (10)\nend\n\nwhen I receive [hide v]\nshow\nclear graphic effects\nset [ghost v] effect to (100)\nrepeat (10)\n    change [ghost v] effect by (-10)\nend\nwait (2) seconds\nbroadcast (edit v)\nset [mode v] to [editor]\nrepeat (10)\n    change [ghost v] effect by (10)\n    go to [front v] layer\nend\n\n@thumbnail\n\nwhen flag clicked\nswitch backdrop to (g v)\nhide\nswitch costume to (bitmap v)\nshow\ngo to x: (0) y: (-100)\nwait (0.1) seconds\nrepeat (40)\n    change y by ((y position) / (-5))\nend\n\nwhen I receive [hide v]\nwait (1) seconds\nhide\n\n@buttonsHomescreen\n\nwhen flag clicked\nhide\nset [vel2 v] to [0]\npoint in direction (90)\nset [load v] to [0]\nwait until <(mode) = [homescreen]>\nset [clone-id v] to [1]\ncreate clone of (_myself_ v)\npoint in direction (90)\nset [clone-id v] to [2]\ncreate clone of (_myself_ v)\nforever\n\nwhen I start as a clone\nset size to (100) %\nif <(mode) = [homescreen]> then\n    set [ghost v] effect to (100)\n    show\n    if <(clone-id) = [1]> then\n        go to x: (0) y: (-177)\n        switch costume to (1 v)\n        set size to (100) %\n    end\n    if <(clone-id) = [2]> then\n        go to x: (0) y: (-187)\n        set size to (100) %\n        switch costume to (2 v)\n    end\nend\nforever\n    repeat (10)\n        if <(mode) = [homescreen]> then\n            change [ghost v] effect by (-7)\n            go to [front v] layer\n            change y by (((y position) - ((-100) - (((clone-id) - (1)) * (50)))) / (-5))\n        end\n    end\n    repeat until <not <(mode) = [homescreen]>>\n        change y by (((y position) - ((-100) - (((clone-id) - (1)) * (50)))) / (-5))\n        go to [front v] layer\n        go [backward v] (2) layers\n        sb\n        set [brightness v] effect to (<touching (mouse-pointer v)?> * (20))\n        if <<touching (mouse-pointer v)?> and <mouse down?>> then\n            set [brightness v] effect to (45)\n            wait until <not <mouse down?>>\n            start sound [Click v]\n            if <(clone-id) = [1]> then\n                broadcast (hide v)\n            end\n            if <(clone-id) = [2]> then\n                stamp\n                hide\n                ask [Enter your level code] and wait\n                set [input v] to (answer)\n                broadcast (hide v)\n            end\n        end\n    end\n    delete this clone\nend\n\ndefine sb\nchange size by (((size) - ((100) + (<touching (mouse-pointer v)?> * (10)))) / (-4))\n\nset size to (100) %\n\nwhen I start as a clone\nforever\n    wait until <touching (mouse-pointer v)?>\n    start sound [Tap Conga v]\n    wait until <not <touching (mouse-pointer v)?>>\nend\n\n@Failed\n\nwhen flag clicked\nhide\nforever\n    go to [front v] layer\nend\n\nwhen I receive [error v]\nshow\nwait (1.5) seconds\nhide\n\n@Sprite1\n\nwhen flag clicked\nhide\n\nwhen I receive [win v]\nwait (0.2) seconds\ngo to [front v] layer\ncreate clone of (_myself_ v)\nswitch costume to (costume1 v)\nshow\nset [ghost v] effect to (100)\ngo to x: (0) y: (-120)\nrepeat (15)\n    change y by ((y position) / (-3))\n    change [ghost v] effect by (-6)\nend\nwait until <(mode) = [editor]>\nhide\n\nwhen I start as a clone\ngo to [front v] layer\nswitch costume to (costume2 v)\nshow\nset [ghost v] effect to (100)\ngo to x: (0) y: (120)\nrepeat (15)\n    change y by ((y position) / (-3))\n    change [ghost v] effect by (-5)\nend\nwait until <(mode) = [editor]>\ndelete this clone\n\n@//📊 Scratch Analytics by @TimMcCool2\n\ndefine Send Data (payload)\nset [☁ to_host v] to (payload)\n\ndefine Encode (input)\nset [//output v] to []\nset [i v] to [0]\nrepeat (length of (input))\n    change [i v] by (1)\n    switch costume to (join [=] (letter (i) of (input)))\n    set [//output v] to (join (//output) (costume [number v]))\nend\n\nwhen flag clicked\nwait (0.6) seconds\nEncode (join (username) (join [,] (join (current [hour v]) (join [,] []))))\nSend Data (//output)\n\n
Play here for an offline version with less lag:\nhttps://forkphorus.github.io/#406817907\n\nMAKE SURE to spam the green flag with as many times as how many IQ points you have!\n\nWelcome to Explorer - A Multiplayer Scrolling Platformer.  You will play as the stick figure as you go on an adventure exploring an the unkown territory, trying to collect as many valuble items as possible.\n\nPlease note: This may take a while to load because it has over 8500 blocks of code and a lot of costumes, so please be patient - it is totally worth the wait :) And while you're awiting, why not read the instructions? :P\n\nNOTE: You must be a scratcher to interact with other people\n\n–––––––––––––––––– Storyline ––––––––––––––––––––\nNews has breaken out that there is a deserted area of land, full of valuble items like gems and coins. You and your fellow explorers race to find as much as possible, trying to get all the loot as quickly as possible. But beware, as this area is infested with enemies and spikes.\n\n–––––––––––––––––– Instructions ––––––––––––––––––  \n• Everything is 100% possible\n• Put your mouse on different objects to interact with them in the title screen :D\n• When you start, select which mode you want to play\n• You can select mobile mode or PC\n• Press "L" to reduce animations and lag signifigantly\n• If you get stuck, press "R" to respawn\n• Arrow keys, WASD, or mobile controls to move\n• Try to collect coins and gems, though gems are more valuble and will add more to your final score\n• Avoid spinning gears, spikes, and enemies\n• Stomp on enemies to kill them\n• Up arrow to swin up, and release to sink down\n• Ride on moving platforms, and you will stay on them\n• When you get to a checkpoint, you will spawn there if you die\n• When you have the double jump from the shop you can press up arrow twice or for mobile click twice above the player to jump twice\n• When you get the parachute from the shop, you can hold "Z" to glide and on mobile, hold the buttons on the left and right side to glide to the left and right\n• When you obtain the dash from the shop, hold "X" to dash the direction you are moving, and on mobile, hold the buttons on the left and right side to dash that left and right\n• When you buy the golden coins from the shop, coins that you collect will be worth 2 instead of the normal 1\n• Press "T" to talk and select one of the preselected chat phrases \n• Bounce on mushrooms to jump higher\n• In the shop, you can buy items to help you on your journey\n•You can jump on clouds, but you'll slowly sink into them\n• To win, get to the last flag\n• Click on the mute button or press "M" to mute or unmute\n• In the end, your score = your coins + your gems times 15