APPLE PLATFORMER

Instructions: \nWITAJ W GRZE APPLE PLATFORMER!\nKLIKNIJ ZIELONĄ FLAGĘ,A POTEM ,,GRAJ".\nJABŁKIEM STERUJE SIĘ LITERAMI:\nW,A,D I STRZAŁKAMI:GÓRA PRAWO,LEWO.\nPOZIOMÓW JEST 30\nPRZESKAKUJ OSTRE NOŻE I OGIEŃ!UWAŻAJ TEŻ NA NIEWIDOCZNY NA STOLE GUZIK!\nDO ZOBACZENIA!                                      \nWELCOME TO THE APPLE PLATFORMER GAME!\nCLICK THE GREEN FLAG AND THEN "PLAY".\nAPPLE USED BY THE LETTERS:\nW, A, D AND ARROWS: UP RIGHT, LEFT.\nLEVELS 30\nSKIP SHARP KNIVES!\nSEE YOU SOON!\n\n\n\n

@Stage\n\nwhen flag clicked\nset [color v] effect to (0)\n\n@Player\n\nwhen flag clicked\nset [poziom v] to [1]\nhide\nforever\n    if <<(y position) = [-187]> or <<touching (spadające noże v)?> or <<touching (śmiertelny guzik v)?> or <<touching (duszek4 v)?> or <touching (przeszkody v)?>>>>> then\n        start sound [ups v]\n        repeat (20)\n            set [pozycja x v] to [0]\n            set [pozycja y v] to [0]\n            change [ghost v] effect by (10)\n        end\n        set [ghost v] effect to (0)\n        go to x: (-166) y: (20)\n        broadcast (dead v)\n    end\n    if <(x position) > [244]> then\n        go to x: (-166) y: (20)\n        broadcast (następny poziom v)\n        change [poziom v] by (1)\n    end\n    if <(Poziom) = [30]> then\n        broadcast (end v)\n    end\nend\n\nwhen I receive [play v]\ngo to [front v] layer\nshow\nswitch costume to (apple v)\nset size to (70) %\ngo to x: (-166) y: (20)\nset [poziom v] to [1]\nset [pozycja x v] to [0]\nset [pozycja y v] to [0]\npoint in direction (90)\nforever\n    change [pozycja y v] by (-1)\n    if <<<key (left arrow v) pressed?> or <key (a v) pressed?>> or <<mouse down?> and <(x position) > (mouse x)>>> then\n        change [pozycja x v] by (-0.8)\n        switch costume to (apple2 v)\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 (apple v)\n        change [pozycja x v] by (0.8)\n    end\n    set [pozycja x v] to ((POZYCJA X) * (0.9))\n    change x by (POZYCJA X)\n    if <touching (stolik v)?> then\n        change y by (1)\n    end\n    if <touching (stolik v)?> then\n        change y by (1)\n    end\n    if <touching (stolik v)?> then\n        change y by (1)\n    end\n    if <touching (stolik v)?> then\n        change y by (1)\n    end\n    if <touching (jabłuszka v)?> then\n        change y by (1)\n    end\n    if <touching (jabłuszka v)?> then\n        change y by (1)\n    end\n    if <touching (jabłuszka v)?> then\n        change y by (1)\n    end\n    if <touching (jabłuszka v)?> then\n        change y by (1)\n    end\n    if <<touching (jabłuszka v)?> or <touching (stolik v)?>> then\n        change y by (-4)\n        change x by ((POZYCJA X) * (-1))\n        if <<<key (up arrow v) pressed?> or <key (w v) pressed?>> or <<mouse down?> and <(mouse y) > (y position)>>> then\n            start sound [Jump v]\n            set [pozycja y v] to [10]\n            if <([abs v] of (POZYCJA X) ) = (POZYCJA X)> then\n                set [pozycja x v] to [-5]\n            else\n                set [pozycja x v] to [5]\n            end\n        else\n            set [pozycja x v] to [0]\n        end\n    end\n    change y by (POZYCJA Y)\n    if <<touching (stolik v)?> or <touching (jabłuszka v)?>> then\n        change y by ((0) - (POZYCJA Y))\n        set [pozycja y v] to [1]\n    end\n    change y by (-1)\n    if <<<<key (up arrow v) pressed?> or <key (w v) pressed?>> or <<mouse down?> and <(mouse y) > (y position)>>> and <<touching (stolik v)?> or <touching (jabłuszka v)?>>> then\n        start sound [Jump v]\n        set [pozycja y v] to [15]\n    end\n    if <(y position) > [180]> then\n        set [pozycja y v] to [0]\n    end\n    change y by (1)\nend\n\n@stolik\n\nwhen flag clicked\nset [poziom v] to [1]\nhide\nforever\n    switch costume to (Poziom)\nend\n\nwhen I receive [play v]\nshow\n\nwhen flag clicked\nforever\n    if <<(Poziom) = [9]> or <<(Poziom) = [19]> or <<(Poziom) = [4]> or <(Poziom) = [17]>>>> then\n        repeat (2)\n            create clone of (spadające noże v)\n            wait (0.40) seconds\n        end\n        wait (1) seconds\n    end\nend\n\nwhen flag clicked\nforever\n    if <(Poziom) = [12]> then\n        create clone of (śmiertelny guzik v)\n        wait (3) seconds\n    end\n    if <(Poziom) = [15]> then\n        create clone of (śmiertelny guzik v)\n        wait (3) seconds\n    end\n    if <(Poziom) = [20]> then\n        create clone of (śmiertelny guzik v)\n        wait (1) seconds\n    end\n    if <(Poziom) = [21]> then\n        create clone of (śmiertelny guzik v)\n        wait (1) seconds\n    end\n    if <(Poziom) = [23]> then\n        create clone of (śmiertelny guzik v)\n        wait (1.10) seconds\n    end\n    if <(Poziom) = [27]> then\n        create clone of (duszek4 v)\n        wait (1.3) seconds\n    end\n    if <(Poziom) = [28]> then\n        create clone of (duszek4 v)\n        wait (1.2) seconds\n    end\n    if <(Poziom) = [29]> then\n        create clone of (duszek4 v)\n        wait (1) seconds\n    end\nend\n\n@Duszek1\n\nwhen flag clicked\nhide\n\n@Graj\n\ndefine Start\npoint in direction (([cos v] of ((timer) * (-1200)) ) + (90))\nset y to (([cos v] of ((timer) * (-200)) ) * (24))\nset x to (([cos v] of ((timer) * (-200)) ) * (40))\nif <touching (mouse-pointer v)?> then\n    change size by (((140) - (size)) / (3))\nelse\n    change size by (((110) - (size)) / (3))\nend\n\nwhen flag clicked\ngo to x: (0) y: (0)\nforever\n    Start\nend\n\nwhen this sprite clicked\nhide\nbroadcast (play v)\nswitch backdrop to (tło1 v)\n\nwhen I receive [button v]\nshow\n\nwhen I receive [play v]\nset size to (140) %\nswitch backdrop to (start v)\nhide\nforever\n    play sound [Rokita - Bija Mnie Niemcy \[Lufthansa remix\] v] until done\nend\n\n@Przeszkody\n\nwhen flag clicked\ngo [backward v] (4) layers\nset [poziom v] to [1]\nhide\nforever\n    switch costume to (Poziom)\nend\n\nwhen I receive [play v]\nshow\n\n@Jabłuszka\n\nwhen flag clicked\nhide\n\nwhen I receive [end v]\ngo to [front v] layer\nshow\n\n@spadające noże\n\nwhen I receive [play v]\nhide\n\nwhen I start as a clone\nshow\nswitch costume to (pick random (1) to (2))\ngo to x: (pick random (76) to (160)) y: (184)\nrepeat (70)\n    change y by (-8)\nend\ndelete this clone\n\nwhen flag clicked\nhide\n\n@Duszek2\n\nwhen I receive [end v]\nshow\ngo to x: (47) y: (17)\n\nwhen flag clicked\nhide\n\n@Intro\n\nwhen flag clicked\nbroadcast (Button v)\n\n@Śmiertelny guzik\n\nwhen I start as a clone\nforever\n    if <(Poziom) = [12]> then\n        show\n        go to x: (pick random (36) to (200)) y: (29)\n        wait (3) seconds\n        delete this clone\n    end\n    if <(Poziom) = [15]> then\n        show\n        go to x: (pick random (36) to (100)) y: (29)\n        wait (3) seconds\n        delete this clone\n    end\n    if <(Poziom) = [20]> then\n        show\n        go to x: (pick random (36) to (120)) y: (29)\n        wait (2) seconds\n        delete this clone\n    end\n    if <(Poziom) = [20]> then\n        show\n        go to x: (pick random (36) to (120)) y: (29)\n        wait (2) seconds\n        delete this clone\n    end\n    if <(Poziom) = [21]> then\n        show\n        go to x: (pick random (36) to (144)) y: (29)\n        wait (2) seconds\n        delete this clone\n    end\n    if <(Poziom) = [23]> then\n        show\n        go to x: (pick random (36) to (144)) y: (29)\n        wait (3) seconds\n        delete this clone\n    end\nend\n\nwhen flag clicked\nhide\n\n@Poz\n\nwhen flag clicked\nhide\n\nwhen I receive [play v]\nshow\nset size to (60) %\ngo to x: (-187) y: (147)\nforever\n    switch costume to (Poziom)\nend\n\n@Duszek3\n\nwhen I start as a clone\ngo to [back v] layer\nshow\ngo to x: (pick random (-180) to (180)) y: (180)\nset [ghost v] effect to (40)\nrepeat (200)\n    change y by (-2)\n    turn right (0.1) degrees\nend\ndelete this clone\n\nwhen flag clicked\nhide\n\nwhen I receive [play v]\nforever\n    wait (0.60) seconds\n    create clone of (_myself_ v)\nend\n\n@Duszek4\n\nwhen I start as a clone\nshow\ngo to [back v] layer\nif <(Poziom) = [27]> then\n    go to x: (pick random (-2) to (75)) y: (0)\n    set [ghost v] effect to (0)\n    repeat (10)\n        change [ghost v] effect by (10)\n    end\n    delete this clone\nend\nif <(Poziom) = [28]> then\n    go to x: (pick random (-30) to (75)) y: (0)\n    set [ghost v] effect to (0)\n    repeat (10)\n        change [ghost v] effect by (10)\n    end\n    delete this clone\nend\nif <(Poziom) = [29]> then\n    go to x: (pick random (-80) to (75)) y: (0)\n    set [ghost v] effect to (0)\n    repeat (10)\n        change [ghost v] effect by (10)\n    end\n    delete this clone\nend\n\nwhen flag clicked\nhide\n\n