LONGer PLATFORMER!! 
@Stage\n\nwhen flag clicked\nhide variable [skin v]\nset [brightness v] effect to (0)\nforever\n    change [brightness v] effect by (-0.01)\nend\n\n@地面\n\nwhen I receive [next v]\nchange [level v] by (1)\nnext costume\n\nhide\n\nwhen I receive [作品start！ v]\nforever\n    play sound [Sunset v] until done\nend\n\nwhen I receive [作品start！ v]\nshow\nswitch costume to (コスチューム1 v)\n\nwhen flag clicked\nset [level v] to [1]\n\n@ゲート\n\nwhen flag clicked\nshow\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@スプライト3\n\nwhen I receive [next v]\nnext costume\n\nwhen I receive [作品start！ v]\ngo to [back v] layer\nshow\nswitch costume to (コスチューム1 v)\n\nwhen I receive [リス多 v]\nswitch costume to (コスチューム1 v)\n\nwhen flag clicked\nforever\n    if <(costume [number v]) = [20]> then\n        if <(level) = [20]> then\n            next costume\n        else\n            if <(level) = [39]> then\n                next costume\n            end\n        end\n    end\nend\n\nwhen flag clicked\nforever\n    if <(level) = [43]> then\n        switch costume to (costume2 v)\n    end\nend\n\n@プレイヤー\n\nwhen flag clicked\nset size to (1) %\n\nwhen I receive [next v]\nstart sound [Rip v]\n\nwhen I receive [over v]\nstart sound [Oops v]\n\nwhen I receive [作品start！ v]\nforever\n    play sound [Thousand_Absolutes_Xaf_Remix v] until done\nend\n\nwhen flag clicked\n重力定義\n\ndefine 重力定義\ngo to x: (-200) y: (0)\nset [x v] to [0]\nset [y v] to [0]\nforever\n    if <key (right arrow v) pressed?> then\n        change [x v] by (1)\n    end\n    if <key (left arrow v) pressed?> then\n        change [x v] by (-1)\n    end\n    set [x v] to ((X) * (0.9))\n    change x by (X)\n    if <touching (地面 v)?> then\n        change y by (1)\n        if <touching (地面 v)?> then\n            change y by (1)\n            if <touching (地面 v)?> then\n                change y by (1)\n                if <touching (地面 v)?> then\n                    change y by (1)\n                    if <touching (地面 v)?> then\n                        change y by (1)\n                        if <touching (地面 v)?> then\n                            change x by (() - (X))\n                            change y by (-4)\n                            if <key (up arrow v) pressed?> then\n                                start sound [Jump v]\n                                if <[0] < (X)> then\n                                    set [x v] to [-8]\n                                    set [y v] to [11]\n                                else\n                                    set [x v] to [8]\n                                    set [y v] to [11]\n                                end\n                            else\n                                set [x v] to [0]\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 (地面 v)?> then\n        change y by (() - (Y))\n        set [y v] to [0]\n    end\n    change y by (-1)\n    if <touching (地面 v)?> then\n        if <key (up arrow v) pressed?> then\n            start sound [Jump v]\n            set [y v] to [15]\n        end\n    end\n    if <touching (危険 v)?> then\n        go to x: (-200) y: (0)\n    end\n    if <(y position) = [-185]> then\n        go to x: (-200) y: (0)\n    end\n    if <(x position) = [245]> then\n        broadcast (次のステージ v)\n    end\nend\n\nwhen flag clicked\nforever\n    if <touching color (#ff0000)?> then\n        broadcast (over v)\n    end\nend\n\nwhen I receive [over v]\ngo to x: (-365) y: (95)\n\nwhen flag clicked\nforever\n    if <touching (ゲート v)?> then\n        broadcast (next v)\n    end\nend\n\nwhen I receive [next v]\ngo to x: (-365) y: (95)\n\nwhen flag clicked\nset size to (100) %\n\nwhen I receive [作品start！ v]\nshow\n\nwhen flag clicked\nforever\n    if <touching (スプライト3 v)?> then\n        broadcast (over v)\n    else\n        if <touching color (#ff0000)?> then\n            broadcast (over v)\n        end\n    end\nend\n\nwhen I receive [♥と★ v]\nnext costume\n\nwhen flag clicked\nswitch costume to (コスチューム1 v)\n\nwhen I receive [リス多 v]\ngo to x: (-365) y: (95)\n\nwhen flag clicked\nforever\n    if <key (down arrow v) pressed?> then\n        switch costume to (コスチューム2 v)\n    else\n        switch costume to (コスチューム1 v)\n    end\nend\n\nwhen flag clicked\nset [skin v] to [0]\nforever\n    if <(skin) = [1]> then\n        set [pixelate v] effect to (70)\n    else\n        set [pixelate v] effect to (0)\n        if <(skin) = [2]> then\n            set [fisheye v] effect to (100)\n        else\n            set [pixelate v] effect to (0)\n            set [fisheye v] effect to (0)\n        end\n    end\nend\n\nwhen [s v] key pressed\nchange [skin v] by (1)\n\nwhen flag clicked\nforever\n    if <(skin) = [3]> then\n        set [skin v] to [0]\n    end\nend\n\nwhen I receive [over v]\nchange [lifes v] by (-1)\n\nset [lifes v] to [10]\n\nwhen flag clicked\nforever\n    if <(lifes) < [0]> then\n        broadcast (death v)\n    end\nend\n\n@スプライト1\n\nwhen flag clicked\nbroadcast (作品Start！ v)\n\n@LONG\n\nwhen flag clicked\nhide\n\nwhen flag clicked\nset [lifes v] to [10]\n\n@CLIPLY_372109170_FREE_FIREWORKS_400\n\nwhen flag clicked\nforever\n    next costume\nend\n\nwhen flag clicked\nswitch backdrop to (プラットフォーマーの背景 v)\nhide\nforever\n    if <(level) = [44]> then\n        switch backdrop to (backdrop1 v)\n        go to [front v] layer\n        show\n    end\nend\n\n@Sprite1\n\nwhen flag clicked\nhide\ngo to x: (0) y: (0)\n\nwhen I receive [death v]\nshow\ngo to [front v] layer\nforever\n    change size by (5)\nend\n\n@Sprite3\n\n
improved long platformer 