*REMASTERED* Trapped in the Sky (a platformer)
@Stage\n\n@Easter egg\n\n@Bob\n\nwhen I receive [green flag clicked v]\nReset Level\nforever\n    if <not <(Freeze Bob) = [1]>> then\n        switch costume to (hitbox v)\n        Controls - Jump, Crouch\n        Gravity\n        Check Hit Ceiling / Floor <(speed y) > [0]>\n        if <(y position) < [-189]> then\n            Reset Level\n        end\n        if <(wall jump) > [0]> then\n            change [wall jump v] by (-1)\n        else\n            Controls - Left and Right\n        end\n        if <(speed x) < [-0.5]> then\n            Walk (-90) (speed x) max steep (([ceiling v] of ([abs v] of ((speed x) * (1.3)) ) ) + (1))\n        else\n            if <(speed x) > [0.5]> then\n                Walk (90) (speed x) max steep (([ceiling v] of ([abs v] of ((speed x) * (1.3)) ) ) + (1))\n            else\n                set [frame v] to [0]\n            end\n        end\n        broadcast (tick v) and wait\n    end\nend\n\ndefine Controls - Left and Right\nset [speed x v] to ((speed x) * (0.7))\nif <<key (a v) pressed?> or <key (left arrow v) pressed?>> then\n    change [speed x v] by (-1.5)\nend\nif <<key (d v) pressed?> or <key (right arrow v) pressed?>> then\n    change [speed x v] by (1.5)\nend\n\ndefine None\npoint in direction (direction)\nchange x by (speed)\nchange [frame v] by (([abs v] of (speed) ) / (8))\nset [slope v] to [0]\nGet Touching <(in platforrm) = [1]>\nrepeat until <<(slope) = (max steep)> or <(touch) = [0]>>\n    change y by (1)\n    change [slope v] by (1)\n    Get Touching <(in platforrm) = [1]>\nend\nif <(slope) = (max steep)> then\n    change x by ((0) - (speed))\n    change y by ((0) - (slope))\n    if <<(touch) = [1]> and <(in platforrm) = [1]>> then\n        set [in platforrm v] to [2]\n        Walk (direction) (speed) max steep (max steep)\n        if <(speed x) = [0]> then\n            set [in platforrm v] to [1]\n        end\n    else\n        if <<<key (w v) pressed?> and <([abs v] of (speed) ) > [3.5]>> and <(touch) > [1]>> then\n            set [speed x v] to ((-1.2) * (speed))\n            set [speed y v] to [11]\n            set [falling? v] to [6]\n            set [wall jump v] to [15]\n        else\n            set [speed x v] to [0]\n        end\n    end\nend\n\ndefine Controls - Jump, Crouch\nif <<key (w v) pressed?> or <key (up arrow v) pressed?>> then\n    if <<(jump key) = [0]> and <(falling?) < [3]>> then\n        set [speed y v] to [14]\n        set [falling? v] to [6]\n        set [jump key v] to [1]\n    end\nelse\n    set [jump key v] to [0]\nend\nif <<key (s v) pressed?> or <key (down arrow v) pressed?>> then\n    set [in platforrm v] to [2]\nend\n\ndefine Gravity\nif <<(speed y) < [4]> or <<key (w v) pressed?> or <key (up arrow v) pressed?>>> then\n    change [speed y v] by (-1)\nelse\n    change [speed y v] by (-2)\nend\nchange y by (speed y)\nchange [falling? v] by (1)\n\ndefine Check Hit Ceiling / Floor <>\nGet Touching <not >\nif <(touch) = [0]> then\n    set [in platforrm v] to [1]\nelse\n    if <<up?> and <(touch) = [1]>> then\n        set [in platforrm v] to [2]\n    end\nend\nrepeat until <(touch) < (in platforrm)>\n    if <up?> then\n        change y by (-1)\n    else\n        change y by (1)\n        set [falling? v] to [0]\n    end\n    Get Touching <not <up?>>\n    set [speed y v] to [0]\nend\n\ndefine Get Touching <>\nif <touching (actual level v)?> then\n    set [touch v] to [9]\nelse\n    if <<check platform?> and <touching (platforms v)?>> then\n        set [touch v] to [1]\n    else\n        set [touch v] to [0]\n    end\nend\n\ndefine Reset Level\nset [level v] to [0]\nset size to (100) %\nset rotation style [left-right v]\ngo to x: (-171) y: (107)\nreset timer\nshow\nset [speed x v] to [0]\nset [speed y v] to [0]\nset [falling? v] to [10]\nset [in platforrm v] to [1]\nset [frame v] to [0]\nset [wall jump v] to [0]\n\nwhen flag clicked\nbroadcast (Green Flag clicked v)\n\nwhen I receive [green flag clicked v]\nforever\n    if <not <(Freeze Bob) = [1]>> then\n        if <[235 ] < (x position)> then\n            change x by (-450)\n            change [level v] by (1)\n            broadcast (+1 v)\n        end\n        if <(x position) < [-235]> then\n            change x by (450)\n            change [level v] by (-1)\n            broadcast (-1 v)\n        end\n        if <<(Level) = [2]> and <touching (owwie v)?>> then\n            broadcast (Lava Level 2 v)\n            broadcast (Restart Level v) and wait\n        end\n        if <touching (owwie v)?> then\n            broadcast (Restart Level v) and wait\n        end\n    end\nend\n\nwhen I receive [restart level v]\ngo to x: (-171) y: (100)\n\nwhen I receive [hideall v]\nhide\n\nwhen flag clicked\nset [freeze bob v] to [0]\n\nwhen I receive [stop all v]\nstop [other scripts in sprite v]\nstop [this script v]\n\nwhen this sprite clicked\nnext costume\n\nwhen flag clicked\nreset timer\n\nwhen [any v] key pressed\nreset timer\n\nwhen [space v] key pressed\n\nwhen [timer v] > (30)\nbroadcast (Wait... v)\nstop [this script v]\n\n@Actual Level\n\nwhen I receive [+1 v]\nnext costume\n\nwhen I receive [-1 v]\nswitch costume to ((costume [number v]) - (1))\n\nwhen I receive [green flag clicked v]\nshow\nswitch costume to (0 v)\ngo to x: (15) y: (-15)\n\nwhen I receive [hideall v]\nhide\n\nwhen I receive [stop all v]\nstop [other scripts in sprite v]\nstop [this script v]\n\n@Sprite2\n\nwhen I receive [slow mo pre v]\nshow\ngo to x: (0) y: (0)\ngo to [front v] layer\nswitch costume to (costume1 v)\nwait (4) seconds\nbroadcast (Slow mo replay v) and wait\nforever\n    hide\nend\n\nwhen flag clicked\nhide\n\nwhen I receive [hideall v]\nhide\n\nwhen I receive [betrayal v]\nshow\nset [other ending on v] to [1]\ngo to [front v] layer\nset [ghost v] effect to (0)\nswitch costume to (costume2 v)\nwait (0.1) seconds\nrepeat (25)\n    change [ghost v] effect by (4)\nend\nwait (3) seconds\nswitch costume to (costume3 v)\nset [ghost v] effect to (0)\nwait (1) seconds\nrepeat (4)\n    next costume\n    wait (5) seconds\nend\nhide\nbroadcast (Betrayal Ending v)\nstop [this script v]\n\nwhen I receive [stop all v]\nstop [other scripts in sprite v]\nstop [this script v]\n\nwhen I receive [stop all v]\nstop [other scripts in sprite v]\nstop [this script v]\n\n@Fallfail replay\n\nwhen I receive [slow mo replay v]\nset [other ending on v] to [1]\nwait (0.1) seconds\nstart sound [The Princes Tale  v]\nshow\ngo to x: (0) y: (5)\nset size to (100) %\nbroadcast (Hideall v)\nswitch costume to (+10 v)\nrepeat (20)\n    wait (0.2) seconds\n    next costume\nend\nset size to (140) %\nrepeat (20)\n    wait (0.25) seconds\n    change y by (3)\n    next costume\nend\nrepeat (20)\n    wait (0.25) seconds\n    next costume\nend\nset size to (100) %\nwait (5) seconds\nstop all sounds\nstart sound [Rebel Theme v]\nrepeat (4)\n    next costume\n    wait (4) seconds\nend\nrepeat (3)\n    next costume\n    wait (3) seconds\nend\nforever\n    play sound [Rebel Theme v] until done\nend\n\nbroadcast (Slow mo replay v)\n\nwhen flag clicked\nhide\n\nwhen I receive [slow mo replay v]\n\nwhen I receive [stop all v]\nstop [other scripts in sprite v]\nstop [this script v]\n\n@Betrayal Ending2\n\nwhen flag clicked\nhide\n\nwhen I receive [betrayal ending v]\nshow\ngo to x: (0) y: (0)\nset [other ending on v] to [1]\ngo to [front v] layer\nswitch costume to (costume1 v)\nwait (1) seconds\nnext costume\nwait (1) seconds\nnext costume\nstop all sounds\nwait (0.1) seconds\nbroadcast (Stop Music v)\nforever\n    play sound [Star-Wars-The-Force-Awakens-Kylo-Rens-Suite v] until done\nend\n\nwhen I receive [stop all v]\nstop [other scripts in sprite v]\nstop [this script v]\n\nset [other ending on v] to [1]\n\n@Enemy                         ?\n\nwhen I receive [show enemy? v]\nswitch costume to (costume1 v)\ngo to x: (54) y: (-34)\nshow\nforever\n    if <touching (bob v)?> then\n        switch costume to (costume2 v)\n    else\n        switch costume to (costume1 v)\n    end\nend\n\nwhen flag clicked\nhide\nforever\n    if <<touching (bob v)?> and <key (t v) pressed?>> then\n        set [freeze bob v] to [1]\n        say [Wait!] for (1) seconds\n        say [I'm not your enemy!] for (3) seconds\n        say [The narrator trapped me here!] for (3) seconds\n        say [I used to be just like you...] for (3) seconds\n        say [Join me, and we can escape this prison!] for (4) seconds\n        say [Press J to join me, and L to leave me...] for (4) seconds\n    end\n    if <<touching (bob v)?> and <key (j v) pressed?>> then\n        say [Quick, let's get out of-] for (2) seconds\n        broadcast (Betrayal v)\n        hide\n        stop [this script v]\n    end\n    if <<touching (bob v)?> and <key (l v) pressed?>> then\n        set [freeze bob v] to [0]\n        hide\n        stop [this script v]\n    end\nend\n\nwhen flag clicked\nforever\n    if <(Level) = [14]> then\n        hide\n    end\nend\n\nwhen I receive [stop all v]\nstop [other scripts in sprite v]\nstop [this script v]\n\nwhen flag clicked\nhide\n\n@Owwie\n\nwhen I receive [-1 v]\nswitch costume to ((costume [number v]) - (1))\n\nwhen I receive [+1 v]\nnext costume\n\nwhen I receive [green flag clicked v]\nshow\nswitch costume to (0 v)\ngo to x: (15) y: (-15)\n\nwhen I receive [hideall v]\nhide\n\nwhen I receive [restart level v]\nif <(Level) = [10]> then\n    broadcast (Slow mo pre v)\n    wait until \nelse\nend\n\nwhen I receive [stop all v]\nstop [other scripts in sprite v]\nstop [this script v]\n\n@Thumbnail\n\nwhen flag clicked\nhide\n\nwhen I receive [thumbnail v]\nshow\ngo to [front v] layer\n\n@Cover\n\nwhen I receive [+1 v]\nnext costume\n\nwhen I receive [-1 v]\nswitch costume to ((costume [number v]) - (1))\n\nwhen I receive [green flag clicked v]\nshow\nswitch costume to (0 v)\ngo to [front v] layer\ngo to x: (0) y: (0)\n\nwhen I receive [hideall v]\nhide\n\nwhen I receive [stop all v]\nstop [other scripts in sprite v]\nstop [this script v]\n\n@Narrator\n\nwhen flag clicked\nswitch costume to (0 v)\nset [narrator part v] to [0]\nshow\n\nwhen I receive [+1 v]\nif  then\n    switch costume to (+1 v)\nelse\n    change [narrator part v] by (1)\n    next costume\nend\n\nwhen I receive [-1 v]\nif  then\n    switch costume to (-1 v)\nelse\n    change [narrator part v] by (-1)\n    switch costume to ((costume [number v]) - (1))\nend\n\nwhen I receive [lava level 2 v]\n\nwhen flag clicked\nwait until <(costume [number v]) = [14]>\nbroadcast (Dramatic music v)\nwait until <(costume [number v]) = [17]>\nbroadcast (Stop dramatic music v)\n\nswitch costume to (+2-1 v)\n\nwhen I receive [hideall v]\nhide\n\nwhen flag clicked\nwait until <(Level) = [13]>\nbroadcast (Show enemy? v)\nstop [this script v]\n\nwhen I receive [stop all v]\nstop [other scripts in sprite v]\nstop [this script v]\n\n@Sounds\n\nwhen flag clicked\nstop all sounds\nforever\n    play sound [The Beginning of the End.mp3 v] until done\nend\n\nwhen I receive [dramatic music v]\nstop [other scripts in sprite v]\nforever\n    play sound [Star Wars Imperial march v] until done\nend\n\nwhen I receive [stop dramatic music v]\nstop [other scripts in sprite v]\nforever\n    play sound [The Beginning of the End.mp3 v] until done\nend\n\nwhen I receive [slow mo replay v]\nstop [other scripts in sprite v]\nstop all sounds\n\nbroadcast (+1 v)\n\nwhen I receive [stop music v]\nstop [other scripts in sprite v]\nstop all sounds\n\nwhen I receive [stop all v]\nstop [other scripts in sprite v]\nstop [this script v]\n\n@Arrow Keys????\n\nwhen flag clicked\nhide\n\nwhen flag clicked\nwait (2) seconds\nswitch costume to (costume1 v)\nwait until <<key (down arrow v) pressed?> or <<key (up arrow v) pressed?> or <<key (left arrow v) pressed?> or <key (right arrow v) pressed?>>>>\nset [freeze bob v] to [1]\nset [other ending on v] to [1]\nshow\nset [ghost v] effect to (0)\ngo to [front v] layer\nwait (3) seconds\nrepeat (10)\n    change [ghost v] effect by (10)\nend\nset [freeze bob v] to [0]\nrepeat (7)\n    wait (1) seconds\n    wait until <<key (down arrow v) pressed?> or <<key (up arrow v) pressed?> or <<key (left arrow v) pressed?> or <key (right arrow v) pressed?>>>>\n    set [freeze bob v] to [1]\n    show\n    set [ghost v] effect to (0)\n    next costume\n    go to [front v] layer\n    wait (5) seconds\n    repeat (10)\n        change [ghost v] effect by (10)\n    end\n    set [freeze bob v] to [0]\nend\nwait until <<key (down arrow v) pressed?> or <<key (up arrow v) pressed?> or <<key (left arrow v) pressed?> or <key (right arrow v) pressed?>>>>\nshow\nset [ghost v] effect to (0)\nswitch costume to (costume9 v)\nbroadcast (Stop Music v)\nbroadcast (Stop all v)\nplay sound [John Williams - The Jedi Steps and Finale \(Audio Only\).mp4 v] until done\n\n@Awkward ending\n\nwhen I receive [wait... v]\nshow\nwait (100) seconds\nif <(Other ending on) = [0]> then\n    go to [front v] layer\n    set [ghost v] effect to (0)\n    switch costume to (costume1 v)\n    wait (3) seconds\n    repeat (25)\n        change [ghost v] effect by (4)\n    end\n    wait (1) seconds\n    if <not <key (any v) pressed?>> then\n        set [ghost v] effect to (0)\n        switch costume to (costume2 v)\n        wait (3) seconds\n        repeat (25)\n            change [ghost v] effect by (4)\n        end\n        wait (1) seconds\n        if <not <key (any v) pressed?>> then\n            set [ghost v] effect to (0)\n            switch costume to (costume3 v)\n            wait (3) seconds\n            repeat (25)\n                change [ghost v] effect by (4)\n            end\n            wait (1) seconds\n            if <not <key (any v) pressed?>> then\n                set [ghost v] effect to (0)\n                switch costume to (costume4 v)\n                wait (3) seconds\n                repeat (25)\n                    change [ghost v] effect by (4)\n                end\n                wait (1) seconds\n                if <not <key (any v) pressed?>> then\n                    set [ghost v] effect to (0)\n                    switch costume to (costume5 v)\n                    wait (3) seconds\n                    repeat (25)\n                        change [ghost v] effect by (4)\n                    end\n                    wait (1) seconds\n                    if <not <key (any v) pressed?>> then\n                        set [ghost v] effect to (0)\n                        switch costume to (costume6 v)\n                        wait (3) seconds\n                        repeat (25)\n                            change [ghost v] effect by (4)\n                        end\n                        wait (1) seconds\n                        if <not <key (any v) pressed?>> then\n                            set [ghost v] effect to (0)\n                            switch costume to (costume7 v)\n                            wait (3) seconds\n                            repeat (25)\n                                change [ghost v] effect by (4)\n                            end\n                            wait (1) seconds\n                            if <not <key (any v) pressed?>> then\n                                set [ghost v] effect to (0)\n                                switch costume to (costume8 v)\n                                wait (3) seconds\n                                repeat (25)\n                                    change [ghost v] effect by (4)\n                                end\n                                wait (1) seconds\n                                if <not <key (any v) pressed?>> then\n                                    set [ghost v] effect to (0)\n                                    switch costume to (costume9 v)\n                                    wait (3) seconds\n                                    repeat (25)\n                                        change [ghost v] effect by (4)\n                                    end\n                                    wait (1) seconds\n                                    if <not <key (any v) pressed?>> then\n                                        set [ghost v] effect to (0)\n                                        switch costume to (costume10 v)\n                                        wait (3) seconds\n                                        repeat (25)\n                                            change [ghost v] effect by (4)\n                                        end\n                                        wait (1) seconds\n                                        if <not <key (any v) pressed?>> then\n                                            set [ghost v] effect to (0)\n                                            switch costume to (costume11 v)\n                                            wait (3) seconds\n                                            repeat (25)\n                                                change [ghost v] effect by (4)\n                                            end\n                                            stop [all v]\n                                        end\n                                    end\n                                end\n                            end\n                        end\n                    end\n                end\n            end\n        end\n    end\nend\n\nwait (3) seconds\nswitch costume to (costume3 v)\nset [ghost v] effect to (0)\nwait (1) seconds\nrepeat (4)\n    next costume\n    wait (5) seconds\nend\nhide\nbroadcast (betrayal ending v)\nstop [this script v]\n\nbroadcast (thumbnail v)\n\nwhen flag clicked\nset [other ending on v] to [0]\nhide\n\n
無料なのでぜひフォローして下さい！\n《English》\ntap to move.\nIf you touch the slime, it will jump higher.\nplease press ❤️ and ⭐️\n\n《日本語》\nタップで操作\nスライムに触れると高くジャンプします。\n効果音がバグることがあります。すいません。\nその他のバグがあれば言ってください。\n\n誰かこの作品に❤️と⭐️押してくれる優しい方いらっしゃらないかな〜\n\n《credit》\n・オンラインスクロールプラットフォーマーのプログラム…@rimuorigami様　・キャラのコスチューム…@-firstwave-様　・地面、太陽、雲など、ブロックのコスチューム…@-Jikky-様　・音…@-Jikky-様　・サムネの文字…グリフパッチさん\nクレジットが足りない、もしくは間違えていると感じた方は言ってください。\n\n《タグ》\n#games #all #kosan-kabun #platformer