Orange -  A Platformer (MOBILE FRIENDLY)

Instructions:                                 **INSTRUCTIONS**\n→ Use arrow keys or W,A,D to move the character.\n→ Don't touch the spikes.\n→ You can also enjoy this game on your mobile phone!!\n\nI'll add new levels.

@Stage\n\n@Kukla1\n\nwhen I receive [başla v]\nshow\ngo to x: (-188) y: (113)\nswitch costume to (kostüm 1 v)\nswitch backdrop to (level1 v)\nset [y v] to [0]\nforever\n    change [y v] by (-0.3)\n    change y by (y)\n    if <touching (yer v)?> then\n        set [y v] to [0]\n        change y by (1)\n        if <touching (yer v)?> then\n            change y by (1)\n            if <touching (yer v)?> then\n                change y by (1)\n                if <touching (yer v)?> then\n                    change y by (1)\n                    if <touching (yer v)?> then\n                        change y by (1)\n                        if <touching (yer v)?> then\n                            change y by (1)\n                            if <touching (yer v)?> then\n                                change y by (1)\n                            end\n                        end\n                    end\n                end\n            end\n        end\n        if <<<key (up arrow v) pressed?> or <key (w v) pressed?>> or <<mouse down?> and <(mouse y) > (y position)>>> then\n            set [y v] to [8]\n        end\n    end\n    if <<key (right arrow v) pressed?> or <<key (d v) pressed?> or <<mouse down?> and <(mouse x) > (x position)>>>> then\n        switch costume to (kostüm 1 v)\n        change [x v] by (0.9)\n    end\n    if <<key (left arrow v) pressed?> or <<key (a v) pressed?> or <<mouse down?> and <(x position) > (mouse x)>>>> then\n        switch costume to (kostüm 2 v)\n        change [x v] by (-0.9)\n    end\n    change x by (x)\n    set [x v] to ((x) * (0.9))\n    if <touching (yer v)?> then\n        set [x v] to ((x) * (-1.5))\n        set [y v] to [5]\n        change x by (x)\n        change y by (1)\n    end\n    if <touching (yer v)?> then\n        change x by (x)\n    end\nend\n\nwhen I receive [başla v]\nforever\n    if <touching (dikenler v)?> then\n        go to x: (-188) y: (-120)\n        start sound [pop v]\n    end\n    if <(x position) > [222]> then\n        broadcast (diğerbölüm v)\n    end\nend\n\nwhen I receive [başla v]\n\nwhen flag clicked\nhide\n\nwhen flag clicked\nhide variable [volume v]\nset [volume v] to [50]\nforever\n    set volume to (Volume) %\nend\n\nwhen I receive [skip v]\nswitch costume to (kostüm 1 v)\ngo to x: (-188) y: (-120)\nnext backdrop\nchange [level v] by (1)\n\nwhen flag clicked\nforever\n    play sound [Dance Monkey \(Instrumental\) v] until done\nend\n\nwhen I receive [tekrar v]\nswitch costume to (kostüm 1 v)\ngo to x: (-188) y: (-120)\n\nwhen I receive [başla v]\nshow variable [volume v]\n\nwhen I receive [diğerbölüm v]\ngo to x: (-183) y: (-104)\n\nwhen I receive [başla v]\nforever\n    if <touching (zıplamaaleti v)?> then\n        set [y v] to [12]\n    end\nend\n\nwhen I receive [diğerbölüm v]\nchange [level v] by (1)\n\nwhen flag clicked\nset [level v] to [1]\n\n@Kukla 1\n\nwhen flag clicked\nhide variable [level v]\n\nwhen I receive [başla v]\nhide\n\nwhen flag clicked\nshow\n\n@Kukla 2\n\nwhen this sprite clicked\nbroadcast (başla v)\n\nwhen I receive [başla v]\nhide\n\nwhen flag clicked\nforever\n    if <touching (mouse-pointer v)?> then\n        set size to (105) %\n    else\n        set size to (100) %\n    end\nend\n\nwhen flag clicked\nshow\n\n@Kukla 3\n\nwhen flag clicked\nhide\ngo to x: (211) y: (-226)\n\nwhen I receive [başla v]\nshow\ngo to [front v] layer\n\nwhen this sprite clicked\nbroadcast (diğerbölüm v)\n\nwhen flag clicked\nforever\n    if <[14] = (level)> then\n        hide\n    end\nend\n\n@Kukla 4\n\nwhen flag clicked\nhide\ngo to x: (129) y: (-226)\n\nwhen I receive [başla v]\nshow\ngo to [front v] layer\n\nwhen this sprite clicked\nbroadcast (tekrar v)\n\nwhen flag clicked\nforever\n    if <[14] = (level)> then\n        hide\n    end\nend\n\n@Yer\n\nwhen flag clicked\nswitch costume to (kostüm 1 v)\nhide\n\nwhen I receive [başla v]\nshow\n\nwhen I receive [diğerbölüm v]\nnext costume\n\n@dikenler\n\nwhen flag clicked\nswitch costume to (kostüm1 v)\nhide\n\nwhen I receive [başla v]\nshow\n\nwhen I receive [diğerbölüm v]\nnext costume\n\n@zıplamaaleti\n\nwhen flag clicked\nhide\n\nwhen I receive [başla v]\nswitch costume to (kostüm1 v)\nshow\n\nwhen I receive [diğerbölüm v]\nnext costume\n\n@Pen\n\ndefine render\nerase all\nset [i v] to [1]\nrepeat (length of [x v])\n    pen up\n    set pen size to (40)\n    set pen color to (#ffda66)\n    go to x: (item (i) of [x v]) y: (item (i) of [y v])\n    pen down\n    pen up\n    go to x: (item (i) of [x v]) y: (item (i) of [y v])\n    pen down\n    replace item (i) of [x v] with ((item (i) of [x v]) + (item (i) of [xv v]))\n    replace item (i) of [y v] with ((item (i) of [y v]) + (item (i) of [yv v]))\n    replace item (i) of [yv v] with ((item (i) of [yv v]) - (0.3))\n    set [i2 v] to [1]\n    if <(item (i) of [y v]) < [-250]> then\n        delete dot\n    end\n    change [i v] by (i2)\nend\n\nset pen (color v) to (10)\n\ndefine spawn dots\nadd [0] to [x v]\nadd [-180] to [y v]\nadd (pick random (-5) to (5)) to [xv v]\nadd (pick random (9) to (12)) to [yv v]\nadd (pick random (1) to (200)) to [color v]\n\nwhen flag clicked\ndelete all of [x v]\ndelete all of [xv v]\ndelete all of [y v]\ndelete all of [yv v]\ndelete all of [color v]\nforever\n    spawn dots\n    render\nend\n\ndefine delete dot\nset [i2 v] to [0]\ndelete (i) of [x v]\ndelete (i) of [xv v]\ndelete (i) of [y v]\ndelete (i) of [yv v]\ndelete (i) of [color v]\n\n