Factory ~platformer~
@Stage\n\nwhen I receive [start! v]\nswitch backdrop to (背景1 v)\nforever\n    wait (1) seconds\n    play sound [Raven & Kreyn - Bubble \[NCS Release\].mp3 v] until done\nend\n\nwhen [space v] key pressed\nplay sound [Elektronomia - Limitless \[NCS Release\] v] until done\n\nwhen I receive [start! v]\nset [sin v] to [0]\nforever\n    change [sin v] by (5)\nend\n\nwhen flag clicked\nswitch backdrop to (背景2 v)\n\n@intro!\n\nwhen I start as a clone\nshow\nif <(costume [number v]) = [2]> then\n    set [ghost v] effect to (100)\n    go to x: (-500) y: (0)\n    set size to (0) %\n    point in direction (0)\n    repeat (40)\n        change x by (((intro engine) - (x position)) / (4))\n        turn right (((90) - (direction)) / (4)) degrees\n        change size by (((100) - (size)) / (4))\n        change [ghost v] effect by (-5)\n    end\n    wait until <[11.5] < (timer)>\n    repeat (20)\n        change [brightness v] effect by (5)\n    end\n    delete this clone\nelse\n    if <(costume [number v]) = [1]> then\n        go to x: (0) y: (0)\n        set size to (0) %\n        point in direction (180)\n        repeat (20)\n            turn right (((90) - (direction)) / (3)) degrees\n            change size by (((120) - (size)) / (3))\n        end\n        delete this clone\n    else\n        if <(costume [number v]) = [3]> then\n            go to x: (0) y: (0)\n            set size to (0) %\n            point in direction (180)\n            repeat (30)\n                turn right (((90) - (direction)) / (4)) degrees\n                change size by (((120) - (size)) / (4))\n            end\n            wait until <[8] < (timer)>\n            delete this clone\n        else\n            if <(costume [number v]) = [6]> then\n                set [ghost v] effect to (100)\n                set size to (0) %\n                repeat (20)\n                    change size by (((100) - (size)) / (4))\n                    change [ghost v] effect by (-7)\n                end\n                repeat (10)\n                    next costume\n                end\n                wait until <[12.5] < (timer)>\n                delete this clone\n            else\n                if <(costume [number v]) = [17]> then\n                    set [intro engine v] to [0]\n                    set [ghost v] effect to (100)\n                    set [intro crazy v] to [0]\n                    forever\n                        go to [front v] layer\n                        change [intro engine v] by (5)\n                        point in direction ((([sin v] of ((intro engine) * (1)) ) * (10)) + (90))\n                        go to x: (0) y: ((([sin v] of ((intro engine) * (2)) ) * (20)) + (intro crazy))\n                        change [ghost v] effect by (-2)\n                    end\n                else\n                    if <(costume [number v]) = [5]> then\n                        set [intro engine v] to [0]\n                        set [ghost v] effect to (100)\n                        set [intro crazy v] to [25]\n                        forever\n                            go to [front v] layer\n                            change [intro engine v] by (5)\n                            point in direction ((([sin v] of ((intro engine) * (1)) ) * (10)) + (82.5))\n                            go to x: (0) y: ((([sin v] of ((intro engine) * (2)) ) * (20)) + (intro crazy))\n                            change [ghost v] effect by (-2)\n                        end\n                    else\n                        if <(costume [number v]) = [4]> then\n                            set size to (0) %\n                            set [intro engine v] to [0]\n                            set [なんか v] to [0]\n                            set [intro crazy v] to [0]\n                            repeat (60)\n                                go to [front v] layer\n                                change [intro engine v] by (5)\n                                set [なんか v] to (((なんか) * (0.75)) + (((150) - (size)) / (2)))\n                                point in direction ((([sin v] of ((intro engine) * (1)) ) * (10)) + (90))\n                                go to x: (0) y: (([sin v] of ((intro engine) * (2)) ) * (20))\n                                change size by (なんか)\n                            end\n                            set [なんか v] to [0]\n                            repeat (30)\n                                go to [front v] layer\n                                change [intro engine v] by (5)\n                                point in direction ((([sin v] of ((intro engine) * (1)) ) * (10)) + ((([tan v] of (なんか) ) / (0.3)) + (90)))\n                                set y to (([sin v] of ((intro engine) * (2)) ) * (20))\n                                change x by (((x position) + (1)) / (4))\n                                change size by (((0) - (x position)) / (6))\n                                change [なんか v] by (4.6)\n                            end\n                            set [なんか v] to [0]\n                            delete this clone\n                        else\n                            set size to (0) %\n                            go to x: (0) y: (-180)\n                            repeat (60)\n                                switch costume to (circle2 v)\n                                change size by (((1200) - (size)) / (8))\n                                switch costume to (circle v)\n                                go to [front v] layer\n                            end\n                            repeat (20)\n                                go to [front v] layer\n                                change [ghost v] effect by (5)\n                            end\n                            delete this clone\n                        end\n                    end\n                end\n            end\n        end\n    end\nend\n\nwhen I start as a clone\nif <(costume [number v]) = [17]> then\n    wait until <[4] < (timer)>\n    repeat (30)\n        change [intro crazy v] by (((-100) - (intro crazy)) / (4))\n    end\nend\n\nwhen I start as a clone\nif <(costume [number v]) < [18]> then\n    wait until <[16.5] < (timer)>\n    delete this clone\nend\n\nwhen flag clicked\nif <key (s v) pressed?> then\n    broadcast (start! v)\nelse\n    reset timer\n    reset timer\n    reset timer\n    reset timer\n    start sound [Syn Cole - Feel Good \[NCS Release\] v]\n    repeat (2)\n        switch costume to (cube v)\n        create clone of (_myself_ v)\n        wait (0.1) seconds\n        set [brightness v] effect to (100)\n        create clone of (_myself_ v)\n        clear graphic effects\n        wait (0.1) seconds\n    end\n    wait (0.4) seconds\n    switch costume to (blue v)\n    create clone of (_myself_ v)\n    wait until <[2.2] < (timer)>\n    switch costume to (name v)\n    create clone of (_myself_ v)\n    switch costume to (costume blake1 v)\n    create clone of (_myself_ v)\n    wait until <[4] < (timer)>\n    switch costume to (icon v)\n    create clone of (_myself_ v)\n    wait until <[7] < (timer)>\n    switch costume to (card v)\n    set [intro engine v] to [-185]\n    repeat (5)\n        create clone of (_myself_ v)\n        change [intro engine v] by (100)\n    end\n    wait until <[7.8] < (timer)>\n    switch costume to (cat v)\n    create clone of (_myself_ v)\n    wait until <[15.5] < (timer)>\n    switch costume to (circle v)\n    create clone of (_myself_ v)\n    wait (2) seconds\n    broadcast (start! v)\nend\n\n@chara\n\nwhen flag clicked\nhide\n\nwhen flag clicked\nhide\ngo to x: (-200) y: (0)\n\nwhen I receive [ステージかえる v]\nstop [other scripts in sprite v]\nrepeat until <(round (x position)) = [-200]>\n    change x by (((-200) - (x position)) / (speed))\n    change y by (((-70) - (y position)) / (speed))\nend\n移動\n\ndefine 移動\nshow\nset [x v] to [0]\nset [y v] to [0]\nset rotation style [left-right v]\nforever\n    if <<key (left arrow v) pressed?> or <<(mouse x) < (x position)> and <mouse down?>>> then\n        change [x v] by (-1)\n        point in direction (-90)\n        switch costume to (コスチューム1 v)\n    end\n    if <<key (right arrow v) pressed?> or <<(x position) < (mouse x)> and <mouse down?>>> then\n        change [x v] by (1)\n        point in direction (90)\n        switch costume to (コスチューム1 v)\n    end\n    change y by (-1)\n    if <touching (stage v)?> then\n        set [x v] to ((x) * (0.93))\n    else\n        set [x v] to ((x) * (0.9))\n    end\n    change y by (1)\n    change x by (x)\n    if <touching (stage v)?> then\n        change y by (1)\n        if <touching (stage v)?> then\n            change y by (1)\n            if <touching (stage v)?> then\n                change y by (1)\n                if <touching (stage v)?> then\n                    change y by (1)\n                    if <touching (stage v)?> then\n                        change y by (1)\n                        if <touching (stage v)?> then\n                            change x by ((x) * (-1))\n                            change y by (-5)\n                            if <<key (up arrow v) pressed?> or <<(y position) < (mouse y)> and <mouse down?>>> then\n                                if <(x) > [0]> then\n                                    set [x v] to [-6]\n                                else\n                                    set [x v] to [6]\n                                end\n                                set [y v] to [10]\n                                start sound [Basketball Bounce v]\n                            else\n                                set [x v] to [0]\n                            end\n                        end\n                    end\n                end\n            end\n        end\n    end\n    change y by (-1)\n    if <<<key (up arrow v) pressed?> or <<(y position) < (mouse y)> and <mouse down?>>> or <touching (jump v)?>> then\n        if <touching (stage v)?> then\n            start sound [Jump v]\n            set [y v] to [15]\n        end\n    end\n    change y by (Y)\n    change [y v] by (-1)\n    if <<touching (stage v)?> or <touching (stage v)?>> then\n        change y by ((Y) * (-1))\n        set [y v] to [0]\n    end\n    if <[235] < (x position)> then\n        broadcast (ステージかえる v)\n    end\n    if <touching (jump v)?> then\n        start sound [Big Boing v]\n        set [y v] to [20]\n        broadcast (jump v)\n    end\n    if <<(y position) < [-180]> or <touching color (#ff0000)?>> then\n        go to x: (-200) y: (0)\n        start sound [Rip v]\n    end\nend\n\nwhen I receive [start! v]\nshow\nwait (1) seconds\n移動\n\n@stage\n\nwhen flag clicked\nhide\n\nwhen I receive [start! v]\nset [ステージ v] to [1]\ncreate clone of (_myself_ v)\nswitch costume to (0 v)\n\nwhen I start as a clone\nshow\nswitch costume to ((ステージ) + (1))\nif <(ステージ) = [1]> then\n    go to x: (0) y: (0)\nelse\n    go to x: (500) y: (0)\n    repeat until <(round (x position)) = [0]>\n        change x by (((0) - (x position)) / (speed))\n    end\nend\n\nwhen I receive [ステージかえる v]\nif <(costume [number v]) = [1]> then\n    change [ステージ v] by (1)\n    create clone of (_myself_ v)\n    switch costume to (0 v)\nelse\n    限度を測る\n    repeat until <(round (x position)) = (限度)>\n        go to [back v] layer\n        change x by (((限度) - (x position)) / (speed))\n    end\n    repeat (20)\n        change [ghost v] effect by (5)\n    end\n    delete this clone\nend\n\ndefine 限度を測る\ngo to x: (-500) y: (0)\nset [限度 v] to (x position)\ngo to x: (0) y: (0)\n\n@red\n\nwhen flag clicked\nhide\n\nwhen I receive [start! v]\nwait () seconds\ncreate clone of (_myself_ v)\nswitch costume to (0 v)\n\nwhen I start as a clone\nshow\nswitch costume to ((ステージ) + (1))\nif <(ステージ) = [1]> then\n    go to x: (0) y: (0)\nelse\n    go to x: (500) y: (0)\n    repeat until <(round (x position)) = [0]>\n        change x by (((0) - (x position)) / (speed))\n    end\nend\n\nwhen I receive [ステージかえる v]\nif <(costume [number v]) = [1]> then\n    wait () seconds\n    create clone of (_myself_ v)\n    switch costume to (0 v)\nelse\n    限度を測る\n    repeat until <(round (x position)) = (限度)>\n        go to [back v] layer\n        change x by (((限度) - (x position)) / (speed))\n    end\n    repeat (20)\n        change [ghost v] effect by (5)\n    end\n    delete this clone\nend\n\ndefine 限度を測る\ngo to x: (-500) y: (0)\nset [限度 v] to (x position)\ngo to x: (0) y: (0)\n\nwhen I start as a clone\nforever\n    go to [back v] layer\nend\n\n@tumbnail\n\nwhen flag clicked\nset [制御 v] to [0]\nhide\nforever\n    go to [front v] layer\nend\n\nwhen I receive [start! v]\nset [制御 v] to [1]\nforever\n    reset timer\nend\n\nwhen [timer v] > (0)\nif <(制御) = [1]> then\n    show\n    set [pixelate v] effect to (100)\n    set [ghost v] effect to (100)\n    repeat (20)\n        change [pixelate v] effect by (-5)\n        change [ghost v] effect by (-5)\n        go to [front v] layer\n    end\n    forever\n        go to [front v] layer\n    end\nend\n\n@☆&♡&Follow\n\nwhen I receive [start! v]\nforever\n    wait (10) seconds\n    set y to (500)\n    show\n    clear graphic effects\n    set [!?&%$#=¥+-<>/\ v] to [0]\n    repeat (10)\n        repeat until <(y position) < [130]>\n            change [!?&%$#=¥+-<>/\ v] by (-1)\n            change y by (!?&%$#=¥+-<>/\)\n            change [ghost v] effect by (-5)\n        end\n        set [!?&%$#=¥+-<>/\ v] to (([abs v] of (!?&%$#=¥+-<>/\) ) * (0.9))\n        change [!?&%$#=¥+-<>/\ v] by (-1)\n        change y by (!?&%$#=¥+-<>/\)\n    end\n    wait (5) seconds\n    set [!?&%$#=¥+-<>/\ v] to [0]\n    repeat (8)\n        change [!?&%$#=¥+-<>/\ v] by (2)\n        change y by (!?&%$#=¥+-<>/\)\n        change [ghost v] effect by (12.5)\n    end\n    hide\nend\n\nwhen flag clicked\nhide\nforever\n    go to [front v] layer\nend\n\n
---------------------------My New Game--------------------------\n◇◆　　　　　　　　　　　　　　　　　　　　◆◇ ◆◇　　　　　　　　　　　　　　　　　　　　◇◆\nOperate with the arrow keys! If you touch red, it is out!\n矢印キーで操作します！赤色に触れてしまうとアウトです！\nIntros can be skipped with the s key.\nイントロはsキーでスキップできます。\n___________________________________________