画面反転!?【Gimmick Platformer!】

Instructions:         　　 NEXTのラグを解消するためNEXTを改良\n　　　　　　　【 E n g l i s h 】　　　↓日本語下\nThis game is a platformer that needs gimmicks\nis. Avoid needles and crawl through lasers,\nAim for the goal!\nAnd what's unique about this game is that it has screen movement! When the angle changes or the size changes,\nThe terrain is changeable and difficult!\nSo, move the hero well and aim for the goal!\n\n　　　　　　　【Credit】\n　　　BGM by @-Xaf  sound by 効果音ラボ\n　　　　　　English by Google\n\n\n　　　　　　【　日　本　語　】\n　　　　好評だったら第2弾作ります！\n　　全10ステージなので少し少ないです。\n\nこのゲームは、ギミックが必要なプラットフォーマー\nです。針を避けたりレーザーを掻い潜り、\nゴールを目指しましょう！\nそしてこのゲーム特有なのは、画面移動があることです！角度が変わったり、大きさが変わったりと、\n地形が変わりやすく、難しいです！\nなので、うまく主人公を動かし、ゴールを目指そう！\n\n　　　　　　　　★裏話★\nUndertale用に画面反転つけたけど、これ\n最近なんかあれしてるプラットフォーマー?\nにつければいいんじゃないか。と思って\n実践してみました。\n\n　　　　　　　【クレジット】\n　　　　基本動き:自作　NEXT:自作\n　　　　画面移動:自作　デザイン:自作\n　　　　BGM:@-Xaf-様   音:効果音ラボ様\n\n　　　　　　　　　タグ?\n#game #games #all #platformer #プラットフォーマー\n\n＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿

@Stage\n\nwhen flag clicked\nforever\n    play sound [Nebula v] until done\nend\n\nwhen flag clicked\nhide variable [time v]\nhide variable [☁ world record v]\nforever\n    set [timer v] to (timer)\nend\n\nwhen [timer v] > (timer)\nhide variable [time v]\nhide variable [☁ world record v]\n\nwhen flag clicked\nwait until <(Stage) = [11]>\nshow variable [☁ world record v]\nshow variable [time v]\nif <(☁ World record) > (time)> then\n    set [☁ world record v] to (time)\nend\n\nwhen flag clicked\nset [time v] to [0]\nrepeat until <(Stage) = [11]>\n    change [time v] by (1)\n    wait (0.8) seconds\nend\n\n@プレーヤー\n\nwhen I start as a clone\nswitch costume to (右 v)\nset size to (50) %\n\nwhen flag clicked\nset [重力 v] to [1]\nset size to (100) %\nshow\nswitch costume to (右 v)\ngo to x: (-220) y: (-50)\nset [動けるか v] to [yes]\nset rotation style [left-right v]\npoint in direction (90)\nset [変数 v] to [0]\nset [xv v] to [0]\nset [yv v] to [0]\nforever\n    if <(動けるか) = [yes]> then\n        if <<key (right arrow v) pressed?> or <<mouse down?> and <[0] < (mouse x)>>> then\n            change [xv v] by (1)\n            switch costume to (右 v)\n            point in direction (90)\n            create clone of (_myself_ v)\n        end\n        if <<touching (スプライト3 v)?> or <touching (地面 v)?>> then\n            change y by ((重力) * (1))\n            if <<touching (スプライト3 v)?> or <touching (地面 v)?>> then\n                change y by ((重力) * (1))\n                if <<touching (スプライト3 v)?> or <touching (地面 v)?>> then\n                    change y by ((重力) * (1))\n                    if <<touching (スプライト3 v)?> or <touching (地面 v)?>> then\n                        change y by ((重力) * (1))\n                        if <<touching (スプライト3 v)?> or <touching (地面 v)?>> then\n                            change y by ((重力) * (1))\n                            if <<touching (スプライト3 v)?> or <touching (地面 v)?>> then\n                                change y by ((重力) * (1))\n                                if <<touching (スプライト3 v)?> or <touching (地面 v)?>> then\n                                    change y by ((重力) * (1))\n                                    if <<touching (スプライト3 v)?> or <touching (地面 v)?>> then\n                                        change x by ((XV) * (-1))\n                                        change y by ((重力) * (-7))\n                                        if <<key (up arrow v) pressed?> or <<mouse down?> and <[0] < (mouse y)>>> then\n                                            if <[0] < (XV)> then\n                                                start sound [ワピチ v]\n                                                set [xv v] to [-10]\n                                            else\n                                                set [xv v] to [10]\n                                                start sound [ワピチ v]\n                                            end\n                                            set [yv v] to ((重力) * (15))\n                                        else\n                                            set [xv v] to [0]\n                                        end\n                                    end\n                                end\n                            end\n                        end\n                    end\n                end\n            end\n        end\n        change y by ((重力) * (-1))\n        if <<touching (スプライト3 v)?> or <touching (地面 v)?>> then\n            if <<key (up arrow v) pressed?> or <<mouse down?> and <[0] < (mouse y)>>> then\n                set [yv v] to ((重力) * (15))\n                start sound [ワピチ v]\n            end\n        end\n        change y by ((重力) * (1))\n        change [yv v] by ((重力) * (-1))\n        change y by (YV)\n        if <<touching (スプライト3 v)?> or <touching (地面 v)?>> then\n            change y by ((YV) * (-1))\n            set [yv v] to [0]\n        end\n        if <touching (next当たり判定 v)?> then\n            broadcast (NEXT v)\n            set [xv v] to [0]\n            hide\n            wait (4) seconds\n            show\n            if <(重力) > [0]> then\n                go to x: (-220) y: (-50)\n            else\n                go to x: (220) y: (-50)\n            end\n        end\n        if <<touching (なんちゃってレーザー v)?> or <<touching (棘 v)?> or <touching (下当たり判定 v)?>>> then\n            if <(重力) > [0]> then\n                go to x: (-220) y: (-50)\n                start sound [フウ v]\n            else\n                go to x: (220) y: (-50)\n                start sound [フウ v]\n            end\n        end\n        if <touching color (#00c2ff)?> then\n            set [yv v] to [20]\n            start sound [ワピチ v]\n        end\n        if <<key (left arrow v) pressed?> or <<mouse down?> and <(mouse x) < [0]>>> then\n            change [xv v] by (-1)\n            point in direction (-90)\n            create clone of (_myself_ v)\n        end\n        set [xv v] to ((XV) * (0.89))\n        change x by (XV)\n    end\nend\n\nwhen flag clicked\nforever\n\nwhen flag clicked\nforever\n    position\nend\n\ndefine position\nset [プラフォ/x v] to (round (x position))\nset [プラフォ/y v] to (round (y position))\nset [プラフォ/向き v] to (direction)\nset [プラフォ/大きさ v] to (size)\n\nwhen flag clicked\nforever\n\nwhen I start as a clone\nswitch costume to (dummy v)\nset size to (100) %\nrepeat (10)\n    change size by (-10)\n    change [ghost v] effect by (10)\nend\ndelete this clone\n\n@地面\n\nwhen flag clicked\nset [stage v] to [1]\nset [x v] to [0]\nswitch costume to (1 v)\nset [y v] to [0]\nset [向き v] to [90]\nset [大きさ v] to [100]\nforever\n    画面適用\nend\n\ndefine 画面適用\nswitch costume to (1 v)\nset [コスチューム v] to (costume [name v])\nswitch costume to (dummy v)\nset size to (1080000) %\nswitch costume to (position v)\ngo to x: (item (1) of [システム_画面 v]) y: (item (2) of [システム_画面 v])\npoint in direction (item (3) of [システム_画面 v])\nmove ((x) * ((item (4) of [システム_画面 v]) / (100))) steps\nturn left (90) degrees\nmove ((y) * ((item (4) of [システム_画面 v]) / (100))) steps\nturn right (90) degrees\nturn right (向き) degrees\nturn left (90) degrees\nif <((大きさ) * ((item (4) of [システム_画面 v]) / (100))) > [100]> then\n    switch costume to (dummy v)\n    set size to ((大きさ) * ((item (4) of [システム_画面 v]) / (100))) %\nelse\n    switch costume to (position v)\n    set size to ((大きさ) * ((item (4) of [システム_画面 v]) / (100))) %\nend\nswitch costume to (Stage)\n\nwhen I receive [next v]\nnext costume\nchange [stage v] by (1)\n\nset [stage v] to [8]\n\n@棘\n\ndefine 画面適用\nset [コスチューム v] to (costume [name v])\nswitch costume to (dummy v)\nset size to (1080000) %\nswitch costume to (position v)\ngo to x: (item (1) of [システム_画面 v]) y: (item (2) of [システム_画面 v])\npoint in direction (item (3) of [システム_画面 v])\nmove ((x) * ((item (4) of [システム_画面 v]) / (100))) steps\nturn left (90) degrees\nmove ((y) * ((item (4) of [システム_画面 v]) / (100))) steps\nturn right (90) degrees\nturn right (向き) degrees\nturn left (90) degrees\nif <((大きさ) * ((item (4) of [システム_画面 v]) / (100))) > [100]> then\n    switch costume to (dummy v)\n    set size to ((大きさ) * ((item (4) of [システム_画面 v]) / (100))) %\nelse\n    switch costume to (dummy v)\n    set size to ((大きさ) * ((item (4) of [システム_画面 v]) / (100))) %\nend\nswitch costume to (Stage)\n\nwhen flag clicked\nset [x v] to [0]\nset [y v] to [0]\nswitch costume to (1 v)\nset [向き v] to [90]\nset [大きさ v] to [100]\nforever\n    画面適用\nend\n\nwhen I receive [next v]\nnext costume\n\n@画面\n\nwhen flag clicked\ngo to x: (0) y: (0)\npoint in direction (90)\nset size to (100) %\nforever\n    (x position) (y position) (direction) (size)\nend\n\ndefine (x) (y) (z) (s)\nreplace item (1) of [システム_画面 v] with (x)\nreplace item (2) of [システム_画面 v] with (y)\nreplace item (3) of [システム_画面 v] with (z)\nreplace item (4) of [システム_画面 v] with (s)\n\nwhen flag clicked\nwait (0) seconds\nwait until <(Stage) = [3]>\nwait (1) seconds\nset [重力 v] to [-1]\nset [動けるか v] to [no]\nrepeat (30)\n    turn right (-5) degrees\nend\nset [動けるか v] to [yes]\nwait until <(Stage) = [4]>\nset [重力 v] to [1]\npoint in direction (105)\nset size to (100) %\nwait until <(Stage) = [5]>\nset [重力 v] to [1]\npoint in direction (90)\nset size to (100) %\nwait until <(Stage) = [6]>\nset size to (100) %\nwait until <(Stage) = [8]>\nset size to (100) %\npoint in direction (100)\nwait until <(Stage) = [9]>\nset size to (100) %\nset [重力 v] to [-1]\npoint in direction (-90)\nwait until <(Stage) = [10]>\nset size to (100) %\npoint in direction (90)\nset [重力 v] to [1]\nwait until <(Stage) = [11]>\nset size to (100) %\nset [重力 v] to [1]\npoint in direction (45)\n\nset [重力 v] to [1]\npoint in direction (105)\n\npoint in direction (90)\n\n@下当たり判定\n\nwhen flag clicked\nset [ghost v] effect to (100)\nforever\n    show\n    画面適用\nend\n\ndefine 画面適用\nswitch costume to (1 v)\nset [コスチューム v] to (costume [name v])\nswitch costume to (dummy v)\nset size to (1080000) %\nswitch costume to (position v)\ngo to x: (item (1) of [システム_画面 v]) y: (item (2) of [システム_画面 v])\npoint in direction (item (3) of [システム_画面 v])\nmove ((x) * ((item (4) of [システム_画面 v]) / (100))) steps\nturn left (90) degrees\nmove ((y) * ((item (4) of [システム_画面 v]) / (100))) steps\nturn right (90) degrees\nturn right (向き) degrees\nturn left (90) degrees\nif <((大きさ) * ((item (4) of [システム_画面 v]) / (100))) > [100]> then\n    switch costume to (dummy v)\n    set size to ((大きさ) * ((item (4) of [システム_画面 v]) / (100))) %\nelse\n    switch costume to (position v)\n    set size to ((大きさ) * ((item (4) of [システム_画面 v]) / (100))) %\nend\nswitch costume to (コスチューム)\n\n@スプライト1\n\nwhen flag clicked\ngo to x: (0) y: (0)\nswitch costume to (コスチューム1 v)\nforever\n    go to [back v] layer\n    画面適用\nend\n\ndefine 画面適用\nswitch costume to (1 v)\nset [コスチューム v] to (costume [name v])\nswitch costume to (dummy v)\nset size to (1080000) %\nswitch costume to (position v)\ngo to x: (item (1) of [システム_画面 v]) y: (item (2) of [システム_画面 v])\npoint in direction (item (3) of [システム_画面 v])\nmove ((x) * ((item (4) of [システム_画面 v]) / (100))) steps\nturn left (90) degrees\nmove ((y) * ((item (4) of [システム_画面 v]) / (100))) steps\nturn right (90) degrees\nturn right (向き) degrees\nturn left (90) degrees\nif <((大きさ) * ((item (4) of [システム_画面 v]) / (100))) > [100]> then\n    switch costume to (dummy v)\n    set size to ((大きさ) * ((item (4) of [システム_画面 v]) / (100))) %\nelse\n    switch costume to (position v)\n    set size to ((大きさ) * ((item (4) of [システム_画面 v]) / (100))) %\nend\nswitch costume to (コスチューム)\n\n@NEXT\n\nwhen flag clicked\nhide\n\nwhen I receive [next v]\nrepeat (5)\n    switch costume to (コスチューム2 v)\n    create clone of (_myself_ v)\n    wait (0.05) seconds\nend\nclear graphic effects\nhide\nswitch costume to (コスチューム1 v)\nset [ghost v] effect to (50)\ngo to [front v] layer\nshow\nstart sound [高速移動 v]\ngo to x: (600) y: (0)\nset [next v] to [0]\nrepeat (15)\n    change x by (next)\n    change [next v] by (-5)\nend\nrepeat (10)\n    change x by (-2)\nend\nset [next v] to [0]\nrepeat (15)\n    change x by (next)\n    change [next v] by (-5)\nend\nhide\n\nwhen flag clicked\nforever\n\nwhen I start as a clone\ngo to x: (600) y: (0)\nset [next2 v] to [10]\nclear graphic effects\nshow\nrepeat (30)\n    change x by (() - (next2))\n    change [ghost v] effect by (3)\n    change [next2 v] by (5)\nend\ndelete this clone\n\n@next当たり判定\n\nwhen flag clicked\nset [ghost v] effect to (100)\nforever\n    画面適用\n    show\nend\n\ndefine 画面適用\nswitch costume to (1 v)\nset [コスチューム v] to (costume [name v])\nswitch costume to (dummy v)\nset size to (1080000) %\nswitch costume to (position v)\ngo to x: (item (1) of [システム_画面 v]) y: (item (2) of [システム_画面 v])\npoint in direction (item (3) of [システム_画面 v])\nmove ((x) * ((item (4) of [システム_画面 v]) / (100))) steps\nturn left (90) degrees\nmove ((y) * ((item (4) of [システム_画面 v]) / (100))) steps\nturn right (90) degrees\nturn right (向き) degrees\nturn left (90) degrees\nif <((大きさ) * ((item (4) of [システム_画面 v]) / (100))) > [100]> then\n    switch costume to (dummy v)\n    set size to ((大きさ) * ((item (4) of [システム_画面 v]) / (100))) %\nelse\n    switch costume to (position v)\n    set size to ((大きさ) * ((item (4) of [システム_画面 v]) / (100))) %\nend\nswitch costume to (コスチューム)\n\n@なんちゃってレーザー\n\nwhen flag clicked\nhide\nwait until <(Stage) = [10]>\nswitch costume to (コスチューム2 v)\nshow\nrepeat until <(Stage) = [11]>\n    next costume\n    start sound [気弾2 v]\n    set [ghost v] effect to (50)\n    repeat (5)\n        change [ghost v] effect by (-10)\n    end\n    wait (0.3) seconds\n    repeat (10)\n        change [ghost v] effect by (10)\n    end\nend\nhide\n\nwhen flag clicked\nforever\n    change [color v] effect by (5)\nend\n\n@サムネイル\n\nwhen flag clicked\nforever\n    go to [front v] layer\n    change [ghost v] effect by (10)\nend\n\n