Explorer: A Platformer


@Stage\n\n@blank\n\n@Player\n\nwhen flag clicked\nshow list [skip v]\ndelete all of [skip v]\nforever\n    if <key (any v) pressed?> then\n        if <not <<key (s v) pressed?> or <<key (k v) pressed?> or <<key (i v) pressed?> or <key (p v) pressed?>>>>> then\n            delete all of [skip v]\n        end\n    end\nend\n\nwhen flag clicked\nforever\n    if <<(length of [skip v]) = [4]> and <<(item (1) of [skip v]) = [s]> and <<(item (2) of [skip v]) = [k]> and <<(item (3) of [skip v]) = [i]> and <(item (4) of [skip v]) = [p]>>>>> then\n        if <(Level) < [21]> then\n            delete all of [skip v]\n            change [level v] by (1)\n            go to x: (-214) y: (-90)\n            set [y velocity v] to [0]\n            set [x velocity v] to [0]\n            set [did you skip v] to [1]\n        end\n    end\nend\n\nwhen flag clicked\nforever\n    if <key (s v) pressed?> then\n        delete all of [skip v]\n        add [s] to [skip v]\n        wait (.5) seconds\n    end\nend\n\nwhen flag clicked\nforever\n    go to [front v] layer\n    if <key (p v) pressed?> then\n        add [p] to [skip v]\n        wait (.5) seconds\n    end\nend\n\nwhen flag clicked\nforever\n    if <key (k v) pressed?> then\n        add [k] to [skip v]\n        wait (.5) seconds\n    end\nend\n\nwhen flag clicked\nforever\n    if <key (i v) pressed?> then\n        add [i] to [skip v]\n        wait (.5) seconds\n    end\nend\n\nwhen flag clicked\nhide\n\nwhen flag clicked\nforever\n    if <<<not <<key (w v) pressed?> or <<key (d v) pressed?> or <key (a v) pressed?>>>> or <not <<key (up arrow v) pressed?> or <<key (right arrow v) pressed?> or <key (left arrow v) pressed?>>>>> and <(blink) = [0]>> then\n        switch costume to (1 v)\n    end\n    if <<<key (w v) pressed?> or <key (up arrow v) pressed?>> and <(blink) = [0]>> then\n        switch costume to (4 v)\n    end\n    if <<<key (d v) pressed?> or <key (right arrow v) pressed?>> and <(blink) = [0]>> then\n        switch costume to (33333 v)\n    end\n    if <<<key (a v) pressed?> or <key (left arrow v) pressed?>> and <(blink) = [0]>> then\n        switch costume to (2333 v)\n    end\n    if <<<<key (left arrow v) pressed?> and <key (up arrow v) pressed?>> or <<key (a v) pressed?> and <key (w v) pressed?>>> and <(blink) = [0]>> then\n        switch costume to (6 v)\n    end\n    if <<<<key (right arrow v) pressed?> and <key (up arrow v) pressed?>> or <<key (w v) pressed?> and <key (d v) pressed?>>> and <(blink) = [0]>> then\n        switch costume to (5 v)\n    end\nend\n\nwhen flag clicked\ngo to [front v] layer\nforever\n    set [blink v] to [0]\n    wait (pick random (3.0) to (7.0)) seconds\n    set [blink v] to [1]\n    switch costume to (1 v)\n    switch costume to (7 v)\n    wait (0.05) seconds\n    switch costume to (8 v)\n    switch costume to (9 v)\n    wait (0.05) seconds\n    switch costume to (10 v)\n    switch costume to (11 v)\n    wait (0.1) seconds\n    switch costume to (10 v)\n    switch costume to (9 v)\n    wait (0.05) seconds\n    switch costume to (8 v)\n    switch costume to (7 v)\n    wait (0.05) seconds\n    switch costume to (1 v)\nend\n\nwhen flag clicked\nforever\n    if <<not <<<<mouse down?> and <(mouse x) > (x position)>> or <<<mouse down?> and <(x position) > (mouse x)>> or <<<mouse down?> and <(mouse y) > (y position)>> or <<key (up arrow v) pressed?> or <<key (right arrow v) pressed?> or <key (left arrow v) pressed?>>>>>> or <<key (w v) pressed?> or <<key (a v) pressed?> or <key (d v) pressed?>>>>> and <(blink) = [0]>> then\n        switch costume to (1 v)\n    end\n    if <<<key (up arrow v) pressed?> or <<mouse down?> and <(mouse y) > (y position)>>> and <(blink) = [0]>> then\n        switch costume to (4 v)\n    end\n    if <<<key (right arrow v) pressed?> or <<mouse down?> and <(mouse x) > (x position)>>> and <(blink) = [0]>> then\n        switch costume to (33333 v)\n    end\n    if <<<key (left arrow v) pressed?> or <<mouse down?> and <(x position) > (mouse x)>>> and <(blink) = [0]>> then\n        switch costume to (2333 v)\n    end\n    if <<<<key (left arrow v) pressed?> and <key (up arrow v) pressed?>> or <<<mouse down?> and <(x position) > (mouse x)>> and <<mouse down?> and <(mouse y) > (y position)>>>> and <(blink) = [0]>> then\n        switch costume to (6 v)\n    end\n    if <<<<key (right arrow v) pressed?> and <key (up arrow v) pressed?>> or <<<mouse down?> and <(mouse x) > (x position)>> and <<mouse down?> and <(mouse y) > (y position)>>>> and <(blink) = [0]>> then\n        switch costume to (5 v)\n    end\nend\n\nwhen I receive [play v]\nshow\nset [level v] to [1]\ngo to x: (-214) y: (-90)\nforever\n    if <<<key (d v) pressed?> or <key (right arrow v) pressed?>> or <<mouse down?> and <(mouse x) > (x position)>>> then\n        change [x velocity v] by (1)\n    end\n    if <<<key (a v) pressed?> or <key (left arrow v) pressed?>> or <<mouse down?> and <(x position) > (mouse x)>>> then\n        change [x velocity v] by (-1)\n    end\n    set [x velocity v] to ((x velocity) * (.9))\n    change x by (x velocity)\n    if <touching (level v)?> then\n        change y by (1)\n        if <touching (level v)?> then\n            change y by (1)\n            if <touching (level v)?> then\n                change y by (1)\n                if <touching (level v)?> then\n                    change y by (1)\n                    if <touching (level v)?> then\n                        change y by (1)\n                        if <touching (level v)?> then\n                            change x by ((x velocity) * (-1))\n                            change y by (-5)\n                            if <<key (w v) pressed?> or <<key (up arrow v) pressed?> or <<mouse down?> and <(mouse y) > (y position)>>>> then\n                                if <(x velocity) > [0]> then\n                                    set [x velocity v] to [-5]\n                                else\n                                    set [x velocity v] to [5]\n                                end\n                                set [y velocity v] to [10]\n                            else\n                                set [x velocity v] to [0]\n                            end\n                        end\n                    end\n                end\n            end\n        end\n    end\n    if <(x position) > [230]> then\n        change [level v] by (1)\n        set [y velocity v] to [0]\n        set [x velocity v] to [0]\n        go to x: (-214) y: (-90)\n        broadcast (delete v)\n    else\n        set [delete v] to [0]\n    end\n    change [y velocity v] by (-1)\n    change y by (y velocity)\n    if <touching (level v)?> then\n        change y by ((y velocity) * (-1))\n        set [y velocity v] to [0]\n    end\n    change y by (-1)\n    if <touching (level v)?> then\n        if <<key (w v) pressed?> or <<key (up arrow v) pressed?> or <<mouse down?> and <(mouse y) > (y position)>>>> then\n            change [y velocity v] by (15)\n        end\n    end\n    change y by (1)\n    if <touching (danger v)?> then\n        broadcast (died v)\n    end\n    if <<<<touching (sprite7 v)?> or <touching (sprite9 v)?>> or <touching (sprite8 v)?>> or <<touching (sprite10 v)?> or <touching (sprite11 v)?>>> then\n        broadcast (died v)\n    end\nend\n\nset [y velocity v] to [0]\nset [x velocity v] to [0]\ngo to x: (-214) y: (-90)\n\nwhen flag clicked\nset volume to (50) %\nforever\n    play sound [Vicetone - United We Dance v] until done\nend\n\nset volume to (50) %\n\nif <(music) = [1]> then\nend\n\nwhen flag clicked\nset [did you skip v] to [0]\nset size to (50) %\nforever\n    if <(music) = [2]> then\n        stop all sounds\n    end\nend\n\nwhen I receive [play v]\n\nwhen I receive [delete v]\nset [delete v] to [1]\n\nwhen I receive [play v]\nwait (0.1) seconds\n\nforever\n    create clone of (_myself_ v)\nend\n\nwhen I start as a clone\nforever\n    if <(delete) = [1]> then\n        delete this clone\n    end\nend\n\nwhen I start as a clone\ngo to x: (x position) y: (y position)\nswitch costume to (11 v)\nset [ghost v] effect to (0)\nshow\nset size to (50) %\nrepeat (10)\n    change size by (-5)\n    change [ghost v] effect by (10)\nend\ndelete this clone\n\nwhen I receive [play v]\nforever\n    if <key (r v) pressed?> then\n        go to x: (-214) y: (-90)\n        set [y velocity v] to [0]\n        set [x velocity v] to [0]\n    end\nend\n\nbroadcast (die v)\n\nwhen I receive [die v]\n\nchange volume by (-100)\n\nset [level v] to [6]\n\nwhen flag clicked\nforever\n    set [time v] to (timer)\nend\n\nwhen I receive [play v]\nreset timer\n\nwhen flag clicked\nset [level v] to [1]\nforever\n    if <<(time) < (☁ Fastest Time)> and <<(Level) = [21]> and <not <(did you skip) = [1]>>>> then\n        set [☁ fastest time v] to (time)\n        broadcast (you broke v)\n        stop [this script v]\n    end\nend\n\nwhen flag clicked\nforever\n    if <(Level) = [21]> then\n        show variable [☁ fastest time v]\n    end\nend\n\nset [☁ fastest time v] to [99999]\n\nwhen flag clicked\nforever\n    set [x pos v] to (x position)\n    set [ypos v] to (y position)\n    set [direc v] to (direction)\nend\n\nwhen I receive [died v]\nset [y velocity v] to [0]\nset [x velocity v] to [0]\ngo to x: (-214) y: (-90)\n\nwhen [u v] key pressed\nif <(volume) = [0]> then\n    set volume to (50) %\nend\n\nwhen [m v] key pressed\nif <(volume) = [50]> then\n    set volume to (0) %\nend\n\n@danger\n\nwhen flag clicked\nset [level v] to [1]\nhide\ngo to x: (0) y: (0)\nforever\n    switch costume to (Level)\nend\n\nwhen I receive [play v]\nshow\n\nset [level v] to [8]\n\n@Level\n\nwhen flag clicked\nhide\ngo to x: (0) y: (0)\nforever\n    switch costume to (Level)\nend\n\nwhen I receive [play v]\nshow\n\nwhen flag clicked\nforever\n    go to [front v] layer\nend\n\nwhen I receive [play v]\nforever\n    if <(Level) = [21]> then\n        set [final time v] to (time)\n        stop [this script v]\n    end\nend\n\n@Sprite1\n\nwhen flag clicked\ngo to [front v] layer\nforever\n    hide\n    wait (pick random (0) to (0.5)) seconds\n    create clone of (_myself_ v)\nend\n\nwhen I start as a clone\nset size to (pick random (10) to (20)) %\nswitch costume to (pick random (1) to (5))\ngo to x: (280) y: (pick random (80) to (170))\nshow\nrepeat until <(x position) < [-240]>\n    change x by (-5)\nend\nif <(x position) < [-240]> then\n    delete this clone\nend\n\n@Sprite2\n\nwhen I receive [play v]\nhide\n\nwhen flag clicked\ngo to x: (0) y: (0)\nshow\n\nwhen flag clicked\nforever\n    if <(note) = [1]> then\n        hide\n    else\n        show\n    end\nend\n\nwhen I receive [play v]\nhide\nstop [other scripts in sprite v]\n\n@Sprite3\n\nwhen flag clicked\nswitch costume to (costume1 v)\ngo to x: (50) y: (-130)\ngo to [front v] layer\nset size to (0) %\nshow\nrepeat (11)\n    change size by (10)\nend\nset size to (114) %\n\nwhen I receive [lar v]\nrepeat until <(size) > [150]>\n    change size by (15)\nend\n\nwhen this sprite clicked\nchange [menu v] by (1)\n\nwhen flag clicked\nset [menu v] to [1]\nforever\n    if <(menu) > [2]> then\n        set [menu v] to [1]\n    end\nend\n\nwhen flag clicked\npoint in direction (90)\nforever\n    if <(menu) = [1]> then\n        go to x: (50) y: (-130)\n        switch costume to (costume1 v)\n    end\n    if <(menu) = [2]> then\n        set size to (129) %\n        go to x: (0) y: (0)\n        switch costume to (costume2 v)\n    end\nend\n\nif <not <touching (mouse-pointer v)?>> then\n\nwhen flag clicked\nforever\n    if <touching (mouse-pointer v)?> then\n        if <not <(menu) = [2]>> then\n            switch costume to (costume3 v)\n            broadcast (lar v)\n        end\n    else\n        set size to (129) %\n        point in direction (90)\n    end\nend\n\nwait (0.4) seconds\nturn right (15) degrees\nwait (0.1) seconds\nturn left (15) degrees\n\nwhen flag clicked\nforever\n    go to [front v] layer\nend\n\nwhen I receive [lar v]\n\n\nwhen I receive [play v]\nhide\nstop [other scripts in sprite v]\n\nwhen flag clicked\nforever\n    if <(costume [number v]) = [3]> then\n        set size to (200) %\n    end\nend\n\nswitch costume to (costume1 v)\n\ngo to [front v] layer\n\nwhen flag clicked\nforever\n    if <(note) = [1]> then\n        hide\n    else\n        show\n    end\nend\n\n@Sprite5\n\nwhen this sprite clicked\nnext costume\nchange [music v] by (1)\n\nwhen flag clicked\ngo to [front v] layer\nswitch costume to (costume1 v)\nshow\nset [music v] to [1]\nforever\n    if <(music) > [2]> then\n        set [music v] to [1]\n    end\nend\n\nwhen flag clicked\ngo to [front v] layer\nset size to (0) %\nrepeat (10)\n    change size by (1.5)\nend\n\nwhen I receive [play v]\ngo to x: (-217) y: (164)\ngo to [front v] layer\n\nwhen flag clicked\ngo to x: (217) y: (164)\nforever\n    go to [front v] layer\nend\n\nwhen flag clicked\nforever\n    hide\nend\n\nif <(note) = [1]> then\n\n@Sprite4\n\nwhen flag clicked\nswitch costume to (costume1 v)\ngo to x: (-50) y: (-130)\ngo to [front v] layer\nset size to (0) %\nshow\nrepeat (11)\n    change size by (10)\nend\nset size to (114) %\n\nset size to (100) %\n\nwhen this sprite clicked\nbroadcast (play v)\n\nwhen I receive [play v]\nforever\n    hide\nend\n\nwhen flag clicked\npoint in direction (90)\nforever\n    if <(menu) = [1]> then\n        show\n    end\n    if <(menu) = [2]> then\n        hide\n    end\nend\n\nwhen flag clicked\n\nwhen flag clicked\nset [play degrees v] to [0]\n\nforever\n\nwhen flag clicked\nforever\n    if <touching (mouse-pointer v)?> then\n        broadcast (larg v)\n        switch costume to (costume2 v)\n    else\n        switch costume to (costume1 v)\n        point in direction (90)\n        set size to (129) %\n    end\nend\n\nturn right (15) degrees\nwait (0.1) seconds\nturn left (15) degrees\n\nwhen flag clicked\ngo to [front v] layer\nforever\n    if <touching (mouse-pointer v)?> then\nend\n\n\n\nwhen flag clicked\ngo to [front v] layer\n\nforever\n\nwhen I receive [larg v]\nrepeat until <(size) > [150]>\n    change size by (15)\nend\n\nwhen flag clicked\nforever\n    if <(note) = [1]> then\n        hide\n    else\n        show\n    end\nend\n\ndefine rotate\nrepeat (10)\n    change [rotation vel v] by (0.1)\n    turn right (rotation vel) degrees\nend\nrepeat (10)\n    change [rotation vel v] by (-0.1)\n    turn right (rotation vel) degrees\nend\nrepeat (10)\n    change [rotation vel v] by (-0.1)\n    turn right (rotation vel) degrees\nend\nrepeat (10)\n    change [rotation vel v] by (0.1)\n    turn right (rotation vel) degrees\nend\nrepeat (10)\n    change [rotation vel v] by (-0.1)\n    turn right (rotation vel) degrees\nend\nrepeat (10)\n    change [rotation vel v] by (0.1)\n    turn right (rotation vel) degrees\nend\nrepeat (10)\n    change [rotation vel v] by (0.1)\n    turn right (rotation vel) degrees\nend\nrepeat (10)\n    change [rotation vel v] by (-0.1)\n    turn right (rotation vel) degrees\nend\n\nforever\n    wait (0.1) seconds\n    rotate\nend\n\nwhen I receive [play v]\nhide\nstop [other scripts in sprite v]\n\n@Sprite14\n\nwhen flag clicked\nhide variable [☁ fastest time v]\ngo to x: (0) y: (0)\nhide\nforever\n    if <(Level) = [21]> then\n        show\n        go to [front v] layer\n    else\n        hide\n    end\nend\n\nset [level v] to [21]\n\n@Sprite6\n\nwhen I receive [play v]\nhide\n\nwhen flag clicked\nswitch costume to (costume1 v)\ngo to x: (-40) y: (-7)\ngo to [front v] layer\nshow\n\nwhen flag clicked\nrepeat (10)\n    go to [front v] layer\nend\n\nwhen flag clicked\nforever\n    if <(note) = [1]> then\n        hide\n    end\nend\n\nwhen flag clicked\nforever\n    if <(note) = [1]> then\n        hide\n    else\n        show\n    end\nend\n\nwhen I receive [play v]\nhide\nstop [other scripts in sprite v]\n\n@detector\n\nwhen flag clicked\nhide\nset [faved___ v] to [0]\nset [loved__ v] to [0]\nset [clone id v] to [0]\ncreate clone of (_myself_ v)\nwait (0.2) seconds\nset [clone id v] to [1]\ncreate clone of (_myself_ v)\nwait until <<(LOVED__) = [1]> and <(FAVED___) = [1]>>\nwait (1) seconds\nshow\ngo to x: (0) y: (50)\nreset timer\nswitch costume to (pick random (1) to (4))\nset [ghost v] effect to (100)\nrepeat until <(timer) > [3.5]>\n    change y by ((y position) / (-15))\n    change [ghost v] effect by (-3)\nend\nreset timer\nrepeat until <(timer) > [3.5]>\n    change y by (((y position) - (-100)) / (-15))\n    change [ghost v] effect by (10)\nend\n\nwhen I start as a clone\nif <(clone id) = [0]> then\n    go to x: (-15) y: (0)\n    set [loved__ v] to [0]\n    switch costume to (love v)\n    forever\n        set [love? v] to <touching (mouse-pointer v)?>\n        if <touching (mouse-pointer v)?> then\n            set [loved__ v] to [1]\n        end\n    end\nend\nif <(clone id) = [1]> then\n    go to x: (0) y: (0)\n    switch costume to (fave v)\n    set [faved___ v] to [0]\n    forever\n        set [fav v] to <touching (mouse-pointer v)?>\n        if <touching (mouse-pointer v)?> then\n            set [faved___ v] to [1]\n        end\n    end\nend\n\nwhen flag clicked\nforever\n    go to [front v] layer\nend\n\n@Sprite7\n\nwhen flag clicked\npoint in direction (90)\nset size to (50) %\nswitch costume to (3 v)\nhide\n\nset [level v] to [16]\n\nwhen I receive [play v]\nforever\n    if <(Level) < [13]> then\n        hide\n    end\nend\n\nwhen I start as a clone\nset size to (100) %\nswitch costume to (knife v)\npoint towards (player v)\nrepeat until <touching (_edge_ v)?>\n    if <not <<touching (level v)?> or <touching (danger v)?>>> then\n        move (10) steps\n    end\nend\nif <touching (_edge_ v)?> then\n    delete this clone\nend\n\nwhen I start as a clone\nforever\n    if <<<touching (level v)?> or <touching (danger v)?>> or > then\n        repeat (10)\n            change [ghost v] effect by (10)\n        end\n        delete this clone\n    end\nend\n\nwhen I receive [play v]\nforever\n    if <(Level) = [13]> then\n        show\n        go to x: (0) y: (-142)\n        wait (1) seconds\n        create clone of (_myself_ v)\n    end\nend\n\nwhen I receive [play v]\nforever\n    if <(Level) = [14]> then\n        show\n        go to x: (0) y: (-127)\n        wait (1) seconds\n        create clone of (_myself_ v)\n    end\nend\n\nwhen I receive [play v]\nforever\n    if <(Level) = [15]> then\n        show\n        go to x: (9) y: (15)\n        wait (0.3) seconds\n        create clone of (_myself_ v)\n    end\nend\n\nwhen I receive [play v]\nforever\n    if <(Level) = [17]> then\n        show\n        go to x: (225) y: (-140)\n        wait (3) seconds\n        create clone of (_myself_ v)\n    end\nend\n\nwhen I start as a clone\n\n\nwhen I receive [play v]\nforever\n    if <(Level) = [16]> then\n        show\n        go to x: (203) y: (-143)\n        wait (1) seconds\n        create clone of (_myself_ v)\n    end\nend\n\nwhen I receive [play v]\nforever\n    if <(Level) = [18]> then\n        hide\n    end\nend\n\nwhen I receive [delete v]\nhide\ndelete this clone\n\nwhen I start as a clone\nforever\n    if <touching (katana v)?> then\n        point in direction ((direction) - (180))\n    end\nend\n\nrepeat (10)\n    change [ghost v] effect by (10)\nend\ndelete this clone\n\nwhen I receive [died v]\n\n@Sprite8\n\nwhen flag clicked\nswitch costume to (3 v)\nhide\n\nset [level v] to [13]\n\nwhen I receive [play v]\nforever\n    if <(Level) = [14]> then\n        show\n        go to x: (-50) y: (-127)\n        wait (1) seconds\n        create clone of (_myself_ v)\n    else\n        hide\n    end\nend\n\nwhen I start as a clone\nset size to (100) %\nswitch costume to (knife v)\npoint towards (player v)\nrepeat until <touching (_edge_ v)?>\n    if <not <<touching (level v)?> or <touching (danger v)?>>> then\n        move (10) steps\n    end\nend\nif <touching (_edge_ v)?> then\n    delete this clone\nend\n\nwhen I start as a clone\nforever\n    if <<touching (level v)?> or <touching (danger v)?>> then\n        repeat (10)\n            change [ghost v] effect by (10)\n        end\n        delete this clone\n    end\nend\n\nwhen I receive [delete v]\nhide\ndelete this clone\n\nwhen I start as a clone\nforever\n    if <touching (katana v)?> then\n        point in direction ((direction) - (180))\n    end\nend\n\n@Sprite9\n\nwhen flag clicked\nswitch costume to (3 v)\nhide\n\nset [level v] to [13]\n\nwhen I receive [play v]\nforever\n    if <(Level) = [14]> then\n        show\n        go to x: (50) y: (-127)\n        wait (1) seconds\n        create clone of (_myself_ v)\n    else\n        hide\n    end\nend\n\nwhen I start as a clone\nset size to (100) %\nswitch costume to (knife v)\npoint towards (player v)\nrepeat until <touching (_edge_ v)?>\n    if <not <<touching (level v)?> or <touching (danger v)?>>> then\n        move (10) steps\n    end\nend\nif <touching (_edge_ v)?> then\n    delete this clone\nend\n\nwhen I start as a clone\nforever\n    if <<touching (level v)?> or <touching (danger v)?>> then\n        repeat (10)\n            change [ghost v] effect by (10)\n        end\n        delete this clone\n    end\nend\n\nwhen I receive [delete v]\nhide\ndelete this clone\n\nwhen I start as a clone\nforever\n    if <touching (katana v)?> then\n        point in direction ((direction) - (180))\n    end\nend\n\n@Sprite10\n\nwhen flag clicked\nswitch costume to (3 v)\nhide\n\nset [level v] to [16]\n\nwhen I receive [play v]\nforever\n    if <<(Level) = [19]> or <(Level) = [20]>> then\n        show\n        go to x: (-133) y: (140)\n        repeat (100)\n            create clone of (_myself_ v)\n        end\n        wait (0.5) seconds\n    else\n        hide\n    end\nend\n\nwhen I start as a clone\nset size to (100) %\nswitch costume to (knife v)\npoint in direction (180)\nrepeat until <touching (_edge_ v)?>\n    if <not <<touching (level v)?> or <touching (danger v)?>>> then\n        move (10) steps\n    end\nend\nif <touching (_edge_ v)?> then\n    delete this clone\nend\n\nwhen I start as a clone\nforever\n    if <<touching (level v)?> or <touching (danger v)?>> then\n        repeat (10)\n            change [ghost v] effect by (10)\n        end\n        delete this clone\n    end\nend\n\nwhen I receive [delete v]\nhide\ndelete this clone\n\nwhen I start as a clone\nforever\n    if <touching (katana v)?> then\n        point in direction ((direction) - (180))\n    end\nend\n\n@Sprite11\n\nwhen flag clicked\nswitch costume to (3 v)\nhide\n\nset [level v] to [19]\n\nwhen I receive [play v]\nforever\n    if <<(Level) = [19]> or <(Level) = [20]>> then\n        show\n        go to x: (55) y: (140)\n        repeat (100)\n            create clone of (_myself_ v)\n        end\n        wait (0.5) seconds\n    else\n        hide\n    end\nend\n\nwhen I start as a clone\nset size to (100) %\nswitch costume to (knife v)\npoint in direction (180)\nrepeat until <touching (_edge_ v)?>\n    if <not <<touching (level v)?> or <touching (danger v)?>>> then\n        move (10) steps\n    end\nend\nif <touching (_edge_ v)?> then\n    delete this clone\nend\n\nwhen I start as a clone\nforever\n    if <<touching (level v)?> or <touching (danger v)?>> then\n        repeat (10)\n            change [ghost v] effect by (10)\n        end\n        delete this clone\n    end\nend\n\nwhen I receive [delete v]\nhide\ndelete this clone\n\nwhen I start as a clone\nforever\n    if <touching (katana v)?> then\n        point in direction ((direction) - (180))\n    end\nend\n\n@Sprite12\n\nwhen flag clicked\nswitch costume to (3 v)\nhide\n\nset [level v] to [19]\n\nwhen I receive [play v]\nforever\n    if <(Level) = [20]> then\n        show\n        go to x: (168) y: (139)\n        repeat (100)\n            create clone of (_myself_ v)\n        end\n        wait (0.5) seconds\n    else\n        hide\n    end\nend\n\nwhen I start as a clone\nset size to (100) %\nswitch costume to (knife v)\npoint in direction (180)\nrepeat until <touching (_edge_ v)?>\n    if <not <<touching (level v)?> or <touching (danger v)?>>> then\n        move (10) steps\n    end\nend\nif <touching (_edge_ v)?> then\n    delete this clone\nend\n\nwhen I start as a clone\nforever\n    if <<touching (level v)?> or <touching (danger v)?>> then\n        repeat (10)\n            change [ghost v] effect by (10)\n        end\n        delete this clone\n    end\nend\n\nwhen I receive [delete v]\nhide\ndelete this clone\n\n@Sprite13\n\nwhen I receive [play v]\nforever\n    if <(Level) = [21]> then\n        create clone of (_myself_ v)\n    end\nend\n\nwhen flag clicked\nhide\n\nwhen I start as a clone\nswitch costume to (pick random (1) to (3))\nshow\ngo to x: (pick random (-240) to (240)) y: (190)\nrepeat until <[-180] > (y position)>\n    change y by (-10)\n    turn right (5) degrees\nend\ndelete this clone\n\n\n\nset [level v] to [21]\n\n@Scrolling Engine\n\nwhen flag clicked\nhide\n\nwhen I receive [credits v]\n\nshow\nset y to (0)\nforever\n    set [scroll? v] to ((Scroll?) * (0.9))\n    change y by (Scroll?)\nend\n\nwhen flag clicked\nset [scroll? v] to [0]\n\nwhen [up arrow v] key pressed\nif <not <key (up arrow v) pressed?>> then\n    change [scroll? v] by (-4)\nend\n\nwhen [down arrow v] key pressed\nif <not <key (down arrow v) pressed?>> then\n    change [scroll? v] by (4)\nend\n\n@Sprite15\n\nwhen I receive [play v]\nhide\n\nwhen flag clicked\nshow\nset size to (50) %\ngo to x: (-206) y: (160)\n\nwhen flag clicked\ngo to [front v] layer\nforever\n    if <(note) > [1]> then\n        set [note v] to [0]\n    end\nend\n\nwhen this sprite clicked\nchange [note v] by (1)\n\nwhen flag clicked\n\nwhen this sprite clicked\nif <(note) = [1]> then\n    broadcast (credits v)\nend\n\nwhen flag clicked\nforever\n    go to [front v] layer\nend\n\n@Scrolling Engine2\n\nwhen flag clicked\nhide\nset [scroll? v] to [0]\n\nwhen [up arrow v] key pressed\nif <not <key (up arrow v) pressed?>> then\n    change [scroll? v] by (-4)\nend\n\nwhen [down arrow v] key pressed\nif <not <key (down arrow v) pressed?>> then\n    change [scroll? v] by (4)\nend\n\nwhen flag clicked\ngo to x: (0) y: (0)\nset [note v] to [0]\n\nhide\n\nwhen I receive [credits v]\ngo to [front v] layer\nshow\nforever\n    if <(note) = [1]> then\n        set [scroll? v] to [0]\n        show\n        set y to (-35)\n        forever\n            set [scroll? v] to ((Scroll?) * (0.9))\n            change y by (Scroll?)\n            if <not <(note) = [1]>> then\n                hide\n                stop [this script v]\n            end\n            if <mouse down?> then\n                if <(mouse) = [0]> then\n                    change y by ((mouse y) / (-10))\n                end\n            end\n        end\n    end\nend\n\nwhen I receive [credits v]\nforever\n    if <not <(Scroll?) = [0]>> then\n        set [mouse v] to [0]\n    else\n        set [mouse v] to [1]\n    end\nend\n\n@Sprite16\n\nwhen flag clicked\nhide\nforever\n    go to [front v] layer\nend\n\nwhen I receive [you broke v]\ngo to x: (0) y: (0)\nshow\nset [ghost v] effect to (100)\nrepeat (10)\n    go to [front v] layer\n    change [ghost v] effect by (-10)\n    change y by (-5)\nend\nwait (2) seconds\nrepeat (10)\n    change [ghost v] effect by (10)\n    change y by (4.3)\nend\n\nset [☁ fastest time v] to [99999]\n\nwhen flag clicked\nforever\n    hide variable [☁ fastest time v]\nend\n\n@encode decode\n\ndefine write (value) to encoded\nset [letter # v] to [1]\nrepeat (length of (value))\n    set [encoded v] to (join (encoded) (item # of (letter (letter #) of (value)) in [code v]))\n    change [letter # v] by (1)\nend\nset [encoded v] to (join (encoded) [00])\n\ndefine update high\nbegin decode of (☁ last encoded)\nvalue = read from encoded\nif <<<not <(item (1) of [chat room v]) = (value decoded)>> and <not <(item (2) of [chat room v]) = (value decoded)>>> and <<not <(item (3) of [chat room v]) = (value decoded)>> and <not <(item (4) of [chat room v]) = (value decoded)>>>> then\n    if <not <(value decoded) = [/$void_blank_message/$]>> then\n        insert (value decoded) at (1) of [chat room v] \n    end\nend\n\nwrite [dogy] to encoded\n\nwhen flag clicked\nforever\n    update high\nend\n\n@Sprite17\n\nwhen flag clicked\nhide\n\nwhen I receive [play v]\n\nshow\ngo to x: (0) y: (0)\nforever\n    go to [front v] layer\nend\n\n@katana\n\nwhen flag clicked\nhide\n\nwhen I receive [play v]\nset rotation style [left-right v]\nforever\n    if <key (right arrow v) pressed?> then\n        if <(can hit?) = [0]> then\n            point in direction (90)\n            set [katdi v] to [90]\n        end\n    end\n    if <key (left arrow v) pressed?> then\n        if <(can hit?) = [0]> then\n            point in direction (-90)\n            set [katdi v] to [-90]\n        end\n    end\n    if <key (space v) pressed?> then\n        if <(can hit?) = [0]> then\n            wait until <(can hit?) = [0]>\n            broadcast (kat v)\n        end\n    else\n    end\nend\n\nwhen I receive [kat v]\nset [can hit? v] to [1]\nset rotation style [all around v]\npoint in direction (katdi)\nshow\nif <(katdi) = [90]> then\n    switch costume to (swing v)\n    repeat (18)\n        turn right (20) degrees\n    end\n    hide\nelse\n    switch costume to (swing2 v)\n    repeat (18)\n        turn right (-20) degrees\n    end\n    hide\nend\nset [can hit? v] to [0]\nset rotation style [left-right v]\n\nwhen I receive [play v]\nforever\n    go to x: (X pos) y: (Ypos)\nend\n\n@Sprite18\n\nwhen I receive [larg v]\ngo to [front v] layer\nshow\ngo to (mouse-pointer v)\n\nwhen flag clicked\nforever\n    go to [front v] layer\n    hide\nend\n\n@Sprite19\n\nwhen I receive [lar v]\ngo to [front v] layer\nshow\ngo to (mouse-pointer v)\n\nwhen flag clicked\nforever\n    go to [front v] layer\n    hide\nend\n\n@trail\n\nwhen I start as a clone\ngo to (player v)\nshow\nset [ghost v] effect to (10)\nrepeat (50)\n    change [ghost v] effect by (10)\n    change size by (-5)\nend\ndelete this clone\n\nwhen flag clicked\nhide\n\nwhen I receive [play v]\nforever\n    create clone of (_myself_ v)\nend\n\n