*:Valley:*　A Platformer      #games#game#Platformer
@Stage\n\nwhen flag clicked\nswitch backdrop to (背景2 v)\n\nwhen I receive [始まり始まり v]\nswitch backdrop to (背景1 v)\n\n@プレイヤー\n\ndefine 始め\nswitch costume to (コスチューム1 v)\ngo to x: (-225) y: (40)\nwait (0.3) seconds\nset [x v] to [8]\nset [y v] to [5]\n\ndefine 左右\nif <(はい変数) = [0]> then\n    if <<key (right arrow v) pressed?> or <<key (d v) pressed?> or <<mouse down?> and <(mouse x) > [0]>>>> then\n        switch costume to (コスチューム2 v)\n        change [x v] by (0.9)\n    end\n    if <<key (left arrow v) pressed?> or <<key (a v) pressed?> or <<mouse down?> and <[0] > (mouse x)>>>> then\n        switch costume to (コスチューム3 v)\n        change [x v] by (-0.9)\n    end\n    change x by (X)\n    set [x v] to ((X) * (0.9))\nend\n\ndefine 上\nif <touching (地面 v)?> then\n    change y by (1)\nend\nif <touching (地面 v)?> then\n    change y by (1)\nend\nif <touching (地面 v)?> then\n    change y by (1)\nend\nif <touching (地面 v)?> then\n    change y by (1)\nend\nif <(はい変数) = [0]> then\n    if <touching (地面 v)?> then\n        change y by (-3)\n        change x by ((X) * (-1.16))\n        if <<key (w v) pressed?> or <<key (up arrow v) pressed?> or <<(mouse y) > [20]> and <mouse down?>>>> then\n            switch costume to (コスチューム1 v)\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 [14]\n        else\n            set [x v] to [0]\n        end\n    end\n    change y by (-1)\n    if <touching (地面 v)?> then\n        if <<key (w v) pressed?> or <<key (up arrow v) pressed?> or <<(mouse y) > [20]> and <mouse down?>>>> then\n            set [y v] to [14]\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\nend\n\nwhen flag clicked\nhide variable [時間 v]\nhide\n\ndefine １\nreset timer\nhide variable [stage v]\nshow\nset [stage v] to [1]\n始め\ngo to [front v] layer\n\ndefine ２\nif <(x position) > [239]> then\n    broadcast (次 v)\n    change [stage v] by (1)\n    hide\n    wait (3) seconds\n    show\n    始め\nend\nif <(y position) < [-179]> then\n    broadcast (うわ～死んでるだぁさー v)\n    始め\nend\nif <touching (とげ v)?> then\n    broadcast (うわ～死んでるだぁさー v)\n    始め\nend\n\nwhen I receive [始まり始まり v]\nshow\n１\nforever\n    左右\n    上\n    ２\nend\n\nwhen I receive [次 v]\n\nwhen I receive [始まり始まり v]\nrepeat until <(stage) = [10]>\n    change [時間 v] by (timer)\nend\nset [時間 v] to (timer)\nwait (3) seconds\nshow variable [時間 v]\n\nwhen I receive [次 v]\n始め\n\n@地面\n\nwhen flag clicked\nhide\nswitch costume to (コスチューム1 v)\n\nwhen I receive [始まり始まり v]\nshow\n\nwhen I receive [次 v]\nnext costume\n\n@とげ\n\nwhen flag clicked\n軽くしよう\n\nwhen I receive [nextstage v]\nnext costume\nbroadcast (はい v)\n\ndefine 軽くしよう\ngo to x: (0) y: (0)\nswitch costume to (コスチューム1 v)\nset [上下 v] to [0]\nforever\n    go to [back v] layer\n    repeat (30)\n        change [上下 v] by (-0.05)\n        set [上下 v] to ((上下) * (0.9))\n        change y by (上下)\n    end\n    repeat (30)\n        change [上下 v] by (0.05)\n        set [上下 v] to ((上下) * (0.9))\n        change y by (上下)\n    end\nend\n\nwhen I receive [次 v]\nnext costume\n\nwhen flag clicked\nswitch costume to (コスチューム1 v)\n\n@イントロ\n\nwhen flag clicked\nset size to (200) %\nset [クローン判定 v] to [0]\nswitch costume to ( v)\nrepeat (5)\n    change [クローン判定 v] by (1)\n    create clone of (_myself_ v)\nend\n\ndefine A･Ｚ･R･I･Y (x)\nshow\ngo to x: (x) y: (180)\nrepeat (10)\n    change y by ((-1) - ((y position) / (3)))\n    turn right ((30.2) - ((direction) / (3))) degrees\nend\n\nwhen I start as a clone\nif <(クローン判定) = [1]> then\n    switch costume to (a v)\n    A･Ｚ･R･I･Y [-100]\n    wait (0.2) seconds\n    三〇　〇三左\nelse\n    if <(クローン判定) = [2]> then\n        switch costume to (az v)\n        A･Ｚ･R･I･Y [-50]\n        wait (0.16) seconds\n        三〇　〇三左\n    else\n        if <(クローン判定) = [3]> then\n            switch costume to (azr v)\n            A･Ｚ･R･I･Y [0]\n            wait (1.5) seconds\n            glide (0.2) secs to x: (250) y: (0)\n            hide\n        else\n            if <(クローン判定) = [4]> then\n                switch costume to (azri v)\n                A･Ｚ･R･I･Y [50]\n                wait (0.08) seconds\n                三〇　〇三右\n            else\n                if <(クローン判定) = [5]> then\n                    switch costume to (azriy v)\n                    A･Ｚ･R･I･Y [100]\n                    wait (0.04) seconds\n                    三〇　〇三右\n                end\n            end\n        end\n    end\nend\nwait (0.3) seconds\nbroadcast (始まり始まり v)\n\ndefine 三〇　〇三右\nrepeat (16)\n    change x by ((x position) * (0.03))\nend\nif <(costume [number v]) = [6]> then\n    glide (0.1) secs to x: (40) y: (0)\n    start sound [Finger Snap v]\nelse\n    glide (0.1) secs to x: (80) y: (0)\nend\nwait (0.7) seconds\nglide (0.2) secs to x: (250) y: (0)\nhide\n\ndefine 三〇　〇三左\nrepeat (16)\n    change x by ((x position) * (0.03))\nend\nif <(costume [number v]) = [3]> then\n    glide (0.1) secs to x: (-80) y: (0)\nelse\n    glide (0.1) secs to x: (-40) y: (0)\nend\nwait (0.7) seconds\nglide (0.2) secs to x: (250) y: (0)\nhide\n\n@Next!\n\nwhen I receive [次 v]\n＋\n\ndefine clone (cloneid)\nswitch costume to (cloneid)\ncreate clone of (_myself_ v)\n\nwhen I start as a clone\nshow\nif <<(costume [number v]) = [1]> or <<(costume [number v]) = [2]> or <<(costume [number v]) = [3]> or <<(costume [number v]) = [4]> or <(costume [number v]) = [5]>>>>> then\n    go to x: (468) y: (0)\n    repeat until <(round (x position)) = [0]>\n        change x by (((0) - (x position)) / (7))\n    end\nend\n\nwhen I start as a clone\nif <(costume [number v]) = [1]> then\n    wait (2.2) seconds\n    repeat until <[465] < (x position)>\n        change x by ((1) + ((x position) / (4)))\n    end\n    delete this clone\nend\nif <(costume [number v]) = [2]> then\n    wait (2.1) seconds\n    repeat until <[465] < (x position)>\n        change x by ((1) + ((x position) / (4)))\n    end\n    delete this clone\nend\nif <(costume [number v]) = [3]> then\n    wait (2) seconds\n    repeat until <[465] < (x position)>\n        change x by ((1) + ((x position) / (4)))\n    end\n    delete this clone\nend\nif <(costume [number v]) = [4]> then\n    wait (1.9) seconds\n    repeat until <[465] < (x position)>\n        change x by ((1) + ((x position) / (4)))\n    end\n    delete this clone\nend\nif <(costume [number v]) = [5]> then\n    wait (1.8) seconds\n    repeat until <[330] < (x position)>\n        change x by ((1) + ((x position) / (4)))\n    end\n    delete this clone\nend\n\ndefine ＋\nbroadcast (新たな音をならs v)\nhide\nclone [1]\nwait (0.05) seconds\nclone [2]\nwait (0.05) seconds\nclone [3]\nwait (0.05) seconds\nclone [4]\nwait (0.05) seconds\nclone [5]\n\n@サムネだぅ\n\nwhen flag clicked\nforever\n    set [ghost v] effect to (100)\n    go to [front v] layer\nend\n\n@音様や\n\nwhen flag clicked\nswitch costume to (音様や v)\n軽くしよう\n\nwhen flag clicked\nhide\n\ndefine 軽くしよう\nforever\n    go to x: (-200) y: (140)\n    if <(costume [number v]) = [1]> then\n        set volume to (100) %\n    end\n    if <(costume [number v]) = [2]> then\n        set volume to (50) %\n    end\n    if <(costume [number v]) = [3]> then\n        set volume to (0) %\n    end\nend\n\nwhen flag clicked\nforever\n    if <<mouse down?> and <touching (mouse-pointer v)?>> then\n        next costume\n        wait (0.1) seconds\n    end\nend\n\nwhen I receive [始まり始まり v]\nshow\ngo to [front v] layer\nforever\n    play sound [Nebula v] until done\nend\n\nwhen I receive [うわ～死んでるだぁさー v]\nstart sound [ﾀﾋぬ v]\n\nwhen I receive [新たな音をならs v]\nstart sound [High Whoosh v]\n\n
普通の操作ですよ。\n\n↑適当ですみません\n\n星が欲しい、ハートが欲しい!!\n