Gem Platformer！　宝石のプラットフォーマー
@Stage\n\n@スプライト2\n\nwhen flag clicked\nshow\nwait (0) seconds\ngo to [back v] layer\nforever\n    go to (player v)\n    change [color v] effect by (1)\nend\n\nwhen I receive [green flag v]\n\n@Enemy\n\ndefine Set hack size to (size)\nswitch costume to (size hack v)\nset size to (size) %\nswitch costume to (stage1 v)\n\nwhen I receive [green flag v]\n\nwhen flag clicked\nhide\n\nwhen I receive [next v]\npoint in direction (105)\nswitch costume to (stage2 v)\n\nwhen flag clicked\nshow\ngo to [back v] layer\npoint in direction (90)\ngo to x: (0) y: (0)\nSet hack size to [200]\nforever\n    go to (platform v)\n    point in direction ([direction v] of [platform v])\nend\n\n@Platform\n\ndefine SET HACK SIZE TO (number or text)\nswitch costume to (コスチューム1 v)\nset size to (number or text) %\nswitch costume to (stage1 v)\n\nwhen I receive [respawn v]\npoint in direction (90)\npoint in direction (105)\ngo to x: (-10) y: (-500)\nset [d vel v] to [0]\nset [y vel v] to [0]\nset [a v] to [0]\n\nwhen I receive [green flag v]\n\nwhen flag clicked\npoint in direction (105)\ngo to [front v] layer\nshow\nbroadcast (respawn v)\nSET HACK SIZE TO [200]\nforever\n    change [y vel v] by (1)\n    if <<<key (right arrow v) pressed?> or <<(mouse x) > (x position)> and <mouse down?>>> or <key (d v) pressed?>> then\n        change [d vel v] by (-0.3)\n    end\n    if <<key (left arrow v) pressed?> or <<<(x position) > (mouse x)> and <mouse down?>> or <key (a v) pressed?>>> then\n        change [d vel v] by (0.3)\n    end\n    set [d vel v] to ((d vel) * (0.8))\n    turn right (d vel) degrees\n    if <touching (player v)?> then\n        change y by (-1)\n        if <touching (player v)?> then\n            change y by (-1)\n            if <touching (player v)?> then\n                change y by (-1)\n                if <touching (player v)?> then\n                    change y by (-1)\n                    if <touching (player v)?> then\n                        change y by (4)\n                        turn right ((d vel) * (-1)) degrees\n                        set [d vel v] to [0]\n                    end\n                end\n            end\n        end\n    end\n    change y by (y vel)\n    if <touching (player v)?> then\n        change y by ((y vel) * (-1))\n        set [y vel v] to [0]\n    end\n    change y by (1)\n    if <touching (player v)?> then\n        if <<<key (up arrow v) pressed?> or <<(mouse y) > [50]> and <mouse down?>>> or <key (w v) pressed?>> then\n            start sound [suck1 \(1\) v]\n            set [y vel v] to [-12]\n        end\n    end\n    change y by (-1)\nend\n\nwhen I receive [ｄ v]\npoint in direction (105)\nswitch costume to (stage2 v)\n\nhide\n\nwhen flag clicked\nforever\n    play sound [1234 v] until done\nend\n\nhide\n\n@player\n\nwhen flag clicked\nshow\nset [a v] to [0]\ngo to x: (0) y: (-1)\n\nwhen I receive [respawn v]\nset [ghost v] effect to (100)\nrepeat (10)\n    change [ghost v] effect by (-10)\nend\n\nwhen flag clicked\nforever\n    change [color v] effect by (1)\n    change y by (5)\n    if <touching (enemy v)?> then\n        broadcast (respawn v)\n        start sound [Oops v]\n    end\n    change y by (-5)\n    if <touching color (#013750)?> then\n        set [y vel v] to [-20]\n    end\n    if <touching (flag v)?> then\n        broadcast (next v)\n        wait until <not <touching (flag v)?>>\n    end\n    if <touching (spikes v)?> then\n        broadcast (respawn v)\n    end\nend\n\n@Awesome Particles\n\nwhen I start as a clone\ngo to [back v] layer\nshow\nif <(size) > [99]> then\n    glide (6) secs to x: (x position) y: (-200)\n    delete this clone\nend\nif <(size) > [80]> then\n    glide (5) secs to x: (x position) y: (-200)\n    delete this clone\nend\nif <(size) > [65]> then\n    glide (4) secs to x: (x position) y: (-200)\n    delete this clone\nend\nif <(size) > [50]> then\n    glide (3) secs to x: (x position) y: (-200)\n    delete this clone\nend\nif <(size) > [40]> then\n    glide (2.5) secs to x: (x position) y: (-200)\n    delete this clone\nend\n\nwhen flag clicked\nhide\n\nwhen I receive [green flag v]\n\nset [ghost v] effect to (65)\n\nwhen flag clicked\nforever\n    go to [front v] layer\n    change [color v] effect by (25)\n    change [color v] effect by (pick random (50) to (100))\n    set [brightness v] effect to (pick random (-30) to (10))\n    set size to (pick random (41) to (90)) %\n    go to x: (pick random (-200) to (200)) y: (200)\n    create clone of (_myself_ v)\n    wait (pick random (0.2) to (0.6)) seconds\nend\n\n@Flag\n\nhide\n\nwhen flag clicked\nshow\ngo to [back v] layer\npoint in direction (90)\ngo to x: (0) y: (0)\nSet hack size to [200]\nforever\n    go to (platform v)\n    point in direction ([direction v] of [platform v])\n    if <touching (player v)?> then\n        broadcast (ｄ v) and wait\n        hide\n    end\nend\n\nwhen I receive [green flag v]\n\ndefine Set hack size to (size)\nswitch costume to (size hack v)\nset size to (size) %\nswitch costume to (stage1 v)\n\n@2021-04-05\n\nwhen flag clicked\nhide\n\nshow\n\n
矢印で移動ジャンプ\n\n\n\nはい！\n　そこのあなた\n　　♡と★押さんと\n　　　　タンスに小指ぶつける呪いかけますよ(うそ)