Stranded 1 | Scrolling Platformer
@Stage\n\nwhen I receive [info quit v]\nswitch backdrop to (space v)\nbroadcast (information v)\n\nwhen I receive [start brodcast v]\nswitch backdrop to (game 1 v)\nbroadcast (Green Flag v) and wait\nbroadcast (Play Game v) and wait\n\nwhen I receive [start v]\nwait (2) seconds\nbroadcast (quit v)\n\n@blank\n\n@menu\n\nwhen flag clicked\nhide\ngo to x: (0) y: (0)\nclear graphic effects\n\nwhen I start as a clone\nif <(id) = [1]> then\n    switch costume to (space station v)\n    set size to (10) %\n    clear graphic effects\n    point in direction (75)\n    go to x: (35) y: (0)\n    show\n    forever\n        turn left (.1) degrees\n        go to x: ((35) + ((mouse x) / (-40))) y: ((0) + ((mouse y) / (-40)))\n    end\nend\nif <(id) = [2]> then\n    go to x: (-300) y: (0)\n    point in direction (90)\n    clear graphic effects\n    switch costume to (size v)\n    set size to (180) %\n    switch costume to (planet real v)\n    show\n    forever\n        go to x: ((-300) + ((mouse x) / (-50))) y: ((0) + ((mouse y) / (-50)))\n        repeat (120)\n            turn right (.02) degrees\n            go to x: ((-300) + ((mouse x) / (-50))) y: ((0) + ((mouse y) / (-50)))\n        end\n        repeat (120)\n            turn right (-.02) degrees\n            go to x: ((-300) + ((mouse x) / (-50))) y: ((0) + ((mouse y) / (-50)))\n        end\n    end\nend\nif <(id) = [3]> then\n    go to x: (-300) y: (0)\n    point in direction (90)\n    switch costume to (size v)\n    set size to (180) %\n    switch costume to (light real v)\n    set [ghost v] effect to (100)\n    go to [front v] layer\n    show\n    wait (2) seconds\n    forever\n        repeat (2)\n            repeat (4)\n                change [ghost v] effect by (-5)\n            end\n            repeat (1)\n                change [ghost v] effect by (5)\n            end\n            wait (.1) seconds\n            repeat (10)\n                change [ghost v] effect by (-5)\n            end\n            repeat (1)\n                change [ghost v] effect by (5)\n            end\n            repeat (3)\n                change [ghost v] effect by (-5)\n            end\n            repeat (15)\n                change [ghost v] effect by (5)\n            end\n        end\n        wait (pick random (4) to (10)) seconds\n    end\nend\nif <(id) = [4]> then\n    switch costume to (start v)\n    set size to (90) %\n    clear graphic effects\n    point in direction (90)\n    go to x: (-40) y: (-10)\n    show\n    forever\n        if <touching (mouse-pointer v)?> then\n            switch costume to (start slected v)\n            if <mouse down?> then\n                play sound [slect v] until done\n                broadcast (start v)\n                hide\n                delete this clone\n            end\n        else\n            switch costume to (start v)\n        end\n    end\nend\nif <(id) = [5]> then\n    switch costume to (information v)\n    set size to (90) %\n    clear graphic effects\n    point in direction (90)\n    go to x: (-40) y: (-10)\n    show\n    forever\n        if <touching (mouse-pointer v)?> then\n            switch costume to (information slected v)\n            if <mouse down?> then\n                play sound [slect v] until done\n                broadcast (info quit v)\n                hide\n            end\n        else\n            switch costume to (information v)\n        end\n    end\nend\nif <(id) = [6]> then\n    switch costume to (quit v)\n    set size to (90) %\n    clear graphic effects\n    point in direction (90)\n    go to x: (-40) y: (-10)\n    show\n    forever\n        if <touching (mouse-pointer v)?> then\n            switch costume to (quit slected v)\n            if <mouse down?> then\n                play sound [slect v] until done\n                broadcast (thumbnail v)\n                broadcast (quit v)\n                hide\n            end\n        else\n            switch costume to (quit v)\n        end\n    end\nend\nif <(id) = [7]> then\n    switch costume to (title v)\n    set size to (100) %\n    clear graphic effects\n    point in direction (90)\n    go to x: (0) y: (0)\n    show\nend\nif <(id) = [8]> then\n    switch costume to (space background v)\n    set size to (100) %\n    clear graphic effects\n    go to [back v] layer\n    point in direction (90)\n    go to x: (0) y: (0)\n    show\n    forever\n        go to x: ((0) + ((mouse x) / (-100))) y: ((0) + ((mouse y) / (-100)))\n    end\nend\nif <(id) = [9]> then\n    switch costume to (hardcore v)\n    set size to (90) %\n    clear graphic effects\n    point in direction (90)\n    go to x: (-40) y: (-10)\n    show\n    forever\n        if <touching (mouse-pointer v)?> then\n            switch costume to (hardcore slected v)\n            if <mouse down?> then\n                play sound [slect v] until done\n                set [hardcore? v] to [YES]\n                broadcast (start v)\n                hide\n                delete this clone\n            end\n        else\n            switch costume to (hardcore v)\n        end\n    end\nend\n\nwhen I receive [quit v]\nstop [other scripts in sprite v]\nhide\nstop all sounds\ndelete this clone\n\nwhen I receive [start v]\nstop [other scripts in sprite v]\nbroadcast (transition v)\nbroadcast (quit v)\n\nwhen I receive [information v]\nstart sound [menu music v]\ngo to x: (0) y: (0)\ngo to [front v] layer\nclear graphic effects\nset size to (100) %\nswitch costume to (information planel v)\nset [ghost v] effect to (100)\nshow\nrepeat (50)\n    change [ghost v] effect by (-2)\nend\nclear graphic effects\nforever\n    switch costume to (information planel v)\n    wait (.7) seconds\n    switch costume to (information plane2 v)\n    wait (.7) seconds\nend\n\nwhen I receive [menu v]\nset [id v] to [1]\ncreate clone of (_myself_ v)\nset [id v] to [2]\ncreate clone of (_myself_ v)\nset [id v] to [3]\ncreate clone of (_myself_ v)\nset [id v] to [4]\ncreate clone of (_myself_ v)\nset [id v] to [5]\ncreate clone of (_myself_ v)\nset [id v] to [6]\ncreate clone of (_myself_ v)\nset [id v] to [7]\ncreate clone of (_myself_ v)\nset [id v] to [8]\ncreate clone of (_myself_ v)\nset [id v] to [9]\ncreate clone of (_myself_ v)\nstop all sounds\nforever\n    play sound [menu music v] until done\nend\n\nwhen I receive [creds v]\nset [id v] to [1]\ncreate clone of (_myself_ v)\nset [id v] to [2]\ncreate clone of (_myself_ v)\nset [id v] to [3]\ncreate clone of (_myself_ v)\nset [id v] to [8]\ncreate clone of (_myself_ v)\nstop all sounds\nforever\n    play sound [cred music v] until done\nend\n\nwhen I receive [info quit v]\nstop [other scripts in sprite v]\nhide\nstop all sounds\ndelete this clone\n\nwhen I receive [information v]\nwait (1) seconds\nwait until <<key (any v) pressed?> or <mouse down?>>\nstop [other scripts in sprite v]\nhide\nbroadcast (transition v)\nbroadcast (menu v)\n\n@cutscene 1\n\nwhen I receive [start v]\nbroadcast (quit v)\nswitch backdrop to (space v)\nswitch costume to (ship v)\npoint in direction (90)\nset size to (70) %\nshow\nreset timer\nrepeat until <(size) > [85]>\n    change size by (.02)\n    turn left (.4) degrees\nend\n\nwhen flag clicked\nhide\nclear graphic effects\nset size to (100) %\npoint in direction (90)\ngo to x: (0) y: (0)\n\nwhen I receive [start v]\nwait (4) seconds\nstart sound [bg music low v]\nset [id v] to [1]\ncreate clone of (_myself_ v)\nwait (10) seconds\ncreate clone of (_myself_ v)\nwait until <(size) = [86]>\nbroadcast (transition v)\nhide\nswitch backdrop to (empty v)\nbroadcast (cutscene 1 v)\nreset timer\ngo to x: (0) y: (0)\npoint in direction (90)\nset [brightness v] effect to (-10)\ngo to [back v] layer\nset size to (100) %\nswitch costume to (station in v)\nset [color v] effect to (170)\nshow\nwait (.6) seconds\nstart sound [walking v]\nrepeat until <(timer) > [4]>\n    repeat (10)\n        change [color v] effect by (1)\n    end\n    repeat (10)\n        change [color v] effect by (-1)\n    end\nend\nbroadcast (transition v)\nhide\nset [id v] to [2]\ncreate clone of (_myself_ v)\nswitch backdrop to (space v)\nswitch costume to (ship v)\npoint in direction (90)\nset size to (50) %\ngo to x: (206) y: (0)\nshow\nreset timer\nrepeat (68.6666667)\n    change x by (-3)\n    turn left (9) degrees\n    change size by (-.67)\nend\nhide\nset [id v] to [2]\ncreate clone of (_myself_ v)\nswitch backdrop to (space v)\nswitch costume to (ship v)\npoint in direction (90)\nset size to (3) %\ngo to x: (0) y: (0)\nshow\nreset timer\nstart sound [bounce black hole v]\nrepeat (68.6666667)\n    change x by (3)\n    turn right (9) degrees\n    change size by (.67)\nend\nhide\nbroadcast (transition v)\nhide\nset [id v] to [3]\ncreate clone of (_myself_ v)\nswitch costume to (ship v)\npoint in direction (90)\nset size to (50) %\ngo to x: (-278) y: (0)\nclear graphic effects\nwait (5) seconds\nshow\nreset timer\nrepeat (68)\n    change x by (3.5)\n    turn left (9) degrees\n    change size by (-.67)\nend\nhide\nbroadcast (transition v)\nswitch backdrop to (empty v)\nset [id v] to [4]\ncreate clone of (_myself_ v)\nwait (2) seconds\nset [id v] to [5]\ncreate clone of (_myself_ v)\nswitch costume to (falling fire ball v)\npoint in direction (90)\nset size to (50) %\ngo to x: (-368) y: (299)\nshow\nreset timer\nglide (2) secs to x: (368) y: (-299)\nwait (.8) seconds\nhide\nstop all sounds\nstart sound [explosion v]\nbroadcast (transition v)\nbroadcast (quit v)\nbroadcast (start brodcast v)\nbroadcast (quit cutsene v)\n\nbroadcast (transition v)\nhide\n\nwhen I start as a clone\nif <(id) = [1]> then\n    show\n    switch costume to (size v)\n    set size to (190) %\n    switch costume to (planet v)\n    point in direction (0)\n    go to [back v] layer\n    go to x: (-500) y: (0)\n    start sound [planet passing by v]\n    repeat (300)\n        change x by (4)\n        turn right (.4) degrees\n    end\n    delete this clone\nend\nif <(id) = [2]> then\n    show\n    clear graphic effects\n    switch costume to (size v)\n    set size to (100) %\n    switch costume to (worm hole v)\n    point in direction (0)\n    go to x: (0) y: (0)\n    go to [back v] layer\n    wait (2.5) seconds\n    hide\n    delete this clone\nend\nif <(id) = [3]> then\n    show\n    clear graphic effects\n    switch costume to (size v)\n    set size to (100) %\n    switch costume to (super saturn v)\n    point in direction (130)\n    go to x: (0) y: (0)\n    go to [back v] layer\n    repeat (250)\n        turn left (.06) degrees\n    end\n    hide\n    delete this clone\nend\nif <(id) = [4]> then\n    show\n    clear graphic effects\n    set size to (100) %\n    switch costume to (venus sky v)\n    point in direction (90)\n    go to x: (0) y: (0)\n    go to [back v] layer\n    wait (5.1) seconds\n    hide\n    delete this clone\nend\nif <(id) = [5]> then\n    show\n    clear graphic effects\n    set size to (100) %\n    switch costume to (lighting v)\n    point in direction (90)\n    go to x: (0) y: (0)\n    set [ghost v] effect to (100)\n    wait (1) seconds\n    repeat (10)\n        change [ghost v] effect by (-10)\n    end\n    repeat (10)\n        change [ghost v] effect by (10)\n    end\n    hide\n    delete this clone\nend\n\nswitch costume to (planet v)\nswitch costume to (size v)\nchange x by (1)\nturn right (.01) degrees\nswitch costume to (planet v)\n\nbroadcast (start v)\n\nclear graphic effects\nset size to (100) %\npoint in direction (90)\ngo to x: (0) y: (0)\n\nwhen I receive [start v]\nwait (.3) seconds\nforever\n    if <key (space v) pressed?> then\n        stop [other scripts in sprite v]\n        stop all sounds\n        broadcast (transition v)\n        hide\n        start sound [explosion v]\n        stop [other scripts in sprite v]\n        broadcast (start brodcast v)\n        broadcast (quit v)\n        broadcast (quit cutsene v)\n        stop [this script v]\n    end\nend\n\nwhen I receive [play game v]\nstop [other scripts in sprite v]\n\nwhen I receive [quit cutsene v]\nstop [other scripts in sprite v]\nhide\ndelete this clone\n\n@cutscene 2\n\nwhen flag clicked\nhide\nclear graphic effects\nset size to (100) %\npoint in direction (90)\ngo to x: (0) y: (0)\nswitch costume to (1 v)\n\nwhen I receive [cutscene 2 v]\nshow\nswitch backdrop to (game 1 v)\nswitch costume to (1 v)\nwait (.5) seconds\nstart sound [walk v]\nrepeat (8)\n    next costume\n    wait (.1) seconds\nend\nwait (1) seconds\nstart sound [apear v]\nstart sound [in2 v]\nrepeat (5)\n    next costume\n    wait (.025) seconds\nend\nwait (.5) seconds\nstart sound [in v]\nwait (.5) seconds\nrepeat (5)\n    next costume\n    wait (.1) seconds\nend\nwait (3) seconds\nstart sound [dissapera v]\nrepeat (4)\n    next costume\n    wait (.025) seconds\nend\nwait (3) seconds\nbroadcast (long transistion v)\nwait (1) seconds\nbroadcast (creds v)\nhide\nswitch backdrop to (empty v)\n\nwhen I start as a clone\n\nwhen I receive [cutscene 2 v]\nwait (.3) seconds\nwait until <key (space v) pressed?>\nstop [other scripts in sprite v]\nbroadcast (transition v)\nhide\nbroadcast (creds v)\n\nbroadcast (cutscene 2 v)\n\n@Player walk\n\nwhen flag clicked\nhide\npoint in direction (90)\ngo to x: (-262) y: (-111)\nset size to (300) %\n\nwhen I receive [cutscene 1 v]\ngo to x: (-262) y: (-111)\nshow\nforever\n    switch costume to (walk f1 v)\n    repeat (3)\n        next costume\n        wait (.1) seconds\n    end\nend\n\nwhen I receive [cutscene 1 v]\nwait (.6) seconds\nglide (2) secs to x: (297) y: (-111)\nhide\nstop [other scripts in sprite v]\n\nwhen I receive [cutscene 2 v]\nstop [other scripts in sprite v]\nhide\n\nwhen I receive [play game v]\nhide\nforever\n    if <<<<<<key (left arrow v) pressed?> or <key (a v) pressed?>> or <<mouse down?> and <(mouse x) < (x position)>>> or <<<key (right arrow v) pressed?> or <key (d v) pressed?>> or <<mouse down?> and <(mouse x) > (x position)>>>> and <not <<<key (up arrow v) pressed?> or <key (w v) pressed?>> or <<mouse down?> and <(mouse y) > (y position)>>>>> and <(AIR) = [0]>> then\n        play sound (pick random (1) to (4)) until done\n    end\nend\n\n@extra sprites\n\nwhen flag clicked\nset [hardcore? v] to [NO]\nswitch costume to (hardcore fail v)\nhide\n\nwhen I receive [hardcore fail v]\nswitch backdrop to (space v)\nswitch costume to (hardcore fail v)\ngo to [front v] layer\nshow\nwait (8) seconds\nbroadcast (transition v)\nbroadcast (menu v)\nbroadcast (Reset v)\nset [hardcore? v] to [NO]\nhide\n\nwhen I receive [hardcore fail v]\nwait (1) seconds\nwait until <key (space v) pressed?>\nbroadcast (transition v)\nbroadcast (menu v)\nbroadcast (Reset v)\nset [hardcore? v] to [NO]\nhide\n\nwhen I receive [wr ani v]\nswitch backdrop to (space v)\nswitch costume to (wr v)\ngo to [front v] layer\nshow\nwait (15) seconds\nbroadcast (transition v)\nbroadcast (menu v)\nbroadcast (Reset v)\nhide\n\n@transition\n\nwhen I receive [transition v]\ngo to [front v] layer\nshow\nclear graphic effects\ngo to [front v] layer\nwait (1) seconds\ngo to [front v] layer\nrepeat (10)\n    go to [front v] layer\n    change [ghost v] effect by (10)\nend\nswitch costume to (1 v)\nhide\ngo to [back v] layer\n\nwhen flag clicked\nhide\nclear graphic effects\n\nwhen I receive [long transistion v]\ngo to [front v] layer\nchange [ghost v] effect by (100)\nshow\ngo to [front v] layer\nrepeat (25)\n    go to [front v] layer\n    change [ghost v] effect by (-5)\nend\nwait (2) seconds\ngo to [front v] layer\nrepeat (25)\n    go to [front v] layer\n    change [ghost v] effect by (5)\nend\nswitch costume to (1 v)\nhide\ngo to [back v] layer\n\n@Player\n\nwhen flag clicked\nset [checkpoint v] to [0]\nhide\n\nwhen I receive [green flag v]\nhide\n\nwhen I receive [play game v]\nset [level v] to [1]\nforever\n    broadcast (Reset v) and wait\n    broadcast (Setip v) and wait\n    Game on\n    repeat until <(EXIT) > []>\n        Tick\n        broadcast (Tick v) and wait\n    end\n    if <(EXIT) = [Win]> then\n        Game - Win\n    else\n        Game - Die\n    end\n    if <touching (front art v)?> then\n        Game - Die\n    end\nend\n\ndefine Game on\nset [x v] to ((Checkpoint) + (1))\nset [y v] to [0]\nif <(Checkpoint) = [0]> then\n    switch backdrop to (game 1 v)\nend\nset [speed y v] to [0]\nset [speed x v] to [0]\nset [air v] to [0]\nset [exit v] to []\nset [scroll x v] to [0]\nset [scroll y v] to [0]\nset size to (120) %\nclear graphic effects\nshow\n\ndefine Tick\nswitch costume to (hitbox v)\nif <<<key (left arrow v) pressed?> or <key (a v) pressed?>> or <<mouse down?> and <(mouse x) < (x position)>>> then\n    change [speed x v] by (-2)\n    point in direction (-90)\nend\nif <<<key (right arrow v) pressed?> or <key (d v) pressed?>> or <<mouse down?> and <(mouse x) > (x position)>>> then\n    change [speed x v] by (2)\n    point in direction (90)\nend\nset [speed x v] to ((Speed x) * (0.8))\nif <([abs v] of (Speed x) ) > [0.9]> then\n    Change player x by (round (Speed x))\nend\nif <<<key (up arrow v) pressed?> or <key (w v) pressed?>> or <<mouse down?> and <(mouse y) > (y position)>>> then\n    if <(AIR) < [5]> then\n        set [speed y v] to [16]\n    end\nend\nif <(Speed y) > [-20]> then\n    change [speed y v] by (-2)\nend\nChange player y by (Speed y)\nTest - Die\nset [scroll x v] to (x)\nif <(SCROLL X) < [0]> then\n    set [scroll x v] to [0]\nend\nchange [scroll y v] by (round (((y) - (SCROLL Y)) / (10)))\nif <(SCROLL Y) < [0]> then\n    set [scroll y v] to [0]\nend\nPosition\nif <<(y) < [-178]> or <touching color (#005c08)?>> then\n    start sound [oof v]\n    set [exit v] to [Die]\nend\nif <(x) < [0]> then\n    set [x player global v] to (x position)\nelse\n    set [x player global v] to [0]\nend\nset [y player global v] to (y position)\nif <<<<key (any v) pressed?> or <mouse down?>> and <(AIR) < [3]>> and <not <(already loved/faved?) = [yes]>>> then\n    change [animatetimervariable v] by (1)\n    set [animateshowsprite v] to (((AnimateShowSprite) + ([floor v] of ((((AnimateTimerVariable) mod (3)) + (1)) / (3)) )) mod (4))\n    switch costume to ((AnimateShowSprite) + (4))\nelse\n    if <not <(already loved/faved?) = [yes]>> then\n        if <(AIR) < [3]> then\n            set [animateshowsprite v] to [0]\n            set [animatetimervariable v] to [0]\n            switch costume to (still v)\n        else\n            switch costume to (up v)\n        end\n    end\nend\nif <<<<key (any v) pressed?> or <mouse down?>> and <(AIR) < [3]>> and <(already loved/faved?) = [yes]>> then\n    change [animatetimervariable v] by (1)\n    set [animateshowsprite v] to (((AnimateShowSprite) + ([floor v] of ((((AnimateTimerVariable) mod (3)) + (1)) / (3)) )) mod (4))\n    switch costume to ((AnimateShowSprite) + (10))\nelse\n    if <(already loved/faved?) = [yes]> then\n        if <(AIR) < [3]> then\n            set [animateshowsprite v] to [0]\n            set [animatetimervariable v] to [0]\n            switch costume to (still skin v)\n        else\n            switch costume to (up2 v)\n        end\n    end\nend\nif <(already loved/faved?) = [yes]> then\n    change [color v] effect by (1)\nend\n\ndefine Change player y by (sy)\nchange [y v] by (sy)\nchange [air v] by (1)\nPosition\nrepeat until <not <touching (platforms v)?>>\n    if <(sy) > [0]> then\n        change [y v] by (-1)\n    else\n        change [y v] by (1)\n        set [air v] to [0]\n    end\n    Position\n    set [speed y v] to [0]\nend\n\ndefine Position\ngo to x: ((x) - (SCROLL X)) y: ((y) - (SCROLL Y))\n\ndefine Change player x by (sx)\nchange [x v] by (sx)\nPosition\nif <touching (platforms v)?> then\n    repeat (12)\n        change [y v] by (1)\n        Position\n        if <not <touching (platforms v)?>> then\n            stop [this script v]\n        end\n    end\n    change [y v] by (-12)\n    if <<<key (up arrow v) pressed?> or <key (w v) pressed?>> or <<mouse down?> and <(mouse y) > (y position)>>> then\n        if <(sx) > [0]> then\n            set [speed x v] to [-16]\n        else\n            set [speed x v] to [16]\n        end\n        set [air v] to [0]\n    else\n        set [speed x v] to [0]\n    end\n    repeat until <not <touching (platforms 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\ndefine Game - Die\nif <not <(HARDCORE?) = [yes]>> then\n    set [exit v] to []\n    hide\nelse\n    broadcast (hardcore fail v)\n    broadcast (transition v)\n    stop [other scripts in sprite v]\n    hide\nend\n\ndefine Game - Win\nwait (1) seconds\nbroadcast (END v)\nhide\n\ndefine Test - Die\n\nwhen I receive [cutscene 2 v]\nstop [other scripts in sprite v]\nhide\n\nset [checkpoint v] to [5784]\n\nwhen I receive [menu v]\nstop [other scripts in sprite v]\nhide\n\n@Platforms\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 [setip v]\nhide\nset [x v] to [0]\nset [y v] to [0]\nif <(LEVEL) = [1]> then\n    switch costume to (1 1 v)\n    switch backdrop to (game 1 v)\n    Clone at x: [480] y: [0]\n    Clone at x: [480] y: [0]\n    Clone at x: [480] y: [0]\n    Clone at x: [480] y: [0]\n    Clone at x: [480] y: [0]\n    Clone at x: [480] y: [0]\n    Clone at x: [480] y: [0]\n    Clone at x: [480] y: [0]\n    Clone at x: [480] y: [0]\n    Clone at x: [480] y: [0]\n    Clone at x: [480] y: [0]\n    Clone at x: [480] y: [0]\n    Clone at x: [480] y: [0]\n    Clone at x: [480] y: [0]\n    Clone at x: [480] y: [0]\n    Clone at x: [480] y: [0]\n    Clone at x: [480] y: [0]\n    Clone at x: [480] y: [0]\n    Clone at x: [480] y: [0]\n    Clone at x: [480] y: [0]\n    Clone at x: [480] y: [0]\n    Clone at x: [480] y: [0]\n    Clone at x: [480] 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\nset [checkpoint v] to [0]\ngo [forward v] (10000) layers\nset [ghost v] effect to (100)\n\nwhen I receive [play game v]\nwait (5) seconds\nwait until <(SCROLL X) > [5784]>\nset [checkpoint v] to [5784]\nwait until <(SCROLL X) > [11249]>\nstop [other scripts in sprite v]\nbroadcast (transition v)\nwait (.5) seconds\nbroadcast (cutscene 2 v)\n\nwhen I receive [cutscene 2 v]\nstop [other scripts in sprite v]\nhide\ndelete this clone\n\nwhen I receive [play game v]\nforever\n    play sound [music v] until done\nend\n\nwhen I receive [hardcore fail v]\nstop [other scripts in sprite v]\nhide\ndelete this clone\n\n@FRONT Art\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 [setip 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: [480] y: [0]\n    Clone at x: [480] y: [0]\n    Clone at x: [480] y: [0]\n    Clone at x: [480] y: [0]\n    Clone at x: [480] y: [0]\n    Clone at x: [480] y: [0]\n    Clone at x: [480] y: [0]\n    Clone at x: [480] y: [0]\n    Clone at x: [480] y: [0]\n    Clone at x: [480] y: [0]\n    Clone at x: [480] y: [0]\n    Clone at x: [480] y: [0]\n    Clone at x: [480] y: [0]\n    Clone at x: [480] y: [0]\n    Clone at x: [480] y: [0]\n    Clone at x: [480] y: [0]\n    Clone at x: [480] y: [0]\n    Clone at x: [480] y: [0]\n    Clone at x: [480] y: [0]\n    Clone at x: [480] y: [0]\n    Clone at x: [480] y: [0]\n    Clone at x: [480] y: [0]\n    Clone at x: [480] 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 receive [cutscene 2 v]\nstop [other scripts in sprite v]\nhide\ndelete this clone\n\ngo to [front v] layer\n\nwhen I receive [hardcore fail v]\nstop [other scripts in sprite v]\nhide\ndelete this clone\n\n@BACK ART\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 [setip 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: [480] y: [0]\n    Clone at x: [480] y: [0]\n    Clone at x: [480] y: [0]\n    Clone at x: [480] y: [0]\n    Clone at x: [480] y: [0]\n    Clone at x: [480] y: [0]\n    Clone at x: [480] y: [0]\n    Clone at x: [480] y: [0]\n    Clone at x: [480] y: [0]\n    Clone at x: [480] y: [0]\n    Clone at x: [480] y: [0]\n    Clone at x: [480] y: [0]\n    Clone at x: [480] y: [0]\n    Clone at x: [480] y: [0]\n    Clone at x: [480] y: [0]\n    Clone at x: [480] y: [0]\n    Clone at x: [480] y: [0]\n    Clone at x: [480] y: [0]\n    Clone at x: [480] y: [0]\n    Clone at x: [480] y: [0]\n    Clone at x: [480] y: [0]\n    Clone at x: [480] y: [0]\n    Clone at x: [480] y: [0]\nend\n\ndefine Position (x) (y)\ngo to x: (x) y: (y)\ngo to [back v] layer\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 receive [cutscene 2 v]\nstop [other scripts in sprite v]\nhide\ndelete this clone\n\nwhen I receive [hardcore fail v]\nstop [other scripts in sprite v]\nhide\n\ndelete this clone\n\nwhen I receive [hardcore fail v]\n\n@thumbnail\n\nwhen flag clicked\nswitch costume to (current v)\nhide\n\nwhen I receive [thumbnail v]\nhide variable [time v]\nhide variable [☁ wr v]\ngo to [front v] layer\ngo to x: (0) y: (200)\nset [brightness v] effect to (45)\nshow\nrepeat (45)\n    change y by (((0) - (y position)) / (7))\n    change [brightness v] effect by (-1)\nend\n\n@intro\n\nwhen flag clicked\nshow\nstart sound [sound v]\nswitch backdrop to (space v)\nswitch costume to (first - normal v)\nwait (1) seconds\nrepeat (2)\n    next costume\n    wait (.1) seconds\nend\nstart sound [up v]\nwait (.5) seconds\nstart sound [upup v]\nrepeat (4)\n    next costume\n    wait (.07) seconds\nend\nrepeat (4)\n    next costume\n    wait (.07) seconds\nend\nstart sound [land v]\nnext costume\nwait (2) seconds\nbroadcast (transition v)\nswitch costume to (last gone v)\nwait (3) seconds\nbroadcast (long transistion v)\nwait (1) seconds\nhide\nwait (1.1) seconds\nstop all sounds\nstop [other scripts in sprite v]\nbroadcast (menu v)\n\nwhen flag clicked\nwait (.3) seconds\nwait until <key (any v) pressed?>\nstop [other scripts in sprite v]\nstop all sounds\nbroadcast (transition v)\nhide\nbroadcast (menu v)\n\nswitch costume to (me presents v)\nwait (3) seconds\nswitch costume to (me presents2 v)\nwait (1) seconds\n\n@creds\n\nwhen flag clicked\nhide\ngo to x: (0) y: (0)\nset [ghost v] effect to (100)\nswitch costume to (text 1 v)\n\nwhen I receive [creds v]\nshow\nset [ghost v] effect to (100)\ngo to [front v] layer\ngo to [front v] layer\nswitch costume to (text v)\ngo to x: (0) y: (0)\nwait (3) seconds\nrepeat (50)\n    change [ghost v] effect by (-2)\nend\nwait (2) seconds\nrepeat (1800)\n    change y by (1)\nend\nwait (.9) seconds\nstop [other scripts in sprite v]\nrepeat (50)\n    change [ghost v] effect by (2)\nend\nswitch costume to (me v)\ngo to x: (0) y: (0)\nwait (.9) seconds\nrepeat (50)\n    change [ghost v] effect by (-2)\nend\nwait (1.3) seconds\nrepeat (50)\n    change [ghost v] effect by (2)\nend\nhide\nbroadcast (transition v)\nbroadcast (quit v) and wait\nbroadcast (menu v)\n\nwhen I receive [creds v]\nforever\n    switch costume to (text 1 v)\n    wait (.6) seconds\n    switch costume to (text 2 v)\n    wait (.6) seconds\nend\n\n@extra\n\n@notfication\n\nwhen I receive [play game v]\n\nswitch costume to (norm v)\nshow\nrepeat until <(y position) < [6]>\n    change y by (((5) - (y position)) / (6))\nend\nwait (10) seconds\nrepeat until <(y position) > [49.5]>\n    change y by (((y position) + (5)) / (5))\nend\nstop [other scripts in sprite v]\nhide\n\nwhen I receive [play game v]\n\nforever\n    go to [front v] layer\nend\n\nwhen I receive [stop notif v]\nrepeat until <(y position) > [49.5]>\n    change y by (((y position) + (5)) / (5))\nend\nstop [other scripts in sprite v]\nhide\n\nwhen flag clicked\nhide\n\n@detector\n\nwhen flag clicked\nhide\nwait until <not <(username) = [Thepugmen]>>\nset [faved___ v] to [0]\nset [loved__ v] to [0]\nset [clone id v] to [0]\ncreate clone of (_myself_ v)\nwait (0.2) seconds\nset [clone id v] to [1]\ncreate clone of (_myself_ v)\nwait until <<(LOVED__) = [1]> and <(FAVED___) = [1]>>\nset [already loved/faved? v] to [yes]\nbroadcast (stop notif v)\nbroadcast (give skin v)\nhide\ndelete this clone\n\nwhen I start as a clone\nif <(clone id) = [0]> then\n    go to x: (-15) y: (0)\n    set [loved__ v] to [0]\n    switch costume to (love v)\n    forever\n        set [love? v] to <touching (mouse-pointer v)?>\n        if <touching (mouse-pointer v)?> then\n            set [loved__ v] to [1]\n        end\n    end\nend\nif <(clone id) = [1]> then\n    go to x: (0) y: (0)\n    switch costume to (fave v)\n    set [faved___ v] to [0]\n    forever\n        set [fav v] to <touching (mouse-pointer v)?>\n        if <touching (mouse-pointer v)?> then\n            set [faved___ v] to [1]\n        end\n    end\nend\n\n@TIMER\n\nwhen flag clicked\nset [win? v] to [no]\nset [time v] to [0]\nhide variable [time v]\nhide variable [☁ wr v]\nhide\nif <(☁ WR) = [0]> then\n    set [☁ wr v] to [300]\nend\n\nwhen I receive [play game v]\nshow variable [time v]\nset [time v] to [0]\nset [win? v] to [no]\nhide variable [☁ wr v]\nwait (1) seconds\nset [time v] to [0]\nforever\n    repeat until <(Win?) = [yes]>\n        change [time v] by (1)\n        wait (1) seconds\n    end\n    stop [this script v]\nend\n\nwhen I receive [cutscene 2 v]\nset [win? v] to [yes]\nshow variable [☁ wr v]\n\nwhen I receive [end v]\nif <(time) < (☁ WR)> then\n    broadcast (WR ANI v)\nend\nforever\n    if <(time) < (☁ WR)> then\n        change [☁ wr v] by (-1)\n    end\nend\n\nwhen I receive [menu v]\nset [win? v] to [no]\nhide variable [☁ wr v]\nhide variable [time v]\n\nset [☁ wr v] to [300]\n\n
--- CLICK FLAG 2 TIMES ---\n\n~Story:\nYou're an astronaut on a space station orbiting a gas giant when suddenly a wormhole appears, it sends you to the super Saturn (J1407b). The station crashes, will you live another day?\n\n~ How to play: \nIt's a platformer so use WASD, ARROW, or TOUCH controls to move around. A checkpoint is present. [SPACE TO SKIP CUT SCENES]\n\n~ PART 2 IS BEING MADE\n\n~ Fullscreen is not recommended\n----------------- 》Credits《 -----------------\n- @thepugmen ~ for all the art, code, and almost all sound effects.\n- @Im-a-co-ding-ro-bot ~ helping me with the DLC\n- @Griffpatch ~ scrolling platformer code\n- Upklyak ~ for some art\n- Cryo Chamber (on youtube) ~ for all of the music used in-game\n\nInteresting information:\n- The flag the astronaut is holding on the thumbnail doesn't exist.\n- The main menu was heavily inspired by a certain space-related game ;)\n- The whole main menu (THE WHOLE THING) is contained in a single sprite :D story\n\n----------------- 》Tags《 -----------------\n#platformer #All #Games #Art #story #space #mars #scrolling #mobile #explore