Fossil Quest A Platformer
@Stage\n\nwhen flag clicked\nswitch backdrop to (backdrop1 v)\n\n@Icon\n\nwhen flag clicked\ngo to [front v] layer\ngo to x: (220) y: (-163)\nset size to (90) %\n\nwhen flag clicked\nset volume to (100) %\nforever\n    play sound [Embarkment v] until done\nend\n\nwhen [u v] key pressed\nset volume to (100) %\n\nwhen [m v] key pressed\nset volume to (0) %\n\n@Player\n\nwhen flag clicked\nset [area v] to [1]\nhide variable [area v]\nset rotation style [left-right v]\npoint in direction (90)\nswitch costume to (player v)\nswitch backdrop to (blue sky 2  v)\ngo to x: (-147) y: (-74)\nset [xv v] to [0]\nset [yv v] to [0]\nforever\n    if <<key (right arrow v) pressed?> or <<<(mouse x) > (x position)> and <mouse down?>> or <key (d v) pressed?>>> then\n        change [xv v] by (1)\n        point in direction (90)\n    end\n    if <<key (left arrow v) pressed?> or <<<(mouse x) < (x position)> and <mouse down?>> or <key (a v) pressed?>>> then\n        change [xv v] by (-1)\n        point in direction (-90)\n    end\n    set [xv v] to ((Xv) * (0.9))\n    change x by (Xv)\n    if <touching (ground v)?> then\n        change y by (1)\n        if <touching (ground v)?> then\n            change y by (1)\n            if <touching (ground v)?> then\n                change y by (1)\n                if <touching (ground v)?> then\n                    change y by (1)\n                    if <touching (ground v)?> then\n                        change y by (1)\n                        if <touching (ground v)?> then\n                            change x by ((Xv) * (-1))\n                            change y by (-5)\n                            if <<key (up arrow v) pressed?> or <<<(mouse y) > (y position)> and <mouse down?>> or <key (w v) pressed?>>> then\n                                if <(Xv) > [0]> then\n                                    set [xv v] to [-5]\n                                else\n                                    set [xv v] to [5]\n                                end\n                                set [yv v] to [10]\n                            else\n                                set [xv v] to [0]\n                            end\n                        end\n                    end\n                end\n            end\n        end\n    end\n    change [yv v] by (-1)\n    change y by (Yv)\n    if <touching (ground v)?> then\n        change y by ((Yv) * (-1))\n        set [yv v] to [0]\n    end\n    change y by (-1)\n    if <touching (ground v)?> then\n        if <<key (up arrow v) pressed?> or <<<(mouse y) > (y position)> and <mouse down?>> or <key (w v) pressed?>>> then\n            set [yv v] to [15]\n        end\n    end\n    change y by (1)\n    if <<touching (danger v)?> or <(y position) < [-179]>> then\n        go to x: (-180) y: (-20)\n    end\n    if <(x position) > [230]> then\n        go to x: (-180) y: (-20)\n        change [area v] by (1)\n    end\nend\n\nwhen [r v] key pressed\ngo to x: (-147) y: (-74)\n\n@Ground\n\nwhen flag clicked\ngo to x: (0) y: (0)\nforever\n    switch costume to (Area)\nend\n\n@Danger\n\nwhen flag clicked\ngo to x: (0) y: (0)\ngo to [back v] layer\nforever\n    switch costume to (Area)\nend\n\n@Light\n\nwhen flag clicked\nforever\n    go to (player v)\n    go to [back v] layer\nend\n\n@Cover\n\nwhen flag clicked\nforever\n    show\n    set [ghost v] effect to (100)\n    go to [front v] layer\n    go to x: (0) y: (0)\nend\n\n@lag\n\n@Sprite1\n\nwhen flag clicked\ngo to x: (-207) y: (141)\nforever\n    go to [back v] layer\nend\n\n
Hello!\nI KNOW IT'S SHORT! Stop telling me.\nWelcome to Fossil Quest A Platformer.\nUse the arrow keys or mobile to move!\nDon't touch the spiky rocks or the lava!\nTry to find the lost fossils in the desert!\nPress R to restart!\nPress U to un mute and M to mute!\nThere are 7 levels!\nBye!