Non-euclidean 100% pen platformer
@Stage\n\n@Sprite1\n\n@pen engine\n\ndefine Settings\nset [p x total v] to ((Px) - (Scroll X))\nset [p y total v] to ((Py) - (Scroll Y))\nif <<key (right arrow v) pressed?> or <<(P x total) < (mouse x)> and <mouse down?>>> then\n    change [xv v] by (1)\nend\nif <<key (left arrow v) pressed?> or <<(mouse x) < (P x total)> and <mouse down?>>> then\n    change [xv v] by (-1)\nend\nset [xv v] to ((0.9) * (Xv))\nchange [px v] by (Xv)\nDETECT\nif <<[touching? v] contains [7]?> or <<[touching? v] contains [1]?> or <[touching? v] contains [6]?>>> then\n    change [py v] by ((1) * (Gravity))\n    DETECT\n    if <<[touching? v] contains [7]?> or <<[touching? v] contains [1]?> or <[touching? v] contains [6]?>>> then\n        change [py v] by ((1) * (Gravity))\n        DETECT\n        if <<[touching? v] contains [7]?> or <<[touching? v] contains [1]?> or <[touching? v] contains [6]?>>> then\n            change [py v] by ((1) * (Gravity))\n            DETECT\n            if <<[touching? v] contains [7]?> or <<[touching? v] contains [1]?> or <[touching? v] contains [6]?>>> then\n                change [py v] by ((1) * (Gravity))\n                DETECT\n                if <<[touching? v] contains [7]?> or <<[touching? v] contains [1]?> or <[touching? v] contains [6]?>>> then\n                    change [py v] by ((1) * (Gravity))\n                    DETECT\n                    if <<[touching? v] contains [7]?> or <<[touching? v] contains [1]?> or <[touching? v] contains [6]?>>> then\n                        if <[touching? v] contains [2]?> then\n                            Respawn\n                        else\n                            change [py v] by ((-5) * (Gravity))\n                            change [px v] by ((-1) * (Xv))\n                            set [xv v] to [0]\n                        end\n                    end\n                end\n            end\n        end\n    end\nend\nif <<not <[20] < (Yv)>> or <not <(Yv) < [-20]>>> then\n    change [yv v] by ((-2) * (Gravity))\nend\nchange [py v] by (Yv)\nDETECT\nif <[touching? v] contains [2]?> then\n    Respawn\nend\nDETECT\nif <[touching? v] contains [6]?> then\n    if <(Mc) = [1]> then\n        change [px v] by (1)\n    else\n        change [px v] by (-1)\n    end\nend\nDETECT\nif <[touching? v] contains [7]?> then\n    if <(Mc2) = [1]> then\n        change [py v] by (1)\n    else\n        change [py v] by (-1)\n    end\nend\nDETECT\nif <<[touching? v] contains [7]?> or <<[touching? v] contains [1]?> or <[touching? v] contains [6]?>>> then\n    change [py v] by ((-1) * (Yv))\n    set [yv v] to [0]\nend\nchange [py v] by ((-2) * (Gravity))\nDETECT\nif <<[touching? v] contains [7]?> or <<[touching? v] contains [1]?> or <[touching? v] contains [6]?>>> then\n    if <<key (up arrow v) pressed?> or <<(P y total) < (mouse y)> and <mouse down?>>> then\n        set [yv v] to ((20) * (Gravity))\n    end\nend\nchange [py v] by ((2) * (Gravity))\nchange [scroll x v] by (((Px) - (Scroll X)) / (4))\nchange [scroll y v] by (((Py) - (Scroll Y)) / (4))\nDETECT\nif <[touching? v] contains [3]?> then\n    set [yv v] to ((30) * (Gravity))\nend\nDETECT\nif <[touching? v] contains [4]?> then\n    change [py v] by ((-1) * (Yv))\n    set [gravity v] to ((-1) * (Gravity))\n    set [yv v] to [0]\nend\nif <(Py) < [-1000]> then\n    Respawn\nend\nif <[1000] < (Py)> then\n    Respawn\nend\nif <[touching? v] contains [5]?> then\n    stop [other scripts in sprite v]\n    broadcast (End! v)\n    stop [this script v]\nend\n\ndefine Add platform at  x: (x) y: (y) Width (width) height (height) type (type)\nadd (x) to [platform x v]\nadd (y) to [platform y v]\nadd (width) to [platform width v]\nadd (height) to [platform height v]\nadd (type) to [platform type v]\n\nwhen I receive [begin level v]\nset [respawn gravity v] to [1]\nset [respawn x v] to [0]\nset [respawn y v] to [0]\nset [px v] to (Respawn x)\nset [py v] to (Respawn y)\nset [scroll x v] to [0]\nset [scroll y v] to [0]\nset [xv v] to [0]\nset [yv v] to [0]\nset [size v] to [20]\nset [gravity v] to (respawn Gravity)\nforever\n    Load level: (level)\n    erase all\n    go to x: (0) y: (0)\n    set pen color to (#000000)\n    set pen size to (1111)\n    pen down\n    pen up\n    Draw platforms\n    Draw player\n    Moving platform\n    Settings\nend\n\ndefine Load level: (l)\ndelete all of [platform height v]\ndelete all of [platform type v]\ndelete all of [platform width v]\ndelete all of [platform x v]\ndelete all of [platform y v]\ndelete all of [checkpoint direction v]\ndelete all of [checkpoint x v]\ndelete all of [checkpoint y v]\nif <[0] = (__place)> then\n    Add platform at  x: [0] y: [-100] Width [100] height [50] type [1]\nend\nif <<[0] = (__place)> or <[1] = (__place)>> then\n    Add platform at  x: [250] y: [-25] Width [190] height [50] type [1]\nend\nif <<[2] = (__place)> or <[1] = (__place)>> then\n    Add platform at  x: [-20] y: [20] Width [180] height [50] type [1]\nend\nif <<[2] = (__place)> or <[3] = (__place)>> then\n    Add platform at  x: [250] y: [-25] Width [190] height [50] type [3]\nend\nif <[4] = (__place)> then\n    Add platform at  x: [250] y: [-25] Width [150] height [50] type [1]\n    Add platform at  x: [400] y: [-25] Width [70] height [50] type [3]\n    Add platform at  x: [550] y: [-25] Width [150] height [50] type [1]\nend\nif <[6] = (__place)> then\n    Add platform at  x: [250] y: [-25] Width [150] height [50] type [4]\n    Add platform at  x: [400] y: [-25] Width [70] height [50] type [3]\n    Add platform at  x: [550] y: [-25] Width [150] height [50] type [1]\n    Add platform at  x: [250] y: [350] Width [150] height [50] type [1]\nend\nif <[7] = (__place)> then\n    Add platform at  x: [250] y: [350] Width [150] height [50] type [1]\n    Add platform at  x: [350] y: [350] Width [10] height [50] type [5]\nend\n\ndefine DETECT\ndelete all of [touching? v]\nset [loop v] to [1]\nrepeat (length of [platform height v])\n    Check x ((item (loop) of [platform x v]) - (Scroll X)) ((item (loop) of [platform y v]) - (Scroll Y)) w (item (loop) of [platform width v]) h (item (loop) of [platform height v]) t (item (loop) of [platform type v]) checkpoint []\n    change [loop v] by (1)\nend\nset [loop v] to [1]\nrepeat (length of [checkpoint direction v])\n    Check x ((item (loop) of [checkpoint x v]) - (Scroll X)) ((item (loop) of [checkpoint y v]) - (Scroll Y)) w [40] h [100] t [checkpoint] checkpoint (item (loop) of [checkpoint direction v])\n    change [loop v] by (1)\nend\n\ndefine Check x (x) (y) w (w) h (h) t (t) checkpoint (u/d)\nset [p x total v] to ((Px) - (Scroll X))\nset [p y total v] to ((Py) - (Scroll Y))\nset [last size v] to (Size)\nchange [size v] by (10)\nif <<((P x total) - ((Size) / (2))) < ((x) + ((w) / (2)))> and <<((x) - ((w) / (2))) < ((P x total) + ((Size) / (2)))> and <<((P y total) - ((Size) / (2))) < ((y) + ((h) / (2)))> and <((y) - ((h) / (2))) < ((P y total) + ((Size) / (2)))>>>> then\n    if <[checkpoint] = (t)> then\n        if <not <<(Respawn x) = ((Scroll X) + (x))> and <(Respawn y) = ((Scroll Y) + (y))>>> then\n            set [respawn x v] to ((Scroll X) + (x))\n            set [respawn y v] to ((Scroll Y) + (y))\n            if <[up] = (u/d)> then\n                set [respawn gravity v] to [1]\n            else\n                set [respawn gravity v] to [-1]\n            end\n        end\n    else\n        add (t) to [touching? v]\n    end\nend\nset [size v] to (last size)\n\ndefine Draw platforms\nset [loop v] to [1]\nrepeat (length of [checkpoint direction v])\n    Draw checkpoint at ((item (loop) of [checkpoint x v]) - (Scroll X)) ((item (loop) of [checkpoint y v]) - (Scroll Y)) up down (item (loop) of [checkpoint direction v])\n    change [loop v] by (1)\nend\nset [loop v] to [1]\nrepeat (length of [platform height v])\n    Draw rectangle at ((item (loop) of [platform x v]) - (Scroll X)) ((item (loop) of [platform y v]) - (Scroll Y)) w (item (loop) of [platform width v]) h (item (loop) of [platform height v]) t (item (loop) of [platform type v])\n    change [loop v] by (1)\nend\n\ndefine Draw rectangle at (x) (y) w (w) h (h) t (t)\nif <[1] = (t)> then\n    set pen color to (#00ff50)\nelse\n    if <[2] = (t)> then\n        set pen color to (#ff0000)\n    else\n        if <[3] = (t)> then\n            set pen color to (#faff00)\n        else\n            if <[4] = (t)> then\n                set pen color to (#ff8800)\n            else\n                if <[5] = (t)> then\n                    set pen color to (#ff0087)\n                else\n                    if <[6] = (t)> then\n                        set pen color to (#00d8ff)\n                    else\n                        if <[7] = (t)> then\n                            set pen color to (#00b6ff)\n                        end\n                    end\n                end\n            end\n        end\n    end\nend\nset pen size to (10)\nDraw line from ((x) + ((w) / (2))) ((y) + ((h) / (2))) to ((x) - ((w) / (2))) ((y) + ((h) / (2))) T []\nDraw line from ((x) + ((w) / (2))) ((y) - ((h) / (2))) to ((x) - ((w) / (2))) ((y) - ((h) / (2))) T []\nDraw line from ((x) + ((w) / (2))) ((y) + ((h) / (2))) to ((x) + ((w) / (2))) ((y) - ((h) / (2))) T []\nDraw line from ((x) - ((w) / (2))) ((y) + ((h) / (2))) to ((x) - ((w) / (2))) ((y) - ((h) / (2))) T []\n\ndefine Draw line from (x) (y) to (x2) (y2) T (t)\nif <(t) = [1]> then\n    set pen (brightness v) to (50)\n    go to x: (x) y: (y)\n    pen down\n    go to x: (x2) y: (y2)\n    pen up\nelse\n    set pen (brightness v) to (100)\n    go to x: (x) y: (y)\n    pen down\n    go to x: (x2) y: (y2)\n    pen up\nend\n\ndefine Draw player\nset [p x total v] to ((Px) - (Scroll X))\nset [p y total v] to ((Py) - (Scroll Y))\nset pen color to (#0015ff)\nset pen size to (8)\nDraw line from ((P x total) + ((Size) / (2))) ((P y total) + ((Size) / (2))) to ((P x total) - ((Size) / (2))) ((P y total) + ((Size) / (2))) T []\nDraw line from ((P x total) + ((Size) / (2))) ((P y total) - ((Size) / (2))) to ((P x total) - ((Size) / (2))) ((P y total) - ((Size) / (2))) T []\nDraw line from ((P x total) + ((Size) / (2))) ((P y total) + ((Size) / (2))) to ((P x total) + ((Size) / (2))) ((P y total) - ((Size) / (2))) T []\nDraw line from ((P x total) - ((Size) / (2))) ((P y total) + ((Size) / (2))) to ((P x total) - ((Size) / (2))) ((P y total) - ((Size) / (2))) T []\n\ndefine add checkpoint (x) (y) up/down (d)\nadd (d) to [checkpoint direction v]\nadd (x) to [checkpoint x v]\nadd (y) to [checkpoint y v]\n\ndefine Draw checkpoint at (x) (y) up down (d)\nset pen size to (10)\nset pen color to (#bb6d00)\nDraw line from ((x) - (20)) ((y) + (50)) to ((x) - (20)) ((y) - (50)) T []\nif <<(Respawn x) = ((Scroll X) + (x))> and <(Respawn y) = ((Scroll Y) + (y))>> then\n    set pen color to (#3df700)\nelse\n    set pen color to (#f70000)\nend\nif <[up] = (d)> then\n    Draw rectangle at (x) ((35) + (y)) w [40] h [30] t []\nelse\n    Draw rectangle at (x) ((-35) + (y)) w [40] h [30] t []\nend\n\nset [gravity v] to [0]\n\ndefine Respawn\nset [px v] to (Respawn x)\nset [py v] to (Respawn y)\nset [xv v] to [0]\nset [yv v] to [0]\nset [gravity v] to (respawn Gravity)\nset [__place v] to [0]\nstop [this script v]\n\ndefine Moving platform\nif <(m) < [0]> then\n    set [mc v] to [1]\nend\nif <[200] < (m)> then\n    set [mc v] to [2]\nend\nif <[1] = (Mc)> then\n    change [m v] by (1)\nend\nif <[2] = (Mc)> then\n    change [m v] by (-1)\nend\nif <(m2) < [0]> then\n    set [mc2 v] to [1]\nend\nif <[200] < (m2)> then\n    set [mc2 v] to [2]\nend\nif <[1] = (Mc2)> then\n    change [m2 v] by (1)\nend\nif <[2] = (Mc2)> then\n    change [m2 v] by (-1)\nend\n\nwhen I receive [start v]\nswitch costume to (costume3 v)\nset size to (1000) %\nswitch costume to (costume2 v)\nset [level v] to [1]\nbroadcast (Begin level v)\n\nwhen flag clicked\nbroadcast (Start v)\n\nwhen flag clicked\n\nwhen I receive [start v]\nset [__place v] to [0]\nforever\n    if <<[0] = (__place)> and <<[0] < (Py)> and <[325] < (Px)>>> then\n        change [__place v] by (1)\n    end\n    if <<[1] = (__place)> and <<[59] < (Py)> and <(Px) < [-75]>>> then\n        change [__place v] by (1)\n    end\n    if <<[2] = (__place)> and <<[0] < (Py)> and <[320] < (Px)>>> then\n        change [__place v] by (1)\n    end\n    if <<[3] = (__place)> and <<[203] < (Py)> and <(Px) < [290]>>> then\n        change [__place v] by (1)\n    end\n    if <<[4] = (__place)> and <<[205] < (Py)> and <(Px) < [475]>>> then\n        change [__place v] by (1)\n    end\n    if <<[4] = (__place)> and <<[0] < (Py)> and <[595] < (Px)>>> then\n        change [__place v] by (2)\n    end\n    if <<[6] = (__place)> and <<[300] < (Py)> and <(Px) < [325]>>> then\n        change [__place v] by (1)\n    end\nend\n\n@text\n\ndefine Start buttun\nset pen color to (#ffffff)\nset pen size to (100)\ngo to x: (0) y: (0)\nif <(distance to [mouse-pointer v]) < [50]> then\n    set pen size to (120)\n    pen down\n    pen up\n    change x by (-20)\n    change y by (10)\n    set pen size to (20)\n    set pen color to (#000000)\n    pen down\n    change y by (30)\n    change y by (-80)\n    go to x: ((x position) + (60)) y: ((40) + (y position))\n    go to x: ((x position) + (-60)) y: ((40) + (y position))\n    pen up\n    if <mouse down?> then\n        set [________________ v] to [1]\n        stop [other scripts in sprite v]\n        broadcast (Start v)\n        stop [this script v]\n    end\nelse\n    set pen size to (100)\n    pen down\n    pen up\n    change x by (-20)\n    set pen size to (20)\n    set pen color to (#000000)\n    pen down\n    change y by (30)\n    change y by (-60)\n    go to x: ((x position) + (50)) y: ((30) + (y position))\n    go to x: ((x position) + (-50)) y: ((30) + (y position))\n    pen up\nend\n\ndefine Phrase (p) starting at (x) (y) size: (s)\nset [x3 v] to (x)\nset [y3 v] to (y)\nset [letter v] to [0]\nrepeat (length of (p))\n    change [letter v] by (1)\n    Draw letter (letter (Letter) of (p)) at x (X3) y (Y3) Size (s)\n    change [x3 v] by ((15) * (s))\nend\n\ndefine Draw letter (letter) at x (x) y (y) Size (s)\ngo to x: (x) y: (y)\nset pen size to ((2) * (s))\nif <[%] = (letter)> then\n    pen down\n    go to x: (((10) * (s)) + (x position)) y: (((20) * (s)) + (y position))\n    pen up\n    change y by ((-20) * (s))\n    pen down\n    pen up\n    go to x: (((-10) * (s)) + (x position)) y: (((20) * (s)) + (y position))\n    pen down\n    pen up\nend\nif <[a] = (letter)> then\n    pen down\n    go to x: (((5) * (s)) + (x position)) y: (((20) * (s)) + (y position))\n    go to x: (((5) * (s)) + (x position)) y: ((y position) - ((20) * (s)))\n    go to x: (((-2) * (s)) + (x position)) y: (((7) * (s)) + (y position))\n    change x by ((-5) * (s))\n    pen up\nend\nif <[b] = (letter)> then\n    pen down\n    change y by ((20) * (s))\n    change y by ((-20) * (s))\n    change x by ((10) * (s))\n    change y by ((9) * (s))\n    change x by ((-10) * (s))\n    change y by ((2) * (s))\n    change x by ((7) * (s))\n    change y by ((9) * (s))\n    change x by ((-7) * (s))\n    pen up\nend\nif <[c] = (letter)> then\n    pen down\n    change y by ((20) * (s))\n    change y by ((-20) * (s))\n    change x by ((10) * (s))\n    change x by ((-10) * (s))\n    change y by ((20) * (s))\n    change x by ((10) * (s))\n    pen up\nend\nif <[d] = (letter)> then\n    pen down\n    change y by ((20) * (s))\n    change x by ((8) * (s))\n    go to x: (((2) * (s)) + (x position)) y: (((-5) * (s)) + (y position))\n    change y by ((-10) * (s))\n    go to x: (((-2) * (s)) + (x position)) y: (((-5) * (s)) + (y position))\n    change x by ((-8) * (s))\n    pen up\nend\nif <[e] = (letter)> then\n    pen down\n    change y by ((20) * (s))\n    change y by ((-20) * (s))\n    change x by ((10) * (s))\n    change x by ((-10) * (s))\n    change y by ((10) * (s))\n    change x by ((10) * (s))\n    change x by ((-10) * (s))\n    change y by ((10) * (s))\n    change x by ((10) * (s))\n    change x by ((-10) * (s))\n    pen up\nend\nif <[f] = (letter)> then\n    pen down\n    change y by ((20) * (s))\n    change y by ((-20) * (s))\n    change y by ((10) * (s))\n    change x by ((10) * (s))\n    change x by ((-10) * (s))\n    change y by ((10) * (s))\n    change x by ((10) * (s))\n    change x by ((-10) * (s))\n    pen up\nend\nif <[g] = (letter)> then\n    pen down\n    change y by ((20) * (s))\n    change y by ((-20) * (s))\n    change x by ((7) * (s))\n    change y by ((5) * (s))\n    change x by ((-2) * (s))\n    change x by ((4) * (s))\n    change x by ((-2) * (s))\n    change y by ((-5) * (s))\n    change x by ((-7) * (s))\n    change y by ((20) * (s))\n    change x by ((7) * (s))\n    pen up\nend\nif <[h] = (letter)> then\n    pen down\n    change y by ((20) * (s))\n    change y by ((-10) * (s))\n    change x by ((10) * (s))\n    change y by ((10) * (s))\n    change y by ((-20) * (s))\n    pen up\nend\nif <[i] = (letter)> then\n    change x by ((5) * (s))\n    pen down\n    change y by ((20) * (s))\n    change x by ((5) * (s))\n    change x by ((-10) * (s))\n    change x by ((5) * (s))\n    change y by ((-20) * (s))\n    change x by ((5) * (s))\n    change x by ((-10) * (s))\n    change x by ((5) * (s))\n    pen up\nend\nif <[j] = (letter)> then\n    pen down\n    change y by ((10) * (s))\n    change y by ((-10) * (s))\n    change x by ((5) * (s))\n    change y by ((20) * (s))\n    change x by ((-5) * (s))\n    change x by ((10) * (s))\n    pen up\nend\nif <[k] = (letter)> then\n    pen down\n    change y by ((20) * (s))\n    change y by ((-10) * (s))\n    go to x: (((10) * (s)) + (x position)) y: (((-10) * (s)) + (y position))\n    go to x: (((-10) * (s)) + (x position)) y: (((10) * (s)) + (y position))\n    go to x: (((10) * (s)) + (x position)) y: (((10) * (s)) + (y position))\n    pen up\nend\nif <[l] = (letter)> then\n    pen down\n    change y by ((20) * (s))\n    change y by ((-20) * (s))\n    change x by ((10) * (s))\n    pen up\nend\nif <[m] = (letter)> then\n    pen down\n    change y by ((20) * (s))\n    go to x: (((5) * (s)) + (x position)) y: (((-10) * (s)) + (y position))\n    go to x: (((5) * (s)) + (x position)) y: (((10) * (s)) + (y position))\n    change y by ((-20) * (s))\n    pen up\nend\nif <[n] = (letter)> then\n    pen down\n    change y by ((20) * (s))\n    go to x: (((10) * (s)) + (x position)) y: (((-20) * (s)) + (y position))\n    change y by ((20) * (s))\n    pen up\nend\nif <[o] = (letter)> then\n    change y by ((5) * (s))\n    pen down\n    change y by ((10) * (s))\n    go to x: (((2) * (s)) + (x position)) y: (((5) * (s)) + (y position))\n    change x by ((6) * (s))\n    go to x: (((2) * (s)) + (x position)) y: (((-5) * (s)) + (y position))\n    change y by ((-10) * (s))\n    go to x: (((-2) * (s)) + (x position)) y: (((-5) * (s)) + (y position))\n    change x by ((-6) * (s))\n    go to x: (((-2) * (s)) + (x position)) y: (((5) * (s)) + (y position))\n    pen up\nend\nif <[p] = (letter)> then\n    pen down\n    change y by ((15) * (s))\n    go to x: (((2) * (s)) + (x position)) y: (((5) * (s)) + (y position))\n    change x by ((6) * (s))\n    go to x: (((2) * (s)) + (x position)) y: (((-5) * (s)) + (y position))\n    change y by ((-1) * (s))\n    go to x: (((-2) * (s)) + (x position)) y: (((-5) * (s)) + (y position))\n    change x by ((-6) * (s))\n    go to x: (((-2) * (s)) + (x position)) y: (((5) * (s)) + (y position))\n    pen up\nend\nif <[q] = (letter)> then\n    change y by ((5) * (s))\n    pen down\n    change y by ((10) * (s))\n    go to x: ((2) + (x position)) y: (((5) * (s)) + (y position))\n    change x by ((6) * (s))\n    go to x: ((2) + (x position)) y: (((-5) * (s)) + (y position))\n    change y by ((-10) * (s))\n    go to x: ((-2) + (x position)) y: ((-5) + (y position))\n    change x by ((-6) * (s))\n    go to x: ((-2) + (x position)) y: (((5) * (s)) + (y position))\n    pen up\n    change x by ((6) * (s))\n    pen down\n    go to x: (((5) * (s)) + (x position)) y: (((-5) * (s)) + (y position))\n    pen up\nend\nif <[r] = (letter)> then\n    pen down\n    change y by ((15) * (s))\n    go to x: (((2) * (s)) + (x position)) y: (((5) * (s)) + (y position))\n    change x by ((6) * (s))\n    go to x: (((2) * (s)) + (x position)) y: (((-5) * (s)) + (y position))\n    change y by ((-1) * (s))\n    go to x: (((-2) * (s)) + (x position)) y: (((-5) * (s)) + (y position))\n    change x by ((-6) * (s))\n    go to x: (((-2) * (s)) + (x position)) y: (((5) * (s)) + (y position))\n    change y by ((-3) * (s))\n    go to x: (((10) * (s)) + (x position)) y: (((-11) * (s)) + (y position))\n    pen up\nend\nif <[s] = (letter)> then\n    pen down\n    change y by ((2) * (s))\n    change y by ((-2) * (s))\n    change x by ((10) * (s))\n    change y by ((10) * (s))\n    change x by ((-10) * (s))\n    change y by ((10) * (s))\n    change x by ((10) * (s))\n    change y by ((-2) * (s))\n    change y by ((2) * (s))\n    pen up\nend\nif <[t] = (letter)> then\n    change x by ((5) * (s))\n    pen down\n    change y by ((20) * (s))\n    change x by ((5) * (s))\n    change x by ((-10) * (s))\n    pen up\nend\nif <[u] = (letter)> then\n    change y by ((5) * (s))\n    pen down\n    change y by ((15) * (s))\n    pen up\n    change x by ((10) * (s))\n    pen down\n    change y by ((-15) * (s))\n    go to x: (((-2) * (s)) + (x position)) y: (((-5) * (s)) + (y position))\n    change x by ((-6) * (s))\n    go to x: (((-2) * (s)) + (x position)) y: (((5) * (s)) + (y position))\n    pen up\n    change x by ((10) * (s))\n    pen down\n    change y by ((-5) * (s))\n    pen up\nend\nif <[v] = (letter)> then\n    change y by ((20) * (s))\n    pen down\n    go to x: (((5) * (s)) + (x position)) y: (((-20) * (s)) + (y position))\n    go to x: (((5) * (s)) + (x position)) y: (((20) * (s)) + (y position))\n    pen up\nend\nif <[w] = (letter)> then\n    change y by ((20) * (s))\n    pen down\n    go to x: (((2.5) * (s)) + (x position)) y: (((-20) * (s)) + (y position))\n    go to x: (((2.5) * (s)) + (x position)) y: (((20) * (s)) + (y position))\n    go to x: (((2.5) * (s)) + (x position)) y: (((-20) * (s)) + (y position))\n    go to x: (((2.5) * (s)) + (x position)) y: (((20) * (s)) + (y position))\n    pen up\nend\nif <[x] = (letter)> then\n    change y by ((20) * (s))\n    pen down\n    go to x: (((10) * (s)) + (x position)) y: (((-20) * (s)) + (y position))\n    pen up\n    change x by ((-10) * (s))\n    pen down\n    go to x: (((10) * (s)) + (x position)) y: (((20) * (s)) + (y position))\n    pen up\nend\nif <[y] = (letter)> then\n    change x by ((5) * (s))\n    pen down\n    change y by ((10) * (s))\n    go to x: (((5) * (s)) + (x position)) y: (((10) * (s)) + (y position))\n    go to x: (((-5) * (s)) + (x position)) y: (((-10) * (s)) + (y position))\n    go to x: (((-5) * (s)) + (x position)) y: (((10) * (s)) + (y position))\n    pen up\nend\nif <[z] = (letter)> then\n    pen down\n    change x by ((10) * (s))\n    go to x: (((-10) * (s)) + (x position)) y: (((20) * (s)) + (y position))\n    change x by ((10) * (s))\n    pen up\nend\nif <[:] = (letter)> then\n    change x by ((5) * (s))\n    change y by ((5) * (s))\n    pen down\n    pen up\n    change y by ((10) * (s))\n    pen down\n    pen up\nend\nif <[1] = (letter)> then\n    change x by ((5) * (s))\n    pen down\n    change y by ((20) * (s))\n    go to x: (((-5) * (s)) + (x position)) y: (((-5) * (s)) + (y position))\n    pen up\nend\nif <[2] = (letter)> then\n    pen down\n    change x by ((10) * (s))\n    change x by ((-10) * (s))\n    change y by ((10) * (s))\n    change x by ((10) * (s))\n    change y by ((10) * (s))\n    change x by ((-10) * (s))\n    pen up\nend\nif <[3] = (letter)> then\n    pen down\n    change x by ((10) * (s))\n    change y by ((10) * (s))\n    change x by ((-10) * (s))\n    change x by ((10) * (s))\n    change y by ((10) * (s))\n    change x by ((-10) * (s))\n    pen up\nend\nif <[4] = (letter)> then\n    change x by ((10) * (s))\n    pen down\n    change y by ((10) * (s))\n    change x by ((-10) * (s))\n    change y by ((10) * (s))\n    change y by ((-10) * (s))\n    change x by ((10) * (s))\n    change y by ((10) * (s))\n    pen up\nend\nif <[5] = (letter)> then\n    pen down\n    change x by ((10) * (s))\n    change y by ((10) * (s))\n    change x by ((-10) * (s))\n    change y by ((10) * (s))\n    change x by ((10) * (s))\n    pen up\nend\nif <[6] = (letter)> then\n    pen down\n    change x by ((10) * (s))\n    change y by ((10) * (s))\n    change x by ((-10) * (s))\n    change y by ((-10) * (s))\n    change y by ((20) * (s))\n    pen up\nend\nif <[7] = (letter)> then\n    change y by ((20) * (s))\n    pen down\n    change x by ((10) * (s))\n    change y by ((-20) * (s))\n    pen up\nend\nif <[8] = (letter)> then\n    pen down\n    change x by ((10) * (s))\n    change y by ((10) * (s))\n    change x by ((-10) * (s))\n    change y by ((-10) * (s))\n    change y by ((20) * (s))\n    change x by ((10) * (s))\n    change y by ((-10) * (s))\n    pen up\nend\nif <[9] = (letter)> then\n    change x by ((10) * (s))\n    pen down\n    change y by ((20) * (s))\n    change x by ((-10) * (s))\n    change y by ((-10) * (s))\n    change x by ((10) * (s))\n    pen up\nend\nif <[0] = (letter)> then\n    pen down\n    change y by ((20) * (s))\n    change x by ((10) * (s))\n    change y by ((-20) * (s))\n    change x by ((-10) * (s))\n    pen up\nend\nif <[/] = (letter)> then\n    pen down\n    go to x: (((10) * (s)) + (x position)) y: (((20) * (s)) + (y position))\n    pen up\nend\nif <[?] = (letter)> then\n    pen down\n    pen up\n    change y by ((5) * (s))\n    pen down\n    change y by ((7) * (s))\n    change x by ((5) * (s))\n    change y by ((8) * (s))\n    change x by ((-5) * (s))\n    pen up\nend\n\nwhen I receive [end! v]\nforever\n    erase all\n    go to x: (0) y: (0)\n    set pen color to (#000000)\n    set pen size to (1111)\n    pen down\n    pen up\n    set pen color to (#26ff3f)\n    Phrase [The end] starting at [-200] ((([cos v] of (((timer) - (3)) * (50)) ) * (15)) - (25)) size: [4]\n    Phrase [Thanks for playing] starting at [-200] ((([cos v] of (((timer) - (3)) * (200)) ) * (30)) - (100)) size: [1]\n    Phrase [pls leave a love and fave] starting at [-200] ((([cos v] of (((timer) - (3)) * (200)) ) * (30)) - (125)) size: [1]\nend\n\nwhen flag clicked\n\nwhen I receive [thumbnail v]\nerase all\nset pen color to (#00ff1c)\nbroadcast (Begin level v)\nstop [all v]\n\nPhrase [Box run 2] starting at [-200] [100] size: [3]\nPhrase [100% pen] starting at [-150] [-150] size: [2]\n\n@Sprite2\n\nwhen flag clicked\nhide\n\n
Arrow keys to move\nIn this game, things are not as they seem, navigate through a changing world....\nInspiration from @griffpatch\n100% possible\n\n\n if this gets 200 loves I might add another level!\n\n\nCredits:\n@hamster46 for engine and some help\n@magics47/me for the rest\n\n#games #games #games #games #games #games #games #games #games #games #games #games #games #games #games #games #games #games #games #games #games #games #games #games #games #games #games #games #games #games #games #games #games #games #games #games #games #games #games #games #games #games #games #games #games #games #games #games \nIts a game\n