TNTend [A mobile friendly platformer]

Instructions: Difficulty level ★★★☆☆\nPlease ♡&☆,follow!!\n\n〓How to play〓\n\n　◇PC◇\n←→keys to move\n↑keys to jump \n\n◇mobile |tablet◇\ntap left | right move \nTap the top to jump

@Stage\n\nwhen flag clicked\nforever\n    play sound [Alan Walker - Force \[NCS Release\].mp3 v] until done\nend\n\nwhen flag clicked\nforever\n    if <(LEVEL) = [1]> then\n        switch backdrop to (背景1 v)\n    else\n        if <(LEVEL) = [2]> then\n            switch backdrop to (背景2 v)\n        else\n            switch backdrop to (背景3 v)\n        end\n    end\nend\n\n@:P\n\nwhen flag clicked\nshow\npoint in direction (90)\ngo to x: (0) y: (0)\nwait (1) seconds\nrepeat (5)\n    change [ghost v] effect by (5)\nend\nbroadcast (Play game v)\nrepeat (15)\n    change [ghost v] effect by (5)\nend\nforever\n    go to [front v] layer\nend\n\n@player\n\nwhen I receive [play game v]\nset [usedskip? v] to [0]\nset [mobileskip v] to [0]\nset [level v] to [1]\nshow\nforever\n    broadcast (Reset v) and wait\n    broadcast (Setup v) and wait\n    Game on\n    repeat until <(EXIT) > []>\n        broadcast (Tick v)\n        Tick\n    end\n    if <(EXIT) = [A win win]> then\n        broadcast (win YOO XD v)\n        GameWinYOO\n    else\n        if <not <(LEVEL) = [7]>> then\n            Game - die boi boi I’m fed\n        end\n    end\nend\n\ndefine Game on\nswitch costume to (front v)\nset rotation style [left-right v]\npoint in direction (-90)\nset [scroll x v] to [0]\nset [scroll y v] to [0]\nset [x v] to [-100]\nset [y v] to [78]\nset [speedy v] to [0]\nset [sx v] to [0]\nset [in air v] to [0]\nset [exit v] to []\nset size to (100) %\nset [ghost v] effect to (0)\nshow\n\ndefine Tick\nswitch costume to (hitbox v)\npoint in direction (90)\nif <<key (right arrow v) pressed?> or <key (d v) pressed?>> then\n    change [sx v] by (2)\nend\nif <<not <(touchskip?) = [1]>> and <<mouse down?> and <(mouse x) > (x position)>>> then\n    change [sx v] by (2)\nend\nif <<key (left arrow v) pressed?> or <key (a v) pressed?>> then\n    change [sx v] by (-2)\nend\nif <<not <(touchskip?) = [1]>> and <<mouse down?> and <(mouse x) < (x position)>>> then\n    change [sx v] by (-2)\nend\nset [sx v] to ((sx) * (0.8))\nif <([abs v] of (sx) ) > [0.9]> then\n    Change player x by (round (sx))\nend\nif <<<key (up arrow v) pressed?> or <key (w v) pressed?>> or <<mouse down?> and <(y position) < (mouse y)>>> then\n    if <(In air) < [4]> then\n        set [speedy v] to [16]\n    end\nend\nif <(Speedy) > [-20]> then\n    change [speedy v] by (-1.5)\nend\nChange player y by (Speedy)\nDie? I think so\nchange [scroll x v] by (round (((x) - (SCROLL X)) / (8)))\nif <(SCROLL X) < [0]> then\n    set [scroll x v] to [0]\nend\nif <(SCROLL Y) < [0]> then\n    set [scroll y v] to [0]\nend\nchange [scroll y v] by (round (((y) - (SCROLL Y)) / (8)))\nPosition\nif <touching (trampoline v)?> then\n    set [speedy v] to [30]\nend\nif <<key (right arrow v) pressed?> or <<key (d v) pressed?> or <<mouse down?> and <(mouse x) > (x position)>>>> then\n    switch costume to (normal2 v)\nelse\n    if <<<key (left arrow v) pressed?> or <key (a v) pressed?>> or <<mouse down?> and <(mouse x) < (x position)>>> then\n        switch costume to (normal3 v)\n    else\n        switch costume to (normal v)\n    end\nend\nif <<<<(y position) < (mouse y)> and <mouse down?>> or <<key (up arrow v) pressed?> or <key (w v) pressed?>>> and <<<(mouse x) < (x position)> and <mouse down?>> or <<key (left arrow v) pressed?> or <key (a v) pressed?>>>> then\n    switch costume to (normal5 v)\nend\nif <<<<(y position) < (mouse y)> and <mouse down?>> or <<key (up arrow v) pressed?> or <key (w v) pressed?>>> and <<<(x position) < (mouse x)> and <mouse down?>> or <<key (right arrow v) pressed?> or <key (d v) pressed?>>>> then\n    switch costume to (normal4 v)\nend\n\ndefine Change player y by (sy)\nchange [y v] by (sy)\nchange [in air v] by (1)\nPosition\nrepeat until <not <touching (ground  v)?>>\n    if <(sy) > [0]> then\n        change [y v] by (-1)\n    else\n        change [y v] by (1)\n        set [in air v] to [0]\n    end\n    Position\n    set [speedy v] to [0]\nend\n\ndefine Position\ngo to x: ((x) - (SCROLL X)) y: ((y) - (SCROLL Y))\n\ndefine Change player x by (sx)\nchange [x v] by (sx)\nPosition\nif <touching (ground  v)?> then\n    repeat (12)\n        change [y v] by (1)\n        Position\n        if <not <touching (ground  v)?>> then\n            stop [this script v]\n        end\n    end\n    change [y v] by (-12)\n    repeat until <not <touching (ground  v)?>>\n        if <(sx) > [0]> then\n            change [x v] by (-1)\n        else\n            change [x v] by (1)\n        end\n        Position\n    end\nend\n\ndefine Game - die boi boi I’m fed\nset [dead? v] to [1]\nset [ghost v] effect to (0)\nstart sound [Bonk v]\nset [y v v] to [15]\nrepeat until <(y position) < [-90]>\n    set rotation style [all around v]\n    change [ghost v] effect by (3)\n    switch costume to (front v)\n    go to [front v] layer\n    turn right (10) degrees\n    change y by (Y v)\n    change [y v v] by (-1)\nend\nrepeat until <(y position) < [-178]>\n    set rotation style [all around v]\n    change [ghost v] effect by (5)\n    go to [front v] layer\n    turn right (10) degrees\n    change y by (Y v)\n    change [y v v] by (-1)\nend\nset [dead? v] to [0]\nbroadcast (ded boiz v)\nhide\n\ndefine Die? I think so\nif <<<<<touching (die  v)?> or <(SCROLL Y) < [-20]>> or <touching (lava v)?>> or <touching (die 2 v)?>> or <touching (saws v)?>> then\n    set [exit v] to [Die \(other way\)]\nend\n\ndefine GameWinYOO\n\n\nwhen flag clicked\nset [dead? v] to [0]\nhide\n\n@Mountains\n\nwhen I start as a clone\nset [ghost v] effect to (0)\nforever\n    go to x: ((((costume [number v]) - (1)) * (480)) + ((SCROLL X) / (-5))) y: ((SCROLL Y) / (-5))\n    set [brightness v] effect to (-10)\n    if <(LEVEL) = [1]> then\n        show\n    else\n        hide\n    end\nend\n\ndefine heyo\nrepeat (10)\n    create clone of (_myself_ v)\n    next costume\nend\n\nwhen flag clicked\nset [level v] to [1]\nhide\nheyo\nforever\n    go to [back v] layer\nend\n\nwhen I start as a clone\nshow\nforever\n    go to [back v] layer\nend\n\n@ground \n\nwhen I receive [tick v]\nPosition ((x) - (SCROLL X)) ((y) - (SCROLL Y))\n\nwhen I receive [setup v]\nset [y v] to [0]\nset [x v] to [0]\nif <(LEVEL) = [1]> then\n    switch costume to (costume1 v)\n    Position x: [450] y: [0]\n    Position x: [450] y: [0]\n    Position x: [700] y: [0]\nelse\n    if <(LEVEL) = [2]> then\n        switch costume to (コスチューム4 v)\n        Position x: [450] y: [0]\n        Position x: [450] y: [0]\n        Position x: [450] y: [0]\n        Position x: [450] y: [0]\n        Position x: [450] y: [0]\n    else\n        if <(LEVEL) = [3]> then\n            switch costume to (costume31 v)\n            Position x: [450] y: [0]\n            Position x: [450] y: [0]\n            Position x: [450] y: [0]\n            Position x: [450] y: [0]\n            Position x: [800] y: [0]\n        end\n    end\nend\n\ndefine Position (x) (y)\ngo to x: (x) y: (y)\nif <<(x) = (x position)> and <(y) = (y position)>> then\n    show\nelse\n    hide\nend\n\nwhen I receive [reset v]\ndelete this clone\n\ndefine Position x: (x) y: (y)\nhide\ncreate clone of (_myself_ v)\nchange [x v] by (x)\nchange [y v] by (y)\nnext costume\n\nwhen flag clicked\nhide\n\nwhen I receive [win yoo xd v]\nif <(LEVEL) = [3]> then\n    go to [front v] layer\nend\n\n@kannban\n\nwhen flag clicked\nhide\n\nwhen I receive [reset v]\ndelete this clone\n\nwhen I receive [tick v]\nPosition ((x) - (SCROLL X)) ((y) - (SCROLL Y))\n\ndefine Position (x) (y)\ngo to x: (x) y: (y)\nif <<(x) = (x position)> and <(y) = (y position)>> then\n    show\nelse\n    hide\nend\n\nwhen I receive [setup v]\nset [y v] to [0]\nset [x v] to [0]\nif <(LEVEL) = [1]> then\n    switch costume to (コスチューム1 v)\n    Position x: [450] y: [0]\n    Position x: [900] y: [0]\nelse\n    if <(LEVEL) = [2]> then\n        switch costume to (コスチューム4 v)\n        Position x: [1800] y: []\n    else\n        if <(LEVEL) = [3]> then\n            switch costume to (コスチューム5 v)\n        end\n    end\nend\n\ndefine Position x: (x) y: (y)\nhide\ncreate clone of (_myself_ v)\nchange [x v] by (x)\nchange [y v] by (y)\nnext costume\n\n@kage\n\nwhen flag clicked\ngo to [front v] layer\nhide\n\nwhen I receive [reset v]\nif <(LEVEL) = [3]> then\n    go to [back v] layer\nend\ndelete this clone\n\nwhen I receive [tick v]\nPosition ((x) - (SCROLL X)) ((y) - (SCROLL Y))\n\ndefine Position (x) (y)\ngo to x: (x) y: (y)\nif <<(x) = (x position)> and <(y) = (y position)>> then\n    show\nelse\n    hide\nend\n\nwhen I receive [setup v]\nset [y v] to [0]\nset [x v] to [0]\nif <(LEVEL) = [1]> then\n    switch costume to (コスチューム2 v)\n    Position x: [450] y: [0]\n    Position x: [450] y: [0]\n    Position x: [700] y: [0]\nelse\n    if <(LEVEL) = [2]> then\n        switch costume to (コスチューム5 v)\n        Position x: [450] y: [0]\n        Position x: [450] y: [0]\n        Position x: [450] y: [0]\n    else\n        switch costume to (コスチューム10 v)\n        Position x: [450] y: [0]\n        Position x: [200] y: [0]\n        Position x: [300] y: [0]\n        Position x: [300] y: [0]\n        Position x: [300] y: [0]\n        Position x: [200] y: [0]\n        Position x: [700] y: [0]\n    end\nend\n\ndefine Position x: (x) y: (y)\nhide\ncreate clone of (_myself_ v)\nchange [x v] by (x)\nchange [y v] by (y)\nnext costume\n\n@die \n\nwhen flag clicked\nhide\n\nwhen I receive [reset v]\ndelete this clone\n\nwhen I receive [tick v]\nPosition ((x) - (SCROLL X)) ((y) - (SCROLL Y))\n\nwhen I receive [setup v]\nset [y v] to [0]\nset [x v] to [0]\nif <(LEVEL) = [1]> then\n    switch costume to (コスチューム1 v)\n    Position x: [600] y: [0]\nelse\n    if <(LEVEL) = [2]> then\n        switch costume to (コスチューム3 v)\n        Position x: [900] y: [0]\n        Position x: [450] y: [0]\n    else\n        switch costume to (コスチューム6 v)\n        Position x: [1000] y: [0]\n    end\nend\n\ndefine Position (x) (y)\ngo to x: (x) y: (y)\nif <<(x) = (x position)> and <(y) = (y position)>> then\n    show\nelse\n    hide\nend\n\ndefine Position x: (x) y: (y)\nhide\ncreate clone of (_myself_ v)\nchange [x v] by (x)\nchange [y v] by (y)\nnext costume\n\n@die 2\n\nwhen I start as a clone\nif <not <<(EXIT) = [A win win]> or <(dead?) = [1]>>> then\n    clear graphic effects\n    show\n    set [y v] to [180]\n    repeat (20)\n        change [y v] by (-20)\n    end\n    set [y v] to [180]\n    delete this clone\nend\n\nwhen flag clicked\nforever\n    create clone of (_myself_ v)\n    wait (1.5) seconds\nend\n\ndefine Position x: (x) y: (y)\nhide\nchange [x v] by (x)\nchange [y v] by (y)\n\nwhen I receive [reset v]\ndelete this clone\n\nwhen I receive [tick v]\nPosition ((x) - (SCROLL X)) ((y) - (SCROLL Y))\n\ndefine Position (x) (y)\ngo to x: (x) y: (y)\nif <<(x) = (x position)> and <(y) = (y position)>> then\nelse\n    hide\nend\n\nwhen I receive [setup v]\nset [y v] to [0]\nset [x v] to [0]\nif <(LEVEL) = [1]> then\n    Position x: [1330] y: []\nelse\n    if <(LEVEL) = [2]> then\n        Position x: [1700] y: [0]\n    else\n        if <(LEVEL) = [3]> then\n            Position x: [1250] y: []\n        end\n    end\nend\n\n@Goal\n\nwhen I receive [tick v]\nPosition ((Goal: x) - (SCROLL X)) ((Goal: y) - (SCROLL Y))\nif <touching (player v)?> then\n    set [exit v] to [A win win]\nend\n\nwhen I receive [setup v]\nhide\nset [goal: y v] to [0]\nset [goal: x v] to [0]\nwait (0) seconds\nif <(LEVEL) = [1]> then\n    switch costume to (コスチューム1 v)\n    Clone x: [1850] y: [-20]\nelse\n    if <(LEVEL) = [2]> then\n        switch costume to (コスチューム2 v)\n        Clone x: [2400] y: [-20]\n    else\n        Clone x: [10000] y: []\n    end\nend\n\ndefine Position (x) (y)\ngo to x: (x) y: (y)\nif <<(x) = (x position)> and <(y) = (y position)>> then\n    show\nelse\n    hide\nend\n\nwhen I receive [reset v]\ndelete this clone\n\ndefine Clone x: (x) y: (y)\nset [goal: x v] to (x)\nset [goal: y v] to (y)\n\nwhen I receive [open portal v]\nswitch costume to (1 v)\n\nwhen flag clicked\nset [tu v] to [0]\nhide\n\nwhen I receive [play game v]\ngo to [back v] layer\nshow\n\n@fade\n\nwhen flag clicked\nhide\n\nwhen I start as a clone\nshow\nwait (0.7) seconds\nrepeat (10)\n    change [ghost v] effect by (10)\nend\nhide\nclear graphic effects\ndelete this clone\n\nwhen I receive [ded boiz v]\ncreate clone of (_myself_ v)\n\nwhen I start as a clone\nforever\n    go to [front v] layer\nend\n\n@Mountains2\n\nwhen I start as a clone\nset [ghost v] effect to (0)\nforever\n    go to x: ((((costume [number v]) - (1)) * (480)) + ((SCROLL X) / (-5))) y: ((SCROLL Y) / (-5))\n    set [brightness v] effect to (-5)\nend\n\ndefine heyo\nrepeat (10)\n    create clone of (_myself_ v)\n    next costume\nend\n\nwhen flag clicked\nhide\nheyo\nforever\n    go to [back v] layer\nend\n\nwhen I start as a clone\nshow\nforever\n    go to [back v] layer\n    if <(LEVEL) = [2]> then\n        show\n    else\n        hide\n    end\nend\n\n@lava\n\nwhen flag clicked\nhide\n\nwhen I receive [reset v]\ndelete this clone\n\nwhen I receive [tick v]\nPosition ((x) - (SCROLL X)) ((y) - (SCROLL Y))\n\ndefine Position (x) (y)\ngo to x: (x) y: (y)\nif <<(x) = (x position)> and <(y) = (y position)>> then\n    show\nelse\n    hide\nend\n\ndefine Position x: (x) y: (y)\nhide\ncreate clone of (_myself_ v)\nchange [x v] by (x)\nchange [y v] by (y)\nnext costume\n\nwhen I receive [setup v]\nset [y v] to [0]\nset [x v] to [0]\nif <(LEVEL) = [1]> then\n    switch costume to (コスチューム1 v)\nelse\n    if <(LEVEL) = [2]> then\n        switch costume to (コスチューム2 v)\n        Position x: [450] y: [0]\n    else\n        switch costume to (コスチューム4 v)\n        Position x: [450] y: [0]\n        Position x: [900] y: [0]\n    end\nend\n\n@Mountains3\n\nwhen I start as a clone\nset [ghost v] effect to (0)\nforever\n    go to x: ((((costume [number v]) - (1)) * (480)) + ((SCROLL X) / (-5))) y: ((SCROLL Y) / (-5))\n    set [brightness v] effect to (-5)\nend\n\ndefine heyo\nrepeat (10)\n    create clone of (_myself_ v)\n    next costume\nend\n\nwhen flag clicked\nhide\nheyo\nforever\n    go to [back v] layer\nend\n\nwhen I start as a clone\nshow\nforever\n    go to [back v] layer\n    if <(LEVEL) = [3]> then\n        show\n    else\n        hide\n    end\nend\n\n@Saws\n\nwhen I start as a clone\ngo to [back v] layer\nshow\nforever\n    point in direction ((90) + (([sin v] of ((line) * (2)) ) * (300)))\nend\n\nwhen flag clicked\nhide\ngo to [back v] layer\nforever\n    change [line v] by (1)\nend\n\nwhen I receive [tick v]\nPosition ((x) - (SCROLL X)) ((y) - (SCROLL Y))\n\ndefine Clone x: (x) y: (y)\nset [x v] to (x)\nset [y v] to (y)\nchange [collected max v] by (1)\ncreate clone of (_myself_ v)\n\ndefine Position (x) (y)\ngo to x: (x) y: (y)\nif <<(x) = (x position)> and <(y) = (y position)>> then\n    show\nelse\n    hide\nend\n\nwhen I receive [reset v]\ndelete this clone\n\nwhen I receive [setup v]\nhide\nset [y v] to [0]\nset [x v] to [0]\nwait (0) seconds\nif <(LEVEL) = [3]> then\n    Clone x: [860] y: [-30]\n    Clone x: [1800] y: [-30]\n    Clone x: [2050] y: [-30]\nend\nset [y v] to [-99999999999]\n\n@スプライト1\n\nwhen flag clicked\nset [item v] to [0]\nhide\n\nwhen I receive [setup v]\nset [y v] to [0]\nset [x v] to [0]\nif <(LEVEL) = [1]> then\n    switch costume to (コスチューム2 v)\nelse\n    if <(LEVEL) = [2]> then\n        switch costume to (コスチューム2 v)\n    else\n        if <(LEVEL) = [3]> then\n            if <(ITEM) = [0]> then\n                switch costume to (コスチューム2 v)\n                Position x: [2700] y: [0]\n            end\n        end\n    end\nend\n\ndefine Position (x) (y)\ngo to x: (x) y: (y)\nif <<(x) = (x position)> and <(y) = (y position)>> then\n    show\nelse\n    hide\nend\n\nwhen I receive [tick v]\nif <(ITEM) = [0]> then\n    Position ((x) - (SCROLL X)) ((y) - (SCROLL Y))\n    if <touching (player v)?> then\n        set [item v] to [1]\n        start sound [Coin v]\n        hide\n        delete this clone\n    end\nend\n\nwhen I receive [reset v]\ndelete this clone\n\nwhen flag clicked\nforever\n    if <(ITEM) = [1]> then\n        go to (player v)\n    end\nend\n\ndefine Position x: (x) y: (y)\nhide\ncreate clone of (_myself_ v)\nchange [x v] by (x)\nchange [y v] by (y)\nnext costume\n\n@スプライト2\n\nwhen flag clicked\nforever\n    if <(ITEM) = [1]> then\n        go to (player v)\n    end\nend\n\nwhen flag clicked\nhide\n\nwhen flag clicked\nset [item v] to [0]\nwait until <(ITEM) = [1]>\nshow\ngo to [front v] layer\n\nwhen I receive [reset v]\ngo to [front v] layer\n\n