Emoji Platformer

Instructions: Hi, this is my game, my list platformer! use arrow keys or WAD to move.  Since i am using characters, the platformer can be a bit confusing so here is a quick explanation:\n\n'~' = ground\n'∆' = spikes\n'=' = trampoline\n'_' = empty space\n\nThat's all! Enjoy!\n\nFor all those who are wondering how this works, go here: https://scratch.mit.edu/projects/479865824

@Stage\n\nwhen flag clicked\nforever\n    play sound [BGM 名前考えてないw v] until done\nend\n\n@キャラ\n\nwhen flag clicked\ngo to x: (-193) y: (40)\nset size to (100) %\nhide variable [x v]\nhide variable [y v]\nset [x v] to [0]\nset [y v] to [0]\nset [ステージ v] to [1]\nset [動き v] to [はい]\nswitch costume to (黒2 v)\nset rotation style [left-right v]\nforever\n    if <(動き) = [はい]> then\n        プログラム\n    end\nend\n\nwhen flag clicked\nset [time v] to [0]\nrepeat until <(ステージ) = [12]>\n    wait (1) seconds\n    change [time v] by (1)\nend\n\ndefine プログラム\nchange [y v] by (-1)\nchange y by (Y)\nif <<[0] < (Y)> and <<touching color (#01d829)?> or <touching color (#b1b1b1)?>>> then\n    change y by ((0) - (Y))\nend\nif <touching color (#01d829)?> then\n    change y by ((Y) - ((Y) * (1.8)))\n    set [y v] to [0]\n    if <<<key (up arrow v) pressed?> or <key (w v) pressed?>> or <<(y position) < (mouse y)> and <mouse down?>>> then\n        start sound [High Whoosh v]\n        set [y v] to [10]\n    end\nend\nif <<<mouse down?> and <(mouse x) < (x position)>> or <<key (left arrow v) pressed?> or <key (a v) pressed?>>> then\n    change [x v] by (-0.6)\n    point in direction (-90)\nend\nif <<<mouse down?> and <(x position) < (mouse x)>> or <<key (right arrow v) pressed?> or <key (d v) pressed?>>> then\n    change [x v] by (0.6)\n    point in direction (90)\nend\nif <(Y) < [0.01]> then\n    set [x v] to ((X) * (0.96))\nelse\n    set [x v] to ((X) * (0.9))\nend\nchange x by (X)\nif <<touching color (#01d829)?> or <touching color (#b1b1b1)?>> then\n    change y by (1)\nend\nif <<touching color (#01d829)?> or <touching color (#b1b1b1)?>> then\n    change y by (1)\nend\nif <<touching color (#01d829)?> or <touching color (#b1b1b1)?>> then\n    change y by (1)\nend\nif <<touching color (#01d829)?> or <touching color (#b1b1b1)?>> then\n    change y by (1)\nend\nif <<touching color (#01d829)?> or <touching color (#b1b1b1)?>> then\n    change y by (1)\nend\nif <<touching color (#01d829)?> or <touching color (#b1b1b1)?>> 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 <<(y position) < (mouse y)> and <mouse down?>>> then\n        start sound [High Whoosh v]\n        set [y v] to [13]\n        if <(X) > [0]> then\n            set [x v] to [-5]\n        else\n            set [x v] to [5]\n        end\n    else\n        set [x v] to [0]\n    end\nend\nif <<touching color (#ee0000)?> or <(y position) < [-178]>> then\n    wait (0.01) seconds\n    set [y v] to [0]\n    set [x v] to [0]\n    hide\n    if <(ステージ) = [8]> then\n        go to x: (-200) y: (-10)\n    else\n        go to x: (-200) y: (40)\n    end\n    clear graphic effects\n    set pen (transparency v) to (0)\n    show\n    set [x v] to [0]\nend\nif <<[235] < (x position)> and <not <(ステージ) = [12]>>> then\n    broadcast (次 v)\n    hide\n    if <(ステージ) = [8]> then\n        go to x: (-200) y: (-10)\n    else\n        go to x: (-200) y: (40)\n    end\n    change [ステージ v] by (1)\n    set [x v] to [0]\n    set [y v] to [0]\n    clear graphic effects\n    show\n    wait (0.1) seconds\n    set [x v] to [0]\nend\nset y to (round (y position))\n\nwhen I receive [keke v]\n1\n\ndefine 1\nset pen color to (#000000)\nset pen size to (22)\npen down\npen up\n\n@背景書かんとね\n\nwhen flag clicked\nforever\n    erase all\n    set pen size to (1000000)\n    set pen color to (#90daff)\n    pen down\n    broadcast (keke v)\nend\n\n@地面描こうね\n\nwhen flag clicked\nbroadcast (スタート v)\n\ndefine 地面 (x) (y) (ペンの上下) (色合いは)\nif <(ペンの上下) = [1]> then\n    pen up\nelse\n    pen down\nend\nif <(色合いは) = [4]> then\n    set pen color to (#ce8a2c)\n    set pen size to (60)\nend\nif <(色合いは) = [3]> then\n    set pen color to (#0e8812)\n    set pen size to (10)\nend\nif <(色合いは) = [2]> then\n    set pen color to (#14b940)\n    set pen size to (20)\nend\nif <(色合いは) = [1]> then\n    set pen color to (#02d82a)\n    set pen size to (15)\nend\nif <(色合いは) = [6]> then\n    set pen color to (#02d82a)\n    set pen size to (10)\nend\nif <(色合いは) = [5]> then\n    set pen color to (#ef0000)\n    set pen size to (30)\nend\nif <(色合いは) = [7]> then\n    set pen color to (#ef0000)\n    set pen size to (15)\nend\nif <(色合いは) = [8]> then\n    set pen color to (#b9b9b9)\n    set pen size to (15)\nend\ngo to x: (x) y: (y)\n\nwhen I receive [次 v]\nforever\n    if <(ステージ) = [2]> then\n        地面 [-250] [-160] [1] [4]\n        地面 [300] [-160] [2] [4]\n        地面 [-250] [-130] [1] [3]\n        地面 [300] [-130] [2] [3]\n        地面 [-250] [-120] [1] [2]\n        地面 [300] [-120] [2] [2]\n        地面 [-250] [-115] [1] [1]\n        地面 [300] [-115] [2] [1]\n        地面 [-250] [-115] [1] [1]\n        地面 [300] [-115] [2] [1]\n        地面 [-130] [-115] [1] [1]\n        地面 [-130] [-30] [2] [1]\n        地面 [-10] [-115] [1] [1]\n        地面 [-10] [10] [2] [1]\n        地面 [110] [-115] [1] [1]\n        地面 [110] [100] [2] [1]\n    end\n    if <(ステージ) = [3]> then\n        地面 [50] [-110] [1] [5]\n        地面 [250] [-110] [2] [5]\n        地面 [-250] [-160] [1] [4]\n        地面 [300] [-160] [2] [4]\n        地面 [-250] [-130] [1] [3]\n        地面 [300] [-130] [2] [3]\n        地面 [-250] [-120] [1] [2]\n        地面 [300] [-120] [2] [2]\n        地面 [-250] [-115] [1] [1]\n        地面 [300] [-115] [2] [1]\n        地面 [-100] [250] [1] [1]\n        地面 [-100] [-70] [2] [1]\n        地面 [-25] [-115] [1] [1]\n        地面 [-25] [-20] [2] [1]\n        pen up\n        set pen color to (#01d829)\n        set pen size to (7)\n        go to x: (90) y: ((縦移動変数) - (30))\n        pen down\n        change x by (120)\n        go to x: ((15) + (x position)) y: ((30) + (y position))\n        go to x: (70) y: (縦移動変数)\n        go to x: ((15) + (x position)) y: ((-30) + (y position))\n    end\n    if <(ステージ) = [4]> then\n        地面 [-25] [-110] [1] [5]\n        地面 [25] [-110] [2] [5]\n        地面 [130] [-110] [1] [5]\n        地面 [250] [-110] [2] [5]\n        地面 [-250] [-160] [1] [4]\n        地面 [300] [-160] [2] [4]\n        地面 [-250] [-130] [1] [3]\n        地面 [300] [-130] [2] [3]\n        地面 [-250] [-120] [1] [2]\n        地面 [300] [-120] [2] [2]\n        地面 [-250] [-115] [1] [1]\n        地面 [300] [-115] [2] [1]\n        地面 [-120] [-90] [1] [6]\n        地面 [-120] [-40] [2] [6]\n        地面 [-40] [-40] [2] [6]\n        地面 [-40] [-90] [2] [6]\n        地面 [-120] [-90] [2] [6]\n        地面 [35] [-70] [1] [6]\n        地面 [35] [60] [2] [6]\n        地面 [110] [60] [2] [6]\n        地面 [110] [-70] [2] [6]\n        地面 [35] [-70] [2] [6]\n    end\n    if <(ステージ) = [5]> then\n        地面 [-45] [-110] [1] [5]\n        地面 [300] [-110] [2] [5]\n        地面 [-250] [-160] [1] [4]\n        地面 [300] [-160] [2] [4]\n        地面 [-250] [-130] [1] [3]\n        地面 [300] [-130] [2] [3]\n        地面 [-250] [-120] [1] [2]\n        地面 [300] [-120] [2] [2]\n        地面 [-250] [-115] [1] [1]\n        地面 [300] [-115] [2] [1]\n        地面 [-110] [-90] [1] [6]\n        地面 [-110] [-80] [2] [6]\n        地面 [-60] [-80] [2] [6]\n        地面 [-10] [-50] [1] [6]\n        地面 [-10] [-40] [2] [6]\n        地面 [40] [-40] [2] [6]\n        地面 [90] [-10] [1] [6]\n        地面 [90] [0] [2] [6]\n        地面 [140] [0] [2] [6]\n        地面 [175] [-110] [1] [6]\n        地面 [175] [120] [2] [6]\n        地面 [-70] [120] [2] [6]\n        地面 [60] [50] [1] [6]\n        地面 [60] [60] [2] [6]\n        地面 [-110] [60] [2] [6]\n    end\n    if <(ステージ) = [6]> then\n        pen up\n        set pen color to (#ef0000)\n        set pen size to (7)\n        go to x: (-20) y: (縦移動変数2 red)\n        pen down\n        change x by (-70)\n        change y by (-120)\n        go to x: (-20) y: ((縦移動変数2 red) - (120))\n        change y by (120)\n        pen up\n        set pen color to (#ef0000)\n        set pen size to (7)\n        go to x: (160) y: ((縦移動変数2 red) * (-1))\n        pen down\n        change x by (-70)\n        change y by (-120)\n        go to x: (160) y: (((縦移動変数2 red) * (-1)) - (120))\n        change y by (120)\n        地面 [-250] [-160] [1] [4]\n        地面 [300] [-160] [2] [4]\n        地面 [-250] [-130] [1] [3]\n        地面 [300] [-130] [2] [3]\n        地面 [-250] [-120] [1] [2]\n        地面 [300] [-120] [2] [2]\n        地面 [-250] [-115] [1] [1]\n        地面 [300] [-115] [2] [1]\n        地面 [-150] [-115] [1] [1]\n        地面 [-150] [-10] [2] [1]\n        地面 [240] [-115] [1] [1]\n        地面 [240] [80] [2] [1]\n        地面 [35] [-115] [1] [1]\n        地面 [35] [-50] [2] [1]\n        地面 [35] [-10] [1] [1]\n        地面 [35] [300] [2] [1]\n    end\n    if <(ステージ) = [7]> then\n        地面 [5] [-200] [1] [7]\n        地面 [5] [-80] [2] [7]\n        地面 [115] [-200] [1] [7]\n        地面 [115] [-50] [2] [7]\n        地面 [50] [230] [1] [7]\n        地面 [50] [50] [2] [7]\n        地面 [210] [230] [1] [7]\n        地面 [210] [-30] [2] [7]\n        地面 [-250] [-115] [1] [1]\n        地面 [-100] [-115] [2] [1]\n        地面 [-100] [-200] [2] [1]\n        地面 [10] [-200] [1] [6]\n        地面 [10] [-50] [2] [6]\n        地面 [120] [-200] [1] [6]\n        地面 [120] [70] [2] [6]\n        地面 [210] [-200] [1] [6]\n        地面 [210] [-130] [2] [6]\n    end\n    if <(ステージ) = [8]> then\n        地面 [-120] [-105] [1] [7]\n        地面 [-75] [-105] [2] [7]\n        地面 [100] [-60] [1] [7]\n        地面 [300] [-60] [2] [7]\n        地面 [300] [100] [2] [7]\n        地面 [-250] [-160] [1] [4]\n        地面 [300] [-160] [2] [4]\n        地面 [-250] [-130] [1] [3]\n        地面 [300] [-130] [2] [3]\n        地面 [-250] [-120] [1] [2]\n        地面 [300] [-120] [2] [2]\n        地面 [-250] [-115] [1] [1]\n        地面 [300] [-115] [2] [1]\n        地面 [-140] [-115] [1] [1]\n        地面 [-140] [-60] [2] [1]\n        地面 [-55] [-115] [1] [1]\n        地面 [-55] [-30] [2] [1]\n        地面 [40] [-115] [1] [1]\n        地面 [40] [-70] [2] [1]\n        地面 [250] [-70] [2] [1]\n        pen up\n        set pen color to (#01d829)\n        set pen size to (7)\n        go to x: (90) y: (縦移動変数)\n        pen down\n        change x by (140)\n        change y by (-30)\n        go to x: (90) y: ((縦移動変数) - (30))\n        change y by (30)\n    end\n    if <(ステージ) = [9]> then\n        地面 [-75] [-105] [1] [7]\n        地面 [195] [-105] [2] [7]\n        地面 [-25] [100] [1] [7]\n        地面 [35] [100] [2] [7]\n        地面 [95] [100] [1] [7]\n        地面 [155] [100] [2] [7]\n        地面 [-250] [-160] [1] [4]\n        地面 [300] [-160] [2] [4]\n        地面 [-250] [-130] [1] [3]\n        地面 [300] [-130] [2] [3]\n        地面 [-250] [-120] [1] [2]\n        地面 [300] [-120] [2] [2]\n        地面 [-250] [-115] [1] [1]\n        地面 [300] [-115] [2] [1]\n        地面 [-120] [-90] [1] [6]\n        地面 [-120] [-75] [2] [6]\n        地面 [-60] [-75] [2] [6]\n        地面 [-5] [-50] [1] [6]\n        地面 [-5] [-35] [2] [6]\n        地面 [55] [-35] [2] [6]\n        地面 [110] [-10] [1] [6]\n        地面 [110] [5] [2] [6]\n        地面 [170] [5] [2] [6]\n        地面 [210] [-115] [1] [6]\n        地面 [210] [120] [2] [6]\n        地面 [210] [95] [1] [6]\n        地面 [-100] [95] [2] [6]\n        地面 [50] [35] [1] [6]\n        地面 [0] [35] [2] [6]\n        地面 [0] [45] [2] [6]\n        地面 [-50] [35] [1] [6]\n        地面 [-100] [35] [2] [6]\n        地面 [-100] [45] [2] [6]\n        地面 [-150] [35] [1] [6]\n        地面 [-200] [35] [2] [6]\n        地面 [-200] [45] [2] [6]\n    end\n    if <(ステージ) = [10]> then\n        pen up\n        set pen size to (100)\n        set pen color to (#ef0000)\n        go to x: (-250) y: (縦移動変数3)\n        pen down\n        change x by (500)\n        pen up\n        set pen color to (#b1b1b1)\n        set pen size to (10)\n        鉄橋 [-65] [20] \n        鉄橋 [60] [60] \n        鉄橋 [185] [100] \n        地面 [-250] [-115] [1] [1]\n        地面 [-150] [-115] [2] [1]\n        地面 [-70] [20] [1] [1]\n        地面 [-10] [20] [2] [1]\n        地面 [55] [70] [1] [1]\n        地面 [115] [70] [2] [1]\n        地面 [180] [115] [1] [1]\n        地面 [240] [115] [2] [1]\n    end\n    if <(ステージ) = [11]> then\n        地面 [125] [-115] [1] [7]\n        地面 [125] [-25] [2] [7]\n        地面 [225] [-115] [1] [7]\n        地面 [225] [60] [2] [7]\n        地面 [-130] [-105] [1] [7]\n        地面 [-130] [-80] [2] [7]\n        地面 [-20] [-105] [1] [7]\n        地面 [-20] [-80] [2] [7]\n        地面 [-250] [-160] [1] [4]\n        地面 [300] [-160] [2] [4]\n        地面 [-250] [-130] [1] [3]\n        地面 [300] [-130] [2] [3]\n        地面 [-250] [-120] [1] [2]\n        地面 [300] [-120] [2] [2]\n        地面 [-250] [-115] [1] [1]\n        地面 [300] [-115] [2] [1]\n        地面 [30] [-115] [1] [1]\n        地面 [30] [-40] [2] [1]\n        地面 [80] [-40] [2] [1]\n        地面 [80] [-115] [2] [1]\n        地面 [130] [-115] [1] [1]\n        地面 [130] [40] [2] [1]\n        地面 [180] [40] [2] [1]\n        地面 [180] [-115] [2] [1]\n        地面 [230] [-115] [1] [1]\n        地面 [230] [120] [2] [1]\n        地面 [280] [120] [2] [1]\n        地面 [280] [-115] [2] [1]\n    end\n    if <(ステージ) = [12]> then\n        地面 [-250] [-160] [1] [4]\n        地面 [300] [-160] [2] [4]\n        地面 [-250] [-130] [1] [3]\n        地面 [300] [-130] [2] [3]\n        地面 [-250] [-120] [1] [2]\n        地面 [300] [-120] [2] [2]\n        地面 [-250] [-115] [1] [1]\n        地面 [300] [-115] [2] [1]\n        地面 [300] [300] [2] [1]\n        地面 [-90] [110] [1] [6]\n        地面 [-130] [110] [2] [6]\n        地面 [-130] [55] [2] [6]\n        地面 [-90] [55] [2] [6]\n        地面 [-90] [80] [2] [6]\n        地面 [-110] [80] [2] [6]\n        地面 [-40] [110] [1] [6]\n        地面 [-40] [55] [2] [6]\n        地面 [0] [55] [2] [6]\n        地面 [0] [110] [2] [6]\n        地面 [-40] [110] [2] [6]\n        地面 [60] [110] [1] [6]\n        地面 [40] [55] [2] [6]\n        地面 [60] [110] [1] [6]\n        地面 [80] [55] [2] [6]\n        地面 [45] [70] [1] [6]\n        地面 [70] [70] [2] [6]\n        地面 [120] [110] [1] [6]\n        地面 [120] [55] [2] [6]\n        地面 [160] [55] [2] [6]\n    end\nend\n\nwhen flag clicked\nset [縦移動変数 v] to [0]\nforever\n    repeat until <(縦移動変数) < [-59]>\n        change [縦移動変数 v] by (((-70) - (縦移動変数)) / (30))\n    end\n    wait (0.1) seconds\n    repeat until <[85] < (縦移動変数)>\n        change [縦移動変数 v] by (((90) - (縦移動変数)) / (30))\n    end\n    wait (0.1) seconds\nend\n\nwhen I receive [スタート v]\nforever\n    if <(ステージ) = [1]> then\n        地面 [-250] [-160] [1] [4]\n        地面 [300] [-160] [2] [4]\n        地面 [-250] [-130] [1] [3]\n        地面 [300] [-130] [2] [3]\n        地面 [-250] [-120] [1] [2]\n        地面 [300] [-120] [2] [2]\n        地面 [-250] [-115] [1] [1]\n        地面 [300] [-115] [2] [1]\n    end\nend\n\nwhen flag clicked\nset [縦移動変数2 red v] to [0]\nwait (2) seconds\nforever\n    repeat until <(縦移動変数2 red) < [-49]>\n        change [縦移動変数2 red v] by (((-55) - (縦移動変数2 red)) / (30))\n    end\n    wait (0.1) seconds\n    repeat until <[49] < (縦移動変数2 red)>\n        change [縦移動変数2 red v] by (((60) - (縦移動変数2 red)) / (30))\n    end\n    wait (0.1) seconds\nend\n\nwhen flag clicked\nset [縦移動変数3 v] to [0]\nforever\n    repeat until <(縦移動変数3) < [-169]>\n        change [縦移動変数3 v] by (((-180) - (縦移動変数3)) / (50))\n    end\n    wait (0.1) seconds\n    repeat until <[-129] < (縦移動変数3)>\n        change [縦移動変数3 v] by (((-120) - (縦移動変数3)) / (50))\n    end\n    wait (0.1) seconds\nend\n\ndefine 鉄橋 (x) (y) \ngo to x: (x) y: (-180)\npen down\nset y to (y)\npen up\ngo to x: ((x) + (50)) y: (-180)\npen down\nset y to (y)\npen up\nset y to (-180)\n1 (x) (y)\n\ndefine 1 (x) (y)\nset x to (x)\npen down\ngo to x: ((x) + (50)) y: ((y position) + (40))\nchange y by (-40)\ngo to x: (x) y: ((y position) + (40))\npen up\nchange y by (10)\nset x to (x)\npen down\ngo to x: ((x) + (50)) y: ((y position) + (40))\nchange y by (-40)\ngo to x: (x) y: ((y position) + (40))\npen up\nchange y by (10)\nset x to (x)\npen down\ngo to x: ((x) + (50)) y: ((y position) + (40))\nchange y by (-40)\ngo to x: (x) y: ((y position) + (40))\npen up\nchange y by (10)\nset x to (x)\npen down\ngo to x: ((x) + (50)) y: ((y position) + (40))\nchange y by (-40)\ngo to x: (x) y: ((y position) + (40))\npen up\nchange y by (10)\nif <[59] < (y)> then\n    set x to (x)\n    pen down\n    go to x: ((x) + (50)) y: ((y position) + (40))\n    change y by (-40)\n    go to x: (x) y: ((y position) + (40))\n    pen up\n    change y by (10)\n    if <[99] < (y)> then\n        set x to (x)\n        pen down\n        go to x: ((x) + (50)) y: ((y position) + (40))\n        change y by (-40)\n        go to x: (x) y: ((y position) + (40))\n        pen up\n        change y by (10)\n    end\nend\n\n@タイム表示\n\nwhen I start as a clone\nshow\ngo to [front v] layer\nwait (0.01) seconds\ndelete this clone\n\nwhen flag clicked\nrepeat until <(ステージ) = [12]>\n    hide\n    go to [front v] layer\n    set [場所 v] to [1]\n    ちめ\n    go to x: (-220) y: (150)\nend\n\ndefine ちめ\nrepeat (length of (Time))\n    switch costume to (letter (場所) of (Time))\n    create clone of (_myself_ v)\n    change [場所 v] by (1)\n    change x by (25)\nend\n\n@サムネ\n\nwhen flag clicked\nhide\nforever\n    reset timer\nend\n\nwhen [timer v] > (0.01)\nshow\n\n