traverse a platformer

Instructions: I hope I fixed all bug.\n         ❗If your device is old or slow it may lag a bit❗\nI know lobby looks like lobby to complicate game not to platformer\nIf you want have better time, you have to find easter egg\n\n\n                                  >>How to play<<\npress enter to start\npress space to teleport\nTo set dir of teleport, before you must press right or left arrow\nwsad or arrows keys to move\nwatch out for lava, spikes, robots, saws\nclick button to open doors\n\n                                       >>Story<<\nYou want to become an American soldier special forces. You must complete the route on a training ground that was completed only by the best soldiers.  There is a lot of safety on the route.

@Stage\n\n@Player4\n\nwhen I receive [mode choose v]\nset [timer v] to [0]\nwait until <<key (left arrow v) pressed?> or <key (right arrow v) pressed?>>\nchange [timer on? v] by (1)\nbroadcast (timer v)\n\ndefine Tick normal mode\nif <(PLAY IS POSSIBLE?) = [yes]> then\n    go to [front v] layer\n    show\n    set rotation style [left-right v]\n    if <<key (left arrow v) pressed?> or <key (a v) pressed?>> then\n        set [dir v] to [-90]\n        change [x4 v] by (-1)\n    end\n    if <<key (right arrow v) pressed?> or <key (d v) pressed?>> then\n        set [dir v] to [90]\n        change [x4 v] by (1)\n    end\n    set [x4 v] to ((x4) * (0.9))\n    change x by (x4)\n    if <<touching (ground4 v)?> or <touching (moving ground4 v)?>> then\n        change y by (1)\n        if <<touching (ground4 v)?> or <touching (moving ground4 v)?>> then\n            change y by (1)\n            if <<touching (ground4 v)?> or <touching (moving ground4 v)?>> then\n                change y by (1)\n                if <<touching (ground4 v)?> or <touching (moving ground4 v)?>> then\n                    change y by (1)\n                    if <<touching (ground4 v)?> or <touching (moving ground4 v)?>> then\n                        change y by (1)\n                        if <<touching (ground4 v)?> or <touching (moving ground4 v)?>> then\n                            change x by ((x4) * (-1))\n                            change y by (-5)\n                            if <<key (up arrow v) pressed?> or <key (w v) pressed?>> then\n                                if <(x4) > [0]> then\n                                    set [x4 v] to [-7]\n                                else\n                                    set [x4 v] to [7]\n                                end\n                                set [y4 v] to [14]\n                            else\n                                set [x4 v] to [0]\n                            end\n                        end\n                    end\n                end\n            end\n        end\n    end\n    change y by (-1)\n    if <<touching (ground4 v)?> or <touching (moving ground4 v)?>> then\n        if <<key (up arrow v) pressed?> or <key (w v) pressed?>> then\n            set [y4 v] to [14]\n            point in direction ((y4) * (0.5))\n        end\n    end\n    change y by (1)\n    change [y4 v] by (-1)\n    change y by (y4)\n    if <<touching (ground4 v)?> or <touching (moving ground4 v)?>> then\n        change y by ((y4) * (-1))\n        set [y4 v] to [0]\n    end\n    if <<(item (1) of [click v]) = [1]> and <(item (2) of [click v]) = [1]>> then\n        set [love_and_fave? v] to [1]\n    else\n        set [love_and_fave? v] to [0]\n    end\n    if <<touching (enemy4 v)?> or <<touching (spikes4 v)?> or <<touching (saw4 v)?> or <touching (lava4 v)?>>>> then\n        change [death v] by (1)\n        broadcast (death v)\n        hide\n    end\n    if <(LEVEL4) < [13]> then\n        if <(x position) > [234]> then\n            broadcast (next_Level v)\n            change [level4 v] by (1)\n        end\n    else\n        set [end? v] to [1]\n    end\n    if <touching (bouncy4 v)?> then\n        set [y4 v] to [20]\n    end\nelse\n    hide\nend\n\nwhen flag clicked\nhide\nset [mode v] to []\nSetup\nset [dir v] to [90]\nbroadcast (start v)\n\nwhen I receive [next_level v]\ngo to x: (X_Start) y: (Y_Start)\n\ndefine Tick - Costume\nif <(love_And_Fave?) = [0]> then\n    switch costume to (start-a v)\n    if <<key (left arrow v) pressed?> or <key (a v) pressed?>> then\n        switch costume to (start-b v)\n    end\n    if <<key (right arrow v) pressed?> or <key (d v) pressed?>> then\n        switch costume to (start-c v)\n    end\n    if <<key (up arrow v) pressed?> or <key (w v) pressed?>> then\n        switch costume to (start-f v)\n    end\n    if <<<key (left arrow v) pressed?> or <key (a v) pressed?>> and <<key (up arrow v) pressed?> or <key (w v) pressed?>>> then\n        switch costume to (start-e v)\n    end\n    if <<<key (right arrow v) pressed?> or <key (d v) pressed?>> and <<key (up arrow v) pressed?> or <key (w v) pressed?>>> then\n        switch costume to (start-d v)\n    end\nelse\n    switch costume to (laf-a v)\n    change [color v] effect by (1)\n    if <<key (left arrow v) pressed?> or <key (a v) pressed?>> then\n        switch costume to (laf-b v)\n        change [color v] effect by (1)\n    end\n    if <<key (right arrow v) pressed?> or <key (d v) pressed?>> then\n        switch costume to (laf-c v)\n        change [color v] effect by (1)\n    end\n    if <<key (up arrow v) pressed?> or <key (w v) pressed?>> then\n        switch costume to (start-f v)\n        change [color v] effect by (1)\n    end\n    if <<<key (left arrow v) pressed?> or <key (a v) pressed?>> and <<key (up arrow v) pressed?> or <key (w v) pressed?>>> then\n        switch costume to (laf-e v)\n    end\n    if <<<key (right arrow v) pressed?> or <key (d v) pressed?>> and <<key (up arrow v) pressed?> or <key (w v) pressed?>>> then\n        switch costume to (laf-d v)\n    end\nend\n\nwhen I receive [restart v]\ngo to x: (X_Start) y: (Y_Start)\nset [x4 v] to [0]\nset [y4 v] to [0]\n\ndefine Tick hard mode\nif <(DEATH) = [0]> then\n    go to [front v] layer\n    set rotation style [left-right v]\n    if <<key (left arrow v) pressed?> or <key (a v) pressed?>> then\n        set [dir v] to [-90]\n        change [x4 v] by (-1)\n    end\n    if <<key (right arrow v) pressed?> or <key (d v) pressed?>> then\n        set [dir v] to [90]\n        change [x4 v] by (1)\n    end\n    set [x4 v] to ((x4) * (0.9))\n    change x by (x4)\n    if <<touching (ground4 v)?> or <touching (moving ground4 v)?>> then\n        change y by (1)\n        if <<touching (ground4 v)?> or <touching (moving ground4 v)?>> then\n            change y by (1)\n            if <<touching (ground4 v)?> or <touching (moving ground4 v)?>> then\n                change y by (1)\n                if <<touching (ground4 v)?> or <touching (moving ground4 v)?>> then\n                    change y by (1)\n                    if <<touching (ground4 v)?> or <touching (moving ground4 v)?>> then\n                        change y by (1)\n                        if <<touching (ground4 v)?> or <touching (moving ground4 v)?>> then\n                            change x by ((x4) * (-1))\n                            change y by (-5)\n                            if <<key (up arrow v) pressed?> or <key (w v) pressed?>> then\n                                if <(x4) > [0]> then\n                                    set [x4 v] to [-7]\n                                else\n                                    set [x4 v] to [7]\n                                end\n                                set [y4 v] to [14]\n                            else\n                                set [y4 v] to [0]\n                            end\n                        end\n                    end\n                end\n            end\n        end\n    end\n    change y by (-1)\n    if <<touching (ground4 v)?> or <touching (moving ground4 v)?>> then\n        if <<key (up arrow v) pressed?> or <key (w v) pressed?>> then\n            set [y4 v] to [14]\n            point in direction ((y4) * (0.5))\n        end\n    end\n    change y by (1)\n    change [y4 v] by (-1)\n    change y by (y4)\n    if <<touching (ground4 v)?> or <touching (moving ground4 v)?>> then\n        change y by ((y4) * (-1))\n        set [y4 v] to [0]\n    end\n    if <<(item (1) of [click v]) = [1]> and <(item (2) of [click v]) = [1]>> then\n        set [love_and_fave? v] to [1]\n    else\n        set [love_and_fave? v] to [0]\n    end\n    if <<touching (enemy4 v)?> or <<touching (spikes4 v)?> or <<touching (saw4 v)?> or <touching (lava4 v)?>>>> then\n        change [death v] by (1)\n        broadcast (death v)\n        hide\n        go to x: (X_Start) y: (Y_Start)\n        set [x4 v] to [0]\n        set [y4 v] to [0]\n    end\n    if <(LEVEL4) < [13]> then\n        if <(x position) > [234]> then\n            broadcast (next_Level v)\n            change [level4 v] by (1)\n        end\n    else\n        set [end? v] to [1]\n    end\n    if <touching (bouncy4 v)?> then\n        set [y4 v] to [20]\n    end\nelse\n    broadcast (hard mode end-death v)\n    stop [this script v]\nend\n\nwhen I receive [mode choose v]\nSetup\nshow\nforever\n    Tick - end? (end?)\n    Tick - Costume\n    if <(MODE) = [normal]> then\n        Tick normal mode\n    else\n        Tick hard mode\n    end\nend\n\ndefine Tick - end? (end?)\nif <(end?) = [1]> then\n    say (join (join [Weldone! You did it! Now you have recognition among veterans. Your time: ] (TIMER)) (join [ Write in the comments: I am a veteran my time is it ] (TIMER)))\nend\n\nwhen I receive [timer v]\nreset timer\nrepeat until <(end?) = [1]>\n    set [timer v] to (timer)\nend\n\nwhen I receive [lobby v]\nhide\n\nwhen I receive [teleport v]\nchange x by ((dir) / (3.6))\nif <<<touching (ground4 v)?> or <touching (moving ground4 v)?>> or <touching (hitbox v)?>> then\n    back\nend\n\nwhen I receive [mode choose v]\nforever\n    if <key (space v) pressed?> then\n        broadcast (teleport v)\n    end\n    wait until <not <key (space v) pressed?>>\nend\n\ndefine back\nrepeat until <not <touching (ground4 v)?>>\n    change x by ((dir) / (90))\nend\nrepeat until <not <touching (moving ground4 v)?>>\n    change x by (((dir) / (90)) * (-1))\nend\n\ndefine Setup\nset size to (100) %\nset [death v] to [0]\nset [x_start v] to [-210]\nset [y_start v] to [-50]\nset [level4 v] to [1]\nset [end? v] to [0]\nset [x4 v] to [0]\nset [y4 v] to [0]\nswitch costume to (start costume v)\ngo to x: (X_Start) y: (Y_Start)\n\nwhen I receive [play is possible v]\ngo to x: (X_Start) y: (Y_Start)\nset [x4 v] to [0]\nset [y4 v] to [0]\n\n@ground4\n\nwhen I receive [mode choose v]\nshow\ngo to x: (0) y: (-1)\nforever\n    switch costume to (LEVEL4)\nend\n\nwhen flag clicked\nhide\n\n@Love and Fav\n\ndefine Detect (costume) At x: (x) y: (y) ID: (name)\nset size to (27000) %\ngo to x: (x) y: (y)\nswitch costume to (nothing v)\nset size to (100) %\nswitch costume to (costume)\nif <touching (mouse-pointer v)?> then\n    replace item (name) of [timer v] with ((item (name) of [timer v]) + (1))\nelse\n    replace item (name) of [timer v] with [0]\nend\nif <(item (name) of [timer v]) > [5]> then\n    replace item (name) of [click v] with [1]\nend\n\nwhen flag clicked\ndelete all of [click v]\ndelete all of [timer v]\nrepeat (2)\n    add [0] to [click v]\n    add [0] to [timer v]\nend\nforever\n    wait (0.01) seconds\n    Detect [Love] At x: [-196] y: [-210] ID: [1]\n    Detect [Fav] At x: [-125] y: [-210] ID: [2]\nend\n\n@Spikes4\n\nwhen I receive [mode choose v]\nshow\ngo to x: (0) y: (0)\nforever\n    go to [front v] layer\n    switch costume to (LEVEL4)\nend\n\nwhen flag clicked\nhide\n\nwhen I receive [lobby v]\nhide\n\n@Enemy4\n\ndefine spawn (x) (y) (how many)\nset [x*y v] to (how many)\nswitch costume to (type)\ngo to x: (x) y: (y)\ncreate clone of (_myself_ v)\n\nwhen I receive [next_level v]\nif <(LEVEL4) = [2]> then\n    spawn [75] [-70] [30]\nend\n\nwhen I start as a clone\nset [change by v] to [0]\nset size to (100) %\nshow\nforever\n    go to [front v] layer\n    if <(change by) = [0]> then\n        repeat (x*y)\n            change x by (4)\n        end\n    else\n        repeat ((x*y) * (2))\n            change x by (-4)\n        end\n        repeat ((x*y) * (2))\n            change x by (4)\n        end\n    end\n    change [change by v] by (1)\nend\n\nwhen I receive [next_level v]\nrepeat (3)\n    delete this clone\nend\n\nwhen I receive [mode choose v]\nhide\nset size to (100) %\n\nwhen I start as a clone\nforever\n    if <(DEATH) = [1]> then\n        ​​log​​ [death]\n        delete this clone\n    end\nend\n\n​​breakpoint​​\n\nwhen I receive [play is possible v]\nif <(LEVEL4) = [2]> then\n    set [death v] to [0]\n    ​​log​​ [death = 0]\n    create clone of (_myself_ v)\nend\n\n@Button4\n\nwhen I receive [next_level v]\nhide\nswitch costume to (not pressed v)\nif <(LEVEL4) = [4]> then\n    go to x: (170) y: (-76)\n    broadcast (button v)\n    show\n    go to [front v] layer\nend\nif <(LEVEL4) = [8]> then\n    go to x: (182) y: (-76)\n    broadcast (button v)\n    show\nend\n\nwhen I receive [button v]\nforever\n    if <touching (player4 v)?> then\n        switch costume to (pressed v)\n        broadcast (Pressed v)\n        stop [this script v]\n    end\nend\n\nwhen I receive [restart v]\nswitch costume to (not pressed v)\n\nwhen I receive [mode choose v]\nswitch costume to (not pressed v)\nhide\n\nwhen I receive [lobby v]\nhide\n\n@moving ground4\n\nwhen I receive [pressed v]\nif <(LEVEL4) = [4]> then\n    go to [front v] layer\n    repeat (4)\n        change y by (((132) - (y position)) / (8))\n    end\n    hide\nend\nif <(LEVEL4) = [8]> then\n    repeat (8)\n        change y by (((132) - (y position)) / (8))\n    end\nend\n\nwhen I receive [next_level v]\nshow\ngo to x: (0) y: (0)\n\nwhen I receive [restart v]\ngo to x: (0) y: (0)\n\nwhen I receive [mode choose v]\nshow\ngo to x: (0) y: (0)\nforever\n    switch costume to (LEVEL4)\n    go to [back v] layer\n    go [forward v] (1) layers\nend\n\nwhen flag clicked\nhide\n\n@Saw4\n\ndefine Clone at x: (x) y: (y)\ngo to x: (x) y: (y)\ncreate clone of (_myself_ v)\n\nwhen I start as a clone\ngo to [back v] layer\ngo [forward v] (1) layers\nshow\nforever\n    go to [back v] layer\n    go [forward v] (2) layers\n    turn right (8) degrees\nend\n\nwhen I receive [next_level v]\nbroadcast (create v)\ndelete this clone\n\nwhen I receive [mode choose v]\ngo to [front v] layer\ngo [backward v] (9) layers\nforever\n    set size to (100) %\n    hide\n    go to [front v] layer\nend\n\nwhen I receive [mode choose v]\ngo to [front v] layer\ngo [backward v] (8) layers\nhide\n\nwhen I receive [create v]\nif <(LEVEL4) = [5]> then\n    Clone at x: [40] y: [-90]\nelse\n    hide\n    delete this clone\nend\n\n@lava4\n\nwhen I receive [mode choose v]\nshow\ngo to x: (0) y: (0)\nforever\n    go to [back v] layer\n    go [forward v] (1) layers\n    switch costume to (LEVEL4)\n    set y to ((4) * ([sin v] of ((timer) * (180)) ))\nend\n\nwhen flag clicked\nhide\n\n@Bouncy4\n\nwhen I start as a clone\ngo to [front v] layer\ngo [backward v] (8) layers\nswitch costume to (costume1 v)\nshow\nforever\n    if <touching (player4 v)?> then\n        switch costume to (costume1 v)\n        repeat until <(costume [number v]) = [5]>\n            next costume\n        end\n        repeat until <(costume [number v]) = [1]>\n            switch costume to ((costume [number v]) - (1))\n        end\n    end\nend\n\ndefine Clone at x: (x) y: (y)\ngo to x: (x) y: (y)\ncreate clone of (_myself_ v)\n\nwhen I receive [next_level v]\nif <(LEVEL4) = [7]> then\n    Clone at x: [-155] y: [-69]\nelse\n    hide\n    delete this clone\nend\n\nwhen I receive [mode choose v]\nhide\nforever\n    go to [front v] layer\n    go [backward v] (8) layers\nend\n\nwhen I receive [mode choose v]\ngo to [front v] layer\ngo [backward v] (8) layers\nhide\nif <(LEVEL4) = [7]> then\n    Clone at x: [-155] y: [-69]\nelse\n    hide\n    delete this clone\nend\n\nwhen flag clicked\nhide\n\n@Subtitles4\n\nwhen I receive [mode choose v]\nshow\nforever\n    go to [front v] layer\n    switch costume to (LEVEL4)\nend\n\nwhen flag clicked\nhide\n\nwhen I receive [lobby v]\nhide\n\n@Skip4\n\nwhen this sprite clicked\nif <(timer on?) = [0]> then\n    broadcast (timer v)\n    change [timer on? v] by (1)\n    stop [this script v]\nend\nchange [skip v] by (1)\nif <(LEVEL4) < [13]> then\n    broadcast (next_Level v)\n    set [x4 v] to [0]\n    set [y4 v] to [0]\n    change [level4 v] by (1)\nend\n\nwhen flag clicked\nset [timer on? v] to [0]\nset [skip v] to [0]\nhide\ngo to x: (-200) y: (-155)\n\nwhen I receive [mode choose v]\nshow\ngo to [front v] layer\n\nwhen I receive [lobby v]\nhide\n\n@Restart4\n\nwhen flag clicked\nhide\ngo to x: (195) y: (-155)\n\nwhen this sprite clicked\nif <(LEVEL4) < [13]> then\n    broadcast (restart v)\nend\n\nwhen I receive [mode choose v]\nshow\ngo to [front v] layer\n\nwhen I receive [lobby v]\nhide\n\n@Fireworks4\n\nwhen flag clicked\nhide\nforever\n    if <(LEVEL4) = [13]> then\n        wait (0.5) seconds\n        set [clone id v] to [Launcher]\n        repeat (6)\n            create clone of (_myself_ v)\n        end\n        repeat (6)\n            set [ghost v] effect to (20)\n        end\n        wait (1) seconds\n        repeat (6)\n            set [ghost v] effect to (20)\n            set [clone id v] to [Launcher]\n            create clone of (_myself_ v)\n        end\n        wait (1) seconds\n        repeat (6)\n            set [ghost v] effect to (20)\n            set [clone id v] to [Launcher]\n            create clone of (_myself_ v)\n        end\n        wait (1) seconds\n        repeat (6)\n            set [ghost v] effect to (20)\n            set [clone id v] to [Launcher]\n            create clone of (_myself_ v)\n        end\n        stop [this script v]\n    end\nend\n\nwhen I start as a clone\nshow\nif <(Clone Id) = [Launcher]> then\n    go to x: (pick random (-240) to (240)) y: (-1000)\n    set [i2 v] to (pick random (20) to (23))\n    set [color v] effect to (pick random (-150) to (150))\n    repeat until <(i2) < [3]>\n        change [i2 v] by (-1)\n        change y by (i2)\n    end\n    Firework\n    delete this clone\nend\n\ndefine Firework\nrepeat (20)\n    set [clone id v] to [Firework]\n    create clone of (_myself_ v)\nend\n\nwhen I start as a clone\nshow\nif <(Clone Id) = [Firework]> then\n    set [i1 v] to (pick random (-7) to (7))\n    change [i2 v] by (pick random (5) to (15))\n    repeat until <<<(y position) < [-175]> or <(x position) < [-235]>> or <(x position) > [235]>>\n        change [i2 v] by (-1)\n        change y by (i2)\n        change x by (i1)\n        change [ghost v] effect by (1)\n    end\n    delete this clone\nend\n\nwhen I start as a clone\nforever\n    go to [front v] layer\nend\n\n@hard mode lose4\n\nwhen flag clicked\nhide\n\nwhen I receive [hard mode end-death v]\nshow\nforever\n    go to [front v] layer\nend\n\nwhen I receive [lobby v]\nset [death v] to [0]\nhide\nstop [other scripts in sprite v]\n\n@lobby backdrop4\n\nwhen flag clicked\nbroadcast (lobby v)\n\nwhen I receive [mode choose v]\nhide\n\nwhen I receive [lobby v]\nshow\n\n@mode4\n\ndefine touch?\nclear graphic effects\nif <touching (mouse-pointer v)?> then\n    set [ghost v] effect to (25)\n    glide (0.038) secs to x: (-140) y: (25)\nelse\n    set [ghost v] effect to (50)\n    glide (0.038) secs to x: (-160) y: (25)\nend\n\nwhen I receive [mode choose v]\nhide\n\nwhen this sprite clicked\nnext costume\n\nwhen I receive [lobby v]\nshow\nswitch costume to (normal v)\ngo to [front v] layer\ngo to x: (-160) y: (25)\nforever\n    touch?\n    if <<key (enter v) pressed?> and <(instructions) = [0]>> then\n        broadcast (Mode choose v)\n        set [mode v] to (costume [name v])\n        stop [this script v]\n    end\nend\n\n@instructions icon4\n\ndefine touch?\nclear graphic effects\nif <touching (mouse-pointer v)?> then\n    set [ghost v] effect to (25)\n    glide (0.035) secs to x: (-140) y: (-90)\nelse\n    set [ghost v] effect to (50)\n    glide (0.035) secs to x: (-160) y: (-90)\nend\n\nwhen I receive [mode choose v]\nhide\n\nwhen I receive [lobby v]\nshow\ngo to x: (-160) y: (-90)\ngo to [front v] layer\nforever\n    touch?\n    if <<key (enter v) pressed?> and <(instructions) = [0]>> then\n        stop [this script v]\n    end\n    if <<touching (mouse-pointer v)?> and <mouse down?>> then\n        broadcast (instructions v)\n    end\nend\n\n@instruction4\n\nwhen I receive [instructions v]\nset [instructions v] to [1]\ngo to x: (0) y: (-371)\nshow\nrepeat (30)\n    go to [front v] layer\n    change y by (() - ((y position) / (6)))\nend\ngo to [front v] layer\nforever\n    if <mouse down?> then\n        broadcast (instructions - hide v)\n        set [instructions v] to [0]\n        stop [this script v]\n    end\nend\n\nwhen I receive [mode choose v]\nhide\n\nwhen I receive [instructions - hide v]\nrepeat (30)\n    go to [front v] layer\n    change y by ((y position) / (5))\nend\ngo to [back v] layer\nhide\n\nwhen I receive [lobby v]\nset [instructions v] to [0]\ngo to x: (0) y: (-371)\nhide\n\n@traverse4\n\nwhen I receive [mode choose v]\nhide\nstop [other scripts in sprite v]\n\nwhen I receive [lobby v]\npoint in direction (90)\nset size to (85) %\nshow\nforever\n    set size to ((85) + ([sin v] of ((timer) * (135)) )) %\nend\n\nwhen I receive [lobby v]\nforever\n    point in direction ((90) + (([cos v] of ((timer) * (100)) ) * (5)))\nend\n\n@click enter to start4\n\nwhen I receive [lobby v]\ngo to x: (0) y: (-155)\nshow\nset [ghost v] effect to (20)\nforever\n    repeat (40)\n        change [ghost v] effect by (2)\n    end\n    repeat (40)\n        change [ghost v] effect by (-2)\n    end\n    wait (1) seconds\nend\n\nwhen I receive [lobby v]\nforever\n    if <<key (enter v) pressed?> and <(instructions) = [0]>> then\n        hide\n        stop [other scripts in sprite v]\n    end\nend\n\n@Story4\n\nwhen I receive [mode choose v]\nhide\n\nwhen I receive [lobby v]\ngo to x: (77) y: (-18)\nshow\n\n@backdrop4\n\nwhen flag clicked\nset [night? v] to [0]\nswitch costume to (day v)\nhide\n\nwhen I receive [mode choose v]\nshow\nforever\n    go to [back v] layer\n    go to x: ((mouse x) / (20)) y: ((mouse y) / (20))\n    if <(LEVEL4) = [10]> then\n        switch costume to (night c- v)\n        set [night? v] to [1]\n    else\n        if <<(LEVEL4) > [8]> and <(LEVEL4) < [11]>> then\n            switch costume to (night v)\n            set [night? v] to [1]\n        else\n            switch costume to (day v)\n            set [night? v] to [0]\n        end\n    end\nend\n\n@go to lobby4\n\nwhen this sprite clicked\nbroadcast (lobby v)\nhide\n\nwhen I receive [hard mode end-death v]\nshow\ngo to [front v] layer\n\nwhen I receive [lobby v]\nhide\n\n@bg\n\nwhen flag clicked\ngo to x: (-5) y: (354)\nhide\nforever\n    set [closet v] to (timer)\nend\n\nwhen [timer v] > ((closet) + (0.1))\nshow\ngo to [front v] layer\nglide (0.8) secs to x: (-5) y: (0)\n\n@Light4\n\nwhen flag clicked\ngo [backward v] (100) layers\nforever\n    if <(PLAY IS POSSIBLE?) = [yes]> then\n        if <(night?) = [1]> then\n            set [ghost v] effect to (50)\n        else\n            hide\n        end\n    else\n        hide\n    end\nend\n\nwhen flag clicked\nset size to (100) %\nset [ghost v] effect to (50)\nforever\n    if <(PLAY IS POSSIBLE?) = [yes]> then\n        if <(night?) = [1]> then\n            show\n            broadcast (go v)\n        else\n            hide\n        end\n    else\n        hide\n    end\nend\n\nwhen I receive [go v]\ngo to (player4 v)\n\n@Madrid2030 saw?\n\nwhen flag clicked\nforever\n    if <(username) = [madrid2030]> then\n        set [☁ madrid2030 saw? v] to [yes]\n        stop [this script v]\n    end\nend\n\n@dead4\n\nwhen flag clicked\nset [play is possible? v] to [yes]\nhide\nset [ghost v] effect to (100)\n\nwhen I receive [death v]\nset [play is possible? v] to [no]\nshow\nrepeat (5)\n    change [ghost v] effect by (-20)\n    go to [front v] layer\nend\nrepeat (5)\n    go to [front v] layer\n    change [ghost v] effect by (20)\nend\nhide\nset [play is possible? v] to [yes]\nbroadcast (play is possible v)\n\n@lol4\n\nwhen flag clicked\nforever\n    if <(LEVEL4) = [12]> then\n        show\n    else\n        hide\n    end\nend\n\n