Neo Town ~a platformer~ (collaboration with neotoripuru)

Instructions: (日本語の説明は下にあります!)\nThis is a collaboration work with @neotoripuru\nhttps://scratch.mit.edu/projects/422017770/\n\nMove with the arrow keys!\nYou can kick the wall!\nCompatible with smartphones! Tap the right side of the screen to move right, tap the left side of the screen to move left, tap the top of the screen to jump!\nThis time, I changed the atmosphere a little!\n\n@neotoripuru 様とのコラボ作品です！\nhttps://scratch.mit.edu/projects/422017770/\n\n矢印キーで移動です！\n壁キックできます！\nスマホの場合、画面右側タップで右に移動、画面左側タップで左に移動、画面上側をタップでジャンプです!\n今回は、少し雰囲気を変えてみました！

@Stage\n\n@player\n\nwhen flag clicked\nhide\n\nwhen I receive [next! v]\nwait (1) seconds\nset [can i move? v] to [1]\nshow\ngo to x: (-214) y: (-100)\n\nwhen I receive [ed v]\nforever\n    hide\n    stop [other scripts in sprite v]\nend\n\nwhen flag clicked\nforever\n    create clone of (_myself_ v)\nend\n\nwhen I start as a clone\nswitch costume to (afterimage v)\nclear graphic effects\nrepeat (10)\n    change [ghost v] effect by (5)\n    change size by (-1)\nend\ndelete this clone\n\nwhen I receive [start v]\nshow\ngo to x: (-214) y: (-30)\nswitch costume to (player v)\nset [speed v] to [0]\nset [can i move? v] to [1]\nset [x v] to [0]\nset [y v] to [0]\npoint in direction (90)\nset size to (100) %\nforever\n    if <(can I move?) = [1]> then\n        if <<key (right arrow v) pressed?> or <<[0] < (mouse x)> and <mouse down?>>> then\n            point in direction (90)\n            change [x v] by (1)\n        end\n        if <<key (left arrow v) pressed?> or <<(mouse x) < [0]> and <mouse down?>>> then\n            point in direction (-90)\n            change [x v] by (-1)\n        end\n        set [x v] to ((x) * (0.9))\n        change x by (x)\n        if <touching (stage v)?> then\n            change y by (1)\n            if <touching (stage v)?> then\n                change y by (1)\n                if <touching (stage v)?> then\n                    change y by (1)\n                    if <touching (stage v)?> then\n                        change y by (1)\n                        if <touching (stage v)?> then\n                            change y by (1)\n                            if <touching (stage v)?> then\n                                change y by (1)\n                                if <touching (stage v)?> then\n                                    change x by ((0) - (x))\n                                    change y by (-5)\n                                    if <<key (up arrow v) pressed?> or <<mouse down?> and <[0] < (mouse y)>>> then\n                                        start sound [pa1 v]\n                                        if <(x) > [0]> then\n                                            set [x v] to [-10]\n                                        else\n                                            set [x v] to [10]\n                                        end\n                                        set [y v] to [15]\n                                    else\n                                        set [x v] to [0]\n                                    end\n                                end\n                            end\n                        end\n                    end\n                end\n            end\n        end\n        change [y v] by (-1)\n        change y by (y)\n        if <touching (stage v)?> then\n            change y by ((0) - (y))\n            set [y v] to [0]\n        end\n        change y by (-2)\n        if <<<key (up arrow v) pressed?> or <<[0] < (mouse y)> and <mouse down?>>> and <touching (stage v)?>> then\n            start sound [pa1 v]\n            set [y v] to [15]\n        end\n        change y by (1)\n        if <<(y position) < [-184]> or <touching (damage v)?>> then\n            start sound [papa1 v]\n            go to x: (-214) y: (-100)\n        end\n        \n            set [y v] to [24]\n        end\n        if <[245] < (x position)> then\n            if <not <([costume # v] of [stage v]) = [12]>> then\n                hide\n                broadcast (next! v)\n                set [can i move? v] to [0]\n            end\n        end\n    end\nend\n\n@stage\n\nwhen flag clicked\nhide\n\nwhen I receive [next! v]\nif <(costume [number v]) = [9]> then\n    broadcast (ED v)\n    stop [this script v]\nend\nwait (0.5) seconds\nnext costume\n\nwhen I receive [ed v]\nhide\n\nwhen I receive [start v]\ngo to [back v] layer\ngo [forward v] (1) layers\ngo to x: (0) y: (0)\nshow\nswitch costume to (1 v)\n\n@damage\n\nwhen flag clicked\nhide\n\nwhen I receive [ed v]\nforever\n    hide\nend\n\nwhen I receive [start v]\ngo to [back v] layer\ngo [forward v] (1) layers\ngo to x: (0) y: (0)\nshow\nforever\n    switch costume to ([costume # v] of [stage v])\nend\n\n@bg\n\nwhen I receive [ed v]\nhide\nstop [other scripts in sprite v]\n\nwhen flag clicked\nhide\n\nwhen I receive [start v]\ngo to x: (0) y: (0)\ngo to [back v] layer\nshow\nforever\n    play sound [bgm_maoudamashii_cyber45 v] until done\nend\n\n@NEXT!\n\nwhen I receive [ed v]\nforever\n    hide\nend\n\nwhen I receive [next! v]\nclear graphic effects\nshow\ngo to [front v] layer\ngo to x: (0) y: (-344)\nstart sound [sceneswitch1 v]\nglide (0.5) secs to x: (0) y: (0)\nglide (0.5) secs to x: (0) y: (-344)\nhide\n\nwhen flag clicked\nhide\n\n@water drop\n\nwhen I start as a clone\nset [ghost v] effect to (30)\nshow\nset size to (pick random (80) to (120)) %\nset y to (pick random (0) to (180))\nif <(pick random (1) to (2)) = [1]> then\n    point in direction (90)\nelse\n    point in direction (-90)\nend\nif <(pick random (1) to (2)) = [1]> then\n    go to x: (-268) y: (160)\n    glide (pick random (3.0) to (4.0)) secs to x: (268) y: (y position)\nelse\n    go to x: (268) y: (y position)\n    glide (pick random (3.0) to (4.0)) secs to x: (-268) y: (y position)\nend\ndelete this clone\n\nwhen flag clicked\nhide\n\nwhen I start as a clone\nforever\n    if <(ED?) = [1]> then\n        delete this clone\n    end\nend\n\nwhen I receive [start v]\nforever\n    create clone of (_myself_ v)\n    wait (pick random (2.0) to (3.0)) seconds\nend\n\n@thumbnail\n\nwhen flag clicked\nclear graphic effects\nforever\n    show\n    go to [front v] layer\n    set [ghost v] effect to (100)\nend\n\n@ED\n\nwhen I start as a clone\nshow\nif <(costume [number v]) = [1]> then\n    switch costume to (ふたさんの背景なんて神ではないか。 v)\n    go to [back v] layer\nelse\n    if <(costume [number v]) = [2]> then\n        go to x: (0) y: (100)\n        回転 [0.5] 度 [20] 回\n    else\n        if <(costume [number v]) = [3]> then\n            go to x: (0) y: (-120)\n            set size to (100) %\n            forever\n                repeat (20)\n                    change size by (0.5)\n                end\n                repeat (20)\n                    change size by (-0.5)\n                end\n            end\n        else\n            if <(costume [number v]) = [4]> then\n                go to x: (90) y: (-7)\n                switch costume to (フォローする v)\n                forever\n                    if <<mouse down?> and <touching (mouse-pointer v)?>> then\n                        if <(costume [number v]) = [4]> then\n                            start sound [mens-yeah1 v]\n                            switch costume to (フォローをやめる v)\n                        end\n                    end\n                end\n            else\n                if <(costume [number v]) = [6]> then\n                    go to x: (-127) y: (-12)\n                end\n            end\n        end\n    end\nend\n\ndefine 回転 (度) 度 (繰り返し) 回\npoint in direction (90)\nrepeat ((繰り返し) / (2))\n    turn left (度) degrees\nend\nforever\n    repeat (繰り返し)\n        turn right (度) degrees\n    end\n    repeat (繰り返し)\n        turn left (度) degrees\n    end\nend\n\nwhen I receive [ed v]\nhide\nset [ed? v] to [1]\ngo to x: (0) y: (0)\nswitch costume to (ふたさんの背景なんて神ではないか。 v)\ncreate clone of (_myself_ v)\nswitch costume to (thx v)\ncreate clone of (_myself_ v)\nswitch costume to (💖と⭐ v)\ncreate clone of (_myself_ v)\nswitch costume to (フォローする v)\ncreate clone of (_myself_ v)\nswitch costume to (アイコン v)\ncreate clone of (_myself_ v)\n\nwhen I receive [ed v]\nstop all sounds\nforever\n    play sound [おもいで v] until done\nend\n\nwhen flag clicked\nset [ed? v] to [0]\n\n@intro\n\nwhen flag clicked\nstart sound [bgm_maoudamashii_cyber41 v]\nset size to (100) %\nhide\ngo to x: (-250) y: (406)\nrepeat (11)\n    if <(costume [number v]) = [1]> then\n        switch costume to (2 v)\n    else\n        switch costume to (1 v)\n    end\n    create clone of (_myself_ v)\n    change x by (50)\n    wait (0.427) seconds\nend\nwait (1) seconds\ngo to x: (0) y: (0)\nswitch costume to (tarako0518 v)\nshow\nclear graphic effects\nset [ghost v] effect to (100)\nrepeat (20)\n    change [ghost v] effect by (-5)\nend\npoint in direction (90)\nset [d v] to [0]\nset size to (0) %\nrepeat (24)\n    set [d v] to (((d) * (0.75)) + (((100) - (size)) * (0.3)))\n    change size by (d)\nend\nwait (1) seconds\nbroadcast (OPf v)\n\nwhen I start as a clone\nshow\nglide ((0.427) * (1.5)) secs to x: (x position) y: (0)\n\nwhen I receive [opf v]\nclear graphic effects\nrepeat (10)\n    change [ghost v] effect by (10)\nend\nhide\nstop all sounds\nbroadcast (start v)\n\n