Fog - a platformer v1.3

Instructions: use arrows\ntry to get world record.

@Stage\n\n@player\n\nwhen flag clicked\nreset timer\nshow\ngo to x: (0) y: (0)\ngo to [front v] layer\nwait (10) seconds\nforever\n    if <touching (levelgoal v)?> then\n        broadcast (levelEnd v)\n        hide\n        stop [this script v]\n    end\nend\n\nwhen I receive [levelend v]\n\n@levelHitbox\n\nwhen flag clicked\nset [ghost v] effect to (100)\nswitch costume to (setup v)\nset size to (500) %\nswitch costume to (1 v)\nset [vspd v] to [0]\ngo to x: (0) y: (0)\nforever\n    move\nend\n\ndefine move\nchange [vspd v] by (1)\nchange y by (Vspd)\nif <touching (player v)?> then\n    repeat until <not <touching (player v)?>>\n        change y by (((Vspd) / ([abs v] of (Vspd) )) * (-1))\n    end\n    set [vspd v] to [0]\nend\nif <<key (up arrow v) pressed?> or <key (w v) pressed?>> then\n    change y by (2)\n    if <touching (player v)?> then\n        set [vspd v] to [-15]\n    end\n    change y by (-2)\nend\nif <<key (right arrow v) pressed?> or <key (d v) pressed?>> then\n    change x by (-10)\n    if <touching (player v)?> then\n        repeat until <not <touching (player v)?>>\n            change x by (1)\n        end\n    end\nend\nif <<key (left arrow v) pressed?> or <key (a v) pressed?>> then\n    change x by (10)\n    if <touching (player v)?> then\n        repeat until <not <touching (player v)?>>\n            change x by (-1)\n        end\n    end\nend\n\nwhen I receive [levelend v]\nstop [other scripts in sprite v]\n\n@levelVisuals\n\nwhen flag clicked\nhide\nswitch costume to (setup v)\nset [brightness v] effect to (100)\nset size to (250) %\nclone\n\nwhen I start as a clone\nshow\nswitch costume to (1 v)\nif <(size) > [500]> then\n    go to [front v] layer\nend\nforever\n    go to x: (([x position v] of [levelhitbox v]) * ((size) / (500))) y: (([y position v] of [levelhitbox v]) * ((size) / (500)))\n    switch costume to ([costume name v] of [levelhitbox v])\nend\n\ndefine clone\nset [quality v] to [100]\nrepeat ((quality) + (1))\n    create clone of (_myself_ v)\n    change size by ((500) / ((quality) + (1)))\n    change [brightness v] effect by ((-100) / ((quality) + (1)))\nend\n\ngo to (mouse-pointer v)\n\nwhen I receive [levelend v]\nwait ((((1000) - (size)) / (500)) - (.5)) seconds\ndelete this clone\n\n@levelGoal\n\nwhen flag clicked\nset [ghost v] effect to (100)\nswitch costume to (setup v)\nset size to (500) %\nswitch costume to (1 v)\nset [vspd v] to [0]\ngo to x: (0) y: (0)\nforever\n    go to (levelhitbox v)\nend\n\nset [ghost v] effect to (100)\n\n@timer\n\nwhen flag clicked\nerase all\nset [usage v] to [0]\nset size to (200) %\nset [cc v] to [1]\nhide\ngo to x: (0) y: (160)\nclone\nforever\n    set ["timer" v] to ((round ((timer) * (10))) / (10))\nend\n\nwhen I start as a clone\nif <(usage) = [0]> then\n    forever\n        set x to (((CC) - (((length of ("timer")) / (2)) - (-.5))) * (22))\n        go to [front v] layer\n        switch costume to (letter (CC) of ("timer"))\n        if <(CC) < ((length of ("timer")) + (1))> then\n            show\n        else\n            hide\n        end\n    end\nend\nset x to (((CC) - (((length of ("timer")) / (2)) - (-.5))) * (33))\ngo to [front v] layer\nhide\nswitch costume to (letter (CC) of ("timer"))\nif <(CC) < ((length of ("timer")) + (1))> then\n    stamp\nend\n\ndefine clone\nrepeat (10)\n    create clone of (_myself_ v)\n    change [cc v] by (1)\nend\n\nwhen I receive [levelend v]\nchange [usage v] by (1)\nrepeat (1)\n    delete this clone\nend\nstop [other scripts in sprite v]\nset size to (200) %\nwait (1) seconds\ngo to x: (0) y: (80)\nshow\nswitch costume to (score: v)\nstamp\nhide\nwait (1) seconds\ngo to x: (0) y: (30)\nset [cc v] to [1]\nset size to (300) %\nclone\nset size to (150) %\nwait (1) seconds\ngo to x: (0) y: (-50)\nswitch costume to (fail v)\nif <("timer") < (☁ worldRecord)> then\n    set [☁ worldrecord v] to ("timer")\n    switch costume to (newrecord v)\nend\nshow\nstamp\nhide\n\n@timer2\n\nwhen flag clicked\nset [cc v] to [0]\nhide\ngo to x: (0) y: (-160)\nclone\nforever\nend\n\nwhen I start as a clone\nforever\n    set x to (((CC) - (((length of (☁ worldRecord)) / (2)) - (-.5))) * (22))\n    go to [front v] layer\n    switch costume to (letter (CC) of (☁ worldRecord))\n    if <(CC) < ((length of (☁ worldRecord)) + (1))> then\n        show\n    else\n        hide\n    end\nend\n\ndefine clone\nrepeat (10)\n    change [cc v] by (1)\n    create clone of (_myself_ v)\nend\n\nwhen I receive [levelend v]\nrepeat (1)\n    delete this clone\nend\nstop [other scripts in sprite v]\n\n