Texted (List Platformer) v1.2

Instructions: I mostly fixed this project (except for the player moving left & right). I will keep fixing bugs to the best of my ability.\n\nFULLSCREEN IS NOT RECOMMENDED\n\n"|" is land\n"x" is spikes (Dont touch them.)\n"^" is the bouncy stuff\n">" teleports you to "<"\n\nALL LEVELS ARE POSSIBLE\n\nLevel 1 will tell you how to play the game.

@Stage\n\nwhen flag clicked\nset [s2 v] to [0]\nset [p v] to [0]\nset [l v] to [1]\nset [px v] to [0]\nset [y v] to [0]\nforever\n    render\nend\n\ndefine set up\ndelete (all) of [game v]\nadd [] to [game v]\nadd [] to [game v]\nadd [] to [game v]\nadd [] to [game v]\nadd [] to [game v]\nadd [] to [game v]\nadd [] to [game v]\nadd [] to [game v]\nadd [] to [game v]\nadd [] to [game v]\nadd [] to [game v]\nadd [] to [game v]\nadd [] to [game v]\n\nwhen flag clicked\nset [player v] to [🙂]\nforever\n    if <(p) = [0]> then\n        if <<key (1 v) pressed?> and <key (2 v) pressed?>> then\n            set [player v] to [🙂]\n        end\n        if <<key (3 v) pressed?> and <key (4 v) pressed?>> then\n            set [player v] to [😂]\n        end\n        if <<key (5 v) pressed?> and <key (6 v) pressed?>> then\n            set [player v] to [😍]\n        end\n        if <<key (7 v) pressed?> and <key (8 v) pressed?>> then\n            set [player v] to [🔥]\n        end\n        if <<key (9 v) pressed?> and <key (0 v) pressed?>> then\n            set [player v] to [💯]\n        end\n        if <<key (0 v) pressed?> and <key (1 v) pressed?>> then\n            set [player v] to [🅱]\n        end\n        if <<key (2 v) pressed?> and <key (3 v) pressed?>> then\n            set [player v] to [👌]\n        end\n        if <<key (4 v) pressed?> and <key (5 v) pressed?>> then\n            set [player v] to [😎]\n        end\n        if <<key (6 v) pressed?> and <key (7 v) pressed?>> then\n            set [player v] to [🍕]\n        end\n        if <<key (8 v) pressed?> and <key (9 v) pressed?>> then\n            set [player v] to [🤺]\n        end\n    end\nend\n\nwhen flag clicked\nforever\n    controls\nend\n\nwhen flag clicked\nforever\n    if <(p) = [0]> then\n        if <(px) > [137]> then\n            set [px v] to [0]\n            change [l v] by (1)\n        end\n        if <(px) < [0]> then\n            set [px v] to [0]\n        end\n        if <(l) > [16]> then\n            set [l v] to [16]\n        end\n    end\nend\n\ndefine controls\nif <(p) = [0]> then\n    if <key (right arrow v) pressed?> then\n        change [px v] by (0.05)\n    end\n    if <key (left arrow v) pressed?> then\n        change [px v] by (-0.05)\n    end\n    if <key (up arrow v) pressed?> then\n        if <(y) = [0]> then\n            broadcast (jump v)\n        end\n    end\nend\n\nwhen flag clicked\nforever\n    wait (0.5) seconds\n    wait until <key (space v) pressed?>\n    set [p v] to [1]\n    wait (0.5) seconds\n    wait until <key (space v) pressed?>\n    set [p v] to [0]\nend\n\nwhen I receive [jump v]\nset [y v] to [0]\nset [j v] to [-3.464]\nif <(p) = [0]> then\n    repeat until <(j) > [3.336]>\n        set [y v] to (((-0.5) * ((j) * (j))) + (6))\n        change [j v] by (0.001)\n    end\n    set [y v] to [0]\nend\n\nwhen I receive [o1 v]\nrepeat until <key (e v) pressed?>\n    replace item (10) of [game v] with (join (join [Enter a number from 0-100 to set as the volume: ] (c)) (m))\nend\nif <<<(c) < [100]> or <(c) = [100]>> and <<(c) > [0]> or <(c) = [0]>>> then\n    set volume to (c) %\n    replace item (10) of [game v] with []\nelse\n    repeat (35)\n        replace item (10) of [game v] with [The value you entered was not valid.]\n    end\n    replace item (10) of [game v] with []\nend\n\nwhen I receive [o2 v]\nrepeat until <key (e v) pressed?>\n    replace item (10) of [game v] with (join (join [Enter a number from 0-5 to set as the song: ] (c)) (m))\nend\nif <<<(c) < [5]> or <(c) = [5]>> and <<(c) > [0]> or <(c) = [0]>>> then\n    stop all sounds\n    set [s v] to (c)\n    set [s2 v] to [1]\n    broadcast (play song v)\n    replace item (10) of [game v] with []\nelse\n    repeat (35)\n        replace item (10) of [game v] with [The value you entered was not valid.]\n    end\n    replace item (10) of [game v] with []\nend\n\nwhen I receive [play song v]\nplay sound (s) until done\nset [s2 v] to [0]\n\nwhen I receive [o1 v]\nrepeat until <key (e v) pressed?>\n    replace item (12) of [game v] with [Press "e" to confirm]\n    replace item (13) of [game v] with [Press "b" to delete your last character]\nend\nreplace item (12) of [game v] with []\nreplace item (13) of [game v] with []\n\nwhen I receive [o2 v]\nrepeat until <key (e v) pressed?>\n    replace item (12) of [game v] with [Press "e" to confirm]\n    replace item (13) of [game v] with [Press "b" to delete your last character]\nend\nreplace item (12) of [game v] with []\nreplace item (13) of [game v] with []\n\nwhen I receive [o1 v]\nrepeat until <key (e v) pressed?>\n    if <key (b v) pressed?> then\n        backspace\n        wait (0.05) seconds\n    end\nend\n\nwhen I receive [o2 v]\nrepeat until <key (e v) pressed?>\n    if <key (b v) pressed?> then\n        backspace\n        wait (0.05) seconds\n    end\nend\n\nwhen I receive [o1 v]\nrepeat until <key (\n v) pressed?>\n    wait (0) seconds\n    if <key (0 v) pressed?> then\n        set [c v] to (join (c) [0])\n    end\n    if <key (1 v) pressed?> then\n        set [c v] to (join (c) [1])\n    end\n    if <key (2 v) pressed?> then\n        set [c v] to (join (c) [2])\n    end\n    if <key (3 v) pressed?> then\n        set [c v] to (join (c) [3])\n    end\n    if <key (4 v) pressed?> then\n        set [c v] to (join (c) [4])\n    end\n    if <key (5 v) pressed?> then\n        set [c v] to (join (c) [5])\n    end\n    if <key (6 v) pressed?> then\n        set [c v] to (join (c) [6])\n    end\n    if <key (7 v) pressed?> then\n        set [c v] to (join (c) [7])\n    end\n    if <key (8 v) pressed?> then\n        set [c v] to (join (c) [8])\n    end\n    if <key (9 v) pressed?> then\n        set [c v] to (join (c) [9])\n    end\n    wait (0.01) seconds\nend\n\nwhen I receive [o2 v]\nrepeat until <key (e v) pressed?>\n    wait (0) seconds\n    if <key (0 v) pressed?> then\n        set [c v] to (join (c) [0])\n    end\n    if <key (1 v) pressed?> then\n        set [c v] to (join (c) [1])\n    end\n    if <key (2 v) pressed?> then\n        set [c v] to (join (c) [2])\n    end\n    if <key (3 v) pressed?> then\n        set [c v] to (join (c) [3])\n    end\n    if <key (4 v) pressed?> then\n        set [c v] to (join (c) [4])\n    end\n    if <key (5 v) pressed?> then\n        set [c v] to (join (c) [5])\n    end\n    if <key (6 v) pressed?> then\n        set [c v] to (join (c) [6])\n    end\n    if <key (7 v) pressed?> then\n        set [c v] to (join (c) [7])\n    end\n    if <key (8 v) pressed?> then\n        set [c v] to (join (c) [8])\n    end\n    if <key (9 v) pressed?> then\n        set [c v] to (join (c) [9])\n    end\n    wait (0.01) seconds\nend\n\nwhen flag clicked\nforever\n    set [m v] to [|]\n    wait (0.5) seconds\n    set [m v] to []\n    wait (0.5) seconds\nend\n\nwhen flag clicked\nforever\n    if <(s2) = [0]> then\n        set [s v] to (pick random (1) to (5))\n        broadcast (play song v) and wait\n    end\nend\n\nwhen flag clicked\nhide list [game v]\n\nset [l v] to [12]\n\nwhen flag clicked\nforever\n    if <(p) = [0]> then\n        if <(l) = [2]> then\n            if <<<<<(px) > [19]> and <(px) < [33]>> or <<(px) > [69]> and <(px) < [79]>>> or <<(px) > [91]> and <(px) < [109]>>> and <(y) = [0]>> then\n                set [px v] to [0]\n            end\n        end\n        if <(l) = [3]> then\n            if <<<(px) > [18]> and <(px) < [32]>> and <(y) = [0]>> then\n                set [px v] to [0]\n            end\n        end\n        if <(l) = [3]> then\n            if <<<(px) > [42]> and <(px) < [52]>> and <(y) = [0]>> then\n                set [px v] to [0]\n            end\n        end\n        if <(l) = [3]> then\n            if <<<(px) > [60]> and <(px) < [74]>> and <(y) = [0]>> then\n                set [px v] to [0]\n            end\n        end\n        if <(l) = [3]> then\n            if <<<(px) > [90]> and <(px) < [106]>> and <(y) = [0]>> then\n                set [px v] to [0]\n            end\n        end\n        if <(l) = [4]> then\n            if <<<(px) > [10]> and <(px) < [28]>> and <(y) = [0]>> then\n                set [px v] to [0]\n            end\n        end\n        if <(l) = [4]> then\n            if <<<(px) > [38]> and <(px) < [54]>> and <(y) = [0]>> then\n                set [px v] to [0]\n            end\n        end\n        if <(l) = [4]> then\n            if <<<(px) > [68]> and <(px) < [80]>> and <(y) = [0]>> then\n                set [px v] to [0]\n            end\n        end\n        if <(l) = [4]> then\n            if <<<(px) > [88]> and <(px) < [104]>> and <(y) = [0]>> then\n                set [px v] to [0]\n            end\n        end\n        if <(l) = [4]> then\n            if <<<(px) > [118]> and <(px) < [136]>> and <(y) = [0]>> then\n                set [px v] to [0]\n            end\n        end\n        if <(l) = [5]> then\n            if <<<(px) > [36]> and <(px) < [48]>> and <(y) = [0]>> then\n                broadcast (bounce v) and wait\n            end\n        end\n        if <(l) = [5]> then\n            if <<<(px) > [90]> and <(px) < [108]>> and <(y) = [0]>> then\n                broadcast (bounce v) and wait\n            end\n        end\n        if <(l) = [5]> then\n            if <<<(px) > [46]> and <(px) < [74]>> and <(y) = [0]>> then\n                set [px v] to [0]\n            end\n        end\n        if <(l) = [5]> then\n            if <<<(px) > [108]> and <(px) < [128]>> and <(y) = [0]>> then\n                set [px v] to [0]\n            end\n        end\n        if <(l) = [6]> then\n            if <<<(px) > [14]> and <(px) < [26]>> and <(y) = [0]>> then\n                set [px v] to [108]\n            end\n        end\n        if <(l) = [6]> then\n            if <<<(px) > [26]> and <(px) < [102]>> and <(y) = [0]>> then\n                set [px v] to [0]\n            end\n        end\n        if <(l) = [6]> then\n            if <<<(px) > [128]> and <(px) < [138]>> and <(y) = [0]>> then\n                set [px v] to [0]\n            end\n        end\n        if <(l) = [7]> then\n            if <<<(px) > [8]> and <(px) < [26]>> and <(y) = [0]>> then\n                set [px v] to [0]\n            end\n        end\n        if <(l) = [7]> then\n            if <<<(px) > [34]> and <(px) < [44]>> and <(y) = [0]>> then\n                set [px v] to [98]\n            end\n        end\n        if <(l) = [7]> then\n            if <<<(px) > [44]> and <(px) < [92]>> and <(y) = [0]>> then\n                set [px v] to [0]\n            end\n        end\n        if <(l) = [7]> then\n            if <<<(px) > [112]> and <(px) < [124]>> and <(y) = [0]>> then\n                broadcast (bounce v) and wait\n            end\n        end\n        if <(l) = [7]> then\n            if <<<(px) > [122]> and <(px) < [138]>> and <(y) = [0]>> then\n                set [px v] to [0]\n            end\n        end\n        if <(l) = [8]> then\n            if <<<(px) > [10]> and <(px) < [28]>> and <(y) = [0]>> then\n                set [px v] to [0]\n            end\n        end\n        if <(l) = [8]> then\n            if <<<(px) > [38]> and <(px) < [42]>> and <(y) = [0]>> then\n                set [px v] to [0]\n            end\n        end\n        if <(l) = [8]> then\n            if <<<(px) > [38]> and <(px) < [42]>> and <(y) = [0]>> then\n                set [px v] to [0]\n            end\n        end\n        if <(l) = [8]> then\n            if <<<(px) > [44]> and <(px) < [50]>> and <(y) = [0]>> then\n                set [px v] to [70]\n            end\n        end\n        if <(l) = [8]> then\n            if <<<(px) > [70]> and <(px) < [82]>> and <(y) = [0]>> then\n                set [px v] to [0]\n            end\n        end\n        if <(l) = [8]> then\n            if <<<(px) > [106]> and <(px) < [120]>> and <(y) = [0]>> then\n                broadcast (bounce v) and wait\n            end\n        end\n        if <(l) = [8]> then\n            if <<<(px) > [118]> and <(px) < [134]>> and <(y) = [0]>> then\n                set [px v] to [0]\n            end\n        end\n        if <(l) = [9]> then\n            if <<<(px) > [2]> and <(px) < [36]>> and <(y) = [0]>> then\n                set [px v] to [0]\n            end\n        end\n        if <(l) = [9]> then\n            if <<<(px) > [40]> and <(px) < [54]>> and <(y) = [0]>> then\n                set [px v] to [0]\n            end\n        end\n        if <(l) = [9]> then\n            if <<<(px) > ((78) - (18))> and <(px) < [94]>> and <(y) = (() - ())>> then\n                set [px v] to [0]\n            end\n        end\n        if <(l) = [9]> then\n            if <<<(px) > [96]> and <(px) < [112]>> and <(y) = [0]>> then\n                set [px v] to [0]\n            end\n        end\n        if <(l) = [9]> then\n            if <<<(px) > [116]> and <(px) < [130]>> and <(y) = [0]>> then\n                set [px v] to [0]\n            end\n        end\n        if <(l) = [9]> then\n            if <<<(px) > [134]> and <(px) < [140]>> and <(y) = [0]>> then\n                set [px v] to [0]\n            end\n        end\n        if <(l) = [10]> then\n            if <<<(px) > [4]> and <(px) < [22]>> and <(y) = [0]>> then\n                set [px v] to [0]\n            end\n        end\n        if <(l) = [10]> then\n            if <<<(px) > [26]> and <(px) < [48]>> and <(y) = [0]>> then\n                broadcast (bounce v) and wait\n            end\n        end\n        if <(l) = [10]> then\n            if <<<(px) > [46]> and <(px) < [84]>> and <(y) = [0]>> then\n                set [px v] to [0]\n            end\n        end\n        if <(l) = [10]> then\n            if <<<(px) > [94]> and <(px) < [100]>> and <(y) = [0]>> then\n                set [px v] to [132]\n            end\n        end\n        if <(l) = [10]> then\n            if <<<(px) > [98]> and <(px) < [130]>> and <(y) = [0]>> then\n                set [px v] to [0]\n            end\n        end\n        if <(l) = [11]> then\n            if <<<(px) > [14]> and <(px) < [32]>> and <(y) = [0]>> then\n                set [px v] to [0]\n            end\n        end\n        if <(l) = [11]> then\n            if <<<(px) > [40]> and <(px) < [62]>> and <(y) = [0]>> then\n                broadcast (bounce v) and wait\n            end\n        end\n        if <(l) = [11]> then\n            if <<<(px) > [62]> and <(px) < [80]>> and <(y) = [0]>> then\n                set [px v] to [0]\n            end\n        end\n        if <(l) = [11]> then\n            if <<<(px) > [78]> and <(px) < [88]>> and <(y) = [0]>> then\n                set [px v] to [124]\n            end\n        end\n        if <(l) = [11]> then\n            if <<<(px) > [86]> and <(px) < [110]>> and <(y) = [0]>> then\n                set [px v] to [0]\n            end\n        end\n        if <(l) = [11]> then\n            if <<<(px) > [134]> and <(px) < [140]>> and <(y) = [0]>> then\n                set [px v] to [0]\n            end\n        end\n        if <(l) = [12]> then\n            if <<<(px) > [10]> and <(px) < [24]>> and <(y) = [0]>> then\n                set [px v] to [0]\n            end\n        end\n        if <(l) = [12]> then\n            if <<<(px) > [30]> and <(px) < [40]>> and <(y) = [0]>> then\n                broadcast (bounce v) and wait\n            end\n        end\n        if <(l) = [12]> then\n            if <<<(px) > [40]> and <(px) < [56]>> and <(y) = [0]>> then\n                set [px v] to [0]\n            end\n        end\n        if <(l) = [12]> then\n            if <<<(px) > [68]> and <(px) < [78]>> and <(y) = [0]>> then\n                set [px v] to [0]\n            end\n        end\n        if <(l) = [12]> then\n            if <<<(px) > [86]> and <(px) < [96]>> and <(y) = [0]>> then\n                set [px v] to [132]\n            end\n        end\n        if <(l) = [12]> then\n            if <<<(px) > [94]> and <(px) < [128]>> and <(y) = [0]>> then\n                set [px v] to [0]\n            end\n        end\n        if <(l) = [13]> then\n            if <<<(px) > [10]> and <(px) < [24]>> and <(y) = [0]>> then\n                set [px v] to [0]\n            end\n        end\n        if <(l) = [13]> then\n            if <<<(px) > [30]> and <(px) < [42]>> and <(y) = [0]>> then\n                broadcast (bounce v) and wait\n            end\n        end\n        if <(l) = [13]> then\n            if <<<(px) > [42]> and <(px) < [64]>> and <(y) = [0]>> then\n                set [px v] to [0]\n            end\n        end\n        if <(l) = [13]> then\n            if <<<(px) > [66]> and <(px) < [84]>> and <(y) = [0]>> then\n                set [px v] to [0]\n            end\n        end\n        if <(l) = [13]> then\n            if <<<(px) > [82]> and <(px) < [100]>> and <(y) = [0]>> then\n                broadcast (bounce v) and wait\n            end\n        end\n        if <(l) = [13]> then\n            if <<<(px) > [98]> and <(px) < [116]>> and <(y) = [0]>> then\n                set [px v] to [0]\n            end\n        end\n        if <(l) = [14]> then\n            if <<<(px) > [10]> and <(px) < [24]>> and <(y) = [0]>> then\n                set [px v] to [0]\n            end\n        end\n        if <(l) = [14]> then\n            if <<<(px) > [32]> and <(px) < [44]>> and <(y) = [0]>> then\n                broadcast (bounce v) and wait\n            end\n        end\n        if <(l) = [14]> then\n            if <<<(px) > [44]> and <(px) < [72]>> and <(y) = [0]>> then\n                set [px v] to [0]\n            end\n        end\n        if <(l) = [14]> then\n            if <<<(px) > [110]> and <(px) < [126]>> and <(y) = [0]>> then\n                set [px v] to [0]\n            end\n        end\n        if <(l) = [14]> then\n            if <<<(px) > [130]> and <(px) < [140]>> and <(y) = [0]>> then\n                broadcast (bounce v) and wait\n            end\n        end\n        if <(l) = [15]> then\n            if <<<(px) > [14]> and <(px) < [24]>> and <(y) = [0]>> then\n                set [px v] to [38]\n            end\n        end\n        if <(l) = [15]> then\n            if <<<(px) > [52]> and <(px) < [62]>> and <(y) = [0]>> then\n                set [px v] to [112]\n            end\n        end\n        if <(l) = [15]> then\n            if <<<(px) > [88]> and <(px) < [98]>> and <(y) = [0]>> then\n                set [px v] to [74]\n            end\n        end\n        if <(l) = [15]> then\n            if <<<(px) > [124]> and <(px) < [136]>> and <(y) = [0]>> then\n                set [px v] to [4]\n            end\n        end\n    end\nend\n\nforever\n    render\n    controls\nend\n\nforever\n    render\n    controls\nend\n\ndefine render\nset up\nset [x v] to [ ]\nrepeat ([floor v] of (px) )\n    set [x v] to (join (x) [ ])\nend\nif <(p) = [0]> then\n    replace item (13) of [game v] with (item (l) of [land v])\n    replace item ((12) - ([floor v] of (y) )) of [game v] with (join (x) (player))\n    replace item (1) of [game v] with (join [Level ] (l))\n    replace item (3) of [game v] with (item (l) of [text v])\nend\nif <(p) = [1]> then\n    replace item (1) of [game v] with [PAUSED]\n    replace item (3) of [game v] with [Press space to resume the game.]\n    replace item (6) of [game v] with [Press "v" to change the volume.]\n    replace item (8) of [game v] with [Press "s" to change the song.]\n    if <key (v v) pressed?> then\n        set [o v] to [1]\n        set [c v] to []\n        broadcast (join [o] (o))\n    end\n    if <key (s v) pressed?> then\n        set [o v] to [2]\n        set [c v] to []\n        broadcast (join [o] (o))\n    end\nend\n\nwhen I receive [bounce v]\nset [y v] to [0]\nset [j v] to [-4]\nif <(p) = [0]> then\n    repeat until <(j) > [4]>\n        set [y v] to ([floor v] of (((-0.5) * ((j) * (j))) + (8)) )\n        change [j v] by (0.4)\n    end\n    set [y v] to [0]\nend\n\ndefine backspace\ndelete (all) of [backspace v]\nset [e v] to [1]\nrepeat (length of (c))\n    add (letter (e) of (c)) to [backspace v]\n    change [e v] by (1)\nend\ndelete (length of [backspace v]) of [backspace v]\nset [c v] to []\nset [e v] to [1]\nrepeat (length of [backspace v])\n    set [c v] to (join (c) (item (e) of [backspace v]))\n    change [e v] by (1)\nend\ndelete (all) of [backspace v]\n\n