戦闘中✕PLATFORMER #all #game #games #PLATFORMER

Instructions: 投票よろ!!↓\nhttps://scratch.mit.edu/projects/865634611/\n旗2回押し推奨\n拡　散　手　伝　っ　て　く　だ　さ　い\n拡散してくれたら発狂しながら1万回転します\nハートと星を押さないと全財産消えています。（多分)\n\nDouble push flag recommended\nPlease help spread the word。\nIf it spreads, it will rotate 10,000 times while going crazy.\nSee also this https://scratch.mit.edu/projects/760913972/\n\nIf you don't press the heart and star, all your property will disappear. (perhaps)\n日本語は下\n\n【English】\n〈PC〉\nright key to move right\nleft key to move left\njump with up key\nthrow with spacebar\n<mobile>\nTap right to move right\nTap left to move left\nTap the top to jump\npush button to throw\n\n【日本語】\n〈PC〉\n右キーで右に動く\n左キーで左に動く\n上キーでジャンプ\nスペースキーで投げる\n〈モバイル〉\n右側をタップで右に移動\n左側をタップで左に移動\n上側をタップでジャンプ\nボタンを押して投げる

@Stage\n\nwhen flag clicked\nhide variable [next終わり v]\nhide variable [x v]\nhide variable [y v]\nhide variable [地面 v]\nhide variable [影の大きさ v]\nhide variable [鍵 v]\nhide variable [太陽の大きさ v]\nhide variable [表示 v]\nhide variable [タイム　time v]\nhide variable [☁ 最高スコア　highest score v]\n\nwhen flag clicked\nplay sound [Alan Walker, K-391, Tungevaag, Mangoo - Play \[Xaf Remix\] v] until done\n\nshow variable [タイム　time v]\n\n@プレイヤー\n\nwhen I start as a clone\nset rotation style [all around v]\nclear graphic effects\npoint in direction (90)\nrepeat (20)\n    change size by (-5)\n    change [ghost v] effect by (5)\nend\ndelete this clone\n\nwhen I receive [プディング v]\ndelete this clone\n\nwhen flag clicked\nhide\nforever\n    wait (0.01) seconds\n    create clone of (_myself_ v)\nend\n\ndefine 初期設定\nclear graphic effects\nshow\nset [y v] to [0]\nset [x v] to [0]\nset size to (100) %\ngo to x: (-201) y: (50)\n\nwhen I receive [start v]\nshow variable [タイム　time v]\nset [タイム　time v] to [0]\nset [ステージ v] to [1]\ngo to x: (-201) y: (-50)\nshow\nset size to (100) %\nset drag mode [not draggable v]\nif <touching (ステージ v)?> then\n    go to x: (-201) y: (50)\nend\npoint in direction (90)\nforever\n    if <<<mouse down?> and <[ 100] > (mouse x)>> or <key (left arrow v) pressed?>> then\n        set [b v] to [0]\n        switch costume to (左 v)\n        change [x v] by (-1)\n        create clone of (土と草 v)\n        point in direction (90)\n    end\n    if <<<mouse down?> and <(mouse x) > [-100]>> or <key (right arrow v) pressed?>> then\n        set [b v] to [1]\n        switch costume to (右 v)\n        change [x v] by (1)\n        create clone of (土と草 v)\n        point in direction (90)\n    end\n    set [x v] to ((x) * (0.9))\n    change x by (x)\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 (-5)\n                            if <<<mouse down?> and <[-100] < (mouse y)>> or <key (up arrow v) pressed?>> then\n                                if <(x) > [0]> then\n                                    set [x v] to [-8]\n                                else\n                                    set [x v] to [8]\n                                end\n                                set [y v] to [13]\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 <touching (ステージ v)?> then\n        if <<<mouse down?> and <[-100] < (mouse y)>> or <key (up arrow v) pressed?>> then\n            set [y v] to [15]\n        end\n    end\n    change y by (1)\n    change [y v] by (-1)\n    change y by (y)\n    if <touching (ステージ v)?> then\n        change y by ((y) * (-1))\n        set [y v] to [0]\n    end\n    hide variable [x v]\n    if <(x position) > [230]> then\n        broadcast (次! v)\n        change [ステージ v] by (1)\n        hide\n        wait (2) seconds\n        初期設定\n    end\n    if <(y position) < [-170]> then\n        repeat (10)\n            change [pixelate v] effect by (10)\n            change [ghost v] effect by (5)\n        end\n        hide\n        clear graphic effects\n        show\n        初期設定\n    end\n    if <<touching (とげ v)?> or <touching (敵 v)?>> then\n        repeat (10)\n            change [pixelate v] effect by (10)\n            change [ghost v] effect by (5)\n        end\n        hide\n        clear graphic effects\n        show\n        broadcast (死んだ v)\n        初期設定\n    end\nend\n\n@ステージ\n\nwhen flag clicked\ngo to [back v] layer\ngo to x: (0) y: (0)\nswitch costume to (コスチューム1 v)\nhide\nhide variable [☁ 最高スコア　highest score v]\n\nwhen I receive [next v]\nswitch costume to (ステージ)\n\nwhen flag clicked\nset [ステージ v] to [1]\nset [タイム　time v] to [0]\n\nwhen flag clicked\nforever\n    if <(ステージ) = [7]> then\n        show variable [☁ 最高スコア　highest score v]\n    end\nend\n\nwhen I receive [start v]\nshow\n\nset [☁ 最高スコア　highest score v] to [47]\n\nwhen I receive [start v]\nforever\n    if <<(ステージ) = [7]> and <(タイム　time) < (☁ 最高スコア　highest score)>> then\n        set [☁ 最高スコア　highest score v] to (タイム　time)\n    end\nend\n\nwhen I receive [start v]\nrepeat until <(ステージ) = [7]>\n    wait (1) seconds\n    change [タイム　time v] by (1)\nend\nbroadcast (金 v)\n\n@土と草\n\nwhen I start as a clone\nshow\ngo to [front v] layer\ngo [backward v] (5) layers\npoint in direction (pick random (-90) to (90))\ngo to (プレイヤー v)\nchange y by (pick random (-17) to (-5))\nset size to (pick random (50) to (100)) %\nswitch costume to (pick random (1) to (2))\nif <(x) > [-1]> then\n    change x by (-28)\n    set [土ぼこりx v] to (pick random (-3) to (-1))\n    set [土ぼこりy v] to (pick random (2) to (5))\nelse\n    change x by (28)\n    set [土ぼこりx v] to (pick random (1) to (3))\n    set [土ぼこりy v] to (pick random (2) to (5))\nend\nset [brightness v] effect to (pick random (-10) to (10))\nrepeat (20)\n    change [ghost v] effect by (5)\n    change x by (土ぼこりx)\n    change y by (土ぼこりy)\n    if <(x) > [0]> then\n        turn right (15) degrees\n        change [土ぼこりx v] by (-0.5)\n        change [土ぼこりy v] by (-0.8)\n    else\n        turn left (15) degrees\n        change [土ぼこりx v] by (0.5)\n        change [土ぼこりy v] by (-0.8)\n    end\nend\ndelete this clone\n\n@影\n\nwhen flag clicked\nhide\n\nwhen I receive [メッセージ1 v]\nhide\nwait (1) seconds\nshow\n\nwhen I receive [死んだ v]\nhide\nwait (1) seconds\nshow\n\nwhen I receive [start v]\nshow\nforever\n    go to (プレイヤー v)\n    point towards (太陽 v)\nend\n\n@太陽\n\nwhen flag clicked\nhide\n\nwhen I receive [start v]\nshow\nset size to (100) %\nset [太陽の大きさ v] to [0]\nforever\n    go to [back v] layer\n    change [太陽の大きさ v] by (3)\n    change size by ([cos v] of (太陽の大きさ) )\nend\n\n@とげ\n\nwhen flag clicked\nhide\n\nwhen I receive [start v]\nshow\ngo to x: (0) y: (-60)\nforever\n    switch costume to (ステージ)\nend\n\n@スプライト1\n\nwhen I start as a clone\nset size to (110) %\nshow\nif <<(costume [number v]) = [1]> or <<(costume [number v]) = [2]> or <(costume [number v]) = [3]>>> then\n    go to x: (0) y: (-342)\n    forever\n        change y by (((0) - (y position)) / (5))\n    end\nelse\n    go to x: (-493) y: (0)\n    if <(costume [number v]) = [7]> then\n        forever\n            change x by (((0) - (x position)) / (5))\n        end\n    else\n        forever\n            change x by (((30) - (x position)) / (5))\n        end\n    end\nend\n\nwhen I start as a clone\nwait (1) seconds\nrepeat (10)\n    change [ghost v] effect by (10)\nend\ndelete this clone\n\nwhen I receive [次! v]\nswitch costume to (コスチューム3 \(1\) v)\nrepeat (7)\n    create clone of (_myself_ v)\n    next costume\n    wait (0.1) seconds\nend\nchange [地面 v] by (1)\nwait (1) seconds\nbroadcast (NEXT v)\n\n@スプライト2\n\nwhen flag clicked\nset [ボール v] to [0]\nset [b v] to [0]\nhide\n\nwhen I receive [start v]\nshow\nforever\n    if <key (space v) pressed?> then\n        if <(ボール) = [0]> then\n            if <([costume name v] of [プレイヤー v]) = [右]> then\n                repeat until <<<touching (_edge_ v)?> or <touching (敵 v)?>> or <<<touching (ステージ v)?> or <touching (とげ v)?>> or <(distance to [プレイヤー v]) > [200]>>>\n                    set [ボール v] to [1]\n                    point in direction (90)\n                    move (10) steps\n                end\n                wait (0.01) seconds\n                set [ボール v] to [0]\n                wait until <not <key (space v) pressed?>>\n            else\n                repeat until <<<touching (_edge_ v)?> or <touching (敵 v)?>> or <<<touching (ステージ v)?> or <touching (とげ v)?>> or <(distance to [プレイヤー v]) > [200]>>>\n                    set [ボール v] to [1]\n                    point in direction (-90)\n                    move (10) steps\n                end\n                wait (0.01) seconds\n                set [ボール v] to [0]\n                wait until <not <key (space v) pressed?>>\n            end\n        end\n    end\nend\n\nwhen I receive [start v]\nforever\n    if <(ボール) = [0]> then\n        if <(b) = [1]> then\n            go to (プレイヤー v)\n            change x by (30)\n        end\n        if <(b) = [0]> then\n            go to (プレイヤー v)\n            change x by (-30)\n        end\n    end\nend\n\nwhen I receive [next v]\nshow\n\nwhen I receive [次! v]\nhide\n\nwhen I receive [撃つ v]\nshow\nif <(ボール) = [0]> then\n    if <([costume name v] of [プレイヤー v]) = [右]> then\n        repeat until <<<touching (_edge_ v)?> or <touching (敵 v)?>> or <<<touching (ステージ v)?> or <touching (とげ v)?>> or <(distance to [プレイヤー v]) > [200]>>>\n            set [ボール v] to [1]\n            point in direction (90)\n            move (10) steps\n        end\n        wait (0.01) seconds\n        set [ボール v] to [0]\n    else\n        repeat until <<<touching (_edge_ v)?> or <touching (敵 v)?>> or <<<touching (ステージ v)?> or <touching (とげ v)?>> or <(distance to [プレイヤー v]) > [200]>>>\n            set [ボール v] to [1]\n            point in direction (-90)\n            move (10) steps\n        end\n        wait (0.01) seconds\n        set [ボール v] to [0]\n    end\nend\n\n@敵\n\nwhen flag clicked\nhide\n\nwhen I start as a clone\nif <(costume [number v]) = [1]> then\n    set [hp v] to [1]\nelse\n    set [hp v] to [5]\nend\nshow\nset [敵: x v] to [0]\nset [敵: y v] to [0]\ngo to x: (219) y: (0)\nforever\n    if <<touching (スプライト2 v)?> and <(ボール) = [1]>> then\n        change [hp v] by (-1)\n        set [向き v] to [左]\n        set [敵: y v] to [15]\n        set [敵: x v] to [30]\n        wait (0.1) seconds\n        if <(HP) < [1]> then\n            delete this clone\n        end\n    end\n    point towards (プレイヤー v)\n    if < (direction) contains [-]?> then\n        set [向き v] to [左]\n    else\n        set [向き v] to [右]\n    end\n    if <(向き) = [右]> then\n        change [敵: x v] by (pick random (0.5) to (1))\n    end\n    if <(向き) = [左]> then\n        change [敵: x v] by (pick random (-0.5) to (-1))\n    end\n    set [敵: x v] to ((敵: x) * (0.85))\n    change x by (敵: x)\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 (-5)\n                            if <key (up arrow v) pressed?> then\n                                if <(敵: x) > [0]> then\n                                    set [敵: x v] to [-15]\n                                else\n                                    set [敵: x v] to [15]\n                                end\n                                set [敵: y v] to [14.5]\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 v] by (-1)\n    change y by (敵: y)\n    if <touching (ステージ v)?> then\n        change y by ((敵: y) * (-1))\n        set [敵: y v] to [0]\n    end\n    change y by (-1)\n    if <<touching (ステージ v)?> and <(pick random (1) to (10)) = [1]>> then\n        change [敵: y v] by (14)\n    end\n    change y by (1)\nend\n\nwhen I receive [next v]\nif <(ステージ) = [2]> then\n    repeat (3)\n        switch costume to (雑魚 v)\n        create clone of (_myself_ v)\n    end\nelse\n    if <(ステージ) = [3]> then\n        repeat (4)\n            switch costume to (雑魚 v)\n            create clone of (_myself_ v)\n        end\n    else\n        if <(ステージ) = [ 4]> then\n            repeat (5)\n                switch costume to (雑魚 v)\n                create clone of (_myself_ v)\n            end\n        else\n            if <(ステージ) = [5]> then\n                switch costume to (雑魚 v)\n                create clone of (_myself_ v)\n                switch costume to (ボス v)\n                create clone of (_myself_ v)\n            else\n                if <(ステージ) = [6]> then\n                    repeat (4)\n                        switch costume to (雑魚 v)\n                        create clone of (_myself_ v)\n                    end\n                    repeat (2)\n                        switch costume to (ボス v)\n                        create clone of (_myself_ v)\n                    end\n                end\n            end\n        end\n    end\nend\n\nwhen I receive [死んだ v]\ngo to x: (219) y: (0)\n\nwhen I receive [start v]\nhide\nswitch costume to (雑魚 v)\ncreate clone of (_myself_ v)\n\n@Free Intro\n\nwhen I start as a clone\nif <(Clone ID) = [Screen]> then\n    go to [front v] layer\n    switch costume to (size hack v)\n    set size to (140) %\n    show\n    repeat (50)\n        go to [front v] layer\n        go [forward v] (1000) layers\n        switch costume to (size hack v)\n        change size by (((100) - (size)) / (5))\n        switch costume to (screen v)\n    end\n    wait (7) seconds\n    delete this clone\nend\n\nwhen flag clicked\nhide\ngo to x: (0) y: (0)\nset size to (100) %\npoint in direction (90)\nclear graphic effects\nset [color v] effect to (0)\nset [ghost v] effect to (0)\nset [brightness v] effect to (0)\n\nwhen I start as a clone\nif <(Clone ID) = [Name]> then\n    go to x: (-1000) y: (-1000)\n    point in direction (0)\n    go to [front v] layer\n    switch costume to (name v)\n    set size to (100) %\n    wait (1.33) seconds\n    show\n    Smooth Glide x [0] y [0] size [100] direction [90] speed [6]\nend\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 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 Smooth Size: (size) speed: (speed)\nrepeat until <(round (size)) = (round (size))>\n    change size by (((size) - (size)) / (speed))\nend\nset size to (size) %\n\ndefine Smooth Rotate to (d) degrees at speed (s)\nrepeat until <(round (direction)) = (round (d))>\n    turn right (((round (d)) - (round (direction))) / (s)) degrees\nend\npoint in direction (d)\n\ndefine Smooth Glide x (x) y (y) size (size) direction (direction) speed (speed)\nrepeat until <<(round (x)) = (round (x position))> and <<(round (y)) = (round (y position))> and <<(round (size)) = (round (size))> and <(round (direction)) = (round (direction))>>>>\n    change x by (((x) - (x position)) / (speed))\n    change y by (((y) - (y position)) / (speed))\n    change size by (((size) - (size)) / (speed))\n    turn right (((direction) - (direction)) / (speed)) degrees\nend\ngo to x: (x) y: (y)\nset size to (size) %\npoint in direction (direction)\n\nwhen I start as a clone\nif <(Clone ID) = [Arrow2]> then\n    repeat (20)\n        change [ghost v] effect by (5)\n    end\nend\n\nwhen I start as a clone\nif <(Clone ID) = [Arrow1]> then\n    show\n    switch costume to (arrow v)\n    set size to (100) %\n    point in direction (90)\n    go to x: (0) y: (0)\n    Smooth Glide x: [200] y: [0] speed: [8]\n    delete this clone\nend\n\nwhen I start as a clone\nif <(Clone ID) = [Arrow2]> then\n    show\n    switch costume to (arrow v)\n    set size to (100) %\n    point in direction (-90)\n    go to x: (0) y: (0)\n    Smooth Glide x: [-200] y: [0] speed: [8]\n    delete this clone\nend\n\nwhen I start as a clone\nif <(Clone ID) = [Arrow1]> then\n    repeat (20)\n        change [ghost v] effect by (5)\n    end\nend\n\nwhen I start as a clone\nif <(Clone ID) = [Background]> then\n    go to [back v] layer\n    go [backward v] (1000) layers\n    switch costume to (size hack v)\n    set size to (100) %\n    show\n    point in direction (90)\n    go to x: (0) y: (0)\n    switch costume to (background v)\n    set [brightness v] effect to (100)\n    set [ghost v] effect to (100)\n    repeat (10)\n        change [brightness v] effect by (-10)\n        change [ghost v] effect by (-10)\n    end\n    wait (13.4) seconds\n    delete this clone\nend\n\ndefine Create Clone (id)\nset [clone id v] to (id)\ncreate clone of (_myself_ v)\nwait (0) seconds\n\nwhen I start as a clone\nif <(Clone ID) = [White End]> then\n    switch costume to (size hack v)\n    set size to (150) %\n    switch costume to (end v)\n    show\n    set [brightness v] effect to (100)\n    go to x: (500) y: (500)\n    point in direction (135)\n    repeat (50)\n        change x by (((22) - (x position)) / (6))\n        change y by (((22) - (y position)) / (6))\n        go to [front v] layer\n        go [backward v] (1) layers\n    end\n    delete this clone\nend\n\nwhen I start as a clone\nif <(Clone ID) = [Black End]> then\n    switch costume to (size hack v)\n    set size to (150) %\n    switch costume to (end v)\n    show\n    go to x: (500) y: (500)\n    point in direction (135)\n    repeat (50)\n        change x by (((20) - (x position)) / (10))\n        change y by (((20) - (y position)) / (10))\n        go to [front v] layer\n    end\n    repeat (20)\n        change x by (((20) - (x position)) / (10))\n        change y by (((20) - (y position)) / (10))\n        go to [front v] layer\n        change [ghost v] effect by (5)\n    end\n    delete this clone\nend\n\nwhen I start as a clone\nif <(Clone ID) = [Cheveron]> then\n    switch costume to (cheveron v)\n    set size to (5) %\n    go to [front v] layer\n    go [backward v] (1) layers\n    show\n    repeat (50)\n        go to [front v] layer\n        go [backward v] (2) layers\n        switch costume to (size hack v)\n        change size by (((360) - (size)) / (12))\n        switch costume to (cheveron v)\n    end\n    delete this clone\nend\n\nwhen flag clicked\nwait (3.55) seconds\nCreate Clone [Cheveron]\n\nwhen flag clicked\nwait (12) seconds\nCreate Clone [Black End]\nCreate Clone [White End]\n\nwhen flag clicked\nstart sound [Nurko & luma - tonight \[NIGHTCORE\] v]\n\nwhen I start as a clone\nif <(Clone ID) = [Pinwheel]> then\n    switch costume to (pinwheel v)\n    set size to (100) %\n    go to [front v] layer\n    go [backward v] (3) layers\n    set [ghost v] effect to (0)\n    set [brightness v] effect to (0)\n    show\n    repeat (238)\n        turn right (3) degrees\n    end\n    delete this clone\nend\n\nwhen flag clicked\nwait (3.55) seconds\nCreate Clone [Pinwheel]\n\nwhen flag clicked\nwait (5.17) seconds\nCreate Clone [Cheveron]\n\nwhen flag clicked\nwait (6.74) seconds\nCreate Clone [Arrow1]\nCreate Clone [Arrow2]\n\nwhen flag clicked\nwait (0) seconds\nCreate Clone [Name]\n\ndefine Shake (size)\nset size to (size) %\ngo to x: (0) y: (0)\nrepeat (26)\n    go to [front v] layer\n    change size by (((100) - (size)) / (10))\n    go to x: (([sin v] of ((timer) * (1000)) ) * (((size) - (100)) * (0.1))) y: (([sin v] of ((timer) * (800)) ) * (((size) - (100)) * (0.1)))\nend\n\nwhen I start as a clone\nif <(Clone ID) = [Name]> then\n    wait (3.48) seconds\n    Shake [200]\nend\n\nwhen I start as a clone\nif <(Clone ID) = [Name]> then\n    wait (5.09) seconds\n    Shake [200]\nend\n\nwhen I start as a clone\nif <(Clone ID) = [Name]> then\n    wait (6.7) seconds\n    Shake [200]\nend\n\nwhen I start as a clone\nif <(Clone ID) = [Name]> then\n    wait (8.28) seconds\n    Shake [200]\nend\n\nwhen I start as a clone\nif <(Clone ID) = [Name]> then\n    wait (9.86) seconds\n    Shake [200]\nend\n\nwhen I start as a clone\nif <(Clone ID) = [Name]> then\n    wait (11.41) seconds\n    repeat (34)\n        change [ghost v] effect by (4)\n        change size by (((30) - (size)) / (8))\n        go to x: (([sin v] of ((timer) * (1000)) ) * (((size) - (100)) * (0.1))) y: (([sin v] of ((timer) * (800)) ) * (((size) - (100)) * (0.1)))\n    end\n    delete this clone\nend\n\nwhen flag clicked\nwait (9.86) seconds\nCreate Clone [Cheveron]\n\ndefine Frame Tween Size: (s) speed: (spd)\nset [c v] to (costume [name v])\nswitch costume to (size hack v)\nchange size by (((round (s)) - (round (size))) / (spd))\nswitch costume to (c)\n\nwhen I start as a clone\nif <(Clone ID) = [Circles]> then\n    go to [front v] layer\n    go [backward v] (2) layers\n    show\n    switch costume to (circles v)\n    go to x: (0) y: (0)\n    set size to (1) %\n    point in direction (0)\n    set [ghost v] effect to (0)\n    repeat (38)\n        Frame Tween Size: [400] speed: [7]\n        Frame tween rotation: [90] speed: [13]\n        go to [front v] layer\n        go [backward v] (2) layers\n        change [ghost v] effect by ((100) / (38))\n        change [brightness v] effect by (3.3333)\n    end\n    delete this clone\nend\n\ndefine Frame tween rotation: (r) speed: (spd)\nturn right (((round (r)) - (round (direction))) / (spd)) degrees\n\nwhen flag clicked\nwait (3.49) seconds\nCreate Clone [Circles]\n\nwhen flag clicked\nwait (8.29) seconds\nCreate Clone [Circles]\n\nwhen I start as a clone\nif <(Clone ID) = [Grid]> then\n    switch costume to (size hack v)\n    set size to (100) %\n    switch costume to (grid v)\n    go to [back v] layer\n    go [forward v] (1) layers\n    show\n    set [ghost v] effect to (100)\n    set [brightness v] effect to (100)\n    repeat (50)\n        change [brightness v] effect by (-2)\n        change [ghost v] effect by (-2)\n    end\n    wait (2.9) seconds\n    switch costume to (diamonds v)\n    wait (1.65) seconds\n    switch costume to (hexagon pattern v)\n    wait (1.55) seconds\n    switch costume to (triangle pattern v)\n    wait (1.55) seconds\n    switch costume to (checkerboard pattern v)\n    wait (1.2) seconds\n    repeat (20)\n        change [brightness v] effect by (5)\n        change [ghost v] effect by (5)\n    end\n    delete this clone\nend\n\nwhen flag clicked\nwait (0) seconds\nwait (.5) seconds\nCreate Clone [Grid]\n\nwhen I start as a clone\nif <(Clone ID) = [Grid]> then\n    wait (3) seconds\n    point in direction (105)\n    repeat (10)\n        set [degrees v] to (((Degrees) * (0.75)) + (((90) - (direction)) / (3)))\n        turn right (Degrees) degrees\n    end\n    repeat (10)\n        set [degrees v] to (((Degrees) * (0.75)) + (((90) - (direction)) / (3)))\n        turn right (Degrees) degrees\n    end\nend\n\nwhen I start as a clone\nif <(Clone ID) = [Grid]> then\n    wait (4.6) seconds\n    point in direction (105)\n    repeat (10)\n        set [degrees v] to (((Degrees) * (0.75)) + (((90) - (direction)) / (3)))\n        turn right (Degrees) degrees\n    end\n    repeat (10)\n        set [degrees v] to (((Degrees) * (0.75)) + (((90) - (direction)) / (3)))\n        turn right (Degrees) degrees\n    end\nend\n\nwhen I start as a clone\nif <(Clone ID) = [Grid]> then\n    wait (6.24) seconds\n    point in direction (105)\n    repeat (10)\n        set [degrees v] to (((Degrees) * (0.75)) + (((90) - (direction)) / (3)))\n        turn right (Degrees) degrees\n    end\n    repeat (10)\n        set [degrees v] to (((Degrees) * (0.75)) + (((90) - (direction)) / (3)))\n        turn right (Degrees) degrees\n    end\nend\n\nwhen I start as a clone\nif <(Clone ID) = [Grid]> then\n    wait (7.8) seconds\n    point in direction (105)\n    repeat (10)\n        set [degrees v] to (((Degrees) * (0.75)) + (((90) - (direction)) / (3)))\n        turn right (Degrees) degrees\n    end\n    repeat (10)\n        set [degrees v] to (((Degrees) * (0.75)) + (((90) - (direction)) / (3)))\n        turn right (Degrees) degrees\n    end\nend\n\nwhen I start as a clone\nif <(Clone ID) = [Grid]> then\n    wait (9.4) seconds\n    point in direction (105)\n    repeat (10)\n        set [degrees v] to (((Degrees) * (0.75)) + (((90) - (direction)) / (3)))\n        turn right (Degrees) degrees\n    end\n    repeat (10)\n        set [degrees v] to (((Degrees) * (0.75)) + (((90) - (direction)) / (3)))\n        turn right (Degrees) degrees\n    end\nend\n\nwhen I start as a clone\nif <(Clone ID) = [Name]> then\n    wait (4.38) seconds\n    Shake [200]\nend\n\nwhen I start as a clone\nif <(Clone ID) = [Name]> then\n    wait (5.9) seconds\n    Shake [200]\nend\n\nwhen I start as a clone\nif <(Clone ID) = [Name]> then\n    wait (7.51) seconds\n    Shake [200]\nend\n\nwhen I start as a clone\nif <(Clone ID) = [Name]> then\n    wait (9.02) seconds\n    Shake [200]\nend\n\nwhen I start as a clone\nif <(Clone ID) = [Name]> then\n    wait (10.6) seconds\n    Shake [200]\nend\n\nwhen I start as a clone\nif <(Clone ID) = [Grid]> then\n    wait (3.88) seconds\n    point in direction (105)\n    repeat (10)\n        set [degrees v] to (((Degrees) * (0.75)) + (((90) - (direction)) / (3)))\n        turn right (Degrees) degrees\n    end\n    repeat (10)\n        set [degrees v] to (((Degrees) * (0.75)) + (((90) - (direction)) / (3)))\n        turn right (Degrees) degrees\n    end\nend\n\nwhen I start as a clone\nif <(Clone ID) = [Grid]> then\n    wait (5.4) seconds\n    point in direction (105)\n    repeat (10)\n        set [degrees v] to (((Degrees) * (0.75)) + (((90) - (direction)) / (3)))\n        turn right (Degrees) degrees\n    end\n    repeat (10)\n        set [degrees v] to (((Degrees) * (0.75)) + (((90) - (direction)) / (3)))\n        turn right (Degrees) degrees\n    end\nend\n\nwhen I start as a clone\nif <(Clone ID) = [Grid]> then\n    wait (7) seconds\n    point in direction (105)\n    repeat (10)\n        set [degrees v] to (((Degrees) * (0.75)) + (((90) - (direction)) / (3)))\n        turn right (Degrees) degrees\n    end\n    repeat (10)\n        set [degrees v] to (((Degrees) * (0.75)) + (((90) - (direction)) / (3)))\n        turn right (Degrees) degrees\n    end\nend\n\nwhen I start as a clone\nif <(Clone ID) = [Grid]> then\n    wait (8.5) seconds\n    point in direction (105)\n    repeat (10)\n        set [degrees v] to (((Degrees) * (0.75)) + (((90) - (direction)) / (3)))\n        turn right (Degrees) degrees\n    end\n    repeat (10)\n        set [degrees v] to (((Degrees) * (0.75)) + (((90) - (direction)) / (3)))\n        turn right (Degrees) degrees\n    end\nend\n\nwhen I start as a clone\nif <(Clone ID) = [Grid]> then\n    wait (10.1) seconds\n    point in direction (105)\n    repeat (10)\n        set [degrees v] to (((Degrees) * (0.75)) + (((90) - (direction)) / (3)))\n        turn right (Degrees) degrees\n    end\n    repeat (10)\n        set [degrees v] to (((Degrees) * (0.75)) + (((90) - (direction)) / (3)))\n        turn right (Degrees) degrees\n    end\nend\n\nwhen I start as a clone\nif <(Clone ID) = [Lines]> then\n    show\n    go to [front v] layer\n    go [backward v] (2) layers\n    clear graphic effects\n    go to x: (0) y: (0)\n    set size to (1) %\n    switch costume to (1 v)\n    set [line size v] to [20]\n    repeat (15)\n        change size by (Line Size)\n        change [line size v] by (-1)\n        next costume\n    end\n    repeat (20)\n        change [ghost v] effect by (20)\n        change size by (Line Size)\n    end\nend\n\nwhen flag clicked\nwait (4.4) seconds\nCreate Clone [Lines]\n\nwhen flag clicked\nwait (5.92) seconds\nCreate Clone [Lines]\n\nwhen flag clicked\nwait (7.53) seconds\nCreate Clone [Lines]\n\nwhen flag clicked\nwait (10.62) seconds\nCreate Clone [Lines]\n\nwhen I start as a clone\nif <(Clone ID) = [Screen]> then\n    go to x: (0) y: (0)\n    set [whirl v] to [200]\n    set [whirl: v] to [0]\n    point in direction (70)\n    repeat (25)\n        set [whirl # v] to (((Whirl #) * (.2)) + (((Whirl:) - (Whirl)) / (5)))\n        change [whirl v] by (Whirl #)\n        set [whirl v] effect to (Whirl)\n        set [bounce v] to (((Bounce) * (.2)) + (((90) - (direction)) / (5)))\n        turn right (Bounce) degrees\n    end\n    set [whirl v] to [200]\n    set [whirl: v] to [0]\nend\n\nwhen I start as a clone\nif <(Clone ID) = [Screen]> then\n    wait (1.54) seconds\n    go to x: (0) y: (0)\n    set [whirl v] to [200]\n    set [whirl: v] to [0]\n    point in direction (70)\n    repeat (25)\n        set [whirl # v] to (((Whirl #) * (.2)) + (((Whirl:) - (Whirl)) / (5)))\n        change [whirl v] by (Whirl #)\n        set [whirl v] effect to (Whirl)\n        set [bounce v] to (((Bounce) * (.2)) + (((90) - (direction)) / (5)))\n        turn right (Bounce) degrees\n    end\n    set [whirl v] to [200]\n    set [whirl: v] to [0]\nend\n\nwhen I start as a clone\nif <(Clone ID) = [Screen]> then\n    wait (3.15) seconds\n    go to x: (0) y: (0)\n    set [whirl v] to [200]\n    set [whirl: v] to [0]\n    point in direction (70)\n    repeat (25)\n        set [whirl # v] to (((Whirl #) * (.2)) + (((Whirl:) - (Whirl)) / (5)))\n        change [whirl v] by (Whirl #)\n        set [whirl v] effect to (Whirl)\n        set [bounce v] to (((Bounce) * (.2)) + (((90) - (direction)) / (5)))\n        turn right (Bounce) degrees\n    end\n    set [whirl v] to [200]\n    set [whirl: v] to [0]\nend\n\nwhen I start as a clone\nif <(Clone ID) = [Screen]> then\n    wait (4.73) seconds\n    go to x: (0) y: (0)\n    set [whirl v] to [200]\n    set [whirl: v] to [0]\n    point in direction (70)\n    repeat (25)\n        set [whirl # v] to (((Whirl #) * (.2)) + (((Whirl:) - (Whirl)) / (5)))\n        change [whirl v] by (Whirl #)\n        set [whirl v] effect to (Whirl)\n        set [bounce v] to (((Bounce) * (.2)) + (((90) - (direction)) / (5)))\n        turn right (Bounce) degrees\n    end\n    set [whirl v] to [200]\n    set [whirl: v] to [0]\nend\n\nwhen I start as a clone\nif <(Clone ID) = [Screen]> then\n    wait (6.31) seconds\n    go to x: (0) y: (0)\n    set [whirl v] to [200]\n    set [whirl: v] to [0]\n    point in direction (70)\n    repeat (25)\n        set [whirl # v] to (((Whirl #) * (.2)) + (((Whirl:) - (Whirl)) / (5)))\n        change [whirl v] by (Whirl #)\n        set [whirl v] effect to (Whirl)\n        set [bounce v] to (((Bounce) * (.2)) + (((90) - (direction)) / (5)))\n        turn right (Bounce) degrees\n    end\n    set [whirl v] to [200]\n    set [whirl: v] to [0]\nend\n\nwhen flag clicked\nswitch costume to (name v)\n\nwhen flag clicked\nwait (9.02) seconds\nCreate Clone [Arrow1]\nCreate Clone [Arrow2]\n\nwhen flag clicked\nwait (14) seconds\nbroadcast (start v)\n\nwhen flag clicked\nCreate Clone [Background]\nwait (3.55) seconds\nCreate Clone [Screen]\n\n@スプライト3\n\nwhen flag clicked\nhide\n\nwhen I receive [start v]\nshow\n\nwhen flag clicked\ngo to x: (0) y: (-130)\nforever\n    if <<touching (mouse-pointer v)?> and <mouse down?>> then\n        broadcast (撃つ v)\n        set [ボール v] to [0]\n    end\nend\n\n@題名\n\nwhen flag clicked\ngo to [front v] layer\nshow\nset [ghost v] effect to (100)\ngo to x: (0) y: (0)\n\n