Quarantine | Platformer

Instructions: I know it's a really short and easy game. I originally made this game as a filler project and I never expected it to be so successful. \n_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_\nINSTRUCTIONS\n\nWelcome to The Cave - A Platformer! Use either the arrow keys or WASD to move. Don't touch red. \n_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_\nSTORY\n\nOne day, you were walking down a path and saw a cave. It was large and looked man-made. Curiosity got the best of you, and you went in. You searched the cave for a while, but found nothing. Now you need to find your way out.\n_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_\nQUESTION OF THE PROJECT\n\nWould you go into a cave if you found one? Why/Why not? Comment your answer below!!!\n_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_\nUPDATES\n\n12/17/16 Project Released\n12/17/16 This is going to be curated on 12/22\n12/19/16 New level added \n12/21/16 This was curated by @Wonderlust\n12/22/16 TOP LOVED!!!\n12/24/16 Top Remixed!\n_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_

@Stage\n\nwhen flag clicked\nset volume to (66) %\nforever\n    play sound [Jensation - Delicious \[NCS Release\] v] until done\nend\n\n@player\n\nwhen flag clicked\nset [size v] to [76]\nset size to (76) %\n初期\nforever\n    code [1] [14] <<key (right arrow v) pressed?> or <<(x position) < (mouse x)> and <mouse down?>>> <<key (left arrow v) pressed?> or <<(mouse x) < (x position)> and <mouse down?>>> <<key (up arrow v) pressed?> or <<(y position) < (mouse y)> and <mouse down?>>>\nend\n\ndefine code (x) (y) <→> <←> <↑>\nset rotation style [left-right v]\nif <→> then\n    change [x v] by (x)\n    point in direction (90)\nend\nif <←> then\n    change [x v] by ((x) - ((x) + (x)))\n    point in direction (-90)\nend\nset [x v] to ((X) * (.9))\nchange x by (X)\nif <<touching (地面 v)?> or <<touching (3 v)?> or <touching (スプライト1 v)?>>> then\n    change y by (x)\n    if <<touching (地面 v)?> or <<touching (3 v)?> or <touching (スプライト1 v)?>>> then\n        change y by (x)\n        if <<touching (地面 v)?> or <<touching (3 v)?> or <touching (スプライト1 v)?>>> then\n            change y by (x)\n            if <<touching (地面 v)?> or <<touching (3 v)?> or <touching (スプライト1 v)?>>> then\n                change y by (x)\n                if <<touching (地面 v)?> or <<touching (3 v)?> or <touching (スプライト1 v)?>>> then\n                    change x by ((X) * (-1))\n                    change y by (-4)\n                    if <↑> then\n                        start sound [ジャンプ２ v]\n                        set [y v] to [13]\n                        if <(X) < [0]> then\n                            set [x v] to [7]\n                        else\n                            set [x v] to [-7]\n                        end\n                    else\n                        set [x v] to [0]\n                    end\n                end\n            end\n        end\n    end\nend\nchange [y v] by (-1)\nchange y by (Y)\nif <<touching (地面 v)?> or > then\n    set [飛んだんじゃないヵ v] to [0]\n    change y by ((Y) * (-1))\n    set [y v] to [0]\nend\nchange y by (-1)\nif <<<touching (地面 v)?> or <touching (スプライト1 v)?>> and <↑>> then\n    set [飛んだんじゃないヵ v] to [1]\n    start sound [ジャンプ２ v]\n    set [y v] to (y)\nend\nchange y by (1)\n\ndefine 初期\nshow\ngo to x: (-230) y: (0)\nset [ghost v] effect to (100)\nset [x v] to [0]\nset [y v] to [0]\n\nwhen flag clicked\nset [花を食べるの？ v] to [0]\nset [攻撃って何かいまだなの v] to [0]\nset [クリボーのナ v] to [0]\nset [飛んだんじゃないヵ v] to [0]\nset [きのこの山不味い嘘です v] to [0]\nforever\n    if <[230] < (x position)> then\n        初期\n        set [攻撃って何かいまだなの v] to [0]\n        change [st v] by (1)\n        broadcast (aaaaaa v)\n    end\n    if <<touching (mushroom v)?> and <(きのこの山不味い嘘です) = [1]>> then\n        start sound [smb_powerup v]\n        set [クリボーのナ v] to [1]\n        set [y v] to [5]\n        set size to (90) %\n        set [きのこの山不味い嘘です v] to [2]\n    end\n    if <<touching (fireflower v)?> and <(花を食べるの？) = [1]>> then\n        start sound [smb_powerup v]\n        set [クリボーのナ v] to [1]\n        set [y v] to [5]\n        set size to (90) %\n        set [花を食べるの？ v] to [2]\n    end\n    if <<(飛んだんじゃないヵ) = [0]> and <<(クリボーのナ) = [0]> and <<touching (goomba2 v)?> or <<touching (手ぉ v)?> or <touching (goomba3 v)?>>>>> then\n        start sound [smb_mariodies v]\n        初期\n    else\n        if <<[10] < (coin)> and <<(♥) = [1]> and <(★) = [1]>>> then\n    end\nend\n\nwhen flag clicked\nforever\n    if <<<mouse down?> and <(mouse y) < (y position)>> or <key (down arrow v) pressed?>> then\n        switch costume to (コスチューム1 v)\n    else\n        switch costume to (コスチューム3 v)\n    end\nend\n\nwhen flag clicked\n\n@行くやつ\n\nwhen flag clicked\nset rotation style [left-right v]\nswitch costume to (コスチューム1 v)\nforever\n    set size to ([size v] of [player v]) %\n    go to x: ([x position v] of [player v]) y: ([y position v] of [player v])\n    point in direction ([direction v] of [player v])\nend\n\nwhen flag clicked\nset [ステージ制限 v] to [0]\nforever\n    if <<<mouse down?> and <(mouse y) < (y position)>> or <key (down arrow v) pressed?>> then\n        if <(花を食べるの？) = [2]> then\n            switch costume to (コスチューム4 v)\n        else\n            switch costume to (コスチューム3 v)\n        end\n    else\n        if <(花を食べるの？) = [2]> then\n            switch costume to (コスチューム2 v)\n        else\n            switch costume to (コスチューム1 v)\n        end\n    end\nend\n\nwhen flag clicked\nclear graphic effects\n\n@地面\n\nwhen flag clicked\nset [st v] to [1]\nforever\n    switch costume to (ST)\nend\n\n@スプライト1\n\nwhen flag clicked\nswitch costume to (コスチューム1こ v)\nforever\n    if <<(ST) = [14]> or <(ST) = [3]>> then\n        show\n    else\n        hide\n    end\n    if <touching (行くやつ v)?> then\n        if <(ST) = [3]> then\n            if <(きのこの山不味い嘘です) = [0]> then\n                broadcast (あひゃ v)\n                set [きのこの山不味い嘘です v] to [1]\n            else\n                broadcast (ばーか v)\n            end\n        else\n            if <(ST) = [14]> then\n                if <(花を食べるの？) = [0]> then\n                    broadcast (中島野球しようぜ v)\n                    set [花を食べるの？ v] to [1]\n                else\n                    broadcast (ばーか v)\n                end\n            end\n        end\n    end\nend\n\nwhen I receive [あひゃ v]\nstart sound [Vine v]\nswitch costume to (1 \(2\) v)\n\nwhen I receive [中島野球しようぜ v]\nstart sound [Vine v]\nswitch costume to (1 \(2\) v)\n\nwhen flag clicked\nwait until <(ST) = [14]>\nset [花を食べるの？ v] to [0]\nswitch costume to (コスチューム1こ v)\n\n@Mushroom\n\nwhen flag clicked\ngo to x: (0) y: ()\nhide\n\nwhen I receive [あひゃ v]\nset [kinoko y v] to [0]\nset [kinokox v] to [0]\nshow\npoint in direction (90)\nrepeat (8)\n    change y by (6)\nend\nforever\n    move (5) steps\n    if on edge, bounce\n    set rotation style [don't rotate v]\n    change [kinoko y v] by (-1)\n    change y by (kinoko Y)\n    if <touching (地面 v)?> then\n        change y by ((kinoko Y) * (-1))\n        set [kinoko y v] to [0]\n    end\n    if <(きのこの山不味い嘘です) = [2]> then\n        hide\n        stop [this script v]\n    end\nend\n\nwhen flag clicked\n\n@Goomba3\n\nwhen flag clicked\nhide\nswitch costume to (goomba3 v)\nset [これを v] to [0]\nwait until <(ST) = [4]>\ncreate clone of (_myself_ v)\nset [これを v] to [0]\nwait until <(ST) = [6]>\ncreate clone of (_myself_ v)\nset [これを v] to [0]\nwait until <(ST) = [13]>\ncreate clone of (_myself_ v)\nwait until <(ST) = [15]>\ncreate clone of (_myself_ v)\nwait until <(ST) = [16]>\ncreate clone of (_myself_ v)\nwait until <(ST) = [17]>\ncreate clone of (_myself_ v)\nwait until <(ST) = [19]>\ncreate clone of (_myself_ v)\n\nwhen I receive [niujk v]\nif <<(これを) = [2]> or <(これを) = [0]>> then\n    start sound [Squish v]\n    switch costume to (squished v)\n    wait () seconds\n    delete this clone\nend\n\nwhen I start as a clone\nset [クリボーはy v] to [0]\nswitch costume to (goomba3 v)\nshow\nforever\n    move (4) steps\n    if on edge, bounce\n    set rotation style [left-right v]\n    change [クリボーはy v] by (-1)\n    change y by (クリボーはY)\n    if <touching (地面 v)?> then\n        change y by ((クリボーはY) * (-1))\n        set [クリボーはy v] to [0]\n    end\n    if <touching (fireball v)?> then\n        delete this clone\n    end\nend\n\nwhen I receive [aaaaaa v]\ndelete this clone\n\nif <<(飛んだんじゃないヵ) = [1]> and <touching (行くやつ v)?>> then\n    set [これを v] to [2]\nend\n\n@手ぉ\n\nwhen flag clicked\nforever\n    switch costume to (ST)\nend\n\n@スプライト2\n\nwhen flag clicked\nhide\nset [ghost v] effect to (100)\nforever\n    go to [front v] layer\n    reset timer\nend\n\nwhen [timer v] > (0)\nshow\nhide variable [coin v]\n\n@Detector\n\nwhen flag clicked\nhide\nset [★ v] to [0]\nset [♥ v] to [0]\nset [どっち v] to [0]\ncreate clone of (_myself_ v)\nwait (0.2) seconds\nset [どっち v] to [1]\ncreate clone of (_myself_ v)\nwait until <<(♥) = [1]> and <(★) = [1]>>\nbroadcast (♥と★ v)\n\nwhen I start as a clone\nif <(どっち) = [0]> then\n    go to x: (-15) y: (0)\n    set [♥ v] to [0]\n    switch costume to (love v)\n    forever\n        set [♥? v] to <touching (mouse-pointer v)?>\n        if <touching (mouse-pointer v)?> then\n            set [♥ v] to [1]\n        end\n    end\nend\nif <(どっち) = [1]> then\n    go to x: (0) y: (0)\n    switch costume to (fave v)\n    set [★ v] to [0]\n    forever\n        set [星? v] to <touching (mouse-pointer v)?>\n        if <touching (mouse-pointer v)?> then\n            set [★ v] to [1]\n        end\n    end\nend\n\n@Goomba2\n\nwhen flag clicked\nset [gakkuriaaa v] to [0]\nset [これを v] to [0]\nhide\nswitch costume to (goomba3 v)\nwait until <(ST) = [12]>\ncreate clone of (_myself_ v)\nwait until <(ST) = [13]>\ncreate clone of (_myself_ v)\nwait until <(ST) = [15]>\ncreate clone of (_myself_ v)\nwait until <(ST) = [16]>\ncreate clone of (_myself_ v)\nwait until <(ST) = [17]>\ncreate clone of (_myself_ v)\nwait until <(ST) = [19]>\ncreate clone of (_myself_ v)\nwait until <(ST) = [11111]>\n\nwhen I receive [niujk v]\nif <<(ST) = [13]> or <(ST) = [12]>> then\n    set [これを v] to [1]\n    start sound [Squish v]\n    switch costume to (just shell v)\n    wait () seconds\n    forever\n        if <<(飛んだんじゃないヵ) = [1]> and <touching (player v)?>> then\n            set [これを v] to [0]\n            set [gakkuriaaa v] to [1]\n        end\n    end\nelse\nend\n\nwhen I start as a clone\nset [のこのーこのｙ v] to [0]\nswitch costume to (k walk 2 v)\npoint in direction (90)\nshow\nforever\n    if <(costume [number v]) = [2]> then\n        if <(gakkuriaaa) = [1]> then\n            move (10) steps\n        else\n            move () steps\n        end\n    else\n        move (2) steps\n    end\n    if on edge, bounce\n    set rotation style [left-right v]\n    change [のこのーこのｙ v] by (-1)\n    change y by (のこのーこのＹ)\n    if <touching (地面 v)?> then\n        change y by ((のこのーこのＹ) * (-1))\n        set [のこのーこのｙ v] to [0]\n    end\n    if <touching (fireball v)?> then\n        delete this clone\n    end\nend\n\nwhen I receive [aaaaaa v]\ndelete this clone\n\nif on edge, bounce\nset rotation style [left-right v]\n\n@Fireball\n\nwhen flag clicked\nhide\nforever\n    go to (player v)\nend\n\nif  then\n\nwhen [space v] key pressed\nif <(花を食べるの？) = [2]> then\n    create clone of (_myself_ v)\n    wait (0.5) seconds\nend\n\nwhen I start as a clone\nstart sound [smb_fireball v]\nshow\nif <([direction v] of [player v]) = [90]> then\n    set [xv v] to (pick random (5) to (18))\nelse\n    set [xv v] to (pick random (-5) to (-18))\nend\nset [yv v] to (pick random (1) to (10))\nrepeat until <<touching (地面 v)?> or <<touching (goomba3 v)?> or <<touching (goomba2 v)?> or <<touching (スプライト1 v)?> or <<touching (手ぉ v)?> or <touching (_edge_ v)?>>>>>>\n    change [yv v] by (-1)\n    change x by (xv)\n    change y by (yv)\nend\ndelete this clone\n\n@Fireflower\n\nwhen flag clicked\ngo to x: () y: ()\nhide\n\nwhen I receive [中島野球しようぜ v]\nshow\nrepeat (8)\n    change y by (5.5)\nend\nwait until <(花を食べるの？) = [2]>\nhide\n\n@コイン\n\nwhen flag clicked\nset [coin v] to [0]\nshow variable [coin v]\nhide\nwait [1] [0] [-100]\nwait [3] [0] [-100]\nwait [3] [100] [-100]\nwait [5] [0] [20]\nwait [6] [0] [20]\nwait [8] [0] [-20]\nwait [8] [-145] [-20]\nwait [8] [165] [-20]\nwait [9] [0] [-20]\nwait [10] [0] [-20]\nwait [10] [-145] [-20]\nwait [10] [145] [-20]\nwait [11] [0] [-20]\nwait [11] [-145] [-20]\nwait [11] [145] [-20]\nwait [13] [0] [20]\nwait [14] [0] [-100]\nwait [14] [100] [-100]\nwait [16] [0] [20]\nwait [17] [0] [-20]\nwait [17] [-140] [-20]\nwait [17] [140] [-20]\nwait [18] [0] [-20]\nwait [18] [-140] [-20]\nwait [18] [140] [-20]\nwait [19] [0] [-20]\nwait [19] [-140] [-20]\nwait [19] [140] [-20]\n\ndefine wait (stage) (x) (y)\nwait until <(ST) = (stage)>\ngo to x: (x) y: (y)\ncreate clone of (_myself_ v)\n\nwhen I start as a clone\nshow\nforever\n    if <touching (行くやつ v)?> then\n        start sound [Coin v]\n        change [coin v] by (1)\n        repeat (3)\n            change y by (10)\n        end\n        delete this clone\n    end\nend\n\nif <(ST) = [1]> then\nend\nif <(ST) = [2]> then\n\nwhen I receive [aaaaaa v]\ndelete this clone\n\n