Platformer
@Stage\n\n@Block\n\nwhen flag clicked\nset [ghost v] effect to (100)\ngo to x: (-100) y: (0)\nset [yv v] to [0]\nforever\n    Move\nend\n\ndefine Replace\nchange y by (1)\nrepeat until <not <touching (level v)?>>\n    change y by (1)\nend\nchange y by (-1)\n\ndefine Move\nif <touching (level v)?> then\n    set [yv v] to [0]\n    if <key (up arrow v) pressed?> then\n        set [yv v] to [15]\n    end\nelse\n    change [yv v] by (-1)\nend\nchange y by (yv)\nif <<(yv) > [0]> and <touching color (#000000)?>> then\n    change y by ((yv) * (-1))\n    set [yv v] to [0]\nend\nif <touching (level v)?> then\n    Replace\nend\nif <key (right arrow v) pressed?> then\n    point in direction (90)\n    move (7) steps\n    if <touching color (#000000)?> then\n        move (-7) steps\n    end\nend\nif <key (left arrow v) pressed?> then\n    point in direction (-90)\n    move (7) steps\n    if <touching color (#000000)?> then\n        move (-7) steps\n    end\nend\n\n@Level\n\n@Cat\n\nwhen flag clicked\nforever\n    go to (block v)\n    if <key (right arrow v) pressed?> then\n        point in direction (90)\n    end\n    if <key (left arrow v) pressed?> then\n        point in direction (-90)\n    end\nend\n\nwhen flag clicked\nforever\n    if <key (any v) pressed?> then\n        next costume\n        wait (0.3) seconds\n    else\n        switch costume to (disfraz1 v)\n    end\nend\n\n