PIRATE - a scrolling platformer // #wszystko

Instructions: NIE PISAĆ MI O EASTER EGGU W KOMACH WRY\n\n=================POLISH==================\n\nDla żądnych wiedzy, w grze znajduje się easter egg do najnowszej gry z serii Astra Tour, czyli Astra Tour 7 - siedem kryształów. Jeżeli go zamierzasz szukać posłuchaj podpowiedzi: "każda bariera jest ścianą, ale.."\n\nRuch:\na / strzałka w lewo - idź do lewej\nd / strzałka w prawo - idź do prawej\nw / strzałka do góry - skok\nspacja - atak\nL - zmień język\nr - tryb speedrunu (recommended after normal fun)\nm - muzyka on/off\n\nCel Gry:\nzbierz wszystkie monety (również zabijając wrogów) i dostań się do skrzyni ze skarbem pełnej złota!\n\n================ENGLISH==================\n\nFor knowledge hunters, there's an easter egg to brand new game from Astra Tour series, Astra Tour 7 - The seven crystals. If you want to look for it, then let me tell you a clue: "every barrier is a wall, but..."\n\nMovement:\na / left arrow - go to left\nd / right arrow - go to right\nw / up arrow - jump\nspace - attack\nL - chagne language\nr - speedrun mode (recommended after normal fun)\nm - music on/off\n\nGame destination:\nCollect all the coins (also from killing enemies) and get to the treasure chest full of gold!

@Stage\n\nwhen flag clicked\nset [scroll x v] to [0]\nbroadcast (piraci v)\nset [ultimate dźwięk v] to [100]\n\nwhen I receive [piraci v]\nstop [other scripts in sprite v]\nstop all sounds\nset volume to (ULTIMATE DŹWIĘK) %\nforever\n    if <[5000] < (SCROLL X)> then\n        play sound [Naval Action - Sea of Thieves Naval Battle Music Backround Atmosphere Music v] until done\n    else\n        play sound [Piraci z Gdańska2 v] until done\n    end\nend\n\nwhen I receive [kraken v]\nstop [other scripts in sprite v]\nstop all sounds\nset volume to (ULTIMATE DŹWIĘK) %\nforever\n    if <[6000] < (SCROLL X)> then\n        play sound [\[ Out of Control \] - Chariot Requiem's Theme - Golden Wind OST EXTENDED3 v] until done\n    else\n        play sound [The Kraken \(song\) v] until done\n    end\nend\n\nwhen I receive [tick v]\nif <(muzyka on/off) = [on]> then\n    set volume to (ULTIMATE DŹWIĘK) %\nelse\n    set volume to (0) %\nend\n\nwhen I receive [reset v]\nif <(item (2) of [punkt respawnu v]) = [270]> then\n    stop [other scripts in sprite v]\n    stop all sounds\n    set volume to (ULTIMATE DŹWIĘK) %\n    forever\n        play sound [The Kraken \(song\) v] until done\n    end\nend\n\nwhen [m v] key pressed\nif <(muzyka on/off) = [on]> then\n    set [muzyka on/off v] to [off]\nelse\n    set [muzyka on/off v] to [on]\nend\n\nwhen flag clicked\nset [muzyka on/off v] to [on]\n\n@gracz\n\nwhen [r v] key pressed\nreplace item (1) of [punkt respawnu v] with [0]\nreplace item (2) of [punkt respawnu v] with [28]\nreset timer\nset [speedrun? v] to [tak]\nset [exit v] to [die]\n\nbroadcast (tryb speedrunu v)\n\nwhen flag clicked\nset [speedrun? v] to [nie]\n\nwhen I receive [armata! v]\n\nwhen flag clicked\nbroadcast (Green Flag v) and wait\nbroadcast (Play Game v) and wait\n\nwhen I receive [green flag v]\nhide\ngo to [front v] layer\n\nwhen I receive [play game v]\nset [stoper v.2 v] to [0]\nset [level v] to [1]\nforever\n    broadcast (Reset v) and wait\n    broadcast (Setup v) and wait\n    Game On\n    repeat until <(EXIT) > []>\n        Tick\n        broadcast (Tick v) and wait\n    end\n    if <(EXIT) = [win]> then\n        Game - Win\n    else\n        broadcast (ŚMIERĆ v)\n        Game - Die\n    end\nend\n\ndefine Game On\nif <(speedrun?) = [tak]> then\n    replace item (1) of [punkt respawnu v] with [0]\n    replace item (2) of [punkt respawnu v] with [28]\n    reset timer\n    broadcast (tryb speedrunu v)\nend\nset [scroll x v] to (item (1) of [punkt respawnu v])\nset [scroll y v] to (item (2) of [punkt respawnu v])\nset [y v] to (item (2) of [punkt respawnu v])\nset [x v] to (item (1) of [punkt respawnu v])\nif <(item (1) of [punkt respawnu v]) = [0]> then\n    broadcast (piraci v)\nend\nif <(item (1) of [punkt respawnu v]) = [4150]> then\n    broadcast (Kraken v)\nend\nif <(item (1) of [punkt respawnu v]) = [5666]> then\n    broadcast (piraci v)\nend\nset [sx v] to [0]\nset [sy v] to [0]\nset [in air v] to [0]\nset [exit v] to []\nset [ghost v] effect to (0)\nset size to (80) %\nshow\n\ndefine Tick\nswitch costume to (hitbox v)\nif <<key (left arrow v) pressed?> or <key (a v) pressed?>> then\n    change [sx v] by (-1.8)\nend\nif <<key (right arrow v) pressed?> or <key (d v) pressed?>> then\n    change [sx v] by (1.8)\nend\nset [sx v] to ((sx) * (0.8))\nif <([abs v] of (sx) ) > [0.9]> then\n    Change Player x by (round (sx))\nend\nif <<key (up arrow v) pressed?> or <key (w v) pressed?>> then\n    if <(in air) < [4]> then\n        set [sy v] to [16]\n    end\nend\nif <(sy) > [-20]> then\n    change [sy v] by (-2)\nend\nif <(armata) = [tak]> then\n    set [sy v] to [30]\n    start sound [Guns- Cannon Sound EffectMexian Tech Vlog2 v]\n    set [armata v] to [nie]\nend\nChange Player y by (sy)\nTest - Die\nset [scroll x v] to (x)\nif <(SCROLL X) < [0]> then\n    set [scroll x v] to [0]\nend\nchange [scroll y v] by (round (((y) - (SCROLL Y)) / (10)))\nif <(SCROLL Y) < [0]> then\n    set [scroll y v] to [0]\nend\nPosition\nif <(y) < [-180]> then\n    set [exit v] to [die]\nend\nswitch costume to (gracz idyl v)\nif <<key (right arrow v) pressed?> or <key (d v) pressed?>> then\n    switch costume to (gracz prawo v)\n    point in direction (90)\nend\nif <<key (left arrow v) pressed?> or <key (a v) pressed?>> then\n    switch costume to (gracz prawo v)\n    point in direction (-90)\nend\nif <(in air) < [4]> then\n\ndefine Change Player y by (sy)\nchange [y v] by (sy)\nchange [in air v] by (1)\nPosition\nrepeat until <not <touching (platforms v)?>>\n    if <(sy) > [0]> then\n        change [y v] by (-1)\n    else\n        change [y v] by (1)\n        set [in air v] to [0]\n    end\n    Position\n    set [sy v] to [0]\nend\n\ndefine Position\ngo to x: ((x) - (SCROLL X)) y: ((y) - (SCROLL Y))\n\ndefine Change Player x by (sx)\nchange [x v] by (sx)\nPosition\nif <touching (platforms v)?> then\n    repeat (12)\n        change [y v] by (1)\n        Position\n        if <not <touching (platforms v)?>> then\n            stop [this script v]\n        end\n    end\n    change [y v] by (-12)\n    if <key (up arrow v) pressed?> then\n        if <(sx) > [0]> then\n            set [sx v] to [-16]\n        else\n            set [sx v] to [16]\n        end\n        set [in air v] to [0]\n    else\n        set [sx v] to [0]\n    end\n    repeat until <not <touching (platforms v)?>>\n        if <(sx) > [0]> then\n            change [x v] by (-1)\n        else\n            change [x v] by (1)\n        end\n        Position\n    end\nend\n\ndefine Game - Die\nif <(speedrun?) = [tak]> then\n    replace item (1) of [punkt respawnu v] with [0]\n    replace item (2) of [punkt respawnu v] with [28]\nend\nset [exit v] to []\nrepeat (5)\n    hide\n    wait (.1) seconds\n    show\n    wait (0.1) seconds\nend\nhide\nwait (0.5) seconds\n\ndefine Test - Die\nif <touching (kolce v)?> then\n    set [exit v] to [die]\nend\n\ndefine Game - Win\nrepeat (50)\n    point towards (exit v)\n    turn right (65) degrees\n    move ((distance to [exit v]) / (2)) steps\n    change size by (-1)\n    change [ghost v] effect by (2)\nend\nhide\nchange [level v] by (1)\nwait (1) seconds\n\nwhen I receive [tick v]\n\nwhen I receive [a w zęby chcesz? v]\nset [exit v] to [die]\n\nset [x v] to [9000]\nset [y v] to [400]\n\nset [x v] to [7000]\nset [y v] to [100]\n\nwhen I receive [tick v]\ngo to [front v] layer\ngo [backward v] (17) layers\n\nset [☁ highscore v] to [49.501]\n\n@Platforms\n\nwhen I receive [green flag v]\nhide\n\nwhen I receive [tick v]\nPosition ((x) - (SCROLL X)) ((y) - (SCROLL Y))\n\nwhen I receive [setup v]\nwait (0) seconds\nhide\nset [x v] to [0]\nset [y v] to [0]\nif <(LEVEL) = [1]> then\n    switch costume to (puste v)\n    Clone at x: [0] y: [0]\n    Clone at x: [360] y: [0]\n    Clone at x: [720] y: [0]\n    Clone at x: ((360) * (4)) y: [0]\n    Clone at x: ((360) * (6)) y: [0]\n    Clone at x: ((360) * (7)) y: [0]\n    Clone at x: ((360) * (8)) y: [0]\n    Clone at x: ((360) * (9)) y: [0]\n    Clone at x: ((360) * (10)) y: [0]\n    Clone at x: [4080] y: [0]\n    Clone at x: [4560] y: [0]\n    Clone at x: ((360) * (13)) y: [360]\n    Clone at x: [5160] y: [360]\n    Clone at x: [5540] y: [0]\n    Clone at x: [6020] y: [0]\n    Clone at x: ((6020) + ((480) * (1))) y: [0]\n    Clone at x: ((6020) + ((480) * (2))) y: [0]\n    Clone at x: ((6020) + ((480) * (3))) y: [0]\n    Clone at x: ((6020) + ((480) * (4))) y: [0]\n    Clone at x: ((6020) + ((480) * (5))) y: [0]\n    Clone at x: ((6020) + ((480) * (6))) y: [0]\n    Clone at x: ((6020) + ((480) * (7))) y: [0]\n    Clone at x: ((6020) + ((480) * (8))) y: [0]\nelse\n    if <(LEVEL) = [2]> then\n        switch costume to (level 2 1 v)\n        Clone at x: [0] y: [225]\n    else\n        if <(LEVEL) = [3]> then\n            switch costume to (amon2 v)\n        end\n    end\nend\n\ndefine Position (x) (y)\ngo to x: (x) y: (y)\nif <<(x) = (x position)> and <(y) = (y position)>> then\n    show\nelse\n    hide\nend\n\nwhen I receive [reset v]\ndelete this clone\n\ndefine Clone at x: (x) y: (y)\nset [x v] to (x)\nset [y v] to (y)\nnext costume\ncreate clone of (_myself_ v)\n\nnext costume\nnext costume\n\nwhen I receive [setup v]\nhide\nset [x v] to [0]\nset [y v] to [0]\n\nClone at x: ((6020) + ((480) * (2))) y: [0]\n\nClone at x: ((6020) + ((480) * (5))) y: [0]\n\nClone at x: ((360) * (7)) y: [0]\n\nClone at x: [4080] y: [0]\n\n@szabla\n\nwhen I receive [tick v]\ngo to (gracz v)\nchange y by (-10)\ngo to [front v] layer\ngo [backward v] (16) layers\nif <([direction v] of [gracz v]) = [90]> then\n    change x by (25)\n    switch costume to (atak)\nend\nif <([direction v] of [gracz v]) = [-90]> then\n    change x by (-25)\n    switch costume to ((atak) + (16))\nend\n\nwhen flag clicked\nforever\n    set [atak v] to [1]\n    wait (0.2) seconds\n    wait until <key (space v) pressed?>\n    start sound [Low Whoosh v]\n    repeat (8)\n        change [atak v] by (1)\n    end\n    wait (0.1) seconds\n    repeat (7)\n        change [atak v] by (1)\n    end\nend\n\nwhen I receive [śmierć v]\nśmierć\n\nwhen flag clicked\nshow\n\ndefine śmierć\nrepeat (5)\n    hide\n    wait (.1) seconds\n    show\n    wait (0.1) seconds\nend\nhide\nwait (0.5) seconds\nshow\n\n@armata\n\nwhen I receive [green flag v]\nhide\n\nwhen I receive [tick v]\nPosition ((x) - (SCROLL X)) ((y) - (SCROLL Y))\n\ndefine Position (x) (y)\nif <(ID) = [0]> then\n    hide\nelse\n    go to x: (x) y: (y)\n    if <<(x) = (x position)> and <(y) = (y position)>> then\n        show\n        switch costume to (jakata!)\n    else\n        hide\n    end\nend\n\nwhen [g v] key pressed\n\nadd (((SCROLL X) + ([x position v] of [gracz v])) + (mouse x)) to [x armat v]\nadd (((SCROLL Y) + ([y position v] of [gracz v])) + (mouse y)) to [y armat v]\n\ndefine utwórz klony, ale migiem!\nset [id v] to [1]\nrepeat (length of [x armat v])\n    set [x v] to (item (ID) of [x armat v])\n    set [y v] to (item (ID) of [y armat v])\n    create clone of (_myself_ v)\n    change [id v] by (1)\nend\nset [id v] to [0]\n\nwhen flag clicked\nset [armata v] to [nie]\nutwórz klony, ale migiem!\n\ndelete all of [x armat v]\ndelete all of [y armat v]\n\nwhen I start as a clone\nset [jakata! v] to [1]\nforever\n    if <touching (gracz v)?> then\n        set [armata v] to [tak]\n        repeat (10)\n            change [jakata! v] by (1)\n        end\n        repeat (10)\n            change [jakata! v] by (-1)\n        end\n    end\nend\n\nif <(ID) = [1]> then\n    broadcast (armata1 v)\nend\n\nreplace item (2) of [x armat v] with (SCROLL X)\n\nforever\n    delete (4) of [y armat v]\n    delete (4) of [x armat v]\nend\n\nbroadcast (urwea v)\n\nwhen I receive [urwea v]\ndelete this clone\n\n@tylne ozdóbki\n\nwhen I receive [green flag v]\nhide\n\nwhen I receive [tick v]\nPosition ((x) - (SCROLL X)) ((y) - (SCROLL Y))\n\nwhen I receive [setup v]\nhide\nset [x v] to [0]\nset [y v] to [0]\nif <(LEVEL) = [1]> then\n    switch costume to (puste v)\n    Clone at x: ((360) * (2)) y: [0]\n    Clone at x: ((360) * (4)) y: [0]\n    Clone at x: ((360) * (6)) y: [0]\n    Clone at x: ((360) * (7)) y: [360]\n    Clone at x: ((360) * (7)) y: [0]\n    Clone at x: ((1000) + ((360) * (6))) y: [0]\n    Clone at x: ((6020) + ((480) * (1))) y: [0]\n    Clone at x: ((6020) + ((480) * (2))) y: [0]\n    Clone at x: ((6020) + ((480) * (3.5))) y: [360]\n    Clone at x: ((6020) + ((480) * (4.5))) y: [360]\n    Clone at x: ((6020) + ((480) * (4))) y: [0]\n    Clone at x: ((6020) + ((480) * (5))) y: [0]\n    Clone at x: ((6020) + ((480) * (8))) y: [0]\n    Clone at x: ((6020) + ((480) * (5))) y: [0]\n    Clone at x: ((6020) + ((480) * (6))) y: [0]\nelse\n    if <(LEVEL) = [2]> then\n        switch costume to (level 2 1 v)\n        Clone at x: [0] y: [225]\n    else\n        if <(LEVEL) = [3]> then\n            switch costume to (amon2 v)\n        end\n    end\nend\n\ndefine Position (x) (y)\ngo to x: (x) y: (y)\nif <<(x) = (x position)> and <(y) = (y position)>> then\n    show\n    go to [back v] layer\n    go [forward v] (15) layers\nelse\n    hide\nend\n\nwhen I receive [reset v]\ndelete this clone\n\ndefine Clone at x: (x) y: (y)\nset [x v] to (x)\nset [y v] to (y)\nnext costume\ncreate clone of (_myself_ v)\n\nset [scroll x v] to [3800]\nset [scroll y v] to [200]\n\nbroadcast (wry v)\n\nwhen I receive [wry v]\ndelete this clone\n\n@wruk\n\nwhen flag clicked\nset [x v] to [250]\nset [y v] to [48]\ndelete all of [pozycja monety z wroga v]\nadd [obiekt] to [pozycja monety z wroga v]\nadd [obiekt] to [pozycja monety z wroga v]\nWIĘCEJ KLONÓW UURRRRRREEEEEEEEAAAAAAAAAa!!!!!!!!!! respawn x - []\n\ndefine TRZYMAJ WARTĘ: P.x - (p.x) P.y - (p.y) ------------------K.x - (k.x) K.y - (k.y) (rodzaj?)\nset [x v] to (p.x)\nset [y v] to (p.y)\nset [kostium v] to (rodzaj?)\nrepeat until <<(x) = (k.x)> or <(martwy?) = [tak]>>\n    change [x v] by (1)\nend\nset [kostium v] to ((rodzaj?) + (1))\nrepeat until <<(x) = (p.x)> or <(martwy?) = [tak]>>\n    change [x v] by (-1)\nend\n\ndefine WIĘCEJ KLONÓW UURRRRRREEEEEEEEAAAAAAAAAa!!!!!!!!!! respawn x - (pozycja x z odrodzenia)\nset [martwy? v] to [nie]\nset [kierunek v] to [90]\nset [kłudka1 v] to [nie]\nif <(pozycja x z odrodzenia) = [0]> then\n    set [id v] to [1]\n    repeat (length of [ilość wrogów v])\n        create clone of (_myself_ v)\n        change [id v] by (1)\n    end\n    set [id v] to [0]\nend\nif <(pozycja x z odrodzenia) = [1850]> then\n    set [id v] to [2]\n    repeat ((length of [ilość wrogów v]) - (1))\n        create clone of (_myself_ v)\n        change [id v] by (1)\n    end\n    set [id v] to [0]\nend\nif <(pozycja x z odrodzenia) = [4150]> then\n    set [id v] to [5]\n    repeat ((length of [ilość wrogów v]) - (4))\n        create clone of (_myself_ v)\n        change [id v] by (1)\n    end\n    set [id v] to [0]\nend\nif <(pozycja x z odrodzenia) = [5666]> then\n    set [id v] to [8]\n    repeat ((length of [ilość wrogów v]) - (7))\n        create clone of (_myself_ v)\n        change [id v] by (1)\n    end\n    set [id v] to [0]\nend\n\ndefine Position (x) (y)\nhide\nif <[0] < (ID)> then\n    point in direction (kierunek)\n    go to x: (x) y: (y)\n    if <<(x) = (x position)> and <(y) = (y position)>> then\n        show\n    else\n        hide\n    end\n    if <(martwy?) = [nie]> then\n        switch costume to (kostium)\n        if <(ID) = [4]> then\n            switch costume to (pirat-stoi v)\n        end\n        if <touching (gracz v)?> then\n            if <(kłudka1) = [nie]> then\n                broadcast (a w zęby chcesz? v)\n                set [kłudka1 v] to [tak]\n            end\n        end\n    end\nend\n\nwhen I receive [tick v]\nPosition ((x) - (SCROLL X)) ((y) - (SCROLL Y))\n\nwhen I start as a clone\nforever\n    if <(martwy?) = [nie]> then\n        if <(ID) = [1]> then\n            TRZYMAJ WARTĘ: P.x - [800] P.y - [-80] ------------------K.x - [1060] K.y - [-80] [1]\n        end\n        if <(ID) = [2]> then\n            TRZYMAJ WARTĘ: P.x - [2350] P.y - [-51] ------------------K.x - [2600] K.y - [-51] [1]\n        end\n        if <(ID) = [3]> then\n            TRZYMAJ WARTĘ: P.x - [2727] P.y - [-51] ------------------K.x - [2850] K.y - [-51] [1]\n        end\n        if <(ID) = [4]> then\n            TRZYMAJ WARTĘ: P.x - [3407] P.y - [130] ------------------K.x - [3407] K.y - [130] [1]\n        end\n        if <(ID) = [5]> then\n            TRZYMAJ WARTĘ: P.x - [3810] P.y - [-103] ------------------K.x - [4183] K.y - [-103] [5]\n        end\n        if <(ID) = [6]> then\n            TRZYMAJ WARTĘ: P.x - [4660] P.y - [181] ------------------K.x - [4860] K.y - [181] [5]\n        end\n        if <(ID) = [7]> then\n            TRZYMAJ WARTĘ: P.x - [5070] P.y - [265] ------------------K.x - [5250] K.y - [265] [5]\n        end\n        if <(ID) = [8]> then\n            TRZYMAJ WARTĘ: P.x - [6583] P.y - [-55] ------------------K.x - [6800] K.y - [-55] [9]\n        end\n        if <(ID) = [9]> then\n            TRZYMAJ WARTĘ: P.x - [7667] P.y - [220] ------------------K.x - [7892] K.y - [220] [9]\n        end\n        if <(ID) = [10]> then\n            TRZYMAJ WARTĘ: P.x - [7950] P.y - [220] ------------------K.x - [8230] K.y - [220] [9]\n        end\n    else\n        stop [this script v]\n    end\nend\n\nwhen I start as a clone\nforever\n    if <<touching (szabla v)?> and <<[1] < (atak)> and <(atak) < [9]>>> then\n        replace item (1) of [pozycja monety z wroga v] with (x)\n        replace item (2) of [pozycja monety z wroga v] with (y)\n        broadcast (kolejna moneta v)\n        set [martwy? v] to [tak]\n        if <<<(ID) = [3]> or <<(ID) = [2]> or <(ID) = [1]>>> or <(ID) = [4]>> then\n            switch costume to (pirat-ginie v)\n        else\n            switch costume to (potwór-ginie v)\n        end\n        if <(ID) = [8]> then\n            switch costume to (żołnierz brytyjski-ginie v)\n        end\n        if <<(ID) = [9]> or <(ID) = [10]>> then\n            switch costume to (żołnierz brytyjski-ginie v)\n        end\n        go to [front v] layer\n        start sound [PIRATE ARRR ARGH SOUND EFFECT - Daily FREE VOICE SFX Download v]\n        set [prędkość \(zdech\) v] to [5]\n        repeat until <(x position) < [-170]>\n            change [y v] by (prędkość \(zdech\))\n            change [prędkość \(zdech\) v] by (-0.25)\n            change [kierunek v] by (5)\n        end\n        hide\n    end\nend\n\nwhen I receive [reset v]\ndelete this clone\n\nwhen I receive [reset v]\nwait (0.1) seconds\nWIĘCEJ KLONÓW UURRRRRREEEEEEEEAAAAAAAAAa!!!!!!!!!! respawn x - (item (1) of [punkt respawnu v])\n\nreplace item (4) of [y monet v] with [-20]\n\n@licznik monet\n\nwhen flag clicked\nset [monety v] to [0]\nshow\n\nwhen I receive [tick v]\nswitch costume to (monety)\ngo to [front v] layer\ngo [backward v] (2) layers\n\nwhen I receive [reset v]\nif <(item (1) of [punkt respawnu v]) = [0]> then\n    set [monety v] to [0]\nend\nif <(item (1) of [punkt respawnu v]) = [1850]> then\n    set [monety v] to [3]\nend\nif <(item (1) of [punkt respawnu v]) = [4150]> then\n    set [monety v] to [9]\nend\nif <(item (1) of [punkt respawnu v]) = [5666]> then\n    set [monety v] to [17]\nend\n\n@monety\n\nwhen [h v] key pressed\nadd (((SCROLL X) + ([x position v] of [gracz v])) + (mouse x)) to [x monet v]\nadd (((SCROLL Y) + ([y position v] of [gracz v])) + (mouse y)) to [y monet v]\n\nwhen flag clicked\ntwórz klony lolz wry: [0]\n\ndefine twórz klony lolz wry: (wry)\nif <(wry) = [0]> then\n    set [id v] to [1]\n    repeat (length of [x monet v])\n        set [x v] to (item (ID) of [x monet v])\n        set [y v] to (item (ID) of [y monet v])\n        create clone of (_myself_ v)\n        change [id v] by (1)\n    end\nend\nif <(wry) = [1850]> then\n    set [id v] to [3]\n    repeat ((length of [x monet v]) - (2))\n        set [x v] to (item (ID) of [x monet v])\n        set [y v] to (item (ID) of [y monet v])\n        create clone of (_myself_ v)\n        change [id v] by (1)\n    end\nend\nif <(wry) = [4150]> then\n    set [id v] to [6]\n    repeat ((length of [x monet v]) - (5))\n        set [x v] to (item (ID) of [x monet v])\n        set [y v] to (item (ID) of [y monet v])\n        create clone of (_myself_ v)\n        change [id v] by (1)\n    end\nend\nif <(wry) = [5666]> then\n    set [id v] to [11]\n    repeat ((length of [x monet v]) - (10))\n        set [x v] to (item (ID) of [x monet v])\n        set [y v] to (item (ID) of [y monet v])\n        create clone of (_myself_ v)\n        change [id v] by (1)\n    end\nend\nset [id v] to [0]\n\ndefine Position (x) (y)\nif <(ID) = [0]> then\n    hide\nelse\n    go to x: (x) y: (y)\n    if <<(x) = (x position)> and <(y) = (y position)>> then\n        show\n    else\n        hide\n    end\nend\n\nwhen I receive [tick v]\nPosition ((x) - (SCROLL X)) (((y) - (SCROLL Y)) + (([sin v] of (((timer) - (5)) * (300)) ) * (5)))\n\ndelete all of [y monet v]\ndelete all of [x monet v]\n\nwhen I start as a clone\nwait until <touching (gracz v)?>\nstart sound [Coin v]\nchange [monety v] by (1)\ndelete this clone\n\nwhen I receive [kolejna moneta v]\nif <(ID) = [0]> then\n    set [id v] to [1]\n    set [x v] to (item (1) of [pozycja monety z wroga v])\n    set [y v] to ((item (2) of [pozycja monety z wroga v]) + (5))\n    create clone of (_myself_ v)\n    set [id v] to [0]\nend\n\nwhen I receive [reset v]\ndelete this clone\n\nwhen I receive [reset v]\nwait (0.1) seconds\ntwórz klony lolz wry: (item (1) of [punkt respawnu v])\n\nif <[] = [0]> then\nif <[] = [1850]> then\nif <[] = [4150]> then\nif <[] = [5666]> then\n\n@miniaturka\n\nwhen flag clicked\nhide\n\ngo to [front v] layer\n\n@napisy\n\ndefine position (x) (y)\ngo to x: (x) y: (y)\nif <<([abs v] of ((x) - (x position)) ) < [1]> and <([abs v] of ((y) - (y position)) ) < [1]>> then\n    show\nelse\n    hide\nend\n\ndefine Show Tip (id) (x) (y)\nif <(id) = (costume [number v])> then\n    set [x v] to (x)\n    set [y v] to (y)\n    if <(fade) > [0]> then\n        change [fade v] by (-5)\n        set [ghost v] effect to (fade)\n    end\nelse\n    if <(fade) < [100]> then\n        change [fade v] by (10)\n        set [ghost v] effect to (fade)\n    else\n        switch costume to (id)\n        set [x v] to (x)\n        set [y v] to (y)\n        if <(costume [number v]) = [1]> then\n            hide\n        end\n    end\nend\nif <(costume [number v]) = [24]> then\n    position (x) ((y) - ((15) - ((15) * ([cos v] of (fade) ))))\nelse\n    if <(costume [number v]) > [1]> then\n        position (((x) - (SCROLL X)) * (1.2)) ((((y) - (SCROLL Y)) * (1.2)) - ((15) - ((15) * ([cos v] of (fade) ))))\n    end\nend\n\nwhen flag clicked\nhide\nswitch costume to (none v)\nset [ghost v] effect to (100)\nset [fade v] to [100]\nset [język v] to [Polski]\n\nwhen [l v] key pressed\nif <(JĘZYK) = [Angielski]> then\n    set [język v] to [Polski]\nelse\n    set [język v] to [Angielski]\nend\n\nwhen I receive [tick v]\nif <(JĘZYK) = [Angielski]> then\n    if <(speedrun?) = [nie]> then\n        if <[9430] < (SCROLL X)> then\n            Show Tip (12) (9600) (100)\n        else\n            if <[6800] < (SCROLL X)> then\n                Show Tip (1) (5100) (350)\n            else\n                if <[6600] < (SCROLL X)> then\n                    Show Tip (11) (6700) (70)\n                else\n                    if <[5250] < (SCROLL X)> then\n                        Show Tip (1) (5100) (350)\n                    else\n                        if <[5000] < (SCROLL X)> then\n                            Show Tip (10) (5100) (350)\n                        else\n                            if <[4600] < (SCROLL X)> then\n                                Show Tip (1) (4400) (100)\n                            else\n                                if <[4325] < (SCROLL X)> then\n                                    Show Tip (9) (4500) (100)\n                                else\n                                    if <[3800] < (SCROLL X)> then\n                                        Show Tip (1) (3600) (300)\n                                    else\n                                        if <[3500] < (SCROLL X)> then\n                                            Show Tip (8) (3600) (300)\n                                        else\n                                            if <[3000] < (SCROLL X)> then\n                                                Show Tip (1) (2840) (85)\n                                            else\n                                                if <[2740] < (SCROLL X)> then\n                                                    Show Tip (7) (2840) (85)\n                                                else\n                                                    if <[1700] < (SCROLL X)> then\n                                                        Show Tip (1) (1550) (85)\n                                                    else\n                                                        if <[1400] < (SCROLL X)> then\n                                                            Show Tip (6) (1550) (85)\n                                                        else\n                                                            if <[1250] < (SCROLL X)> then\n                                                                Show Tip (1) (1100) (90)\n                                                            else\n                                                                if <[900] < (SCROLL X)> then\n                                                                    Show Tip (5) (1100) (90)\n                                                                else\n                                                                    if <[500] < (SCROLL X)> then\n                                                                        Show Tip (4) (700) (100)\n                                                                    else\n                                                                        if <[250] < (SCROLL X)> then\n                                                                            Show Tip (3) (400) (100)\n                                                                        else\n                                                                            if <[-1] < (SCROLL X)> then\n                                                                                Show Tip (2) (20) (100)\n                                                                            end\n                                                                        end\n                                                                    end\n                                                                end\n                                                            end\n                                                        end\n                                                    end\n                                                end\n                                            end\n                                        end\n                                    end\n                                end\n                            end\n                        end\n                    end\n                end\n            end\n        end\n    else\n        hide\n    end\nend\n\nwhen I receive [tick v]\nif <(JĘZYK) = [Polski]> then\n    if <(speedrun?) = [nie]> then\n        if <[9430] < (SCROLL X)> then\n            Show Tip (23) (9600) (100)\n        else\n            if <[6800] < (SCROLL X)> then\n                Show Tip (1) (5100) (350)\n            else\n                if <[6600] < (SCROLL X)> then\n                    Show Tip (22) (6700) (70)\n                else\n                    if <[5250] < (SCROLL X)> then\n                        Show Tip (1) (5100) (350)\n                    else\n                        if <[5000] < (SCROLL X)> then\n                            Show Tip (21) (5100) (350)\n                        else\n                            if <[4600] < (SCROLL X)> then\n                                Show Tip (1) (4400) (100)\n                            else\n                                if <[4325] < (SCROLL X)> then\n                                    Show Tip (20) (4500) (100)\n                                else\n                                    if <[3800] < (SCROLL X)> then\n                                        Show Tip (1) (3600) (300)\n                                    else\n                                        if <[3500] < (SCROLL X)> then\n                                            Show Tip (19) (3600) (300)\n                                        else\n                                            if <[3000] < (SCROLL X)> then\n                                                Show Tip (1) (2840) (85)\n                                            else\n                                                if <[2740] < (SCROLL X)> then\n                                                    Show Tip (18) (2840) (85)\n                                                else\n                                                    if <[1700] < (SCROLL X)> then\n                                                        Show Tip (1) (1550) (85)\n                                                    else\n                                                        if <[1400] < (SCROLL X)> then\n                                                            Show Tip (17) (1550) (85)\n                                                        else\n                                                            if <[1250] < (SCROLL X)> then\n                                                                Show Tip (1) (1100) (90)\n                                                            else\n                                                                if <[900] < (SCROLL X)> then\n                                                                    Show Tip (16) (1100) (90)\n                                                                else\n                                                                    if <[500] < (SCROLL X)> then\n                                                                        Show Tip (15) (700) (100)\n                                                                    else\n                                                                        if <[250] < (SCROLL X)> then\n                                                                            Show Tip (14) (400) (100)\n                                                                        else\n                                                                            if <[-1] < (SCROLL X)> then\n                                                                                Show Tip (13) (20) (100)\n                                                                            end\n                                                                        end\n                                                                    end\n                                                                end\n                                                            end\n                                                        end\n                                                    end\n                                                end\n                                            end\n                                        end\n                                    end\n                                end\n                            end\n                        end\n                    end\n                end\n            end\n        end\n    else\n        hide\n    end\nend\n\n@efekt\n\nwhen flag clicked\nswitch costume to (kostium1 v)\nset [ghost v] effect to (0)\nset [das kłudken v] to [nie]\n\nwhen I receive [tick v]\ngo to [back v] layer\nswitch costume to (kostium1 v)\nif <(SCROLL X) > [3650]> then\n    set [ultimate dźwięk v] to (item ((SCROLL X) - (3650)) of [dźwięk intensiviesn't v])\nend\nif <(SCROLL X) > [3750]> then\n    switch costume to (kostium2 v)\n    go [forward v] (14) layers\n    set [ultimate dźwięk v] to (item ((SCROLL X) - (3750)) of [dźwięk intensivies v])\n    if <[3850] < (SCROLL X)> then\n        set [ultimate dźwięk v] to [100]\n    end\n    if <(SCROLL X) > [5500]> then\n        set [ultimate dźwięk v] to (item ((SCROLL X) - (5500)) of [dźwięk intensiviesn't v])\n        if <(SCROLL X) > [5600]> then\n            go to [front v] layer\n            switch costume to (kostium1 v)\n            set [ultimate dźwięk v] to (item ((SCROLL X) - (5600)) of [dźwięk intensivies v])\n            if <[5700] < (SCROLL X)> then\n                set [ultimate dźwięk v] to [100]\n            end\n        end\n    end\nend\nif <[7500] < (SCROLL X)> then\n    if <[40] > ([y v] of [gracz v])> then\n        if <[8323] > (SCROLL X)> then\n            go to [front v] layer\n            switch costume to (kostium3 v)\n            set [ultimate dźwięk v] to (item ((8323) - (SCROLL X)) of [dźwięk intensiviesn't v])\n        end\n        if <[8223] > (SCROLL X)> then\n            set [ultimate dźwięk v] to (item ((8223) - (SCROLL X)) of [dźwięk intensivies v])\n            if <(SCROLL X) < [8123]> then\n                set [ultimate dźwięk v] to [100]\n            end\n        end\n    end\nend\ngo [backward v] (1) layers\n\nwhen I receive [tick v]\ngo to x: (0) y: (0)\nif <(costume [number v]) = [1]> then\n    change [ghost v] effect by (2)\n    go to [front v] layer\n    go [backward v] (3) layers\n    if <(das kłudken) = [tak]> then\n        broadcast (piraci v)\n        set [das kłudken v] to [nie]\n    end\n    if <(efekt duch) < [100]> then\n        set [ghost v] effect to (efekt duch)\n        change [efekt duch v] by (2)\n    end\nend\nif <(costume [number v]) = [2]> then\n    if <(das kłudken) = [nie]> then\n        set [das kłudken v] to [tak]\n        set [efekt duch v] to [100]\n        broadcast (Kraken v)\n    end\n    if <[20] < (efekt duch)> then\n        set [ghost v] effect to (efekt duch)\n        change [efekt duch v] by (-2)\n    end\nend\nif <(costume [number v]) = [3]> then\n    set [efekt duch v] to (item ((8323) - (SCROLL X)) of [dźwięk intensiviesn't v])\n    set [ghost v] effect to (efekt duch)\n    if <(efekt duch) = []> then\n        if <(das kłudken) = [nie]> then\n            set [das kłudken v] to [tak]\n            set [efekt duch v] to [100]\n            broadcast (Kraken v)\n        end\n    end\n    go to (gracz v)\nend\n\n@kraken\n\nwhen I receive [green flag v]\nhide\n\nwhen I receive [tick v]\nif <<[1] = (ID)> or <(ID) = [5]>> then\n    Position (((x) - (SCROLL X)) * (1)) (((y) - (SCROLL Y)) + (([sin v] of (((timer) - (3)) * (250)) ) * (6)))\nend\nif <<[3] = (ID)> or <(ID) = [4]>> then\n    Position (((x) - (SCROLL X)) * (1)) (((y) - (SCROLL Y)) + (([sin v] of (((timer) - (1)) * (200)) ) * (6)))\nend\nif <<[2] = (ID)> or <(ID) = [6]>> then\n    Position (((x) - (SCROLL X)) * (1)) (((y) - (SCROLL Y)) + (([sin v] of (((timer) - (5)) * (270)) ) * (6)))\nend\n\nwhen I receive [setup v]\nhide\nset [x v] to [0]\nset [y v] to [0]\nif <(LEVEL) = [1]> then\n    set [id v] to [0]\n    switch costume to (puste v)\n    Clone at x: [4200] y: [300]\n    Clone at x: [4200] y: [-60]\n    Clone at x: [4680] y: [300]\n    Clone at x: [4680] y: [-60]\n    Clone at x: [5160] y: [-60]\n    Clone at x: [5160] y: [300]\nelse\n    if <(LEVEL) = [2]> then\n        switch costume to (level 2 1 v)\n        Clone at x: [0] y: [225]\n    else\n        if <(LEVEL) = [3]> then\n            switch costume to (amon2 v)\n        end\n    end\nend\n\ndefine Position (x) (y)\ngo to x: (x) y: (y)\nif <<([abs v] of ((x) - (x position)) ) < [1]> and <([abs v] of ((y) - (y position)) ) < [1]>> then\n    show\n    go to [back v] layer\n    go [forward v] (16) layers\nelse\n    hide\nend\n\nwhen I receive [reset v]\ndelete this clone\n\ndefine Clone at x: (x) y: (y)\nchange [id v] by (1)\nset [x v] to (x)\nset [y v] to (y)\nnext costume\ncreate clone of (_myself_ v)\n\nset [scroll x v] to [3800]\nset [scroll y v] to [200]\n\n@tła\n\nwhen flag clicked\ntworzenie klonów is my pejszyn// tła: [12]\n\ndefine tworzenie klonów is my pejszyn// tła: (ilość tłów)\nset [id v] to [0]\nrepeat (ilość tłów)\n    change [id v] by (1)\n    create clone of (_myself_ v)\nend\nset [id v] to [0]\n\nwhen I receive [tick v]\nhide\nif <[0] < (ID)> then\n    show\n    go to [back v] layer\n    go [forward v] (ID) layers\nend\nif <(ID) = [1]> then\n    ło cie panie // dzielnik x: [60] dzielnik y: [100] częstotliwość [150] amplituda [3] kostium [9] tajming XD: [0] dodaj y: [110]\n    set [ghost v] effect to (30)\n    set size to (85) %\nend\nif <(ID) = [2]> then\n    ło cie panie // dzielnik x: [60] dzielnik y: [100] częstotliwość [150] amplituda [3] kostium [8] tajming XD: [5] dodaj y: [110]\n    set [ghost v] effect to (30)\n    set size to (85) %\nend\nif <(ID) = [3]> then\n    ło cie panie // dzielnik x: [60] dzielnik y: [100] częstotliwość [150] amplituda [3] kostium [7] tajming XD: [2] dodaj y: [110]\n    set [ghost v] effect to (30)\n    set size to (85) %\nend\nif <(ID) = [4]> then\n    ło cie panie // dzielnik x: [35] dzielnik y: [35] częstotliwość [50] amplituda [2] kostium [6] tajming XD: [5] dodaj y: [0]\n    set [ghost v] effect to (80)\nend\nif <(ID) = [5]> then\n    ło cie panie // dzielnik x: [35] dzielnik y: [35] częstotliwość [100] amplituda [2] kostium [5] tajming XD: [7] dodaj y: [0]\nend\nif <(ID) = [6]> then\n    ło cie panie // dzielnik x: [35] dzielnik y: [35] częstotliwość [100] amplituda [2] kostium [4] tajming XD: [2] dodaj y: [0]\nend\nif <(ID) = [7]> then\n    ło cie panie // dzielnik x: [30] dzielnik y: [30] częstotliwość [150] amplituda [3] kostium [3] tajming XD: [2] dodaj y: [0]\nend\nif <(ID) = [8]> then\n    ło cie panie // dzielnik x: [30] dzielnik y: [30] częstotliwość [150] amplituda [3] kostium [12] tajming XD: [2] dodaj y: [0]\nend\nif <(ID) = [9]> then\n    ło cie panie // dzielnik x: [20] dzielnik y: [20] częstotliwość [150] amplituda [2] kostium [2] tajming XD: [1] dodaj y: [0]\nend\nif <(ID) = [10]> then\n    ło cie panie // dzielnik x: [20] dzielnik y: [20] częstotliwość [150] amplituda [2] kostium [10] tajming XD: [1] dodaj y: [0]\nend\nif <(ID) = [11]> then\n    ło cie panie // dzielnik x: [15] dzielnik y: [15] częstotliwość [150] amplituda [2] kostium [1] tajming XD: [0] dodaj y: [0]\nend\nif <(ID) = [12]> then\n    ło cie panie // dzielnik x: [15] dzielnik y: [15] częstotliwość [150] amplituda [2] kostium [11] tajming XD: [0] dodaj y: [0]\nend\n\ndefine ło cie panie // dzielnik x: (x) dzielnik y: (y) częstotliwość (częstotliwość) amplituda (amplituda) kostium (kostium) tajming XD: (timing) dodaj y: (dodaj y)\ngo to x: ((SCROLL X) / ((x) * (-1))) y: ((dodaj y) + (((SCROLL Y) / ((y) * (-1))) + (([sin v] of (((timer) - (timing)) * (częstotliwość)) ) * (amplituda))))\nswitch costume to (kostium)\n\n@Checkpointy\n\ndefine klony is maj pejszyn\ndelete all of [punkt respawnu v]\nadd [0] to [punkt respawnu v]\nadd [28] to [punkt respawnu v]\nswitch costume to (kostium1 v)\nset [ghost v] effect to (50)\nset [lock v] to [nie]\nset [id v] to [1]\nset [x v] to [1850]\nset [y v] to [217]\ncreate clone of (_myself_ v)\nset [id v] to [2]\nset [x v] to [4150]\nset [y v] to [250]\nswitch costume to (kraken1 v)\ncreate clone of (_myself_ v)\nset [id v] to [3]\nset [x v] to [5666]\nset [y v] to [18]\nswitch costume to (obóz brytyjski1 v)\ncreate clone of (_myself_ v)\nset [id v] to [0]\n\nwhen I receive [tick v]\nif <<touching (gracz v)?> and <[nie] = (lock)>> then\n    start sound [Jump v]\n    set [lock v] to [tak]\n    replace item (1) of [punkt respawnu v] with (x)\n    replace item (2) of [punkt respawnu v] with ((y) + (30))\nend\nif <(lock) = [tak]> then\n    if <(ID) = [1]> then\n        if <not <(costume [number v]) = [10]>> then\n            change [ghost v] effect by (-5)\n            next costume\n        end\n    end\n    if <(ID) = [2]> then\n        if <not <(costume [number v]) = [20]>> then\n            change [ghost v] effect by (-5)\n            next costume\n        end\n    end\n    if <(ID) = [3]> then\n        if <not <(costume [number v]) = [30]>> then\n            change [ghost v] effect by (-5)\n            next costume\n        end\n    end\nend\n\ndefine Position (x) (y)\nif <(speedrun?) = [nie]> then\n    if <[0] < (ID)> then\n        go to x: (x) y: (y)\n        if <<(x) = (x position)> and <(y) = (y position)>> then\n            show\n            go to [front v] layer\n            go [backward v] (60) layers\n        else\n            hide\n        end\n    else\n        hide\n    end\nelse\n    hide\nend\n\nwhen I receive [tick v]\nPosition ((x) - (SCROLL X)) ((y) - (SCROLL Y))\n\nwhen I receive [tick v]\nif <(ID) = [2]> then\n\nwhen flag clicked\nklony is maj pejszyn\n\ndelete this clone\n\nreplace item (1) of [punkt respawnu v] with [5666]\nreplace item (2) of [punkt respawnu v] with [18]\n\n@kolce\n\ndefine Position (x) (y)\ngo to x: (x) y: (y)\nif <<(x) = (x position)> and <(y) = (y position)>> then\n    show\n    go to [back v] layer\n    go [forward v] (19) layers\nelse\n    hide\nend\n\nwhen I receive [tick v]\nPosition ((x) - (SCROLL X)) ((y) - (SCROLL Y))\n\nwhen I receive [green flag v]\nhide\n\nwhen I receive [reset v]\ndelete this clone\n\ndefine Clone at x: (x) y: (y)\nset [x v] to (x)\nset [y v] to (y)\nnext costume\ncreate clone of (_myself_ v)\n\nwhen I receive [setup v]\nhide\nset [x v] to [0]\nset [y v] to [0]\nswitch costume to (puste v)\nClone at x: [0] y: [0]\nClone at x: ((360) * (4)) y: [0]\nClone at x: ((360) * (7)) y: [0]\nClone at x: [3000] y: [0]\nClone at x: [4200] y: [0]\nClone at x: [4800] y: [0]\nClone at x: [5200] y: [200]\nClone at x: [5900] y: [0]\nClone at x: [6500] y: [0]\nClone at x: [7200] y: [49]\nClone at x: [8300] y: [216]\n\n@Duszek1\n\nwhen flag clicked\nset [efekto duchy v] to [0]\n\nif <not <(efekto duchy) = [100]>> then\n    change [efekto duchy v] by (5)\nend\n\nif <not <(efekto duchy) = [0]>> then\n    change [efekto duchy v] by (-5)\nend\n\nwhen I receive [tick v]\nPosition ((8420) - (SCROLL X)) ((0) - (SCROLL Y))\n\ndefine Position (x) (y)\ngo to x: (x) y: (y)\ngo to [front v] layer\ngo [backward v] (15) layers\nif <touching (gracz v)?> then\n    set [ghost v] effect to (item ((8350) - (SCROLL X)) of [dźwięk intensivies v])\n    if <(item ((8350) - (SCROLL X)) of [dźwięk intensivies v]) = []> then\n        set [ghost v] effect to (100)\n    end\nend\nif <not <touching (gracz v)?>> then\n    set [ghost v] effect to (0)\nend\nif <<(x) = (x position)> and <(y) = (y position)>> then\n    show\nelse\n    hide\nend\n\n@muzyczken\n\nwhen flag clicked\nset [duch efekto v] to [0]\nset [kłudka na odległość v] to [nie]\nswitch costume to (kostium1 v)\nhide\n\nwhen I start as a clone\n\ndefine Position (x) (y)\ngo to x: (x) y: (y)\nif <<(x) = (x position)> and <(y) = (y position)>> then\n    if <[30] > ([y v] of [gracz v])> then\n        show\n        switch costume to (23 6 v)\n        set size to (50) %\n        go to [front v] layer\n        go [backward v] (10) layers\n        if <(SCROLL X) < [7940]> then\n            set [kłudka na odległość v] to [tak]\n        end\n        if <[tak] = (kłudka na odległość)> then\n            if <[100] > (duch efekto)> then\n                change [duch efekto v] by (1)\n            end\n        end\n    end\n    set [ghost v] effect to (duch efekto)\nelse\n    hide\nend\n\nwhen I receive [tick v]\nPosition ((7861) - (SCROLL X)) ((-34) - (SCROLL Y))\n\n@skarb :3\n\ndefine Position (x) (y)\ngo to x: (x) y: (y)\nif <<(x) = (x position)> and <(y) = (y position)>> then\n    show\n    if <[25] = (monety)> then\n        switch costume to (ez v)\n        if <touching (gracz v)?> then\n            if <(lock) = [nie]> then\n                broadcast (wygrana v)\n                set [lock v] to [tak]\n            end\n        end\n    else\n        switch costume to (ez2 v)\n    end\nelse\n    hide\nend\n\nwhen I receive [tick v]\nPosition ((x) - (SCROLL X)) (((y) - (SCROLL Y)) + (([sin v] of (((timer) - (5)) * (250)) ) * (4)))\n\nwhen flag clicked\nset [x v] to [9700]\nset [y v] to [-22]\nset [lock v] to [nie]\n\nchange [armata v] by (1)\n\n@endscreen\n\nwhen flag clicked\nset [tajma v] to [312312]\nhide variable [☁ highscore v]\nhide variable [score v]\nhide\nshow\nset [ghost v] effect to (100)\n\nwhen I receive [wygrana v]\nswitch costume to (kostium2 v)\nif <<<[9550] < (SCROLL X)> and <(monety) = [25]>> and <touching (skarb :3 v)?>> then\n    set [score v] to (timer)\n    if <(speedrun?) = [tak]> then\n        switch costume to (kostium3 v)\n    else\n        switch costume to (kostium1 v)\n    end\n    show\n    go to [front v] layer\n    set [ghost v] effect to (100)\n    repeat (20)\n        change [ghost v] effect by (-5)\n    end\n    if <(speedrun?) = [tak]> then\n        if <(SCORE) < (☁ HIGHSCORE)> then\n            set [☁ highscore v] to (SCORE)\n        end\n        show variable [☁ highscore v]\n        show variable [score v]\n    end\nend\nstop [all v]\n\nwhen [timer v] > (TAJMA)\nforever\n    if <<<[9550] < (SCROLL X)> and <(monety) = [25]>> and <touching (skarb :3 v)?>> then\n        play sound [Brawl Stars Music- Win Extended3 v] until done\n    else\n        switch costume to (kostium2 v)\n    end\nend\n\nstart sound [Brawl Stars Music- Win Extended3 v]\nwait (10.5) seconds\n\nwhen flag clicked\ngo to x: (0) y: (0)\nforever\n    go to [front v] layer\n    set [tajma v] to ((timer) + (0.1))\nend\n\nreset timer\n\nset [scroll x v] to [9551]\n\n@speedrun\n\nwhen flag clicked\nhide\n\ndefine wojny klonów ale bez wojen bo tylko klony lolzn't\nset [id v] to [1]\ncreate clone of (_myself_ v)\nset [id v] to [2]\ncreate clone of (_myself_ v)\nset [id v] to [3]\ncreate clone of (_myself_ v)\nset [id v] to [4]\ncreate clone of (_myself_ v)\nset [id v] to [5]\ncreate clone of (_myself_ v)\nset [id v] to [6]\ncreate clone of (_myself_ v)\nset [id v] to [0]\n\nwhen I receive [tick v]\nif <[0] < (ID)> then\n    show\n    go to [front v] layer\n    if <(ID) = [1]> then\n        if <(timer) < [100]> then\n            hide\n        else\n            show\n        end\n        switch costume to (kostium1 v)\n        go to x: (60) y: (-150)\n        if <[0] < (timer)> then\n            switch costume to (letter (1) of (timer))\n        end\n        if <[10] < (timer)> then\n            switch costume to (letter (2) of (timer))\n        end\n        if <[100] < (timer)> then\n            switch costume to (letter (1) of (timer))\n        end\n    end\n    if <(ID) = [2]> then\n        if <(timer) < [10]> then\n            hide\n        else\n            show\n        end\n        switch costume to (kostium2 v)\n        go to x: (90) y: (-150)\n        if <[0] < (timer)> then\n            switch costume to (letter (1) of (timer))\n        end\n        if <[10] < (timer)> then\n            switch costume to (letter (1) of (timer))\n        end\n        if <[100] < (timer)> then\n            switch costume to (letter (2) of (timer))\n        end\n    end\n    if <(ID) = [3]> then\n        switch costume to (kostium6 v)\n        go to x: (120) y: (-150)\n        if <[0] < (timer)> then\n            switch costume to (letter (1) of (timer))\n        end\n        if <[10] < (timer)> then\n            switch costume to (letter (2) of (timer))\n        end\n        if <[100] < (timer)> then\n            switch costume to (letter (3) of (timer))\n        end\n    end\n    if <(ID) = [4]> then\n        switch costume to (kostium9 v)\n        go to x: (150) y: (-150)\n    end\n    if <(ID) = [5]> then\n        switch costume to (kostium6 v)\n        go to x: (163) y: (-150)\n        if <[0] < (timer)> then\n            switch costume to (letter (3) of (timer))\n        end\n        if <[10] < (timer)> then\n            switch costume to (letter (4) of (timer))\n        end\n        if <[100] < (timer)> then\n            switch costume to (letter (5) of (timer))\n        end\n    end\n    if <(ID) = [6]> then\n        if <[0] < (timer)> then\n            switch costume to (letter (4) of (timer))\n        end\n        if <[10] < (timer)> then\n            switch costume to (letter (5) of (timer))\n        end\n        if <[100] < (timer)> then\n            switch costume to (letter (6) of (timer))\n        end\n        go to x: (193) y: (-150)\n    end\n    next costume\n    if <not <(ID) = [4]>> then\n        if <(costume [number v]) = [11]> then\n            next costume\n        end\n    end\nend\n\nreplace item (1) of [punkt respawnu v] with [0]\nreplace item (2) of [punkt respawnu v] with [28]\n\nwhen I receive [reset v]\ndelete this clone\n\nwhen I receive [tryb speedrunu v]\nwojny klonów ale bez wojen bo tylko klony lolzn't\n\nif <(speedrun?) = [nie]> then\nelse\n    hide\nend\n\n@muzyka\n\nwhen this sprite clicked\nif <(muzyka on/off) = [on]> then\n    set [muzyka on/off v] to [off]\n    switch costume to (kostium2 v)\nelse\n    set [muzyka on/off v] to [on]\n    switch costume to (kostium1 v)\nend\n\nwhen flag clicked\nswitch costume to (kostium1 v)\nshow\n\nwhen I receive [tick v]\nif <(muzyka on/off) = [on]> then\n    switch costume to (kostium1 v)\nelse\n    switch costume to (kostium2 v)\nend\n\n