泥棒プラットフォーマー thief platformer
@Stage\n\nwhen I receive [intro end v]\nforever\n    play sound [Elektronomia - Energy v] until done\nend\n\nwhen I receive [intro end v]\nset [time v] to [0]\nrepeat until <([costume # v] of [ステージ v]) = [13]>\n    show variable [time v]\n    show variable [☁ 世界記録 world record v]\n    wait (1) seconds\n    change [time v] by (1)\nend\n\nwhen flag clicked\nhide variable [time v]\nhide variable [☁ 世界記録 world record v]\n\n@FREE INTRO\n\nwhen I start as a clone\nif <(Clone ID) = [Logo+Name]> then\n    point in direction (0)\n    hide\n    set [ghost v] effect to (0)\n    switch costume to (logo v)\n    go to x: (0) y: (0)\n    wait (.3) seconds\n    show\n    repeat (40)\n        go to [front v] layer\n        go [backward v] (2) layers\n        change size by (((130) - (size)) / (8))\n        turn right (((90) - (direction)) / (8)) degrees\n    end\n    set [i v] to [-1]\n    repeat (20)\n        go to [front v] layer\n        go [backward v] (1) layers\n        change size by ((I) / (3))\n        change [i v] by (join [-] (([abs v] of (I) ) / (4)))\n        turn right ((I) / (-3)) degrees\n    end\n    switch costume to (name v)\n    set size to (150) %\n    point in direction (90)\n    go to x: (0) y: (1000)\n    Smooth Glide x: [0] y: [0] speed: [4]\n    wait (1.2) seconds\n    repeat (100)\n        point in direction ((([sin v] of ((timer) * (350)) ) * (20)) + (90))\n        set y to ((([abs v] of ([sin v] of ((timer) * (360)) ) ) * (100)) + (-50))\n    end\n    Smooth Glide x: [0] y: [0] speed: [2]\n    go to [front v] layer\n    go [backward v] (2) layers\n    repeat (20)\n        switch costume to (size hack v)\n        change size by (300)\n        switch costume to (name v)\n    end\n    delete this clone\nend\n\nwhen flag clicked\nset [color v] effect to (0)\nswitch costume to (blank v)\nreset timer\nhide\nset [clone id v] to [Logo+Name]\ncreate clone of (_myself_ v)\nset [clone id v] to [Arrows]\ncreate clone of (_myself_ v)\nset [clone id v] to [Black1]\ncreate clone of (_myself_ v)\nset [clone id v] to [Black2]\ncreate clone of (_myself_ v)\nset [clone id v] to [End]\ncreate clone of (_myself_ v)\nset [clone id v] to [Background]\ncreate clone of (_myself_ v)\nset [clone id v] to [Arrow2]\ncreate clone of (_myself_ v)\nset [clone id v] to [Arrow1]\ncreate clone of (_myself_ v)\nExplode\nwait (14) seconds\n\nforever\n\ndefine Smooth Glide x: (x) y: (y) speed: (speed)\nrepeat until <<(round (x)) = (round (x position))> and <(round (y)) = (round (y position))>>\n    change x by (((x) - (x position)) / (speed))\n    change y by (((y) - (y position)) / (speed))\nend\ngo to x: (x) y: (y)\n\ndefine bounce finished size (size) bounciness (bounciness) elasticity (elasticity)\nset [size v] to [0]\nrepeat (40)\n    set [size v] to (((size) * (bounciness)) + (((size) - (size)) / (elasticity)))\n    change size by (size)\nend\n\ndefine Smooth Size: (size) speed: (speed)\nrepeat until <(round (size)) = (round (size))>\n    change size by (((size) - (size)) / (speed))\nend\nset size to (size) %\n\nwhen I start as a clone\nif <(Clone ID) = [Arrows]> then\n    point in direction (90)\n    wait (3) seconds\n    show\n    switch costume to (size hack v)\n    set size to (80) %\n    switch costume to (arrows v)\n    go to [back v] layer\n    go [forward v] (1) layers\n    set [ghost v] effect to (0)\n    go to x: (0) y: (-600)\n    set [clone y v] to [-360]\n    repeat (8)\n        change [clone y v] by (100)\n        repeat (14)\n            change y by (((Clone Y) - (y position)) / (6))\n            change [ghost v] effect by (-20)\n        end\n    end\n    repeat (6)\n        change [clone y v] by (100)\n        repeat (13)\n            change y by (((Clone Y) - (y position)) / (6))\n            change [ghost v] effect by (-20)\n        end\n    end\n    repeat (10)\n        change y by (((Clone Y) - (y position)) / (6))\n        change [ghost v] effect by (10)\n    end\n    delete this clone\nend\n\nwhen I start as a clone\nif <(Clone ID) = [Black1]> then\n    go to [front v] layer\n    switch costume to (black up v)\n    go [forward v] (100) layers\n    point in direction (90)\n    set size to (100) %\n    show\n    go to x: (0) y: (0)\n    Smooth Glide x: [0] y: [300] speed: [7]\n    wait (7.3) seconds\n    repeat (25)\n        change y by (3)\n        change [ghost v] effect by (4)\n    end\n    wait (.2) seconds\n    delete this clone\nend\n\nwhen I start as a clone\nif <(Clone ID) = [Black2]> then\n    set [ghost v] effect to (0)\n    go to [front v] layer\n    switch costume to (black down v)\n    go [forward v] (100) layers\n    point in direction (90)\n    set size to (100) %\n    show\n    go to x: (0) y: (0)\n    Smooth Glide x: [0] y: [-300] speed: [7]\n    wait (7.3) seconds\n    repeat (25)\n        change y by (-3)\n        change [ghost v] effect by (4)\n    end\n    wait (.2) seconds\n    delete this clone\nend\n\nwhen I start as a clone\nif <(Clone ID) = [End]> then\n    wait (8.2) seconds\n    go to [front v] layer\n    go [forward v] (5) layers\n    switch costume to (dot v)\n    set [ghost v] effect to (0)\n    point in direction (90)\n    go to x: (0) y: (-300)\n    show\n    set size to (120) %\n    set [1 v] to [35]\n    repeat until <[0] < (y position)>\n        change size by (((30) - (size)) / (8))\n        change [1 v] by (-2.1)\n        change y by (1)\n    end\n    repeat until <(y position) < [3]>\n        change size by (((30) - (size)) / (6))\n        change [1 v] by (-2.1)\n        change y by (1)\n    end\n    go to x: (0) y: (0)\n    repeat (50)\n        switch costume to (size hack v)\n        change size by (120)\n        switch costume to (dot v)\n    end\n    wait (.01) seconds\n    repeat (10)\n        change [ghost v] effect by (10)\n    end\n    delete this clone\nend\n\nwhen I start as a clone\nif <(Clone ID) = [Background]> then\n    wait (2.3) seconds\n    go to [front v] layer\n    go [forward v] (5) layers\n    switch costume to (back dot v)\n    point in direction (90)\n    go to x: (0) y: (-300)\n    show\n    set size to (120) %\n    set [1 v] to [35]\n    repeat until <[0] < (y position)>\n        change size by (((30) - (size)) / (8))\n        change [1 v] by (-2.1)\n        change y by (1)\n    end\n    repeat until <(y position) < [3]>\n        change size by (((30) - (size)) / (6))\n        change [1 v] by (-2.1)\n        change y by (1)\n    end\n    go to x: (0) y: (0)\n    go to [back v] layer\n    repeat (20)\n        switch costume to (size hack v)\n        change size by (120)\n        switch costume to (back dot v)\n    end\n    wait (7) seconds\n    delete this clone\nend\n\nwhen I start as a clone\nif <(Clone ID) = [Arrow2]> then\n    go to [front v] layer\n    switch costume to (size hack v)\n    go [backward v] (2) layers\n    point in direction (90)\n    set size to (100) %\n    switch costume to (blue2 v)\n    go to x: (0) y: (0)\n    wait (4.5) seconds\n    show\n    repeat (2)\n        show\n        repeat (20)\n            switch costume to (size hack v)\n            change x by (-25)\n            switch costume to (blue2 v)\n        end\n        hide\n        set size to (100) %\n        wait (.8) seconds\n        go to x: (0) y: (0)\n    end\n    delete this clone\nend\n\nwhen I start as a clone\nif <(Clone ID) = [Arrow1]> then\n    go to [front v] layer\n    switch costume to (size hack v)\n    go [backward v] (2) layers\n    point in direction (90)\n    set size to (100) %\n    switch costume to (blue v)\n    go to x: (0) y: (0)\n    wait (4.5) seconds\n    show\n    repeat (2)\n        show\n        repeat (20)\n            switch costume to (size hack v)\n            change x by (25)\n            switch costume to (blue v)\n        end\n        hide\n        set size to (100) %\n        wait (.8) seconds\n        go to x: (0) y: (0)\n    end\n    delete this clone\nend\n\nwhen I start as a clone\nif <(Clone ID) = [Circle]> then\n    hide\n    clear graphic effects\n    switch costume to (costume1 v)\n    go to [front v] layer\n    go [backward v] (2) layers\n    set size to (0) %\n    show\n    repeat (5)\n        change size by (((120) - (size)) / (5))\n    end\n    repeat (11)\n        next costume\n        change size by (((120) - (size)) / (5))\n        change [ghost v] effect by (10)\n    end\n    delete this clone\nend\n\nwhen flag clicked\ngo to x: (0) y: (0)\nhide\nwait (4.75) seconds\nforever\n    repeat (2)\n        set [clone id v] to [Circle]\n        go to x: (0) y: (0)\n        create clone of (_myself_ v)\n        wait (.6) seconds\n    end\n    wait (.4) seconds\n    set [clone id v] to [Circle]\n    go to x: (0) y: (0)\n    create clone of (_myself_ v)\n    wait (12.4) seconds\nend\n\ndefine Explode\ngo to x: (0) y: (0)\nset [clone id v] to [Explode]\nset [clone x v] to [100]\nset [clone y v] to [100]\ncreate clone of (_myself_ v)\nset [clone id v] to [Explode]\nset [clone x v] to [100]\nset [clone y v] to [-100]\ncreate clone of (_myself_ v)\nset [clone id v] to [Explode]\nset [clone x v] to [-100]\nset [clone y v] to [100]\ncreate clone of (_myself_ v)\nset [clone id v] to [Explode]\nset [clone x v] to [-100]\nset [clone y v] to [-100]\ncreate clone of (_myself_ v)\n\nwhen I start as a clone\nif <(Clone ID) = [Explode]> then\n    hide\n    clear graphic effects\n    switch costume to (explode v)\n    go to [front v] layer\n    go [backward v] (2) layers\n    set size to (100) %\n    go to x: (Clone X) y: (Clone Y)\n    wait (6) seconds\n    show\n    set size to (0) %\n    repeat (5)\n        change size by (((120) - (size)) / (5))\n    end\n    repeat (11)\n        change size by (((120) - (size)) / (5))\n        change [ghost v] effect by (10)\n    end\n    delete this clone\nend\n\nwhen flag clicked\nset [screenshake_x v] to [0]\nset [screenshake_y v] to [0]\n\ndefine Move with ScreenShake | amount (0 to 1) (amount)\nforever\n    change x by (((_lastSCX) * (-1)) * (amount))\n    change y by (((_lastSCY) * (-1)) * (amount))\n    set [_lastscx v] to (ScreenShake_X)\n    set [_lastscy v] to (ScreenShake_Y)\n    change x by ((_lastSCX) * (amount))\n    change y by ((_lastSCY) * (amount))\nend\n\ndefine Screen Shake | strengthX (strengthx) strengthY (strengthy) interval (interval) duration (duration)\nset [_screenshake_starttime v] to (timer)\nset [screenshake_x v] to ((((pick random (0) to (1)) * (2)) - (1)) * (strengthx))\nset [screenshake_y v] to ((((pick random (0) to (1)) * (2)) - (1)) * (strengthy))\nset [_screenshake_lasttime v] to (timer)\nrepeat until <(timer) > ((_screenShake_startTime) + (duration))>\n    wait ((interval) - ((timer) - (_screenShake_lastTime))) seconds\n    set [_screenshake_fraction v] to ((1) - (((timer) - (_screenShake_startTime)) / (duration)))\n    set [screenshake_x v] to ((((ScreenShake_X) / ([abs v] of (ScreenShake_X) )) * (-1)) * ((_screenShake_fraction) * ((pick random (0.7) to (1.2)) * (strengthx))))\n    set [screenshake_y v] to ((((ScreenShake_Y) / ([abs v] of (ScreenShake_Y) )) * (-1)) * ((_screenShake_fraction) * ((pick random (0.7) to (1.2)) * (strengthy))))\n    set [_screenshake_lasttime v] to (timer)\nend\nset [screenshake_x v] to [0]\nset [screenshake_y v] to [0]\n\nwhen flag clicked\nwait (6) seconds\nforever\n    repeat (10)\n        set [animate v] to [26]\n        wait (0) seconds\n        set [animate v] to [28]\n        wait (0) seconds\n        set [animate v] to [29]\n        wait (0) seconds\n        set [animate v] to [30]\n        wait (0) seconds\n        set [animate v] to [29]\n        wait (0) seconds\n        set [animate v] to [28]\n        wait (0) seconds\n    end\n    wait (14) seconds\nend\n\nwhen I start as a clone\nif <(Clone ID) = [Stars]> then\n    wait (3.8) seconds\n    go to x: (pick random (-70) to (70)) y: (pick random (-35) to (35))\n    go to [front v] layer\n    go [backward v] (2) layers\n    set size to (100) %\n    set [ghost v] effect to (100)\n    set size to (pick random (60) to (120)) %\n    set [clone x v] to ((x position) * (3.6))\n    set [clone y v] to ((y position) * (3.6))\n    go to [front v] layer\n    go [backward v] (2) layers\n    set [brightness v] effect to (100)\n    set [clone size v] to (pick random (2) to (40))\n    show\n    repeat (pick random (35) to (45))\n        go to [front v] layer\n        go [backward v] (2) layers\n        change x by (((Clone X) - (x position)) / (Clone Size))\n        change y by (((Clone Y) - (y position)) / (Clone Size))\n        switch costume to (Animate)\n        change [ghost v] effect by (-20)\n        if <touching (_edge_ v)?> then\n            hide\n            go to [front v] layer\n            go [backward v] (2) layers\n        else\n            show\n            go to [front v] layer\n            go [backward v] (2) layers\n        end\n    end\n    repeat (20)\n        change x by (((Clone X) - (x position)) / (Clone Size))\n        change y by (((Clone Y) - (y position)) / (Clone Size))\n        go to [front v] layer\n        go [backward v] (2) layers\n        switch costume to (Animate)\n        change [ghost v] effect by (5)\n        if <touching (_edge_ v)?> then\n            hide\n            go to [front v] layer\n            go [backward v] (2) layers\n        else\n            show\n        end\n    end\n    delete this clone\nend\n\nwhen flag clicked\nforever\n    repeat (15)\n        set [clone id v] to [Stars]\n        create clone of (_myself_ v)\n    end\n    wait (14) seconds\nend\n\nwhen flag clicked\nwait (.9) seconds\nforever\n    Explode\n    wait (14) seconds\nend\n\nwhen I start as a clone\nif <(Clone ID) = [Logoo]> then\n    point in direction (0)\n    hide\n    set [ghost v] effect to (0)\n    switch costume to (logo v)\n    go to x: (0) y: (0)\n    wait (.3) seconds\n    show\n    repeat (40)\n        go to [front v] layer\n        go [backward v] (2) layers\n        change size by (((130) - (size)) / (8))\n        turn right (((90) - (direction)) / (8)) degrees\n    end\n    set [i v] to [-1]\n    repeat (20)\n        go to [front v] layer\n        go [backward v] (1) layers\n        change size by ((I) / (3))\n        change [i v] by (join [-] (([abs v] of (I) ) / (4)))\n        turn right ((I) / (-3)) degrees\n    end\n    switch costume to (name v)\n    set size to (150) %\n    point in direction (90)\n    go to x: (0) y: (1000)\n    Smooth Glide x: [0] y: [0] speed: [4]\n    wait (1.2) seconds\n    repeat (100)\n        point in direction ((([sin v] of ((timer) * (350)) ) * (20)) + (90))\n        set y to ((([abs v] of ([sin v] of ((timer) * (360)) ) ) * (100)) + (-50))\n    end\n    Smooth Glide x: [0] y: [0] speed: [2]\n    go to [front v] layer\n    go [backward v] (2) layers\n    repeat (20)\n        switch costume to (size hack v)\n        change size by (300)\n        switch costume to (name v)\n    end\n    delete this clone\nend\n\nwhen I start as a clone\nif <(Clone ID) = [Explode-2]> then\n    hide\n    clear graphic effects\n    switch costume to (explode v)\n    go to [front v] layer\n    go [backward v] (2) layers\n    set size to (100) %\n    go to x: (Clone X) y: (Clone Y)\n    wait (6) seconds\n    show\n    set size to (0) %\n    repeat (5)\n        change size by (((120) - (size)) / (5))\n    end\n    repeat (11)\n        change size by (((120) - (size)) / (5))\n        change [ghost v] effect by (10)\n    end\n    delete this clone\nend\n\nwhen I start as a clone\nif <(Clone ID) = [Circle-2]> then\n    hide\n    clear graphic effects\n    switch costume to (costume1 v)\n    go to [front v] layer\n    go [backward v] (2) layers\n    set size to (0) %\n    show\n    repeat (5)\n        change size by (((120) - (size)) / (5))\n    end\n    repeat (11)\n        next costume\n        change size by (((120) - (size)) / (5))\n        change [ghost v] effect by (10)\n    end\n    delete this clone\nend\n\nwhen I start as a clone\nif <(Clone ID) = [Stars2]> then\n    wait (3.8) seconds\n    go to x: (pick random (-70) to (70)) y: (pick random (-35) to (35))\n    go to [front v] layer\n    go [backward v] (2) layers\n    set size to (100) %\n    set [ghost v] effect to (100)\n    set size to (pick random (60) to (120)) %\n    set [clone x v] to ((x position) * (3.6))\n    set [clone y v] to ((y position) * (3.6))\n    go to [front v] layer\n    go [backward v] (2) layers\n    set [brightness v] effect to (100)\n    set [clone size v] to (pick random (2) to (40))\n    show\n    repeat (pick random (35) to (45))\n        go to [front v] layer\n        go [backward v] (2) layers\n        change x by (((Clone X) - (x position)) / (Clone Size))\n        change y by (((Clone Y) - (y position)) / (Clone Size))\n        switch costume to (Animate)\n        change [ghost v] effect by (-20)\n        if <touching (_edge_ v)?> then\n            hide\n            go to [front v] layer\n            go [backward v] (2) layers\n        else\n            show\n            go to [front v] layer\n            go [backward v] (2) layers\n        end\n    end\n    repeat (20)\n        change x by (((Clone X) - (x position)) / (Clone Size))\n        change y by (((Clone Y) - (y position)) / (Clone Size))\n        go to [front v] layer\n        go [backward v] (2) layers\n        switch costume to (Animate)\n        change [ghost v] effect by (5)\n        if <touching (_edge_ v)?> then\n            hide\n            go to [front v] layer\n            go [backward v] (2) layers\n        else\n            show\n        end\n    end\n    delete this clone\nend\n\nwhen flag clicked\nplay sound [Domastic - Weird Dream NCS Release v] until done\nbroadcast (intro end v)\nforever\n    broadcast (イントロ削除 v)\nend\n\nwhen I receive [イントロ削除 v]\nforever\n    delete this clone\nend\n\n@prayer\n\ndefine 動作\nset rotation style [left-right v]\nset size to (80) %\nif <<key (left arrow v) pressed?> or <<key (a v) pressed?> or <<mouse down?> and <(mouse x) < [0]>>>> then\n    change [x v] by (-1)\n    point in direction (-90)\n    create clone of (_myself_ v)\nend\nif <<key (right arrow v) pressed?> or <<key (d v) pressed?> or <<(x position) < (mouse x)> and <mouse down?>>>> then\n    change [x v] by (1)\n    point in direction (90)\n    create clone of (_myself_ v)\nend\nif <touching (氷 v)?> then\n    set [x v] to ((x) * (0.97))\nelse\n    set [x v] to ((x) * (0.89))\nend\nchange x by (x)\nif <touching (ステージ v)?> then\n    change y by (1)\n    if <touching (ステージ v)?> then\n        change y by (1)\n        if <touching (ステージ v)?> then\n            change y by (1)\n            if <touching (ステージ v)?> then\n                change y by (1)\n                if <touching (ステージ v)?> then\n                    change y by (1)\n                    if <touching (ステージ v)?> then\n                        change y by (1)\n                        if <touching (ステージ v)?> then\n                            change y by (1)\n                            if <touching (ステージ v)?> then\n                                change y by (1)\n                                if <touching (ステージ v)?> then\n                                    change x by ((x) * (-1))\n                                    change y by (-8)\n                                    if <<key (up arrow v) pressed?> or <<key (w v) pressed?> or <<mouse down?> and <(mouse y) > [0]>>>> then\n                                        if <(x) > [0]> then\n                                            set [x v] to [-7]\n                                        else\n                                            set [x v] to [7]\n                                        end\n                                        set [y v] to [10]\n                                        start sound [Pop v]\n                                    else\n                                        set [x v] to [0]\n                                    end\n                                end\n                            end\n                        end\n                    end\n                end\n            end\n        end\n    end\n    change y by (1)\nend\nchange y by (-1)\nif <touching (ステージ v)?> then\n    if <<key (up arrow v) pressed?> or <<key (w v) pressed?> or <<mouse down?> and <(mouse y) > [0]>>>> then\n        set [y v] to [12]\n        start sound [ニュッ v]\n    end\nend\nchange y by (1)\nchange [y v] by (-1)\nchange y by (y)\nif <touching (ステージ v)?> then\n    change y by ((y) * (-1))\n    set [y v] to [0]\nend\nif <<<key (down arrow v) pressed?> or <key (s v) pressed?>> or <<[0] > (mouse y)> and <mouse down?>>> then\n    switch costume to (player2 v)\nelse\n    switch costume to (player1 v)\nend\nif <touching (水 v)?> then\n    if <<<key (up arrow v) pressed?> or <key (w v) pressed?>> or <<[0] < (mouse y)> and <mouse down?>>> then\n        set [y v] to [2]\n    else\n        set [y v] to [-0.5]\n    end\nend\n\nwhen flag clicked\nhide\n\nwhen I receive [intro end v]\ngo to x: (-200) y: (0)\nclear graphic effects\nshow\nforever\n    動作\n    if <<[-175] > (y position)> or <touching (❌ v)?>> then\n        start sound [crashed oof v]\n        repeat (20)\n            change [ghost v] effect by (5)\n        end\n        clear graphic effects\n        go to x: (-200) y: (0)\n    end\n    if <[230] < (x position)> then\n        broadcast (NEXT v)\n        wait (2) seconds\n        go to x: (-200) y: (0)\n        wait (3.5) seconds\n    end\nend\n\nwhen I start as a clone\nrepeat (9)\n    change [ghost v] effect by (7)\n    change size by (-7)\nend\ndelete this clone\n\n@ステージ\n\nwhen flag clicked\nhide\n\nwhen I receive [intro end v]\nswitch costume to (1 v)\nshow\nforever\n    go to x: (0) y: (0)\n    set size to (100) %\n    if <(costume [number v]) = [13]> then\n        switch backdrop to (背景2 v)\n        if <(☁ 世界記録 world record) > (Time)> then\n            set [☁ 世界記録 world record v] to (Time)\n        end\n    else\n        switch backdrop to (背景1 v)\n    end\nend\n\nwhen I receive [next v]\nwait (2) seconds\nnext costume\n\n@スプライト2\n\nwhen flag clicked\n\nwhen I start as a clone\nif <(Clone Name) = [Slide]> then\n    Change color\n    show\n    switch costume to (slide v)\n    go to [front v] layer\n    go to x: (0) y: (1000)\n    set size to (100) %\n    point in direction (90)\n    start sound [ v]\n    x: [0] y: [0] Speed: [4]\n    set [clone name v] to [Next]\n    create clone of (_myself_ v)\n    wait (3.4) seconds\n    delete this clone\nend\n\ndefine x: (x) y: (y) Speed: (speed)\nrepeat until <<(round (x)) = (round (x position))> and <(round (y)) = (round (y position))>>\n    change x by (((x) - (x position)) / (speed))\n    change y by (((y) - (y position)) / (speed))\nend\ngo to x: (x) y: (y)\n\nwhen I start as a clone\nif <(Clone Name) = [End]> then\n    if <(Color  Pattern) = [White]> then\n        switch costume to (end\(white\) v)\n    else\n        if <(Color  Pattern) = [Black]> then\n            switch costume to (end\(black\) v)\n        end\n    end\n    color reset\n    show\n    go to [front v] layer\n    go to x: (-1000) y: (-1000)\n    point in direction (90)\n    x: [0] y: [0] Speed: [4]\n    repeat (20)\n        change size by (((0) - (size)) / (6))\n    end\n    hide\n    wait (1) seconds\n    if <(Color  Pattern) = [White]> then\n        set [color  pattern v] to [Black]\n    else\n        if <(Color  Pattern) = [Black]> then\n            set [color  pattern v] to [White]\n        end\n    end\n    wait (2) seconds\n    delete this clone\nend\n\nset [clone name v] to [Slide]\ncreate clone of (_myself_ v)\n\nwhen I start as a clone\nif <(Clone Name) = [Next]> then\n    color reset\n    show\n    go to [front v] layer\n    switch costume to (next v)\n    go to x: (-240) y: (-180)\n    point in direction (100)\n    set size to (0) %\n    start sound [　 v]\n    repeat until <<[-0.5] < (x position)> and <[-0.5] < (x position)>>\n        change x by (((0) - (x position)) / (10))\n        change y by (((0) - (y position)) / (9))\n        turn right ([abs v] of (((90) - (direction)) / (7)) ) degrees\n        change size by (((100) - (size)) / (10))\n    end\n    wait (1) seconds\n    set [clone name v] to [End]\n    create clone of (_myself_ v)\n    wait (0.3) seconds\n    delete this clone\nend\n\ndefine Change color\nset [color v] effect to (pick random (-1000) to (1000))\n\ndefine color reset\nset [color v] effect to (0)\n\nwhen I receive [next v]\nhide\nset [clone name v] to [Slide]\nset [color  pattern v] to [White]\ncreate clone of (_myself_ v)\n\n@❌\n\nwhen flag clicked\nhide\n\nwhen I receive [intro end v]\nswitch costume to (1 v)\nshow\nforever\n    if <([costume # v] of [ステージ v]) = [5]> then\n        go to (警官 v)\n        point in direction ([direction v] of [警官 v])\n    else\n        go to x: (0) y: (0)\n        point in direction (90)\n    end\n    set size to (100) %\n    go to [back v] layer\nend\n\nwhen I receive [next v]\nnext costume\n\n@警官\n\nwhen flag clicked\ngo to x: (0) y: (0)\nhide\n\nwhen I receive [intro end v]\nforever\n    if <([costume # v] of [ステージ v]) = [5]> then\n        set y to (-71)\n        show\n        set x to (([sin v] of (((timer) / (3)) * (150)) ) * (100))\n        set rotation style [left-right v]\n        if <[0] < (x position)> then\n            point in direction (90)\n        else\n            point in direction (-90)\n        end\n    else\n        hide\n    end\nend\n\n@サムネ\n\nwhen flag clicked\nhide\nforever\n    reset timer\nend\n\nwhen [timer v] > (0)\nswitch costume to (1 v)\ngo to x: (0) y: (300)\nshow\nrepeat until <(round (y position)) = [0]>\n    go to [front v] layer\n    show\n    change y by (((0) - (y position)) / (5))\nend\n\n