Blue world Platformer

Instructions: ＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿\n-----------------日本語の説明は下にあります----------------\n￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣\n【English】\n＝≪how to play≫＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝\nUse the left key to move to the left and the right key to move to the right.\nJump with the up key. Crouch down. \nIt can also be operated by WASD.\nWhen it hits pink, you go back to the beginning of the stage...\nTouch the blue and jump!\n＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝\n【日本語】\n＝≪遊び方≫＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝\n左キーで左、右キーで右に動きます。\n上キーでジャンプ。下ーでしゃがみます。\nWASDでも操作できます。\nピンク色に当たると、そのステージの初めに戻ります...\n青に触れると大ジャンプ！\n＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝

@Stage\n\nwhen flag clicked\nset volume to (50) %\nforever\n    play sound [TheFatRat+-+Time+Lapse v] until done\nend\n\nwhen flag clicked\nset [time v] to [0]\nshow variable [time v]\nhide variable [☁ 最高記録/highest record v]\nhide variable [時間/time v]\nrepeat until <(ステージ) = [15]>\n    wait (1) seconds\n    change [time v] by (1)\nend\nhide variable [time v]\nset [時間/time v] to (time)\nshow variable [☁ 最高記録/highest record v]\nshow variable [時間/time v]\nif <(time) < (☁ 最高記録/highest record)> then\n    set [☁ 最高記録/highest record v] to (time)\nend\n\nset [☁ 最高記録/highest record v] to [39]\n\n@キャラ\n\nwhen [timer v] > (0)\nhide\n\nwhen flag clicked\nset [ghost v] effect to (0)\ngo to [front v] layer\nset [ステージ v] to [1]\nswitch costume to (キャラ1 v)\nset size to (50) %\nset rotation style [left-right v]\nshow\ngo to x: (-220) y: (-50)\nset [速度x v] to [0]\nset [速度y v] to [0]\nrepeat until <(ステージ) = [16]>\n    show\n    create clone of (_myself_ v)\n    change [速度y v] by (-0.8)\n    if <<<key (left arrow v) pressed?> or <key (a 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 (right arrow v) pressed?> or <key (d 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.9))\n    change x by (速度x)\n    if <<touching color (#98ff8c)?> or > then\n        change y by (1)\n    end\n    if <<touching color (#98ff8c)?> or > then\n        change y by (1)\n    end\n    if <<touching color (#98ff8c)?> or > then\n        change y by (1)\n    end\n    if <<touching color (#98ff8c)?> or > then\n        change y by (1)\n    end\n    if <touching color (#98ff8c)?> then\n        change y by (-4)\n        change x by ((速度x) * (-1))\n        if <<<key (up arrow v) pressed?> or <key (w v) pressed?>> or <<mouse down?> and <(y position) < (mouse y)>>> then\n            set [速度y v] to [10]\n            broadcast (ジャンプ v)\n            if <([abs v] of (速度x) ) = (速度x)> then\n                set [速度x v] to [-9]\n            else\n                set [速度x v] to [9]\n            end\n        else\n            set [速度x v] to [0]\n        end\n    end\n    change y by (速度y)\n    if <touching color (#98ff8c)?> then\n        change y by ((0) - (速度y))\n        set [速度y v] to [0]\n    end\n    change y by (-1)\n    if <<<<key (up arrow v) pressed?> or <key (w v) pressed?>> and <touching color (#98ff8c)?>> or <<<mouse down?> and <(y position) < (mouse y)>> and <touching color (#98ff8c)?>>> then\n        set [速度y v] to [13]\n        broadcast (ジャンプ v)\n    end\n    change y by (1)\n    if <[239] < (x position)> then\n        change [ステージ v] by (1)\n        go to x: (-220) y: (-50)\n    end\n    if <<<(y position) < [-178]> or <touching color (#ff6ce5)?>> or <touching (敵 v)?>> then\n        go to x: (-220) y: (-50)\n        broadcast (死亡 v)\n    end\n    if <<(costume [number v]) = [3]> and <(y position) < [-172]>> then\n        go to x: (-220) y: (-50)\n        broadcast (死亡 v)\n    end\n    if <touching color (#6bffd8)?> then\n        if <<<key (up arrow v) pressed?> or <key (w v) pressed?>> or <<mouse down?> and <(y position) < (mouse y)>>> then\n            set [速度y v] to [17]\n            broadcast (大ジャンプ v)\n        else\n            set [速度y v] to [15]\n            broadcast (大ジャンプ v)\n        end\n    end\nend\nstop [all v]\n\nwhen I receive [ジャンプ v]\nstart sound [ジャンプ v]\n\nwhen I start as a clone\nif <(costume [number v]) = [1]> then\n    switch costume to (キャラ1残像 v)\nelse\n    switch costume to (キャラ2残像 v)\nend\nclear graphic effects\nset size to (50) %\nrepeat (10)\n    change [ghost v] effect by (10)\n    change size by (-5)\nend\ndelete this clone\n\nwhen flag clicked\nforever\n    if <<<key (down arrow v) pressed?> or <key (s v) pressed?>> or <<mouse down?> and <(mouse y) < [-105]>>> then\n        switch costume to (キャラ2 v)\n    else\n        switch costume to (キャラ1 v)\n    end\nend\n\nwhen I receive [大ジャンプ v]\nstart sound [大ジャンプ v]\n\nwhen I receive [死亡 v]\nstart sound [しょげる v]\n\n@地形\n\nwhen flag clicked\nshow\nforever\n    switch costume to (ステージ)\nend\n\n@スプライト2\n\nwhen flag clicked\ngo to [front v] layer\nhide\ngo to x: (0) y: (0)\nforever\n    reset timer\nend\n\nwhen [timer v] > (0)\nhide variable [time v]\nhide variable [時間/time v]\nhide variable [☁ 最高記録/highest record v]\nshow\n\n