Outline 2 || Scrolling Platformer

Instructions: This is Escaped. Your goal: escape from this dangerous dungeon. Good luck!\n\nA follow would be very appreciated :D  \n\n\n

@Stage\n\nwhen flag clicked\nset volume to (100) %\nbroadcast (スタート v)\nforever\n    play sound [smb_main-theme v] until done\nend\n\nwhen I receive [ゴール v]\nset volume to (0) %\nchange [☁ goal v] by (1)\n\n@しょざい\n\nwhen flag clicked\nhide\nbroadcast (始まり v)\n\n@地面\n\nwhen flag clicked\nhide\ngo to [front v] layer\ngo [backward v] (1) layers\n\ndefine 配置 (1) (2) (3)\nset [1 v] to (1)\nset [2 v] to (2)\nswitch costume to (3)\ncreate clone of (_myself_ v)\n\nwhen I start as a clone\n\n    set [ghost v] effect to (100)\nend\nforever\n    \nend\n\ndefine 移動 (ｘ) (ｙ)\ngo to x: (ｘ) y: (ｙ)\nif <<(x position) = (ｘ)> and <(y position) = (ｙ)>> then\n    show\nelse\n    hide\nend\n\ndefine 動く (動き)\n\nswitch costume to (16 v)\nif  then\n    set [- v] to ((0) - ((+) - (動き)))\nelse\n    set [- v] to [0]\nend\nswitch costume to (3 v)\nset [+ v] to (動き)\n移動 (((1) - (スクロールx)) + (+)) (((2) - (スクロールy)) + (yショック))\n\nwhen I receive [スタート v]\nset [ああああああああ v] to ((480) * (51))\n配置 [0] [0] [1]\n配置 [480] [0] [2]\n配置 [960] [0] [3]\n配置 [1440] [0] [4]\n配置 [1920] [0] [5]\n配置 [2400] [0] [6]\n配置 [2880] [0] [7]\n配置 [3360] [0] [8]\n配置 [3840] [0] [9]\n配置 [4320] [0] [10]\n配置 [5000] [0] [11]\n配置 [5480] [0] [12]\n配置 [5960] [0] [13]\n配置 [6440] [0] [14]\n配置 [6920] [0] [15]\n配置 [7400] [0] [16]\n配置 [7880] [0] [17]\n配置 [8360] [0] [18]\n配置 [8840] [0] [19]\n配置 [9320] [0] [20]\n配置 [9800] [0] [21]\n配置 [10280] [0] [22]\n配置 [10760] [0] [23]\n配置 [11240] [0] [24]\n配置 [11720] [0] [25]\n\nwhen I receive [切り替え v]\ndelete this clone\n\nask ((7880) + ((480) * (8))) and wait\n\n@プレイヤー\n\nwhen flag clicked\nhide\ngo to [front v] layer\ngo [backward v] (6) layers\n\nwhen I receive [スタート v]\nset [スクロールx v] to [0]\nset [スクロールy v] to [120]\nset [x2 v] to [0]\nset [y2 v] to [120]\nset [アイテム v] to []\nswitch backdrop to (空 v)\nsay []\n初期\nreset timer\nforever\n    if <(動ける？) = [0]> then\n        プログラム <<key (up arrow v) pressed?> or <<key (w v) pressed?> or <<mouse down?> and <[0] < (mouse y)>>>> <<key (down arrow v) pressed?> or <<key (s v) pressed?> or <<mouse down?> and <(mouse y) < [0]>>>> <<key (right arrow v) pressed?> or <<key (d v) pressed?> or <<mouse down?> and <[50] < (mouse x)>>>> <<key (left arrow v) pressed?> or <<key (a v) pressed?> or <<mouse down?> and <(mouse x) < [-50]>>>> <<not <touching (水 v)?>> and << (アイテム) contains [パラシュート]?> and <<(y1) < [-3]> and <<key (space v) pressed?> or <mouse down?>>>>>\n        set [pitch v] effect to (0)\n    end\nend\n\nwhen I receive [初期化 v]\nstart sound [smb_mariodies v]\nset [動ける？ v] to [1]\nswitch costume to (join [前] (キャラ))\ngo to [front v] layer\nset [y1 v] to [10]\nrepeat (20)\n    change [y1 v] by (-1)\n    turn left (5) degrees\n    change y by (y1)\n    if <(y1) < [-5]> then\n        change [ghost v] effect by (20)\n    end\nend\nhide\ngo [backward v] (50) layers\nrepeat (20)\n    change [スクロールx v] by (round (((x2) - (スクロールx)) / (4)))\n    change [スクロールy v] by (round (((y2) - (スクロールy)) / (4)))\nend\n初期\n\nwhen I receive [オンライン！ v]\nforever\n    if <(チャット) = []> then\n        say (username)\n    else\n        say (join (username) (item (チャット) of [チャット v]))\n    end\nend\n\nwhen I receive [スタート v]\n\nif <([costume name v] of [サウンドボタン v]) = [1]> then\n    set volume to (100) %\nend\n\nset volume to (0) %\n\nforever\n    wait until <touching (水 v)?>\n    set [y1 v] to [-3]\n    start sound [水1 v]\n    wait until <not <touching (水 v)?>>\n    start sound [水2 v]\nend\n\nwhen I receive [切り替え v]\nstop [other scripts in sprite v]\nhide\n\ndefine 初期\nset [x1 v] to [0]\nset [y1 v] to [0]\nset [動ける？ v] to [0]\ngo to x: (0) y: (0)\npoint in direction (90)\nclear graphic effects\nshow\n\nwhen I receive [初期化 v]\nset [なめらか v] to [16]\nset [yショック v] to (なめらか)\nset [なめらか v] to ((0) - (なめらか))\nwait (0.02) seconds\nrepeat (5)\n    set [yショック v] to (なめらか)\n    wait (0.02) seconds\n    set [なめらか v] to ((0) - ((なめらか) / (2)))\nend\nset [yショック v] to [0]\n\ndefine プログラム <上> <下> <右> <左> <パラシュート>\nswitch costume to (あたり判定1 v)\nset [x1 v] to (((x1) + (<右> - <左>)) * (氷))\nif <[11] < (x1)> then\n    set [x1 v] to [11]\nend\nif <(x1) < [-11]> then\n    set [x1 v] to [-11]\nend\nchange x by ((x1) + (-))\nrepeat (6)\n    change y by ((1) * <touching (地面 v)?>)\nend\nif <パラシュート> then\n    set [y1 v] to [-3]\nend\nif <touching (地面 v)?> then\n    if <touching (水 v)?> then\n        change y by (-6)\n    else\n        change y by (-5)\n    end\n    repeat until <not <touching (地面 v)?>>\n        change x by ((-1) * ((x1) / ([abs v] of (x1) )))\n    end\n    set x to (round (x position))\n    if <上> then\n        set [y1 v] to [15]\n        set [x1 v] to ((7) - (<[0] < (x1)> * (14)))\n    else\n        set [x1 v] to [0]\n    end\nend\nif <touching (水 v)?> then\n    change [y1 v] by (-0.2)\n    if <上> then\n        change [y1 v] by (1.5)\n        if <[7] < (y1)> then\n            set [y1 v] to [7]\n        end\n    end\nelse\n    change [y1 v] by (-0.8)\nend\nchange y by (round (y1))\nif <touching (地面 v)?> then\n    repeat until <not <touching (地面 v)?>>\n        change y by ((-1) * ((y1) / ([abs v] of (y1) )))\n    end\n    if <<上> and <<(y1) < [0]> and <not <touching (水 v)?>>>> then\n        start sound [smb_jump-small v]\n        if < (アイテム) contains [ジャンプ]?> then\n            set [y1 v] to [15]\n        else\n            set [y1 v] to [14]\n        end\n    else\n        set [y1 v] to [0]\n    end\nend\nswitch costume to (あたり判定2 v)\nif <<touching (はしご v)?> and <(y1) < [0]>> then\n    if <(触れた？) = [0]> then\n        start sound [はしご v]\n        set [触れた？ v] to [1]\n    end\n    repeat until <<not <touching (はしご v)?>> or <下>>\n        change y by (1)\n    end\n    if <上> then\n        start sound [はしご v]\n        set [y1 v] to [10.5]\n    else\n        if <下> then\n            set [y1 v] to [-3]\n        else\n            set [y1 v] to [0]\n        end\n    end\nelse\n    set [触れた？ v] to [0]\nend\nswitch costume to (あたり判定1 v)\nif <touching (バネ v)?> then\n    broadcast (バネ v)\n    set [y1 v] to [20]\nend\nif <<touching (障害物地面2 v)?> or <<(y position) < [-160]> and <(スクロールy) = [0]>>> then\n    broadcast (初期化 v)\nend\nif <touching (ゴール v)?> then\n    start sound [smb_stage_clear v]\n    broadcast (ゴール v)\nend\nchange [スクロールx v] by (round ((x position) * (0.1)))\nif <not <<(スクロールx) < [0]> or <(ああああああああ) < (スクロールx)>>> then\n    change x by ((-1) * (round ((x position) * (0.1))))\nend\nchange [スクロールy v] by (round ((y position) * (0.2)))\nif <not <(スクロールy) < [0]>> then\n    change y by ((-1) * (round ((y position) * (0.2))))\nend\nif <(スクロールx) < [0]> then\n    set [スクロールx v] to [0]\nend\nif <(ああああああああ) < (スクロールx)> then\n    set [スクロールx v] to (ああああああああ)\nend\nif <(スクロールy) < [0]> then\n    set [スクロールy v] to [0]\nend\nswitch costume to (join [前] (キャラ))\nif <上> then\n    switch costume to (join [上] (キャラ))\n    if <右> then\n        switch costume to (join [右上] (キャラ))\n    end\n    if <左> then\n        switch costume to (join [左上] (キャラ))\n    end\nelse\n    if <右> then\n        switch costume to (join [右] (キャラ))\n    end\n    if <左> then\n        switch costume to (join [左] (キャラ))\n    end\nend\nif <パラシュート> then\n    switch costume to (join [パラシュート] (キャラ))\nend\nif <(キャラ) = [8]> then\n    change [color v] effect by (1)\nend\nif <touching (ゴール v)?> then\n    set [動ける？ v] to [1]\n    broadcast (ゴール v)\n    stop [this script v]\nend\nif <(x position) < [-240]> then\n    set x to (-240)\nend\nset x to (round (x position))\nset y to (round (y position))\n\nwhen flag clicked\nset volume to (100) %\n\n@障害物地面2\n\nwhen flag clicked\nhide\ngo to [front v] layer\ngo [backward v] (1) layers\n\ndefine 配置 (1) (2) (3)\nset [1 v] to (1)\nset [2 v] to (2)\nswitch costume to (3)\ncreate clone of (_myself_ v)\n\nwhen I start as a clone\n\n    set [ghost v] effect to (100)\nend\nforever\n    \nend\n\ndefine 移動 (ｘ) (ｙ)\ngo to x: (ｘ) y: (ｙ)\nif <<(x position) = (ｘ)> and <(y position) = (ｙ)>> then\n    show\nelse\n    hide\nend\n\ndefine 動く (動き)\n\nswitch costume to (16 v)\nif  then\n    set [- v] to ((0) - ((+) - (動き)))\nelse\n    set [- v] to [0]\nend\nswitch costume to (3 v)\nset [+ v] to (動き)\n移動 (((1) - (スクロールx)) + (+)) (((2) - (スクロールy)) + (yショック))\n\nwhen I receive [スタート v]\nset [ああああああああ v] to ((480) * (50))\n配置 [0] [0] [1]\n配置 [480] [0] [2]\n配置 [960] [0] [3]\n配置 [1440] [0] [4]\n配置 [1920] [0] [5]\n配置 [2400] [0] [6]\n配置 [2880] [0] [7]\n配置 [3360] [0] [8]\n配置 [3840] [0] [9]\n配置 [4320] [0] [10]\n配置 [5000] [0] [11]\n配置 [5480] [0] [12]\n配置 [5960] [0] [13]\n配置 [6440] [0] [14]\n配置 [6920] [0] [15]\n配置 [7400] [0] [16]\n配置 [7880] [0] [17]\n配置 [8360] [0] [18]\n配置 [8840] [0] [19]\n配置 [9320] [0] [20]\n配置 [9800] [0] [21]\n配置 [10280] [0] [22]\n配置 [10760] [0] [23]\n配置 [11240] [0] [24]\n\nwhen I receive [切り替え v]\ndelete this clone\n\nask ((7880) + ((480) * (7))) and wait\n\n@ゴール\n\nwhen flag clicked\nhide\ngo to [front v] layer\ngo [backward v] (1) layers\n\ndefine 配置 (1) (2) (3)\nset [1 v] to (1)\nset [2 v] to (2)\nswitch costume to (3)\ncreate clone of (_myself_ v)\n\nwhen I start as a clone\n\n    set [ghost v] effect to (100)\nend\nforever\n    \nend\n\ndefine 移動 (ｘ) (ｙ)\ngo to x: (ｘ) y: (ｙ)\nif <<(x position) = (ｘ)> and <(y position) = (ｙ)>> then\n    show\nelse\n    hide\nend\n\ndefine 動く (動き)\n\nswitch costume to (16 v)\nif  then\n    set [- v] to ((0) - ((+) - (動き)))\nelse\n    set [- v] to [0]\nend\nswitch costume to (3 v)\nset [+ v] to (動き)\n移動 (((1) - (スクロールx)) + (+)) (((2) - (スクロールy)) + (yショック))\n\nwhen I receive [スタート v]\nset [ああああああああ v] to ((480) * (50))\n配置 [0] [0] [1]\n配置 [480] [0] [2]\n配置 [960] [0] [3]\n配置 [1440] [0] [4]\n配置 [1920] [0] [5]\n配置 [2400] [0] [6]\n配置 [2880] [0] [7]\n配置 [3360] [0] [8]\n配置 [3840] [0] [9]\n配置 [4320] [0] [10]\n配置 [5000] [0] [11]\n配置 [5480] [0] [12]\n配置 [5960] [0] [13]\n配置 [6440] [0] [14]\n配置 [6920] [0] [15]\n配置 [7400] [0] [16]\n配置 [7880] [0] [17]\n配置 [8360] [0] [18]\n配置 [8840] [0] [19]\n配置 [9320] [0] [20]\n配置 [9800] [0] [21]\n配置 [10280] [0] [22]\n配置 [10760] [0] [23]\n配置 [11240] [0] [24]\n配置 [11720] [0] [25]\n\nwhen I receive [切り替え v]\ndelete this clone\n\nask ((7880) + ((480) * (7))) and wait\n\n@スプライト1\n\nwhen flag clicked\nset [ghost v] effect to (100)\n\nwhen I receive [ゴール v]\nclear graphic effects\n\n