【Mobile ok】platformer!!【#1】 

Instructions: 【#1】\n日本語は下だよ〜\nEnglish\n~Method of operation~\nArrow key operation Or tap operation\n\nBe careful not to hit the magma and the needle! !!\n\n日本語\n〜操作方法〜\n矢印キー操作\nまたはタップ操作\n\nマグマや針に当たらないように気をつけて！！

@Stage\n\n@ｼﾞﾒﾝ\n\nwhen I receive [ステージ次だよーん v]\nnext costume\n\nwhen flag clicked\nshow\nswitch costume to (コスチューム2 v)\nforever\n    go to x: (0) y: (-14)\nend\n\n@☀️\n\nwhen flag clicked\ngo to x: (240) y: (200)\nset size to (400) %\n\n@ｵﾝｶﾞｸ\n\ndefine 追加　　太さ(3桁) (太さ) x(4桁) (x) y(4桁) (y) 色 (色)\nif <(length of (join (太さ) (join (x) (join (y) (色))))) = [12]> then\n    add (join (太さ) (join (x) (join (y) (色)))) to [情報\(消すな\) v]\nend\n\ndefine 分離 (?)\ndelete all of [分離後の情報 v]\nadd (join (letter (1) of (item (?) of [情報\(消すな\) v])) (join (letter (2) of (item (?) of [情報\(消すな\) v])) (letter (3) of (item (?) of [情報\(消すな\) v])))) to [分離後の情報 v]\nadd (join (join (letter (4) of (item (?) of [情報\(消すな\) v])) (letter (5) of (item (?) of [情報\(消すな\) v]))) (join (letter (6) of (item (?) of [情報\(消すな\) v])) (letter (7) of (item (?) of [情報\(消すな\) v])))) to [分離後の情報 v]\nadd (join (join (letter (8) of (item (?) of [情報\(消すな\) v])) (letter (9) of (item (?) of [情報\(消すな\) v]))) (join (letter (10) of (item (?) of [情報\(消すな\) v])) (letter (11) of (item (?) of [情報\(消すな\) v])))) to [分離後の情報 v]\nadd (letter (12) of (item (?) of [情報\(消すな\) v])) to [分離後の情報 v]\n\ndefine 点 (?)\n分離 (?)\n当たり判定\nif <(書くか) = [1]> then\n    pen up\n    if <<([abs v] of ((item (2) of [分離後の情報 v]) + (変数)) ) < ((300) + ((item (1) of [分離後の情報 v]) / (2)))> and <([abs v] of ((item (3) of [分離後の情報 v]) + (y)) ) < ((200) + ((item (1) of [分離後の情報 v]) / (2)))>> then\n        go to x: ((item (2) of [分離後の情報 v]) + (変数)) y: ((item (3) of [分離後の情報 v]) + (y))\n        set pen color to (#ffffff)\n        set pen (transparency v) to (50)\n        set pen size to ((item (1) of [分離後の情報 v]) + ((([sin v] of ((timer) * (100)) ) * (10)) + (20)))\n        pen down\n        pen up\n        set pen color to (item (item (4) of [分離後の情報 v]) of [色データ v])\n        set pen size to (item (1) of [分離後の情報 v])\n        pen down\n        pen up\n    end\nend\n\ndefine 当たり判定\nif <([sqrt v] of ((((item (2) of [分離後の情報 v]) + (変数)) * ((item (2) of [分離後の情報 v]) + (変数))) + (((item (3) of [分離後の情報 v]) + (y)) * ((item (3) of [分離後の情報 v]) + (y)))) ) < (((item (1) of [分離後の情報 v]) / (2)) + (18))> then\n    add (item (4) of [分離後の情報 v]) to [1当たったもの v]\nend\n\nwhen flag clicked\nforever\n    play sound [SUMMER_TRIANGLE v] until done\nend\n\n@👤\n\nwhen flag clicked\nshow\nset rotation style [left-right v]\nset size to (100) %\nset [ghost v] effect to (0)\ngo to x: (-182) y: (0)\ngo [backward v] (1) layers\nforever\n    switch costume to (本体 v)\n    if <(1234) = [0]> then\n        動作\n        create clone of (_myself_ v)\n    end\nend\n\nwhen I start as a clone\nrepeat (7)\n    change [ghost v] effect by (7)\n    switch costume to (bear-b v)\n    change size by (-10)\nend\ndelete this clone\n\ndefine 動作\nif <<key (left arrow v) pressed?> or <<mouse down?> and <(mouse x) < [0]>>> then\n    create clone of (_myself_ v)\n    change [x v] by (-1)\n    point in direction (-90)\nend\nif <<key (right arrow v) pressed?> or <<(x position) < (mouse x)> and <mouse down?>>> then\n    create clone of (_myself_ v)\n    change [x v] by (1.1)\n    point in direction (90)\nend\nset [x v] to ((x) * (0.9))\nchange x by (x)\nif <touching (ｼﾞﾒﾝ v)?> then\n    change y by (1)\n    if <touching (ｼﾞﾒﾝ v)?> then\n        change y by (1)\n        if <touching (ｼﾞﾒﾝ v)?> then\n            change y by (1)\n            if <touching (ｼﾞﾒﾝ v)?> then\n                change y by (1)\n                if <touching (ｼﾞﾒﾝ v)?> then\n                    change y by (1)\n                    if <touching (ｼﾞﾒﾝ v)?> then\n                        change y by (1)\n                        if <touching (ｼﾞﾒﾝ v)?> then\n                            change y by (1)\n                            if <touching (ｼﾞﾒﾝ v)?> then\n                                change y by (1)\n                                if <touching (ｼﾞﾒﾝ v)?> then\n                                    change x by ((x) * (-1))\n                                    change y by (-8)\n                                    if <<key (up arrow v) pressed?> or <<mouse down?> and <(mouse y) > [0]>>> then\n                                        if <(x) > [0]> then\n                                            set [x v] to [-7]\n                                        else\n                                            set [x v] to [7]\n                                        end\n                                        set [y v] to [14]\n                                    else\n                                        set [x v] to [0]\n                                    end\n                                end\n                            end\n                        end\n                    end\n                end\n            end\n        end\n    end\nend\nchange y by (-1)\nif <touching (ｼﾞﾒﾝ v)?> then\n    if <<key (up arrow v) pressed?> or <<mouse down?> and <(mouse y) > [0]>>> then\n        set [y v] to [14]\n    end\nend\nchange y by (1)\nchange [y v] by (-1)\nchange y by (y)\nif <touching (ｼﾞﾒﾝ v)?> then\n    change y by ((y) * (-1))\n    set [y v] to [0]\nend\nif <(x position) > [230]> then\n    broadcast (ステージ次だよーん v)\n    go to x: (-182) y: (30)\n    hide\nend\nif <touching (邪魔者 v)?> then\n    はーい、死んだー\nend\n\nwhen I receive [ステージ次だよーん v]\ngo to x: (-182) y: (30)\nshow\n\ndefine はーい、死んだー\ngo to [front v] layer\nswitch costume to (本体 v)\nset [変数 v] to [0]\npoint in direction (90)\nset rotation style [all around v]\nset [\(\(\(\(\(\(\(\( v] to (pick random (15) to (18))\nrepeat until <[-180] > (y position)>\n    show\n    go to [front v] layer\n    turn right (\(\(\(\(\(\(\(\() degrees\n    change y by (\(\(\(\(\(\(\(\()\n    change [\(\(\(\(\(\(\(\( v] by (-1)\nend\nhide\nswitch costume to (本体 v)\nwait (0.5) seconds\nset [x v] to [0]\nset [y v] to [0]\ngo to x: (-200) y: (-20)\npoint in direction (90)\nset [変数 v] to [9999]\nshow\n\n@邪魔者\n\nwhen flag clicked\nshow\nswitch costume to (コスチューム1 v)\nforever\n    go to x: (0) y: (16)\nend\n\nwhen I receive [ステージ次だよーん v]\nnext costume\n\n@サムネ用\n\nwhen flag clicked\nhide\n\n