Scratch 3.0 Platformer

Instructions: ❤と★よろしくお願いします\n\n操作方法\n矢印キー　（モバイルはいきたい方向をタップ）\n\n意外と伸びてる

@Stage\n\nwhen flag clicked\nforever\n    play sound [Dance Around v] until done\nend\n\n@B L A N K\n\n@Player\n\nwhen flag clicked\nset [gravity v] to [-1.5]\nset [jump force v] to [17]\nset [acceleration v] to [2]\nset [resistance v] to [0.8]\nset [speed y2 v] to [0]\ngo to x: (-199) y: (55)\nforever\n    if <<key (up arrow v) pressed?> or <key (w v) pressed?>> then\n        if <(falling2) < [3]> then\n            set [speed y2 v] to (JUMP FORCE)\n        end\n    end\n    if <<key (left arrow v) pressed?> or <key (a v) pressed?>> then\n        change [speed x2 v] by ((0) - (ACCELERATION))\n    end\n    if <<key (d v) pressed?> or <key (right arrow v) pressed?>> then\n        change [speed x2 v] by (ACCELERATION)\n    end\n    set [speed x2 v] to ((speed x2) * (RESISTANCE))\n    change [speed y2 v] by (GRAVITY)\n    Move-in steps (([abs v] of (speed x2) ) + ([abs v] of (speed y2) ))\nend\n\ndefine Move-in steps (steps)\nchange [falling2 v] by (1)\nrepeat (steps)\n    set [last value v] to (x position)\n    change x by ((speed x2) / (steps))\n    if <touching color (#ff0000)?> then\n        set x to (last value)\n        set [speed x2 v] to [0]\n    end\n    set [last value v] to (y position)\n    change y by ((speed y2) / (steps))\n    if <touching color (#ff0000)?> then\n        set y to (last value)\n        if <(speed y2) < [0]> then\n            set [falling2 v] to [0]\n        end\n        set [speed y2 v] to [0]\n    end\nend\n\nwhen flag clicked\nforever\n    if <<key (right arrow v) pressed?> or <key (d v) pressed?>> then\n        point in direction (90)\n    end\n    if <<key (left arrow v) pressed?> or <key (a v) pressed?>> then\n        point in direction (-90)\n    end\n    set rotation style [left-right v]\nend\n\nwhen I receive [message1 v]\ngo to x: (-195) y: (-9)\n\nwhen flag clicked\nswitch costume to (guy v)\nrepeat until <(costume [name v]) = [GOD]>\n    if <touching (angry emoji \(spike\) v)?> then\n        start sound [Crunch v]\n        go to x: (-199) y: (11)\n    end\nend\n\nwhen flag clicked\nwait until <(backdrop [number v]) = [6]>\nif <(backdrop [number v]) = [6]> then\n    go to x: (-199) y: (95)\nend\n\nwhen flag clicked\nset [speed v] to [0]\nforever\n    if <key (any v) pressed?> then\n        repeat until <(backdrop [name v]) = [End]>\n            change [speed v] by (1)\n            wait (1) seconds\n        end\n    end\nend\n\nwhen backdrop switches to [time waster v]\ngo to x: (-220) y: (-97)\n\nwhen flag clicked\nforever\n    if <<key (up arrow v) pressed?> or <key (w v) pressed?>> then\n        play sound [Jump v] until done\n        wait until <(speed y2) = [0]>\n    end\nend\n\nwhen I receive [skin v]\nswitch costume to (god v)\n\nwhen flag clicked\nforever\n    if <<mouse down?> and <touching (mouse-pointer v)?>> then\n        say [This is a platformer not a clicker game!] for (2) seconds\n    end\n    wait until <not <<mouse down?> and <touching (mouse-pointer v)?>>>\nend\n\nwhen flag clicked\nswitch backdrop to (backdrop1 v)\nforever\n    if <(x position) > [220]> then\n        go to x: (-217) y: (-32)\n        next backdrop\n    end\n    if <(y position) < [-146]> then\n        go to x: (-204) y: (-46)\n    end\nend\n\n@Angry emoji (spike)\n\nwhen flag clicked\ngo to x: (3) y: (-95)\nhide\nforever\n    if <not <(username) = [Truthakin]>> then\n        if <(backdrop [number v]) = [3]> then\n            switch costume to (costume1 v)\n            show\n        else\n            hide\n            if <(backdrop [number v]) = [4]> then\n                switch costume to (costume2 v)\n                show\n            else\n                hide\n                if <(backdrop [number v]) = [7]> then\n                    switch costume to (costume3 v)\n                    show\n                else\n                    hide\n                    if <(backdrop [number v]) = [11]> then\n                        switch costume to (costume4 v)\n                        show\n                    else\n                        hide\n                        if <(backdrop [number v]) = [16]> then\n                            switch costume to (costume5 v)\n                            show\n                        else\n                            hide\n                            if <(backdrop [number v]) = [23]> then\n                                switch costume to (costume6 v)\n                                show\n                            else\n                                hide\n                            end\n                        end\n                    end\n                end\n            end\n        end\n    end\nend\n\n@detector\n\nwhen flag clicked\nhide\nset [faved___ v] to [0]\nset [loved__ v] to [0]\nset [clone id v] to [0]\ncreate clone of (_myself_ v)\nwait (0.2) seconds\nset [clone id v] to [1]\ncreate clone of (_myself_ v)\nwait until <<(LOVED__) = [1]> and <(FAVED___) = [1]>>\nwait (1) seconds\nbroadcast (Skin v)\nshow\ngo to x: (0) y: (240)\nswitch costume to (pick random (1) to (4))\nset [ghost v] effect to (100)\nrepeat (75)\n    change y by ((y position) / (-15))\n    change [ghost v] effect by (-3)\nend\nrepeat (105)\n    change y by (((y position) - (-100)) / (-15))\n    change [ghost v] effect by (10)\nend\n\nwhen I start as a clone\nif <(clone id) = [0]> then\n    go to x: (-15) y: (0)\n    set [loved__ v] to [0]\n    switch costume to (love v)\n    forever\n        set [love? v] to <touching (mouse-pointer v)?>\n        if <touching (mouse-pointer v)?> then\n            set [loved__ v] to [1]\n        end\n    end\nend\nif <(clone id) = [1]> then\n    go to x: (0) y: (0)\n    switch costume to (fave v)\n    set [faved___ v] to [0]\n    forever\n        set [fav v] to <touching (mouse-pointer v)?>\n        if <touching (mouse-pointer v)?> then\n            set [faved___ v] to [1]\n        end\n    end\nend\n\n