Stickman's World - Trapped(Platformer) #games
@Stage\n\nwhen flag clicked\nbroadcast (Menu v)\n\nwhen flag clicked\nset [music v] to [2]\nset [screen v] to [1]\nset [sound v] to [2]\ndelete all of [completedlevels v]\n\nwhen I receive [start v]\nforever\n    if <(Music) = [2]> then\n        set volume to (50) %\n    else\n        set volume to (0) %\n    end\n    play sound [TheFatRat - Unity \(Instrumental\) v] until done\nend\n\nwhen I receive [select level v]\nstop [other scripts in sprite v]\n\n@Blank\n\n@Player\n\nwhen I receive [start v]\nbroadcast (Green Flag v)\nbroadcast (Play Game v)\n\nwhen I receive [green flag v]\nhide\n\ndefine Game On\nset [sx v] to [0]\nset [open v] to [No]\nset [keycollected v] to [No]\nset [x v] to [-222]\nset [y v] to [-86]\nset [sy v] to [0]\nset [in air v] to [0]\nset [finish v] to []\npoint in direction (90)\ngo to [front v] layer\nshow\n\nwhen I receive [play game v]\nforever\n    broadcast (Reset v) and wait\n    broadcast (Setup v) and wait\n    Game On\n    repeat until <(Finish) > []>\n        Tick\n    end\n    if <(Finish) = [Yes]> then\n        Game-Con\n    else\n        Game-Die\n    end\nend\n\ndefine Tick\nswitch costume to (hitbox v)\nif <<<key (left arrow v) pressed?> or <key (a v) pressed?>> or <<mouse down?> and <(mouse x) < (x position)>>> then\n    point in direction (-90)\n    change [sx v] by (-1.2)\nelse\n    if <<<key (right arrow v) pressed?> or <key (d v) pressed?>> or <<mouse down?> and <(x position) < (mouse x)>>> then\n        point in direction (90)\n        change [sx v] by (1.2)\n    else\n        set [frames v] to [0]\n    end\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?>> or <<mouse down?> and <(y position) < (mouse y)>>> then\n    if <<(jump key) = [0]> and <(falling?) < [3]>> then\n        if <(in air) < [4]> then\n            set [sy v] to [12]\n            set [falling? v] to [6]\n            set [jump key v] to [1]\n        end\n    end\nelse\n    set [jump key v] to [0]\nend\nchange [sy v] by (-1)\nChange Player y by (sy)\nSet Costume\nTest Die\nPosition\nif <(y) < [-180]> then\n    set [finish v] to [No]\nend\n\ndefine Change Player y by (sy)\nchange [y v] by (sy)\nchange [in air v] by (1)\nchange [falling? v] by (1)\nPosition\nrepeat until <not <<touching (platform v)?> or <touching (elevator  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        set [falling? v] to [0]\n    end\n    Position\n    set [sy v] to [0]\nend\nchange [frames v] by (0.5)\n\ndefine Position\ngo to x: (x) y: (y)\n\ndefine Change Player x by (sx)\nchange [x v] by (sx)\nPosition\nif <<<touching (platform v)?> or <touching (door v)?>> or <touching (elevator  v)?>> then\n    repeat (12)\n        change [y v] by (1)\n        Position\n        if <not <<<touching (platform v)?> or <touching (door v)?>> or <touching (elevator  v)?>>> then\n            stop [this script v]\n        end\n    end\n    change [y v] by (-12)\n    repeat until <not <<<touching (platform v)?> or <touching (door v)?>> or <touching (elevator  v)?>>>\n        if <(sx) > [0]> then\n            if <<(KeyCollected) = [Yes]> and <touching (door v)?>> then\n                set [open v] to [Yes]\n            end\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\nset [finish v] to []\nrepeat (2)\n    hide\n    wait (0.05) seconds\n    show\n    wait (0.05) seconds\nend\nhide\nwait (0.1) seconds\nbroadcast (Transition v)\n\ndefine Test Die\nif <<touching (danger v)?> or <<touching (saw v)?> or <touching (laser v)?>>> then\n    set [finish v] to [No]\nend\n\ndefine Set Costume\nif <(falling?) < [6]> then\n    if <<(frames) = [0.5]> or <(frames) = [0]>> then\n        switch costume to (stand v)\n    else\n        switch costume to (Walk)\n    end\nelse\n    if <(sy) > [0]> then\n        switch costume to (jump v)\n    else\n        switch costume to (fall v)\n    end\nend\n\nwhen flag clicked\nhide\n\ndefine Game-Con\nbroadcast (Transition v)\nif <not <[completedlevels v] contains (Level)?>> then\n    add (Level) to [completedlevels v]\nend\nchange [level v] by (1)\n\nwhen I receive [bounce v]\nset [sy v] to [15]\n\nwhen I receive [select level v]\nhide\nstop [other scripts in sprite v]\ndelete this clone\n\nwhen I receive [start v]\nset [screen v] to [3]\nforever\n    if <(x) < [-239]> then\n        set [x v] to [-239]\n    end\n    if <<(x) > [234]> and <not <(Level) = [51]>>> then\n        set [finish v] to [Yes]\n    else\n        if <(x) > [239]> then\n            set [x v] to [239]\n        end\n    end\nend\n\nwhen I receive [start v]\nset [walk v] to [1]\nforever\n    change [walk v] by (1)\n    if <(Walk) > [8]> then\n        set [walk v] to [1]\n    end\nend\n\n@Platform\n\nwhen I receive [start v]\nshow\nforever\n    go to x: (0) y: (0)\n    switch costume to (Level)\nend\n\nwhen flag clicked\nhide\n\nwhen I receive [select level v]\nhide\nstop [other scripts in sprite v]\ndelete this clone\n\n@Background\n\nwhen I receive [start v]\nstop [other scripts in sprite v]\ndelete this clones\nCreate A Clone At x: [-210] y: [150] clone#: [7]\nshow\nforever\n    go to [back v] layer\n    go to x: (0) y: (0)\n    if <(Level) = [51]> then\n        switch costume to (out v)\n    else\n        switch costume to (in v)\n    end\nend\n\nwhen flag clicked\nhide\n\nwhen I receive [menu v]\ndelete this clones\nset size to (100) %\nshow\nCreate A Clone At x: [10] y: [113] clone#: [1]\nCreate A Clone At x: [0] y: [-30] clone#: [2]\nCreate A Clone At x: [-60] y: [-30] clone#: [3]\nCreate A Clone At x: [60] y: [-30] clone#: [4]\nforever\n    go to [back v] layer\n    switch costume to (menu v)\n    go to x: (0) y: (0)\nend\n\ndefine Create A Clone At x: (x) y: (y) clone#: (#)\ngo to x: (x) y: (y)\nset [clone# v] to (#)\ncreate clone of (_myself_ v)\n\nwhen I start as a clone\nif <(clone#) = [1]> then\n    switch costume to (title v)\nend\nif <(clone#) = [2]> then\n    switch costume to (play v)\nend\nif <(clone#) = [3]> then\n    if <(Music) = [2]> then\n        switch costume to (music v)\n    else\n        switch costume to (musicoff v)\n    end\nend\nif <(clone#) = [4]> then\n    if <(Sound) = [2]> then\n        switch costume to (sound v)\n    else\n        switch costume to (soundoff v)\n    end\nend\nshow\nwait until <not <mouse down?>>\nforever\n    if <(clone#) = [1]> then\n        switch costume to (title v)\n    end\n    if <(clone#) = [2]> then\n        switch costume to (play v)\n        if <touching (mouse-pointer v)?> then\n            Change Size By: [130]\n            if <mouse down?> then\n                wait (0.05) seconds\n                set [screen v] to [1]\n                broadcast (Select Level v)\n                delete this clone\n            end\n        else\n            Change Size By: [110]\n        end\n    end\n    if <(clone#) = [3]> then\n        if <(Music) = [2]> then\n            switch costume to (music v)\n        else\n            switch costume to (musicoff v)\n        end\n        if <touching (mouse-pointer v)?> then\n            Change Size By: [130]\n            if <mouse down?> then\n                if <(Music) = [2]> then\n                    set [music v] to [0]\n                else\n                    set [music v] to [2]\n                end\n                wait until <not <mouse down?>>\n            end\n        else\n            Change Size By: [110]\n        end\n    end\n    if <(clone#) = [4]> then\n        if <(Sound) = [2]> then\n            switch costume to (sound v)\n        else\n            switch costume to (soundoff v)\n        end\n        if <touching (mouse-pointer v)?> then\n            Change Size By: [130]\n            if <mouse down?> then\n                if <(Sound) = [2]> then\n                    set [sound v] to [0]\n                else\n                    set [sound v] to [2]\n                end\n                wait until <not <mouse down?>>\n            end\n        else\n            Change Size By: [110]\n        end\n    end\nend\n\ndefine Change Size By: (size)\nchange size by (((size) - (size)) / (4))\n\ndefine delete this clones\ndelete this clone\n\nwhen I start as a clone\nif <(clone#) = [5]> then\n    switch costume to (next v)\nend\nshow\nwait until <not <mouse down?>>\nforever\n    if <(clone#) = [5]> then\n        switch costume to (next v)\n        if <touching (mouse-pointer v)?> then\n            Change Size By: [110]\n            if <mouse down?> then\n                change [screen v] by (1)\n                broadcast (Select Level v)\n                if <(Screen) > [2]> then\n                    set [screen v] to [2]\n                end\n                wait until <not <mouse down?>>\n            end\n        else\n            Change Size By: [90]\n        end\n    end\n    if <not <(clone#) = [1]>> then\n        point in direction ((90) + (([sin v] of ((Time) * (10)) ) * (5)))\n    else\n        point in direction (90)\n    end\nend\n\nwhen I receive [select level v]\nwait (0.05) seconds\nswitch costume to (select level v)\nstop [other scripts in sprite v]\n\nwhen I receive [select level v]\ndelete this clones\nCreate A Clone At x: [-192] y: [138] clone#: [8]\nif <(Screen) = [1]> then\n    Create A Clone At x: [192] y: [138] clone#: [5]\nelse\n    Create A Clone At x: [192] y: [138] clone#: [6]\nend\n\nwhen I receive [select level v]\nforever\n    go to [back v] layer\n    switch costume to (select level v)\n    go to x: (0) y: (0)\n    show\nend\n\nwhen I start as a clone\nif <(clone#) = [6]> then\n    switch costume to (previous v)\nend\nshow\nwait until <not <mouse down?>>\nforever\n    if <(clone#) = [6]> then\n        switch costume to (previous v)\n        if <touching (mouse-pointer v)?> then\n            Change Size By: [110]\n            if <mouse down?> then\n                change [screen v] by (-1)\n                broadcast (Select Level v)\n                wait until <not <mouse down?>>\n            end\n        else\n            Change Size By: [90]\n        end\n    end\nend\n\nwhen I start as a clone\nif <(clone#) = [7]> then\n    switch costume to (previous v)\nend\nshow\nwait until <not <mouse down?>>\nforever\n    if <(clone#) = [7]> then\n        go to [front v] layer\n        go [backward v] (1) layers\n        point in direction ((90) + (([sin v] of ((Time) * (10)) ) * (5)))\n        switch costume to (previous v)\n        if <touching (mouse-pointer v)?> then\n            Change Size By: [90]\n            if <mouse down?> then\n                set [screen v] to [1]\n                broadcast (Select Level v)\n                wait until <not <mouse down?>>\n            end\n        else\n            Change Size By: [80]\n        end\n    end\nend\n\nwhen I start as a clone\npoint in direction (90)\nif <(clone#) = [8]> then\n    switch costume to (home v)\nend\nshow\nwait until <not <mouse down?>>\nforever\n    if <(clone#) = [8]> then\n        switch costume to (home v)\n        if <touching (mouse-pointer v)?> then\n            Change Size By: [110]\n            if <mouse down?> then\n                wait (0.05) seconds\n                broadcast (Menu v)\n                delete this clone\n            end\n        else\n            Change Size By: [90]\n        end\n    end\nend\n\nwhen I start as a clone\nshow\nforever\n    if <not <(clone#) = [1]>> then\n        if <touching (mouse-pointer v)?> then\n            if <mouse down?> then\n                if <(Sound) = [2]> then\n                    start sound [click v]\n                end\n                wait until <not <mouse down?>>\n            end\n        end\n    end\nend\n\n@Door\n\nwhen I receive [reset v]\nset [keycollected v] to [No]\nset [open v] to [No]\ndelete this clone\n\ndefine Create A Clone At x: (x) y: (y)\ngo to x: (x) y: (y)\ngo to [back v] layer\ncreate clone of (_myself_ v)\n\nwhen I receive [setup v]\nhide\nif <(Level) = [1]> then\n    Create A Clone At x: [233] y: [-27]\nend\nif <(Level) = [2]> then\n    Create A Clone At x: [233] y: [49]\nend\nif <(Level) = [3]> then\n    Create A Clone At x: [233] y: [-82]\nend\nif <(Level) = [4]> then\n    Create A Clone At x: [233] y: [-11]\nend\nif <(Level) = [5]> then\n    Create A Clone At x: [233] y: [-18]\nend\nif <(Level) = [6]> then\n    Create A Clone At x: [233] y: [-81]\nend\nif <(Level) = [7]> then\n    Create A Clone At x: [233] y: [-42]\nend\nif <(Level) = [8]> then\n    Create A Clone At x: [233] y: [-27]\nend\nif <(Level) = [9]> then\n    Create A Clone At x: [233] y: [-81]\nend\nif <(Level) = [10]> then\n    Create A Clone At x: [233] y: [-82]\nend\nif <(Level) = [11]> then\n    Create A Clone At x: [-38] y: [-82]\nend\nif <(Level) = [12]> then\n    Create A Clone At x: [233] y: [77]\nend\nif <(Level) = [13]> then\n    Create A Clone At x: [233] y: [45]\nend\nif <(Level) = [14]> then\n    Create A Clone At x: [233] y: [-82]\nend\nif <(Level) = [15]> then\n    Create A Clone At x: [233] y: [-82]\nend\nif <(Level) = [16]> then\n    Create A Clone At x: [233] y: [-82]\nend\nif <(Level) = [17]> then\n    Create A Clone At x: [233] y: [-82]\nend\nif <(Level) = [18]> then\n    Create A Clone At x: [233] y: [118]\nend\nif <(Level) = [19]> then\n    Create A Clone At x: [233] y: [-82]\nend\nif <(Level) = [20]> then\n    Create A Clone At x: [233] y: [-82]\nend\nif <(Level) = [21]> then\n    Create A Clone At x: [233] y: [-82]\nend\nif <(Level) = [22]> then\n    Create A Clone At x: [233] y: [-82]\nend\nif <(Level) = [23]> then\n    Create A Clone At x: [233] y: [22]\nend\nif <(Level) = [24]> then\n    Create A Clone At x: [233] y: [-50]\nend\nif <(Level) = [25]> then\n    Create A Clone At x: [233] y: [-82]\nend\nif <(Level) = [26]> then\n    Create A Clone At x: [233] y: [-82]\nend\nif <(Level) = [27]> then\n    Create A Clone At x: [233] y: [-82]\nend\nif <(Level) = [28]> then\n    Create A Clone At x: [233] y: [-82]\nend\nif <(Level) = [29]> then\n    Create A Clone At x: [233] y: [-12]\nend\nif <(Level) = [30]> then\n    Create A Clone At x: [233] y: [-53]\nend\nif <(Level) = [31]> then\n    Create A Clone At x: [233] y: [61]\nend\nif <(Level) = [32]> then\n    Create A Clone At x: [233] y: [-82]\nend\nif <(Level) = [33]> then\n    Create A Clone At x: [233] y: [21]\nend\nif <(Level) = [34]> then\n    Create A Clone At x: [233] y: [-82]\nend\nif <(Level) = [35]> then\n    Create A Clone At x: [233] y: [84]\nend\nif <(Level) = [36]> then\n    Create A Clone At x: [233] y: [-82]\nend\nif <(Level) = [37]> then\n    Create A Clone At x: [233] y: [-82]\nend\nif <(Level) = [38]> then\n    Create A Clone At x: [233] y: [26]\nend\nif <(Level) = [39]> then\n    Create A Clone At x: [233] y: [50]\nend\nif <(Level) = [40]> then\n    Create A Clone At x: [233] y: [-82]\nend\nif <(Level) = [41]> then\n    Create A Clone At x: [233] y: [-82]\nend\nif <(Level) = [42]> then\n    Create A Clone At x: [233] y: [-82]\nend\nif <(Level) = [43]> then\n    Create A Clone At x: [233] y: [-82]\nend\nif <(Level) = [44]> then\n    Create A Clone At x: [233] y: [33]\nend\nif <(Level) = [45]> then\n    Create A Clone At x: [233] y: [33]\nend\nif <(Level) = [46]> then\n    Create A Clone At x: [233] y: [-82]\nend\nif <(Level) = [47]> then\n    Create A Clone At x: [233] y: [-82]\nend\nif <(Level) = [48]> then\n    Create A Clone At x: [233] y: [-17]\nend\nif <(Level) = [49]> then\n    Create A Clone At x: [233] y: [-82]\nend\nif <(Level) = [50]> then\n    Create A Clone At x: [233] y: [-82]\nend\n\nwhen I start as a clone\nshow\nforever\n    if <(Open) = [Yes]> then\n        repeat (15)\n            change y by (2)\n        end\n    end\nend\n\nwhen I receive [select level v]\nhide\nstop [other scripts in sprite v]\ndelete this clone\n\nwhen I start as a clone\nforever\n    if <(Open) = [Yes]> then\n        wait (0.1) seconds\n        if <(Sound) = [2]> then\n            start sound [Door Closing v]\n        end\n        wait until <not <(Open) = [Yes]>>\n    end\nend\n\n@Key\n\nwhen I receive [reset v]\ndelete this clone\n\ndefine Create A Clone At x: (x) y: (y)\ngo to x: (x) y: (y)\ngo to [back v] layer\ncreate clone of (_myself_ v)\n\nwhen I receive [setup v]\nhide\nif <(Level) = [1]> then\n    Create A Clone At x: [-42] y: [45]\nend\nif <(Level) = [2]> then\n    Create A Clone At x: [-178] y: [50]\nend\nif <(Level) = [3]> then\n    Create A Clone At x: [-18] y: [-5]\nend\nif <(Level) = [4]> then\n    Create A Clone At x: [199] y: [142]\nend\nif <(Level) = [5]> then\n    Create A Clone At x: [19] y: [55]\nend\nif <(Level) = [6]> then\n    Create A Clone At x: [-51] y: [-119]\nend\nif <(Level) = [7]> then\n    Create A Clone At x: [27] y: [-5]\nend\nif <(Level) = [8]> then\n    Create A Clone At x: [-152] y: [13]\nend\nif <(Level) = [9]> then\n    Create A Clone At x: [-65] y: [-5]\nend\nif <(Level) = [10]> then\n    Create A Clone At x: [150] y: [110]\nend\nif <(Level) = [11]> then\n    Create A Clone At x: [-82] y: [24]\nend\nif <(Level) = [12]> then\n    Create A Clone At x: [15] y: [107]\nend\nif <(Level) = [13]> then\n    Create A Clone At x: [6] y: [122]\nend\nif <(Level) = [14]> then\n    Create A Clone At x: [6] y: [-10]\nend\nif <(Level) = [15]> then\n    Create A Clone At x: [-47] y: [-10]\nend\nif <(Level) = [16]> then\n    Create A Clone At x: [-120] y: [21]\nend\nif <(Level) = [17]> then\n    Create A Clone At x: [6] y: [-10]\nend\nif <(Level) = [18]> then\n    Create A Clone At x: [-42] y: [48]\nend\nif <(Level) = [19]> then\n    Create A Clone At x: [0] y: [0]\nend\nif <(Level) = [20]> then\n    Create A Clone At x: [0] y: [7]\nend\nif <(Level) = [21]> then\n    Create A Clone At x: [40] y: [123]\nend\nif <(Level) = [22]> then\n    Create A Clone At x: [-6] y: [80]\nend\nif <(Level) = [23]> then\n    Create A Clone At x: [-139] y: [70]\nend\nif <(Level) = [24]> then\n    Create A Clone At x: [-6] y: [150]\nend\nif <(Level) = [25]> then\n    Create A Clone At x: [123] y: [-82]\nend\nif <(Level) = [26]> then\n    Create A Clone At x: [-30] y: [128]\nend\nif <(Level) = [27]> then\n    Create A Clone At x: [68] y: [-70]\nend\nif <(Level) = [28]> then\n    Create A Clone At x: [146] y: [141]\nend\nif <(Level) = [29]> then\n    Create A Clone At x: [47] y: [40]\nend\nif <(Level) = [30]> then\n    Create A Clone At x: [13] y: [12]\nend\nif <(Level) = [31]> then\n    Create A Clone At x: [81] y: [138]\nend\nif <(Level) = [32]> then\n    Create A Clone At x: [190] y: [128]\nend\nif <(Level) = [33]> then\n    Create A Clone At x: [-102] y: [132]\nend\nif <(Level) = [34]> then\n    Create A Clone At x: [70] y: [150]\nend\nif <(Level) = [35]> then\n    Create A Clone At x: [-60] y: [110]\nend\nif <(Level) = [36]> then\n    Create A Clone At x: [-84] y: [140]\nend\nif <(Level) = [37]> then\n    Create A Clone At x: [-58] y: [141]\nend\nif <(Level) = [38]> then\n    Create A Clone At x: [-32] y: [39]\nend\nif <(Level) = [39]> then\n    Create A Clone At x: [8] y: [6]\nend\nif <(Level) = [40]> then\n    Create A Clone At x: [22] y: [-19]\nend\nif <(Level) = [41]> then\n    Create A Clone At x: [9] y: [94]\nend\nif <(Level) = [42]> then\n    Create A Clone At x: [4] y: [141]\nend\nif <(Level) = [43]> then\n    Create A Clone At x: [133] y: [96]\nend\nif <(Level) = [44]> then\n    Create A Clone At x: [35] y: [-6]\nend\nif <(Level) = [45]> then\n    Create A Clone At x: [126] y: [68]\nend\nif <(Level) = [46]> then\n    Create A Clone At x: [208] y: [146]\nend\nif <(Level) = [47]> then\n    Create A Clone At x: [204] y: [47]\nend\nif <(Level) = [48]> then\n    Create A Clone At x: [1] y: [5]\nend\nif <(Level) = [49]> then\n    Create A Clone At x: [-30] y: [-55]\nend\nif <(Level) = [50]> then\n    Create A Clone At x: [4] y: [78]\nend\n\nwhen I start as a clone\nshow\nforever\n    if <touching (player v)?> then\n        if <(Sound) = [2]> then\n            start sound [star v]\n        end\n        set [keycollected v] to [Yes]\n        delete this clone\n    end\nend\n\nwhen I receive [start v]\nhide\nstop [other scripts in sprite v]\n\nwhen I receive [select level v]\nhide\nstop [other scripts in sprite v]\ndelete this clone\n\n@Trampoline\n\nwhen flag clicked\nhide\n\nwhen I receive [reset v]\ndelete this clone\n\nwhen I receive [setup v]\nif <(Level) = [10]> then\n    Clone at x: [-72] y: [-91]\nend\nif <(Level) = [11]> then\n    Clone at x: [-168] y: [-91]\nend\nif <(Level) = [12]> then\n    Clone at x: [14] y: [-29]\nend\nif <(Level) = [13]> then\n    Clone at x: [-141] y: [-90]\nend\nif <(Level) = [16]> then\n    Clone at x: [-20] y: [-90]\nend\nif <(Level) = [19]> then\n    Clone at x: [-111] y: [-90]\n    Clone at x: [-22] y: [-90]\n    Clone at x: [60] y: [-90]\n    Clone at x: [140] y: [-90]\nend\nif <(Level) = [20]> then\n    Clone at x: [-120] y: [-90]\n    Clone at x: [120] y: [-90]\nend\nif <(Level) = [24]> then\n    Clone at x: [-149] y: [-90]\nend\nif <(Level) = [26]> then\n    Clone at x: [-133] y: [-90]\nend\nif <(Level) = [27]> then\n    Clone at x: [130] y: [-91]\nend\nif <(Level) = [35]> then\n    Clone at x: [-124] y: [-90]\n    Clone at x: [17] y: [6]\nend\nif <(Level) = [38]> then\n    Clone at x: [-165] y: [-90]\nend\nif <(Level) = [42]> then\n    Clone at x: [-120] y: [-90]\nend\nif <(Level) = [47]> then\n    Clone at x: [-120] y: [-90]\n    Clone at x: [-18] y: [-90]\n    Clone at x: [71] y: [-90]\nend\n\ndefine Clone at x: (x) y: (y)\ngo to x: (x) y: (y)\ncreate clone of (_myself_ v)\n\nwhen I start as a clone\ngo to [back v] layer\nshow\nforever\n    if <touching (player v)?> then\n        if <<([y position v] of [player v]) > (y position)> and <([sy v] of [player v]) < [-1]>> then\n            broadcast (Bounce v)\n            switch costume to (1 v)\n            repeat (6)\n                next costume\n            end\n            if <(costume [number v]) > [6]> then\n                switch costume to (1 v)\n            end\n        end\n    end\nend\n\nwhen I receive [select level v]\nhide\nstop [other scripts in sprite v]\ndelete this clone\n\n@Danger\n\nwhen I receive [start v]\nset [cos v] to [0]\nshow\nforever\n    go to x: (0) y: (([cos v] of ((cos) * (300)) ) * (5))\n    switch costume to (Level)\nend\n\nwhen flag clicked\nhide\n\nwhen I receive [start v]\nshow\nforever\n    change [cos v] by (0.02)\nend\n\nwhen I receive [select level v]\nhide\nstop [other scripts in sprite v]\ndelete this clone\n\n@Saw\n\nwhen I receive [reset v]\nset [keycollected v] to [No]\nset [open v] to [No]\ndelete this clone\n\ndefine Create A Clone At x: (x) y: (y) Speed: (speed) Distance: (distance)\nset [x v] to (x)\nset [y v] to (y)\nset [speed v] to (speed)\nset [distance v] to (distance)\ngo to [back v] layer\ncreate clone of (_myself_ v)\n\nwhen I receive [setup v]\nhide\nif <(Level) = [15]> then\n    Create A Clone At x: [95] y: [-113] Speed: [3] Distance: [60]\n    Create A Clone At x: [-71] y: [-113] Speed: [3] Distance: [-60]\nend\nif <(Level) = [16]> then\n    Create A Clone At x: [-80] y: [86] Speed: [4] Distance: [100]\n    Create A Clone At x: [-108] y: [-113] Speed: [3] Distance: [40]\n    Create A Clone At x: [80] y: [86] Speed: [4] Distance: [-100]\nend\nif <(Level) = [17]> then\n    Create A Clone At x: [100] y: [-113] Speed: [2] Distance: [20]\nend\nif <(Level) = [18]> then\n    Create A Clone At x: [90] y: [26] Speed: [2] Distance: [20]\n    Create A Clone At x: [-10] y: [-44] Speed: [2] Distance: [20]\nend\nif <(Level) = [19]> then\n    Create A Clone At x: [0] y: [13] Speed: [4] Distance: [100]\n    Create A Clone At x: [0] y: [13] Speed: [4] Distance: [-100]\nend\nif <(Level) = [22]> then\n    Create A Clone At x: [-9] y: [-113] Speed: [3] Distance: [100]\n    Create A Clone At x: [-3] y: [127] Speed: [0] Distance: [0]\nend\nif <(Level) = [23]> then\n    Create A Clone At x: [11] y: [136] Speed: [0] Distance: [0]\n    Create A Clone At x: [80] y: [136] Speed: [0] Distance: [0]\n    Create A Clone At x: [-54] y: [136] Speed: [0] Distance: [0]\n    Create A Clone At x: [150] y: [136] Speed: [0] Distance: [0]\n    Create A Clone At x: [-189] y: [136] Speed: [0] Distance: [0]\n    Create A Clone At x: [-120] y: [136] Speed: [0] Distance: [0]\nend\nif <(Level) = [25]> then\n    Create A Clone At x: [-106] y: [-116] Speed: [0] Distance: [0]\n    Create A Clone At x: [-22] y: [-116] Speed: [0] Distance: [0]\n    Create A Clone At x: [61] y: [-116] Speed: [0] Distance: [0]\nend\nif <(Level) = [26]> then\n    Create A Clone At x: [10] y: [-116] Speed: [3] Distance: [100]\nend\nif <(Level) = [27]> then\n    Create A Clone At x: [-86] y: [-116] Speed: [3] Distance: [50]\nend\nif <(Level) = [28]> then\n    Create A Clone At x: [-5] y: [-49] Speed: [3] Distance: [50]\n    Create A Clone At x: [152] y: [-116] Speed: [0] Distance: [0]\nend\nif <(Level) = [32]> then\n    Create A Clone At x: [-50] y: [-116] Speed: [0] Distance: [0]\nend\nif <(Level) = [37]> then\n    Create A Clone At x: [0] y: [-116] Speed: [5] Distance: [100]\n    Create A Clone At x: [0] y: [-116] Speed: [5] Distance: [-100]\nend\nif <(Level) = [43]> then\n    Create A Clone At x: [185] y: [170] Speed: [0] Distance: [0]\nend\nif <(Level) = [46]> then\n    Create A Clone At x: [8] y: [-41] Speed: [4] Distance: [75]\nend\nif <(Level) = [47]> then\n    Create A Clone At x: [-66] y: [-116] Speed: [0] Distance: [0]\n    Create A Clone At x: [29] y: [-116] Speed: [0] Distance: [0]\nend\nif <(Level) = [50]> then\n    Create A Clone At x: [4] y: [166] Speed: [6] Distance: [50]\nend\n\nwhen I start as a clone\nshow\nforever\n    turn right (8) degrees\n    go to x: ((x) + (([cos v] of ((Time) * (speed)) ) * (distance))) y: (y)\nend\n\nwhen I receive [select level v]\nhide\nstop [other scripts in sprite v]\ndelete this clone\n\nwhen I receive [select level v]\nhide\nstop [other scripts in sprite v]\ndelete this clone\n\nwhen I receive [select level v]\ndelete this clone\n\n@Elevator \n\nwhen I receive [reset v]\nset [keycollected v] to [No]\nset [open v] to [No]\ndelete this clone\n\ndefine Create A Clone At x: (x) y: (y) Speed: (speed) Distance: (distance) Type: (type)\nset [x v] to (x)\nset [y v] to (y)\nset [speed v] to (speed)\nset [distance v] to (distance)\nset [type v] to (type)\ngo to [back v] layer\ncreate clone of (_myself_ v)\n\nwhen I receive [setup v]\nhide\nif <(Level) = [21]> then\n    switch costume to (1 v)\n    Create A Clone At x: [41] y: [-51] Speed: [2] Distance: [60] Type: [1]\nend\nif <(Level) = [22]> then\n    switch costume to (2 v)\n    Create A Clone At x: [0] y: [10] Speed: [2] Distance: [70] Type: [1]\nend\nif <(Level) = [23]> then\n    switch costume to (1 v)\n    Create A Clone At x: [-59] y: [0] Speed: [2] Distance: [100] Type: [1]\n    Create A Clone At x: [26] y: [0] Speed: [2] Distance: [-100] Type: [1]\n    Create A Clone At x: [113] y: [0] Speed: [2] Distance: [100] Type: [1]\nend\nif <(Level) = [24]> then\n    switch costume to (2 v)\n    Create A Clone At x: [-7] y: [15] Speed: [3] Distance: [40] Type: [1]\nend\nif <(Level) = [26]> then\n    switch costume to (2 v)\n    Create A Clone At x: [-28] y: [20] Speed: [3] Distance: [40] Type: [1]\nend\nif <(Level) = [27]> then\n    switch costume to (1 v)\n    Create A Clone At x: [-40] y: [10] Speed: [3] Distance: [60] Type: [1]\nend\nif <(Level) = [28]> then\n    switch costume to (1 v)\n    Create A Clone At x: [151] y: [-14] Speed: [3] Distance: [60] Type: [1]\nend\nif <(Level) = [30]> then\n    switch costume to (1 v)\n    Create A Clone At x: [-20] y: [-61] Speed: [3] Distance: [60] Type: [2]\nend\nif <(Level) = [31]> then\n    switch costume to (1 v)\n    Create A Clone At x: [-5] y: [-79] Speed: [3] Distance: [100] Type: [2]\n    Create A Clone At x: [79] y: [22] Speed: [3] Distance: [-70] Type: [1]\nend\nif <(Level) = [32]> then\n    switch costume to (1 v)\n    Create A Clone At x: [-51] y: [7] Speed: [3] Distance: [100] Type: [1]\n    Create A Clone At x: [70] y: [72] Speed: [3] Distance: [100] Type: [2]\nend\nif <(Level) = [33]> then\n    switch costume to (1 v)\n    Create A Clone At x: [32] y: [-53] Speed: [3] Distance: [100] Type: [1]\n    Create A Clone At x: [3] y: [70] Speed: [3] Distance: [150] Type: [2]\nend\nif <(Level) = [34]> then\n    switch costume to (1 v)\n    Create A Clone At x: [-2] y: [43] Speed: [3] Distance: [50] Type: [1]\nend\nif <(Level) = [36]> then\n    switch costume to (3 v)\n    Create A Clone At x: [0] y: [-48] Speed: [3] Distance: [100] Type: [2]\n    switch costume to (1 v)\n    Create A Clone At x: [0] y: [13] Speed: [3] Distance: [100] Type: [1]\nend\nif <(Level) = [37]> then\n    switch costume to (3 v)\n    Create A Clone At x: [174] y: [20] Speed: [3] Distance: [80] Type: [1]\nend\nif <(Level) = [41]> then\n    switch costume to (1 v)\n    Create A Clone At x: [10] y: [1] Speed: [3] Distance: [80] Type: [2]\nend\nif <(Level) = [43]> then\n    switch costume to (1 v)\n    Create A Clone At x: [186] y: [20] Speed: [3] Distance: [90] Type: [1]\nend\nif <(Level) = [45]> then\n    switch costume to (1 v)\n    Create A Clone At x: [-50] y: [-10] Speed: [3] Distance: [90] Type: [1]\nend\nif <(Level) = [46]> then\n    switch costume to (1 v)\n    Create A Clone At x: [164] y: [22] Speed: [3] Distance: [90] Type: [1]\nend\nif <(Level) = [47]> then\n    switch costume to (1 v)\n    Create A Clone At x: [-11] y: [54] Speed: [3] Distance: [100] Type: [2]\nend\nif <(Level) = [50]> then\n    switch costume to (1 v)\n    Create A Clone At x: [4] y: [-84] Speed: [3] Distance: [100] Type: [2]\n    Create A Clone At x: [4] y: [40] Speed: [3] Distance: [100] Type: [1]\nend\n\nwhen I start as a clone\nshow\nset [ghost v] effect to (0)\nforever\n    if <(type) = [1]> then\n        go to x: (x) y: ((y) + (([cos v] of ((Time) * (speed)) ) * (distance)))\n    else\n        if <(type) = [2]> then\n            go to x: ((x) + (([cos v] of ((Time) * (speed)) ) * (distance))) y: (y)\n        else\n            if <touching (player v)?> then\n                repeat (10)\n                    change [ghost v] effect by (10)\n                end\n                delete this clone\n            end\n        end\n    end\nend\n\nwhen I receive [select level v]\nhide\nstop [other scripts in sprite v]\ndelete this clone\n\nwhen I receive [select level v]\ndelete this clone\n\n@Laser\n\nwhen I receive [setup v]\nhide\nif <(Level) = [40]> then\n    switch costume to (1 v)\n    Create A Clone At x: [-117] y: [-20] Time: [1]\n    Create A Clone At x: [-59] y: [-20] Time: [1]\n    Create A Clone At x: [-6] y: [-20] Time: [1]\n    Create A Clone At x: [52] y: [-20] Time: [1]\n    Create A Clone At x: [108] y: [-20] Time: [1]\n    Create A Clone At x: [166] y: [-20] Time: [1]\nend\nif <(Level) = [41]> then\n    switch costume to (2 v)\n    Create A Clone At x: [72] y: [5] Time: [1]\n    Create A Clone At x: [-60] y: [5] Time: [1]\nend\nif <(Level) = [42]> then\n    switch costume to (3 v)\n    Create A Clone At x: [-110] y: [-3] Time: [1]\n    Create A Clone At x: [106] y: [-3] Time: [1]\nend\nif <(Level) = [43]> then\n    switch costume to (4 v)\n    Create A Clone At x: [20] y: [0] Time: [1]\nend\nif <(Level) = [44]> then\n    switch costume to (4 v)\n    Create A Clone At x: [-26] y: [-7] Time: [2]\n    Create A Clone At x: [96] y: [-7] Time: [2]\nend\nif <(Level) = [45]> then\n    switch costume to (5 v)\n    Create A Clone At x: [-1] y: [95] Time: [1]\nend\nif <(Level) = [46]> then\n    switch costume to (2 v)\n    Create A Clone At x: [11] y: [12] Time: [1]\nend\nif <(Level) = [47]> then\n    switch costume to (5 v)\n    Create A Clone At x: [0] y: [1] Time: [1]\nend\nif <(Level) = [48]> then\n    switch costume to (4 v)\n    Create A Clone At x: [-58] y: [19] Time: [1]\n    Create A Clone At x: [62] y: [21] Time: [1]\nend\nif <(Level) = [50]> then\n    switch costume to (4 v)\n    Create A Clone At x: [-131] y: [25] Time: [0.5]\n    Create A Clone At x: [140] y: [25] Time: [0.5]\nend\n\nwhen I receive [reset v]\ndelete this clone\n\ndefine Create A Clone At x: (x) y: (y) Time: (time)\ngo to x: (x) y: (y)\nset [time v] to (time)\ncreate clone of (_myself_ v)\n\nwhen I start as a clone\ngo to [back v] layer\nclear graphic effects\nshow\nforever\n    wait (time) seconds\n    hide\n    wait (time) seconds\n    show\nend\n\nwhen I receive [select level v]\ndelete this clone\n\n@Levels\n\ndefine Create Clones\nhide\nif <(Screen) = [1]> then\n    set [clone# v] to [0]\nend\nif <(Screen) = [2]> then\n    set [clone# v] to [25]\nend\nrepeat (25)\n    change [clone# v] by (1)\n    switch costume to (clone#)\n    create clone of (_myself_ v)\nend\n\nwhen I start as a clone\nPosition\nshow\nChange Size By: [0]\nforever\n    Position\n    costume (clone#)\n    if <touching (mouse-pointer v)?> then\n        Change Size By: [130]\n        if <mouse down?> then\n            if <(Sound) = [2]> then\n                if <not <(costume [name v]) = [Locked]>> then\n                    start sound [btn v]\n                else\n                end\n            end\n            if <not <(costume [name v]) = [Locked]>> then\n                set [level v] to (clone#)\n                wait (0.05) seconds\n                broadcast (Start v)\n                stop [other scripts in sprite v]\n                delete this clone\n            end\n        end\n    else\n        Change Size By: [110]\n    end\nend\n\ndefine Position\nif <(Screen) = [1]> then\n    if <(clone#) > [7]> then\n        go to x: (([x position v] of [levels v]) + ((((clone#) - (7)) - (1)) * (60))) y: (5)\n        if <(clone#) > [14]> then\n            go to x: (([x position v] of [levels v]) + ((((clone#) - (14)) - (1)) * (60))) y: (-54)\n            if <(clone#) > [21]> then\n                go to x: (([x position v] of [levels v]) + ((((clone#) - (21)) - (1)) * (60))) y: (-113)\n            end\n        end\n    else\n        go to x: (([x position v] of [levels v]) + (((clone#) - (1)) * (60))) y: (64)\n    end\nelse\n    if <(clone#) > [32]> then\n        go to x: (([x position v] of [levels v]) + ((((clone#) - (32)) - (1)) * (60))) y: (5)\n        if <(clone#) > [39]> then\n            go to x: (([x position v] of [levels v]) + ((((clone#) - (39)) - (1)) * (60))) y: (-54)\n            if <(clone#) > [46]> then\n                go to x: (([x position v] of [levels v]) + ((((clone#) - (46)) - (1)) * (60))) y: (-113)\n            end\n        end\n    else\n        go to x: (([x position v] of [levels v]) + (((clone#) - (26)) * (60))) y: (64)\n    end\nend\n\ndefine Change Size By: (size)\nchange size by (((size) - (size)) / (4))\n\nwhen I receive [select level v]\nstop [other scripts in sprite v]\ndelete this clone\nCreate Clones\n\nwhen I receive [start v]\ndelete this clone\n\ndefine costume (number)\nif <<[completedlevels v] contains ((number) - (1))?> or <(clone#) = [1]>> then\n    switch costume to (number)\nelse\n    switch costume to (locked v)\nend\nif <[completedlevels v] contains (clone#)?> then\n    set [color v] effect to (150)\nelse\n    set [color v] effect to (0)\nend\n\ndefine delete this clone\ndelete this clone\n\nwhen I receive [start v]\nforever\n    delete this clone\nend\n\nwhen I receive [menu v]\nset [screen v] to [0]\n\nwhen I start as a clone\nforever\n    if <<(Screen) = [3]> or <(Screen) = [0]>> then\n        delete this clone\n    end\nend\n\n@Thumbnail\n\nwhen flag clicked\nhide\nforever\n    reset timer\nend\n\nwhen [timer v] > (0.05)\ngo to [front v] layer\ngo to x: (0) y: (0)\nstop [other scripts in sprite v]\nset [ghost v] effect to (100)\nshow\nrepeat (10)\n    change [ghost v] effect by (-10)\nend\n\nwhen I receive [menu v]\nforever\n    play sound [_CPU-Mood_ by Demonicity v] until done\nend\n\nwhen I receive [menu v]\nforever\n    if <(Music) = [2]> then\n        set volume to (30) %\n    else\n        set volume to (0) %\n    end\nend\n\nwhen flag clicked\nset [time v] to [0]\n\nwhen flag clicked\nforever\n    change [time v] by (1)\nend\n\nwhen I receive [start v]\nstop [other scripts in sprite v]\nReset\n\ndefine Reset\nforever\n    change [time v] by (1)\n    reset timer\nend\n\ndefine Music\nforever\n    if <(Music) = [2]> then\n        set volume to (30) %\n    else\n        set volume to (0) %\n    end\nend\n\n@Transition\n\nwhen I receive [transition v]\ngo to [front v] layer\nshow\ngo to x: (0) y: (0)\nglide (0.8) secs to x: (467) y: (0)\nhide\nforever\n    go to [front v] layer\nend\n\nwhen flag clicked\nhide\n\nwhen I receive [select level v]\nhide\n\n@Skip\n\nwhen I receive [start v]\nshow\nset size to (0) %\nforever\n    switch costume to (Skip)\n    go to x: (190) y: (-158)\n    if <touching (mouse-pointer v)?> then\n        Change Size By: [100]\n        if <<mouse down?> and <(Skip) > [0]>> then\n            change [skip v] by (-1)\n            set [finish v] to [Yes]\n            wait until <not <mouse down?>>\n        end\n    else\n        Change Size By: [90]\n    end\nend\n\nwhen I receive [start v]\nshow\nforever\n    if <<not <(Level) = [51]>> and <(Screen) = [3]>> then\n        show\n    else\n        hide\n        stop [other scripts in sprite v]\n        stop [this script v]\n    end\nend\n\nwhen flag clicked\nset [skip v] to [10]\nhide\n\nwhen I receive [select level v]\nhide\n\ndefine Change Size By: (size)\nchange size by (((size) - (size)) / (4))\n\n
*Use the W,A,S,D or Arrow Keys To Move The Player.\n*Anything Nasty.\n*Collect Keys To Open Doors.\n*Jump On The Spring To Bounce.