PLATFORMER/プラットフォーマー

Instructions: ⭐⭐日本語(English explanation is below)⭐⭐⭐\n未完成\n矢印キーで移動　スペースキーまたは上矢印キーで飛ぶ\n・黄緑は地面\n・赤はマグマ\n・青は高く飛ぶ\n⭐⭐⭐⭐⭐⭐⭐English⭐⭐⭐⭐⭐⭐⭐⭐\nUnfinished\nMove with arrow keys Fly with Space key or up arrow keys\nYellow-green ground\nRed magma\nBlue flies high

@Stage\n\nwhen flag clicked\nif <<not < (username) contains [tks]?>> and <not <(username) = [takumi1102]>>> then\n    change [☁ 一般参照数 v] by (1)\nelse\n    if <<not <(username) = [takumi1102]>> and <not <(username) = [tks052]>>> then\n        change [☁ クラス参照数 v] by (1)\n    end\nend\n\nwhen flag clicked\nforever\n    switch backdrop to (ステージ)\nend\n\nwhen flag clicked\nbroadcast (音楽切り替え v)\nforever\n    if <[7] < (ステージ)> then\n        stop all sounds\n        broadcast (音楽切り替え v)\n        stop [this script v]\n    end\nend\n\nwhen I receive [音楽切り替え v]\nforever\n    if <[8] > (ステージ)> then\n        play sound [bgm_maoudamashii_fantasy14 v] until done\n    end\n    if <(ステージ) > [7]> then\n        play sound [bgm_maoudamashii_fantasy13 v] until done\n    end\nend\n\n@Scratch Cat\n\nwhen flag clicked\npoint in direction (90)\nset rotation style [left-right v]\nforever\n    if <key (right arrow v) pressed?> then\n        point in direction (90)\n    end\n    if <key (left arrow v) pressed?> then\n        point in direction (-90)\n    end\n    go to (判定 v)\nend\n\nwhen flag clicked\n\nwhen flag clicked\nswitch costume to (横 v)\nwait (1) seconds\nforever\n    if <not <(上重力) = [0]>> then\n        if <<key (right arrow v) pressed?> or <key (left arrow v) pressed?>> then\n            if <key (up arrow v) pressed?> then\n                switch costume to (上横 v)\n            else\n                switch costume to (横 v)\n            end\n        else\n            if <key (up arrow v) pressed?> then\n                switch costume to (上 v)\n            else\n                switch costume to (前 v)\n            end\n        end\n    else\n        if <(下重力) = [0]> then\n            if <<key (right arrow v) pressed?> or <key (left arrow v) pressed?>> then\n                switch costume to (横 v)\n            else\n                switch costume to (前 v)\n            end\n        else\n            if <<key (right arrow v) pressed?> or <key (left arrow v) pressed?>> then\n                switch costume to (下横 v)\n            else\n                switch costume to (下 v)\n            end\n        end\n    end\nend\n\nforever\n    if <<<key (up arrow v) pressed?> or <key (space v) pressed?>> or <<key (right arrow v) pressed?> or <key (left arrow v) pressed?>>> then\n        wait (0.1) seconds\n        next costume\n    else\n        wait (0.1) seconds\n        switch costume to (コスチューム1 v)\n    end\nend\n\n@判定\n\nwhen flag clicked\nset [地面判定済み v] to [n]\nforever\n    if <(a) = [y]> then\n        set [下重力 v] to [0]\n        repeat until <<<<touching (地面判定 v)?> or <touching (落ちる床判定 v)?>> or <touching (トランポリン判定 v)?>> and <(a) = [y]>>\n            strjyd\n            change [下重力 v] by (-1)\n            change y by (下重力)\n        end\n        set [下重力 v] to [0]\n    end\nend\n\nwhen flag clicked\nset [ghost v] effect to (100)\nset [下重力 v] to [0]\nset [a v] to [y]\nset [上重力 v] to [0]\nwait (1) seconds\nforever\n    if <<<key (up arrow v) pressed?> or <key (space v) pressed?>> and <(下重力) = [0]>> then\n        set [地面判定済み v] to [n]\n        set [a v] to [n]\n        set [上重力 v] to [12]\n        repeat until <(上重力) = [0]>\n            change y by (上重力)\n            change [上重力 v] by (-1)\n        end\n        set [上重力 v] to [0]\n        set [a v] to [y]\n    end\nend\n\nwhen flag clicked\ngo to x: (-200) y: (-60)\nset [横 v] to [9]\nrepeat until <(横) = [0.00]>\n    change x by (横)\n    change [横 v] by (-0.5)\nend\nforever\n    if <key (right arrow v) pressed?> then\n        set [横 v] to [9]\n        repeat until <not <key (right arrow v) pressed?>>\n            change x by (横)\n        end\n        repeat until <(横) = [0.00]>\n            change x by (横)\n            change [横 v] by (-1.00)\n        end\n    end\n    if <key (left arrow v) pressed?> then\n        set [横 v] to [-9]\n        repeat until <not <key (left arrow v) pressed?>>\n            change x by (横)\n        end\n        repeat until <(横) = [0.00]>\n            change x by (横)\n            change [横 v] by (1.00)\n        end\n    end\nend\n\nwhen flag clicked\nset [ステージ v] to [1]\nforever\n    if <(y position) < [-135]> then\n        set [下重力 v] to [3]\n        set [横 v] to [0]\n        go to x: (-180) y: (-60)\n        if <(ステージ) = [7]> then\n            broadcast (早く戻せ v)\n            broadcast (落ちるやつ v)\n        end\n    end\n    if <touching (マグマ判定 v)?> then\n        set [下重力 v] to [3]\n        set [横 v] to [0]\n        go to x: (-180) y: (-60)\n    end\n    if <(x position) > [230]> then\n        if <not <(ステージ) = [8]>> then\n            if <(ステージ) = [7]> then\n                broadcast (早く隠せ v)\n            end\n            change [ステージ v] by (1)\n            set [下重力 v] to [3]\n            set [横 v] to [0]\n            go to x: (-180) y: (-60)\n        end\n    end\nend\n\nwhen flag clicked\nforever\n    if <touching (トランポリン判定 v)?> then\n        set [a v] to [n]\n        change [上重力 v] by (20)\n        repeat until <(上重力) = [0]>\n            change y by (上重力)\n            change [上重力 v] by (-1)\n        end\n        set [上重力 v] to [0]\n        set [a v] to [y]\n    end\nend\n\nwhen flag clicked\nbroadcast (落ちるやつ v)\n\nwhen I receive [落ちるやつ v]\nforever\n    if <<(ステージ) = [7]> and <(x position) > [-40]>> then\n        broadcast (床落ちる1 v)\n        stop [this script v]\n    end\nend\n\ndefine strjyd\nif <(地面判定済み) = [n]> then\n    if <<touching (地面判定 v)?> or <touching (落ちる床判定 v)?>> then\n        change y by (0.5)\n        strjyd\n        change y by (-0.25)\n    end\n    set [地面判定済み v] to [y]\nend\n\nwhen flag clicked\nset [地面判定済み v] to [n]\nforever\n    if <(a) = [y]> then\n    end\nend\n\n@スプライト1\n\nwhen flag clicked\nset [ghost v] effect to (100)\n\nforever\n    go to (判定 v)\n    if <<touching color (#632d2d)?> or <touching color (#ffffff)?>> then\n        set [空中？ v] to [y]\n    else\n        set [空中？ v] to [n]\n    end\nend\n\n@スプライト2\n\nwhen flag clicked\ngo to [back v] layer\nhide\ngo to x: (12) y: (-1)\nforever\n    if <(ステージ) = [7]> then\n        show\n        stop [this script v]\n    end\nend\n\nwhen I receive [床落ちる1 v]\nset [重力\(落ちる床\) v] to [0]\nrepeat (12)\n    change y by (重力\(落ちる床\))\n    change [重力\(落ちる床\) v] by (-1)\nend\nbroadcast (早く隠せ v)\n\nwhen I receive [早く戻せ v]\ngo to x: (12) y: (-1)\nshow\n\nwhen I receive [早く隠せ v]\nhide\n\n@地面判定\n\nwhen flag clicked\nset [ghost v] effect to (100)\nforever\n    switch costume to (ステージ)\nend\n\n@落ちる床判定\n\nwhen flag clicked\nforever\n    go to (スプライト2 v)\nend\n\nwhen flag clicked\ngo to [front v] layer\nset [ghost v] effect to (100)\nhide\ngo to x: (12) y: (-1)\nforever\n    if <(ステージ) = [7]> then\n        show\n        stop [this script v]\n    end\nend\n\nwhen I receive [早く隠せ v]\nhide\n\n@マグマ判定\n\nwhen flag clicked\nset [ghost v] effect to (100)\nforever\n    switch costume to (ステージ)\nend\n\n@トランポリン判定\n\nwhen flag clicked\nshow\nset [ghost v] effect to (100)\nforever\n    switch costume to (ステージ)\nend\n\n@スプライト3\n\nwhen flag clicked\ngo to x: (0) y: (0)\ncreate clone of (_myself_ v)\nforever\n    show\n    set [ghost v] effect to (100)\n    go to [front v] layer\n    go to [front v] layer\nend\n\nreset timer\n\nhide\n\nwhen I start as a clone\nset [ghost v] effect to (0)\nset [表示のやーつ v] to [0]\nrepeat (39)\n    change y by (表示のやーつ)\n    change [表示のやーつ v] by (0.8)\n    change [ghost v] effect by (3)\nend\ndelete this clone\n\n