WALK || -A Platformer-
@Stage\n\nwhen flag clicked\nswitch backdrop to (pick random (1) to (2))\nforever\n    play sound [music v] until done\nend\n\n@Player\n\ndefine 初期化\nset size to (20) %\npoint in direction (90)\nset rotation style [left-right v]\ngo to x: (-200) y: ((0) + (<(L) = [4]> * (100)))\nset [x v] to [0]\nset [y v] to [0]\n\ndefine Program\nif <<<mouse down?> and <(mouse x) > [0]>> or <<key (d v) pressed?> or <key (right arrow v) pressed?>>> then\n    change [x v] by (1.1)\n    point in direction ([abs v] of (direction) )\nend\nif <<<mouse down?> and <[0] > (mouse x)>> or <<key (a v) pressed?> or <key (left arrow v) pressed?>>> then\n    change [x v] by (-1.1)\n    point in direction (() - ([abs v] of (direction) ))\nend\nset [x v] to ((X) * (0.888))\nchange x by (X)\nrepeat (8)\n    if <touching (platformer v)?> then\n        change y by (1)\n    end\nend\nif <touching (platformer v)?> then\n    change x by (() - (X))\n    change y by (-8)\n    if <<<(mouse y) > [0]> and <mouse down?>> or <<key (w v) pressed?> or <key (up arrow v) pressed?>>> then\n        set [y v] to [10]\n        if <(X) = ([abs v] of (X) )> then\n            set [x v] to [-6]\n        else\n            set [x v] to [6]\n        end\n    else\n        set [x v] to [0]\n    end\nend\nchange y by (-1)\nif <touching (platformer v)?> then\n    if <<<(mouse y) > [0]> and <mouse down?>> or <<key (w v) pressed?> or <key (up arrow v) pressed?>>> then\n        set [y v] to [15]\n    end\nend\nchange y by (1)\nchange [y v] by (-1)\nchange y by (Y)\nif <touching (platformer v)?> then\n    change y by (() - (Y))\n    set [y v] to [0]\nend\n\nProgram\n\nwhen flag clicked\n初期化\nset [ok v] to [0]\nforever\n    if <(OK) = [0]> then\n        Program\n    end\nend\n\nwhen flag clicked\nforever\n    if <[235] < (x position)> then\n        set [ok v] to [1]\n        change [l v] by (1)\n        初期化\n        set [ok v] to [0]\n    end\n    if <(y position) < [-175]> then\n        初期化\n    end\nend\n\n@Platformer\n\nwhen flag clicked\nset [l v] to [1]\ngo to [back v] layer\ngo to x: (0) y: (0)\nshow\ngo [forward v] (7) layers\nforever\n    switch costume to (L)\nend\n\n@thumbnail\n\ngo to x: (0) y: (0)\n\nwhen flag clicked\n演出 [100]\nforever\n    go to [front v] layer\n    set [ttttttt v] to (timer)\nend\n\nhide\n\ndefine 演出 (幽霊)\nset [ghost v] effect to (幽霊)\ngo to x: (0) y: (0)\ngo to [front v] layer\nshow\n\nwhen [timer v] > ((TTTTTTT) + (0.12))\n演出 [0]\n\n演出 [0]\n\n@Sun\n\nwhen flag clicked\ngo to x: (-210) y: (150)\nshow\ngo to [back v] layer\nforever\n    set size to ((160) + (([cos v] of ((timer) * (120)) ) * (40))) %\nend\n\n@☁︎\n\nwhen I start as a clone\nset [ghost v] effect to (20)\nshow\nglide (pick random (5) to (7)) secs to x: (-284) y: (y position)\ndelete this clone\n\nwhen flag clicked\nhide\nset x to (284)\nforever\n    set y to (pick random (0) to (150))\n    create clone of (_myself_ v)\n    wait (pick random (1) to (3)) seconds\nend\n\n
≫ WALK -A Platformer- ≪\nーーーーーーーーーーーーーーーーーーーーーーーーー\n↓↓↓日本語説明は下です↓↓↓\nーーーーーーーーーーーーーーーーーーーーーーーーー\n◆English◆\nMove with left / right key, d, a key\nJump with the up key and w key\n＊Free remix＊\n◇日本語◇\n左右キー、D、Aキーで移動\n上、Wキーでジャンプ\n＊リミックスは自由です＊\nーーーーーーーーーーーーーーーーーーーーーーーーー\n音楽は@-InfinityCode-さん\nMusic is @-InfinityCode-\n\n#Games\n#Game\n#Platformer\n#WALK\n#yuhaku\n\n