Light2   -a platformer-

Instructions: 　　　　English　　　 \nJump with the up key.　 \nMove with the left and right keys.\n　　　　日本語\n　　上キーでジャンプ\n　　左右キーで移動

@Stage\n\nwhen flag clicked\nswitch backdrop to (1 v)\nwait until <(今) = [3]>\nswitch backdrop to (2 v)\nwait until <(今) = [12]>\nswitch backdrop to (4 v)\n\nwhen flag clicked\nswitch backdrop to (1 v)\nset [今 v] to [0]\nwait until <(今) = [2]>\nforever\n    if <(今) < [13]> then\n        create clone of (スプライト6 v)\n        wait (pick random (0.1) to (0.5)) seconds\n    end\nend\n\nwhen flag clicked\nwait until <(今) = [3]>\nswitch backdrop to (2 v)\n\nwhen flag clicked\nforever\n    play sound [uchunohajimari v] until done\nend\n\n@スプライト1\n\nwhen flag clicked\nclear graphic effects\nset size to (60) %\nwait (0.01) seconds\nset rotation style [left-right v]\npoint in direction (90)\ngo to [front v] layer\nset [x v] to [0]\nset [y v] to [0]\nset [今 v] to [1]\nclear graphic effects\ngo to x: (-200) y: (0)\nshow\nforever\n    if <<<key (a v) pressed?> or <key (left arrow v) pressed?>> or <<(mouse x) < (x position)> and <mouse down?>>> then\n        change [x v] by (-1)\n        point in direction (-90)\n    end\n    if <<<key (d v) pressed?> or <key (right arrow v) pressed?>> or <<(x position) < (mouse x)> and <mouse down?>>> then\n        change [x v] by (1)\n        point in direction (90)\n    end\n    if <<(今) = [12]> and <touching (スプライト3 v)?>> then\n        set [x v] to ((x) * (0.92))\n    else\n        set [x v] to ((x) * (0.88))\n    end\n    change x by (x)\n    if <touching (スプライト3 v)?> then\n        change y by (1)\n        if <touching (スプライト3 v)?> then\n            change y by (1)\n            if <touching (スプライト3 v)?> then\n                change y by (1)\n                if <touching (スプライト3 v)?> then\n                    change y by (1)\n                    if <touching (スプライト3 v)?> then\n                        change y by (1)\n                        if <touching (スプライト3 v)?> then\n                            change y by (1)\n                            if <touching (スプライト3 v)?> then\n                                change x by ((0) - (x))\n                                change y by (-5)\n                                if <<<key (w v) pressed?> or <key (up arrow v) pressed?>> or <<[0] < (mouse y)> and <mouse down?>>> then\n                                    if <[0] < (x)> then\n                                        set [x v] to [-10]\n                                    else\n                                        set [x v] to [10]\n                                    end\n                                    set [y v] to [15]\n                                else\n                                    set [x v] to [0]\n                                end\n                            end\n                        end\n                    end\n                end\n            end\n        end\n    end\n    change [y v] by (-1)\n    change y by (y)\n    if <touching (スプライト3 v)?> then\n        change y by ((0) - (y))\n        set [y v] to [0]\n    end\n    change y by (-2)\n    if <<<<key (w v) pressed?> or <key (up arrow v) pressed?>> or <<[0] < (mouse y)> and <mouse down?>>> and <touching (スプライト3 v)?>> then\n        set [y v] to [15]\n    end\n    change y by (1)\n    if <<(y position) < [-175]> or <touching (スプライト8 v)?>> then\n        repeat (15)\n            change [ghost v] effect by (5)\n            change [brightness v] effect by (5)\n        end\n        hide\n        clear graphic effects\n        go to x: (-200) y: (0)\n        set [x v] to [0]\n        set [y v] to [0]\n        show\n    end\n    if <[239] < (x position)> then\n        if <not <(今) = [12]>> then\n            hide\n            clear graphic effects\n            go to x: (-200) y: (0)\n            set [x v] to [0]\n            set [y v] to [0]\n            change [今 v] by (1)\n            show\n        end\n    end\nend\n\n@スプライト2\n\nwhen flag clicked\nset size to (80) %\ngo to [back v] layer\ngo [forward v] (2) layers\nforever\n    go to (スプライト1 v)\nend\n\n@スプライト3\n\nwhen flag clicked\ngo to x: (0) y: (0)\ngo to [back v] layer\ngo [forward v] (1) layers\nforever\n    switch costume to (今)\nend\n\nset [今 v] to [12]\n\n@スプライト5\n\nwhen flag clicked\nhide\n\ngo to x: (0) y: (0)\nshow\ngo to [front v] layer\nwait (0.02) seconds\n\n@スプライト6\n\nwhen flag clicked\nhide\n\nwhen I start as a clone\ngo to x: (pick random (-220) to (220)) y: (180)\nset size to (50) %\nif <(pick random (1) to (3)) = [1]> then\n    switch costume to (1 v)\nelse\n    if <(pick random (1) to (2)) = [1]> then\n        switch costume to (2 v)\n    else\n        switch costume to (3 v)\n    end\nend\nif <(今) = [12]> then\n    show\n    if <(pick random (1) to (2)) = [1]> then\n        repeat until <<touching (スプライト3 v)?> or <(y position) < [-175]>>\n            change y by (-3)\n            change x by (-1)\n            turn right (5) degrees\n        end\n    else\n        repeat until <<touching (スプライト3 v)?> or <(y position) < [-175]>>\n            change y by (-3)\n            change x by (-1)\n            turn right (5) degrees\n        end\n    end\n    delete this clone\nelse\n    set size to (100) %\n    switch costume to (コスチューム1 v)\nend\nshow\nif <(pick random (1) to (2)) = [1]> then\n    repeat until < or <touching (スプライト3 v)?>>\n        change y by (-3)\n        change x by (-1)\n        turn right (15) degrees\n    end\nelse\n    repeat until < or <touching (スプライト3 v)?>>\n        change y by (-3)\n        change x by (-1)\n        turn right (15) degrees\n    end\nend\ndelete this clone\n\n@スプライト7\n\nwhen flag clicked\nset size to (100) %\ngo to [back v] layer\ngo [forward v] (1) layers\nhide\nset [クローンno v] to [0]\nrepeat (1)\n    change [クローンno v] by (1)\n    create clone of (_myself_ v)\nend\n\nwhen I start as a clone\nset size to (11500000) %\nswitch costume to (2 v)\ngo to [front v] layer\nwait until <(今) = [3]>\nif <(クローンNo) = [1]> then\n    switch costume to (3 v)\n    forever\n        go to x: (0) y: (0)\n        if <<(今) = [12]> or <(今) = [14]>> then\n            hide\n        else\n            show\n        end\n    end\nend\n\ngo to (スプライト1 v)\n\nshow\nif <(クローンNo) = [2]> then\n    forever\n        go to x: (([x position v] of [スプライト1 v]) + (680)) y: (([y position v] of [スプライト1 v]) + (0))\n        もし異次元\n    end\nend\nif <(クローンNo) = [3]> then\n    forever\n        go to x: (([x position v] of [スプライト1 v]) + (-680)) y: (([y position v] of [スプライト1 v]) + (0))\n        もし異次元\n    end\nend\nif <(クローンNo) = [4]> then\n    forever\n        go to x: (([x position v] of [スプライト1 v]) + (0)) y: (([y position v] of [スプライト1 v]) + (450))\n        もし異次元\n    end\nend\nif <(クローンNo) = [5]> then\n    switch costume to (2 v)\n    forever\n        go to x: (([x position v] of [スプライト1 v]) + (0)) y: (([y position v] of [スプライト1 v]) + (-510))\n        もし異次元\n    end\nend\nif <(クローンNo) = [6]> then\n    forever\n        go to x: (([x position v] of [スプライト1 v]) + (680)) y: (([y position v] of [スプライト1 v]) + (450))\n        もし異次元\n    end\nend\nif <(クローンNo) = [7]> then\n    forever\n        go to x: (([x position v] of [スプライト1 v]) + (-680)) y: (([y position v] of [スプライト1 v]) + (450))\n        もし異次元\n    end\nend\nif <(クローンNo) = [8]> then\n    forever\n        go to x: (([x position v] of [スプライト1 v]) + (680)) y: (([y position v] of [スプライト1 v]) + (-510))\n        もし異次元\n    end\nend\nif <(クローンNo) = [9]> then\n    forever\n        go to x: (([x position v] of [スプライト1 v]) + (-680)) y: (([y position v] of [スプライト1 v]) + (-510))\n        もし異次元\n    end\nend\n\nset [借り v] to (y position)\n\ngo to [front v] layer\n\ndefine もし異次元\nif <<<(x position) < [-580]> or <[580] < (x position)>> or <<(y position) < [-430]> or <[430] < (y position)>>> then\n    hide\nelse\n    if <<(今) = [13]> or <(今) = [14]>> then\n        hide\n    else\n        show\n    end\nend\n\n@スプライト4\n\nwhen flag clicked\nhide\n\nshow\nset size to (85) %\ngo to x: (0) y: (0)\nforever\n    go to [front v] layer\nend\n\n@スプライト8\n\nwhen flag clicked\ngo to x: (0) y: (0)\ngo to [back v] layer\nforever\n    switch costume to (今)\nend\n\nset [今 v] to [12]\n\n