REVERSE platformer 『逆』【変なプラフォ第1弾】
@Stage\n\nwhen flag clicked\nswitch backdrop to (背景3 v)\n\nwhen I receive [開始 v]\nswitch backdrop to (背景2 v)\n\n@blank\n\n@反対のプラフォ君\n\ndefine fast\nrepeat (6)\n    if <touching (土地です v)?> then\n        change y by (-1)\n    end\nend\n\ndefine 縦移動\nrepeat until <not <touching (土地です v)?>>\n    if <(x) > [0]> then\n        change x by (-1)\n    else\n        change x by (1)\n    end\nend\n\ndefine 横移動\nrepeat until <not <touching (土地です v)?>>\n    if <(y) > [0]> then\n        change y by (-1)\n    else\n        change y by (1)\n    end\nend\n\nwhen I receive [開始 v]\nset rotation style [left-right v]\n消去\nswitch costume to (スキン変更機構)\npoint in direction (90)\nforever\n    change [y v] by (1)\n    if <<key (left arrow v) pressed?> or <<key (a v) pressed?> or <<mouse down?> and <(x position) > (mouse x)>>>> then\n        change [x v] by (-1)\n        point in direction (-90)\n    end\n    if <<key (right arrow v) pressed?> or <<key (d v) pressed?> or <<mouse down?> and <(mouse x) > (x position)>>>> then\n        change [x v] by (1)\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        fast\n        if <touching (土地です v)?> then\n            change y by (-5)\n            縦移動\n        end\n        if <<key (down arrow v) pressed?> or <<key (s v) pressed?> or <<mouse down?> and <(y position) > (mouse y)>>>> then\n            start sound [カチャカチャ v]\n            set [y v] to [-14]\n            if <([abs v] of (x) ) = (x)> then\n                set [x v] to [-5]\n            else\n                set [x v] to [5]\n            end\n        else\n            set [x v] to [0]\n        end\n    end\n    change y by (y)\n    if <touching (土地です v)?> then\n        横移動\n        if <<key (down arrow v) pressed?> or <<key (s v) pressed?> or <<mouse down?> and <(y position) > (mouse y)>>>> then\n            start sound [ジャンプ v]\n            set [y v] to [-13]\n        else\n            set [y v] to [0]\n        end\n    end\nend\n\nwhen I receive [開始 v]\nforever\n    if <touching (針 v)?> then\n        go to x: (-200) y: (30)\n        start sound [ふっつ v]\n        set [x v] to [0]\n        set [y v] to [0]\n    end\n    if <[186] < (y position)> then\n        go to x: (-200) y: (30)\n        start sound [ふっつ v]\n        set [x v] to [0]\n        set [y v] to [0]\n    end\nend\n\nwhen I receive [開始 v]\nrepeat until <([costume # v] of [土地です v]) = [20]>\n    if <(x position) > [239]> then\n        go to x: (-200) y: (1)\n        broadcast (level v)\n        start sound [次 v]\n    end\nend\n\nwhen flag clicked\nclear graphic effects\nhide\n\ndefine 消去\nset [x v] to [0]\nset [y v] to [0]\npoint in direction (90)\nshow\nset size to (100) %\ngo to x: (-200) y: (30)\n\nwhen I receive [開始 v]\nforever\n    if <(costume [number v]) = [6]> then\n        change [color v] effect by (3)\n    end\nend\n\nwhen flag clicked\nclear graphic effects\n\n@土地です\n\nwhen flag clicked\nhide\nswitch costume to (ステージ1 v)\n\nwhen I receive [level v]\nnext costume\n\nwhen I receive [開始 v]\nshow\n\n@針\n\nwhen flag clicked\nswitch costume to (コスチューム1 v)\nhide\n\nwhen I receive [開始 v]\nshow\n\nwhen flag clicked\nforever\n    switch costume to ([costume # v] of [土地です v])\nend\n\n@キラキラ✨\n\nwhen flag clicked\nhide\n\nwhen I receive [開始 v]\nforever\n    show\n    go to [back v] layer\n    go to (反対のプラフォ君 v)\n    turn right (5) degrees\nend\n\n@スプライト1\n\nwhen I receive [開始 v]\nshow\ngo to x: (30) y: (30)\nforever\n    glide (1) secs to x: (40) y: (40)\n    glide (1) secs to x: (30) y: (30)\nend\n\nwhen flag clicked\nhide\n\n@☁君\n\nwhen I start as a clone\nset [ghost v] effect to (50)\nshow\ngo to x: (430) y: (13)\nglide (5) secs to x: (-430) y: (13)\nhide\ndelete this clone\n\nwhen I receive [開始 v]\nhide\nforever\n    switch costume to (pick random (1) to (2))\n    create clone of (_myself_ v)\n    wait (3) seconds\nend\n\nwhen flag clicked\nhide\n\n@イントロ\n\nwhen flag clicked\nstart sound [電子音 v]\nshow\nset [ghost v] effect to (100)\nrepeat (60)\n    change [ghost v] effect by (-1.666666666666)\nend\nrepeat (25)\n    change [ghost v] effect by (4)\nend\nbroadcast (ホーム v)\nhide\n\n@サムネイルを見ていただけたらわかると思うんですけど\n\nwhen flag clicked\nhide\nforever\n    reset timer\nend\n\nwhen [timer v] > (0.0001)\nset [サムネの動き v] to [-25]\ngo to [front v] layer\nshow\ngo to x: (0) y: (300)\nrepeat (10)\n    change y by (サムネの動き)\n    change [サムネの動き v] by (1.5)\nend\nrepeat (20)\n    change y by (サムネの動き)\n    change [サムネの動き v] by (0.5)\nend\n\nwhen flag clicked\nswitch costume to (サムネイル v)\n\nwhen I receive [だめだね v]\nswitch costume to (サムネイル2 v)\n\n@ホーム\n\nwhen I receive [ホーム v]\nshow\n\nwhen flag clicked\nhide\nswitch costume to (ho-mu v)\n\nwhen I receive [開始 v]\nhide\n\nwhen I receive [スキン変更機構発動準備完了β v]\nnext costume\n\nwhen flag clicked\nforever\n    set [スキン変更機構 v] to (costume [number v])\n    go to [back v] layer\n    go to x: (0) y: (15)\nend\n\n@始まりの時\n\nwhen flag clicked\nhide\n\nwhen I receive [ホーム v]\nshow\nset size to (100) %\nforever\n    repeat (10)\n        change size by (1)\n    end\n    repeat (10)\n        change size by (-1)\n    end\nend\n\nwhen this sprite clicked\nstart sound [決定ボタン v]\nhide\nbroadcast (ok v)\n\n@モバイル対応してるんだそ\n\nwhen flag clicked\nhide\n\n@スプライト3\n\nwhen flag clicked\nset [ghost v] effect to (100)\nshow\n\nwhen I receive [ok v]\nrepeat (25)\n    change [ghost v] effect by (-4)\nend\nbroadcast (開始 v)\nrepeat (25)\n    change [ghost v] effect by (4)\nend\nhide\n\n@music box\n\nwhen I receive [ホーム v]\nrepeat until <(yo) = [1]>\n    play sound [Link v] until done\nend\nstop all sounds\n\nwhen I receive [開始 v]\nset volume to (100) %\nset [yo v] to [1]\nstop all sounds\nforever\n    play sound [Let's Go! v] until done\nend\n\nwhen flag clicked\nset [yo v] to [0]\n\nwhen I receive [! v]\nforever\n    play sound [Link v] until done\nend\n\n@秒数\n\nwhen I start as a clone\nforever\n    if <[22] < (length of (秒))> then\n        hide\n        show variable [秒 v]\n    else\n        show\n        switch costume to (letter (数字番号) of (秒))\n        hide variable [秒 v]\n    end\nend\n\ndefine 配置\ngo to x: (-250) y: (-145)\nhide\nset [数字番号 v] to [0]\nrepeat (22)\n    change [数字番号 v] by (1)\n    change x by (20)\n    create clone of (_myself_ v)\nend\nswitch costume to (+ v)\nshow\ngo to x: (-250) y: (135)\n\nwhen I receive [開始 v]\nset [秒 v] to [0]\nrepeat until <([costume # v] of [土地です v]) = [20]>\n    wait (1) seconds\n    change [秒 v] by (1)\nend\nif <(☁ world) > (秒)> then\n    set [☁ world v] to (秒)\nend\n\nwhen I receive [開始 v]\n配置\n\n@たぼくん\n\nwhen flag clicked\nswitch costume to ( v)\nset [変数 v] to [0]\nset [ghost v] effect to (100)\nforever\n    switch costume to ( v)\n    go to [front v] layer\n    set size to (100) %\n    change [変数 v] by (1)\n    wait () seconds\nend\n\nwhen flag clicked\nforever\n    wait (0.5) seconds\n    set [変数 v] to [0]\nend\n\nwhen flag clicked\nforever\n    if <[25] < (変数)> then\n        broadcast (だめだね v)\n    end\nend\n\nwhen I receive [だめだね v]\nstop [all v]\n\n@スプライト4\n\nwhen I receive [開始 v]\nforever\n    if <touching (反対のプラフォ君 v)?> then\n        hide\n    end\nend\n\nwhen flag clicked\nforever\n    if <([costume # v] of [土地です v]) = [2]> then\n        show\n    else\n        hide\n    end\nend\n\n@CLEAR\n\nwhen flag clicked\nforever\n    if <([costume # v] of [土地です v]) = [20]> then\n        show\n        next costume\n        wait (0.05) seconds\n    else\n        hide\n    end\nend\n\n@スキン変更機構α\n\nwhen this sprite clicked\nstart sound [Collect v]\nbroadcast (スキン変更機構発動準備完了β v)\n\nwhen flag clicked\nhide\nforever\n    set size to (100) %\n    repeat (10)\n        change size by (1)\n    end\n    repeat (10)\n        change size by (-1)\n    end\nend\n\nwhen I receive [ホーム v]\nshow\n\nwhen I receive [ok v]\nhide\nstop [other scripts in sprite v]\n\n