0%pen platformer‼offline!
@Stage\n\nwhen flag clicked\nswitch backdrop to (背景3 v)\nwait (13) seconds\n\nwhen [timer v] > (0)\n\nswitch backdrop to (背景2 v)\n\nwhen flag clicked\nset [scrollx v] to [0]\nforever\n    if <key (right arrow v) pressed?> then\n        change [??? v] by (-0.5)\n    end\n    if <key (left arrow v) pressed?> then\n        change [??? v] by (0.5)\n    end\n    set [??? v] to ((???) * (0.9))\n    change [scrollx v] by (???)\nend\n\nwhen flag clicked\nforever\n    if <(round ((scrollx) / (480))) > ((scrollx) / (480))> then\n        set [‼!! v] to ((round ((scrollx) / (-480))) + (1))\n    else\n        set [‼!! v] to (round ((scrollx) / (-480)))\n    end\nend\n\nwhen flag clicked\nforever\n    if <(今) = [ゴール]> then\n        switch backdrop to (背景4 v)\n    end\nend\n\nreset timer\n\nforever\n    reset timer\nend\n\nwhen I receive [開始 v]\nforever\n    play sound [Popsicle v] until done\nend\n\n@Player\n\ndefine 動作\nchange [yの力 v] by (-1)\nif <<key (right arrow v) pressed?> or <<key (d v) pressed?> or <<(mouse x) > [0]> and <mouse down?>>>> then\n    change [xの力 v] by (1)\nend\nif <<key (left arrow v) pressed?> or <<key (a v) pressed?> or <<[0] > (mouse x)> and <mouse down?>>>> then\n    change [xの力 v] by (-1)\nend\nset [xの力 v] to ((xの力) * (0.88))\nchange x by (xの力)\nrepeat (6)\n    if <touching (see\(w\) v)?> then\n        change y by (1)\n    end\nend\nif <touching (see\(w\) v)?> then\n    change y by (-6)\n    位置補正x (() - ((xの力) / ([abs v] of (xの力) ))) ([ceiling v] of ([abs v] of (xの力) ) )\n    if <<key (up arrow v) pressed?> or <<key (w v) pressed?> or <<(mouse y) > [0]> and <mouse down?>>>> then\n        set [yの力 v] to [12]\n        set [xの力 v] to ((7) - (<(xの力) > [0]> * (14)))\n    else\n        set [xの力 v] to [0]\n    end\nend\nchange y by (yの力)\nif <touching (see\(w\) v)?> then\n    位置補正y (() - ((yの力) / ([abs v] of (yの力) ))) ([ceiling v] of ([abs v] of (yの力) ) )\nend\nchange y by (-1.1)\nif <<touching (see\(w\) v)?> and <<key (up arrow v) pressed?> or <<key (w v) pressed?> or <<(mouse y) > [0]> and <mouse down?>>>>> then\n    set [yの力 v] to [15]\nend\nchange y by (1.1)\nif <<(Y) < [-400]> or <touching (nice\(w\) v)?>> then\n    初期位置\nend\n処理\nbroadcast (プログラム2 v)\nif <touching (good\(w\) v)?> then\n    set [yの力 v] to [22]\nend\nif <touching (gole v)?> then\n    set [今 v] to [ゴール]\nend\nif <(今) = [ゴール]> then\n    hide\nend\n\nwhen I receive [プログラム v]\n動作\n\ndefine 処理\nchange [x v] by ((x position) - ((X) - (Camera_x)))\nchange [y v] by ((y position) - (((Y) - (Camera _y)) - (20)))\nchange [camera_x v] by ([floor v] of (((X) - (Camera_x)) * (0.1)) )\nchange [camera _y v] by ([floor v] of (((Y) - (Camera _y)) * (0.2)) )\nset x to ((X) - (Camera_x))\nset y to (((Y) - (Camera _y)) - (20))\n\ndefine 位置補正x (向き) (回数)\nif <(xの力) = [0]> then\n    stop [this script v]\nend\nset [i v] to [0]\nrepeat until <<not <touching (see\(w\) v)?>> or <(i) = ((回数) + (1))>>\n    change [i v] by (1)\n    change x by (向き)\nend\nchange x by (() - ((向き) * (((回数) + (1)) * <<(i) = ((回数) + (1))> and <touching (see\(w\) v)?>>)))\n\ndefine 位置補正y (向き) (回数)\nif <(yの力) = [0]> then\n    stop [this script v]\nend\nset [i v] to [0]\nrepeat until <<not <touching (see\(w\) v)?>> or <(i) = ((回数) + (1))>>\n    change [i v] by (1)\n    change y by (向き)\nend\nchange y by (() - ((向き) * (((回数) + (1)) * <<(i) = ((回数) + (1))> and <touching (see\(w\) v)?>>)))\nset [yの力 v] to [0]\n\ndefine 初期位置\ngo to x: (0) y: (-20)\nset [xの力 v] to [0]\nset [yの力 v] to [0]\nset [camera_x v] to [0]\nset [camera _y v] to [0]\nset [x v] to [0]\nset [y v] to [0]\n\nset [xの力 v] to [0]\nset [yの力 v] to [0]\nset [camera_x v] to [-200]\nset [camera _y v] to [-20]\nset [x v] to [-180]\nset [y v] to [100]\n\n処理\nbroadcast (プログラム2 v)\n初期位置\n\nwhen [timer v] > (0)\nhide\n\nset [今 v] to [ゴール]\n\nwhen I receive [開始 v]\nshow\npoint in direction (90)\ngo to x: (0) y: (-20)\nset [xの力 v] to [0]\nset [yの力 v] to [0]\nset [camera_x v] to [-200]\nset [camera _y v] to [-20]\nset [x v] to [-180]\nset [y v] to [-20]\n\nwhen flag clicked\nhide\n\n@see(w)\n\ndefine ステージ配置 (x座標) (y座標) (ステージ番号)\nswitch costume to (none v)\nset [my_x v] to (x座標)\nset [my_y v] to (y座標)\nswitch costume to ((ステージ番号) + (1))\nset [my_n v] to ((ステージ番号) + (1))\ncreate clone of (_myself_ v)\n\ndefine 移動 (x) (y)\nswitch costume to (none v)\ngo to x: (x) y: (y)\nif <<([abs v] of (x) ) > ([abs v] of (x position) )> or <([abs v] of (y) ) > ([abs v] of (y position) )>> then\n    hide\nelse\n    show\nend\nswitch costume to (My_n)\n\nwhen I receive [プログラム2 v]\nif <(costume [number v]) = [1]> then\n    broadcast (プログラム v)\nelse\n    移動 ((My_x) - (Camera_x)) ((My_y) - (Camera _y))\nend\nif <(今) = [ゴール]> then\n    hide\nend\n\nwhen I start as a clone\nshow\n\nwhen [timer v] > (0)\nhide\n\nwhen I receive [開始 v]\nhide\nステージ配置 [0] [0] [1]\nステージ配置 [480] [0] [2]\nステージ配置 [960] [0] [3]\nステージ配置 [1440] [0] [4]\nステージ配置 [1920] [0] [5]\nステージ配置 [2400] [0] [6]\nステージ配置 [2880] [0] [7]\nステージ配置 [3360] [0] [8]\nステージ配置 [3840] [0] [9]\nステージ配置 [4320] [0] [10]\nステージ配置 [4800] [0] [11]\nステージ配置 [5280] [0] [12]\nswitch costume to (none v)\nbroadcast (プログラム v)\n\n@nice(w)\n\ndefine ステージ配置 (x座標) (y座標) (ステージ番号)\nswitch costume to (none v)\nset [my_x v] to (x座標)\nset [my_y v] to (y座標)\nswitch costume to ((ステージ番号) + (1))\nset [my_n v] to ((ステージ番号) + (1))\ncreate clone of (_myself_ v)\n\ndefine 移動 (x) (y)\nswitch costume to (none v)\ngo to x: (x) y: (y)\nif <<([abs v] of (x) ) > ([abs v] of (x position) )> or <([abs v] of (y) ) > ([abs v] of (y position) )>> then\n    hide\nelse\n    show\nend\nswitch costume to (My_n)\n\nwhen I receive [プログラム2 v]\nif <(costume [number v]) = [1]> then\n    broadcast (プログラム v)\nelse\n    移動 ((My_x) - (Camera_x)) ((My_y) - (Camera _y))\nend\n\nwhen I start as a clone\nshow\n\nwhen [timer v] > (0)\nhide\n\nwhen I receive [開始 v]\nhide\nステージ配置 [0] [0] [1]\nステージ配置 [480] [0] [2]\nステージ配置 [960] [0] [3]\nステージ配置 [1440] [0] [4]\nステージ配置 [1920] [0] [5]\nステージ配置 [2400] [0] [6]\nステージ配置 [2880] [0] [7]\nステージ配置 [3360] [0] [8]\nステージ配置 [3840] [0] [9]\nステージ配置 [4320] [0] [10]\nステージ配置 [4800] [0] [11]\nステージ配置 [5280] [0] [12]\nswitch costume to (none v)\nbroadcast (プログラム v)\n\n@good(w)\n\ndefine ステージ配置 (x座標) (y座標) (ステージ番号)\nswitch costume to (none v)\nset [my_x v] to (x座標)\nset [my_y v] to (y座標)\nswitch costume to ((ステージ番号) + (1))\nset [my_n v] to ((ステージ番号) + (1))\ncreate clone of (_myself_ v)\n\ndefine 移動 (x) (y)\nswitch costume to (none v)\ngo to x: (x) y: (y)\nif <<([abs v] of (x) ) > ([abs v] of (x position) )> or <([abs v] of (y) ) > ([abs v] of (y position) )>> then\n    hide\nelse\n    show\nend\nswitch costume to (My_n)\n\nwhen I receive [プログラム2 v]\nif <(costume [number v]) = [1]> then\n    broadcast (プログラム v)\nelse\n    移動 ((My_x) - (Camera_x)) ((My_y) - (Camera _y))\nend\n\nwhen I start as a clone\nshow\n\nwhen [timer v] > (0)\nhide\n\nwhen I receive [開始 v]\nhide\nステージ配置 [0] [0] [1]\nステージ配置 [480] [0] [2]\nステージ配置 [960] [0] [3]\nステージ配置 [1440] [0] [4]\nステージ配置 [1920] [0] [5]\nステージ配置 [2400] [0] [6]\nステージ配置 [2880] [0] [7]\nステージ配置 [3360] [0] [8]\nステージ配置 [3840] [0] [9]\nステージ配置 [4320] [0] [10]\nステージ配置 [4800] [0] [11]\nステージ配置 [5280] [0] [12]\nswitch costume to (none v)\nbroadcast (プログラム v)\n\n@wow(w)\n\nwhen I receive [開始 v]\nshow\nforever\n    go to [back v] layer\n    switch costume to (‼!!)\n    set x to ((scrollx) + ((480) * ((‼!!) - (1))))\nend\n\nwhen I receive [開始 v]\nforever\n    if <(今) = [ゴール]> then\n        hide\n    end\nend\n\nwhen flag clicked\nhide\n\n@woww(w)\n\nwhen I receive [開始 v]\nforever\n    if <(今) = [ゴール]> then\n        hide\n    end\nend\n\nwhen I receive [開始 v]\nshow\nforever\n    go to [back v] layer\n    switch costume to (‼!!)\n    set x to ((scrollx) + ((480) * (‼!!)))\nend\n\nwhen flag clicked\nhide\n\n@gole\n\ndefine ステージ配置 (x座標) (y座標) (ステージ番号)\nswitch costume to (none v)\nset [my_x v] to (x座標)\nset [my_y v] to (y座標)\nswitch costume to ((ステージ番号) + (1))\nset [my_n v] to ((ステージ番号) + (1))\ncreate clone of (_myself_ v)\n\ndefine 移動 (x) (y)\nswitch costume to (none v)\ngo to x: (x) y: (y)\nif <<([abs v] of (x) ) > ([abs v] of (x position) )> or <([abs v] of (y) ) > ([abs v] of (y position) )>> then\n    hide\nelse\n    show\nend\nswitch costume to (My_n)\n\nwhen I receive [プログラム2 v]\nif <(costume [number v]) = [1]> then\n    broadcast (プログラム v)\nelse\n    移動 ((My_x) - (Camera_x)) ((My_y) - (Camera _y))\nend\n\nwhen I start as a clone\nshow\n\nwhen [timer v] > (0)\nhide\n\nwhen I receive [開始 v]\nset [今 v] to [0]\nhide\nステージ配置 [0] [0] [1]\nステージ配置 [480] [0] [2]\nステージ配置 [960] [0] [3]\nステージ配置 [1440] [0] [4]\nステージ配置 [1920] [0] [5]\nステージ配置 [2400] [0] [6]\nステージ配置 [2880] [0] [7]\nステージ配置 [3360] [0] [8]\nステージ配置 [3840] [0] [9]\nステージ配置 [4320] [0] [10]\nステージ配置 [4800] [0] [11]\nステージ配置 [5280] [0] [12]\nswitch costume to (none v)\nbroadcast (プログラム v)\n\n@紙吹雪\n\nwhen I start as a clone\nset y to (180)\nshow\npoint in direction (pick random (135) to (-135))\nrepeat until <(y position) = [-180]>\n    change x by (0)\n    change y by (-5)\n    turn right (10) degrees\n    change [ghost v] effect by (1)\nend\ndelete this clone\n\nwhen I receive [ゴール v]\n\nshow\nif <(なにか笑) = [1]> then\n\nwhen flag clicked\nset [今 v] to [0]\nhide\nforever\n    if <(今) = [ゴール]> then\n        switch costume to (pick random (1) to (3))\n        change [color v] effect by (pick random (1) to (30))\n        go to [front v] layer\n        go to x: (pick random (-240) to (240)) y: (200)\n        create clone of (_myself_ v)\n    end\nend\n\n@スプライト1\n\nwhen flag clicked\nreset timer\nset [ok? v] to [0]\nset [変数 v] to [0]\nhide\nstart sound [Syn Cole - Feel Good \[NCS Release\] v]\nwait (0.7) seconds\nswitch costume to (コスチューム1 v)\ncreate clone of (_myself_ v)\nwait (1) seconds\nswitch costume to (文字 v)\ncreate clone of (_myself_ v)\nwait (1.4) seconds\nswitch costume to (文字2 v)\ncreate clone of (_myself_ v)\nwait (0) seconds\nswitch costume to (文字3 v)\ncreate clone of (_myself_ v)\nwait until <[9.4] < (timer)>\nswitch costume to (コスチューム5 v)\ncreate clone of (_myself_ v)\nwait (1) seconds\nbroadcast (メッセージ1 v)\n\nwhen I start as a clone\nif <(costume [number v]) = [1]> then\n    go to [back v] layer\n    show\n    go to x: (0) y: (1000)\n    set size to (100) %\n    switch costume to (コスチューム1 v)\n    repeat until <(y position) < [0.5]>\n        change y by (((0) - (y position)) / (4))\n    end\n    wait (0.2) seconds\n    set [ok? v] to [1]\n    repeat (50)\n        change size by (((1400) - (size)) / (4))\n    end\n    wait until <[10.3] < (timer)>\n    hide\n    delete this clone\nend\nif <(costume [number v]) = [2]> then\n    point in direction (90)\n    show\n    go to x: (0) y: (0)\n    set size to (1) %\n    switch costume to (文字 v)\n    repeat (50)\n        change size by (((130) - (size)) / (4))\n    end\n    wait until <[5] < (timer)>\n    repeat (40)\n        change [変数 v] by (4.6)\n        point in direction ((90) + (([tan v] of (変数) ) / (0.5)))\n    end\n    wait until <[10.3] < (timer)>\n    hide\n    delete this clone\nend\nif <(costume [number v]) = [3]> then\n    point in direction (90)\n    go to [back v] layer\n    go [forward v] (1) layers\n    show\n    go to x: (0) y: (0)\n    set size to (130) %\n    switch costume to (文字2 v)\n    repeat (50)\n        change x by (((3) - (x position)) / (6))\n        change y by (((-2) - (y position)) / (4))\n    end\n    wait until <[5] < (timer)>\n    repeat (40)\n        point in direction ((90) + (([tan v] of (変数) ) / (0.3)))\n    end\n    wait until <[10.3] < (timer)>\n    hide\n    delete this clone\nend\nif <(costume [number v]) = [4]> then\n    point in direction (90)\n    go to [back v] layer\n    go [forward v] (1) layers\n    show\n    go to x: (0) y: (0)\n    set size to (130) %\n    switch costume to (文字3 v)\n    repeat (50)\n        change x by (((6) - (x position)) / (6))\n        change y by (((-5) - (y position)) / (4))\n    end\n    wait until <[5] < (timer)>\n    repeat (40)\n        point in direction ((90) + (([tan v] of (変数) ) / (0.3)))\n    end\n    wait until <[10.3] < (timer)>\n    hide\n    delete this clone\nend\nif <<<(costume [number v]) = [5]> or <(costume [number v]) = [6]>> or <(costume [number v]) = [7]>> then\n    set size to (20) %\n    go to (random position v)\n    set [ghost v] effect to (pick random (12) to (15))\n    go to [front v] layer\n    go [backward v] (1) layers\n    wait until <(ok?) = [1]>\n    show\n    point in direction (pick random (0) to (360))\n    repeat until <[10.3] < (timer)>\n        move (0.2) steps\n        if <(pick random (1) to (2)) = [1]> then\n            turn right (2) degrees\n        else\n            turn left (2) degrees\n        end\n    end\n    hide\n    delete this clone\nend\nif <(costume [number v]) = [8]> then\n    set size to (50) %\n    go to x: (0) y: (0)\n    show\n    repeat (50)\n        change size by (((800) - (size)) / (6))\n    end\n    hide\n    delete this clone\nend\n\ndefine 後ろの何か(笑)\nrepeat (20)\n    switch costume to (pick random (5) to (7))\n    create clone of (_myself_ v)\nend\n\nwhen flag clicked\n後ろの何か(笑)\n\nwhen flag clicked\nwait (12) seconds\nbroadcast (開始 v)\n\n
新作です!\n　https://scratch.mit.edu/projects/425548144/　\n≪使い方≫\nA,Dキー or ←,→キー で移動\nWキー or ↑キーでジャンプ\nPress A,D keys or ←,→ keys to move\nPress W key or ↑key to jumpです‼\n頑張って下さい‼\n#game\n#games\n#karikunn