Gold Apple Platformer! #All #Games

Instructions: Hey guys, I don’t know why someones saying I didn’t credit I actully credit at the first time! Even it 100 views.\n\n\nGold Apple Platformer!!\n\nUse Arrow keys to move!\nYou need to dodge spikes of course.\n\nI'll update when the view is +20 (Updated!)\n\n애플 플랫포머입니다!!\n\n화살표 키를 사용하여 이동합니다!\n아 물론 가시는 피해야 합니다.\n\n뷰가 +20이면 업데이트하겠습니다. (업데이트 됨!)\n\n\nUpdate(업데이트)\n(20+ views)+Moving enemy, cloud variable added, another designed border\n\n(30+ views) +timer, world record added, who cleared cloud variable deleted\n\n(+50 views)(hitbox will be more greater!))(updated!)\n\n(+60 views)(No more borders)(updated!)\n\n(1500+ views part 2)\n\nBug patch \n\nworld record variable patched

@Stage\n\nwhen I receive [start v]\nforever\n    play sound [Dance Around v] until done\nend\n\n@Scratch Cat\n\nwhen I receive [start v]\nshow\ngo to [front v] layer\nset [1 v] to [2]\nset [사과 v] to [0]\nshow variable [lives v]\nshow variable [☁ world record v]\nforever\n    if <key (right arrow v) pressed?> then\n        point in direction (90)\n        set rotation style [left-right v]\n        go to (scratch cat v)\n        switch costume to (1)\n        change [1 v] by (1)\n        if <<[16] < (1)> or <(1) = [17]>> then\n            set [1 v] to [2]\n        end\n        if <touching color (#989898)?> then\n            switch costume to (으악! v)\n        end\n    end\n    if <key (left arrow v) pressed?> then\n        point in direction (-90)\n        set rotation style [left-right v]\n        go to (scratch cat v)\n        switch costume to (1)\n        change [1 v] by (1)\n        if <<[16] < (1)> or <(1) = [17]>> then\n            set [1 v] to [2]\n        end\n        if <touching color (#989898)?> then\n            switch costume to (으악! v)\n        end\n    end\n    if <not <key (any v) pressed?>> then\n        if <(사과) = [0]> then\n            set [1 v] to [1]\n        else\n            set [1 v] to [18]\n        end\n        switch costume to (1)\n        if <touching color (#989898)?> then\n            switch costume to (으악! v)\n        end\n    end\n    if <<key (right arrow v) pressed?> and <key (left arrow v) pressed?>> then\n        if <(사과) = [0]> then\n            set [1 v] to [1]\n        else\n            set [1 v] to [18]\n        end\n        switch costume to (1)\n        if <touching color (#989898)?> then\n            switch costume to (으악! v)\n        end\n    end\n    if <(사과) = [1]> then\n        set [1 v] to [18]\n        switch costume to (사과 먹었다! v)\n        play sound [Win v] until done\n        wait (0.5) seconds\n        hide\n        wait (0.4) seconds\n        stop [all v]\n    end\nend\n\nwhen flag clicked\nhide\nhide variable [lives v]\nhide variable [☁ world record v]\n\nwhen I receive [황금 사과!! v]\nset [사과 v] to [1]\n\nwhen I receive [으악! v]\nstop [other scripts in sprite v]\nstart sound [으악!! v]\nwait (1) seconds\nbroadcast (restart v)\nwait (0.05) seconds\nbroadcast (Start v)\n\n@히트박스\n\nwhen flag clicked\nhide\n\nwhen I receive [start v]\nshow\nset size to (100) %\ngo to [front v] layer\nset [ghost v] effect to (100)\ngo to x: (0) y: (0)\nset [x v] to [0]\nset [y v] to [0]\nset [스크롤 x v] to [0]\nset [스크롤 y v] to [0]\nset [hp 버그 방지 v] to [0]\nforever\n    움직임\nend\n\ndefine 움직임\nif <key (right arrow v) pressed?> then\n    change [x v] by (1)\nend\nif <key (left arrow v) pressed?> then\n    change [x v] by (-1)\nend\nchange x by (X)\nif <<touching (땅 v)?> or <touching (투명 벽 v)?>> then\n    change x by ((X) * (-1))\n    set [x v] to [0]\nelse\n    set [x v] to ((X) * (0.9))\nend\nchange y by (Y)\nif <<touching (땅 v)?> or <touching (투명 벽 v)?>> then\n    change y by ((Y) * (-1))\n    set [y v] to [0]\n    if <key (up arrow v) pressed?> then\n        set [y v] to [15]\n        start sound [Jump v]\n    end\nelse\n    change [y v] by (-1)\nend\nchange [스크롤 x v] by ((x position) * (-1))\nchange [스크롤 y v] by ((y position) * (-1))\ngo to x: (0) y: (0)\n\nwhen flag clicked\nset [lives v] to [3]\n\nwhen flag clicked\nforever\n    if <(Lives) = [0]> then\n        stop [all v]\n    end\nend\n\nwhen I receive [황금 사과!! v]\nwait (3) seconds\nhide\nhide variable [lives v]\n\n@땅\n\nwhen flag clicked\nhide\n\nwhen I receive [start v]\nset [레벨 넘버 v] to [0]\ncreate clone of (_myself_ v)\nrepeat (6)\n    change [레벨 넘버 v] by (1)\n    create clone of (_myself_ v)\nend\nset [레벨 넘버 v] to [0]\n\nwhen I receive [level v]\nshow\nif <(레벨 넘버) = [0]> then\n    switch costume to (레벨 1 v)\n    go to x: (스크롤 X) y: (스크롤 Y)\nelse\n    if <(레벨 넘버) = [1]> then\n        switch costume to (레벨 2 v)\n        go to x: ((스크롤 X) + (280)) y: (스크롤 Y)\n    else\n        if <(레벨 넘버) = [2]> then\n            switch costume to (레벨 3 v)\n            go to x: ((스크롤 X) + (760)) y: (스크롤 Y)\n        else\n            if <(레벨 넘버) = [3]> then\n                switch costume to (레벨 4 v)\n                go to x: ((스크롤 X) + (1240)) y: (스크롤 Y)\n            else\n                if <(레벨 넘버) = [4]> then\n                    switch costume to (레벨 5 v)\n                    go to x: ((스크롤 X) + (1700)) y: (스크롤 Y)\n                else\n                    if <(레벨 넘버) = [5]> then\n                        switch costume to (레벨 6 v)\n                        go to x: ((스크롤 X) + (2160)) y: (스크롤 Y)\n                    else\n                        if <(레벨 넘버) = [6]> then\n                            switch costume to (레벨 7 v)\n                            go to x: ((스크롤 X) + (2620)) y: (스크롤 Y)\n                        end\n                    end\n                end\n            end\n        end\n    end\nend\n\nwhen I receive [start v]\nforever\n    broadcast (Level v)\nend\n\nwhen I receive [restart v]\nstop [other scripts in sprite v]\ndelete this clone\n\n@투명 벽\n\nwhen flag clicked\nhide\n\nwhen I receive [start v]\ngo to x: (0) y: (0)\nshow\ngo to [back v] layer\nset [ghost v] effect to (100)\nforever\n    go to x: (스크롤 X) y: (스크롤 Y)\nend\n\n@배경\n\nwhen flag clicked\nhide\n\nwhen I receive [start v]\ngo to [back v] layer\nset [배경 v] to [0]\ncreate clone of (_myself_ v)\nrepeat (15)\n    change [배경 v] by (1)\n    create clone of (_myself_ v)\nend\nset [배경 v] to [0]\n\nwhen I receive [level v]\nshow\nif <(배경) = [0]> then\n    go to x: (스크롤 X) y: (스크롤 Y)\nelse\n    if <(배경) = [1]> then\n        go to x: ((스크롤 X) + (470)) y: (스크롤 Y)\n    else\n        if <(배경) = [2]> then\n            go to x: (스크롤 X) y: ((스크롤 Y) + (300))\n        else\n            if <(배경) = [3]> then\n                go to x: ((스크롤 X) + (470)) y: ((스크롤 Y) + (300))\n            else\n                if <(배경) = [4]> then\n                    go to x: ((스크롤 X) + (940)) y: (스크롤 Y)\n                else\n                    if <(배경) = [5]> then\n                        go to x: ((스크롤 X) + (940)) y: ((스크롤 Y) + (300))\n                    else\n                        if <(배경) = [6]> then\n                            go to x: ((스크롤 X) + (-170)) y: (스크롤 Y)\n                        else\n                            if <(배경) = [7]> then\n                                go to x: ((스크롤 X) + (1410)) y: (스크롤 Y)\n                            else\n                                if <(배경) = [8]> then\n                                    go to x: ((스크롤 X) + (1410)) y: ((스크롤 Y) + (300))\n                                else\n                                    if <(배경) = [9]> then\n                                        go to x: ((스크롤 X) + (1880)) y: (스크롤 Y)\n                                    else\n                                        if <(배경) = [10]> then\n                                            go to x: ((스크롤 X) + (1880)) y: ((스크롤 Y) + (300))\n                                        else\n                                            if <(배경) = [11]> then\n                                                go to x: ((스크롤 X) + (2350)) y: (스크롤 Y)\n                                            else\n                                                if <(배경) = [12]> then\n                                                    go to x: ((스크롤 X) + (2350)) y: ((스크롤 Y) + (300))\n                                                else\n                                                    if <(배경) = [13]> then\n                                                        go to x: ((스크롤 X) + (2820)) y: (스크롤 Y)\n                                                    else\n                                                        if <(배경) = [14]> then\n                                                            go to x: ((스크롤 X) + (2820)) y: ((스크롤 Y) + (300))\n                                                        else\n                                                            if <(배경) = [15]> then\n                                                                go to x: ((스크롤 X) + (-170)) y: ((스크롤 Y) + (300))\n                                                            end\n                                                        end\n                                                    end\n                                                end\n                                            end\n                                        end\n                                    end\n                                end\n                            end\n                        end\n                    end\n                end\n            end\n        end\n    end\nend\n\nwhen I receive [start v]\nforever\n    go to [back v] layer\nend\n\nwhen I receive [restart v]\nstop [other scripts in sprite v]\ndelete this clone\n\n@골\n\nwhen flag clicked\nset [타이머 v] to [0]\nhide\nrepeat until <(타이머) = [1]>\n    reset timer\nend\n\nwhen I receive [start v]\nset [타이머 v] to [1]\nshow\ngo to [front v] layer\ngo [backward v] (3) layers\nswitch costume to (황금 사과 v)\nforever\n    go to x: ((스크롤 X) + (2650)) y: (스크롤 Y)\nend\n\nwhen I receive [start v]\nforever\n    if <touching (히트박스 v)?> then\n        if <(☁ World record) > (timer)> then\n            set [☁ world record v] to (timer)\n        end\n        switch costume to (먹은 황금 사과 v)\n        start sound [Bite v]\n        broadcast (황금 사과!! v)\n        wait (3) seconds\n        stop [all v]\n    end\nend\n\n@가시\n\nwhen I receive [restart v]\nstop [other scripts in sprite v]\ndelete this clone\n\nwhen I receive [start v]\nshow\ngo to [front v] layer\ngo [backward v] (3) layers\nswitch costume to (가시 v)\nforever\n    go to x: ((스크롤 X) + (500)) y: ((스크롤 Y) + (125))\nend\n\nwhen flag clicked\nhide\n\nwhen I receive [start v]\nwait (1) seconds\nforever\n    if <touching (scratch cat v)?> then\n        set [hp 버그 방지 v] to [1]\n        wait (0.01) seconds\n        broadcast (으악! v)\n        change [lives v] by (-1)\n        stop [this script v]\n    end\nend\n\n@썸네일\n\nwhen flag clicked\nhide\n\nwhen I receive [start v]\nshow\ngo to [front v] layer\nset [ghost v] effect to (100)\ngo to x: (0) y: (0)\n\n@가시3\n\nwhen I receive [restart v]\nstop [other scripts in sprite v]\ndelete this clone\n\nwhen I receive [start v]\nshow\ngo to [front v] layer\ngo [backward v] (3) layers\nswitch costume to (가시 v)\nforever\n    go to x: ((스크롤 X) + (925)) y: ((스크롤 Y) + (-80))\nend\n\nwhen flag clicked\nhide\n\nwhen I receive [start v]\nwait (1) seconds\nforever\n    if <touching (scratch cat v)?> then\n        set [hp 버그 방지 v] to [1]\n        wait (0.01) seconds\n        broadcast (으악! v)\n        change [lives v] by (-1)\n        stop [this script v]\n    end\nend\n\n@가시4\n\nwhen I receive [restart v]\nstop [other scripts in sprite v]\ndelete this clone\n\nwhen I receive [start v]\nwait (1) seconds\nforever\n    if <touching (scratch cat v)?> then\n        set [hp 버그 방지 v] to [1]\n        wait (0.01) seconds\n        broadcast (으악! v)\n        change [lives v] by (-1)\n        stop [this script v]\n    end\nend\n\nwhen I receive [start v]\nshow\ngo to [front v] layer\ngo [backward v] (3) layers\nswitch costume to (가시 v)\nforever\n    go to x: ((스크롤 X) + (1010)) y: ((스크롤 Y) + (-80))\nend\n\nwhen flag clicked\nhide\n\n@가시5\n\nwhen I receive [restart v]\nstop [other scripts in sprite v]\ndelete this clone\n\nwhen I receive [start v]\nwait (1) seconds\nforever\n    if <touching (scratch cat v)?> then\n        set [hp 버그 방지 v] to [1]\n        wait (0.01) seconds\n        broadcast (으악! v)\n        stop [this script v]\n    end\nend\n\nwhen I receive [start v]\nshow\ngo to [front v] layer\ngo [backward v] (3) layers\nswitch costume to (가시 v)\nforever\n    go to x: ((스크롤 X) + (1482)) y: ((스크롤 Y) + (-80))\nend\n\nwhen flag clicked\nhide\n\n@가시6\n\nwhen I receive [restart v]\nstop [other scripts in sprite v]\ndelete this clone\n\nwhen I receive [start v]\nshow\ngo to [front v] layer\ngo [backward v] (3) layers\nswitch costume to (가시 v)\nforever\n    go to x: ((스크롤 X) + (1762)) y: ((스크롤 Y) + (-80))\nend\n\nwhen flag clicked\nhide\n\nwhen I receive [start v]\nwait (1) seconds\nforever\n    if <touching (scratch cat v)?> then\n        set [hp 버그 방지 v] to [1]\n        wait (0.01) seconds\n        broadcast (으악! v)\n        stop [this script v]\n    end\nend\n\n@가시2\n\nwhen I receive [restart v]\nstop [other scripts in sprite v]\ndelete this clone\n\nwhen I receive [start v]\nshow\ngo to [front v] layer\ngo [backward v] (3) layers\nswitch costume to (가시 v)\nforever\n    go to x: ((스크롤 X) + (840)) y: ((스크롤 Y) + (-80))\nend\n\nwhen flag clicked\nhide\n\nwhen I receive [start v]\nwait (1) seconds\nforever\n    if <touching (scratch cat v)?> then\n        set [hp 버그 방지 v] to [1]\n        wait (0.01) seconds\n        broadcast (으악! v)\n        stop [this script v]\n    end\nend\n\n@Intro\n\nwhen I start as a clone\nif <(Clone) = [Particles]> then\n    switch costume to (pick random (29) to (31))\n    set size to (pick random (50) to (150)) %\n    set [ghost v] effect to (pick random (0.) to (5.))\n    set [brightness v] effect to (pick random (-25.) to (100.))\n    go to x: (0) y: (0)\n    point in direction (pick random (-180) to (180))\n    set [x v] to (pick random (10.) to (12.))\n    set [i v] to (pick random (2.) to (9.))\n    go to [front v] layer\n    show\n    repeat until <touching (_edge_ v)?>\n        move (X) steps\n        change y by (I)\n        change [i v] by (-0.4)\n        set [x v] to ((X) * (0.95))\n    end\n    delete this clone\nend\n\ndefine Particles\nset [clone v] to [Particles]\nrepeat (50)\n    create clone of (_myself_ v)\nend\n\nwhen I start as a clone\nif <(Clone) = [Name]> then\n    switch costume to (name v)\n    set size to (50) %\n    clear graphic effects\n    go to [front v] layer\n    go to x: (0) y: (-100)\n    point in direction (0)\n    show\n    repeat (50)\n        go to [front v] layer\n        change size by (((130) - (size)) / (8))\n        change y by (((0) - (y position)) / (8))\n        turn right (((90) - (direction)) / (8)) degrees\n    end\n    set [i v] to [-1]\n    repeat (10)\n        go to [front v] layer\n        change size by (I)\n        change [i v] by (join [-] (([abs v] of (I) ) / (2)))\n        turn right (I) degrees\n    end\n    switch costume to (logo v)\n    repeat (40)\n        go to [front v] layer\n        change size by (((130) - (size)) / (8))\n        turn right (((90) - (direction)) / (8)) degrees\n    end\n    set [i v] to [-1]\n    repeat (20)\n        go to [front v] layer\n        change size by ((I) / (3))\n        change [i v] by (join [-] (([abs v] of (I) ) / (4)))\n        turn right ((I) / (-3)) degrees\n    end\n    delete this clone\nend\n\nwhen flag clicked\nreset timer\nhide\nstart sound [Prismo - Stronger v]\nset volume to (100) %\nclear graphic effects\nset size to (100) %\npoint in direction (90)\ngo to x: (0) y: (0)\nset [clone v] to [Square]\ncreate clone of (_myself_ v)\nwait (1) seconds\nset [clone v] to [Name]\ncreate clone of (_myself_ v)\nwait (0) seconds\nrepeat (2)\n    Spiral spline explosion\n    Particles\n    Rect\n    Spiral spline explosion\nend\nCircle\nrepeat (4)\n    Spiral spline explosion\n    Particles\n    Rect\n    Spiral spline explosion\nend\nCircle\nrepeat (2)\n    Spiral spline explosion\n    Rect\n    Spiral spline explosion\nend\nwait (3) seconds\nbroadcast (Start v)\n\nwhen I start as a clone\nif <(Clone) = [Square]> then\n    clear graphic effects\n    show\n    set size to (0) %\n    go to x: (0) y: (300)\n    point in direction (0)\n    switch costume to (square v)\n    repeat (20)\n        change size by (((100) - (size)) / (5))\n        turn right (((90) - (direction)) / (5)) degrees\n        change y by (((0) - (y position)) / (5))\n    end\n    point in direction (90)\n    repeat (12)\n        next costume\n    end\n    repeat (20)\n        switch costume to (blank v)\n        change size by (((2000) - (size)) / (5))\n        switch costume to (square13 v)\n    end\n    wait (3) seconds\n    repeat (20)\n        switch costume to (blank v)\n        change size by (((100) - (size)) / (5))\n        switch costume to (square13 v)\n    end\n    repeat (12)\n        switch costume to ((costume [number v]) - (1))\n        change size by (-5)\n    end\n    set [i v] to [-1]\n    repeat (20)\n        change size by ((I) / (3))\n        change [i v] by (join [-] (([abs v] of (I) ) / (4)))\n        turn right ((I) / (-3)) degrees\n        change y by ((I) / (3))\n    end\n    delete this clone\nend\n\nwhen I start as a clone\nif <(Clone) = [Bursts]> then\n    switch costume to (lineexplosion1 v)\n    clear graphic effects\n    go to [front v] layer\n    go [backward v] (1) layers\n    set [i v] to (pick random (1) to (3))\n    if <(I) = [1]> then\n        set [brightness v] effect to (100)\n    else\n        if <(I) = [2]> then\n            set [brightness v] effect to (25)\n        else\n            set [brightness v] effect to (-25)\n        end\n    end\n    show\n    set [i v] to [20]\n    Animate   x: [0] y: [0] size: [0] rotate: (pick random (-180) to (180)) speed: [1]\n    repeat (2)\n        set [i v] to ((I) * (0.9))\n        move (I) steps\n        Size: [100] speed: [5]\n    end\n    repeat (10)\n        set [i v] to ((I) * (0.9))\n        move (I) steps\n        Size: [100] speed: [5]\n        change [ghost v] effect by (10)\n        next costume\n    end\n    delete this clone\nend\n\ndefine Animate   x: (x) y: (y) size: (s) rotate: (r) speed: (s)\nchange x by (((round (x)) - (round (x position))) / (s))\nchange y by (((round (y)) - (round (y position))) / (s))\nchange size by (((round (s)) - (round (size))) / (s))\nturn right (((round (r)) - (round (direction))) / (s)) degrees\n\ndefine Spiral spline explosion\nset [clone v] to [Bursts]\nrepeat (5)\n    create clone of (_myself_ v)\nend\n\ndefine Size: (s) speed: (spd)\nchange size by (((round (s)) - (round (size))) / (spd))\n\ndefine Rect\nset [clone v] to [Rect]\ncreate clone of (_myself_ v)\n\nwhen I start as a clone\nif <(Clone) = [Rect]> then\n    clear graphic effects\n    show\n    set size to (0) %\n    go to (random position v)\n    point in direction (90)\n    switch costume to (background rect v)\n    repeat until <(round (size)) = [300]>\n        change size by (((300) - (size)) / (15))\n        change [ghost v] effect by (4)\n    end\n    delete this clone\nend\n\nwhen I start as a clone\nif <(Clone) = [Circle]> then\n    clear graphic effects\n    set [brightness v] effect to (100)\n    go to [front v] layer\n    go [backward v] (2) layers\n    show\n    set size to (0) %\n    go to x: (0) y: (0)\n    point in direction (90)\n    switch costume to (circle explosion 1 v)\n    repeat (20)\n        switch costume to (blank v)\n        change size by (((300) - (size)) / (5))\n        switch costume to (circle explosion 1 v)\n    end\n    delete this clone\nend\n\ndefine Circle\nset [clone v] to [Circle]\ncreate clone of (_myself_ v)\nwait (0.1) seconds\nset [clone v] to [Circle 2]\ncreate clone of (_myself_ v)\n\nwhen I start as a clone\nif <(Clone) = [Circle 2]> then\n    clear graphic effects\n    set [brightness v] effect to (0)\n    go to [front v] layer\n    go [backward v] (1) layers\n    show\n    set size to (0) %\n    go to x: (0) y: (0)\n    point in direction (90)\n    switch costume to (circle explosion 1 v)\n    repeat (20)\n        switch costume to (blank v)\n        change size by (((300) - (size)) / (5))\n        switch costume to (circle explosion 1 v)\n    end\n    delete this clone\nend\n\n@상대\n\nwhen flag clicked\nhide\n\nwhen I receive [start v]\nclear graphic effects\nshow\nset [상대 x v] to [0]\nset [상대 y v] to [0]\nforever\n    go to x: ((스크롤 X) + (1600)) y: ((스크롤 Y) + (40))\nend\n\nwhen I receive [start v]\nswitch costume to (wolf v)\nset rotation style [left-right v]\npoint in direction (90)\nforever\n    point in direction (90)\n    repeat (30)\n        change [상대 x v] by (0.1)\n        change x by (상대 X)\n    end\n    wait (0.1) seconds\n    point in direction (-90)\n    repeat (30)\n        change [상대 x v] by (-0.1)\n        change x by (상대 X)\n    end\n    wait (0.1) seconds\nend\n\nwhen I receive [start v]\nwait (0.2) seconds\nforever\n    if <<touching (히트박스 v)?> and <not <(Lives) = [0]>>> then\n        set [hp 버그 방지 v] to [1]\n        broadcast (으악! v)\n        change [lives v] by (-1)\n        wait (0.1) seconds\n        stop [this script v]\n    end\nend\n\nwhen I receive [상대 죽음 v]\nstop [other scripts in sprite v]\nstart sound [Squish Pop v]\nswitch costume to (wolf v)\nrepeat (10)\n    change [ghost v] effect by (10)\nend\nhide\nstop [this script v]\n\n@상대 히트박스\n\nwhen I receive [start v]\nset [ghost v] effect to (100)\nclear graphic effects\nshow\nset [상대 x v] to [0]\nset [상대 y v] to [0]\nforever\n    go to x: ((스크롤 X) + (1600)) y: ((스크롤 Y) + (40))\nend\n\nwhen flag clicked\nhide\n\nwhen I receive [start v]\nset [ghost v] effect to (100)\nset rotation style [left-right v]\npoint in direction (90)\nforever\n    point in direction (90)\n    repeat (30)\n        change [상대 x v] by (-2)\n    end\n    wait (0.1) seconds\n    point in direction (-90)\n    repeat (30)\n        change [상대 x v] by (2)\n    end\n    wait (0.1) seconds\nend\n\nwhen I receive [start v]\nset [상대 죽음? v] to [0]\nwait (0.2) seconds\nforever\n    if <touching (히트박스 v)?> then\n        set [상대 죽음? v] to [1]\n        broadcast (상대 죽음 v)\n        hide\n    end\nend\n\n