Spooky Night - A  Scrolling Platformer #All #Games #Art #Tutorials
@Stage\n\nwhen flag clicked\nswitch backdrop to (blank v)\n\nwhen I receive [game v]\nswitch backdrop to (c3 v)\nforever\n    set volume to (30) %\n    play sound [Spooky Scary Skeletons \(Remix\) - Extended Mix.mp3 v] until done\nend\n\n@Blank\n\n@Player\n\ndefine Position\ngo to x: ((X) - (Scroll X)) y: ((Y) - (Scroll Y))\n\ndefine Change Player Y By (sy)\nchange [y v] by (sy)\nchange [inair v] by (1)\nPosition\nrepeat until <not <touching (platform v)?>>\n    if <(sy) > [0]> then\n        change [y v] by (-1)\n    else\n        change [y v] by (1)\n        set [inair v] to [0]\n    end\n    Position\n    set [sy v] to [0]\nend\n\ndefine GAME ON\nset [x v] to [0]\nset [y v] to [0]\nset [sy v] to [0]\nset [sx v] to [0]\nset [scroll x v] to [0]\nset [scroll y v] to [0]\nset [inair v] to [0]\nset [exit v] to []\nset size to (100) %\nset [ghost v] effect to (0)\nshow\n\nwhen I receive [green flag v]\nhide\ngo to [front v] layer\n\ndefine Game-Win\nrepeat (50)\n    point towards (exit v)\n    turn right (65) degrees\n    move ((distance to [exit v]) / (2)) steps\n    change size by (-1)\n    change [ghost v] effect by (2)\nend\nhide\nchange [level v] by (1)\nwait (1) seconds\n\ndefine Tick\nif <<<(mouse x) < (x position)> and <mouse down?>> or <<key (left arrow v) pressed?> or <key (a v) pressed?>>> then\n    change [sx v] by (-1.8)\nend\nif <<<(x position) < (mouse x)> and <mouse down?>> or <<key (right arrow v) pressed?> or <key (d v) pressed?>>> then\n    change [sx v] by (1.8)\nend\nset [sx v] to ((Sx) * (0.8))\nif <[0.9] < ([abs v] of (Sx) )> then\n    Change Player X By (round (Sx))\nend\nif <<<(y position) < (mouse y)> and <mouse down?>> or <<key (up arrow v) pressed?> or <key (w v) pressed?>>> then\n    if <(inair) < [4]> then\n        set [sy v] to [16]\n    end\nend\nif <(Sy) > [-20]> then\n    change [sy v] by (-2)\nend\nChange Player Y By (Sy)\nTest Die\nchange [scroll x v] by (round (((X) - (Scroll X)) / (7)))\nif <(Scroll X) < [0]> then\n    set [scroll x v] to [0]\nend\nif <[4000] < (Scroll X)> then\n    set [scroll x v] to [4000]\nend\nchange [scroll y v] by (round (((Y) - (Scroll Y)) / (7)))\nif <(Scroll Y) < [0]> then\n    set [scroll y v] to [0]\nend\nPosition\nif <(Y) < [-175]> then\n    set [exit v] to [die]\nend\n\ndefine GAME - DIE\nset [exit v] to []\nhide\n\ndefine Test Die\nif <touching (danger v)?> then\n    set [exit v] to [die]\nend\n\ndefine Change Player X By (sx)\nchange [x v] by (sx)\nPosition\nif <touching (platform v)?> then\n    repeat (18)\n        change [y v] by (1)\n        Position\n        if <not <touching (platform v)?>> then\n            stop [this script v]\n        end\n    end\n    change [y v] by (-18)\n    if <<<(y position) < (mouse y)> and <mouse down?>> or <<key (up arrow v) pressed?> or <key (w v) pressed?>>> then\n        if <(sx) > [0]> then\n            set [sx v] to [-16]\n        else\n            set [sx v] to [16]\n        end\n        set [inair v] to [0]\n    else\n        set [sx v] to [0]\n    end\n    repeat until <not <touching (platform v)?>>\n        if <(sx) > [0]> then\n            change [x v] by (-1)\n        else\n            change [x v] by (1)\n        end\n        Position\n    end\nend\n\nwhen I receive [green flag v]\nset [level v] to [1]\nforever\n    broadcast (reset v) and wait\n    broadcast (SETUP v) and wait\n    GAME ON\n    repeat until <(Exit) > []>\n        Tick\n        broadcast (tick v)\n    end\n    if <(Exit) = [win]> then\n        Game-Win\n    else\n        GAME - DIE\n    end\nend\n\nwhen flag clicked\nforever\n    if <<key (right arrow v) pressed?> or <<key (d v) pressed?> or <<mouse down?> and <(mouse x) > [20]>>>> then\n        switch costume to (2a v)\n        if <<<mouse down?> and <(mouse y) > ((y position) + (20))>> or <<key (up arrow v) pressed?> or <key (w v) pressed?>>> then\n            switch costume to (4a v)\n        end\n    else\n        if <<key (left arrow v) pressed?> or <<key (a v) pressed?> or <<mouse down?> and <(mouse x) < [-20]>>>> then\n            switch costume to (1a v)\n            if <<<(mouse y) > ((y position) + (20))> and <mouse down?>> or <<key (up arrow v) pressed?> or <key (w v) pressed?>>> then\n                switch costume to (5a v)\n            end\n        else\n            switch costume to (3a v)\n            if <<<(mouse y) > ((y position) + (20))> and <mouse down?>> or <<key (up arrow v) pressed?> or <key (w v) pressed?>>> then\n                switch costume to (6a v)\n            end\n        end\n    end\n    if <<key (right arrow v) pressed?> or <<key (d v) pressed?> or <<mouse down?> and <(mouse x) > [20]>>>> then\n        switch costume to (2a v)\n        if <<<mouse down?> and <(mouse y) > ((y position) + (20))>> or <<key (up arrow v) pressed?> or <key (w v) pressed?>>> then\n            switch costume to (4a v)\n        end\n    else\n        if <<key (left arrow v) pressed?> or <<key (a v) pressed?> or <<mouse down?> and <(mouse x) < [-20]>>>> then\n            switch costume to (1a v)\n            if <<<(mouse y) > ((y position) + (20))> and <mouse down?>> or <<key (up arrow v) pressed?> or <key (w v) pressed?>>> then\n                switch costume to (5a v)\n            end\n        else\n            switch costume to (3a v)\n            if <<<(mouse y) > ((y position) + (20))> and <mouse down?>> or <<key (up arrow v) pressed?> or <key (w v) pressed?>>> then\n                switch costume to (6a v)\n            end\n        end\n    end\nend\n\ndefine Bouncy\nif <touching (bouncy v)?> then\n    set [sy v] to [30]\nend\n\nwhen I receive [ded v]\nGAME - DIE\n\nwhen flag clicked\nforever\n    if <touching (water v)?> then\n        change [sy v] by (-.3)\n    end\nend\n\nwhen flag clicked\nforever\n    if <touching (lvl art2 v)?> then\n        broadcast (WINNNSSSSS!!!! v)\n    end\nend\n\nwhen I receive [green flag v]\nforever\n    Bouncy\nend\n\nwhen I receive [game v]\nshow\nset [scroll y v] to [0]\nset [x v] to [0]\nset [y v] to [0]\nset [scroll x v] to [0]\nbroadcast (GREEN FLAG v) and wait\nbroadcast (PLAY GAME v) and wait\n\nwhen flag clicked\nhide\n\n@Platform\n\nwhen I receive [green flag v]\nhide\n\nwhen I receive [tick v]\nPosition ((x) - (Scroll X)) ((y) - (Scroll Y))\n\nwhen I receive [setup v]\nhide\nset [x v] to [0]\nset [y v] to [0]\nif <(Level) = [1]> then\n    switch costume to (1 1 v)\n    Clone At X [360] Y [0]\n    Clone At X [360] Y [0]\n    Clone At X [360] Y [0]\n    Clone At X [360] Y [0]\n    Clone At X [360] Y [0]\n    Clone At X [360] Y [0]\n    Clone At X [360] Y [0]\n    Clone At X [360] Y [0]\nend\n\ndefine Position (x) (y)\ngo to x: (x) y: (y)\nif <<(x) = (x position)> and <(y) = (y position)>> then\n    show\nelse\n    hide\nend\n\nwhen I receive [reset v]\ndelete this clone\n\ndefine Clone At X (x) Y (y)\ncreate clone of (_myself_ v)\nchange [x v] by (x)\nchange [y v] by (y)\nnext costume\n\nwhen flag clicked\nhide\n\nwhen I receive [game v]\nshow\n\n@Danger\n\nwhen I receive [green flag v]\nhide\n\nwhen I receive [tick v]\nPOSTION ((x) - (Scroll X)) ((y) - (Scroll Y))\n\nwhen I receive [setup v]\ngo to [front v] layer\nhide\nset [x v] to [0]\nset [y v] to [0]\nif <(Level) = [1]> then\n    switch costume to (level 1 1 v)\n    CLONE AT X [360] Y [0]\n    CLONE AT X [360] Y [0]\n    CLONE AT X [360] Y [0]\n    CLONE AT X [360] Y [0]\n    CLONE AT X [360] Y [0]\n    CLONE AT X [360] Y [0]\n    CLONE AT X [360] Y [0]\nend\n\ndefine POSTION (x) (y)\ngo to x: (x) y: (y)\nif <<(x) = (x position)> and <(y) = (y position)>> then\n    show\nelse\n    hide\nend\n\nwhen I receive [reset v]\ndelete this clone\n\ndefine CLONE AT X (x) Y (y)\ncreate clone of (_myself_ v)\nchange [x v] by (x)\nchange [y v] by (y)\nnext costume\n\nwhen I start as a clone\ngo to [front v] layer\n\n@Thumbnail\n\nwhen flag clicked\nset [ghost v] effect to (100)\nforever\n    go to [front v] layer\n    go to x: (0) y: (0)\nend\n\n@Bouncy\n\nwhen I receive [green flag v]\nhide\n\nwhen I receive [tick v]\nPOSTION ((x) - (Scroll X)) ((y) - (Scroll Y))\n\nwhen I receive [setup v]\ngo to [front v] layer\nhide\nset [x v] to [0]\nset [y v] to [0]\nif <(Level) = [1]> then\n    switch costume to (costume1 v)\n    CLONE AT X [360] Y [0]\nend\n\ndefine POSTION (x) (y)\ngo to x: (x) y: (y)\nif <<(x) = (x position)> and <(y) = (y position)>> then\n    show\nelse\n    hide\nend\n\nwhen I receive [reset v]\ndelete this clone\n\ndefine CLONE AT X (x) Y (y)\ncreate clone of (_myself_ v)\nchange [x v] by (x)\nchange [y v] by (y)\nnext costume\n\nwhen I start as a clone\ngo to [front v] layer\n\nwhen flag clicked\nhide\n\n@Sprite1\n\ndefine Move Parallax (speedx) (speedy)\ngo [backward v] (100) layers\ngo to [back v] layer\ngo to x: (0) y: (0)\nforever\n    go to x: ((0) - (((Scroll X) - ((Scroll X) - (Scroll X))) / (speedx))) y: (((Scroll Y) - ((Scroll Y) - (Scroll Y))) / (speedy))\nend\n\nwhen I receive [game v]\nshow\nforever\n    Move Parallax [7] [20]\nend\n\nwhen flag clicked\nhide\n\n@Enemy\n\nwhen I receive [green flag v]\nhide\n\nwhen I receive [tick v]\nPOSTION ((x) - (Scroll X)) ((y) - (Scroll Y))\n\ndefine POSTION (x) (y)\nset rotation style [left-right v]\ngo to x: (x) y: (y)\nif <<(x) = (x position)> and <(y) = (y position)>> then\n    show\nelse\n    hide\nend\n\nwhen I receive [reset v]\ndelete this clone\n\ndefine CLONE (sx) (sy)\npoint in direction (90)\nset [x v] to (sx)\nset [y v] to (sy)\nset [startx v] to (sx)\ncreate clone of (_myself_ v)\n\nwhen I start as a clone\n\nforever\n    if <<touching (@player v)?> and <(Sy) < [0]>> then\n        delete this clone\n    else\n        broadcast (-1 Life v)\n    end\nend\n\ndefine Smooth Gliding (end)\npoint in direction ((direction) * (-1))\nrepeat until <(round (x)) = (end)>\n    change [x v] by (((end) - (x)) / (10))\nend\n\nstop [this script v]\n\nwhen I receive [setup v]\nhide\nset [x v] to [0]\nset [y v] to [0]\nif <(Level) = [1]> then\n    switch costume to (yellow 1 v)\n    CLONE [166] [0]\n    switch costume to (red1 v)\n    CLONE [1249] [0]\nend\nset [x v] to [-99999]\n\nwhen I receive [die player v]\n\nhide\n\nwhen flag clicked\n\nset [ghost v] effect to (100)\ndelete this clone\n\nwhen flag clicked\nset [clone v] to [2]\n\nwhen I start as a clone\nforever\n    Smooth Gliding ((startx) - (80))\n    Smooth Gliding (startx)\nend\n\nbroadcast (-1 Life v)\n\nchange [lives v] by (-1)\n\nbroadcast (-1 Life v)\n\nswitch costume to (yellow 1 v)\nCLONE [2085] [-10]\nswitch costume to (red1 v)\nCLONE [1300] [770]\nswitch costume to (yellow 1 v)\nCLONE [592] [865]\nswitch costume to (yellow 1 v)\n\nwhen flag clicked\n\nwhen I start as a clone\nforever\n    if <touching (player v)?> then\n        broadcast (DED v)\n    end\nend\n\n@water\n\nwhen I receive [green flag v]\nhide\n\nwhen I receive [tick v]\nPosition ((x) - (Scroll X)) ((y) - (Scroll Y))\n\nwhen I receive [setup v]\ngo to [front v] layer\nhide\nset [x v] to [0]\nset [y v] to [0]\nif <(Level) = [1]> then\n    switch costume to (1 1 v)\n    Clone At X [360] Y [0]\n    Clone At X [360] Y [0]\n    Clone At X [360] Y [0]\n    Clone At X [360] Y [0]\n    switch costume to (1 5 v)\n    Clone At X [360] Y [0]\nend\n\ndefine Position (x) (y)\ngo to x: (x) y: (y)\nif <<(x) = (x position)> and <(y) = (y position)>> then\n    show\nelse\n    hide\nend\n\nwhen I receive [reset v]\ndelete this clone\n\ndefine Clone At X (x) Y (y)\ncreate clone of (_myself_ v)\nchange [x v] by (x)\nchange [y v] by (y)\nnext costume\n\nwhen I start as a clone\ngo to [front v] layer\n\n@LVL art\n\nwhen I receive [green flag v]\nhide\n\nwhen I receive [tick v]\nPOSTION ((x) - (Scroll X)) ((y) - (Scroll Y))\n\ndefine POSTION (x) (y)\nset rotation style [left-right v]\ngo to x: (x) y: (y)\nif <<(x) = (x position)> and <(y) = (y position)>> then\n    show\nelse\n    hide\nend\n\nwhen I receive [reset v]\ndelete this clone\n\ndefine CLONE (sx) (sy)\npoint in direction (90)\nset [x v] to (sx)\nset [y v] to (sy)\nset [startx v] to (sx)\ncreate clone of (_myself_ v)\n\nwhen I start as a clone\n\nforever\n    if <<touching (@player v)?> and <(Sy) < [0]>> then\n        delete this clone\n    else\n        broadcast (-1 Life v)\n    end\nend\n\ndefine Smooth Gliding (end)\npoint in direction ((direction) * (-1))\nrepeat until <(round (x)) = (end)>\n    change [x v] by (((end) - (x)) / (10))\nend\n\nstop [this script v]\n\nwhen I receive [setup v]\ngo to [back v] layer\ngo [forward v] (1) layers\nhide\nset [x v] to [0]\nset [y v] to [0]\nif <(Level) = [1]> then\n    switch costume to (red1 v)\n    CLONE [0] [0]\n    next costume\n    CLONE [1228] [0]\n    next costume\n    CLONE [2410] [100]\n    next costume\n    CLONE [2649] [100]\n    next costume\n    CLONE [3075] [100]\nend\nset [x v] to [-99999]\n\nwhen I receive [die player v]\n\nhide\n\nwhen flag clicked\n\nset [ghost v] effect to (100)\ndelete this clone\n\nwhen flag clicked\nset [clone v] to [2]\n\nwhen I start as a clone\n\nbroadcast (-1 Life v)\n\nchange [lives v] by (-1)\n\nbroadcast (-1 Life v)\n\nswitch costume to (yellow 1 v)\nCLONE [2085] [-10]\nswitch costume to (red1 v)\nCLONE [1300] [770]\nswitch costume to (yellow 1 v)\nCLONE [592] [865]\nswitch costume to (yellow 1 v)\n\nwhen flag clicked\n\nwhen I start as a clone\nforever\n\nforever\n    Smooth Gliding ((startx) - (80))\n    Smooth Gliding (startx)\nend\n\nswitch costume to (yellow 1 v)\n\nswitch costume to (red1 v)\nCLONE [1249] [0]\n\nif <touching (player v)?> then\n    broadcast (DED v)\nend\n\n@@You_Win\n\nwhen flag clicked\nhide\n\nwhen I receive [winnnsssss!!!! v]\nshow\nset [ghost v] effect to (100)\ngo to x: (0) y: (0)\nshow\nswitch costume to (blank v)\nset size to (150) %\nswitch costume to (win screen v)\nrepeat (50)\n    go [forward v] (100) layers\n    go to [front v] layer\n    switch costume to (blank v)\n    switch costume to (win screen v)\n    change [ghost v] effect by (-5)\n    change size by (((100) - (size)) / (40))\n    set x to (((((pick random (0) to (1)) * (2)) - (1)) * ((size) - (100))) * (0.75))\n    set y to (((((pick random (0) to (1)) * (2)) - (1)) * ((size) - (100))) * (0.75))\nend\ngo to x: (0) y: (0)\nforever\n    set [ghost v] effect to (0)\n    go to [front v] layer\n    if <<key (space v) pressed?> or <mouse down?>> then\n        repeat (10)\n            hide variable [set timer v]\n            change [ghost v] effect by (-10)\n            hide\n            stop [this script v]\n        end\n    end\nend\n\n@LVL art2\n\nwhen I receive [green flag v]\nhide\n\nwhen I receive [tick v]\nPOSTION ((x) - (Scroll X)) ((y) - (Scroll Y))\n\ndefine POSTION (x) (y)\nset rotation style [left-right v]\ngo to x: (x) y: (y)\nif <<(x) = (x position)> and <(y) = (y position)>> then\n    show\nelse\n    hide\nend\n\nwhen I receive [reset v]\ndelete this clone\n\ndefine CLONE (sx) (sy)\npoint in direction (90)\nset [x v] to (sx)\nset [y v] to (sy)\nset [startx v] to (sx)\ncreate clone of (_myself_ v)\n\nwhen I start as a clone\n\nforever\n    if <<touching (@player v)?> and <(Sy) < [0]>> then\n        delete this clone\n    else\n        broadcast (-1 Life v)\n    end\nend\n\ndefine Smooth Gliding (end)\npoint in direction ((direction) * (-1))\nrepeat until <(round (x)) = (end)>\n    change [x v] by (((end) - (x)) / (10))\nend\n\nstop [this script v]\n\nwhen I receive [setup v]\ngo to [back v] layer\ngo [forward v] (1) layers\nhide\nset [x v] to [0]\nset [y v] to [0]\nif <(Level) = [1]> then\n    switch costume to (red1 v)\n    CLONE [3378] [0]\nend\nset [x v] to [-99999]\n\nwhen I receive [die player v]\n\nhide\n\nwhen flag clicked\n\nset [ghost v] effect to (100)\ndelete this clone\n\nwhen flag clicked\nset [clone v] to [2]\n\nwhen I start as a clone\n\nbroadcast (-1 Life v)\n\nchange [lives v] by (-1)\n\nbroadcast (-1 Life v)\n\nswitch costume to (yellow 1 v)\nCLONE [2085] [-10]\nswitch costume to (red1 v)\nCLONE [1300] [770]\nswitch costume to (yellow 1 v)\nCLONE [592] [865]\nswitch costume to (yellow 1 v)\n\nwhen flag clicked\n\nwhen I start as a clone\nforever\n\nforever\n    Smooth Gliding ((startx) - (80))\n    Smooth Gliding (startx)\nend\n\nswitch costume to (yellow 1 v)\n\nswitch costume to (red1 v)\n\nif <touching (player v)?> then\n    broadcast (DED v)\nend\n\nwhen I receive [winnnsssss!!!! v]\ndelete this clone\n\n@TIMER v1.6\n\ndefine TTE (text) Position (x) (y)\nshow\nset x to (x)\nset y to (y)\nswitch costume to (  v)\ngo to [front v] layer\nset size to (120) %\nset [id v] to [1]\nrepeat (length of (text))\n    switch costume to (letter (ID) of (text))\n    change [id v] by (1)\n    change x by (20)\n    stamp\nend\n\nwhen flag clicked\nhide\n\nwhen I receive [winnnsssss!!!! v]\nshow variable [set timer v]\nset [set timer v] to (timer)\n\nwhen I receive [game v]\nhide variable [set timer v]\nerase all\nhide\nreset timer\nforever\n    go to [front v] layer\n    set [color v] effect to (40)\n    set pen color to (#ff6e00)\n    erase all\n    TTE (timer) Position [-245] [150]\nend\n\n@Intro\n\nwhen I start as a clone\nif <(Clone ID) = [Letter]> then\n    wait until <(timer) > [0.5]>\n    wait ((#) / (Length)) seconds\n    show\n    set [x v] to (x position)\n    set [y v] to (y position)\n    go to [front v] layer\n    set size to (0) %\n    go to x: (0) y: (0)\n    Smooth Glide x: (X) y: (Y) speed: (5) (Size)\n    wait until <(timer) > [1.9]>\n    wait ((#) / ((Length) * (2))) seconds\n    set [var 1 v] to ((size) / (10))\n    repeat (30)\n        Change Size By: (Var 1)\n        change y by (Var 1)\n        change [var 1 v] by ((0) - ((size) / (100)))\n        change [ghost v] effect by (2)\n    end\n    delete this clone\nend\nif <(Clone ID) = [Box]> then\n    set [color v] effect to (0)\n    point in direction (180)\n    switch costume to (box v)\n    set [ghost v] effect to (50)\n    set size to (15) %\n    show\n    go to [back v] layer\n    go to x: ((Var 1) * (40)) y: ((Var 2) * (40))\n    repeat until <(size) > [89]>\n        change size by (((91) - (size)) / (10))\n        turn right (((180) - (direction)) / (10)) degrees\n        change [ghost v] effect by (-5)\n    end\n    set size to (90) %\n    set [ghost v] effect to (0)\n    wait until <(timer) > [3.5]>\n    set [brightness v] effect to (0)\n    repeat (20)\n        turn right (5) degrees\n        change size by (-5)\n        change [ghost v] effect by (5)\n    end\n    delete this clone\nend\n\nwhen I start as a clone\nif <(Clone ID) = [Logo]> then\n    wait until <(timer) > [4]>\n    go to [front v] layer\n    clear graphic effects\n    switch costume to (logo v)\n    show\n    go to x: (-200) y: (0)\n    set size to (0) %\n    Smooth Glide x: [0] y: [0] speed: [5] [90]\n    wait until <(timer) > [5.7]>\n    set [var 1 v] to [10]\n    repeat (27)\n        change size by (Var 1)\n        change [var 1 v] by (-1)\n    end\n    delete this clone\nend\nif <(Clone ID) = [Back]> then\n    go to [back v] layer\n    show\n    go to x: (0) y: (0)\n    set size to (100) %\n    switch costume to (landscape v)\n    clear graphic effects\n    repeat until <(timer) > [8]>\n        turn right (5) degrees\n        set x to (([cos v] of ((timer) * (200)) ) * (50))\n    end\n    delete this clone\nend\nif <(Clone ID) = [Back 2]> then\n    go to [back v] layer\n    show\n    go to x: (0) y: (0)\n    set size to (100) %\n    switch costume to (back2 v)\n    clear graphic effects\n    repeat until <(timer) > [8]>\n        go to [back v] layer\n    end\n    stop all sounds\n    broadcast (Game v)\n    delete this clone\nend\n\nwhen I start as a clone\nif <(Clone ID) = [Particle]> then\n    switch costume to (particle v)\n    clear graphic effects\n    set size to (100) %\n    go to x: (0) y: (0)\n    set [color v] effect to (pick random (0) to (30))\n    go to [front v] layer\n    go [backward v] (10) layers\n    set [var 1 v] to (pick random (10) to (15))\n    set [var 2 v] to (pick random (2) to (7))\n    turn right (pick random (-10) to (10)) degrees\n    show\n    repeat until <touching (_edge_ v)?>\n        move (Var 1) steps\n        change y by (Var 2)\n        change [var 2 v] by (-0.4)\n        set [var 1 v] to ((Var 1) * (0.95))\n    end\n    repeat (10)\n        move (Var 1) steps\n        change y by (Var 2)\n        change [var 2 v] by (-0.4)\n        set [var 1 v] to ((Var 1) * (0.95))\n        change [ghost v] effect by (10)\n    end\n    hide\n    delete this clone\nend\n\nwhen I start as a clone\nif <(Clone ID) = [Hider 1]> then\n    wait until <(timer) > [7]>\n    go to [front v] layer\n    point in direction (90)\n    show\n    go to x: (300) y: (0)\n    set size to (100) %\n    switch costume to (hider 2 v)\n    clear graphic effects\n    repeat until <<(round (x position)) = [0]> and <(round (y position)) = [0]>>\n        change x by (((0) - (round (x position))) / (5))\n        change y by (((0) - (round (y position))) / (5))\n    end\n    delete this clone\nend\nif <(Clone ID) = [Hider 2]> then\n    wait until <(timer) > [7]>\n    go to [front v] layer\n    point in direction (90)\n    show\n    go to x: (-300) y: (0)\n    set size to (100) %\n    switch costume to (hider 1 v)\n    clear graphic effects\n    repeat until <<(round (x position)) = [0]> and <(round (y position)) = [0]>>\n        change x by (((0) - (round (x position))) / (5))\n        change y by (((0) - (round (y position))) / (5))\n    end\n    delete this clone\nend\n\nwhen I receive [hide v]\ndelete this clone\n\ndefine Clone Particles\nset [clone id v] to [Particle]\nrepeat (75)\n    create clone of (_myself_ v)\n    turn right (15) degrees\nend\npoint in direction (90)\n\ndefine Clone Row of Boxes\nset [brightness v] effect to (10)\nrepeat (9)\n    create clone of (_myself_ v)\n    change [var 2 v] by (-1)\n    change [brightness v] effect by (-2)\nend\n\ndefine Bounce with (bounciness) , (speed) and (finishing size)\nset [var 1 v] to [0]\nrepeat until <<(finishing size) = (size)> and <(Var 1) = (size)>>\n    set [var 2 v] to (((Var 2) * ((bounciness) / (100))) + (((finishing size) - (size)) * ((speed) / (20))))\n    set [var 1 v] to (size)\n    change size by (Var 2)\nend\nset size to (finishing size) %\n\ndefine Smooth Glide x: (x) y: (y) speed: (speed) (size)\nrepeat until <<(round (x position)) = (round (x))> and <(round (y position)) = (round (y))>>\n    change x by (((round (x)) - (round (x position))) / (speed))\n    change y by (((round (y)) - (round (y position))) / (speed))\n    change size by (((size) - (size)) / (speed))\nend\ngo to x: (x) y: (y)\nrepeat until <(round (size)) = (round (size))>\n    change size by (((size) - (size)) / (speed))\nend\nset size to (size) %\n\ndefine Type: System (text) (x) (y) (size) (color) (brightness) (speed)\nswitch costume to (master v)\nhide\ngo to x: (x) y: (y)\nset size to (size) %\nset [# v] to [1]\nset [color v] effect to (color)\nset [brightness v] effect to (brightness)\nset [length v] to (length of (text))\nrepeat (length of (text))\n    if <(letter (#) of (text)) > [ ]> then\n        switch costume to (letter (#) of (text))\n        create clone of (_myself_ v)\n        change x by ((size) * ((item (costume [number v]) of [character widths v]) / (90)))\n        change [# v] by (1)\n    else\n        switch costume to ( v)\n        create clone of (_myself_ v)\n        change x by ((size) * ((item (costume [number v]) of [character widths v]) / (90)))\n        change [# v] by (1)\n    end\n    wait (speed) seconds\nend\n\ndefine Setup Lists\ndelete all of [character widths v]\ndelete all of [characters v]\nadd [thing] to [character widths v]\nadd [29] to [character widths v]\nadd [24] to [character widths v]\nadd [28] to [character widths v]\nadd [27] to [character widths v]\nadd [24] to [character widths v]\nadd [24] to [character widths v]\nadd [28] to [character widths v]\nadd [28] to [character widths v]\nadd [7] to [character widths v]\nadd [21] to [character widths v]\nadd [22] to [character widths v]\nadd [22] to [character widths v]\nadd [34] to [character widths v]\nadd [27] to [character widths v]\nadd [34] to [character widths v]\nadd [22] to [character widths v]\nadd [34] to [character widths v]\nadd [21] to [character widths v]\nadd [23] to [character widths v]\nadd [27] to [character widths v]\nadd [27] to [character widths v]\nadd [29] to [character widths v]\nadd [38] to [character widths v]\nadd [26] to [character widths v]\nadd [27] to [character widths v]\nadd [27] to [character widths v]\nadd [11] to [character widths v]\nadd [20] to [character widths v]\nadd [21] to [character widths v]\nadd [25] to [character widths v]\nadd [21] to [character widths v]\nadd [20] to [character widths v]\nadd [21] to [character widths v]\nadd [20] to [character widths v]\nadd [20] to [character widths v]\nadd [20] to [character widths v]\nadd [14] to [character widths v]\nadd [25] to [character widths v]\nadd [15] to [character widths v]\nadd [10] to [character widths v]\nadd [24] to [character widths v]\nadd [24] to [character widths v]\nadd [20] to [character widths v]\nadd [24] to [character widths v]\nadd [22] to [character widths v]\nadd [16] to [character widths v]\nadd [24] to [character widths v]\nadd [22] to [character widths v]\nadd [10] to [character widths v]\nadd [14] to [character widths v]\nadd [18] to [character widths v]\nadd [9] to [character widths v]\nadd [33] to [character widths v]\nadd [22] to [character widths v]\nadd [24] to [character widths v]\nadd [24] to [character widths v]\nadd [24] to [character widths v]\nadd [15] to [character widths v]\nadd [19] to [character widths v]\nadd [16] to [character widths v]\nadd [22] to [character widths v]\nadd [22] to [character widths v]\nadd [30] to [character widths v]\nadd [20] to [character widths v]\nadd [23] to [character widths v]\nadd [20] to [character widths v]\n\ndefine Change Size By: (size)\nchange size by (size)\nchange x by ((0) - ((size) / (20)))\n\ndefine Find Size (text) (size)\nset [size v] to (size)\nset [width v] to [1]\nset [# v] to [1]\nrepeat (length of (text))\n    if <(letter (#) of (text)) > [ ]> then\n        switch costume to (letter (#) of (text))\n        change [width v] by ((Size) * ((item (costume [number v]) of [character widths v]) / (90)))\n        change [# v] by (1)\n    else\n        switch costume to ( v)\n        change [width v] by ((Size) * ((item (costume [number v]) of [character widths v]) / (90)))\n        change [# v] by (1)\n    end\nend\nif <(Width) > [400]> then\n    change [size v] by (-1)\nend\nif <(Width) < [390]> then\n    change [size v] by (1)\nend\nrepeat until <<<(Width) < [400]> and <(Width) > [389]>> or <(Size) > [300]>>\n    set [width v] to [0]\n    set [# v] to [1]\n    repeat (length of (text))\n        if <(letter (#) of (text)) > [ ]> then\n            switch costume to (letter (#) of (text))\n            change [width v] by ((Size) * ((item (costume [number v]) of [character widths v]) / (90)))\n            change [# v] by (1)\n        else\n            switch costume to ( v)\n            change [width v] by ((Size) * ((item (costume [number v]) of [character widths v]) / (90)))\n            change [# v] by (1)\n        end\n    end\n    if <(Width) > [400]> then\n        change [size v] by (-1)\n    end\n    if <(Width) < [390]> then\n        change [size v] by (1)\n    end\n    if <(Size) > [301]> then\n        set [size v] to [290]\n    end\nend\nset [x v] to ((0) - ((Width) / (2)))\n\ndefine Type (text) (x) (y) (size) (color) (brightness) (speed)\nset [clone id v] to [Letter]\nif <(length of (text)) > [20]> then\n    Find Size [Username Too Long] (size)\n    Type: System [Username Too Long] (X) (y) (Size) (color) (brightness) (speed)\nelse\n    Find Size (text) (size)\n    Type: System (text) (X) (y) (Size) (color) (brightness) (speed)\nend\n\nwhen flag clicked\nset [intro3 v] to [1]\nreset timer\nset [username v] to [Ryham301]\nset [clone id v] to [Back 2]\ncreate clone of (_myself_ v)\nSetup Lists\nType (Username) [-200] [0] [200] [115] [100] [0]\nstart sound [Migos & Marshmello - Danger \(Clean\) \(1\) v]\nreset timer\nchange [intro3 v] by (1)\nset [clone id v] to [Box]\nset [var 1 v] to [-6]\nrepeat (13)\n    set [var 2 v] to [4]\n    Clone Row of Boxes\n    change [var 1 v] by (1)\nend\nwait (1) seconds\nset [clone id v] to [Logo]\ncreate clone of (_myself_ v)\nset [clone id v] to [Back]\ncreate clone of (_myself_ v)\nset [clone id v] to [Hider 1]\ncreate clone of (_myself_ v)\nset [clone id v] to [Hider 2]\ncreate clone of (_myself_ v)\nwait until <(timer) > [4]>\nClone Particles\nwait until <(timer) > [5.7]>\nClone Particles\nwait until <(timer) > [8]>\nset [x_spawn v] to [0]\nbroadcast (Intros v)\n\n
★ Spooky Night Scrolling Platformer ★\n\nHow To Play:\nWelcome to Spooky Night. Jump over Enemies, Lava, And spikes. To win get to the end star. If you win you can press space or click to keep playing!! Do not get too spooked!\n\nInfo:\n➜ 7 hrs to make\n➜ Lots Of Blocks\n➜ Halloween Themed\n➜ Have a good time!\n\n❤️And⭐ and follow @Ryham301 to support me\n\n⛔ No Advertising ⛔\n\nCredits:\n@Griffpatch For Scrolling \n\n@Ryham301 for some art, additional things\n\n@StratfordJames For Some Art\n\nIntro by @Twonerds_test\n\n\n\n#All #All #All #All #All #All #All #All #All #All #All #All\n#Games #Games #Games #Games #Games #Games\n#Art #Art #Art #Art #Art #Art #Art #Art #Art #Art #Art 