A scrolling Platformer〜plus〜

Instructions: part2\nhttps://scratch.mit.edu/projects/506488035\nつづきが欲しかったらほし、ハート、フォローおねがいします。\n傾向乗りたい\n乗れてたら教えて！！\n音声合成なのでいいかたがちがっても多めに見てください。\nintroで使っているものを工夫して入れました。\n傾向1ページ目\nゲームでは傾向1ページ目\nシリーズか決定しました。

@Stage\n\nwhen flag clicked\nswitch backdrop to (方眼用紙 v)\n\nwhen I receive [next v]\nif <[2] = (backdrop [number v])> then\n    switch backdrop to (ノート的な v)\nelse\n    switch backdrop to (方眼用紙 v)\nend\n\nswitch backdrop to (背景2 v) and wait\n\n@player\n\nwhen I receive [strat v]\nset [s x v] to [0]\nset [s y v] to [0]\nset [player x v] to [0]\nset [player y v] to [0]\nset [制御用 v] to [いいよ]\nforever\n    if <[いいよ] = (制御用)> then\n        if <<key (right arrow v) pressed?> or <<key (d v) pressed?> or <<(x position) < (mouse x)> and <mouse down?>>>> then\n            change [player x v] by (1)\n        end\n        if <<key (left arrow v) pressed?> or <<key (a v) pressed?> or <<(mouse x) < (x position)> and <mouse down?>>>> then\n            change [player x v] by (-1)\n        end\n        set [player x v] to ((.882) * (player x))\n        change x by (player x)\n        if <touching color (#000000)?> then\n            change y by (1)\n            if <touching color (#000000)?> then\n                change y by (1)\n                if <touching color (#000000)?> then\n                    change y by (1)\n                    if <touching color (#000000)?> then\n                        change y by (1)\n                        if <touching color (#000000)?> then\n                            change y by (1)\n                            if <touching color (#000000)?> then\n                                change y by (1)\n                                if <touching color (#000000)?> then\n                                    change y by (1)\n                                    if <touching color (#000000)?> then\n                                        change y by (1)\n                                        if <touching color (#000000)?> then\n                                            change y by (1)\n                                            if <touching color (#000000)?> then\n                                                change x by ((player x) * (-1))\n                                                change y by (-9)\n                                                if <<key (w v) pressed?> or <<<<mouse down?> and <(y position) < (mouse y)>> or <key (space v) pressed?>> or <key (up arrow v) pressed?>>> then\n                                                    if <(player x) > [0]> then\n                                                        set [player x v] to [-5]\n                                                        create clone of (ぽわわぁ v)\n                                                    else\n                                                        set [player x v] to [5]\n                                                        create clone of (ぽわわぁ v)\n                                                    end\n                                                    set [player y v] to [15]\n                                                else\n                                                    set [player x v] to [0]\n                                                end\n                                            end\n                                        end\n                                    end\n                                end\n                            end\n                        end\n                    end\n                end\n            end\n        end\n        change [player y v] by (-1)\n        change y by (player y)\n        if <touching color (#000000)?> then\n            change y by ((-1) * (player y))\n            set [player y v] to [0]\n        end\n        change y by (-1)\n        if <touching color (#000000)?> then\n            if <<key (w v) pressed?> or <<<<mouse down?> and <(y position) < (mouse y)>> or <key (space v) pressed?>> or <key (up arrow v) pressed?>>> then\n                set [player y v] to [13]\n                create clone of (ぽわわぁ v)\n            end\n        end\n        change y by (1)\n        change [s x v] by ((x position) * (-1))\n        change [s y v] by ((y position) * (-1))\n        go to x: (0) y: (0)\n        if <<touching color (#549a10)?> or <touching color (#0077ff)?>> then\n            set [player x v] to [0]\n            set [player y v] to [0]\n            set [s x v] to [0]\n            set [s y v] to [0]\n            if <not <[さいご] = ([costume # v] of [地面 v])>> then\n                broadcast (next v)\n            end\n        end\n        if <touching color (#ff0000)?> then\n            set [player x v] to [0]\n            set [player y v] to [0]\n            start sound [死んだ時の音 v]\n            set [s x v] to [0]\n            set [s y v] to [0]\n        end\n    end\nend\n\nwhen I receive [イントロ v]\nshow\nset language to ((language::translate) v)::tts\nset voice to (alto v)::tts\nspeak (join [こんにちは] (join (username) [さん]))::tts\nsay (translate (join [こんにちは] (join (username) [さん])) to ((language::translate) v)::translate) for (1) seconds\nspeak [タップや矢印キーでうごくよ]::tts\nsay (translate [タップや矢印キーでうごくよ] to ((language::translate) v)::translate) for (1) seconds\nsay (translate [WASDでもうごくよ] to ((language::translate) v)::translate) for (1) seconds\nspeak [旗に向かって走ろう！！]::tts\nsay (translate [旗に向かって走ろう！！] to ((language::translate) v)::translate) for (1) seconds\nspeak [トゲに触れたり落ちたりしないように進もう！！]::tts\nsay (translate [トゲに触れたり落ちたりしないように進もう！！] to ((language::translate) v)::translate) for (1) seconds\nspeak [黄色は大ジャンプ]::tts\nsay (translate [黄色は大ジャンプ] to ((language::translate) v)::translate) for (1) seconds\nspeak [はじめてだからステージはとても少ないよ]::tts\nsay (translate [はじめてだからステージはとても少ないよ] to ((language::translate) v)::translate) for (1) seconds\nspeak [楽しんで]::tts\nsay (translate [楽しんで] to ((language::translate) v)::translate) for (1) seconds\nsay (translate [クレジット:scratchkazuma2020 rednao pokosuke0825 turtle_keimu  S_O_Ahiru] to ((language::translate) v)::translate) for (2.5) seconds\nforever\n    if <not <[さいご] = ([costume name v] of [地面 v])>> then\n        set language to ((language::translate) v)::tts\n        if <not <[さいご] = ([costume name v] of [地面 v])>> then\n            speak [こんにちは]::tts\n        end\n        if <not <[さいご] = ([costume name v] of [地面 v])>> then\n            say (translate (join [こんにちは] (join (username) [さん])) to ((language::translate) v)::translate) for (2) seconds\n        end\n        if <not <[さいご] = ([costume name v] of [地面 v])>> then\n            speak [旗へ向かおう]::tts\n        end\n        if <not <[さいご] = ([costume name v] of [地面 v])>> then\n            say (translate [旗に向かって走ろう！！] to ((language::translate) v)::translate) for (2) seconds\n        end\n        if <not <[さいご] = ([costume name v] of [地面 v])>> then\n            say (translate [遊んでくれてありがとう。フォロー&⭐︎&♡おねがい] to ((language::translate) v)::translate)\n            speak (translate [遊んでくれてありがとう。フォロー&ほし&ハートおねがい] to ((language::translate) v)::translate)::tts\n        end\n    else\n    end\nend\n\nwhen I receive [イントロ v]\nbroadcast (strat v)\n\nwhen I receive [イントロ v]\nforever\n    if <(player y) = [13]> then\n        start sound [ジャンプ v]\n    end\n    if <touching color (#ffea00)?> then\n        create clone of (ぽわわぁ v)\n        change y by (() - (player y))\n        set [player y v] to [0]\n        set [player y v] to [18]\n        change [s y v] by (-20)\n    end\nend\n\nwhen flag clicked\nhide\n\nwhen flag clicked\ngo to x: (0) y: (0)\n\nwhen I receive [アウトロ v]\nforever\n    hide\nend\n\nwhen I receive [アウトロ v]\nset volume to (0) %\n\nwhen I receive [アウトロ v]\nset volume to (0) %\n\nwhen I receive [アウトロ v]\nforever\n    set volume to (0) %\nend\n\nwhen flag clicked\nset volume to (100) %\n\n@スプライト1\n\nwhen I receive [next v]\nset [制御用 v] to [だめ]\ncreate clone of (_myself_ v)\n\nwhen I start as a clone\nshow\ngo to x: (600) y: ()\nrepeat (33)\n    go to [front v] layer\n    change x by ((() - (x position)) / (10))\nend\nstart sound [High Whoosh v]\nrepeat (20)\n    go to [front v] layer\n    change x by (((-600) - (x position)) / (10))\nend\nbroadcast (strat v)\nset [制御用 v] to [いいよ]\ndelete this clone\n\nwhen I start as a clone\nforever\n    go to [front v] layer\nend\n\nwhen flag clicked\nforever\n    hide\nend\n\nwhen I receive [イントロ v]\nset [player x v] to [0]\nset [player y v] to [0]\nset [s x v] to [0]\nset [s y v] to [0]\n\nwhen I start as a clone\nplay sound [High Whoosh v] until done\n\nwhen I start as a clone\nplay sound [High Whoosh v] until done\n\nwhen I start as a clone\nplay sound [High Whoosh v] until done\n\nwhen I start as a clone\nplay sound [High Whoosh v] until done\n\nwhen I start as a clone\nplay sound [High Whoosh v] until done\n\nwhen I start as a clone\nplay sound [High Whoosh v] until done\n\nwhen I start as a clone\nplay sound [High Whoosh v] until done\n\nwhen I start as a clone\nplay sound [High Whoosh v] until done\n\nwhen I start as a clone\nplay sound [High Whoosh v] until done\n\nwhen I start as a clone\nplay sound [High Whoosh v] until done\n\nwhen I start as a clone\nplay sound [High Whoosh v] until done\n\nwhen I start as a clone\nplay sound [High Whoosh v] until done\n\nwhen I start as a clone\nplay sound [High Whoosh v] until done\n\nwhen I start as a clone\nplay sound [High Whoosh v] until done\n\nwhen I start as a clone\nplay sound [High Whoosh v] until done\n\nwhen I start as a clone\nplay sound [High Whoosh v] until done\n\nwhen I receive [アウトロ v]\nforever\n    set volume to (0) %\nend\n\nwhen flag clicked\nset volume to (100) %\n\n@スプライト3\n\nwhen I receive [イントロ v]\nshow\ngo to x: (-92) y: (180)\nforever\n    go to [front v] layer\n    show\n    point in direction (90)\n    set [1 v] to [0]\n    repeat (20)\n        change [1 v] by ((360) / (20))\n        change y by (((164.8) - (y position)) / (4.5))\n        turn right (([sin v] of (1) ) * (1.2)) degrees\n    end\n    repeat (20)\n        change [1 v] by ((360) / (20))\n        change y by (((200) - (y position)) / (4.5))\n        turn right (([sin v] of (1) ) * (-1.2)) degrees\n    end\n    hide\nend\n\nwhen I receive [イントロ v]\nbroadcast (strat v)\n\nwhen flag clicked\nwait (10.2) seconds\nbroadcast (イントロ v)\n\nwhen flag clicked\nhide\n\nwhen I receive [アウトロ v]\nforever\n    hide\nend\n\nwhen I receive [アウトロ v]\nset volume to (0) %\n\nwhen I receive [アウトロ v]\nforever\n    set volume to (0) %\nend\n\nwhen flag clicked\nset volume to (100) %\n\n@intro\n\nwhen flag clicked\nset size to (100) %\nset [! v] to [0]\nreset timer\ngo to x: (0) y: (0)\nhide\nstart sound [Syn_Cole_-_Feel_Good_NCS_Release-q1ULJ92aldE v]\nswitch costume to (background v)\ncreate clone of (_myself_ v)\nswitch costume to (icon v)\ncreate clone of (_myself_ v)\nswitch costume to (background3 v)\ncreate clone of (_myself_ v)\nwait until <(timer) > [2.1]>\nピャー\nswitch costume to (name v)\ncreate clone of (_myself_ v)\nswitch costume to (name2 v)\ncreate clone of (_myself_ v)\nswitch costume to (name3 v)\ncreate clone of (_myself_ v)\nswitch costume to (background2 v)\ncreate clone of (_myself_ v)\nwait until <[5.9] < (timer)>\nピャー\nswitch costume to (指示1 v)\ncreate clone of (_myself_ v)\nswitch costume to (指示2 v)\ncreate clone of (_myself_ v)\n\nwhen I start as a clone\nif <(costume [number v]) = [2]> then\n    set size to (100) %\n    show\n    wait until <[9.5] < (timer)>\n    delete this clone\nend\nif <(costume [number v]) = [3]> then\n    set size to (100) %\n    show\n    go to x: (0) y: (-480)\n    repeat (30)\n        change y by (((480) - (y position)) / (20))\n    end\n    delete this clone\nend\nif <(costume [number v]) = [1]> then\n    show\n    go to [front v] layer\n    go to x: (0) y: (-240)\n    set size to (60) %\n    wait until <[1.6] < (timer)>\n    point in direction (15)\n    repeat until <[80] < (y position)>\n        change y by (((100) - (y position)) / (5))\n    end\n    set size to (60) %\n    set [! v] to [0]\n    repeat (40)\n        change y by (((40) - (y position)) / (3))\n        turn right (((90) - (direction)) / (3)) degrees\n        change size by (!)\n        set [! v] to (((!) * (0.8)) + (((120) - (size)) / (4)))\n    end\n    wait until <[5.9] < (timer)>\n    set size to (200) %\n    repeat (40)\n        change size by (!)\n        set [! v] to (((!) * (0.8)) + (((120) - (size)) / (4)))\n    end\n    wait until <[9.5] < (timer)>\n    delete this clone\nend\nif <<<(costume [number v]) = [4]> or <(costume [number v]) = [5]>> or <(costume [number v]) = [6]>> then\n    show\n    set size to (pick random (120) to (150)) %\n    set [! v] to (pick random (-15) to (15))\n    set [" v] to (pick random (5) to (17))\n    repeat until <<([abs v] of (x position) ) > [270]> or <([abs v] of (y position) ) > [210]>>\n        change x by (!)\n        change y by (")\n        if <[1] < (!)> then\n            change [! v] by (-0.2)\n        end\n        if <(!) < [-1]> then\n            change [! v] by (0.2)\n        end\n        turn right ((costume [number v]) * (3)) degrees\n        change [" v] by (-1)\n    end\n    delete this clone\nend\nif <(costume [number v]) = [7]> then\n    go to [front v] layer\n    wait until <[4] < (timer)>\n    set [! v] to [0]\n    go to x: (-360) y: (-100)\n    show\n    set size to (120) %\n    set [ghost v] effect to (100)\n    repeat (40)\n        change x by (((0) - (x position)) / (6))\n        change [ghost v] effect by (-3)\n    end\n    repeat (135)\n        change [! v] by (12)\n        point in direction ((90) + (([sin v] of (!) ) * (10)))\n    end\n    wait until <[9.5] < (timer)>\n    delete this clone\nend\nif <(costume [number v]) = [8]> then\n    wait until <[8.2] < (timer)>\n    switch costume to (bar v)\n    set [! v] to [0]\n    repeat (4)\n        create clone of (_myself_ v)\n        change [! v] by (1)\n    end\n    wait until <[9.5] < (timer)>\n    delete this clone\nend\nif <(costume [number v]) = [9]> then\n    wait until <[8.2] < (timer)>\n    switch costume to (bar2 v)\n    set [! v] to [0]\n    repeat (4)\n        create clone of (_myself_ v)\n        change [! v] by (1)\n    end\n    wait until <[9.5] < (timer)>\n    delete this clone\nend\nif <(costume [number v]) = [10]> then\n    show\n    set [ghost v] effect to (100)\n    set size to (60) %\n    go to x: (((-210) + ((!) * (60))) - (60)) y: (0)\n    repeat (35)\n        go to [front v] layer\n        change size by (((100) - (size)) / (4))\n        change x by ((((-210) + ((!) * (60))) - (x position)) / (5))\n        change [ghost v] effect by (-5)\n    end\n    wait until <[10] < (timer)>\n    repeat (10)\n        change [ghost v] effect by (10)\n    end\n    delete this clone\nend\nif <(costume [number v]) = [11]> then\n    show\n    set [ghost v] effect to (100)\n    set size to (60) %\n    go to x: (((210) + ((!) * (-60))) - (60)) y: (0)\n    repeat (35)\n        go to [front v] layer\n        change size by (((100) - (size)) / (4))\n        change x by ((((210) + ((!) * (-60))) - (x position)) / (5))\n        change [ghost v] effect by (-5)\n    end\n    wait until <[10] < (timer)>\n    repeat (10)\n        change [ghost v] effect by (10)\n    end\n    delete this clone\nend\nif <(costume [number v]) = [12]> then\n    go to [front v] layer\n    show\n    go to x: (0) y: (180)\n    wait until <[1.8] < (timer)>\n    repeat (40)\n        change y by (((0) - (y position)) / (4))\n    end\n    wait until <[9.5] < (timer)>\n    delete this clone\nend\nif <(costume [number v]) = [13]> then\n    set size to (100) %\n    wait until <[2] < (timer)>\n    go to [front v] layer\n    show\n    wait (0.05) seconds\n    hide\n    wait until <[5.9] < (timer)>\n    show\n    wait (0.05) seconds\n    hide\n    delete this clone\nend\nif <(costume [number v]) = [14]> then\n    set size to (100) %\n    show\n    go to x: (0) y: (-480)\n    repeat (30)\n        change y by (((480) - (y position)) / (20))\n    end\n    delete this clone\nend\n\nwhen flag clicked\nrepeat (5)\n    wait (0.2) seconds\n    switch costume to (上に行くやつ v)\n    create clone of (_myself_ v)\nend\n\ndefine ピャー\nrepeat (30)\n    switch costume to (pick random (4) to (6))\n    create clone of (_myself_ v)\nend\n\nwhen flag clicked\nwait until <(timer) > [2.5]>\nrepeat (10)\n    wait (0.4) seconds\n    switch costume to (上に行くやつ2 v)\n    create clone of (_myself_ v)\nend\n\nwhen I receive [アウトロ v]\nset volume to (0) %\n\nwhen I receive [アウトロ v]\nforever\n    set volume to (0) %\nend\n\nwhen flag clicked\nset volume to (100) %\n\n@地面\n\nwhen I receive [strat v]\nset [s x v] to [0]\nset [s y v] to [0]\n\nwhen I receive [イントロ v]\nswitch costume to (コスチューム1 v)\n\nwhen I receive [next v]\nset [s x v] to [0]\nset [s y v] to [-30]\n\nwhen I receive [next v]\nwait (0.6) seconds\nnext costume\n\nwhen I receive [strat v]\nshow\nforever\n    go to x: (s x) y: (s y)\n    if <(player y) < [-40]> then\n        set [s y v] to [0]\n        set [s x v] to [0]\n        go to x: (s x) y: (s y)\n        hide\n    end\n    if <(player y) < [-110]> then\n        set [player x v] to [0]\n        set [player y v] to [0]\n        set [s y v] to [0]\n        set [s x v] to [0]\n        go to x: (s x) y: (s y)\n        if <[いいよ] = (制御用)> then\n            start sound [Crunch v]\n        end\n        show\n    end\nend\n\nwhen flag clicked\nswitch costume to (コスチューム1 v)\n\nwhen flag clicked\nhide\ngo to x: (0) y: (0)\n\nwhen flag clicked\nset [22 v] to [0]\nforever\n    if <[6] = (costume [number v])> then\n        change [22 v] by (1)\n        hide\n    end\nend\n\nwhen I receive [アウトロ v]\nhide\nbroadcast (outro v)\n\nwhen flag clicked\nwait until <[0] < (22)>\nbroadcast (アウトロ v) and wait\n\nwhen I receive [アウトロ v]\nforever\n    set volume to (0) %\nend\n\nwhen flag clicked\nset volume to (100) %\n\n@ぽわわぁ\n\nwhen flag clicked\nforever\n    hide\n    go to (player v)\nend\n\nwhen I start as a clone\ngo to (player v)\nswitch costume to (コスチューム1 v)\nshow\nset size to (30) %\nset [ghost v] effect to (30)\ngo to [back v] layer\nrepeat (9)\n    set size to (50) %\n    next costume\n    set [ghost v] effect to (30)\n    go [backward v] (20) layers\nend\ndelete this clone\n\nwhen I receive [イントロ v]\nforever\n    play sound [Distrion & Electro-Light - Rubik \[NCS Release\].mp3 v] until done\n    play sound [Syn Cole - Feel Good v] until done\nend\n\nwhen I receive [アウトロ v]\nforever\n    hide\nend\n\nwhen I receive [アウトロ v]\nset volume to (0) %\n\nwhen I receive [アウトロ v]\nforever\n    set volume to (0) %\nend\n\nwhen flag clicked\nset volume to (100) %\n\n@outro\n\nwhen I receive [outro v]\nreset timer\nstart sound [Illenium - It's All On U ft v]\nClone [circle]\nWait [1.5]\nClone [partition]\nWait [2.75]\nClone [Background...?]\nWait [6.5]\nClone [square]\nWait [7]\nClone [square01]\n\ndefine Smooth Gide x: (x) y: (y) speed (spd)\nrepeat until <<(round (x)) = (round (x position))> and <(round (y)) = (round (y position))>>\n    change x by (((x) - (x position)) / (spd))\n    change y by (((y) - (y position)) / (spd))\nend\ngo to x: (x) y: (y)\n\ndefine Set Colors (color) (brightness) (ghost)\nset [color v] effect to (color)\nset [brightness v] effect to (brightness)\nset [ghost v] effect to (ghost)\n\ndefine Wait (timer)\nwait until <(timer) < (timer)>\n\ndefine Clone (id)\nset [id v] to (id)\ncreate clone of (_myself_ v)\n\nwhen I start as a clone\nif <(ID) = [circle]> then\n    show\n    switch costume to (circle v)\n    Set Colors [20] [0] [0]\n    Set Coordinates x: [-280] y: [0] direction: [90] size: [100]\n    Smooth Gide x: [0] y: [0] speed [6]\n    repeat (60)\n        switch costume to (size hack v)\n        change size by ((size) / (3))\n        switch costume to (circle v)\n    end\nelse\n    if <(ID) = [partition]> then\n        Clone [main]\n        show\n        switch costume to (partition v)\n        Set Colors [0] [0] [0]\n        Set Coordinates x: [407] y: [0] direction: [90] size: [100]\n        Smooth Gide x: [0] y: [0] speed [6]\n        Wait [2.3]\n        Smooth Gide x: [407] y: [0] speed [6]\n        repeat (10)\n            change [ghost v] effect by (10)\n        end\n        delete this clone\n    else\n        if <(ID) = [main]> then\n            show\n            go to [front v] layer\n            go [forward v] (1) layers\n            switch costume to (main v)\n            Set Colors [0] [0] [0]\n            Set Coordinates x: [-250] y: [60] direction: [100] size: [200]\n            Smooth Gide x: [-170] y: [60] speed [6]\n            Wait [2.7]\n            Smooth Gide x: [-284] y: [60] speed [3]\n            repeat (10)\n                change [brightness v] effect by (100)\n                change [ghost v] effect by (10)\n            end\n            delete this clone\n        else\n            if <(ID) = [Background...?]> then\n                Clone [Arrows]\n                show\n                go to [front v] layer\n                go [forward v] (100) layers\n                switch costume to (background...? v)\n                Set Colors [600] [0] [0]\n                Set Coordinates x: [0] y: [0] direction: [90] size: [100]\n                repeat (40)\n                    go to [front v] layer\n                    change [ghost v] effect by (2.5)\n                end\n                delete this clone\n            else\n                if <(ID) = [Arrows]> then\n                    Clone [bar]\n                    Set Colors [170] [0] [0]\n                    set size to (100) %\n                    switch costume to (arrows v)\n                    go to x: (0) y: (0)\n                    point in direction (90)\n                    set [ghost v] effect to (100)\n                    hide\n                    wait () seconds\n                    show\n                    go to [front v] layer\n                    go [backward v] (1) layers\n                    repeat (10)\n                        change [ghost v] effect by (-10)\n                        change x by (10)\n                    end\n                    repeat (3)\n                        go to x: (0) y: (0)\n                        glide (.25) secs to x: (100) y: (0)\n                    end\n                    repeat (3)\n                        go to x: (0) y: (0)\n                        glide (.15) secs to x: (100) y: (0)\n                    end\n                    repeat (3)\n                        go to x: (0) y: (0)\n                        glide (.1) secs to x: (100) y: (0)\n                    end\n                    repeat (13)\n                        go to x: (0) y: (0)\n                        glide (.05) secs to x: (100) y: (0)\n                    end\n                    Set Colors [0] [0] [0]\n                    wait (1) seconds\n                    delete this clone\n                else\n                    if <(ID) = [bar]> then\n                        Clone [-sts-]\n                        Set Colors [0] [-100] [100]\n                        Set Coordinates x: [0] y: [0] direction: [90] size: [100]\n                        switch costume to (bar v)\n                        show\n                        repeat (10)\n                            go to [front v] layer\n                            go [forward v] (5) layers\n                            change [ghost v] effect by (-10)\n                        end\n                        Wait [6.7]\n                        repeat (4)\n                            change [ghost v] effect by (25)\n                        end\n                        delete this clone\n                    else\n                        if <(ID) = [-sts-]> then\n                            Set Colors [0] [0] [0]\n                            Set Coordinates x: [0] y: [0] direction: [90] size: [3]\n                            switch costume to (bar v)\n                            show\n                            go to [front v] layer\n                            go [forward v] (200) layers\n                            set [s v] to [3]\n                            set size to (S) %\n                            repeat (92)\n                                go to [front v] layer\n                                switch costume to (-sts- v)\n                                set [s v] to (((S) * (.8)) + (((100) - (size)) / (5)))\n                                change size by (S)\n                                point in direction ((90) + ((3) * ([cos v] of ((timer) * (180)) )))\n                                point in direction ((10) * ([cos v] of (((timer) - (1)) * (200)) ))\n                            end\n                            point in direction (-1)\n                            Clone [white]\n                            repeat (20)\n                                change size by (5)\n                                set x to (pick random (-10) to (10))\n                                set y to (pick random (-10) to (10))\n                                change [brightness v] effect by (5)\n                            end\n                            repeat (4)\n                                change [ghost v] effect by (25)\n                            end\n                            delete this clone\n                        else\n                            if <(ID) = [square]> then\n                                switch costume to (square v)\n                                Set Colors [0] [0] [0]\n                                Set Coordinates x: [0] y: [-353] direction: [90] size: [100]\n                                go to [front v] layer\n                                go [forward v] (5000) layers\n                                show\n                                Smooth Gide x: [0] y: [0] speed [2]\n                                wait (0.3) seconds\n                                Smooth Gide x: [-470] y: [0] speed [2]\n                                repeat (4)\n                                    change [ghost v] effect by (25)\n                                end\n                                delete this clone\n                            else\n                                if <(ID) = [square01]> then\n                                    switch costume to (square v)\n                                    Set Colors [30] [0] [0]\n                                    Set Coordinates x: [0] y: [353] direction: [90] size: [100]\n                                    go to [front v] layer\n                                    go [forward v] (5000) layers\n                                    show\n                                    Smooth Gide x: [0] y: [0] speed [2]\n                                    Smooth Gide x: [479] y: [0] speed [2]\n                                    repeat (4)\n                                        change [ghost v] effect by (25)\n                                    end\n                                    delete this clone\n                                else\n                                    if <(ID) = [white]> then\n                                        switch costume to (white v)\n                                        Set Colors [0] [0] [25]\n                                        Set Coordinates x: [0] y: [0] direction: [90] size: [100]\n                                        go to [back v] layer\n                                        go [forward v] (6) layers\n                                        show\n                                        repeat (20)\n                                            change [brightness v] effect by (5)\n                                            change [ghost v] effect by (3.75)\n                                        end\n                                        delete this clone\n                                    else\n                                        if < (ID) contains [100]?> then\n                                            if <(ID) = [1001]> then\n                                                switch costume to (item 1 v)\n                                            end\n                                            if <(ID) = [1002]> then\n                                                switch costume to (item 2 v)\n                                            end\n                                            if <(ID) = [1003]> then\n                                                switch costume to (item 3 v)\n                                            end\n                                            if <(ID) = [1004]> then\n                                                switch costume to (item 4 v)\n                                            end\n                                            point in direction (pick random (-180) to (180))\n                                            clear graphic effects\n                                            set size to (pick random (25) to (50)) %\n                                            show\n                                            if <(pick random (1) to (2)) = [1]> then\n                                                go to x: (-230) y: (-300)\n                                                set [dir 2 v] to (pick random (20) to (25))\n                                                change [dir 1 v] by (pick random (0) to (30))\n                                            else\n                                                go to x: (230) y: (-300)\n                                                set [dir 2 v] to (pick random (20) to (25))\n                                                change [dir 1 v] by (pick random (-30) to (0))\n                                            end\n                                            repeat until <not <touching (_edge_ v)?>>\n                                                turn right (4) degrees\n                                                change [ghost v] effect by (2)\n                                                change [dir 2 v] by (-1)\n                                                change y by (Dir 2)\n                                                set [dir 1 v] to ((Dir 1) * (0.9))\n                                                change x by (Dir 1)\n                                            end\n                                            repeat until <touching (_edge_ v)?>\n                                                turn right (4) degrees\n                                                change [ghost v] effect by (2)\n                                                change [dir 2 v] by (-1)\n                                                change y by (Dir 2)\n                                                set [dir 1 v] to ((Dir 1) * (0.9))\n                                                change x by (Dir 1)\n                                            end\n                                            delete this clone\n                                        else\n                                            if <(ID) = [OC...?]> then\n                                                Clone [credits]\n                                                switch costume to (oc...? v)\n                                                Set Colors [0] [0] [0]\n                                                show\n                                                Set Coordinates x: [0] y: [-188] direction: [90] size: [90]\n                                                Smooth Gide x: [0] y: [-20] speed [3]\n                                                forever\n                                                    go to [front v] layer\n                                                    point in direction ((([cos v] of (((timer) - (2)) * (350)) ) * (25)) + (90))\n                                                    set y to (([abs v] of (([cos v] of (((timer) - (2)) * (350)) ) * (75)) ) + (-20))\n                                                end\n                                            else\n                                                if <(ID) = [credits]> then\n                                                    Clone [Projects]\n                                                    switch costume to (credits v)\n                                                    Set Colors [0] [0] [0]\n                                                    show\n                                                    Set Coordinates x: [140] y: [105] direction: [90] size: [100]\n                                                    go to [front v] layer\n                                                    go [backward v] (1) layers\n                                                    forever\n                                                        if <touching (mouse-pointer v)?> then\n                                                            Smooth Gide x: [0] y: [105] speed [6]\n                                                        else\n                                                            Smooth Gide x: [140] y: [105] speed [6]\n                                                        end\n                                                    end\n                                                else\n                                                    if <(ID) = [Projects]> then\n                                                        Clone [Plojects]\n                                                        switch costume to (project v)\n                                                        Set Colors [0] [0] [0]\n                                                        show\n                                                        Set Coordinates x: [-130] y: [0] direction: [90] size: [80]\n                                                        go to [front v] layer\n                                                        go [backward v] (1) layers\n                                                        forever\n                                                            if <touching (mouse-pointer v)?> then\n                                                                Smooth Size: [90] speed: [2]\n                                                                go to x: (-130) y: (0)\n                                                                point in direction (((-90) + ([tan v] of ((timer) * (90)) )) * (15))\n                                                                set y to ((25) * ([cos v] of (((timer) - (1)) * (200)) ))\n                                                                go [forward v] (1) layers\n                                                                if <mouse down?> then\n                                                                    replace item (1) of [costume url v] with []\n                                                                    wait () seconds\n                                                                    replace item (1) of [url v] with (join [https://scratch.mit.edu/projects/] (join (Costume URL) [/]))\n                                                                end\n                                                            else\n                                                                Smooth Size: [80] speed: [2]\n                                                                go to x: (-130) y: (0)\n                                                                point in direction (((-90) + ([tan v] of ((timer) * (90)) )) * (15))\n                                                                set y to ((25) * ([cos v] of (((timer) - (1)) * (200)) ))\n                                                                go [forward v] (1) layers\n                                                            end\n                                                        end\n                                                    else\n                                                        if <(ID) = [Plojects]> then\n                                                            delete all of [costume url v]\n                                                            wait () seconds\n                                                            Clone [Check This Out!]\n                                                            switch costume to (project2 v)\n                                                            Set Colors [0] [0] [0]\n                                                            show\n                                                            Set Coordinates x: [130] y: [0] direction: [90] size: [80]\n                                                            go to [front v] layer\n                                                            go [backward v] (1) layers\n                                                            forever\n                                                                if <touching (mouse-pointer v)?> then\n                                                                    Smooth Size: [90] speed: [2]\n                                                                    go to x: (130) y: (0)\n                                                                    point in direction ((((90) + ([tan v] of ((timer) * (90)) )) * (15)) * (-1))\n                                                                    set y to ((25) * ([cos v] of (((timer) - (1)) * (200)) ))\n                                                                    go [forward v] (1) layers\n                                                                    if <mouse down?> then\n                                                                        replace item (1) of [costume url v] with []\n                                                                        wait () seconds\n                                                                        replace item (1) of [url v] with (join [https://scratch.mit.edu/projects/] (join (Costume URL) [/]))\n                                                                    end\n                                                                else\n                                                                    Smooth Size: [80] speed: [2]\n                                                                    go to x: (130) y: (0)\n                                                                    point in direction ((((90) + ([tan v] of ((timer) * (90)) )) * (15)) * (-1))\n                                                                    set y to ((25) * ([cos v] of (((timer) - (1)) * (200)) ))\n                                                                    go [forward v] (1) layers\n                                                                end\n                                                            end\n                                                        else\n                                                            if <(ID) = [Check This Out!]> then\n                                                                Clone [URL]\n                                                                switch costume to (check this out! v)\n                                                                Set Colors [0] [0] [0]\n                                                                show\n                                                                Set Coordinates x: [0] y: [140] direction: [90] size: [80]\n                                                                go to [front v] layer\n                                                                go [backward v] (1) layers\n                                                                forever\n                                                                    set x to ((0) + (([tan v] of ((timer) * (100)) ) * (70)))\n                                                                end\n                                                            else\n                                                                if <(ID) = [URL]> then\n                                                                    switch costume to (url v)\n                                                                    Set Colors [0] [0] [0]\n                                                                    show\n                                                                    Set Coordinates x: [0] y: [0] direction: [90] size: [80]\n                                                                    go to [front v] layer\n                                                                    go [backward v] (1) layers\n                                                                    forever\n                                                                        if <<touching (mouse-pointer v)?> and <(mouse y) > [-180]>> then\n                                                                            set [yv v] to (((yv) * (.7)) + (((70) - (y position)) / (5)))\n                                                                            change y by (yv)\n                                                                            set [brightness v] effect to (5)\n                                                                            hide list [url v]\n                                                                        else\n                                                                            change y by (((0) - (y position)) / (5))\n                                                                            set [yv v] to (y position)\n                                                                            set [brightness v] effect to (0)\n                                                                            show list [url v]\n                                                                        end\n                                                                    end\n                                                                end\n                                                            end\n                                                        end\n                                                    end\n                                                end\n                                            end\n                                        end\n                                    end\n                                end\n                            end\n                        end\n                    end\n                end\n            end\n        end\n    end\nend\n\ndefine Set Coordinates x: (x) y: (y) direction: (d) size: (s)\ngo to x: (x) y: (y)\npoint in direction (d)\nset size to (s) %\n\ndefine Smooth Size: (s) speed: (spd)\nrepeat until <(round (s)) = (round (size))>\n    change size by (((s) - (size)) / (spd))\nend\nset size to (s) %\n\nwhen I receive [outro v]\nhide\n\nwhen I receive [outro v]\nswitch costume to (size hack v)\nhide\nforever\n    switch costume to (size hack v)\n    hide\nend\n\nwhen I receive [outro v]\nWait [7.3]\nClone [OC...?]\nwait () seconds\nforever\n    Clone (pick random (1001) to (1004))\nend\n\nwhen I receive [outro v]\nshow list [url v]\nwait () seconds\nshow list [costume url v]\nwait () seconds\ndelete all of [url v]\nwait () seconds\nadd [https://scratch.mit.edu/projects/506488035] to [url v]\nwait () seconds\ndelete all of [costume url v]\n\n