winter and machinery 〔T〕-platformer- 

Instructions: \nEnglish\nWinter, machinery and explosion.\nPC is better.\nI think it's difficult to do even if you have a keyboard on mobile.\nMove with the arrow keys → I think AWSD is better\nSet the standard with the cursor and tap\nOther explanations are on stage\n\n日本語\n\n冬と機械と爆発。\nパソコンの方がいい。\nモバイルだとキーボードがあってもやりずらいと思います\n矢印キーで移動→AWSDの方がいいと思う\nカーソル、タップで標準を定める　その他の説明は\nステージ内にあります

@Stage\n\nwhen flag clicked\nset volume to (100) %\nforever\n    play sound [yume v] until done\nend\n\nplay sound [ポップ v] until done\n\nwhen flag clicked\nclear sound effects\nforever\n    change [pan left/right v] effect by (音楽)\n    set volume to ((100) + (([cos v] of ((timer) * (300)) ) * (25))) %\nend\n\nchange [pan left/right v] effect by (10)\n\nwhen flag clicked\nset [音楽 v] to [-10]\nforever\n    repeat (20)\n        change [音楽 v] by (1)\n        wait (0.05) seconds\n    end\n    repeat (20)\n        change [音楽 v] by (-1)\n        wait (0.05) seconds\n    end\nend\n\n@Player\n\nwhen flag clicked\nshow\nrstart\nset [リスタート変数 v] to [0]\nforever\n    sous\nend\n\ndefine rstart\nset size to (80) %\ngo to x: (-200) y: (-100)\nset [y v] to [0]\nset [x v] to [0,01]\nset rotation style [left-right v]\npoint in direction (90)\nrepeat (10)\n    set [リスタート変数 v] to [1]\nend\n\ndefine sous\nchange [y v] by (-1)\nif <<key (right arrow v) pressed?> or > then\n    change [x v] by (0.75)\n    point in direction (90)\nend\nif <<key (left arrow v) pressed?> or > then\n    change [x v] by (-0.75)\n    point in direction (-90)\nend\nchange y by (-0.75)\nif <touching (氷 v)?> then\n    set [x v] to ((X) * (0.95))\nelse\n    set [x v] to ((X) * (0.88))\nend\nchange x by (X)\nrepeat (8)\n    if <<touching (地面 v)?> or <<touching (ブロック v)?> or <touching (氷 v)?>>> then\n        change y by (1.1)\n    end\nend\nif <<touching (地面 v)?> or <<touching (ブロック v)?> or <touching (氷 v)?>>> then\n    change x by (() - (X))\n    change y by (-7.7)\n    if <<key (up arrow v) pressed?> or > then\n        if <touching (氷 v)?> then\n            set [y v] to [7]\n        else\n            set [y v] to [11]\n        end\n        set [x v] to ((7) - ((14) * <[0] < (X)>))\n    end\nend\nchange y by (Y)\nif <<touching (地面 v)?> or <<touching (ブロック v)?> or <touching (氷 v)?>>> then\n    change y by (() - (Y))\n    set [y v] to [0]\nend\nchange y by (-1)\nif <<touching (地面 v)?> or <<touching (ブロック v)?> or <touching (氷 v)?>>> then\n    if <<key (up arrow v) pressed?> or > then\n        set [y v] to [10]\n    end\nend\nchange y by (1)\nif <<(y position) < [-170]> or <<touching (的q v)?> or <<touching (マグマ v)?> or <touching (動く針 v)?>>>> then\n    rstart\nend\nif <[200] < (x position)> then\n    rstart\n    change [level v] by (1)\n    broadcast (レベル変更 v)\nend\n\nwhen I receive [フックショット v]\npoint towards (フックショット v)\nrepeat until <<touching (地面 v)?> or <<touching (フックショット v)?> or <<touching (ブロック v)?> or <touching (スプライト1 v)?>>>>\n    point towards (フックショット v)\n    move (20) steps\n    set [y v] to [0]\n    set [x v] to [0.01]\n    set [フックショット変数 v] to [1]\nend\nrepeat until <<not <touching (地面 v)?>> or <<not <touching (ブロック v)?>> or <(フックショット変数) = [1]>>>\n    if <<touching (地面 v)?> or <touching (ブロック v)?>> then\n        point towards (フックショット v)\n        move (-30) steps\n    end\nend\nset [y v] to [13]\nerase all\nbroadcast (フックショット解除 v)\nset [フックショット変数 v] to [0]\n\nwhen [t v] key pressed\nrstart\n\nwhen flag clicked\nforever\n    if <<touching (二段ジャンプ装置 v)?> and <<key (up arrow v) pressed?> or <key (w v) pressed?>>> then\n        set [y v] to [16]\n        wait until <not <touching (二段ジャンプ装置 v)?>>\n    end\nend\n\nwhen flag clicked\nforever\n    if <(リスタート変数) = [1]> then\n        rstart\n        wait until <not <(リスタート変数) = [1]>>\n    end\nend\n\n@ブロック\n\nwhen flag clicked\nhide\nswitch costume to (コスチューム1 v)\nforever\n    if <(level) = [1]> then\n        switch costume to (コスチューム1 v)\n    end\n    if <(level) = [2]> then\n        show\n        go to x: (8) y: (94)\n        wait until <(level) = [3]>\n    end\nend\n\nwhen flag clicked\nforever\n    if <<touching (弾丸 v)?> or <touching (ブレード本体 v)?>> then\n        next costume\n        start sound [Crunch v]\n        if <(costume [number v]) = [4]> then\n            broadcast (ブロック破壊 v)\n            hide\n        end\n    end\nend\n\n@地面\n\nwhen flag clicked\nshow\ngo to x: (0) y: (0)\n\nwhen I receive [レベル変更 v]\nnext costume\n\nwhen flag clicked\ngo to [front v] layer\nswitch costume to (コスチューム1 v)\nset [level v] to [1]\nforever\n    go to x: (0) y: (0)\nend\n\n@フックショット\n\nwhen flag clicked\nerase all\nhide\nset [変数 v] to [0]\nforever\n    switch costume to (コスチューム1 v)\n    go to (player v)\n    point towards (mouse-pointer v)\n    if <key (z v) pressed?> then\n        clear graphic effects\n        set [リスタート変数 v] to [0]\n        switch costume to (コスチューム1 v)\n        go to (player v)\n        point in direction ([direction v] of [ブレード本体 v])\n        show\n        set [変数 v] to [1]\n        move (30) steps\n        repeat until <<touching (地面 v)?> or <<touching (_edge_ v)?> or <<<touching (氷 v)?> or <touching (マグマ v)?>> or <<touching (ブロック v)?> or <touching (player v)?>>>>>\n            if <(Y) > [-3]> then\n            move (25) steps\n        end\n        if <<touching (地面 v)?> or <touching (ブロック v)?>> then\n            broadcast (フックショット v)\n            switch costume to (コスチューム1 v)\n            wait (3) seconds\n            stamp\n            hide\n            move (-30) steps\n        end\n        erase all\n    end\nend\n\nwhen flag clicked\nforever\n    erase all\nend\n\nset [変数 v] to [0]\n\nwhen flag clicked\nforever\n    if <(リスタート変数) = [1]> then\n        go to (player v)\n        show\n        switch costume to (コスチューム1 v)\n        set [ghost v] effect to (100)\n        wait until <not <(リスタート変数) = [1]>>\n    end\nend\n\nhide\n\nset [y v] to [0]\n\n@ブレード本体\n\nwhen flag clicked\nforever\n    go to x: ([x position v] of [player v]) y: ([y position v] of [player v])\nend\n\nwhen flag clicked\nset drag mode [not draggable v]\nforever\n    point towards (mouse-pointer v)\n    next costume\nend\n\nif <(X) < [0]> then\n    point in direction (-90)\nend\nif <(X) > [0]> then\n    point in direction (90)\nend\n\nwhen I receive [ショットガン！！（お前の番は無い） v]\nwait (0.1) seconds\nturn right (pick random (-5) to (5)) degrees\n\nwhen I receive [ショットガン！！（お前の番は無い） v]\nrepeat (3)\n    if <[1] > (残弾)> then\n        set [ショットガン変数 v] to [0]\n    else\n        set [ショットガン変数 v] to [1]\n    end\nend\n\nwhen flag clicked\nshow\n\n@弾丸\n\nwhen flag clicked\nhide\nforever\n    if <key (q v) pressed?> then\n        create clone of (_myself_ v)\n        wait until <not <key (q v) pressed?>>\n    end\nend\n\nwhen I start as a clone\nshow\nif <<[0] < (残弾)> and <not <key (r v) pressed?>>> then\n    change [残弾 v] by (-1)\n    go to (player v)\n    point in direction ([direction v] of [ブレード本体 v])\n    if <(フックショット変数) = [1]> then\n        wait (0.1) seconds\n        turn right (pick random (-7) to (7)) degrees\n    else\n        turn right (pick random (-7) to (7)) degrees\n    end\n    repeat until <<touching (_edge_ v)?> or <touching (地面 v)?>>\n        move (30) steps\n    end\n    delete this clone\nend\ndelete this clone\n\nwhen [r v] key pressed\nrepeat until <<(残弾) > [10]> or <not <key (r v) pressed?>>>\n    wait (0.15) seconds\n    change [残弾 v] by (1)\nend\nif <(残弾) > [10]> then\n    set [残弾 v] to [10]\nend\n\nwhen I receive [フックショット v]\ndelete this clone\n\nwhen flag clicked\nset [残弾 v] to [8]\n\nwhen I start as a clone\nif <(残弾) > [5]> then\n\nwhen flag clicked\nforever\n    if <key (q v) pressed?> then\n        if <key (1 v) pressed?> then\n            repeat until <(残弾) < [1]>\n                create clone of (_myself_ v)\n                broadcast (ショットガン！！（お前の番は無い） v)\n            end\n        end\n    end\nend\n\nwhen I start as a clone\nforever\n    if <touching (的q v)?> then\n        change [的体力 v] by (-1)\n        delete this clone\n    end\nend\n\nwhen I start as a clone\nforever\n    if <touching (ブロック v)?> then\n        wait (0.01) seconds\n        delete this clone\n    end\nend\n\n@標準\n\nwhen flag clicked\nhide\ngo to x: (0) y: (0)\nforever\n    show\n    forever\n        go to (mouse-pointer v)\n    end\nend\n\nwhen flag clicked\nforever\n\nset [x v] to ((round ((X) * (1000))) / (1000))\n\nwhen flag clicked\nclear sound effects\nforever\n    change [pan left/right v] effect by (pick random (-120) to (120))\n    set volume to ((100) + (([cos v] of ((timer) * (300)) ) * (25))) %\nend\n\n@ブロックの破片\n\nwhen I receive [ブロック破壊 v]\nrepeat (10)\n    create clone of (_myself_ v)\nend\n\nwhen I start as a clone\nshow\ngo to (ブロック v)\npoint in direction (pick random (-180) to (179))\nrepeat (10)\n    move (10) steps\n    change [ghost v] effect by (10)\nend\ndelete this clone\n\nwhen flag clicked\nhide\n\n@爆発\n\nwhen flag clicked\nset volume to (100) %\ngo [forward v] (5) layers\nhide\n\nwhen I receive [ブロック破壊 v]\nswitch costume to (explode-05-june\[2 v)\nshow\ngo to (ブロック v)\n爆発 [75]\n\nwhen I receive [動く針爆破 v]\nswitch costume to (explode-05-june\[2 v)\nshow\ngo to x: (0) y: (0)\n爆発 [400]\n\ndefine 爆発 (大きさ)\nset size to (大きさ) %\nstart sound [ドーーーン v]\nrepeat (26)\n    next costume\nend\nset size to (100) %\nhide\n\nwhen I receive [プレイヤー爆破 v]\nswitch costume to (explode-05-june\[27 v)\nshow\ngo to (player v)\n爆発 [50]\n\n@動く針\n\nwhen flag clicked\nhide\n\nwhen I start as a clone\nforever\n    if <touching (cat v)?> then\n        broadcast (自分ダメージ v)\n        wait (1) seconds\n    end\nend\n\nwhen flag clicked\nshow\n\nwhen flag clicked\nset [動く針変数 v] to [0]\nforever\n    hide\n    if <(level) = [3]> then\n        switch costume to (コスチューム1 v)\n        repeat (2)\n            change [動く針変数 v] by (1)\n            create clone of (_myself_ v)\n        end\n        go to x: (137) y: (-140)\n        wait until <not <(level) = [3]>>\n    end\nend\n\nwhen I start as a clone\nshow\nif <(動く針変数) = [1]> then\n    go to x: (-10) y: (-137)\nelse\n    if <(動く針変数) = [2]> then\n        go to x: (137) y: (-15)\n    else\n        go to x: (151) y: (170)\n    end\nend\nforever\n    switch costume to (1 v)\n    wait (0.1) seconds\n    switch costume to (コスチューム1 v)\n    wait (0.1) seconds\n    switch costume to (コスチューム2 v)\n    wait (0.1) seconds\n    switch costume to (コスチューム3 v)\n    wait (0.1) seconds\n    switch costume to (コスチューム2 v)\n    wait (0.1) seconds\n    switch costume to (コスチューム1 v)\nend\n\nwhen I start as a clone\nforever\n    move (5) steps\n    if on edge, bounce\n    set rotation style [left-right v]\nend\n\nwhen I start as a clone\nforever\n    repeat (5)\n        wait until <<touching (ブレード本体 v)?> or <touching (弾丸 v)?>>\n        start sound [パキッ v]\n        switch costume to (コスチューム4 v)\n        wait (0.01) seconds\n    end\n    broadcast (動く針爆破 v)\n    delete this clone\nend\n\n\n\nwait (0.03) seconds\n\ndelete this clone\n\nwhen I start as a clone\nforever\n    if <<(ショットガン変数) = [1]> and <touching (弾丸 v)?>> then\n        switch costume to (コスチューム4 v)\n        play sound [パパパパパキッ v] until done\n        broadcast (動く針爆破 v)\n        delete this clone\n    end\nend\n\nrepeat (3)\nend\n\nrepeat until \nend\n\nstart sound [パキッ v]\nstart sound [パパパパパキッ v]\n\nbroadcast (動く針爆破 v)\ndelete this clone\n\nwhen I start as a clone\nforever\n    if <<(フックショット変数) = [1]> and <touching (ブレード本体 v)?>> then\n        start sound [パパパパパキッ v]\n        broadcast (動く針爆破 v)\n        delete this clone\n    end\nend\n\n@マグマ\n\nwhen flag clicked\nset [color v] effect to (0)\nhide\nswitch costume to (コスチューム1 v)\nforever\n    if <(level) = [6]> then\n        show\n        switch costume to (コスチューム1 v)\n        go to x: (0) y: (0)\n        wait until <(level) = [7]>\n    end\n    if <(level) = [7]> then\n        switch costume to (コスチューム2 v)\n        wait until <not <(level) = [7]>>\n        hide\n    end\nend\n\n@氷\n\nwhen flag clicked\nhide\nswitch costume to (コスチューム1 v)\nforever\n    if <(level) = [6]> then\n        switch costume to (コスチューム1 v)\n    end\n    if <(level) = [6]> then\n        show\n        go to x: (0) y: (0)\n        wait until <(level) = [7]>\n        hide\n    end\nend\n\n@二段ジャンプ装置\n\nwhen I receive [2段ジャンプ v]\nrepeat (90)\n    switch costume to (コスチューム2 v)\nend\nswitch costume to (コスチューム1 v)\n\nwhen flag clicked\nhide\n\nwhen flag clicked\nforever\n    if <(level) = [6]> then\n        show\n        switch costume to (コスチューム1 v)\n        repeat until <not <(level) = [6]>>\n            go to x: (0) y: (-80)\n        end\n        hide\n    end\nend\n\nrepeat until <(y position) < [-171]>\ndelete this clone\n\n@地雷\n\nwhen flag clicked\nset [地雷変数 v] to [0]\nhide\nswitch costume to (コスチューム1 v)\nforever\n    if <(level) = [7]> then\n        show\n        repeat (3)\n            create clone of (_myself_ v)\n        end\n        wait until <not <(level) = [7]>>\n        hide\n    end\nend\n\nwhen I start as a clone\nchange [地雷変数 v] by (1)\nif <(地雷変数) = [1]> then\n    go to x: (0) y: (-150)\n    point in direction (90)\nend\nif <(地雷変数) = [2]> then\n    go to x: (172) y: (-127)\n    point in direction (0)\nend\nif <(地雷変数) = [3]> then\n    go to x: (-215) y: (25)\n    point in direction (180)\nend\nrepeat until <(level) = [8]>\n    if <(distance to [player v]) < [50]> then\n        broadcast (プレイヤー爆破 v)\n        set [リスタート変数 v] to [1]\n        wait (0.2) seconds\n        set [リスタート変数 v] to [0]\n        wait (0.2) seconds\n    end\nend\ndelete this clone\n\nwhen flag clicked\nset [地雷変数 v] to [0]\n\n@粉雪\n\nwhen flag clicked\nforever\n    hide\n    set size to (pick random (75) to (150)) %\n    wait (0.38) seconds\n    create clone of (_myself_ v)\nend\n\nwhen I start as a clone\nshow\ngo to x: (pick random (-200) to (200)) y: (180)\nforever\n    repeat (pick random (5) to (15))\n        change y by (-2)\n        change x by (1)\n    end\n    repeat (pick random (5) to (15))\n        change y by (-2)\n        change x by (0.5)\n    end\n    repeat (pick random (5) to (15))\n        change y by (-2)\n        change x by (-1)\n    end\n    repeat (pick random (5) to (15))\n        change y by (-2)\n        change x by (-0.5)\n    end\nend\n\nwhen [h v] key pressed\nforever\n    create clone of (_myself_ v)\n    set size to (450) %\nend\n\nwait (0.01) seconds\n\nwhen I start as a clone\nwait until <(y position) < [-171]>\ndelete this clone\n\n@背景q\n\nwhen flag clicked\nswitch costume to (コスチューム7 v)\nshow\nforever\n    go to [back v] layer\n    go to x: (0) y: (0)\nend\n\nwhen I receive [レベル変更 v]\nnext costume\n\n@サムネ\n\nwhen flag clicked\nhide variable [level v]\nhide variable [残弾 v]\nshow\nwait (2) seconds\nrepeat (20)\n    change [ghost v] effect by (5)\nend\nshow variable [残弾 v]\nhide\n\n@スプライト1\n\nwhen I receive [フックショット v]\ngo to (フックショット v)\nshow\n\nwhen flag clicked\nhide\nset [ghost v] effect to (100)\n\nwhen I receive [フックショット解除 v]\nhide\n\n