忍者×Platformer【1】

Instructions: 　　　　　　　　【Ninja×Platformer】\n▶English\n1, Operate with arrow keys.\n2, Fire with space key.\n3, Please ☆and♡.\n\n▶日本語\n1, 矢印キーで操作\n2, スペースキーで攻撃\n3. ☆と♡を押す\nーーーーーーーーーーーーーーーーーーーーーーーーー\n■クレジット表記\nBGM　六三四~ナルト youtube\nPlayerプログラム参考　@madrid2030　様\nintro @t9decode 様\nーーーーーーーーーーーーーーーーーーーーーーーーー\n■タイム記録\n作者　25秒\n弟　　23秒\n\n15秒~20秒　神\n20秒~25秒　プロ\n25秒~30秒　下忍\n35秒~40秒　初心者\nーーーーーーーーーーーーーーーーーーーーーーーーー\n▶タグ表記\n#game　#game　#game　#all　#alwep\n\n　 

@Stage\n\nwhen flag clicked\nswitch backdrop to (背景1 v)\n\nwhen I receive [game v]\nswitch backdrop to (背景2 v)\nforever\n    if <(LV) = [7]> then\n        switch backdrop to (背景3 v)\n    end\nend\n\n@player\n\nwhen I receive [game v]\nforever\n    if <<[240] < (x position)> and <(dead?) = [0]>> then\n        broadcast (NAXT LEVEL v)\n        change [lv v] by (1)\n        Reset || Madrid2030\n    end\nend\n\nwhen flag clicked\nhide variable [xv v]\nhide variable [dead? v]\nhide variable [lv v]\nhide variable [yv v]\nhide\n\nwhen I receive [game v]\nset [dead? v] to [0]\nset [lv v] to [1]\nset size to (40) %\nReset || Madrid2030\nforever\n    go to [front v] layer\n    if <<<<key (right arrow v) pressed?> or <key (d v) pressed?>> or <<mouse down?> and <(mouse x) > (x position)>>> and <(dead?) = [0]>> then\n        switch costume to (1 v)\n        change [xv v] by (1)\n    end\n    if <<<<key (left arrow v) pressed?> or <key (a v) pressed?>> or <<mouse down?> and <(mouse x) < (x position)>>> and <(dead?) = [0]>> then\n        switch costume to (2 v)\n        change [xv v] by (-1)\n    end\n    set [xv v] to ((Xv) * (.9))\n    change x by (Xv)\n    if <touching (地面 v)?> then\n        change y by (2)\n        if <touching (地面 v)?> then\n            change y by (2)\n        end\n        if <touching (地面 v)?> then\n            change y by (2)\n            if <touching (地面 v)?> then\n                change y by (2)\n                if <touching (地面 v)?> then\n                    change y by (2)\n                    if <touching (地面 v)?> then\n                        change x by ((Xv) * (-2))\n                        change y by (-5)\n                        if <<key (up arrow v) pressed?> or <<key (w v) pressed?> or <<mouse down?> and <(mouse y) > ((y position) + (10))>>>> then\n                            if <(Xv) > [0]> then\n                                set [xv v] to [-5]\n                            else\n                                set [xv v] to [5]\n                            end\n                            set [yv v] to [13]\n                        else\n                            set [xv v] to [0]\n                        end\n                    end\n                end\n            end\n        end\n    end\n    change [yv v] by (-0.8)\n    change y by (Yv)\n    if <touching (地面 v)?> then\n        change y by ((Yv) * (-1))\n        set [yv v] to [0]\n    end\n    change y by (-1)\n    if <touching (地面 v)?> then\n        if <<key (up arrow v) pressed?> or <<key (w v) pressed?> or <<mouse down?> and <(mouse y) > ((y position) + (10))>>>> then\n            set [yv v] to [12]\n        end\n    end\n    change y by (1)\n    if <<<<touching (トゲ v)?> or <touching (acid v)?>> or <touching (teki v)?>> or <touching (teki2 v)?>> then\n        start sound [Prick v]\n        Dead || Madrid2030\n    end\n    if <(y position) < [-180]> then\n        Dead || Madrid2030\n    end\n    if <touching (bouncy v)?> then\n        start sound [Jump v]\n        set [yv v] to [20]\n    end\nend\n\nwhen I receive [game v]\nset [lv v] to [1]\nforever\n    create clone of (_myself_ v)\nend\n\ndefine Reset || Madrid2030\nclear graphic effects\npoint in direction (90)\ngo to x: (-201) y: (30)\nswitch costume to (1 v)\nset [dead? v] to [0]\nset [xv v] to [0]\nset [yv v] to [0]\nset size to (22) %\nshow\n\ndefine Dead || Madrid2030\nset [dead? v] to [1]\nrepeat (25)\n    change [ghost v] effect by (4)\n    change y by (4)\n    turn right (4) degrees\nend\nReset || Madrid2030\n\nwhen I start as a clone\nswitch costume to (3 v)\nrepeat (10)\n    change [ghost v] effect by (10)\n    change size by (-1.5)\nend\ndelete this clone\n\nwhen flag clicked\n\nbroadcast (game v)\n\nwhen I receive [game v]\nshow variable [秒seconds v]\nforever\n    repeat until <(LV) = [9]>\n        change [秒seconds v] by (1)\n        wait (1) seconds\n    end\nend\n\nset [製作者記録producer record v] to [0]\n\nwait (1) seconds\n\nwhen flag clicked\nset [秒seconds v] to [0]\n\nwhen flag clicked\nhide variable [秒seconds v]\n\nturn right (15) degrees\n\n@イントロ\n\ndefine clone (n)\nset [clone name v] to (n)\ncreate clone of (_myself_ v)\n\ndefine hexa black\nset [hexa y v] to [4]\nrepeat (4)\n    set [hexa x v] to [-5]\n    repeat (11)\n        clone [hexa black]\n        change [hexa x v] by (1)\n    end\n    change [hexa y v] by (-1)\n    set [hexa x v] to [-4.5]\n    repeat (10)\n        clone [hexa black]\n        change [hexa x v] by (1)\n    end\n    change [hexa y v] by (-1)\nend\nset [hexa x v] to [-5]\nrepeat (11)\n    clone [hexa black]\n    change [hexa x v] by (1)\nend\nchange [hexa y v] by (-1)\nset [hexa x v] to [-4.5]\n\nwhen I start as a clone\nif < (clone name) contains [hexa]?> then\n    if <(clone name) = [hexa black]> then\n        set [brightness v] effect to (20)\n    else\n        set [brightness v] effect to (96)\n    end\n    set size to (0) %\n    switch costume to (big v)\n    go to x: ((hexa x) * (50)) y: ((hexa y) * ((86.6) / (2)))\n    switch costume to (hexa v)\n    wait ((([abs v] of (x position) ) / (600)) + (([abs v] of (y position) ) / (600))) seconds\n    show\n    repeat until <[52] < (size)>\n        switch costume to (big v)\n        change size by (((53) - (size)) / (4))\n        go to x: ((hexa x) * (50)) y: ((hexa y) * ((86.6) / (2)))\n        switch costume to (hexa v)\n    end\nend\n\ndefine hexa white\nset [hexa y v] to [4]\nrepeat (4)\n    set [hexa x v] to [-5]\n    repeat (11)\n        clone [hexa white]\n        change [hexa x v] by (1)\n    end\n    change [hexa y v] by (-1)\n    set [hexa x v] to [-4.5]\n    repeat (10)\n        clone [hexa white]\n        change [hexa x v] by (1)\n    end\n    change [hexa y v] by (-1)\nend\nset [hexa x v] to [-5]\nrepeat (11)\n    clone [hexa white]\n    change [hexa x v] by (1)\nend\nchange [hexa y v] by (-1)\n\nwhen flag clicked\nstart sound [Royalty Free - Fast Spin Logo Intro v]\nhexa black\nwait (0.2) seconds\nhexa white\nwait (0.3) seconds\nclone [made by t9decode]\nclone [YOURLOGO]\nwait (1.3) seconds\nbroadcast (hexa disappear v)\n\nwhen I receive [hexa disappear v]\nif < (clone name) contains [hexa]?> then\n    if <(clone name) = [hexa black]> then\n        wait ((([abs v] of (x position) ) + ((y position) + (180))) / (500)) seconds\n    else\n        wait ((([abs v] of (x position) ) + ([abs v] of ((y position) - (180)) )) / (500)) seconds\n    end\n    set [hexa y v] to [1.5]\n    repeat until <([abs v] of (y position) ) > [220]>\n        switch costume to (big v)\n        change [hexa y v] by ((hexa y) / (5))\n        if <(clone name) = [hexa black]> then\n            change y by ((hexa y) / (-5))\n        else\n            change y by ((hexa y) / (5))\n        end\n        switch costume to (hexa v)\n    end\n    delete this clone\nend\nif <(clone name) = [YOURLOGO]> then\n    wait (0.2) seconds\n    set [ghost effect count v] to [1]\n    repeat until <[100] < (ghost effect count)>\n        change [ghost effect count v] by ((ghost effect count) / (10))\n        set [ghost v] effect to (ghost effect count)\n        change size by ((ghost effect count) / (5))\n    end\n    delete this clone\nend\nif <(clone name) = [made by t9decode]> then\n    wait (0.3) seconds\n    repeat (20)\n        change [ghost v] effect by (1.25)\n    end\n    delete this clone\nend\nbroadcast (game v)\n\nwhen I start as a clone\nif <(clone name) = [YOURLOGO]> then\n    show\n    set size to (1) %\n    go to x: (0) y: (5)\n    set [ghost v] effect to (100)\n    switch costume to (yourlogo v)\n    go to [front v] layer\n    repeat until <[50] < (size)>\n        change size by ((size) / (3))\n        change [ghost v] effect by (-5)\n    end\n    repeat until <[100] < (size)>\n        change size by (((101) - (size)) / (5))\n        change [ghost v] effect by (-5)\n    end\nend\n\nif <(clone name) = [hexa effect]> then\n    show\n    set size to (0) %\n    set [hexa costume v] to [5]\n    repeat until <(costume [number v]) = [16]>\n        switch costume to (round (hexa costume))\n        change [hexa costume v] by (((16) - (hexa costume)) / (4))\n        change size by (((500) - (size)) / (3.5))\n    end\n    delete this clone\nend\n\nwhen I start as a clone\nif <(clone name) = [made by t9decode]> then\n    show\n    set size to (75) %\n    go to x: (0) y: (-150)\n    set [ghost v] effect to (100)\n    switch costume to (made by t9decode v)\n    go to [front v] layer\n    repeat (10)\n        change [ghost v] effect by (-2.5)\n    end\nend\n\n@地面\n\nwhen flag clicked\nhide\n\nwhen I receive [game v]\nset [lv v] to [1]\nshow\ngo to x: (32) y: (-155)\nforever\n    if <(LV) = [1]> then\n        switch costume to (3 v)\n    else\n        if <(LV) = [2]> then\n            switch costume to (2 v)\n        else\n            if <(LV) = [3]> then\n                switch costume to (4 v)\n            else\n                if <(LV) = [4]> then\n                    switch costume to (5 v)\n                else\n                    if <(LV) = [5]> then\n                        switch costume to (6 v)\n                    else\n                        if <(LV) = [6]> then\n                            switch costume to (コスチューム1 v)\n                        else\n                            if <(LV) = [7]> then\n                                switch costume to (コスチューム2 v)\n                            else\n                                if <(LV) = [8]> then\n                                    switch costume to (コスチューム3 v)\n                                else\n                                    if <(LV) = [9]> then\n                                        switch costume to (コスチューム4 v)\n                                    end\n                                end\n                            end\n                        end\n                    end\n                end\n            end\n        end\n    end\nend\n\n@字幕\n\nwhen I receive [game v]\nforever\n    play sound [六三四 - Naruto Main Theme v] until done\nend\n\nwhen I receive [game v]\nshow\nforever\n    if <(LV) = [1]> then\n        switch costume to (コスチューム1 v)\n    else\n        if <(LV) = [2]> then\n            switch costume to (コスチューム2 v)\n        else\n            if <(LV) = [4]> then\n                switch costume to (コスチューム3 v)\n            else\n                if <(LV) = [7]> then\n                    switch costume to (コスチューム5 v)\n                else\n                    if <(LV) = [9]> then\n                        hide\n                    end\n                end\n            end\n        end\n    end\nend\n\nwhen flag clicked\nhide\n\n@雲\n\nwhen flag clicked\nhide\n\nwhen I start as a clone\nset size to (100) %\nshow\nswitch costume to (pick random (1) to (5))\nif <(pick random (1) to (2)) = [2]> then\n    set [d v] to [-250]\nelse\n    set [d v] to [250]\nend\ngo to x: (d) y: (pick random (130) to (150))\nset [ghost v] effect to (pick random (40) to (70))\nif <(d) = [250]> then\n    repeat until <(x position) < [-267]>\n        change x by (pick random (-1) to (-3))\n        go to [back v] layer\n        go to [back v] layer\n        go [backward v] (999) layers\n    end\nelse\n    repeat until <(x position) > [267]>\n        change x by (pick random (1) to (3))\n        go to [back v] layer\n        go to [back v] layer\n        go [backward v] (999) layers\n    end\nend\ndelete this clone\n\nwhen flag clicked\nset [ghost v] effect to (0)\nforever\n    hide\n    create clone of (_myself_ v)\n    wait (pick random (1.5) to (3)) seconds\nend\n\n@トゲ\n\nwhen I receive [game v]\ngo to x: (134) y: (-11)\ngo to [back v] layer\nforever\n    if <(LV) = [2]> then\n        switch costume to (コスチューム1 v)\n        show\n    else\n        if <(LV) = [3]> then\n            switch costume to (コスチューム2 v)\n        else\n            if <(LV) = [4]> then\n                switch costume to (コスチューム3 v)\n            else\n                if <(LV) = [5]> then\n                    switch costume to (コスチューム4 v)\n                else\n                    if <(LV) = [6]> then\n                        switch costume to (コスチューム5 v)\n                    else\n                        if <(LV) = [7]> then\n                            switch costume to (コスチューム6 v)\n                        else\n                            if <(LV) = [8]> then\n                                show\n                                set rotation style [all around v]\n                                go to [back v] layer\n                                go to x: (278) y: (18)\n                                switch costume to (コスチューム7 v)\n                                glide (1.5) secs to x: (-161) y: (-68)\n                                hide\n                                wait (0.3) seconds\n                            else\n                                if <(LV) = [9]> then\n                                    hide\n                                end\n                            end\n                        end\n                    end\n                end\n            end\n        end\n    end\nend\n\nwhen flag clicked\nhide\n\n@kunai\n\nwhen flag clicked\nhide\n\nwhen [space v] key pressed\ngo to (player v)\nshow\nrepeat until <(x position) = [253]>\n    change x by (15)\n    if  then\n        hide\n    end\nend\nhide\n\nwhen [space v] key pressed\nstart sound [Low Whoosh v]\nwait (1) seconds\n\n@teki2\n\nwhen flag clicked\nhide\n\nwhen I receive [game v]\nforever\n    if <touching (kunai v)?> then\n        start sound [Teleport2 v]\n        hide\n        stop [other scripts in sprite v]\n    end\nend\n\nwhen I receive [game v]\nforever\n    if <(LV) = [6]> then\n        go to x: (4) y: (-45)\n        show\n    end\nend\n\n@teki\n\nif <(LV) = [5]> then\nelse\nend\n\nwhen flag clicked\nhide\n\nwhen I receive [game v]\nforever\n    if <touching (kunai v)?> then\n        start sound [Teleport2 v]\n        hide\n        stop [other scripts in sprite v]\n    end\nend\n\nwhen I receive [game v]\nforever\n    if <(LV) = [5]> then\n        show\n    end\nend\n\nwhen I receive [game v]\nforever\n    repeat until <touching (kunai v)?>\n        switch costume to (コスチューム1 v)\n        go to x: (192) y: (25)\n        glide (1.4) secs to x: (-18) y: (25)\n        switch costume to (コスチューム2 v)\n        glide (1.2) secs to x: (192) y: (25)\n    end\nend\n\n@サムネ\n\nwhen flag clicked\nset [ghost v] effect to (100)\ngo to x: (36) y: (28)\nshow\n\n@スプライト1\n\n@スプライト2\n\nwhen flag clicked\nhide\n\nwhen I receive [game v]\nforever\n    if <(LV) = [9]> then\n        show\n        go to x: (36) y: (28)\n    end\nend\n\n