~ Summer platformer ~「〜夏のプラットフォーマー〜」

Instructions: My latest game IMPOSTOR is here\n⫸  https://scratch.mit.edu/projects/474734122/\n————————————————————\nFruit Ninja Platformer\n\n➊ USE arrow keys, ASDW, touchscreen or mouse.\n➋ GRAB fruit - get COMBOS by grabbing in the air.\n➌ DODGE bombs - or grab the BOMB DEFLECT.\n\nFirst 100 to love and comment win chance to be added to the credit crew!\n---------- IPad, tablet, and mobile friendly ---------\n\n-----------------------Search Tags-----------------------\n#games #fruit #ninja #platformer #platform #music #animation #mobile   #atomicmagicnumber  \n---------------------------------------------------------------\nPro cheat - to thank you for reading this stuff:\nAt the end of the game... click your Ninja once to double your score!

@Stage\n\nwhen flag clicked\nswitch backdrop to (random backdrop v)\n\nwhen I receive [zmiana poziomu v]\nif <(poziom) = [3]> then\n    switch backdrop to (tło1 v)\nend\n\n@kocur\n\ndefine Platforma (wysoki skok) (grawitacja) (tarcie) (prędkość biegania)\nswitch costume to (kitek ciapek hitbox v)\nif <<key (right arrow v) pressed?> or <key (d v) pressed?>> then\n    point in direction (-90)\n    change [prędkość x v] by (prędkość biegania)\nend\nif <<key (left arrow v) pressed?> or <key (a v) pressed?>> then\n    point in direction (90)\n    change [prędkość x v] by ((prędkość biegania) * (-1))\nend\nset [prędkość x v] to ((Prędkość X) * (tarcie))\nchange x by (Prędkość X)\nif <<touching (poziom v)?> or <touching (poziom2 v)?>> then\n    set [nachylenie v] to [0]\n    repeat until <<(Nachylenie) = [8]> or <not <touching (poziom v)?>>>\n        change [nachylenie v] by (1)\n        change y by (1)\n    end\n    if <<touching (poziom v)?> or <touching (poziom2 v)?>> then\n        change y by ((Nachylenie) * (-1))\n        repeat ([ceiling v] of ([abs v] of (Prędkość X) ) )\n            if <<touching (poziom v)?> or <touching (poziom2 v)?>> then\n                change x by ((([abs v] of (Prędkość X) ) / (Prędkość X)) * (-1))\n            end\n        end\n        set [prędkość x v] to [0]\n    end\nend\nchange y by (Prędkość Y)\nif <<touching (poziom v)?> or <touching (poziom2 v)?>> then\n    repeat ([ceiling v] of ([abs v] of (Prędkość Y) ) )\n        if <<touching (poziom v)?> or <touching (poziom2 v)?>> then\n            change y by ((([abs v] of (Prędkość Y) ) / (Prędkość Y)) * (-1))\n        end\n    end\n    if <<(([abs v] of (Prędkość Y) ) / (Prędkość Y)) = [-1]> and <<key (up arrow v) pressed?> or <key (w v) pressed?>>> then\n        set [prędkość y v] to (wysoki skok)\n    else\n        set [prędkość y v] to [0]\n    end\nelse\n    change [prędkość y v] by (-1)\nend\nchange [scrollx v] by ((x position) * (-1))\nchange [scrolly v] by ((y position) * (-1))\ngo to x: (0) y: (0)\nswitch costume to (kitek ciapek stoi6 v)\nif <[1] < ([abs v] of (Prędkość X) )> then\n    switch costume to (kostium)\nend\nif <(Prędkość Y) > [1]> then\n    switch costume to (kitek ciapek stoi2 v)\nend\nif <(Prędkość Y) < [-1]> then\n    switch costume to (kitek ciapek stoi4 v)\nend\n\nwhen flag clicked\nset [x v] to [0]\nset [y v] to [0]\nset [scrollx v] to [0]\nset [scrolly v] to [0]\nset [prędkość x v] to [0]\nset [prędkość y v] to [0]\ngo to x: (0) y: (0)\nforever\n    broadcast (rusz światem v)\nend\n\nwhen I receive [rusz światem v]\nPlatforma [16] [-1] [0.7] [2.1]\n\nwhen flag clicked\nset [kostium v] to [0]\n\nwhen flag clicked\nforever\n    change [kostium v] by (1)\n    if <(kostium) > [8]> then\n        set [kostium v] to [2]\n    end\n    wait (0.031) seconds\nend\n\nwhen flag clicked\nset [kostium v] to [0]\n\nwhen I receive [zmiana poziomu v]\nif <(poziom) = [2]> then\n    set [x v] to [0]\n    set [y v] to [0]\n    set [scrollx v] to [-63]\n    set [scrolly v] to [100]\n    set [prędkość x v] to [0]\n    set [prędkość y v] to [0]\n    go to x: (0) y: (0)\n    set [scrollx v] to [63]\n    set [scrolly v] to [100]\nend\n\nchange [prędkość y v] by (20)\n\nchange [prędkość x v] by (-10)\n\nwhen I receive [zmiana poziomu v]\nif <(poziom) = [3]> then\n    set [x v] to [0]\n    set [y v] to [0]\n    set [scrollx v] to [-63]\n    set [scrolly v] to [100]\n    set [prędkość x v] to [0]\n    set [prędkość y v] to [0]\n    go to x: (0) y: (0)\n    set [scrollx v] to [63]\n    set [scrolly v] to [100]\nend\n\nset [poziom v] to [3]\nbroadcast (zmiana poziomu v)\n\n@tło\n\nwhen I receive [rusz światem v]\ngo to x: ((Scrollx) / (20)) y: ((Scrolly) / (14))\ngo to [back v] layer\nswitch costume to (poziom)\n\nwhen flag clicked\nforever\n    play sound [SMG2 - Battle Belt Galaxy v] until done\nend\n\n@tło2\n\nwhen I receive [rusz światem v]\ngo to x: ((Scrollx) / (10)) y: ((Scrolly) / (7))\ngo to [back v] layer\ngo [forward v] (3) layers\nswitch costume to (poziom)\n\n@tło3\n\nwhen I receive [rusz światem v]\ngo to x: ((Scrollx) / (7)) y: ((Scrolly) / (5))\ngo to [back v] layer\ngo [forward v] (2) layers\nswitch costume to (poziom)\n\n@żarełko\n\nwhen I receive [żarełko v]\nstart sound [Bite v]\n\nwhen I receive [rusz światem v]\nif <[0] < (i)> then\n    go to x: ((Scrollx) - (x)) y: ((Scrolly) - (y))\n    go to [front v] layer\n    go [backward v] (2) layers\n    if <not <<(x position) = ((Scrollx) - (x))> and <(y position) = ((Scrolly) - (y))>>> then\n        hide\n    else\n        show\n    end\nend\n\nwhen flag clicked\nset [cooldown żarełka v] to [nie]\nset [i v] to [1]\nhide\nustawienie klonów\n\nwhen [space v] key pressed\nadd ((Scrollx) - (mouse x)) to [żarełka v]\nadd ((Scrolly) - (mouse y)) to [żarełka v]\n\ndefine ustawienie klonów\nset [i v] to [1]\nrepeat until <(i) > (length of [żarełka v])>\n    set [x v] to (item (i) of [żarełka v])\n    change [i v] by (1)\n    set [y v] to (item (i) of [żarełka v])\n    change [i v] by (1)\n    create clone of (_myself_ v)\nend\nset [i v] to [0]\n\nwhen I receive [rusz światem v]\nset [y v] to ((y) + (([sin v] of (((timer) - (1)) * (80)) ) * (0.4)))\n\nwhen I start as a clone\nwait until <touching (kocur v)?>\nif <(cooldown żarełka) = [nie]> then\n    natychmiast qurewa\n    delete this clone\nend\n\ndefine natychmiast qurewa\nset [cooldown żarełka v] to [tak]\nbroadcast (żarełko v)\nchange [zebrane żarełka v] by (1)\nset [cooldown żarełka v] to [nie]\n\nwhen I receive [zmiana poziomu v]\nif <(poziom) = [3]> then\n    ustawienie klonów p.3\nelse\n    ustawienie klonów p.2\nend\n\ndefine ustawienie klonów p.2\nset [i v] to [1]\nrepeat until <(i) > (length of [żarełka p.2 v])>\n    set [x v] to (item (i) of [żarełka p.2 v])\n    change [i v] by (1)\n    set [y v] to (item (i) of [żarełka p.2 v])\n    change [i v] by (1)\n    create clone of (_myself_ v)\nend\nset [i v] to [0]\n\nustawienie klonów p.2\n\nwhen [g v] key pressed\nadd ((Scrollx) - (mouse x)) to [żarełka p.2 v]\nadd ((Scrolly) - (mouse y)) to [żarełka p.2 v]\n\ndefine ustawienie klonów p.3\nset [i v] to [1]\nrepeat until <(i) > (length of [żarełka p.3 v])>\n    set [x v] to (item (i) of [żarełka p.3 v])\n    change [i v] by (1)\n    set [y v] to (item (i) of [żarełka p.3 v])\n    change [i v] by (1)\n    create clone of (_myself_ v)\nend\nset [i v] to [0]\n\nwhen [v v] key pressed\nadd ((Scrollx) - (mouse x)) to [żarełka p.3 v]\nadd ((Scrolly) - (mouse y)) to [żarełka p.3 v]\n\n@efekt żarcia\n\nwhen I receive [żarełko v]\nustaw klony\n\nwhen I start as a clone\ngo to x: ([x position v] of [kocur v]) y: ([y position v] of [kocur v])\nshow\nset [kierunek v] to (pick random (-40) to (40))\npoint in direction (kierunek)\nshow\nset size to (pick random (80) to (150)) %\nset [color v] effect to (pick random (0) to (10))\nset [ghost v] effect to (pick random (0) to (50))\nforever\n    if <(brędkość) < [50]> then\n        if <not <<(kierunek) > [-2]> and <[2] > (kierunek)>>> then\n            if <<(direction) < [180]> and <[0] < (direction)>> then\n                repeat until <(direction) = [170]>\n                    turn right (1) degrees\n                end\n            else\n                repeat until <(direction) = [-170]>\n                    turn left (1) degrees\n                end\n            end\n        end\n    end\nend\n\nwhen I start as a clone\nset [brędkość v] to (pick random (3.) to (7.))\nforever\n    move (brędkość) steps\n    if <[0] < (brędkość)> then\n        change [brędkość v] by (-0.07)\n    end\n    change y by (-0.6)\nend\n\nwhen I start as a clone\nrepeat (33)\n    set [duch v] to [3]\n    change [ghost v] effect by (duch)\nend\ndelete this clone\n\ndefine ustaw klony\nrepeat (30)\n    create clone of (_myself_ v)\nend\n\ndelete all of [żarełka v]\n\n@efekt żarcia2\n\nwhen I receive [żarełko v]\ngo to x: ([x position v] of [kocur v]) y: ([y position v] of [kocur v])\nshow\nset size to (100) %\nset [ghost v] effect to (0)\nrepeat (70)\n    change [ghost v] effect by (4)\n    change size by (15)\nend\nhide\n\nwhen flag clicked\nhide\n\n@licznik zebranych żarełek\n\nwhen I receive [rusz światem v]\ngo to [front v] layer\nswitch costume to (zebrane żarełka)\n\nwhen flag clicked\nset [poziom v] to [1]\nset [zebrane żarełka v] to [0]\nshow\nwait until <(zebrane żarełka) = [5]>\nbroadcast (kurtyna v)\n\nchange [poziom v] by (1)\n\nbroadcast (nowy poziom v)\n\nset [zebrane żarełka v] to [0]\n\nwhen flag clicked\n\nwhen I receive [nowy poziom v]\nwait until <(zebrane żarełka) = [5]>\nbroadcast (kurtyna v)\n\nwhen I receive [fgdafg v]\nhide\n\nbroadcast (kurtyna v)\n\n@ozdoby tylne\n\nwhen flag clicked\nset [scrollx v] to [0]\nset [scrolly v] to [0]\n\nwhen I receive [rusz światem v]\nustaw mnei ([x position v] of [poziom v]) ([y position v] of [poziom v])\ngo to [back v] layer\ngo [forward v] (4) layers\nswitch costume to (kostium2 v)\nset size to (200) %\nif <(poziom) = [1]> then\n    switch costume to (e. platformy)\nend\nif <not <(poziom) = [1]>> then\n    switch costume to ((poziom) + (1))\nend\n\ndefine ustaw mnei (x) (y)\ngo to x: (x) y: (y)\n\n@poziom2\n\nwhen I receive [rusz światem v]\ngo to x: (Scrollx) y: (Scrolly)\nif <not <<(x position) = (Scrollx)> and <(y position) = (Scrolly)>>> then\n    hide\nelse\n    if <(poziom) = [1]> then\n        show\n    else\n        hide\n    end\nend\nswitch costume to (costume2 v)\nset size to (200) %\nswitch costume to (e. platformy)\n\nwhen flag clicked\nforever\n    set [e. platformy v] to [1]\n    wait (7) seconds\n    set [e. platformy v] to [2]\n    wait (7) seconds\nend\n\nwhen I receive [nowy poziom v]\nhide\n\n@przekierowanie screen\n\nwhen I receive [nowy poziom v]\ngo to x: (0) y: (0)\nset x to (-400)\nshow\nswitch costume to (poziom)\nset [prędkość v] to [50]\nforever\n    if <not <[-100] < (x position)>> then\n        change x by (prędkość)\n        change [prędkość v] by (10)\n    else\n        if <not <[45] < (x position)>> then\n            set [prędkość v] to [1]\n            change x by (prędkość)\n        else\n            set [prędkość v] to [50]\n            repeat (100)\n                change x by (prędkość)\n                change [prędkość v] by (10)\n            end\n            hide\n            stop [this script v]\n        end\n    end\nend\n\nwhen flag clicked\nshow\ngo to [front v] layer\ngo [backward v] (1) layers\nhide\n\nwhen flag clicked\nwait (1) seconds\nbroadcast (nowy poziom v)\n\n@e platformy\n\nwhen flag clicked\nset [scrollx v] to [0]\nset [scrolly v] to [0]\nshow\n\nwhen I receive [rusz światem v]\nustaw mnei ([x position v] of [poziom v]) ([y position v] of [poziom v])\ngo to [back v] layer\ngo [forward v] (6) layers\nswitch costume to (kostium2 v)\nset size to (200) %\nswitch costume to (e. platformy)\nif <(e. platformy) = [2]> then\n    set [ghost v] effect to (10)\nelse\n    set [ghost v] effect to (0)\nend\nif <[1] = (poziom)> then\n    show\nelse\n    hide\nend\n\ndefine ustaw mnei (x) (y)\ngo to x: (x) y: (y)\n\nwhen I receive [nowy poziom v]\nhide\n\nchange [zebrane żarełka v] by (1)\n\n@kurtyna\n\nwhen flag clicked\nswitch costume to (kostium1 v)\nset [ghost v] effect to (100)\nforever\n    show\n    go to [front v] layer\nend\n\nwhen I receive [kurtyna v]\nrepeat (50)\n    change [ghost v] effect by (-2)\nend\nif <<(poziom) = [1]> or <(poziom) = [2]>> then\n    change [poziom v] by (1)\n    set [zebrane żarełka v] to [0]\n    broadcast (zmiana poziomu v)\n    switch costume to (kostium1 v)\n    repeat (50)\n        change [ghost v] effect by (2)\n    end\n    broadcast (nowy poziom v)\nelse\n    switch costume to (kostium2 v)\n    broadcast (fgdafg v)\nend\n\nwait (1) seconds\n\nset [ghost v] effect to (100)\n\n@Duszek1\n\nwhen flag clicked\nset [ghost v] effect to (100)\nforever\n    go to [front v] layer\n    go to [front v] layer\nend\n\n@poziom\n\nwhen flag clicked\nforever\n    set [e. platformy v] to [1]\n    wait (7) seconds\n    set [e. platformy v] to [2]\n    wait (7) seconds\nend\n\nwhen I receive [rusz światem v]\n\nwhen flag clicked\nforever\n    go to x: (Scrollx) y: (Scrolly)\n    switch costume to (costume2 v)\n    set size to (200) %\n    switch costume to (poziom)\nend\n\n@cienie\n\nwhen flag clicked\nset [scrollx v] to [0]\nset [scrolly v] to [0]\n\nwhen I receive [rusz światem v]\n\nwhen I receive [rusz światem v]\n\nwhen flag clicked\nforever\n    go to x: (Scrollx) y: (Scrolly)\n    go to [front v] layer\n    go [backward v] (2) layers\n    if <not <<(x position) = (Scrollx)> and <(y position) = (Scrolly)>>> then\n        hide\n    else\n        show\n    end\n    switch costume to (kostium2 v)\n    set size to (200) %\n    switch costume to (poziom)\nend\n\n