The Sunlight Valley || Multiplayer Platformer   [Games] 
@Stage\n\nwhen flag clicked\nforever\n    set [mouse x v] to (mouse x)\n    set [mouse y v] to (mouse y)\nend\n\nwhen I receive [ask code v]\nask [Code?] and wait\nset [loading screen v] to [True]\nset [scan-code v] to (answer)\n\nwhen flag clicked\nswitch backdrop to (day v)\nwait (2) seconds\nforever\n    if <(backdrop [name v]) = [Day]> then\n        set [background v] to [1]\n        play sound [Wallpaper v] until done\n    else\n        set [background v] to [2]\n        play sound [Scheming Weasel v] until done\n    end\nend\n\nwhen [b v] key pressed\nwait until <not <key (b v) pressed?>>\nstop all sounds\nif <(Can edit?) = [True]> then\n    next backdrop\n    erase all\n    broadcast (rebuild v)\nend\n\nwhen flag clicked\nset volume to (100) %\nforever\n    wait until <(Load) = [True]>\n    wait until <(Loading Screen) = [True]>\n    wait until <(Loading Screen) = [False]>\n    switch backdrop to (Background)\n    stop all sounds\n    if <(backdrop [name v]) = [Day]> then\n        set [background v] to [1]\n        play sound [Wallpaper v] until done\n    else\n        set [background v] to [2]\n        play sound [Scheming Weasel v] until done\n    end\nend\n\nwhen [l v] key pressed\nwait until <(Loading Screen) = [True]>\nwait until <(Loading Screen) = [False]>\nswitch backdrop to (Background)\nstop all sounds\nif <(backdrop [name v]) = [Day]> then\n    set [background v] to [1]\n    play sound [Wallpaper v] until done\nelse\n    set [background v] to [2]\n    play sound [Scheming Weasel v] until done\nend\n\nwhen I receive [change background v]\nstop all sounds\nif <(Can edit?) = [True]> then\n    next backdrop\nend\n\nwhen I receive [music v]\nif <(volume) = [100]> then\n    set volume to (0) %\nelse\n    set volume to (100) %\nend\n\n@Block\n\nwhen flag clicked\nswitch costume to (normal v)\nset [ghost v] effect to (0)\nshow\nwait (0.1) seconds\nwait until <(Can edit?) = [True]>\nforever\n    repeat until <<<key (l v) pressed?> or <key (c v) pressed?>> or <<(Get) = [True]> or <(Load) = [True]>>>\n        go to x: ((round ((mouse x) / (22))) * (22)) y: ((round ((mouse y) / (20))) * (20))\n    end\n    if <<key (l v) pressed?> or <(Load) = [True]>> then\n        wait until <(Done Loading?) = [True]>\n    end\n    if <(Code Open?) = [True]> then\n        wait until <(Code Open?) = [False]>\n    end\nend\n\nwhen [w v] key pressed\nnext costume\n\nwhen flag clicked\nerase all\nwait until <not <mouse down?>>\nforever\n    wait until <(Can edit?) = [True]>\n    repeat until <<<<(Can edit?) = [False]> or <key (l v) pressed?>> or <key (c v) pressed?>> or <<(Get) = [True]> or <(Load) = [True]>>>\n        if <<mouse down?> and <not <touching (player v)?>>> then\n            if <not <<(Placed?) = [0]> and <<(costume [number v]) = [12]> or <(costume [number v]) = [13]>>>> then\n                if <not <<<touching (music on/off v)?> or <touching (player color v)?>> or <<touching (load v)?> or <<touching (code v)?> or <touching (play/edit v)?>>>>> then\n                    replace item ((((x position) / (22)) + (11)) + ((21) * (((-1) * ((y position) / (20))) + (8)))) of [data v] with (letter (costume [number v]) of [123456789abcdefghij])\n                    stamp\n                    stamp\n                end\n            end\n        end\n    end\n    wait (0.5) seconds\n    if <<key (l v) pressed?> or <(Load) = [True]>> then\n        wait until <(Done Loading?) = [True]>\n    else\n        wait until <(Code Open?) = [False]>\n    end\nend\n\nwhen [i v] key pressed\nbroadcast (say v)\n\nwhen flag clicked\nforever\n    if <(Can edit?) = [True]> then\n        if <key (m v) pressed?> then\n            hide\n        end\n    end\nend\n\nwhen flag clicked\nforever\n    if <(costume [number v]) = [11]> then\n        if <mouse down?> then\n            broadcast (erase v)\n        end\n    end\nend\n\nwhen flag clicked\nforever\n    if <(Can edit?) = [True]> then\n        show\n    else\n        hide\n    end\nend\n\nwhen flag clicked\nset [placed? v] to [1]\nset [ax v] to [0]\nset [ay v] to [0]\nset [ax2 v] to [0]\nset [ay2 v] to [0]\nforever\n    if <<(Can edit?) = [True]> and <<(costume [number v]) = [12]> and <(Placed?) = [1]>>> then\n        if <key (x v) pressed?> then\n            say [Place Start Portal]\n            wait until <mouse down?>\n            set [ax v] to (x position)\n            set [ay v] to (y position)\n            wait until <not <mouse down?>>\n            say [Place End Portal]\n            switch costume to (portal end v)\n            wait until <<mouse down?> and <(costume [number v]) = [13]>>\n            set [ax2 v] to (x position)\n            set [ay2 v] to (y position)\n            wait until <not <mouse down?>>\n            set [placed? v] to [0]\n        end\n    else\n        say []\n    end\nend\n\nwhen [l v] key pressed\nset [num v] to [0]\nif <(Can edit?) = [True]> then\n    go to x: (-220) y: (160)\n    broadcast (ask code v) and wait\n    read code\nend\n\nwhen flag clicked\nswitch costume to (normal v)\ngo to x: (-220) y: (-160)\nstamp\nset [can edit? v] to [False]\nrepeat (21)\n    stamp\n    stamp\n    stamp\n    change x by (22)\nend\ngo to x: (-220) y: (-160)\nstamp\nset [can edit? v] to [True]\n\ndefine read code\nif <not <(length of (scan-code)) < [398]>> then\n    repeat (18)\n        repeat (21)\n            change [num v] by (1)\n            if <not <(letter (num) of (scan-code)) = [0]>> then\n                switch costume to (join [0x] (letter (num) of (scan-code)))\n                stamp\n                stamp\n                stamp\n            end\n            change x by (22)\n        end\n        set x to (-220)\n        change y by (-20)\n    end\n    set [scan-num v] to [0]\n    repeat (378)\n        change [scan-num v] by (1)\n        replace item (scan-num) of [data v] with (letter (scan-num) of (scan-code))\n    end\n    set [start x v] to ((join (letter (379) of (scan-code)) (join (letter (380) of (scan-code)) (letter (381) of (scan-code)))) - (400))\n    set [start y v] to ((join (letter (382) of (scan-code)) (join (letter (383) of (scan-code)) (letter (384) of (scan-code)))) - (400))\n    set [ax v] to ((join (letter (386) of (scan-code)) (join (letter (387) of (scan-code)) (letter (388) of (scan-code)))) - (400))\n    set [ay v] to ((join (letter (389) of (scan-code)) (join (letter (390) of (scan-code)) (letter (391) of (scan-code)))) - (400))\n    set [ax2 v] to ((join (letter (392) of (scan-code)) (join (letter (393) of (scan-code)) (letter (394) of (scan-code)))) - (400))\n    set [ay2 v] to ((join (letter (395) of (scan-code)) (join (letter (396) of (scan-code)) (letter (397) of (scan-code)))) - (400))\n    set [background v] to (letter (398) of (scan-code))\n    broadcast (get player color v)\nend\nset [done loading? v] to [True]\nset [loading screen v] to [False]\nbroadcast (position v)\n\nwhen flag clicked\nset [done loading? v] to [False]\nset [loading screen v] to [False]\nwait until <<key (l v) pressed?> or <(Load) = [True]>>\nif <(Code Open?) = [True]> then\n\nwhen flag clicked\nset [ghost v] effect to (0)\nforever\n    if <<<<<touching (panel 1 v)?> or <touching (panel 2 v)?>> or <<touching (play/edit v)?> or <touching (options v)?>>> or <touching (music on/off v)?>> or <touching (change background v)?>> then\n        set [ghost v] effect to (100)\n        wait until <not <<<<<touching (panel 1 v)?> or <touching (panel 2 v)?>> or <<touching (play/edit v)?> or <touching (options v)?>>> or <touching (music on/off v)?>> or <touching (change background v)?>>>\n        set [ghost v] effect to (0)\n    end\nend\n\nwhen I receive [load code v]\nset [num v] to [0]\nif <(Can edit?) = [True]> then\n    go to x: (-220) y: (160)\n    broadcast (ask code v) and wait\n    read code\nend\n\nwhen flag clicked\nforever\n    wait until <key (space v) pressed?>\n    wait until <not <key (space v) pressed?>>\n    if <(Can edit?) = [True]> then\n        set [can edit? v] to [False]\n    else\n        set [can edit? v] to [True]\n    end\nend\n\nwhen flag clicked\nset [checkpoint? v] to [False]\nforever\n    if <[data v] contains [i]?> then\n        set [checkpoint? v] to [True]\n    end\nend\n\nwhen [s v] key pressed\nswitch costume to ((costume [number v]) - (1))\n\nwhen flag clicked\nforever\n    if <<key (m v) pressed?> and <(Can edit?) = [True]>> then\n        set [ghost v] effect to (100)\n        wait until <not <key (m v) pressed?>>\n        set [ghost v] effect to (0)\n    end\nend\n\n@Player\n\nwhen flag clicked\nset size to (80) %\ngo to x: (-150) y: (-143)\nswitch costume to (player v)\nset [start x v] to [-150]\nset [start y v] to [-143]\nset [xv v] to [0]\nset [yv v] to [0]\nforever\n    wait until <(Can edit?) = [False]>\n    repeat until <(Can edit?) = [True]>\n        if <key (right arrow v) pressed?> then\n            change [xv v] by (1)\n        end\n        if <key (left arrow v) pressed?> then\n            change [xv v] by (-1)\n        end\n        set [xv v] to ((Xv) * (0.85))\n        change x by (Xv)\n        if <<<<touching color (#7f7f7f)?> or <touching color (#ccd8ff)?>> or <touching color (#002699)?>> or <<touching color (#cccccc)?> and <(Key?) = [Hidden]>>> then\n            change y by (1)\n            if <<<<touching color (#7f7f7f)?> or <touching color (#ccd8ff)?>> or <touching color (#002699)?>> or <<touching color (#cccccc)?> and <(Key?) = [Hidden]>>> then\n                change y by (1)\n                if <<<<touching color (#7f7f7f)?> or <touching color (#ccd8ff)?>> or <touching color (#002699)?>> or <<touching color (#cccccc)?> and <(Key?) = [Hidden]>>> then\n                    change y by (1)\n                    if <<<<touching color (#7f7f7f)?> or <touching color (#ccd8ff)?>> or <touching color (#002699)?>> or <<touching color (#cccccc)?> and <(Key?) = [Hidden]>>> then\n                        change y by (1)\n                        if <<<<touching color (#7f7f7f)?> or <touching color (#ccd8ff)?>> or <touching color (#002699)?>> or <<touching color (#cccccc)?> and <(Key?) = [Hidden]>>> then\n                            change y by (1)\n                            if <<<<touching color (#7f7f7f)?> or <touching color (#ccd8ff)?>> or <touching color (#002699)?>> or <<touching color (#cccccc)?> and <(Key?) = [Hidden]>>> then\n                                change x by ((Xv) * (-1))\n                                change y by (-3)\n                                set [yv v] to [-1]\n                                if <key (up arrow v) pressed?> then\n                                    if <(Xv) > [0]> then\n                                        set [xv v] to [-5]\n                                    else\n                                        set [xv v] to [5]\n                                    end\n                                    set [yv v] to [10]\n                                else\n                                    set [xv v] to [0]\n                                end\n                            end\n                        end\n                    end\n                end\n            end\n        end\n        change [yv v] by (-1)\n        change y by (Yv)\n        if <<<<touching color (#7f7f7f)?> or <touching color (#ccd8ff)?>> or <touching color (#002699)?>> or <<touching color (#cccccc)?> and <(Key?) = [Hidden]>>> then\n            change y by ((Yv) * (-1))\n            set [yv v] to [0]\n        end\n        change y by (-1)\n        if <<<touching color (#7f7f7f)?> or <touching color (#ccd8ff)?>> or <<touching color (#cccccc)?> and <(Key?) = [Hidden]>>> then\n            if <key (up arrow v) pressed?> then\n                set [yv v] to [15]\n                start sound [Jump v]\n            end\n        end\n        change y by (-1)\n    end\nend\n\nwhen [r v] key pressed\nif <(Can edit?) = [False]> then\n    go to x: (Start X) y: (Start Y)\nend\n\nwhen flag clicked\nforever\n    if <(Can edit?) = [True]> then\n        if <key (m v) pressed?> then\n            go to (mouse-pointer v)\n            set [start x v] to (x position)\n            set [start y v] to (y position)\n        end\n    end\nend\n\nwhen flag clicked\nforever\n    if <(Can edit?) = [True]> then\n        broadcast (key gone v)\n        go to x: (Start X) y: (Start Y)\n    end\nend\n\nwhen flag clicked\nforever\n    wait until <(Can edit?) = [False]>\n    go to x: (Start X) y: (Start Y)\n    repeat until <(Can edit?) = [True]>\n        if <<touching color (#ff0000)?> or <touching color (#ff3838)?>> then\n            start sound [Game over v]\n            repeat (3)\n                change [ghost v] effect by (33)\n            end\n            set [ghost v] effect to (100)\n            broadcast (key gone v)\n            if <(checkpoint?) = [True]> then\n                go to x: (Checkpoint X) y: (Checkpoint Y)\n            else\n                go to x: (Start X) y: (Start Y)\n            end\n            repeat (3)\n                change [ghost v] effect by (-33)\n            end\n            set [ghost v] effect to (0)\n            wait until <not <<touching color (#ff0000)?> or <touching color (#ff3030)?>>>\n        end\n        if <touching color (#003fff)?> then\n            set [yv v] to [20]\n            play sound [Jump v] until done\n        end\n        if <touching color (#01e070)?> then\n            set [yv v] to [-0.5]\n        end\n        if <touching color (#ffbf02)?> then\n            start sound [Win! v]\n            say [You win!] for (1.5) seconds\n            go to x: (Start X) y: (Start Y)\n            broadcast (key gone v)\n        end\n        if <touching color (#02bfff)?> then\n            if <key (up arrow v) pressed?> then\n                set [yv v] to [5]\n            else\n                set [yv v] to [1.5]\n            end\n        end\n    end\nend\n\nwhen I receive [position v]\ngo to x: (Start X) y: (Start Y)\n\nwhen flag clicked\nset [ghost v] effect to (0)\nforever\n    wait until <(Can edit?) = [False]>\n    repeat until <(Can edit?) = [True]>\n        if <touching color (#00ff55)?> then\n            start sound [Portal v]\n            repeat (5)\n                change [ghost v] effect by (20)\n            end\n            set [ghost v] effect to (100)\n            go to x: (ax2) y: (ay2)\n            start sound [Portal v]\n            repeat (5)\n                change [ghost v] effect by (-20)\n            end\n            set [ghost v] effect to (0)\n            wait until <not <touching color (#ff5218)?>>\n        end\n        if <touching color (#ff5218)?> then\n            start sound [Portal v]\n            repeat (5)\n                change [ghost v] effect by (20)\n            end\n            set [ghost v] effect to (100)\n            go to x: (ax) y: (ay)\n            start sound [Portal v]\n            repeat (5)\n                change [ghost v] effect by (-20)\n            end\n            set [ghost v] effect to (0)\n            wait until <not <touching color (#00ff55)?>>\n        end\n    end\nend\n\nwhen flag clicked\nforever\n    wait until <(Can edit?) = [False]>\n    repeat until <(Can edit?) = [True]>\n        if <touching color (#3838ff)?> then\n            set [xv v] to [2.5]\n        end\n        if <touching color (#3668ff)?> then\n            set [xv v] to [-2.5]\n        end\n        if <touching color (#7f00ff)?> then\n            set [yv v] to [5]\n        end\n        if <touching color (#ccd8ff)?> then\n            set [xv v] to ((Xv) * (1.1))\n        end\n        if <touching color (#ff8002)?> then\n            broadcast (key v)\n        end\n    end\nend\n\nwhen flag clicked\nforever\n    wait until <(Can edit?) = [False]>\n    repeat until <(Can edit?) = [True]>\n        if <touching color (#ffcc33)?> then\n            set [checkpoint x v] to (x position)\n            set [checkpoint y v] to (y position)\n            start sound [Checkpoint ding v]\n            wait until <not <touching color (#ffcc33)?>>\n        end\n        if <touching color (#ff9999)?> then\n            broadcast (key gone v)\n            play sound [key lose v] until done\n            wait until <not <touching color (#ff9999)?>>\n        end\n    end\nend\n\nwhen I receive [change player color v]\nnext costume\n\nwhen flag clicked\nforever\n    wait until <(Can edit?) = [False]>\n    repeat until <(Can edit?) = [True]>\n        wait until <touching color (#ccd8ff)?>\n        set [yv v] to [0]\n        wait until <not <touching color (#ccd8ff)?>>\n    end\nend\n\nwhen flag clicked\nforever\n    if <touching color (#ff8002)?> then\n        play sound [key v] until done\n        wait until <not <touching color (#ff8002)?>>\n    end\nend\n\nwhen flag clicked\nforever\n    if <touching color (#f1fff8)?> then\n        change x by ((Xv) * (-1))\n        change y by (-1)\n    end\nend\n\nwhen flag clicked\nshow\nforever\n    wait until <key (c v) pressed?>\n    hide\n    wait until <(Code Open?) = [False]>\n    show\nend\n\n@Eraser\n\nwhen flag clicked\nhide\n\nwhen I receive [erase v]\nif <(Background) = [1]> then\n    switch costume to (eraser v)\nelse\n    switch costume to (eraser2 v)\nend\nshow\ngo to x: ((round ((mouse x) / (22))) * (22)) y: ((round ((mouse y) / (20))) * (20))\npen down\nreplace item ((((x position) / (22)) + (11)) + ((21) * (((-1) * ((y position) / (20))) + (8)))) of [data v] with [0]\nstamp\npen up\nhide\n\n@Frame\n\nwhen flag clicked\ngo to x: (0) y: (0)\n\n@Mode\n\nwhen flag clicked\ngo to x: (-198) y: (158)\nforever\n    if <(Can edit?) = [True]> then\n        switch costume to (editor v)\n    else\n        switch costume to (play v)\n    end\nend\n\n@Platformer Maker\n\nwhen flag clicked\ngo to x: (0) y: (0)\ngo to [front v] layer\nhide\n\n@Scanner\n\nwhen flag clicked\nhide\nset [ghost v] effect to (100)\ngo to x: (-221) y: (158)\nset [code v] to []\nset [code open? v] to [False]\ndelete (all) of [code v]\nshow list [code v]\nforever\n    go to x: ((round ((x position) / (22))) * (22)) y: ((round ((y position) / (20))) * (20))\nend\n\nwhen [c v] key pressed\nif <(Can edit?) = [True]> then\n    set [code open? v] to [True]\n    delete (all) of [code v]\n    hide list [code v]\n    add [Double click the code below and hold Ctrl + C on Windows or ⌘ + C on a Mac] to [code v]\n    add [Press K to close] to [code v]\n    go to x: (-221) y: (158)\n    set [code v] to []\n    add (join (join (join (join (Data) (join ((Start X) + (400)) ((Start Y) + (400)))) ([costume # v] of [player v])) (join (join ((ax) + (400)) ((ay) + (400))) (join ((ax2) + (400)) ((ay2) + (400))))) (Background)) to [code v]\n    wait until <key (k v) pressed?>\n    show list [code v]\n    set [code open? v] to [False]\nend\n\nwhen I receive [get code v]\nset [code open? v] to [True]\ndelete (all) of [code v]\nhide list [code v]\nadd [Double click the code below and hold Ctrl + C on Windows or ⌘ + C on a Mac] to [code v]\nadd [Press K to close] to [code v]\ngo to x: (-221) y: (158)\nset [code v] to []\nadd (join (join (join (join (Data) (join ((Start X) + (400)) ((Start Y) + (400)))) ([costume # v] of [player v])) (join (join ((ax) + (400)) ((ay) + (400))) (join ((ax2) + (400)) ((ay2) + (400))))) (Background)) to [code v]\nwait until <key (k v) pressed?>\nshow list [code v]\nset [code open? v] to [False]\n\n@Say\n\nwhen flag clicked\nset [ghost v] effect to (100)\nforever\n    go to x: ([x position v] of [block v]) y: (([y position v] of [block v]) + (15))\nend\n\nwhen I receive [say v]\nset [ghost v] effect to (0)\nif <([costume # v] of [block v]) = [1]> then\n    switch costume to (1 v)\nend\nif <([costume # v] of [block v]) = [2]> then\n    switch costume to (2 v)\nend\nif <([costume # v] of [block v]) = [3]> then\n    switch costume to (3 v)\nend\nif <([costume # v] of [block v]) = [4]> then\n    switch costume to (4 v)\nend\nif <([costume # v] of [block v]) = [5]> then\n    switch costume to (5 v)\nend\nif <([costume # v] of [block v]) = [6]> then\n    switch costume to (6 v)\nend\nif <([costume # v] of [block v]) = [7]> then\n    switch costume to (7 v)\nend\nif <([costume # v] of [block v]) = [8]> then\n    switch costume to (8 v)\nend\nif <([costume # v] of [block v]) = [9]> then\n    switch costume to (9 v)\nend\nif <([costume # v] of [block v]) = [10]> then\n    switch costume to (10 v)\nend\nif <([costume # v] of [block v]) = [11]> then\n    switch costume to (11 v)\nend\nif <([costume # v] of [block v]) = [14]> then\n    switch costume to (14 v)\nend\nif <([costume # v] of [block v]) = [15]> then\n    switch costume to (15 v)\nend\nif <([costume # v] of [block v]) = [16]> then\n    switch costume to (16 v)\nend\nif <([costume # v] of [block v]) = [17]> then\n    switch costume to (17 v)\nend\nif <([costume # v] of [block v]) = [18]> then\n    switch costume to (18 v)\nend\nif <([costume # v] of [block v]) = [19]> then\n    switch costume to (19 v)\nend\nwait until <not <key (i v) pressed?>>\nset [ghost v] effect to (100)\nsay []\n\nwhen flag clicked\nforever\n    if <([costume # v] of [block v]) = [12]> then\n        switch costume to (20 v)\n        set [ghost v] effect to (0)\n    else\n        set [ghost v] effect to (100)\n    end\nend\n\n@Key\n\nwhen flag clicked\nset [key? v] to [Hidden]\nhide\n\nwhen I receive [key v]\nshow\nset [key? v] to [Show]\nrepeat until <(Key?) = [Hidden]>\n    go to (player v)\n    change y by (20)\nend\n\nwhen I receive [key gone v]\nset [key? v] to [Hidden]\nhide\n\n@Loading Screen\n\nwhen flag clicked\ngo to x: (0) y: (0)\ngo to [front v] layer\nswitch costume to (1 v)\nshow\nrepeat (3)\n    wait (0.5) seconds\n    next costume\nend\nbroadcast (Position v)\nhide\n\n@Loading Screen 2\n\nwhen flag clicked\nhide\ngo to x: (0) y: (0)\ngo to [front v] layer\nset [ghost v] effect to (100)\nswitch costume to (1 v)\nSet up list\nforever\n    wait until <(Loading Screen) = [True]>\n    show\n    repeat until <(Loading Screen) = [False]>\n        wait (0.5) seconds\n        next costume\n    end\n    hide\nend\n\ndefine Set up list\ndelete (all) of [data v]\nrepeat (378)\n    add [0] to [data v]\nend\n\n@Information\n\nwhen flag clicked\nhide\nset [ghost v] effect to (100)\n\nwhen I receive [open information v]\nif <(Can edit?) = [True]> then\n    show\n    repeat (10)\n        change [ghost v] effect by (-10)\n    end\n    set [ghost v] effect to (0)\nend\n\nwhen I receive [close information v]\nif <(Can edit?) = [True]> then\n    repeat (10)\n        change [ghost v] effect by (10)\n    end\n    set [ghost v] effect to (100)\n    hide\nend\n\n@Panel 1\n\nwhen flag clicked\nshow\ngo to x: (-3) y: (-178)\nset [ghost v] effect to (50)\nforever\n    wait until <touching (mouse-pointer v)?>\n    broadcast (Open Information v)\n    wait until <not <touching (mouse-pointer v)?>>\n    broadcast (Close Information v)\nend\n\nwhen flag clicked\nforever\n    if <(Can edit?) = [True]> then\n        show\n    else\n        hide\n    end\nend\n\n@Panel 2\n\nwhen flag clicked\nshow\ngo to x: (234) y: (-3)\nset [ghost v] effect to (50)\nforever\n    repeat until <<(Get) = [True]> or <(Load) = [True]>>\n        wait until <touching (mouse-pointer v)?>\n        broadcast (Open Edit Bar v)\n    end\n    wait until <<(Done Loading?) = [True]> or <(Code Open?) = [False]>>\nend\n\nwhen flag clicked\nshow\n\nwhen I receive [get code v]\nhide\nwait until <(Code Open?) = [True]>\nwait until <(Code Open?) = [False]>\nshow\n\nwhen I receive [load code v]\nhide\nwait until <(Done Loading?) = [False]>\nwait until <(Done Loading?) = [True]>\nshow\n\n@Options\n\nwhen flag clicked\nhide\ngo to x: (65) y: (8)\n\nwhen I receive [open edit bar v]\nshow\nrepeat (10)\n    change [ghost v] effect by (-10)\nend\nset [ghost v] effect to (0)\nwait until <not <touching (mouse-pointer v)?>>\nbroadcast (Close Edit Bar v)\n\nwhen I receive [close edit bar v]\nrepeat (10)\n    change [ghost v] effect by (10)\nend\nset [ghost v] effect to (100)\nhide\n\nwhen I receive [get code v]\nhide\nwait until <(Code Open?) = [True]>\nwait until <(Code Open?) = [False]>\nshow\n\nwhen I receive [load code v]\nhide\nwait until <(Done Loading?) = [False]>\nwait until <(Done Loading?) = [True]>\nshow\n\n@Play/Edit\n\nwhen flag clicked\nhide\ngo to x: (208) y: (61)\nswitch costume to (play v)\nforever\n    if <touching (mouse-pointer v)?> then\n        set [brightness v] effect to (7)\n    else\n        set [brightness v] effect to (0)\n    end\nend\n\nwhen I receive [close edit bar v]\nrepeat (10)\n    change [ghost v] effect by (10)\nend\nset [ghost v] effect to (100)\nhide\n\nwhen this sprite clicked\nif <(costume [number v]) = [1]> then\n    wait until <not <mouse down?>>\n    switch costume to (edit v)\n    set [can edit? v] to [False]\nelse\n    wait until <not <mouse down?>>\n    switch costume to (play v)\n    set [can edit? v] to [True]\nend\n\nwhen I receive [open edit bar v]\nshow\nrepeat (10)\n    change [ghost v] effect by (-10)\nend\nset [ghost v] effect to (0)\n\nwhen I receive [get code v]\nhide\nwait until <(Code Open?) = [True]>\nwait until <(Code Open?) = [False]>\nshow\n\nwhen I receive [load code v]\nhide\nwait until <(Done Loading?) = [False]>\nwait until <(Done Loading?) = [True]>\nshow\n\nwhen flag clicked\nforever\n    if <(Can edit?) = [True]> then\n        switch costume to (play v)\n    else\n        switch costume to (edit v)\n    end\nend\n\nwhen I receive [close immediately v]\nhide\n\n@Code\n\nwhen flag clicked\nset [get v] to [False]\nhide\ngo to x: (208) y: (28)\nswitch costume to (normal v)\nforever\n    if <touching (mouse-pointer v)?> then\n        set [brightness v] effect to (7)\n    else\n        set [brightness v] effect to (0)\n    end\nend\n\nwhen I receive [close edit bar v]\nrepeat (10)\n    change [ghost v] effect by (10)\nend\nset [ghost v] effect to (100)\nhide\n\nwhen this sprite clicked\nwait until <not <mouse down?>>\nif <(Can edit?) = [True]> then\n    broadcast (Get Code v)\n    set [get v] to [True]\n    wait (0.5) seconds\n    set [get v] to [False]\nend\n\nwhen flag clicked\nforever\n    if <(Can edit?) = [True]> then\n        switch costume to (normal v)\n    else\n        switch costume to (gray v)\n    end\nend\n\nwhen I receive [open edit bar v]\nshow\nrepeat (10)\n    change [ghost v] effect by (-10)\nend\nset [ghost v] effect to (0)\n\nwhen I receive [load code v]\nhide\nwait until <(Done Loading?) = [False]>\nwait until <(Done Loading?) = [True]>\nshow\n\nwhen I receive [get code v]\nhide\nwait until <(Code Open?) = [True]>\nwait until <(Code Open?) = [False]>\nshow\n\n@Load\n\nwhen flag clicked\nset [load v] to [False]\nhide\ngo to x: (208) y: (-3)\nswitch costume to (normal v)\nforever\n    if <touching (mouse-pointer v)?> then\n        set [brightness v] effect to (7)\n    else\n        set [brightness v] effect to (0)\n    end\nend\n\nwhen I receive [close edit bar v]\nrepeat (10)\n    change [ghost v] effect by (10)\nend\nset [ghost v] effect to (100)\nhide\n\nwhen this sprite clicked\nwait until <not <mouse down?>>\nif <(Can edit?) = [True]> then\n    broadcast (Load Code v)\n    set [load v] to [True]\n    wait (0.5) seconds\n    set [load v] to [False]\nend\n\nwhen flag clicked\nforever\n    if <(Can edit?) = [True]> then\n        switch costume to (normal v)\n    else\n        switch costume to (gray v)\n    end\nend\n\nwhen I receive [open edit bar v]\nshow\nrepeat (10)\n    change [ghost v] effect by (-10)\nend\nset [ghost v] effect to (0)\n\nwhen I receive [load code v]\nhide\nwait until <(Done Loading?) = [False]>\nwait until <(Done Loading?) = [True]>\nshow\n\nwhen I receive [get code v]\nhide\nwait until <(Code Open?) = [True]>\nwait until <(Code Open?) = [False]>\nshow\n\n@Player Color\n\nwhen flag clicked\nhide\ngo to x: (208) y: (-35)\nswitch costume to (normal v)\nforever\n    if <touching (mouse-pointer v)?> then\n        set [brightness v] effect to (7)\n    else\n        set [brightness v] effect to (0)\n    end\nend\n\nwhen this sprite clicked\nwait until <not <mouse down?>>\nif <(Can edit?) = [True]> then\n    broadcast (Change Player Color v)\nend\n\nwhen I receive [open edit bar v]\nshow\nrepeat (10)\n    change [ghost v] effect by (-10)\nend\nset [ghost v] effect to (0)\n\nwhen I receive [load code v]\nhide\nwait until <(Done Loading?) = [False]>\nwait until <(Done Loading?) = [True]>\nshow\n\nwhen I receive [get code v]\nhide\nwait until <(Code Open?) = [True]>\nwait until <(Code Open?) = [False]>\nshow\n\nwhen I receive [close edit bar v]\nrepeat (10)\n    change [ghost v] effect by (10)\nend\nset [ghost v] effect to (100)\nhide\n\nwhen flag clicked\nforever\n    if <(Can edit?) = [True]> then\n        switch costume to (normal v)\n    else\n        switch costume to (gray v)\n    end\nend\n\n@Music On/Off\n\nwhen flag clicked\nswitch costume to (on v)\ngo to x: (206) y: (-61)\nhide\nforever\n    if <touching (mouse-pointer v)?> then\n        set [brightness v] effect to (7)\n    else\n        set [brightness v] effect to (0)\n    end\nend\n\nwhen I receive [get code v]\nhide\nwait until <(Code Open?) = [True]>\nwait until <(Code Open?) = [False]>\nshow\n\nwhen I receive [load code v]\nhide\nwait until <(Done Loading?) = [False]>\nwait until <(Done Loading?) = [True]>\nshow\n\nwhen I receive [open edit bar v]\nshow\nrepeat (10)\n    change [ghost v] effect by (-10)\nend\nset [ghost v] effect to (0)\n\nwhen I receive [close edit bar v]\nrepeat (10)\n    change [ghost v] effect by (10)\nend\nset [ghost v] effect to (100)\nhide\n\nwhen this sprite clicked\nwait until <not <mouse down?>>\nif <(costume [number v]) = [1]> then\n    switch costume to (off v)\nelse\n    switch costume to (on v)\nend\nbroadcast (Music v)\n\n@Change Background\n\nwhen flag clicked\nswitch costume to (on v)\ngo to x: (206) y: (-91)\nhide\nforever\n    if <touching (mouse-pointer v)?> then\n        set [brightness v] effect to (7)\n    else\n        set [brightness v] effect to (0)\n    end\nend\n\nwhen I receive [get code v]\nhide\nwait until <(Code Open?) = [True]>\nwait until <(Code Open?) = [False]>\nshow\n\nwhen I receive [load code v]\nhide\nwait until <(Done Loading?) = [False]>\nwait until <(Done Loading?) = [True]>\nshow\n\nwhen I receive [open edit bar v]\nshow\nrepeat (10)\n    change [ghost v] effect by (-10)\nend\nset [ghost v] effect to (0)\n\nwhen I receive [close edit bar v]\nrepeat (10)\n    change [ghost v] effect by (10)\nend\nset [ghost v] effect to (100)\nhide\n\nwhen this sprite clicked\nwait until <not <mouse down?>>\nbroadcast (Change Background v)\n\nwhen flag clicked\nforever\n    if <(Can edit?) = [True]> then\n        switch costume to (normal v)\n    else\n        switch costume to (gray v)\n    end\nend\n\n
i cant find original game so heres a remix\npress r to restart level if you ever get stuck\n\n