Testing platformer
@Stage\n\n@Sprite6\n\n@Sprite1\n\nwhen flag clicked\nshow\nset [ghost v] effect to (100)\nswitch costume to (costume1 v)\ngo to x: (-200) y: (100)\nset [xvel v] to [0]\nset [yvel v] to [0]\nforever\n    if <(y position) < [-179]> then\n        Die\n    end\n    set [xvel v] to ((Xvel) * (0.8))\n    change [yvel v] by (-1)\n    change x by (Xvel)\n    if <touching (sprite2 v)?> then\n        change x by ((0) - (Xvel))\n        set [xvel v] to [0]\n    end\n    change y by (Yvel)\n    if <touching (sprite2 v)?> then\n        change y by ((0) - (Yvel))\n        set [yvel v] to [0]\n    end\n    if <<<mouse down?> and <(mouse y) > (y position)>> or <<key (up arrow v) pressed?> or <key (w v) pressed?>>> then\n        change y by (-1)\n        if <touching (sprite2 v)?> then\n            set [yvel v] to ((750) / ((size) / (2)))\n        end\n        change y by (1)\n    end\n    if <<<mouse down?> and <(mouse x) > (x position)>> or <<key (right arrow v) pressed?> or <key (d v) pressed?>>> then\n        change [xvel v] by ((75) / ((size) / (2)))\n    end\n    if <<<mouse down?> and <(mouse x) < (x position)>> or <<key (left arrow v) pressed?> or <key (a v) pressed?>>> then\n        change [xvel v] by ((0) - ((75) / ((size) / (2))))\n    end\nend\n\ndefine Die\nrepeat (30)\n    create clone of (_myself_ v)\nend\ngo to x: (-200) y: (100)\nset [xvel v] to [0]\nset [yvel v] to [0]\n\nwhen I start as a clone\nswitch costume to (costume2 v)\nset [xvel v] to (pick random ((0) - ((1500) / ((size) / (2)))) to ((1500) / ((size) / (2))))\nset [yvel v] to (pick random (3) to ((1500) / ((size) / (2))))\nrepeat (50)\n    change [ghost v] effect by (3)\n    set [xvel v] to ((Xvel) * (0.9))\n    change [yvel v] by (-1)\n    change x by (Xvel)\n    if <touching (sprite2 v)?> then\n        change x by ((0) - (Xvel))\n        set [xvel v] to [0]\n    end\n    change y by (Yvel)\n    if <touching (sprite2 v)?> then\n        change y by ((0) - (Yvel))\n        set [yvel v] to [0]\n    end\nend\ndelete this clone\n\nwhen I receive [message1 v]\nstop [other scripts in sprite v]\nhide\n\n@Sprite2\n\nwhen flag clicked\nset [ghost v] effect to (100)\n\n@Sprite3\n\nwhen flag clicked\nerase all\nset [ghost v] effect to (100)\nforever\n    Fast [1000]\nend\n\ndefine Fast (strokes)\nrepeat (strokes)\n    go to (random position v)\n    set pen size to (pick random (4) to (6))\n    if <touching (sprite5 v)?> then\n        set pen color to (#ff0000)\n        set pen (color v) to (x position)\n    else\n        if <touching (sprite1 v)?> then\n            set pen color to (#d68649)\n        else\n            if <touching (sprite2 v)?> then\n                set pen color to (#49d653)\n            else\n                if <touching (sprite4 v)?> then\n                    set pen color to (#b749d6)\n                else\n                    set pen color to (#49b2d6)\n                end\n            end\n        end\n    end\n    change pen (color v) by (pick random (-5) to (5))\n    change pen (saturation v) by (pick random (-5) to (5))\n    change pen (brightness v) by (pick random (-5) to (5))\n    pen down\n    point towards (sprite1 v)\n    turn right (90) degrees\n    move (10) steps\n    pen up\nend\n\n@Sprite4\n\nwhen flag clicked\ngo to x: (40) y: (160)\nset [ghost v] effect to (100)\nwait until <touching (sprite1 v)?>\nbroadcast (message1 v)\n\n@Sprite5\n\nwhen flag clicked\ngo to x: (0) y: (0)\nset [ghost v] effect to (100)\nhide\n\nwhen I receive [message1 v]\nshow\n\n
Use Turbowarp for less lag\n\n\n\n\n\n\n\n@-HexaScape-