❄️氷の世界❄️【platformer】
@Stage\n\nwhen flag clicked\nforever\n    play sound [Inferno v] until done\nend\n\nwhen flag clicked\nset [ステージ v] to [1]\n\nwhen I receive [ﾂｷﾞ v]\nchange [ステージ v] by (1)\n\nwhen flag clicked\nforever\n    if <<(ステージ) > [5]> and <[11] > (ステージ)>> then\n        switch backdrop to (自作 v)\n    else\n        switch backdrop to (arctic v)\n    end\nend\n\nwhen flag clicked\nswitch backdrop to (arctic v)\n\n@キャラクター\n\ndefine 初期位置\ngo to x: (-180) y: (-40)\nbroadcast (メッセージ1 v)\n\nwhen flag clicked\nbroadcast (メッセージ1 v)\n\nwhen I receive [メッセージ1 v]\nshow\nset [x v] to [0]\nset [y v] to [0]\ngo to x: (-180) y: (-40)\nset rotation style [left-right v]\nforever\n    if <<key (right arrow v) pressed?> or <<mouse down?> and <(mouse x) > (x position)>>> then\n        point in direction (90)\n        change [x v] by (1)\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    end\n    set [x v] to ((X) * (0.95))\n    change x by (X)\n    if <touching (sたげ v)?> then\n        change y by (6)\n    end\n    if <touching (sたげ v)?> then\n        change y by (-6)\n        change x by ((X) * (-1))\n        if <<key (up arrow v) pressed?> or <<mouse down?> and <(mouse y) > [0]>>> then\n            start sound [Jump v]\n            set [y v] to [15]\n            if <(X) > [0]> then\n                set [x v] to [-10]\n            else\n                set [x v] to [10]\n            end\n        else\n            set [x v] to [0]\n        end\n    end\n    change [y v] by (-1)\n    change y by (Y)\n    if <touching (sたげ v)?> then\n        change y by (() - (Y))\n        set [y v] to [0]\n        if <<key (up arrow v) pressed?> or <<mouse down?> and <(mouse y) > [0]>>> then\n            start sound [Jump v]\n            set [y v] to [15]\n        end\n    end\nend\n\nwhen flag clicked\nforever\n    if <(y position) < [-180]> then\n        start sound [Pew v]\n        初期位置\n    end\nend\n\nwhen flag clicked\nforever\n    if <touching (針 v)?> then\n        start sound [Pew v]\n        初期位置\n    end\nend\n\nwhen flag clicked\nforever\n    if <(x position) > [220]> then\n        broadcast (ﾂｷﾞ v)\n    end\nend\n\nwhen I receive [ﾂｷﾞ v]\n初期位置\n\n@sたげ\n\nwhen flag clicked\nswitch costume to (ステージ1 v)\nset [ghost v] effect to (35)\n\nwhen I receive [ﾂｷﾞ v]\nnext costume\n\nwhen flag clicked\nshow\n\n@針\n\nwhen flag clicked\nswitch costume to (針1 v)\n\nwhen I receive [ﾂｷﾞ v]\nnext costume\n\nwhen flag clicked\nset [ghost v] effect to (30)\n\n@スプライト2\n\nwhen I receive [ﾂｷﾞ v]\nstart sound [Rip v]\n\n@snow\n\nwhen flag clicked\nforever\n    if <[5] > (ステージ)> then\n        create clone of (_myself_ v)\n        wait (0.1) seconds\n    end\nend\n\nwhen I start as a clone\nshow\nset y to (150)\nset x to (pick random (-220) to (220))\nrepeat until <touching (_edge_ v)?>\n    change y by (-8)\nend\ndelete this clone\n\n@ねxt\n\nwhen flag clicked\nhide\n\nwhen I receive [ﾂｷﾞ v]\ngo to x: (0) y: (0)\nshow\nwait (0.2) seconds\nhide\n\ngo to x: (500) y: (0)\nshow\nrepeat (21)\n    change x by (-45)\nend\nhide\n\n@スプライト1\n\nwhen flag clicked\nforever\n    if <(ステージ) = [11]> then\n        show\n    else\n        hide\n    end\nend\n\n@サムネ\n\nwhen flag clicked\nhide\n\n
矢印キーかタップで操作します。\nトゲに触れるとやられます。\nステージは全部で10ステージあります。\nバグが何個かあります(修正めんどい)\n(傾向載りてぇ〜)\n傾向2pから落とされたぁぁぁぁーー\nと思ったらまた上がってきたぁぁぁ\nと思ったらまた落とされたぁぁぁ\n坂を滑らかに登るプログラムを入れ忘れた自分氏\n(手抜きだぁー)