【モバイル対応】Dot Mario Platformer/ドットマリオプラットフォーマー #Games #All #Mario #Dot #Platformer #S_Fes 
@Stage\n\nwhen flag clicked\nset volume to (50) %\nforever\n    play sound [3D 地上 v] until done\nend\n\nswitch backdrop to (空 v) and wait\n\n@プレイヤー\n\ndefine 初期設定\nset [命 v] to [ある]\nset [ｙ v] to [0]\nset [ｘ v] to [0]\ngo to x: (-200) y: (0)\nset rotation style [left-right v]\npoint in direction (90)\nset [ghost v] effect to (0)\nswitch costume to (普通 v)\ngo to [front v] layer\ngo [backward v] (2) layers\nset size to (350) %\nshow\n\nwhen flag clicked\nset [ステージ v] to [1]\n初期設定\nforever\n    if <(命) = [ある]> then\n        if <<<key (right arrow v) pressed?> or <key (d v) pressed?>> or <<[0] < (mouse x)> and <mouse down?>>> then\n            change [ｘ v] by (0.89)\n            point in direction (90)\n            if <touching (ステージ v)?> then\n                create clone of (走る v)\n            end\n        end\n        if <<<key (left arrow v) pressed?> or <key (a v) pressed?>> or <<(mouse x) < [0]> and <mouse down?>>> then\n            change [ｘ v] by (-0.89)\n            point in direction (-90)\n            if <touching (ステージ v)?> then\n                create clone of (走る v)\n            end\n        end\n        set [ｘ v] to ((ｘ) * (0.88))\n        change x by (ｘ)\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 ((0) - (ｘ))\n                                    change y by (-5)\n                                    if <<<key (up arrow v) pressed?> or <key (w v) pressed?>> or <<[0] < (mouse y)> and <mouse down?>>> then\n                                        if <[0] < (ｘ)> then\n                                            set [ｘ v] to [-7.5]\n                                        else\n                                            set [ｘ v] to [7.5]\n                                        end\n                                        set [ｙ v] to [12.5]\n                                    else\n                                        set [ｘ v] to [0]\n                                    end\n                                end\n                            end\n                        end\n                    end\n                end\n            end\n        end\n        change [ｙ v] by (-0.88)\n        change y by (ｙ)\n        if <touching (ステージ v)?> then\n            change y by ((0) - (ｙ))\n            set [ｙ v] to [0]\n        end\n        change y by (-2)\n        if <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 [ｙ v] to [14.5]\n                start sound [ジャンプ v]\n            end\n        end\n        change y by (1)\n        if <<(y position) < [-179]> or <<touching (トゲ v)?> or <touching (クリボー v)?>>> then\n            4んだ\n        end\n        if <touching (旗 v)?> then\n            change [ステージ v] by (1)\n            初期設定\n            broadcast (NEXT v)\n            wait (2.5) seconds\n        end\n    end\nend\n\ndefine 4んだ\npoint in direction (90)\nset rotation style [all around v]\nset [ghost v] effect to (0)\nswitch costume to (普通 v)\nset [4んだ ｙ v] to [13]\nset [命 v] to [ない]\nstart sound [う v]\nrepeat until <(4んだ ｙ) = [0]>\n    change [ghost v] effect by (4)\n    turn right (7) degrees\n    change y by (4んだ ｙ)\n    change [4んだ ｙ v] by (-1)\nend\nrepeat until <(y position) < [-179]>\n    change [ghost v] effect by (2.5)\n    turn right (8) degrees\n    change y by (4んだ ｙ)\n    change [4んだ ｙ v] by (-1)\nend\nset rotation style [left-right v]\npoint in direction (90)\nset [ｘ v] to [0]\nset [ｙ v] to [0]\nswitch costume to (普通 v)\nbroadcast (4んだ v)\nwait (0.05) seconds\nset [命 v] to [ある]\n初期設定\n\nwhen flag clicked\nforever\n    if <(命) = [ある]> then\n        if <<<<key (left arrow v) pressed?> or <key (a v) pressed?>> or <<(mouse x) < [0]> and <mouse down?>>> or <<<key (right arrow v) pressed?> or <key (d v) pressed?>> or <<[0] < (mouse x)> and <mouse down?>>>> then\n            switch costume to (右、左 v)\n        else\n            switch costume to (普通 v)\n        end\n    end\nend\n\nwait (1) seconds\n\nwhen I receive [踏んだ v]\nset [ｙ v] to [13]\n\n@ステージ\n\nwhen flag clicked\nswitch costume to (ステージ1 v)\nshow\n\nwhen I receive [next v]\nnext costume\n\n@トゲ\n\nwhen flag clicked\nswitch costume to (ステージ1 v)\ngo to [back v] layer\nshow\n\nwhen I receive [next v]\nnext costume\n\n@クリボー\n\ndefine Gravity (gravity) Jump Height (jump height) Speed (speed) Friction (friction) Slope (slope)\nif <not <touching (踏んだ判定 v)?>> then\n    change [yv v] by (gravity)\n    change y by (yv)\n    if <touching (ステージ v)?> then\n        repeat until <not <touching (ステージ v)?>>\n            change y by ((([abs v] of (yv) ) / (yv)) * (-1))\n        end\n        set [yv v] to (<<(y position) < (([x position v] of [プレイヤー v]) - (25))> and <(([abs v] of (YV) ) / (YV)) = [-1]>> * (jump height))\n    end\n    set [xv v] to (((xv) + ((<(x position) > ([x position v] of [プレイヤー v])> * ((speed) * (-1))) + (<(x position) < ([x position v] of [プレイヤー v])> * (speed)))) * (friction))\n    change x by (xv)\n    set [enemy: enemy - slope v] to [0]\n    repeat until <<(Enemy: Enemy - Slope) = ((slope) * (-1))> or <not <touching (ステージ v)?>>>\n        change y by (1)\n        change [enemy: enemy - slope v] by (-1)\n    end\n    if <touching (ステージ v)?> then\n        change y by (Enemy: Enemy - Slope)\n        repeat until <not <touching (ステージ v)?>>\n            change x by ((([abs v] of (xv) ) / (xv)) * (-1))\n        end\n    end\n    point towards (プレイヤー v)\n    if <(y position) < [-180]> then\n        delete this clone\n    end\nend\n\nwhen I receive [next v]\nrepeat (1)\n    delete this clone\nend\nwait (2.5) seconds\nif <(ステージ) = [7]> then\n    Clone at [80] [-40]\nelse\n    if <(ステージ) = [9]> then\n        Clone at [-40] [-40]\n        Clone at [50] [-40]\n    else\n        if <(ステージ) = [11]> then\n            Clone at [120] [-40]\n            Clone at [0] [-40]\n        end\n    end\nend\n\ndefine Clone at (x) (y)\ngo to x: (x) y: (y)\ncreate clone of (_myself_ v)\n\nwhen I start as a clone\nshow\nforever\n    if <not <(Switch In Progress) = [yes]>> then\n        Gravity [-1] Jump Height [5] Speed [0.35] Friction [.85] Slope [2]\n    end\nend\n\nwhen I receive [4んだ v]\nrepeat (1)\n    delete this clone\nend\nrepeat (5)\n    wait () seconds\nend\nif <(ステージ) = [7]> then\n    Clone at [80] [-40]\nelse\n    if <(ステージ) = [9]> then\n        Clone at [-40] [-40]\n        Clone at [50] [-40]\n    else\n        if <(ステージ) = [11]> then\n            Clone at [120] [-40]\n            Clone at [0] [-40]\n        end\n    end\nend\n\nwhen I start as a clone\nswitch costume to (普通 v)\nforever\n    if <touching (踏んだ判定 v)?> then\n        broadcast (踏んだ v)\n        switch costume to (ふみ v)\n        start sound [ふみ v]\n        wait (0.2) seconds\n        delete this clone\n    end\nend\n\nwhen flag clicked\ngo to [front v] layer\nhide\n\n@ドット絵 コイン\n\nwhen I receive [next v]\nrepeat (1)\n    delete this clone\nend\nwait (2.5) seconds\nif <(ステージ) = [2]> then\n    Clone at [-45] [15]\n    Clone at [0] [40]\n    Clone at [45] [15]\nelse\n    if <(ステージ) = [3]> then\n        Clone at [0] [150]\n    else\n        if <(ステージ) = [5]> then\n            Clone at [-45] [15]\n            Clone at [0] [40]\n            Clone at [45] [15]\n        else\n            if <(ステージ) = [6]> then\n                Clone at [-45] [15]\n                Clone at [0] [40]\n                Clone at [45] [15]\n            else\n                if <(ステージ) = [8]> then\n                    Clone at [-30] [135]\n                    Clone at [15] [75]\n                    Clone at [55] [15]\n                else\n                    if <(ステージ) = [10]> then\n                        Clone at [-95] [26]\n                        Clone at [-46] [55]\n                        Clone at [5] [26]\n                    else\n                        if <(ステージ) = [11]> then\n                            Clone at [0] [55]\n                        else\n                            if <(ステージ) = [12]> then\n                                Clone at [-140] [60]\n                                Clone at [-100] [60]\n                                Clone at [-60] [60]\n                                Clone at [-20] [60]\n                                Clone at [20] [60]\n                                Clone at [60] [60]\n                                Clone at [100] [60]\n                                Clone at [-140] [0]\n                                Clone at [-100] [0]\n                                Clone at [-60] [0]\n                                Clone at [-20] [0]\n                                Clone at [20] [0]\n                                Clone at [60] [0]\n                                Clone at [100] [0]\n                            end\n                        end\n                    end\n                end\n            end\n        end\n    end\nend\n\nwhen flag clicked\ngo to [front v] layer\nhide\n\ndefine Clone at (x) (y)\ngo to x: (x) y: (y)\ncreate clone of (_myself_ v)\n\nwhen I start as a clone\nset [brightness v] effect to (5)\nset [ghost v] effect to (0)\nswitch costume to (coin v)\ngo to [back v] layer\nset size to (100) %\nshow\nforever\n    if <(命) = [ある]> then\n        if <touching (プレイヤー v)?> then\n            start sound [coin v]\n            switch costume to (coin2 v)\n            repeat (5)\n                change [ghost v] effect by (20)\n                change size by (12)\n            end\n            change [coin v] by (1)\n            delete this clone\n        end\n    end\nend\n\nwhen flag clicked\nset [coin v] to [0]\n\nwhen flag clicked\nClone at [80] [-40]\nClone at [-80] [-40]\nClone at [0] [-40]\n\n@ドット絵 帽子\n\nwhen flag clicked\nset [ghost v] effect to (0)\ngo to [front v] layer\nset rotation style [left-right v]\nshow\nforever\n    if <(命) = [ある]> then\n        go to x: ([x position v] of [プレイヤー v]) y: ([y position v] of [プレイヤー v])\n        set [ghost v] effect to (0)\n        go to [front v] layer\n        if <([direction v] of [プレイヤー v]) = [90]> then\n            point in direction (90)\n        end\n        if <([direction v] of [プレイヤー v]) = [-90]> then\n            point in direction (-90)\n        end\n    end\n    if <(命) = [ない]> then\n        set [yです v] to [5]\n        repeat until <<touching (ステージ v)?> or <(y position) < [-180]>>\n            change [yです v] by (-1)\n            change y by (Yです)\n        end\n        repeat until <(命) = [ある]>\n            change [ghost v] effect by (10)\n        end\n    end\nend\n\nrepeat (10)\n\nwait until <(命) = [ある]>\n\nwhen I receive [next v]\nhide\nwait (2.6) seconds\nshow\n\nwhen [timer v] > (0)\nhide\n\ngo to (プレイヤー v)\n\n@旗\n\nwhen flag clicked\ngo to x: (200) y: (-30)\ngo to [back v] layer\nshow\n\nwhen flag clicked\nforever\n    if <(ステージ) = [13]> then\n        hide\n    else\n        show\n    end\nend\n\n@ドット絵 太陽\n\nwhen flag clicked\ngo to x: (185) y: (125)\nset [太陽 v] to [0]\nset size to (100) %\nshow\nforever\n    change [太陽 v] by (5)\nend\n\nwhen flag clicked\nforever\n    go to [back v] layer\n    change size by ([cos v] of (太陽) )\nend\n\nwhen flag clicked\nforever\n    if <(ステージ) = [13]> then\n        hide\n    else\n        show\n    end\nend\n\n@踏んだ判定\n\nwhen flag clicked\nset rotation style [left-right v]\nshow\nforever\n    set [ghost v] effect to (99)\n    go to x: ([x position v] of [プレイヤー v]) y: ([y position v] of [プレイヤー v])\n    point in direction ([direction v] of [プレイヤー v])\nend\n\nwhen flag clicked\nforever\n    if <(命) = [ある]> then\n        show\n    else\n        hide\n    end\nend\n\nset [ghost v] effect to (0)\n\ngo to (プレイヤー v)\n\n@Next!\n\nwhen I receive [next v]\nset [color v] effect to (pick random (-250) to (250))\ngo to [front v] layer\nhide\nstart sound [High Whoosh v]\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\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    set [move v] to [OK]\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\n@走る\n\nwhen flag clicked\nhide\n\nwhen I start as a clone\nset [ghost v] effect to (20)\nset size to (pick random (70) to (100)) %\ngo to [back v] layer\nshow\ngo to (プレイヤー v)\nchange y by (pick random (-12) to (-17))\nwait (0.15) seconds\nrepeat (4)\n    change [ghost v] effect by (20)\nend\ndelete this clone\n\n@右向き数字表記@eitabo\n\nwhen I start as a clone\nshow\nforever\n    if <(letter (1) of (COIN)) = [-]> then\n        switch costume to (- v)\n    end\n    switch costume to (letter (i) of (COIN))\n    if <(letter (i) of (COIN)) = [.]> then\n        switch costume to (. v)\n    end\n    if <(letter (i) of (COIN)) = [e]> then\n        switch costume to (e v)\n    end\n    if <(letter (i) of (COIN)) = [+]> then\n        switch costume to (+ v)\n    end\n    if <(length of (COIN)) < (i)> then\n        hide\n    else\n        show\n    end\nend\n\nwhen flag clicked\nhide\nset [i v] to [0]\ngo to x: (-150) y: (150)\nrepeat (20)\n    change [i v] by (1)\n    create clone of (_myself_ v)\n    change x by (((size) / (100)) * (14))\nend\n\nset size to (180) %\n\n@背景文字\n\nwhen flag clicked\nswitch costume to (ステージ1 v)\nshow\nforever\n    go to [back v] layer\nend\n\nwhen I receive [next v]\nnext costume\n\n@サムネ\n\nwhen flag clicked\nswitch costume to (pick random (1) to (4))\nforever\n    go to [front v] layer\n    set [ghost v] effect to (100)\n    reset timer\nend\n\n
\nコミュ好きありがとう！！！\n日本語説明は下にあります。\n━━━━━━━━━━━━━━━━━━━━━━━━\nThe platformer has entered the world of pixel art Mario!\n▼ How to play\nOperate with arrow keys and taps.\nCompatible with mobile!\n\n▼ Goal\nTrend 3P\nNumber of references 3000✅\n♥ and ★ 100✅\n━━━━━━━━━━━━━━━━━━━━━━━━\nプラットフォーマーがドット絵のマリオの世界に入っちゃった！\n▼遊び方\n矢印キー、タップで操作。\nモバイルに対応しています‼\n\n▼目標\n傾向3P \n参照数3000 ✅\n♥と★100 ✅