❄Ice　 Platformer❄ ❄アイスプラットフォーマー❄

Instructions: 矢印キーで操作\nモバイル対応は青いのがタップしている所に向かって\n進むかたちになるのでちょっとやりにくいかも\nしれません　\n♪★と♡ちょ～だ～い♪\n\n\n\n\n一応氷っていう定でやってるから滑る\n\n\n｢おいおいなんだこの簡単なプラットフォーマーは！\nこれはもはやプラットフォーマーとは呼べん！｣\nって方はマウス、またはタブレットやスマホなどで\nどうぞ。

@Stage\n\nwhen flag clicked\nforever\n    play sound [Tobu - Candyland \[NCS Release\]2 v] until done\nend\n\n@主人公\n\nwhen flag clicked\nset [ステージ v] to [0]\n初期化\nforever\n    if <<key (right arrow v) pressed?> or <<(mouse x) > (x position)> and <mouse down?>>> then\n        point in direction (90)\n        change [x v] by (0.7)\n    end\n    if <<key (left arrow v) pressed?> or <<(x position) > (mouse x)> and <mouse down?>>> then\n        point in direction (-90)\n        change [x v] by (-0.7)\n    end\n    change x by (x)\n    if <<(y position) = [-180]> or <touching (トゲ v)?>> then\n        set rotation style [all around v]\n        change y by (4)\n        set [y v] to [18]\n        repeat until <(y position) < [-179]>\n            change y by (y)\n            change [y v] by (-1)\n            turn right (14) degrees\n        end\n        初期化\n    end\n    if <(x position) > [230]> then\n        change [ステージ v] by (1)\n        broadcast (NEXT v)\n    end\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) * (-1))\n                            change y by (-5)\n                            if <<key (up arrow v) pressed?> or <<(mouse y) > (y position)> and <mouse down?>>> then\n                                if <(x) > [0]> then\n                                    set [x v] to [-6]\n                                else\n                                    set [x v] to [6]\n                                end\n                                set [y v] to [10]\n                            else\n                                set [y v] to [0]\n                            end\n                        end\n                    end\n                end\n            end\n        end\n    end\n    change y by (-1)\n    set [x v] to ((x) * (0.96))\n    if <<key (up arrow v) pressed?> or <<(mouse y) > [-25]> and <mouse down?>>> then\n        if <touching (ステージ v)?> then\n            set [y v] to [15]\n        end\n    end\n    change y by (y)\n    change [y v] by (-1)\n    if <touching (ステージ v)?> then\n        change y by ((y) * (-1))\n        set [y v] to [0]\n    end\nend\n\nwhen I receive [next v]\n初期化\n\nwhen I receive [next v]\nglide (1) secs to x: (-200) y: (-56)\n\ndefine 初期化\nset size to (100) %\nset [ghost v] effect to (100)\nset rotation style [left-right v]\npoint in direction (90)\ngo to [front v] layer\ngo [backward v] (1) layers\nshow\ngo to x: (-200) y: (-56)\nset [y v] to [0]\nset [x v] to [0]\nrepeat (10)\n    change [ghost v] effect by (-10)\nend\n\n@ステージ\n\nwhen flag clicked\ngo to x: (0) y: (0)\nforever\n    if <(ステージ) = [0]> then\n        switch costume to (0 v)\n    end\n    if <(ステージ) = [1]> then\n        switch costume to (1 v)\n    end\n    if <(ステージ) = [2]> then\n        switch costume to (2 v)\n    end\n    if <(ステージ) = [3]> then\n        switch costume to (3 v)\n    end\n    if <(ステージ) = [4]> then\n        switch costume to (4 v)\n    end\n    if <(ステージ) = [5]> then\n        switch costume to (5 v)\n    end\n    if <(ステージ) = [6]> then\n        switch costume to (6 v)\n    end\n    if <(ステージ) = [7]> then\n        switch costume to (7 v)\n    end\n    if <(ステージ) = [8]> then\n        switch costume to (8 v)\n    end\n    if <(ステージ) = [9]> then\n        switch costume to (9 v)\n    end\nend\n\n@トゲ\n\nwhen I receive [next v]\nnext costume\nif <(costume [number v]) = [1]> then\n    switch costume to (9 v)\nend\n\nwhen flag clicked\nswitch costume to (0 v)\n\n@NEXT\n\nwhen I receive [next v]\nshow\ngo to [back v] layer\ngo [forward v] (1) layers\ngo to x: (0) y: (-500)\nrepeat until <(y position) > [412]>\n    change y by (45)\nend\nhide\n\nwhen flag clicked\nhide\nchange [ghost v] effect by (60)\n\n@雪\n\nwhen I start as a clone\nset [ghost v] effect to (50)\nset x to (pick random (-240) to (240))\nset size to (pick random (39) to (100)) %\nshow\nglide (pick random (4) to (7)) secs to x: (pick random (-238) to (238)) y: (-180)\ndelete this clone\n\nwhen flag clicked\nswitch costume to (pick random (1) to (2))\nhide\ngo to x: (0) y: (180)\ngo to [front v] layer\nforever\n    create clone of (_myself_ v)\n    next costume\n    wait (0.075) seconds\nend\n\n@SNOW\n\nwhen flag clicked\nhide\n\nshow\ngo to [front v] layer\n\n