(Mobile Support) Sleet Platformer


@Stage\n\nwhen flag clicked\nforever\n    play sound [Illenium - Let You Go \(ft v] until done\nend\n\n@Player\n\nwhen I receive [next v]\nshow\nset size to (55) %\nset [aaa v] to [0]\nset [x v] to [0]\nset [jump v] to [1]\ngo to x: (-190) y: (-20)\npoint in direction (90)\nwait (0.5) seconds\nset [xxx v] to [1]\n\nwhen I start as a clone\nrepeat (10)\n    change size by (-2)\n    change [ghost v] effect by (10)\nend\ndelete this clone\n\nwhen I receive [die v]\nstart sound [die v]\n\nwhen flag clicked\ngo to x: (-190) y: (0)\nshow\nset [jump v] to [1]\nset [xxx v] to [1]\nset [aaa v] to [0]\nset [x v] to [0]\n\nwhen flag clicked\nforever\n    if <(xxx) = [1]> then\n        set rotation style [left-right v]\n        if <<key (right arrow v) pressed?> or <<mouse down?> and <(x position) < (mouse x)>>> then\n            point in direction (90)\n            change [x v] by (1)\n            create clone of (_myself_ v)\n        end\n        if <<key (left arrow v) pressed?> or <<mouse down?> and <(x position) > (mouse x)>>> then\n            point in direction (-90)\n            change [x v] by (-1)\n            create clone of (_myself_ v)\n        end\n        set [x v] to ((x) * (0.9))\n    end\nend\n\nwhen flag clicked\nforever\n    if <(xxx) = [1]> then\n        change x by (x)\n        if <touching (ground v)?> then\n            change y by (1)\n            if <touching (ground v)?> then\n                change y by (1)\n                if <touching (ground v)?> then\n                    change y by (1)\n                    if <touching (ground v)?> then\n                        change y by (1)\n                        if <touching (ground v)?> then\n                            change y by (1)\n                            if <touching (ground v)?> then\n                                change y by (-4)\n                                change x by ((0) - (x))\n                                if <<key (up arrow v) pressed?> or <<(y position) < (mouse y)> and <mouse down?>>> then\n                                    start sound [jump v]\n                                    set [aaa v] to [13]\n                                    if <[0] < (x)> 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\n            end\n        end\n        change [aaa v] by (-1)\n        change y by (aaa)\n        if <touching (ground v)?> then\n            if <[0] > (aaa)> then\n                set [jump v] to [0]\n            else\n                set [jump v] to [1]\n            end\n            change y by ((0) - (aaa))\n            set [aaa v] to [0]\n        end\n        change y by (-1)\n        if <<<key (up arrow v) pressed?> or <<(y position) < (mouse y)> and <mouse down?>>> and <<(Jump) = [0]> and <touching (ground v)?>>> then\n            start sound [jump v]\n            set [jump v] to [1]\n            set [aaa v] to [13]\n        end\n        if <[230] < (x position)> then\n            broadcast (o v)\n            go to x: (-190) y: (-20)\n            point in direction (90)\n            set [aaa v] to [0]\n            set [x v] to [0]\n            hide\n            set [xxx v] to [0]\n        end\n        if <touching (needle v)?> then\n            broadcast (die v)\n            repeat (20)\n                change [ghost v] effect by (5)\n            end\n            hide\n            set [ghost v] effect to (0)\n            set size to (55) %\n            go to x: (-190) y: (-20)\n            point in direction (90)\n            set [xxx v] to [1]\n            set [aaa v] to [0]\n            set [x v] to [0]\n            show\n        end\n    end\nend\n\n@Needle\n\nwhen flag clicked\nshow\nswitch costume to (blank v)\ngo to [back v] layer\n\nwhen I receive [next v]\nnext costume\n\n@Next\n\nwhen I receive [o v]\ngo to x: (0) y: (0)\ngo to [front v] layer\nset size to (100) %\nset [ghost v] effect to (100)\nshow\nrepeat (10)\n    change [ghost v] effect by (-10)\nend\nwait (0.2) seconds\nbroadcast (NEXT v)\nrepeat (10)\n    change [ghost v] effect by (10)\nend\nhide\nclear graphic effects\n\nwhen flag clicked\nhide\n\n@Ground\n\nwhen flag clicked\nswitch costume to (1 v)\nset [powder v] to [0]\ngo to x: (0) y: (0)\n\nwhen I receive [next v]\nnext costume\n\nwhen flag clicked\nforever\n    if <(costume [number v]) = [7]> then\n        set [powder v] to [1]\n    end\nend\n\n@Powder\n\nwhen flag clicked\nset [ghost v] effect to (30)\nswitch costume to (powder v)\nhide\nforever\n    go to x: (pick random (-216) to (216)) y: (155)\n    create clone of (_myself_ v)\nend\n\nwhen I start as a clone\nshow\nif <(powder) = [1]> then\n    switch costume to (pick random (1) to (3))\n    clone\nelse\n    switch costume to (powder v)\n    clone\nend\n\ndefine clone\nrepeat until <touching (ground v)?>\n    change y by (-10)\n    turn right (15) degrees\nend\nrepeat (10)\n    change [ghost v] effect by (10)\nend\ndelete this clone\n\n@Time\n\nwhen flag clicked\nset size to (50) %\nhide variable [☁ 世界 v]\nhide variable [time v]\nset [time v] to [0]\nhide\nrepeat until <(powder) = [1]>\n    wait (1) seconds\n    change [time v] by (1)\nend\nshow variable [time v]\nshow variable [☁ 世界 v]\nwait (1) seconds\nif <(Time) < (☁ 世界)> then\n    set [☁ 世界 v] to (Time)\nend\n\nset [☁ 世界 v] to [100]\n\n@サムネイル\n\nwhen flag clicked\ngo to x: (0) y: (0)\nhide\n\ngo to [front v] layer\nshow\n\n@turbo\n\nwhen flag clicked\nforever\n    change [turbo v] by (1)\n    wait (0.00000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000.1) seconds\n    if <(turbo) > [3]> then\n        stop [all v]\n    end\nend\n\nwhen flag clicked\nforever\n    set [turbo v] to [0]\n    wait (0.00000001) seconds\nend\n\n