70% Pen Platformer

Instructions: 私の作品がまとまったスタジオはこちら\nhttps://scratch.mit.edu/studios/26060782/\n========================================\n※This is test work...\n Arrow keys.You can also operate by clicking the mouse.\n Don't touch red area. So if you touch red area, you will start over...\n If you touch pink area, You can jump higher!\n\n※この作品はテスト作品です。\n　矢印キーで動きます。マウスをクリックすることでも動きます。\n　赤いところに触れてはいけません。もし触れてしまうと、最初からやり直しになってしまいます…。\n　ピンクのところに触れると、高いジャンプができます。

@Stage\n\nwhen flag clicked\nswitch backdrop to (blue sky 2  v)\nforever\n    play sound [latenightsnow v] until done\nend\n\nwhen flag clicked\nforever\n    if <(level) = [10]> then\n        switch backdrop to (blue sky 2 2 v)\n    end\n    if <not <(level) = [10]>> then\n        switch backdrop to (blue sky 2  v)\n    end\nend\n\n@スプライト1\n\nwhen flag clicked\nshow\nforever\n    wait (0.01) seconds\n    create clone of (_myself_ v)\nend\n\nwhen I start as a clone\nswitch costume to (コスチューム2 v)\nset [ghost v] effect to (55)\nrepeat (15)\n    change size by (-0.5)\n    change [ghost v] effect by (3)\nend\ndelete this clone\n\nwhen flag clicked\nset rotation style [left-right v]\nset size to (65) %\nswitch costume to (コスチューム2 v)\nshow\ngo to x: (-214) y: (-95)\nset [level v] to [0]\nhide variable [y v]\nhide variable [x v]\nset [y v] to [0]\nset [x v] to [0]\nforever\n    change [y v] by (-1)\n    if <<key (right arrow v) pressed?> or <<mouse down?> and <(mouse x) > (x position)>>> then\n        point in direction (90)\n        if <not <<key (up arrow v) pressed?> or <<mouse down?> and <(mouse y) > (y position)>>>> then\n            change [x v] by (1)\n            switch costume to (costume4 v)\n        else\n            change [x v] by (1)\n            switch costume to (costume3 v)\n        end\n    end\n    if <<key (left arrow v) pressed?> or <<mouse down?> and <(mouse x) < (x position)>>> then\n        point in direction (-90)\n        if <not <<key (up arrow v) pressed?> or <<mouse down?> and <(mouse y) > (y position)>>>> then\n            change [x v] by (-1)\n            switch costume to (left v)\n        else\n            change [x v] by (-1)\n            switch costume to (costume6 v)\n        end\n    end\n    set [x v] to ((x) * (0.9))\n    change x by (x)\n    if <touching color (#27fd00)?> then\n        change y by (1)\n    end\n    if <touching color (#27fd00)?> then\n        change y by (1)\n    end\n    if <touching color (#27fd00)?> then\n        change y by (1)\n    end\n    if <touching color (#27fd00)?> then\n        change y by (-4)\n        change x by ((x) * (-1))\n        if <<key (up arrow v) pressed?> or <<mouse down?> and <(mouse x) > (x position)>>> then\n            set [y v] to [13]\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    if <touching color (#27fd00)?> then\n        change y by (1)\n    end\n    change y by (y)\n    if <touching color (#27fd00)?> then\n        change y by ((y) - ((y) * (2)))\n        set [y v] to [0]\n    end\n    change y by (-1)\n    if <<<key (up arrow v) pressed?> or <<mouse down?> and <(mouse y) > (y position)>>> and <touching color (#27fd00)?>> then\n        set [y v] to [15]\n    end\n    change y by (1)\n    if <touching color (#ff0000)?> then\n        go to x: (-177) y: (-95)\n    end\n    if <<(x position) > [230]> and <not <[9] < (level)>>> then\n        change [level v] by (1)\n        go to x: (-177) y: (-95)\n        broadcast (Pen v)\n    end\n    if <(y position) < [-175]> then\n        go to x: (-177) y: (-95)\n    end\n    if <touching color (#27fd00)?> then\n        change y by (-4)\n        change x by ((x) * (-1))\n        set [x v] to [0]\n    end\n    if <<not <<<key (right arrow v) pressed?> or <<mouse down?> and <(mouse x) > (x position)>>> or <<key (up arrow v) pressed?> or <<mouse down?> and <(mouse y) > (y position)>>>>> or <<key (left arrow v) pressed?> or <<mouse down?> and <(mouse x) < (x position)>>>> then\n        switch costume to (idle v)\n    end\n    if <touching color (#ec00fd)?> then\n        set [y v] to [18]\n    end\nend\n\n@Pen\n\nwhen flag clicked\nerase all\npen up\nset pen color to (#964e00)\nset pen size to (75)\ngo to x: (-250) y: (-160)\npen down\ngo to x: (230) y: (-160)\npen up\nset pen color to (#005a00)\nset pen size to (12)\ngo to x: (250) y: (-137)\npen down\ngo to x: (-250) y: (-137)\npen up\nset pen color to (#058e00)\nset pen size to (12)\ngo to x: (250) y: (-130)\npen down\ngo to x: (-250) y: (-130)\npen up\nset pen color to (#27fd00)\nset pen size to (12)\ngo to x: (250) y: (-121)\npen down\ngo to x: (-250) y: (-121)\npen up\n\nwhen I receive [pen v]\nif <(level) = [1]> then\n    broadcast (Pen 1 v)\nend\nif <(level) = [2]> then\n    broadcast (Pen 2 v)\nend\nif <(level) = [3]> then\n    broadcast (Pen 3 v)\nend\nif <(level) = [4]> then\n    broadcast (Pen 4 v)\nend\nif <(level) = [5]> then\n    broadcast (Pen 5 v)\nend\nif <(level) = [6]> then\n    broadcast (Pen 6 v)\nend\nif <(level) = [7]> then\n    broadcast (Pen 7 v)\nend\nif <(level) = [8]> then\n    broadcast (Pen 8 v)\nend\nif <(level) = [9]> then\n    broadcast (Pen 9 v)\nend\nif <(level) = [10]> then\n    broadcast (Pen 10 v)\nend\n\nwhen I receive [pen 1 v]\nerase all\npen up\nset pen color to (#964e00)\nset pen size to (75)\ngo to x: (-250) y: (-160)\npen down\ngo to x: (230) y: (-160)\npen up\nset pen color to (#005a00)\nset pen size to (12)\ngo to x: (250) y: (-137)\npen down\ngo to x: (-250) y: (-137)\npen up\nset pen color to (#058e00)\nset pen size to (12)\ngo to x: (250) y: (-130)\npen down\ngo to x: (-250) y: (-130)\npen up\nset pen color to (#27fd00)\nset pen size to (12)\ngo to x: (250) y: (-121)\npen down\ngo to x: (-250) y: (-121)\npen up\nset pen color to (#fd0000)\nset pen size to (10)\ngo to x: (90) y: (-111)\npen down\ngo to x: (250) y: (-111)\npen up\n\nwhen I receive [pen 2 v]\nerase all\npen up\nset pen color to (#964e00)\nset pen size to (75)\ngo to x: (-250) y: (-160)\npen down\ngo to x: (230) y: (-160)\npen up\nset pen color to (#005a00)\nset pen size to (12)\ngo to x: (250) y: (-137)\npen down\ngo to x: (-250) y: (-137)\npen up\nset pen color to (#058e00)\nset pen size to (12)\ngo to x: (250) y: (-130)\npen down\ngo to x: (-250) y: (-130)\npen up\nset pen color to (#27fd00)\nset pen size to (12)\ngo to x: (250) y: (-121)\npen down\ngo to x: (-250) y: (-121)\npen up\nset pen color to (#ec00fd)\nset pen size to (10)\ngo to x: (-100) y: (-111)\npen down\ngo to x: (-50) y: (-111)\npen up\nset pen color to (#ec00fd)\nset pen size to (10)\ngo to x: (100) y: (-111)\npen down\ngo to x: (150) y: (-111)\npen up\nset pen color to (#fd0000)\nset pen size to (130)\ngo to x: (-250) y: (120)\npen down\ngo to x: (250) y: (120)\npen up\n\nwhen I receive [pen 5 v]\nerase all\npen up\nset pen color to (#964e00)\nset pen size to (75)\ngo to x: (-250) y: (-160)\npen down\ngo to x: (230) y: (-160)\npen up\nset pen color to (#005a00)\nset pen size to (12)\ngo to x: (250) y: (-137)\npen down\ngo to x: (-250) y: (-137)\npen up\nset pen color to (#058e00)\nset pen size to (12)\ngo to x: (250) y: (-130)\npen down\ngo to x: (-250) y: (-130)\npen up\nset pen color to (#27fd00)\nset pen size to (12)\ngo to x: (250) y: (-121)\npen down\ngo to x: (-250) y: (-121)\npen up\nset pen color to (#27fd00)\nset pen size to (10)\ngo to x: (-100) y: (-121)\npen down\ngo to x: (-100) y: (-71)\npen up\nset pen color to (#27fd00)\nset pen size to (10)\ngo to x: (-100) y: (-11)\npen down\ngo to x: (-100) y: (180)\npen up\nset pen color to (#fd0000)\nset pen size to (10)\ngo to x: (-90) y: (-119)\npen down\ngo to x: (-25) y: (-119)\npen up\nset pen color to (#27fd00)\nset pen size to (10)\ngo to x: (100) y: (-121)\npen down\ngo to x: (100) y: (61)\npen up\nset pen color to (#27fd00)\nset pen size to (10)\ngo to x: (100) y: (121)\npen down\ngo to x: (100) y: (180)\npen up\nset pen color to (#fd0000)\nset pen size to (10)\ngo to x: (110) y: (175)\npen down\ngo to x: (240) y: (175)\npen up\nset pen color to (#fd0000)\nset pen size to (10)\ngo to x: (110) y: (-117)\npen down\ngo to x: (240) y: (-117)\npen up\n\nwhen I receive [pen 6 v]\nerase all\npen up\nset pen color to (#964e00)\nset pen size to (75)\ngo to x: (-250) y: (-160)\npen down\ngo to x: (230) y: (-160)\npen up\nset pen color to (#005a00)\nset pen size to (12)\ngo to x: (250) y: (-137)\npen down\ngo to x: (-250) y: (-137)\npen up\nset pen color to (#058e00)\nset pen size to (12)\ngo to x: (250) y: (-130)\npen down\ngo to x: (-250) y: (-130)\npen up\nset pen color to (#27fd00)\nset pen size to (12)\ngo to x: (250) y: (-121)\npen down\ngo to x: (-250) y: (-121)\npen up\nset pen color to (#fd0000)\nset pen size to (10)\ngo to x: (-100) y: (-119)\npen down\ngo to x: (180) y: (-119)\npen up\nset pen color to (#27fd00)\nset pen size to (10)\ngo to x: (31) y: (-31)\npen down\ngo to x: (30) y: (-31)\npen up\n\nwhen I receive [pen 7 v]\nerase all\npen up\nset pen color to (#964e00)\nset pen size to (75)\ngo to x: (-250) y: (-160)\npen down\ngo to x: (230) y: (-160)\npen up\nset pen color to (#005a00)\nset pen size to (12)\ngo to x: (250) y: (-137)\npen down\ngo to x: (-250) y: (-137)\npen up\nset pen color to (#058e00)\nset pen size to (12)\ngo to x: (250) y: (-130)\npen down\ngo to x: (-250) y: (-130)\npen up\nset pen color to (#27fd00)\nset pen size to (12)\ngo to x: (250) y: (-121)\npen down\ngo to x: (-250) y: (-121)\npen up\nset pen color to (#ec00fd)\nset pen size to (10)\ngo to x: (-100) y: (-119)\npen down\ngo to x: (-50) y: (-119)\npen up\nset pen color to (#fd0000)\nset pen size to (10)\ngo to x: (-100) y: (31)\npen down\ngo to x: (-60) y: (31)\npen up\nset pen color to (#fd0000)\nset pen size to (10)\ngo to x: (-49) y: (-119)\npen down\ngo to x: (129) y: (-119)\npen up\n\nwhen I receive [pen 8 v]\nerase all\npen up\nset pen color to (#964e00)\nset pen size to (75)\ngo to x: (-250) y: (-160)\npen down\ngo to x: (230) y: (-160)\npen up\nset pen color to (#005a00)\nset pen size to (12)\ngo to x: (250) y: (-137)\npen down\ngo to x: (-250) y: (-137)\npen up\nset pen color to (#058e00)\nset pen size to (12)\ngo to x: (250) y: (-130)\npen down\ngo to x: (-250) y: (-130)\npen up\nset pen color to (#27fd00)\nset pen size to (12)\ngo to x: (250) y: (-121)\npen down\ngo to x: (-250) y: (-121)\npen up\nset pen color to (#fd0000)\nset pen size to (10)\ngo to x: (-100) y: (-119)\npen down\ngo to x: (-100) y: (-49)\npen up\nset pen color to (#fd0000)\nset pen size to (10)\ngo to x: (-100) y: (39)\npen down\ngo to x: (-100) y: (180)\npen up\nset pen color to (#fd0000)\nset pen size to (10)\ngo to x: (100) y: (-119)\npen down\ngo to x: (100) y: (29)\npen up\nset pen color to (#fd0000)\nset pen size to (10)\ngo to x: (100) y: (119)\npen down\ngo to x: (100) y: (180)\npen up\nset pen color to (#ec00fd)\nset pen size to (10)\ngo to x: (90) y: (-119)\npen down\ngo to x: (25) y: (-119)\npen up\n\nwhen I receive [pen 9 v]\nerase all\npen up\nset pen color to (#964e00)\nset pen size to (75)\ngo to x: (-250) y: (-160)\npen down\ngo to x: (230) y: (-160)\npen up\nset pen color to (#005a00)\nset pen size to (12)\ngo to x: (250) y: (-137)\npen down\ngo to x: (-250) y: (-137)\npen up\nset pen color to (#058e00)\nset pen size to (12)\ngo to x: (250) y: (-130)\npen down\ngo to x: (-250) y: (-130)\npen up\nset pen color to (#27fd00)\nset pen size to (12)\ngo to x: (250) y: (-121)\npen down\ngo to x: (-250) y: (-121)\npen up\nset pen color to (#27fd00)\nset pen size to (12)\ngo to x: (240) y: (-119)\npen down\ngo to x: (240) y: (109)\npen up\nset pen color to (#27fd00)\nset pen size to (10)\ngo to x: (159) y: (-59)\npen down\ngo to x: (-240) y: (-59)\npen up\nset pen color to (#fd0000)\nset pen size to (10)\ngo to x: (239) y: (-39)\npen down\ngo to x: (239) y: (-79)\npen up\nset pen color to (#27fd00)\nset pen size to (10)\ngo to x: (240) y: (19)\npen down\ngo to x: (-160) y: (19)\npen up\nset pen color to (#27fd00)\nset pen size to (10)\ngo to x: (-240) y: (99)\npen down\ngo to x: (160) y: (99)\npen up\nset pen color to (#fd0000)\nset pen size to (10)\ngo to x: (240) y: (99)\npen down\ngo to x: (240) y: (59)\npen up\n\nwhen I receive [pen 10 v]\nerase all\npen up\nset pen color to (#964e00)\nset pen size to (75)\ngo to x: (-250) y: (-160)\npen down\ngo to x: (230) y: (-160)\npen up\nset pen color to (#005a00)\nset pen size to (12)\ngo to x: (250) y: (-137)\npen down\ngo to x: (-250) y: (-137)\npen up\nset pen color to (#058e00)\nset pen size to (12)\ngo to x: (250) y: (-130)\npen down\ngo to x: (-250) y: (-130)\npen up\nset pen color to (#27fd00)\nset pen size to (12)\ngo to x: (250) y: (-121)\npen down\ngo to x: (-250) y: (-121)\npen up\n\nwhen I receive [pen 4 v]\nerase all\npen up\nset pen color to (#964e00)\nset pen size to (75)\ngo to x: (-250) y: (-160)\npen down\ngo to x: (230) y: (-160)\npen up\nset pen color to (#005a00)\nset pen size to (12)\ngo to x: (250) y: (-137)\npen down\ngo to x: (-250) y: (-137)\npen up\nset pen color to (#058e00)\nset pen size to (12)\ngo to x: (250) y: (-130)\npen down\ngo to x: (-250) y: (-130)\npen up\nset pen color to (#27fd00)\nset pen size to (12)\ngo to x: (250) y: (-121)\npen down\ngo to x: (-250) y: (-121)\npen up\nset pen color to (#fd0000)\nset pen size to (10)\ngo to x: (-100) y: (-119)\npen down\ngo to x: (-50) y: (-119)\npen up\nset pen color to (#fd0000)\nset pen size to (10)\ngo to x: (50) y: (-119)\npen down\ngo to x: (100) y: (-119)\npen up\n\nwhen I receive [pen 3 v]\nerase all\npen up\nset pen color to (#964e00)\nset pen size to (75)\ngo to x: (-250) y: (-160)\npen down\ngo to x: (230) y: (-160)\npen up\nset pen color to (#005a00)\nset pen size to (12)\ngo to x: (250) y: (-137)\npen down\ngo to x: (-250) y: (-137)\npen up\nset pen color to (#058e00)\nset pen size to (12)\ngo to x: (250) y: (-130)\npen down\ngo to x: (-250) y: (-130)\npen up\nset pen color to (#27fd00)\nset pen size to (12)\ngo to x: (250) y: (-121)\npen down\ngo to x: (-250) y: (-121)\npen up\nset pen color to (#ec00fd)\nset pen size to (10)\ngo to x: (50) y: (-119)\npen down\ngo to x: (120) y: (-119)\npen up\nset pen color to (#fd0000)\nset pen size to (10)\ngo to x: (125) y: (-115)\npen down\ngo to x: (125) y: (15)\npen up\n\n@サムネ\n\nwhen flag clicked\nhide\nset size to (100) %\ngo to x: (0) y: (0)\n\n