プラットフォーマー・サマー【夏】 | Platformer summer 30levels!
@Stage\n\nwhen flag clicked\nswitch backdrop to (背景2 v)\n\nwhen I receive [start v]\nswitch backdrop to (背景 v)\nset volume to (20) %\nforever\n    play sound [Inferno v] until done\nend\n\n@together\n\nwhen I receive [start v]\nset [ghost v] effect to (0)\nhide\ngo to [back v] layer\ngo [forward v] (1) layers\nforever\n    go to x: (0) y: (0)\n    show\n    switch costume to (join (letter (1) of (レベル)) (join (letter (2) of (レベル)) (letter (3) of (レベル))))\nend\n\nwhen flag clicked\nhide\n\n@prayer\n\ndefine 初期化\nset size to (50) %\ngo to x: (-200) y: (0)\nset [y v] to [0]\nset [x v] to [0]\nset rotation style [left-right v]\npoint in direction (90)\n\ndefine 移動作\nchange [y v] by (-1)\nif <<key (right arrow v) pressed?> or <<key (d v) pressed?> or <<mouse down?> and <[0] < (mouse x)>>>> then\n    change [x v] by (1)\n    point in direction (90)\nend\nif <<key (left arrow v) pressed?> or <<key (a v) pressed?> or <<mouse down?> and <(mouse x) < [0]>>>> then\n    change [x v] by (-1)\n    point in direction (-90)\nend\nset [x v] to ((X) * (0.88))\nchange x by (X)\nrepeat (8)\n    if <<touching (platformer v)?> or <touching (扉 v)?>> then\n        change y by (1.1)\n    end\nend\nif <<touching (platformer v)?> or <touching (扉 v)?>> then\n    change x by (() - (X))\n    change y by (-8.8)\n    if <<key (up arrow v) pressed?> or <<key (w v) pressed?> or <<mouse down?> and <[0] < (mouse y)>>>> then\n        set [y v] to [11]\n        set [x v] to ((7) - ((14) * <[0] < (X)>))\n    end\nend\nchange y by (Y)\nif <<touching (platformer v)?> or <touching (扉 v)?>> then\n    change y by (() - (Y))\n    set [y v] to [0]\nend\nchange y by (-1)\nif <<touching (platformer v)?> or <touching (扉 v)?>> then\n    if <<key (up arrow v) pressed?> or <<key (w v) pressed?> or <<mouse down?> and <[0] < (mouse y)>>>> then\n        start sound [jump v]\n        set [y v] to [13]\n    end\nend\nif <touching (jumper v)?> then\n    start sound [かわいく跳ねる・ジャンプ03 v]\n    set [y v] to [21]\nend\nchange y by (1)\nif <[235] < (x position)> then\n    broadcast (初期位置 v)\n    初期化\n    change [レベル v] by (1)\nend\nif <<(y position) < [-180]> or <touching (together v)?>> then\n    broadcast (初期位置 v)\n    set volume to (100) %\n    start sound [Crunch v]\n    初期化\nend\n\nwhen I receive [start v]\nshow\nswitch costume to (flame2 v)\n初期化\nforever\n    移動作\nend\n\nwhen flag clicked\nforever\n    set [xx v] to (x position)\n    set [yy v] to (y position)\nend\n\nwhen I receive [goal v]\n初期化\n\nwhen flag clicked\nset volume to (100) %\nhide\n\n@Platformer\n\nwhen flag clicked\nswitch costume to (1 v)\nhide variable [time v]\nhide variable [レベル v]\nhide variable [☁ wr v]\nset [レベル v] to [1]\nhide\n\nwhen I receive [start v]\nset [レベル v] to [1]\nshow variable [レベル v]\nshow variable [time v]\nshow\ngo to x: (0) y: (0)\nset [ghost v] effect to (0)\nset [レベル v] to [1]\ngo to [back v] layer\ngo [forward v] (2) layers\nrepeat until <(costume [number v]) = [101]>\n    switch costume to (join (letter (1) of (レベル)) (join (letter (2) of (レベル)) (letter (3) of (レベル))))\nend\n\nwhen I receive [start v]\nhide variable [レベル v]\nset [time v] to [0]\nrepeat until <(costume [number v]) = [30]>\n    hide variable [レベル v]\n    wait (0.05) seconds\n    change [time v] by (0.1)\nend\nif <(Time) < (☁ WR)> then\n    set [☁ 記録 v] to (Time)\n    set [☁ wr v] to (☁ 記録)\nend\nshow variable [☁ wr v]\n\nset [☁ wr v] to [99999]\n\n@スプライト3\n\nwhen I receive [start v]\nhide\nforever\n    wait (pick random (5) to (8)) seconds\n    create clone of (_myself_ v)\nend\n\nwhen I start as a clone\nset [ghost v] effect to (pick random (30) to (10))\ngo to x: (240) y: (pick random (170) to (50))\nshow\nswitch costume to (pick random (1) to (3))\ngo to [back v] layer\ngo [forward v] (1) layers\nrepeat until <(x position) < [-239]>\n    change x by (pick random (0) to (-2))\nend\ndelete this clone\n\n@effect\n\nwhen I receive [start v]\nset [ghost v] effect to (0)\nhide\nforever\n    go to x: (0) y: (0)\n    show\n    go to [back v] layer\n    switch costume to (join (letter (1) of (レベル)) (join (letter (2) of (レベル)) (letter (3) of (レベル))))\nend\n\nwhen flag clicked\nhide\n\n@スプライト5\n\nwhen flag clicked\nhide\n\nwhen I receive [start v]\nshow\ngo to [back v] layer\ngo to x: (215) y: (159)\nforever\n    set size to ((100) + ((7) * ([sin v] of ((timer) * (300)) ))) %\nend\n\n@スプライト1\n\nwhen flag clicked\nforever\n    go to [front v] layer\n    set [ghost v] effect to (100)\n    go to x: (0) y: (0)\n    show\nend\n\n@jumper\n\nwhen I receive [start v]\nset [ghost v] effect to (0)\ngo to [back v] layer\ngo [forward v] (1) layers\nforever\n    go to x: (0) y: (0)\n    show\n    switch costume to (join (letter (1) of (レベル)) (join (letter (2) of (レベル)) (letter (3) of (レベル))))\nend\n\nwhen flag clicked\nhide\n\n@扉\n\nwhen flag clicked\nhide\n\nwhen I receive [start v]\nset [ghost v] effect to (0)\nhide\ngo to [back v] layer\ngo [forward v] (1) layers\nforever\n    switch costume to (join (letter (1) of (レベル)) (join (letter (2) of (レベル)) (letter (3) of (レベル))))\nend\n\nwhen I receive [start v]\nforever\n    if <<(🔒) = [1]> and <(distance to [prayer v]) < [60]>> then\n        start sound [メニューを開く1 v]\n        set [🔒 v] to [0]\n        hide\n    end\nend\n\nwhen I receive [初期位置 v]\nshow\nif <(レベル) = [26]> then\n    go to x: (134) y: (-44)\nelse\n    if <(レベル) = [27]> then\n        go to x: (215) y: (-88)\n    else\n        if <(レベル) = [28]> then\n            go to x: (110) y: (144)\n        else\n            hide\n        end\n    end\nend\n\n@スプライト6\n\nwhen flag clicked\nhide\n\nwhen I receive [初期位置 v]\nset [🔒 v] to [0]\nshow\nif <(レベル) = [26]> then\n    go to x: (0) y: (-60)\nelse\n    if <(レベル) = [27]> then\n        go to x: (-190) y: (130)\n    else\n        if <(レベル) = [28]> then\n            go to x: (25) y: (0)\n        else\n            hide\n        end\n    end\nend\ngo to [front v] layer\nset [🔒動く v] to (y position)\ngo [backward v] (5) layers\nrepeat until <touching (prayer v)?>\n    set y to (((4) * ([sin v] of ((250) * (timer)) )) + (🔒動く))\nend\nstart sound [Coin v]\nset [🔒 v] to [1]\nrepeat until <(🔒動く) = [0]>\n    go to (prayer v)\nend\nhide\ngo to x: (-240) y: (-180)\nstop [this script v]\n\nif <(レベル) = [29]> then\n    go to x: (25) y: (0)\nelse\n    if <(レベル) = [30]> then\n        go to x: (25) y: (0)\n    else\n    end\nend\n\nwhen flag clicked\nhide\n\n\n\nbroadcast (初期位置 v)\n\n@Icon\n\nwhen flag clicked\nhide\nreset timer\nstart sound [Diviners - Savannah \(feat. Philly K\) \[NCS Release\].mp3 v]\nclone [icon]\nwait (1) seconds\nclone [1]\nwait (0.3) seconds\nclone [2]\nwait (1.5) seconds\nclone [3]\nwait (0.2) seconds\nclone [4]\nwait (0.6) seconds\nclone [g]\nwait (0.07) seconds\nclone [r]\nwait (.07) seconds\nclone [y]\nwait (.07) seconds\nclone [s]\nwait (0.07) seconds\nclone [t]\nwait (0.07) seconds\nclone [a]\nwait (0.07) seconds\nclone [l]\nwait (0.3) seconds\nclone [-]\nwait (1.6) seconds\nclone [5]\nwait (0.3) seconds\nclone [6]\nwait (0.6) seconds\nclone [7]\nwait (0.3) seconds\nclone [4]\nwait (0.3) seconds\nText\nwait (4.4) seconds\nclear graphic effects\nclone [Change]\nwait (0.3) seconds\nset [brightness v] effect to (100)\nclone [Change]\nclear graphic effects\nText2\nwait (2) seconds\nset [brightness v] effect to (-100)\nclone [Change]\nwait (0.1) seconds\nset [brightness v] effect to (100)\nclone [Change]\nclear graphic effects\nwait (0.6) seconds\nclone [icon2]\nclone [Grass]\nwait (2) seconds\nbroadcast (START v)\n\ndefine clone (id)\nset [id v] to (id)\ncreate clone of (_myself_ v)\n\nwhen I start as a clone\nshow\n\nwhen I start as a clone\nif <(id) = [icon]> then\n    switch costume to (icon v)\n    clear graphic effects\n    go to x: (0) y: (0)\n    point in direction (0)\n    set size to (0) %\n    repeat (30)\n        turn right (((90) - (direction)) / (5)) degrees\n        change size by (((100) - (size)) / (4))\n    end\nend\n\nwhen I start as a clone\nif <(id) = [1]> then\n    switch costume to (1 v)\n    clear graphic effects\n    go to x: (-482) y: (0)\n    point in direction (90)\n    set size to (0) %\n    repeat (30)\n        change x by ((() - (x position)) / (4))\n    end\n    wait (0.3) seconds\n    repeat (30)\n        change size by (((100) - (size)) / (5))\n    end\nend\n\nwhen I start as a clone\nif <(id) = [2]> then\n    switch costume to (1 v)\n    clear graphic effects\n    go to x: (482) y: (0)\n    point in direction (-90)\n    set size to (0) %\n    repeat (30)\n        change x by ((() - (x position)) / (4))\n    end\n    repeat (30)\n        change size by (((100) - (size)) / (5))\n    end\nend\n\nwhen I start as a clone\nif <(id) = [3]> then\n    switch costume to (circle v)\n    clear graphic effects\n    go to x: (0) y: (0)\n    point in direction (90)\n    set size to (0) %\n    repeat until <[600] < (size)>\n        switch costume to (none v)\n        change size by ((size) / (5))\n        switch costume to (circle v)\n    end\n    repeat (30)\n        switch costume to (none v)\n        change size by (((1300) - (size)) * (.18))\n        switch costume to (circle v)\n    end\nend\n\nwhen I start as a clone\nif <(id) = [4]> then\n    switch costume to (circle v)\n    clear graphic effects\n    go to x: (0) y: (0)\n    point in direction (90)\n    set [brightness v] effect to (100)\n    set size to (0) %\n    repeat until <[600] < (size)>\n        switch costume to (none v)\n        change size by ((size) / (5))\n        switch costume to (circle v)\n    end\n    repeat (30)\n        switch costume to (none v)\n        change size by (((1300) - (size)) * (.18))\n        switch costume to (circle v)\n    end\nend\n\nwhen I start as a clone\nif <(id) = [g]> then\n    switch costume to (g v)\n    clear graphic effects\n    go to x: (0) y: (0)\n    point in direction (90)\n    set size to (0) %\n    set [text v] to [0]\n    repeat (35)\n        set [text v] to ((((100) - (size)) / (3)) + ((Text) * (0.75)))\n        change size by (Text)\n    end\n    set y to (-0.1)\n    repeat (50)\n        change y by ((y position) / (3))\n    end\nend\n\nwhen I start as a clone\nif <(id) = [r]> then\n    switch costume to (r v)\n    clear graphic effects\n    go to x: (0) y: (0)\n    point in direction (90)\n    set size to (0) %\n    set [text v] to [0]\n    repeat (35)\n        set [text v] to ((((100) - (size)) / (3)) + ((Text) * (0.75)))\n        change size by (Text)\n    end\n    set y to (-0.1)\n    repeat (50)\n        change y by ((y position) / (3))\n    end\nend\n\nwhen I start as a clone\nif <(id) = [y]> then\n    switch costume to (y v)\n    clear graphic effects\n    go to x: (0) y: (0)\n    point in direction (90)\n    set size to (0) %\n    set [text v] to [0]\n    repeat (35)\n        set [text v] to ((((100) - (size)) / (3)) + ((Text) * (0.75)))\n        change size by (Text)\n    end\n    set y to (-0.1)\n    repeat (50)\n        set size to (500) %\n        change y by ((y position) / (3))\n        set size to (100) %\n    end\nend\n\nwhen I start as a clone\nif <(id) = [s]> then\n    switch costume to (s v)\n    clear graphic effects\n    go to x: (0) y: (0)\n    point in direction (90)\n    set size to (0) %\n    set [text v] to [0]\n    repeat (35)\n        set [text v] to ((((100) - (size)) / (3)) + ((Text) * (0.75)))\n        change size by (Text)\n    end\n    set y to (-0.1)\n    repeat (50)\n        set size to (500) %\n        change y by ((y position) / (3))\n        set size to (100) %\n    end\nend\n\nwhen I start as a clone\nif <(id) = [t]> then\n    switch costume to (t v)\n    clear graphic effects\n    go to x: (0) y: (0)\n    point in direction (90)\n    set size to (0) %\n    set [text v] to [0]\n    repeat (35)\n        set [text v] to ((((100) - (size)) / (3)) + ((Text) * (0.75)))\n        change size by (Text)\n    end\n    set y to (-0.1)\n    repeat (50)\n        change y by ((y position) / (3))\n    end\nend\n\nwhen I start as a clone\nif <(id) = [a]> then\n    switch costume to (a v)\n    clear graphic effects\n    go to x: (0) y: (0)\n    point in direction (90)\n    set size to (0) %\n    set [text v] to [0]\n    repeat (35)\n        set [text v] to ((((100) - (size)) / (3)) + ((Text) * (0.75)))\n        change size by (Text)\n    end\n    set y to (-0.1)\n    repeat (50)\n        change y by ((y position) / (3))\n    end\nend\n\nwhen I start as a clone\nif <(id) = [l]> then\n    switch costume to (l v)\n    clear graphic effects\n    go to x: (0) y: (0)\n    point in direction (90)\n    set size to (0) %\n    set [text v] to [0]\n    repeat (35)\n        set [text v] to ((((100) - (size)) / (3)) + ((Text) * (0.75)))\n        change size by (Text)\n    end\n    set y to (-0.1)\n    repeat (50)\n        change y by ((y position) / (3))\n    end\nend\n\nwhen I start as a clone\nif <(id) = [-]> then\n    switch costume to (- v)\n    clear graphic effects\n    go to x: (-480) y: (0)\n    point in direction (90)\n    set size to (100) %\n    go to [front v] layer\n    repeat (7)\n        change x by ((() - (x position)) / (2))\n    end\n    set y to (-0.1)\n    repeat (50)\n        change y by ((y position) / (3))\n    end\nend\n\nwhen I start as a clone\nif <(id) = [5]> then\n    switch costume to (square v)\n    clear graphic effects\n    set [ghost v] effect to (50)\n    go to x: (0) y: (-480)\n    point in direction (90)\n    set size to (100) %\n    repeat (30)\n        change y by ((() - (y position)) / (5))\n    end\nend\n\nwhen I start as a clone\nif <(id) = [6]> then\n    switch costume to (square v)\n    clear graphic effects\n    set [ghost v] effect to (25)\n    go to x: (0) y: (-480)\n    point in direction (90)\n    set size to (100) %\n    repeat (30)\n        change y by ((() - (y position)) / (5))\n    end\nend\n\nwhen I start as a clone\nif <(id) = [7]> then\n    switch costume to (square v)\n    clear graphic effects\n    go to x: (0) y: (-480)\n    point in direction (90)\n    set size to (100) %\n    repeat (30)\n        change y by ((() - (y position)) / (5))\n    end\nend\n\ndefine Text\nset [id v] to [Text]\nset [textid v] to [0]\nrepeat (7)\n    change [textid v] by (1)\n    create clone of (_myself_ v)\n    wait (0.01) seconds\nend\n\nwhen I start as a clone\nif <(id) = [Text]> then\n    switch costume to ((4) + (TextID))\n    point in direction (0)\n    set size to (100) %\n    go to x: (480) y: (0)\n    repeat (25)\n        turn right (((90) - (direction)) / (5)) degrees\n        change x by ((() - (x position)) / (5))\n    end\n    wait (0.2) seconds\n    repeat (13)\n        change size by (((80) - (size)) / (3))\n    end\n    point in direction (91)\n    repeat (13)\n        turn right (([abs v] of ((90) - (direction)) ) / (2)) degrees\n    end\n    set [text v] to [0]\n    repeat (25)\n        set [text v] to (((Text) * (0.72)) + (((90) - (direction)) / (6)))\n        turn right (Text) degrees\n        change size by (((100) - (size)) / (5))\n    end\n    point in direction (100)\n    repeat (16)\n        change size by (((80) - (size)) / (4))\n        set [text v] to (((Text) * (0.73)) + (((90) - (direction)) / (7)))\n        turn right (Text) degrees\n    end\n    point in direction (80)\n    repeat (16)\n        change size by (((120) - (size)) / (4))\n        set [text v] to (((Text) * (0.73)) + (((90) - (direction)) / (7)))\n        turn right (Text) degrees\n    end\n    point in direction (91)\n    repeat (13)\n        turn right (([abs v] of ((90) - (direction)) ) / (2)) degrees\n    end\n    set [text v] to [0]\n    repeat (25)\n        set [text v] to (((Text) * (0.72)) + (((90) - (direction)) / (6)))\n        turn right (Text) degrees\n        change size by (((100) - (size)) / (5))\n    end\n    point in direction (91)\n    repeat (30)\n        turn right (([abs v] of ((90) - (direction)) ) / (3)) degrees\n        change [ghost v] effect by (4)\n    end\nend\n\nwhen I start as a clone\nif <(id) = [Change]> then\n    switch costume to (change v)\n    point in direction (90)\n    go to x: (0) y: (0)\n    set size to (100) %\n    repeat (30)\n        switch costume to (none v)\n        change size by (((36500) - (size)) * (.17))\n        switch costume to (change v)\n    end\nend\n\ndefine Text2\nset [id v] to [Text2]\nset [textid v] to [0]\nrepeat (7)\n    change [textid v] by (1)\n    create clone of (_myself_ v)\n    wait (0.01) seconds\nend\n\nwhen I start as a clone\nif <(id) = [Text2]> then\n    switch costume to ((4) + (TextID))\n    set size to (100) %\n    point in direction (180)\n    go to x: (0) y: (-480)\n    repeat (25)\n        turn right (((90) - (direction)) / (5)) degrees\n        change y by ((() - (y position)) / (5))\n    end\n    wait (0.2) seconds\n    repeat (13)\n        change size by (((80) - (size)) / (3))\n    end\n    point in direction (91)\n    repeat (13)\n        turn right (([abs v] of ((90) - (direction)) ) / (2)) degrees\n    end\n    set [text v] to [0]\n    repeat (25)\n        set [text v] to (((Text) * (0.72)) + (((90) - (direction)) / (6)))\n        turn right (Text) degrees\n        change size by (((100) - (size)) / (5))\n        change [ghost v] effect by (4)\n    end\nend\n\nwhen I start as a clone\nif <(id) = [icon2]> then\n    go to [front v] layer\n    switch costume to (icon v)\n    point in direction (90)\n    go to x: (0) y: (0)\n    set size to (0) %\n    repeat (30)\n        change size by (((100) - (size)) / (5))\n    end\n    repeat (30)\n        change size by (((50) - (size)) / (5))\n        change [ghost v] effect by (7)\n    end\n    delete this clone\nend\n\nwhen I start as a clone\nif <(id) = [Grass]> then\n    go to [front v] layer\n    switch costume to (none v)\n    point in direction (90)\n    go to x: (0) y: (0)\n    set size to (1000) %\n    repeat (30)\n        switch costume to (none v)\n        change size by (((100) - (size)) / (5))\n        switch costume to (grasses v)\n    end\n    repeat (30)\n        change size by (((150) - (size)) / (5))\n        change [ghost v] effect by (8)\n    end\n    delete this clone\nend\n\nwhen I start as a clone\nif <<not <(id) = [Change]>> and <not <(id) = [Par]>>> then\n    wait until <[17.8] < (timer)>\n    delete this clone\nelse\n    wait until <[18] < (timer)>\n    repeat (20)\n        change [ghost v] effect by (5)\n    end\n    delete this clone\nend\n\ndefine Particle\nrepeat (pick random (20) to (10))\n    clone [Par]\nend\n\nwhen I start as a clone\nif <(id) = [Par]> then\n    go to [front v] layer\n    switch costume to (pick random (16) to (18))\n    point in direction (pick random (0) to (360))\n    go to x: (0) y: (0)\n    set size to (pick random (30) to (60)) %\n    set [par v] to (pick random (15) to (20))\n    repeat (20)\n        set [par v] to ((Par) * (0.9))\n        move (Par) steps\n        change [ghost v] effect by (3)\n    end\n    repeat (30)\n        set [par v] to ((Par) * (0.9))\n        move (Par) steps\n        change [ghost v] effect by (2)\n    end\n    delete this clone\nend\n\ndefine Wait (time)\nwait until <(time) < (timer)>\n\nwhen flag clicked\nParticle\nWait [4.6]\nParticle\nWait [8.3]\nParticle\nWait [8.9]\nParticle\nWait [9.5]\nParticle\nWait [10.1]\nParticle\nWait [10.7]\nParticle\nWait [11.3]\nParticle\nWait [11.9]\nParticle\nWait [13.5]\nParticle\nWait [14.1]\nParticle\nWait [14.7]\nParticle\nWait [17.25]\nParticle\n\n
https://scratch.mit.edu/projects/632459198\n[How to use]\n\nMove to right side : right arrow key or d key\nMove to left side : left arrow key or a key\nJump : up key or w key\n\n[Credit]\nIntro : @mochi-kinakomochi\nPrograms : @-Grystal\nMusic : @-xaf-\n\n[Message]\nPlease give me ❤️⭐️!\nPlease follow me and play other games!\n