⋆✦★Planets || Platformer ★✦⋆
@Stage\n\nwhen I receive [changebackdrop v]\nnext backdrop\nset [backdropnumber v] to (backdrop [number v])\nbroadcast (CompilePlatformData v)\n\nset [backdropnumber v] to [1]\n\nwhen I receive [loadplatformdata v]\n\nwait (1) seconds\nswitch backdrop to (BackdropNumber)\n\nwhen I receive [showplatformer v]\nswitch backdrop to (BackdropNumber)\n\nwait (1) seconds\n\n@dECODING sPACES\n\ngo to x: (0) y: (0)\nhide\ngo to [front v] layer\nset [test yes/no   /play/singleload v] to [Single]\nset [classicgametypeall/single v] to [Single]\nask [PasteCodeHere] and wait\nbroadcast (HideUserWorldLoadingScreens v)\nset [platformcode v] to (answer)\nbroadcast (ShowLoadingScreen v)\nset [originalblock? v] to [Yes]\nbroadcast (LoadPlatformData v) and wait\nbroadcast (ShowPlatformer v) and wait\nbroadcast (Start v)\n\nwhen I receive [loadplatformermadebygamer v]\nshow\n\nwhen I receive [hideuserworldloadingscreens v]\nhide\n\nwhen flag clicked\nset [userworldnumber v] to [1]\ngo to x: (0) y: (0)\nhide\n\nwhen this sprite clicked\nif <(mouse y) > [100]> then\n    stop [this script v]\nend\nwait until <not <mouse down?>>\nif <(mouse y) < [-80]> then\n    broadcast (LoadFromCode v)\n    stop [this script v]\nend\nif <(mouse x) > [0]> then\n    broadcast (NextUserWorld v)\n    if <(UserWorldNumber) = (length of [userplatformsusernames v])> then\n        set [userworldnumber v] to [1]\n    else\n        change [userworldnumber v] by (1)\n    end\nelse\n    broadcast (PreviousUserWorld v)\n    if <(UserWorldNumber) = [1]> then\n        set [userworldnumber v] to (length of [userplatformsusernames v])\n    else\n        change [userworldnumber v] by (-1)\n    end\nend\ngo to [front v] layer\nset [userleveldifficultyrating v] to (item (UserWorldNumber) of [userleveldifficultyrating v])\nset [worldby v] to (item (UserWorldNumber) of [userplatformsusernames v])\nbroadcast (mAIN1 v)\n\nwhen I receive [loadfromcode v]\ngo to x: (0) y: (0)\nhide\ngo to [front v] layer\nset [test yes/no   /play/singleload v] to [Single]\nset [classicgametypeall/single v] to [Single]\nask [PasteCodeHere] and wait\nbroadcast (HideUserWorldLoadingScreens v)\nset [workaroundtempplatformcodewithspaces v] to (answer)\nset [workaroundloopcounter v] to [1]\nset [platformcode v] to []\nrepeat (length of (WorkaroundTEMPplatformCodeWithSpaces))\n    if <not <(letter (WorkaroundLoopCounter) of (WorkaroundTEMPplatformCodeWithSpaces)) = [ ]>> then\n        set [platformcode v] to (join (PlatformCode) (letter (WorkaroundLoopCounter) of (WorkaroundTEMPplatformCodeWithSpaces)))\n    end\n    change [workaroundloopcounter v] by (1)\nend\nbroadcast (ShowLoadingScreen v)\nset [originalblock? v] to [Yes]\nbroadcast (LoadPlatformData v) and wait\nbroadcast (ShowPlatformer v) and wait\nbroadcast (Start v)\n\n@Platforms\n\nwhen I receive [showplatformer v]\nif <[1] = [1]> then\n    delete this clone\nend\nset [loopcounter v] to [1]\nrepeat (length of [showplatformscostume v])\n    set [originalblock? v] to [No]\n    switch costume to (item (LoopCounter) of [showplatformscostume v])\n    go to x: ((500) - (item (LoopCounter) of [showplatformsx v])) y: ((500) - (item (LoopCounter) of [showplatformsy v]))\n    show\n    create clone of (_myself_ v)\n    hide\n    change [loopcounter v] by (1)\nend\nset [originalblock? v] to [Yes]\n\nif <(OriginalBlock?) = [Yes]> then\nend\n\nwhen flag clicked\n\nwhen I receive [start v]\n\nwhen I receive [buildplatformer v]\nswitch costume to (1 v)\nshow\nset [originalblock? v] to [Yes]\nforever\n    if <(Test Yes/No   /Play/SingleLoad) = [No]> then\n        show\n        if <(mouse y) < [130]> then\n            if <(PickingNewBlock?) = [Yes]> then\n                hide\n            else\n                go to (mouse-pointer v)\n                set y to ((22) * (round ((mouse y) / (22))))\n                set x to ((20) * (round ((mouse x) / (20))))\n                show\n                if <mouse down?> then\n                    broadcast (AddPlatformSection v)\n                    wait until <not <mouse down?>>\n                end\n            end\n        end\n    else\n        hide\n    end\nend\n\nwhen I receive [deleteplaforms v]\ndelete all of [showplatformscostume v]\ndelete all of [showplatformsx v]\ndelete all of [showplatformsy v]\nset [platformcode v] to []\n\nwhen I receive [compileplatformdata v]\nFastCompile\n\nwhen I receive [loadplatformdata v]\nif <[1] = [1]> then\n    delete this clone\nend\ndelete all of [showplatformscostume v]\ndelete all of [showplatformsx v]\ndelete all of [showplatformsy v]\nset [loopcounter v] to [1]\nrepeat (((length of (PlatformCode)) - (3)) / (7))\n    add (letter (LoopCounter) of (PlatformCode)) to [showplatformscostume v]\n    change [loopcounter v] by (1)\nend\nrepeat (((length of (PlatformCode)) - (3)) / (7))\n    add (join (letter ((LoopCounter) + (0)) of (PlatformCode)) (join (letter ((LoopCounter) + (1)) of (PlatformCode)) (letter ((LoopCounter) + (2)) of (PlatformCode)))) to [showplatformsx v]\n    change [loopcounter v] by (3)\nend\nrepeat (((length of (PlatformCode)) - (3)) / (7))\n    add (join (letter ((LoopCounter) + (0)) of (PlatformCode)) (join (letter ((LoopCounter) + (1)) of (PlatformCode)) (letter ((LoopCounter) + (2)) of (PlatformCode)))) to [showplatformsy v]\n    change [loopcounter v] by (3)\nend\nset [backdropnumber v] to (letter ((length of (PlatformCode)) - (2)) of (PlatformCode))\nset [heronumber v] to (letter ((length of (PlatformCode)) - (1)) of (PlatformCode))\nset [musicnumber v] to (letter (length of (PlatformCode)) of (PlatformCode))\nif <(HeroNumber) = [1]> then\n    set [hero v] to [Mario]\nend\nif <(HeroNumber) = [2]> then\n    set [hero v] to [Steve]\nend\nif <(HeroNumber) = [3]> then\n    set [hero v] to [Peppa]\nend\nif <(HeroNumber) = [4]> then\n    set [hero v] to [Llama]\nend\nstop all sounds\n\nwhen [space v] key pressed\n\nif <(OriginalBlock?) = [Yes]> then\n    if <(length of [showplatformsx v]) > [2]> then\n        delete (length of [showplatformscostume v]) of [showplatformscostume v]\n        delete (length of [showplatformsx v]) of [showplatformsx v]\n        delete (length of [showplatformsy v]) of [showplatformsy v]\n        broadcast (CompilePlatformData v) and wait\n        broadcast (ShowPlatformer v)\n    end\nend\n\nwhen I receive [addplatformsection v]\nif <(OriginalBlock?) = [Yes]> then\n    set size to (60) %\n    if <<not <touching (platforms v)?>> or <(costume [number v]) = [4]>> then\n        set size to (75) %\n        set [originalblock? v] to [No]\n        create clone of (_myself_ v)\n        set [originalblock? v] to [Yes]\n        add (costume [number v]) to [showplatformscostume v]\n        add ((500) - (x position)) to [showplatformsx v]\n        add ((500) - (y position)) to [showplatformsy v]\n        broadcast (CompilePlatformData v)\n    end\n    set size to (75) %\nend\n\nwhen I receive [changeblock v]\nif <(OriginalBlock?) = [Yes]> then\n    if <(costume [number v]) = [9]> then\n        switch costume to (1 v)\n    else\n        next costume\n    end\nend\n\nwhen I receive [undoblock v]\nif <(OriginalBlock?) = [Yes]> then\n    if <(length of [showplatformsx v]) > [2]> then\n        delete (length of [showplatformscostume v]) of [showplatformscostume v]\n        delete (length of [showplatformsx v]) of [showplatformsx v]\n        delete (length of [showplatformsy v]) of [showplatformsy v]\n        broadcast (CompilePlatformData v) and wait\n        broadcast (ShowPlatformer v)\n    end\nend\n\ndefine FastCompile\nif <(OriginalBlock?) = [Yes]> then\n    set [platformcode v] to []\n    set [loopcounter v] to [1]\n    repeat (length of [showplatformscostume v])\n        set [platformcode v] to (join (PlatformCode) (item (LoopCounter) of [showplatformscostume v]))\n        change [loopcounter v] by (1)\n    end\n    set [loopcounter v] to [1]\n    repeat (length of [showplatformscostume v])\n        set [platformcode v] to (join (PlatformCode) (item (LoopCounter) of [showplatformsx v]))\n        change [loopcounter v] by (1)\n    end\n    set [loopcounter v] to [1]\n    repeat (length of [showplatformscostume v])\n        set [platformcode v] to (join (PlatformCode) (item (LoopCounter) of [showplatformsy v]))\n        change [loopcounter v] by (1)\n    end\n    set [platformcode v] to (join (PlatformCode) (join (BackdropNumber) (join (HeroNumber) (MusicNumber))))\n    delete all of [your platformer code! v]\n    add (PlatformCode) to [your platformer code! v]\n    broadcast (HideList v)\nend\n\nwhen I receive [hidelist v]\nwait (15) seconds\nshow list [your platformer code! v]\n\nwhen I start as a clone\nshow\nforever\n    if <touching (sensor v)?> then\n        if  then\n            set [maxyjump v] to [7.5]\n            set [maxxvelocity v] to [3]\n        end\n        if <(costume [number v]) = [5]> then\n            set [maxyjump v] to [12]\n            set [maxxvelocity v] to [3]\n        end\n        if <(costume [number v]) = [6]> then\n            set [maxyjump v] to [7.5]\n            set [maxxvelocity v] to [3]\n        end\n        if <(costume [number v]) = [7]> then\n            set [maxyjump v] to [7.5]\n            set [xvelocity v] to ((XVelocity) * (1.05))\n            set [maxxvelocity v] to [12]\n        end\n        if <<(costume [number v]) = [6]> or <(costume [number v]) = [7]>> then\n            set [iceon/off v] to [On]\n        else\n            set [iceon/off v] to [Off]\n        end\n    end\n    if <<(costume [number v]) = [8]> or <(costume [number v]) = [8b]>> then\n        set [liftystart v] to (y position)\n        forever\n            switch costume to (8b v)\n            repeat until <(LiftGoingUpOrDown?) = [Down]>\n                set y to ((LiftYStart) + (LiftYHeight))\n                if <touching (sensor v)?> then\n                    broadcast (OnrisingPlaform v)\n                    set [maxyjump v] to [7.5]\n                    set [maxxvelocity v] to [3]\n                end\n            end\n            switch costume to (8 v)\n            repeat until <(LiftGoingUpOrDown?) = [Up]>\n                set y to ((LiftYStart) + (LiftYHeight))\n                if <touching (sensor v)?> then\n                    broadcast (LoweringPlatform v)\n                    set [maxyjump v] to [7.5]\n                    set [maxxvelocity v] to [3]\n                end\n            end\n        end\n    end\n    if <<(costume [number v]) = [9]> or <(costume [number v]) = [9b]>> then\n        forever\n            switch costume to (9b v)\n            repeat until <(LiftGoingUpOrDown?) = [Up]>\n                if <touching (sensor v)?> then\n                    set [maxyjump v] to [8]\n                    set [maxxvelocity v] to [3]\n                end\n            end\n            switch costume to (9 v)\n            repeat until <(LiftGoingUpOrDown?) = [Down]>\n                if <touching (sensor v)?> then\n                    broadcast (HitSpikes v)\n                end\n            end\n        end\n    end\nend\n\nrepeat (100)\n\nrepeat (100)\n\nrepeat (100)\n\nrepeat (100)\n\nset [backdropnumber v] to (letter (1) of (length of ((PlatformCode) - (2))))\nset [heronumber v] to (letter (1) of (length of ((PlatformCode) - (1))))\nset [musicnumber v] to (letter (1) of (length of (PlatformCode)))\n\nFastCompile\nhide list [your platformer code! v]\nif <(length of [your platformer code! v]) < [2]> then\n    add [Triple click, then right click to copy!   Paste it in the comments section!] to [your platformer code! v]\nend\n\nif <(OriginalBlock?) = [Yes]> then\n    next costume\nend\n\nshow\n\nwhen I receive [loadaplatformermadebyatomic v]\n\ngo to x: (0) y: (0)\nhide\ngo to [front v] layer\nset [test yes/no   /play/singleload v] to [Play]\nask [Which level 1 to 8?] and wait\nset [platformcode v] to (item (answer) of [atomicmagicnumberslevels v])\nbroadcast (LoadPlatformData v) and wait\nbroadcast (ShowPlatformer v) and wait\nbroadcast (Start v)\n\nwhen I receive [loadplatformermadebygamer v]\n\ngo to x: (0) y: (0)\nhide\ngo to [front v] layer\nset [test yes/no   /play/singleload v] to [Single]\nask [PasteCodeHere] and wait\nset [platformcode v] to (answer)\nbroadcast (ShowLoadingScreen v)\nset [originalblock? v] to [Yes]\nbroadcast (LoadPlatformData v) and wait\nbroadcast (ShowPlatformer v) and wait\nbroadcast (Start v)\n\nset [platformcode v] to [3625697536388274670676670629123]\nshow\nwait (1) seconds\nset [originalblock? v] to [No]\nbroadcast (LoadPlatformData v) and wait\nbroadcast (ShowPlatformer v) and wait\nbroadcast (Start v)\n\nwhen flag clicked\nhide\nshow list [atomicmagicnumberslevels v]\nshow list [your platformer code! v]\n\nset [#controllingcharacter v] to [0]\n\nwhen I receive [buildaplatformerfromscratch v]\ngo to x: (0) y: (0)\nhide\ngo to [front v] layer\nset [test yes/no   /play/singleload v] to [No]\nset [platformcode v] to [32700260676412241]\nbroadcast (BuildPlatformer v)\nset [originalblock? v] to [No]\nbroadcast (LoadPlatformData v) and wait\nbroadcast (ShowPlatformer v) and wait\nbroadcast (Start v)\n\nwhen I receive [newblocktodrawwith v]\nif <(OriginalBlock?) = [Yes]> then\n    if <(mouse y) > [20]> then\n        if <(mouse x) > [63]> then\n            switch costume to (4 v)\n        else\n            if <(mouse x) > [-5]> then\n                switch costume to (3 v)\n            else\n                if <(mouse x) > [-53]> then\n                    switch costume to (2 v)\n                else\n                    switch costume to (1 v)\n                end\n            end\n        end\n    else\n        if <(mouse y) > [-22]> then\n            if <(mouse x) > [22]> then\n                switch costume to (7 v)\n            else\n                if <(mouse x) > [-37]> then\n                    switch costume to (6 v)\n                else\n                    switch costume to (5 v)\n                end\n            end\n        else\n            if <(mouse x) > [-5]> then\n                switch costume to (9 v)\n            else\n                switch costume to (8 v)\n            end\n        end\n    end\n    show\nend\n\nwait (0.5) seconds\n\nset [originalblock? v] to [No]\n\nshow\n\nset [heronumber v] to [2]\n\nif <(Hero) = [Peppa]> then\n    set [heronumber v] to [3]\nend\nif <(Hero) = [Llama]> then\n    set [heronumber v] to [4]\nend\n\nwhen I receive [newblocktodrawwith v]\n\nwhen I receive [changeblock v]\nif <(OriginalBlock?) = [Yes]> then\n\nhide\n\nif <<(costume [number v]) = [8]> or <(costume [number v]) = [8b]>> then\n    forever\n        switch costume to (8b v)\n        set [liftystart v] to (y position)\n        repeat (100)\n            change y by (1)\n            if <touching (sensor v)?> then\n                broadcast (OnrisingPlaform v)\n                set [maxyjump v] to [8]\n                set [maxxvelocity v] to [3]\n            end\n        end\n        switch costume to (8 v)\n        repeat (100)\n            change y by (-1)\n            if <touching (sensor v)?> then\n                broadcast (LoweringPlatform v)\n                set [maxyjump v] to [8]\n                set [maxxvelocity v] to [3]\n            end\n        end\n    end\nend\nif <<(costume [number v]) = [9]> or <(costume [number v]) = [9b]>> then\n    forever\n        switch costume to (9b v)\n        repeat (100)\n            if <touching (sensor v)?> then\n                set [maxyjump v] to [8]\n                set [maxxvelocity v] to [3]\n            end\n        end\n        switch costume to (9 v)\n        repeat (100)\n            if <touching (sensor v)?> then\n                broadcast (HitSpikes v)\n            end\n        end\n    end\nend\n\nforever\n    set [liftyheight v] to [0]\n    repeat (100)\n        change [liftyheight v] by (1)\n    end\n    repeat (100)\n        change [liftyheight v] by (-1)\n    end\nend\n\nrepeat (4)\n\nset [liftystart v] to (y position)\n\nif <touching (sensor v)?> then\n    broadcast (LoweringPlatform v)\n    set [maxyjump v] to [8]\n    set [maxxvelocity v] to [3]\nend\n\nwhen I receive [loadfromcode v]\n\ngo to x: (0) y: (0)\nhide\ngo to [front v] layer\nset [test yes/no   /play/singleload v] to [Play]\nask [Which level 1 to 8?] and wait\nset [platformcode v] to (item (answer) of [atomicmagicnumberslevels v])\nbroadcast (LoadPlatformData v) and wait\nbroadcast (ShowPlatformer v) and wait\nbroadcast (Start v)\n\nFastCompile\nhide list [your platformer code! v]\nif <(length of [your platformer code! v]) < [2]> then\n    add [Triple click, then right click to copy!   Paste it in the comments section!] to [your platformer code! v]\nend\n\nwhen I receive [enable savebutton v]\nFastCompile\nset [workaroundloopcounter v] to [1]\nset [workaroundtempplatformcodewithspaces v] to []\nrepeat (length of (PlatformCode))\n    set [workaroundtempplatformcodewithspaces v] to (join (WorkaroundTEMPplatformCodeWithSpaces) (join (letter (WorkaroundLoopCounter) of (PlatformCode)) [ ]))\n    change [workaroundloopcounter v] by (1)\nend\ndelete all of [your platformer code! v]\nadd (WorkaroundTEMPplatformCodeWithSpaces) to [your platformer code! v]\nhide list [your platformer code! v]\nif <(length of [your platformer code! v]) < [2]> then\n    add [Triple click, then right click to copy!   Paste it in the comments section!] to [your platformer code! v]\nend\n\n@Buttons\n\nwhen I receive [test v]\nset [test yes/no   /play/singleload v] to [Yes]\n\nwhen I receive [enable savebutton v]\n\nif <[] = [50]> then\n\nwhen I receive [changehero v]\nif <(Hero) = [Llama]> then\n    set [hero v] to [Mario]\n    set [heronumber v] to [1]\n    stop [this script v]\nend\nif <(Hero) = [Mario]> then\n    set [heronumber v] to [2]\n    set [hero v] to [Steve]\n    stop [this script v]\nend\nif <(Hero) = [Steve]> then\n    set [heronumber v] to [3]\n    set [hero v] to [Peppa]\n    stop [this script v]\nend\nif <(Hero) = [Peppa]> then\n    set [heronumber v] to [4]\n    set [hero v] to [Llama]\n    stop [this script v]\nend\n\nset [test yes/no   /play/singleload v] to [Yes]\n\nwhen I receive [buildaplatformerfromscratch v]\nset [hero v] to [Mario]\nset [test yes/no   /play/singleload v] to [No]\ngo to [back v] layer\nswitch costume to (changeblock v)\nset size to (100) %\nshow\nclear graphic effects\ngo to x: (-201) y: (165)\nrepeat (6)\n    create clone of (_myself_ v)\n    change [color v] effect by (-30)\n    next costume\n    change x by (80)\nend\nhide\n\nwhen flag clicked\nhide\n\nwhen I start as a clone\nforever\n    set size to (100) %\n    if <touching (mouse-pointer v)?> then\n        go to [front v] layer\n        set [clonesizeloopcounter v] to [0]\n        repeat until <<not <touching (mouse-pointer v)?>> or <(CloneSizeLoopCounter) = [10]>>\n            change [clonesizeloopcounter v] by (1)\n            change size by (0.5)\n        end\n        set [clonesizeloopcounter v] to [0]\n        repeat until <<not <touching (mouse-pointer v)?>> or <(CloneSizeLoopCounter) = [10]>>\n            change [clonesizeloopcounter v] by (1)\n            change size by (-0.5)\n        end\n    end\n    if <(Test Yes/No   /Play/SingleLoad) = [No]> then\n        show\n    else\n        hide\n    end\nend\n\nwhen this sprite clicked\nbroadcast (costume [name v])\n\nif <(Hero) = [Mario]> then\n    set [heronumber v] to [1]\nend\nif <(Hero) = [Steve]> then\n    set [heronumber v] to [2]\nend\nif <(Hero) = [Peppa]> then\n    set [heronumber v] to [3]\nend\nif <(Hero) = [Llama]> then\n    set [heronumber v] to [4]\nend\n\n@Return To Editor\n\nwhen flag clicked\nhide\n\nwhen I receive [start v]\nif <<(ClassicGameTypeAll/Single) = [All]> or <(ClassicGameTypeAll/Single) = [Single]>> then\n    hide\n    stop [this script v]\nend\nforever\n    if <(Test Yes/No   /Play/SingleLoad) = [Yes]> then\n        show\n    else\n        hide\n    end\nend\n\nshow\n\nwhen this sprite clicked\nwait until <not <mouse down?>>\nset [test yes/no   /play/singleload v] to [No]\nshow list [your platformer code! v]\n\nbroadcast (BuildAPlatformerFromScratch v)\n\n@ControlCharacter\n\nwhen I receive [gameover v]\ngo to x: (0) y: (0)\n\nstop [other scripts in sprite v]\n\nwhen [up arrow v] key pressed\nJump\n\nwhen [w v] key pressed\nJump\n\nwhen I receive [restartlevel v]\nPositionControlCharacter\n\nwhen flag clicked\nset [ghost v] effect to (99)\nhide\n\nforever\n    if <([abs v] of (XVelocity) ) > [1]> then\n        broadcast (CostumeChange v)\n    end\nend\n\nwhen I receive [levelup v]\nrepeat (30)\n    go to x: (-200) y: (-112)\n    set [yvelocity v] to [0]\nend\nPositionControlCharacter\n\ndefine Jump\nchange y by (-2)\nif <touching (platforms v)?> then\n    set [yvelocity v] to (MaxYJump)\nend\nchange y by (2)\n\nwhen I receive [gravity v]\npoint in direction (90)\nswitch costume to (spongebob v)\nforever\n    change [yvelocity v] by (-0.5)\n    if <[0] > (YVelocity)> then\n        if <not <touching (platforms v)?>> then\n            if <(YVelocity) < [0]> then\n                change y by (-1)\n            end\n        end\n        if <not <touching (platforms v)?>> then\n            if <(YVelocity) < [-1]> then\n                change y by (-1)\n            end\n        end\n        if <not <touching (platforms v)?>> then\n            if <(YVelocity) < [-2]> then\n                change y by (-1)\n            end\n        end\n        if <not <touching (platforms v)?>> then\n            if <(YVelocity) < [-3]> then\n                change y by (-1)\n            end\n        end\n        if <not <touching (platforms v)?>> then\n            if <(YVelocity) < [-4]> then\n                change y by (-1)\n            end\n        end\n        if <not <touching (platforms v)?>> then\n            if <(YVelocity) < [-5]> then\n                change y by (-1)\n            end\n        end\n        if <(YVelocity) < [-6]> then\n            set [yvelocity v] to [-6]\n        end\n        if <touching (platforms v)?> then\n            set [yvelocity v] to [0]\n            change y by (1)\n        end\n        if <touching (lava v)?> then\n            PositionControlCharacter\n        end\n    end\n    if <(YVelocity) > [0]> then\n        if <not <touching (platforms v)?>> then\n            if <(YVelocity) > [0]> then\n                change y by (1)\n            end\n        end\n        if <not <touching (platforms v)?>> then\n            if <(YVelocity) > [1]> then\n                change y by (1)\n            end\n        end\n        if <not <touching (platforms v)?>> then\n            if <(YVelocity) > [1]> then\n                change y by (1)\n            end\n        end\n        if <not <touching (platforms v)?>> then\n            if <(YVelocity) > [1]> then\n                change y by (1)\n            end\n        end\n        if <not <touching (platforms v)?>> then\n            if <(YVelocity) > [1]> then\n                change y by (1)\n            end\n        end\n        if <not <touching (platforms v)?>> then\n            if <(YVelocity) > [1]> then\n                change y by (1)\n            end\n        end\n        if <(YVelocity) < [-5]> then\n            set [yvelocity v] to [-5]\n        end\n        if <touching (platforms v)?> then\n            change y by (-1)\n            set [yvelocity v] to [0]\n        end\n    end\n    if <(IceOn/Off) = [Off]> then\n        set [xvelocity v] to ((XVelocity) * (0.85))\n    end\n    if <<(XVelocity) < [1]> and <(XVelocity) > [-1]>> then\n        set [xvelocity v] to [0]\n    end\n    if <[0] > (XVelocity)> then\n        broadcast (CostumeChange v)\n        if <not <touching (platforms v)?>> then\n            if <(XVelocity) < [0]> then\n                change x by (-1)\n            end\n        end\n        if <not <touching (platforms v)?>> then\n            if <(XVelocity) < [-1]> then\n                change x by (-1)\n            end\n        end\n        if <not <touching (platforms v)?>> then\n            if <(XVelocity) < [-2]> then\n                change x by (-1)\n            end\n        end\n        if <not <touching (platforms v)?>> then\n            if <(XVelocity) < [-3]> then\n                change x by (-1)\n            end\n        end\n        if <not <touching (platforms v)?>> then\n            if <(XVelocity) < [-4]> then\n                change x by (-1)\n            end\n        end\n        if <not <touching (platforms v)?>> then\n            if <(XVelocity) < [-5]> then\n                change x by (-1)\n            end\n        end\n        if <touching (platforms v)?> then\n            change x by (1)\n            set [xvelocity v] to [0]\n        end\n        if <(XVelocity) < [-5]> then\n            set [xvelocity v] to [-5]\n        end\n    end\n    if <(XVelocity) > [0]> then\n        broadcast (CostumeChange v)\n        if <not <touching (platforms v)?>> then\n            if <(XVelocity) > [0]> then\n                change x by (1)\n            end\n        end\n        if <not <touching (platforms v)?>> then\n            if <(XVelocity) > [1]> then\n                change x by (1)\n            end\n        end\n        if <not <touching (platforms v)?>> then\n            if <(XVelocity) > [2]> then\n                change x by (1)\n            end\n        end\n        if <not <touching (platforms v)?>> then\n            if <(XVelocity) > [3]> then\n                change x by (1)\n            end\n        end\n        if <not <touching (platforms v)?>> then\n            if <(XVelocity) > [4]> then\n                change x by (1)\n            end\n        end\n        if <not <touching (platforms v)?>> then\n            if <(XVelocity) > [5]> then\n                change x by (1)\n            end\n        end\n        if <touching (platforms v)?> then\n            change x by (-1)\n            set [xvelocity v] to [0]\n        end\n        if <[5] < (XVelocity)> then\n            set [xvelocity v] to [5]\n        end\n    end\nend\n\nset [ghost v] effect to (99)\n\nwhen I receive [start v]\nPositionControlCharacter\nclear graphic effects\nset [ghost v] effect to (99)\nshow\nset [maxyjump v] to [6]\nset [maxxvelocity v] to [3]\nset [yvelocity v] to [0]\nset [xvelocity v] to [0]\nset [deathsinarow v] to [0]\nbroadcast (Gravity v)\nforever\n    switch costume to (Hero)\n    if <<key (right arrow v) pressed?> or <key (d v) pressed?>> then\n        change [xvelocity v] by (1.19)\n        point in direction (90)\n    end\n    if <<key (left arrow v) pressed?> or <key (a v) pressed?>> then\n        change [xvelocity v] by (-1.19)\n        point in direction (-90)\n    end\n    if <(y position) < [-170]> then\n        broadcast (RestartLevel v)\n    end\nend\n\ndefine PositionControlCharacter\nset [maxyjump v] to [3]\nset [maxxvelocity v] to [3]\nset [yvelocity v] to [0]\nset [xvelocity v] to [0]\ngo to x: (-200) y: (-112)\n\nwhen [space v] key pressed\nJump\n\nwhen I receive [jump v]\nJump\n\nclear graphic effects\n\nif <(Level) = [2]> then\n    go to x: (-50) y: (-112)\nend\nif <(Level) = [3]> then\n    go to x: (-150) y: (-112)\nend\nif <(Level) = [4]> then\n    go to x: (50) y: (-120)\nend\nif <(Level) = [5]> then\n    go to x: (50) y: (-120)\nend\nif <(Level) = [6]> then\n    go to x: (210) y: (-120)\nend\nif <(Level) = [7]> then\n    go to x: (210) y: (-120)\nend\nif <(Level) = [8]> then\n    go to x: (210) y: (-120)\nend\n\nif <[5] < (XVelocity)> then\n    set [xvelocity v] to [5]\nend\n\nset [maxyjump v] to [3]\nset [maxxvelocity v] to [3]\nset [yvelocity v] to [0]\nset [xvelocity v] to [0]\ngo to x: (-200) y: (-112)\n\nwhen I receive [onrisingplaform v]\nchange y by (1)\n\nwhen I receive [loweringplatform v]\nchange y by (-1)\n\nwhen I receive [hitspikes v]\nPositionControlCharacter\n\nwhen I receive [test v]\nPositionControlCharacter\n\nwhen I receive [heropointleft v]\npoint in direction (-90)\n\nwhen I receive [heropointright v]\npoint in direction (90)\n\n@lava\n\nwhen flag clicked\ngo to [back v] layer\nhide\ngo to x: (-198) y: (-178)\nrepeat (3)\n    next costume\n    create clone of (_myself_ v)\n    change x by (170)\nend\n\nwhen I start as a clone\nforever\n    next costume\n    repeat (3)\n        if <touching (controlcharacter v)?> then\n            if <(HoldingBoat?) = [No]> then\n                start sound [Mine v]\n                broadcast (RestartLevel v)\n            end\n        end\n    end\nend\n\nwhen I receive [gameover v]\nwait (0.2) seconds\n\ndelete this clone\n\nset size to (80) %\n\nset [ghost v] effect to (50)\n\nwhen I receive [start v]\nshow\n\nhide\n\n@Sensor\n\nwhen I receive [start v]\nshow\nset [ghost v] effect to (99)\nforever\n    go to (controlcharacter v)\nend\n\nset size to (100) %\n\nwhen flag clicked\nhide\n\n@Mario\n\nwhen I receive [costumechange v]\nnext costume\nwait (0.05) seconds\nif <<not <(costume [number v]) = [4]>> and <not <(costume [number v]) = [10]>>> then\n    repeat until <<(costume [number v]) = [4]> or <(costume [number v]) = [10]>>\n        next costume\n        wait (0.05) seconds\n    end\nend\n\nwhen I receive [start v]\nshow\nset size to (24) %\nforever\n    if <(Hero) = [Mario]> then\n        show\n        point in direction ([direction v] of [controlcharacter v])\n        go to (controlcharacter v)\n        change y by (-5)\n    else\n        hide\n    end\nend\n\nwhen flag clicked\nhide\ngo to [front v] layer\n\n@Exit\n\nwhen flag clicked\nhide\n\nwhen I receive [start v]\npoint in direction (90)\nbroadcast (TargetAnimation v)\ngo to x: (231) y: (115)\nshow\nforever\n    if <touching (controlcharacter v)?> then\n        if <(ClassicGameTypeAll/Single) = [Single]> then\n            forever\n                say [Winner!] for (1) seconds\n                say [Love, Fav, Follow] for (3) seconds\n                say [WInner!] for (1) seconds\n                say [Try making your own world!] for (3) seconds\n                say [WInner!] for (1) seconds\n                say [Try playing another world!] for (3) seconds\n            end\n        end\n        if <(ClassicGameTypeAll/Single) = [All]> then\n            say [Winner!] for (1) seconds\n            say [You are awesome!] for (3) seconds\n            if <(Level) = [8]> then\n                forever\n                    say [You rock!] for (1) seconds\n                    say [Love, Fav, Follow] for (3) seconds\n                    say [WInner!] for (1) seconds\n                    say [Try making your own world!] for (3) seconds\n                    say [WInner!] for (1) seconds\n                    say [Classic worlds completed!] for (3) seconds\n                    say [WInner!] for (1) seconds\n                    say [Try loading another gamers world!] for (3) seconds\n                end\n            end\n            change [level v] by (1)\n            set [platformcode v] to (item (Level) of [atomicmagicnumberslevels v])\n            broadcast (ShowLoadingScreen v)\n            wait (0.1) seconds\n            set [originalblock? v] to [Yes]\n            broadcast (LoadPlatformData v) and wait\n            broadcast (ShowPlatformer v) and wait\n            broadcast (LevelUp v)\n            set [test yes/no   /play/singleload v] to [Play]\n        end\n        if <(Test Yes/No   /Play/SingleLoad) = [Yes]> then\n            broadcast (Enable SaveButton v)\n            repeat until <([x position v] of [controlcharacter v]) < [0]>\n                say [AWESOME!] for (1.5) seconds\n                say [Please share your level code!] for (3) seconds\n            end\n        end\n        if <(Test Yes/No   /Play/SingleLoad) = [No]> then\n            go to [front v] layer\n            say [Awesome!] for (2) seconds\n            set [test yes/no   /play/singleload v] to [Yes]\n            say [Entering test mode in...3] for (1) seconds\n            say [Entering test mode in...2] for (1) seconds\n            say [Entering test mode in...1] for (1) seconds\n            broadcast (Test v)\n            say [Finish to get your SAVE code!] for (8) seconds\n        end\n    end\nend\n\nforever\nend\n\nsay [Entering test mode!] for (1) seconds\n\nif <(Test Yes/No   /Play/SingleLoad) = [Play]> then\n\nbroadcast (Test v)\nsay [Finish to get your SAVE code!] for (15) seconds\n\nnext costume\n\nnext costume\n\nwhen I receive [targetanimation v]\nforever\n    if <(Hero) = [Mario]> then\n        repeat (8)\n        set size to (15) %\n        next costume\n        go to x: (231) y: (115)\n        if <(costume [number v]) > [6]> then\n            switch costume to (daisy v)\n        end\n    end\n    if <(Hero) = [Peppa]> then\n        go to x: (231) y: (115)\n        switch costume to (peppa v)\n        set size to (55) %\n    end\n    if <(Hero) = [Llama]> then\n        switch costume to (chest v)\n        go to x: (231) y: (115)\n        set size to (20) %\n    end\n    if <(Hero) = [Steve]> then\n        repeat (4)\n        set size to (80) %\n        switch costume to ((costume [number v]) - (1))\n        if <(costume [number v]) < [11]> then\n            go to x: (231) y: (123)\n            switch costume to (tiny12 v)\n        end\n    end\nend\n\nsay [Awesome!] for (2) seconds\nsay [Here is] for (2) seconds\n\nsay [See your name in this game!] for (10) seconds\n\n@Music\n\nwhen I receive [changemusic v]\nchange [musicnumber v] by (1)\nif <(MusicNumber) > [4]> then\n    set [musicnumber v] to [1]\nend\nrepeat (10)\n    stop all sounds\nend\nbroadcast (CompilePlatformData v)\n\nwhen flag clicked\nforever\n    if <(MusicNumber) = [1]> then\n        play sound [1 Super Mario World Theme Song \(GFM Trap Remix\) v] until done\n    end\n    if <(MusicNumber) = [2]> then\n        play sound [2 minecraft_theme_holder_trap_remix v] until done\n    end\n    if <(MusicNumber) = [3]> then\n        play sound [Geo v] until done\n    end\n    if <(MusicNumber) = [4]> then\n        play sound [3 peppa-pig-theme-song v] until done\n    end\nend\n\nset [musicnumber v] to [1]\n\nwhen I receive [levelup v]\nrepeat (10)\n    stop all sounds\nend\n\nchange [musicnumber v] by (1)\nif <(MusicNumber) > [4]> then\n    set [musicnumber v] to [1]\nend\nstop all sounds\nbroadcast (CompilePlatformData v)\n\nstop all sounds\n\nbroadcast (CompilePlatformData v)\n\nwait (1) seconds\n\n@Hero\n\nwhen I receive [start v]\nwait (1) seconds\nswitch backdrop to (BackdropNumber)\n\nwhen I receive [changehero v]\nchange [heronumber v] by (1)\nif <(HeroNumber) > [4]> then\n    set [heronumber v] to [1]\nend\nbroadcast (CompilePlatformData v)\n\nwhen flag clicked\nforever\n\nset [heronumber v] to [1]\n\n@Sprite1\n\n@help\n\nwhen I receive [changeblock v]\ngo to [front v] layer\ngo to x: (0) y: (0)\nset [pickingnewblock? v] to [Yes]\nshow\n\nrepeat until <<(mouse y) < [130]> or <(mouse x) > [-158]>>\n    go to [front v] layer\nend\nhide\n\nwhen flag clicked\nset [pickingnewblock? v] to [No]\nhide\n\nwhen this sprite clicked\nwait until <not <mouse down?>>\nbroadcast (NewBlockToDrawWith v)\nhide\nset [pickingnewblock? v] to [No]\n\nhide\n\n@Sprite2\n\n@Title Page 1\n\nwhen flag clicked\nshow\ngo to x: (0) y: (0)\ngo to [front v] layer\nwait (1) seconds\nbroadcast (AskPlayStyle v)\nhide\n\n@PlayStyle\n\nwhen I receive [hideuserworldloadingscreens v]\nhide\ndelete this clone\n\nwhen I receive [loadaplatformermadebyatomic v]\nhide\ndelete this clone\n\nwhen I receive [buildaplatformerfromscratch v]\nhide\ndelete this clone\n\nwhen I receive [loadplatformermadebygamer v]\ndelete this clone\n\nwhen flag clicked\nhide\n\nwhen I start as a clone\nset [startsize v] to (size)\nforever\n    set size to (StartSize) %\n    if <touching (mouse-pointer v)?> then\n        set [clonesizeloopcounter v] to [0]\n        repeat until <<not <touching (mouse-pointer v)?>> or <(CloneSizeLoopCounter) = [10]>>\n            change [clonesizeloopcounter v] by (1)\n            change size by (1)\n        end\n        set [clonesizeloopcounter v] to [0]\n        repeat until <<not <touching (mouse-pointer v)?>> or <(CloneSizeLoopCounter) = [10]>>\n            change [clonesizeloopcounter v] by (1)\n            change size by (-1)\n        end\n    end\nend\n\ngo to [front v] layer\n\nwhen this sprite clicked\nwait until <not <mouse down?>>\nif <(costume [number v]) < [3]> then\n    broadcast (ShowLoadingScreen v)\nend\nbroadcast (costume [name v])\n\nwhen I receive [askplaystyle v]\nshow\ngo to [front v] layer\nswitch costume to (buildaplatformerfromscratch v)\nset size to (80) %\nclear graphic effects\ngo to x: (-150) y: (75)\nset [color v] effect to (-10)\ncreate clone of (_myself_ v)\nchange [color v] effect by (10)\nnext costume\nchange x by (150)\nchange y by (-75)\nset size to (150) %\ncreate clone of (_myself_ v)\nchange [color v] effect by (10)\nnext costume\nchange x by (150)\nchange y by (-75)\nset size to (80) %\ncreate clone of (_myself_ v)\ngo to x: (0) y: (0)\ngo to [back v] layer\nset size to (130) %\nswitch costume to (4 v)\nforever\n    change [color v] effect by (0.4)\nend\n\nhide\n\n@Llama\n\nwhen I receive [costumechange v]\nif <(Hero) = [Llama]> then\n    next costume\n    wait (0.05) seconds\n    repeat until <(costume [number v]) = [1]>\n        next costume\n        wait (0.05) seconds\n    end\nelse\nend\n\nwhen I receive [costumechange v]\nnext costume\nwait (0) seconds\nif <not <(costume [number v]) = [1]>> then\n    repeat until <(costume [number v]) = [1]>\n        next costume\n        wait (0) seconds\n    end\nend\n\nwhen I receive [start v]\nset size to (28) %\nswitch costume to (llama74 v)\nforever\n    if <(Hero) = [Llama]> then\n        show\n        point in direction ([direction v] of [controlcharacter v])\n        go to (controlcharacter v)\n        change y by (-4)\n    else\n        hide\n    end\nend\n\nwhen flag clicked\nhide\ngo to [front v] layer\n\n@Steve\n\nwhen I receive [costumechange v]\nif <(Hero) = [Steve]> then\n    next costume\n    wait (0.05) seconds\n    repeat until <(costume [number v]) = [1]>\n        next costume\n        wait (0.05) seconds\n    end\nelse\nend\n\nwhen I receive [start v]\nset size to (63) %\nforever\n    if <(Hero) = [Steve]> then\n        show\n        point in direction ([direction v] of [controlcharacter v])\n        go to (controlcharacter v)\n        change y by (4)\n    else\n        hide\n    end\nend\n\nwhen I receive [gameover v]\nhide\nstop [other scripts in sprite v]\n\nwhen flag clicked\nhide\ngo to [front v] layer\n\nwhen I receive [costumechange v]\nnext costume\n\nwait (0) seconds\nnext costume\nwait (0) seconds\n\n@Peppa\n\nwhen I receive [costumechange v]\nnext costume\nwait (0.05) seconds\nrepeat until <(costume [number v]) = [1]>\n    next costume\n    wait (0.05) seconds\nend\n\nwhen I receive [start v]\nswitch costume to (peppa v)\nset size to (23) %\nforever\n    if <(Hero) = [Peppa]> then\n        show\n        point in direction ([direction v] of [controlcharacter v])\n        go to (controlcharacter v)\n        change y by (0)\n    else\n        hide\n    end\nend\n\nwhen flag clicked\nhide\ngo to [front v] layer\n\n@LiftTimingDevice\n\nwhen flag clicked\nforever\n    set [liftyheight v] to [0]\n    repeat (100)\n        change [liftyheight v] by (1)\n        set [liftgoingupordown? v] to [Up]\n    end\n    repeat (100)\n        change [liftyheight v] by (-1)\n        set [liftgoingupordown? v] to [Down]\n    end\nend\n\n@LoadingGif\n\nwhen I receive [hideuserworldloadingscreens v]\n\nhide\n\ndelete this clone\n\nwhen I receive [showloadingscreen v]\nset [ghost v] effect to (1)\nshow\nswitch costume to (loadinggif v)\nrepeat (9)\n    go to [front v] layer\n    repeat (2)\n        wait (0.1) seconds\n        go to [front v] layer\n    end\n    next costume\nend\nhide\n\nwhen flag clicked\ngo to x: (0) y: (0)\nhide\n\n@mouse-pointer-clipart-14\n\nwhen I receive [buildaplatformerfromscratch v]\nwait (2) seconds\nshow\ngo to x: (-300) y: (300)\nglide (1) secs to x: (-136) y: (96)\nrepeat (10)\n    glide (0.3) secs to x: (-134) y: (94)\n    glide (0.3) secs to x: (-136) y: (96)\nend\nhide\n\nwhen flag clicked\nhide\n\n@PickPlaytypeButtons\n\nwhen I receive [loadaplatformermadebyatomic v]\nshow\nswitch costume to (1 v)\nset size to (80) %\nclear graphic effects\ngo to x: (-200) y: (130)\nset [color v] effect to (-40)\nrepeat (8)\n    create clone of (_myself_ v)\n    change [color v] effect by (10)\n    next costume\n    change x by (57)\n    change y by (-35)\nend\nset size to (100) %\nswitch costume to (all v)\ngo to x: (-237) y: (-159)\nclear graphic effects\ncreate clone of (_myself_ v)\nset size to (130) %\nswitch costume to (background v)\ngo to x: (0) y: (0)\ngo to [back v] layer\nforever\n    change [color v] effect by (0.4)\nend\n\nwhen I receive [buildaplatformerfromscratch v]\nhide\ndelete this clone\n\nwhen I receive [loadplatformermadebygamer v]\nhide\ndelete this clone\n\nwhen flag clicked\nhide\nset [classicgametypeall/single v] to [Neither]\n\nwhen I start as a clone\nset [startsize v] to (size)\nforever\n    set size to (StartSize) %\n    if <touching (mouse-pointer v)?> then\n        set [clonesizeloopcounter v] to [0]\n        repeat until <<not <touching (mouse-pointer v)?>> or <(CloneSizeLoopCounter) = [10]>>\n            change [clonesizeloopcounter v] by (1)\n            change size by (1)\n        end\n        set [clonesizeloopcounter v] to [0]\n        repeat until <<not <touching (mouse-pointer v)?>> or <(CloneSizeLoopCounter) = [10]>>\n            change [clonesizeloopcounter v] by (1)\n            change size by (-1)\n        end\n    end\nend\n\nwhen this sprite clicked\nwait until <not <mouse down?>>\nif <(costume [number v]) = [9]> then\n    broadcast (ShowLoadingScreen v)\n    set [platformcode v] to (item (1) of [atomicmagicnumberslevels v])\n    set [classicgametypeall/single v] to [All]\n    set [level v] to [1]\n    broadcast (LoadPlatformData v) and wait\n    broadcast (ShowPlatformer v) and wait\n    broadcast (Start v)\n    broadcast (DeleteLocalClones v)\nend\nif <(costume [number v]) < [9]> then\n    broadcast (ShowLoadingScreen v)\n    set [platformcode v] to (item (costume [name v]) of [atomicmagicnumberslevels v])\n    set [classicgametypeall/single v] to [Single]\n    set [test yes/no   /play/singleload v] to [Play]\n    broadcast (LoadPlatformData v) and wait\n    broadcast (ShowPlatformer v) and wait\n    broadcast (Start v)\n    broadcast (DeleteLocalClones v)\nend\n\ngo to [front v] layer\n\nwhen I receive [deletelocalclones v]\nhide\ndelete this clone\n\ngo to [front v] layer\n\nwhen I receive [hideuserworldloadingscreens v]\nhide\ndelete this clone\n\n@WorldNumber\n\nwhen I receive [hideuserworldloadingscreens v]\nhide\ndelete this clone\n\nwhen I start as a clone\nshow\nforever\n    change [color v] effect by (1)\nend\n\ndefine CapitalsCheck\nset [costumetoswitchto v] to (letter (WhichLetterToSwitchTo?) of (TextToShow))\nif <(letter (WhichLetterToSwitchTo?) of (TextToShow)) = [A]> then\n    set [costumetoswitchto v] to [a]\nend\nif <(letter (WhichLetterToSwitchTo?) of (TextToShow)) = [B]> then\n    set [costumetoswitchto v] to [b]\nend\nif <(letter (WhichLetterToSwitchTo?) of (TextToShow)) = [C]> then\n    set [costumetoswitchto v] to [c]\nend\nif <(letter (WhichLetterToSwitchTo?) of (TextToShow)) = [D]> then\n    set [costumetoswitchto v] to [d]\nend\nif <(letter (WhichLetterToSwitchTo?) of (TextToShow)) = [E]> then\n    set [costumetoswitchto v] to [e]\nend\nif <(letter (WhichLetterToSwitchTo?) of (TextToShow)) = [F]> then\n    set [costumetoswitchto v] to [f]\nend\nif <(letter (WhichLetterToSwitchTo?) of (TextToShow)) = [G]> then\n    set [costumetoswitchto v] to [g]\nend\nif <(letter (WhichLetterToSwitchTo?) of (TextToShow)) = [H]> then\n    set [costumetoswitchto v] to [h]\nend\nif <(letter (WhichLetterToSwitchTo?) of (TextToShow)) = [I]> then\n    set [costumetoswitchto v] to [i]\nend\nif <(letter (WhichLetterToSwitchTo?) of (TextToShow)) = [J]> then\n    set [costumetoswitchto v] to [j]\nend\nif <(letter (WhichLetterToSwitchTo?) of (TextToShow)) = [K]> then\n    set [costumetoswitchto v] to [k]\nend\nif <(letter (WhichLetterToSwitchTo?) of (TextToShow)) = [L]> then\n    set [costumetoswitchto v] to [l]\nend\nif <(letter (WhichLetterToSwitchTo?) of (TextToShow)) = [M]> then\n    set [costumetoswitchto v] to [m]\nend\nif <(letter (WhichLetterToSwitchTo?) of (TextToShow)) = [N]> then\n    set [costumetoswitchto v] to [n]\nend\nif <(letter (WhichLetterToSwitchTo?) of (TextToShow)) = [O]> then\n    set [costumetoswitchto v] to [o]\nend\nif <(letter (WhichLetterToSwitchTo?) of (TextToShow)) = [P]> then\n    set [costumetoswitchto v] to [p]\nend\nif <(letter (WhichLetterToSwitchTo?) of (TextToShow)) = [Q]> then\n    set [costumetoswitchto v] to [q]\nend\nif <(letter (WhichLetterToSwitchTo?) of (TextToShow)) = [R]> then\n    set [costumetoswitchto v] to [r]\nend\nif <(letter (WhichLetterToSwitchTo?) of (TextToShow)) = [S]> then\n    set [costumetoswitchto v] to [s]\nend\nif <(letter (WhichLetterToSwitchTo?) of (TextToShow)) = [T]> then\n    set [costumetoswitchto v] to [t]\nend\nif <(letter (WhichLetterToSwitchTo?) of (TextToShow)) = [U]> then\n    set [costumetoswitchto v] to [u]\nend\nif <(letter (WhichLetterToSwitchTo?) of (TextToShow)) = [V]> then\n    set [costumetoswitchto v] to [v]\nend\nif <(letter (WhichLetterToSwitchTo?) of (TextToShow)) = [W]> then\n    set [costumetoswitchto v] to [w]\nend\nif <(letter (WhichLetterToSwitchTo?) of (TextToShow)) = [X]> then\n    set [costumetoswitchto v] to [x]\nend\nif <(letter (WhichLetterToSwitchTo?) of (TextToShow)) = [Y]> then\n    set [costumetoswitchto v] to [y]\nend\nif <(letter (WhichLetterToSwitchTo?) of (TextToShow)) = [Z]> then\n    set [costumetoswitchto v] to [z]\nend\nif <(letter (WhichLetterToSwitchTo?) of (TextToShow)) = [ ]> then\n    set [costumetoswitchto v] to [space]\nend\n\ndefine ShowTextOnScreen\ngo to x: (0) y: (LineHeight)\nrepeat (length of (TextToShow))\n    change x by ((size) * (-0.1))\nend\nif <not <((length of (TextToShow)) / (2)) = (round (length of (TextToShow)))>> then\n    change x by ((size) * (0.1))\nend\nset [whichlettertoswitchto? v] to [1]\nrepeat (length of (TextToShow))\n    switch costume to (  v)\n    CapitalsCheck\n    switch costume to (CostumeToSwitchTo)\n    if <not <(CostumeToSwitchTo) = [space]>> then\n        create clone of (_myself_ v)\n    end\n    change x by ((size) * (0.2))\n    wait (0.05) seconds\n    change [whichlettertoswitchto? v] by (1)\nend\nset [secondline? v] to [Yes]\ngo to x: (0) y: (300)\n\nwhen I receive [main1 v]\nif <[1] = [1]> then\n    delete this clone\nend\nclear graphic effects\ngo to [front v] layer\nset size to (100) %\nset [lineheight v] to [-150]\nset [texttoshow v] to (join [World ] (UserWorldNumber))\nShowTextOnScreen\n\nwhen flag clicked\nhide\n\n@UsersDifficulty\n\nwhen I receive [hideuserworldloadingscreens v]\nhide\ndelete this clone\n\nwhen I start as a clone\nshow\nforever\n    change [color v] effect by (1)\nend\n\ndefine CapitalsCheck\nset [costumetoswitchto v] to (letter (WhichLetterToSwitchTo?) of (TextToShow))\nif <(letter (WhichLetterToSwitchTo?) of (TextToShow)) = [A]> then\n    set [costumetoswitchto v] to [a]\nend\nif <(letter (WhichLetterToSwitchTo?) of (TextToShow)) = [B]> then\n    set [costumetoswitchto v] to [b]\nend\nif <(letter (WhichLetterToSwitchTo?) of (TextToShow)) = [C]> then\n    set [costumetoswitchto v] to [c]\nend\nif <(letter (WhichLetterToSwitchTo?) of (TextToShow)) = [D]> then\n    set [costumetoswitchto v] to [d]\nend\nif <(letter (WhichLetterToSwitchTo?) of (TextToShow)) = [E]> then\n    set [costumetoswitchto v] to [e]\nend\nif <(letter (WhichLetterToSwitchTo?) of (TextToShow)) = [F]> then\n    set [costumetoswitchto v] to [f]\nend\nif <(letter (WhichLetterToSwitchTo?) of (TextToShow)) = [G]> then\n    set [costumetoswitchto v] to [g]\nend\nif <(letter (WhichLetterToSwitchTo?) of (TextToShow)) = [H]> then\n    set [costumetoswitchto v] to [h]\nend\nif <(letter (WhichLetterToSwitchTo?) of (TextToShow)) = [I]> then\n    set [costumetoswitchto v] to [i]\nend\nif <(letter (WhichLetterToSwitchTo?) of (TextToShow)) = [J]> then\n    set [costumetoswitchto v] to [j]\nend\nif <(letter (WhichLetterToSwitchTo?) of (TextToShow)) = [K]> then\n    set [costumetoswitchto v] to [k]\nend\nif <(letter (WhichLetterToSwitchTo?) of (TextToShow)) = [L]> then\n    set [costumetoswitchto v] to [l]\nend\nif <(letter (WhichLetterToSwitchTo?) of (TextToShow)) = [M]> then\n    set [costumetoswitchto v] to [m]\nend\nif <(letter (WhichLetterToSwitchTo?) of (TextToShow)) = [N]> then\n    set [costumetoswitchto v] to [n]\nend\nif <(letter (WhichLetterToSwitchTo?) of (TextToShow)) = [O]> then\n    set [costumetoswitchto v] to [o]\nend\nif <(letter (WhichLetterToSwitchTo?) of (TextToShow)) = [P]> then\n    set [costumetoswitchto v] to [p]\nend\nif <(letter (WhichLetterToSwitchTo?) of (TextToShow)) = [Q]> then\n    set [costumetoswitchto v] to [q]\nend\nif <(letter (WhichLetterToSwitchTo?) of (TextToShow)) = [R]> then\n    set [costumetoswitchto v] to [r]\nend\nif <(letter (WhichLetterToSwitchTo?) of (TextToShow)) = [S]> then\n    set [costumetoswitchto v] to [s]\nend\nif <(letter (WhichLetterToSwitchTo?) of (TextToShow)) = [T]> then\n    set [costumetoswitchto v] to [t]\nend\nif <(letter (WhichLetterToSwitchTo?) of (TextToShow)) = [U]> then\n    set [costumetoswitchto v] to [u]\nend\nif <(letter (WhichLetterToSwitchTo?) of (TextToShow)) = [V]> then\n    set [costumetoswitchto v] to [v]\nend\nif <(letter (WhichLetterToSwitchTo?) of (TextToShow)) = [W]> then\n    set [costumetoswitchto v] to [w]\nend\nif <(letter (WhichLetterToSwitchTo?) of (TextToShow)) = [X]> then\n    set [costumetoswitchto v] to [x]\nend\nif <(letter (WhichLetterToSwitchTo?) of (TextToShow)) = [Y]> then\n    set [costumetoswitchto v] to [y]\nend\nif <(letter (WhichLetterToSwitchTo?) of (TextToShow)) = [Z]> then\n    set [costumetoswitchto v] to [z]\nend\nif <(letter (WhichLetterToSwitchTo?) of (TextToShow)) = [ ]> then\n    set [costumetoswitchto v] to [space]\nend\n\ndefine ShowTextOnScreen\ngo to x: (0) y: (LineHeight)\nrepeat (length of (TextToShow))\n    change x by ((size) * (-0.1))\nend\nif <not <((length of (TextToShow)) / (2)) = (round (length of (TextToShow)))>> then\n    change x by ((size) * (0.1))\nend\nset [whichlettertoswitchto? v] to [1]\nrepeat (length of (TextToShow))\n    switch costume to (  v)\n    CapitalsCheck\n    switch costume to (CostumeToSwitchTo)\n    if <not <(CostumeToSwitchTo) = [space]>> then\n        create clone of (_myself_ v)\n    end\n    change x by ((size) * (0.2))\n    wait (0.05) seconds\n    change [whichlettertoswitchto? v] by (1)\nend\nset [secondline? v] to [Yes]\ngo to x: (0) y: (300)\n\nwhen I receive [main1 v]\nif <[1] = [1]> then\n    delete this clone\nend\nclear graphic effects\ngo to [front v] layer\nset size to (100) %\nset [lineheight v] to [-130]\nset [texttoshow v] to (UserLevelDifficultyRating)\nShowTextOnScreen\n\nwhen flag clicked\nhide\n\n@WorldBy\n\nwhen I receive [hideuserworldloadingscreens v]\nhide\ndelete this clone\n\nwhen I start as a clone\nif <(y position) > [-100]> then\n    show\n    go to [front v] layer\n    glide (0.3) secs to x: (x position) y: ((LineHeight) + (25))\n    show\n    go to [front v] layer\n    glide (0.25) secs to x: (x position) y: (LineHeight)\n    show\n    go to [front v] layer\n    glide (0.1) secs to x: (x position) y: ((LineHeight) + (10))\n    show\n    go to [front v] layer\n    glide (0.1) secs to x: (x position) y: (LineHeight)\n    wait (4) seconds\n    set [digitclonenumber v] to [0]\nend\n\nwhen flag clicked\nhide\n\ndefine CapitalsCheck\nset [costumetoswitchto v] to (letter (WhichLetterToSwitchTo?) of (TextToShow))\nif <(letter (WhichLetterToSwitchTo?) of (TextToShow)) = [A]> then\n    set [costumetoswitchto v] to [a]\nend\nif <(letter (WhichLetterToSwitchTo?) of (TextToShow)) = [B]> then\n    set [costumetoswitchto v] to [b]\nend\nif <(letter (WhichLetterToSwitchTo?) of (TextToShow)) = [C]> then\n    set [costumetoswitchto v] to [c]\nend\nif <(letter (WhichLetterToSwitchTo?) of (TextToShow)) = [D]> then\n    set [costumetoswitchto v] to [d]\nend\nif <(letter (WhichLetterToSwitchTo?) of (TextToShow)) = [E]> then\n    set [costumetoswitchto v] to [e]\nend\nif <(letter (WhichLetterToSwitchTo?) of (TextToShow)) = [F]> then\n    set [costumetoswitchto v] to [f]\nend\nif <(letter (WhichLetterToSwitchTo?) of (TextToShow)) = [G]> then\n    set [costumetoswitchto v] to [g]\nend\nif <(letter (WhichLetterToSwitchTo?) of (TextToShow)) = [H]> then\n    set [costumetoswitchto v] to [h]\nend\nif <(letter (WhichLetterToSwitchTo?) of (TextToShow)) = [I]> then\n    set [costumetoswitchto v] to [i]\nend\nif <(letter (WhichLetterToSwitchTo?) of (TextToShow)) = [J]> then\n    set [costumetoswitchto v] to [j]\nend\nif <(letter (WhichLetterToSwitchTo?) of (TextToShow)) = [K]> then\n    set [costumetoswitchto v] to [k]\nend\nif <(letter (WhichLetterToSwitchTo?) of (TextToShow)) = [L]> then\n    set [costumetoswitchto v] to [l]\nend\nif <(letter (WhichLetterToSwitchTo?) of (TextToShow)) = [M]> then\n    set [costumetoswitchto v] to [m]\nend\nif <(letter (WhichLetterToSwitchTo?) of (TextToShow)) = [N]> then\n    set [costumetoswitchto v] to [n]\nend\nif <(letter (WhichLetterToSwitchTo?) of (TextToShow)) = [O]> then\n    set [costumetoswitchto v] to [o]\nend\nif <(letter (WhichLetterToSwitchTo?) of (TextToShow)) = [P]> then\n    set [costumetoswitchto v] to [p]\nend\nif <(letter (WhichLetterToSwitchTo?) of (TextToShow)) = [Q]> then\n    set [costumetoswitchto v] to [q]\nend\nif <(letter (WhichLetterToSwitchTo?) of (TextToShow)) = [R]> then\n    set [costumetoswitchto v] to [r]\nend\nif <(letter (WhichLetterToSwitchTo?) of (TextToShow)) = [S]> then\n    set [costumetoswitchto v] to [s]\nend\nif <(letter (WhichLetterToSwitchTo?) of (TextToShow)) = [T]> then\n    set [costumetoswitchto v] to [t]\nend\nif <(letter (WhichLetterToSwitchTo?) of (TextToShow)) = [U]> then\n    set [costumetoswitchto v] to [u]\nend\nif <(letter (WhichLetterToSwitchTo?) of (TextToShow)) = [V]> then\n    set [costumetoswitchto v] to [v]\nend\nif <(letter (WhichLetterToSwitchTo?) of (TextToShow)) = [W]> then\n    set [costumetoswitchto v] to [w]\nend\nif <(letter (WhichLetterToSwitchTo?) of (TextToShow)) = [X]> then\n    set [costumetoswitchto v] to [x]\nend\nif <(letter (WhichLetterToSwitchTo?) of (TextToShow)) = [Y]> then\n    set [costumetoswitchto v] to [y]\nend\nif <(letter (WhichLetterToSwitchTo?) of (TextToShow)) = [Z]> then\n    set [costumetoswitchto v] to [z]\nend\nif <(letter (WhichLetterToSwitchTo?) of (TextToShow)) = [ ]> then\n    set [costumetoswitchto v] to [space]\nend\n\ndefine ShowTextOnScreen\ngo to x: (0) y: (LineHeight)\nrepeat (length of (TextToShow))\n    change x by ((size) * (-0.1))\nend\nif <not <((length of (TextToShow)) / (2)) = (round (length of (TextToShow)))>> then\n    change x by ((size) * (0.1))\nend\nset [whichlettertoswitchto? v] to [1]\nrepeat (length of (TextToShow))\n    switch costume to (  v)\n    CapitalsCheck\n    switch costume to (CostumeToSwitchTo)\n    if <not <(CostumeToSwitchTo) = [space]>> then\n        create clone of (_myself_ v)\n    end\n    change x by ((size) * (0.2))\n    wait (0.05) seconds\n    change [whichlettertoswitchto? v] by (1)\nend\nset [secondline? v] to [Yes]\ngo to x: (0) y: (300)\n\nwhen I receive [main1 v]\nif <[1] = [1]> then\n    delete this clone\nend\nclear graphic effects\ngo to [front v] layer\nset size to (100) %\nset [lineheight v] to [-90]\nset [texttoshow v] to (WorldBy)\nShowTextOnScreen\n\nwhen I receive [glideusernameup v]\nwait (3) seconds\nif <[1] = [1]> then\n    delete this clone\nend\nset [ghost v] effect to (50)\ngo to [front v] layer\nset size to (100) %\nset [lineheight v] to [160]\nset [texttoshow v] to (WorldBy)\nShowTextOnScreen\n\n@PickAWorld\n\nwhen I receive [loadplatformermadebygamer v]\nshow\nset [userworldnumber v] to [1]\nbroadcast (mAIN1 v)\nforever\n    repeat (10)\n        change size by (1)\n    end\n    repeat (10)\n        change size by (-1)\n    end\nend\n\ngo to [back v] layer\n\nwhen I receive [nextuserworld v]\nstop [other scripts in sprite v]\nset size to (100) %\nglide (0.4) secs to x: (-340) y: (30)\nset [color v] effect to ((UserWorldNumber) * (10))\npoint in direction ((10) * (length of (WorldBy)))\nset [brightness v] effect to ((-20) - ((2) * (letter (1) of (UserWorldNumber))))\ngo to x: (340) y: (50)\nglide (0.4) secs to x: (0) y: (30)\nforever\n    repeat (10)\n        change size by (1)\n    end\n    repeat (10)\n        change size by (-1)\n    end\nend\n\nwhen I receive [previoususerworld v]\nstop [other scripts in sprite v]\nset size to (100) %\nglide (0.4) secs to x: (340) y: (30)\nset [color v] effect to ((UserWorldNumber) * (10))\npoint in direction ((10) * (length of (WorldBy)))\nset [brightness v] effect to ((-20) - ((2) * (letter (1) of (UserWorldNumber))))\ngo to x: (-340) y: (30)\nglide (0.4) secs to x: (0) y: (30)\nforever\n    repeat (10)\n        change size by (1)\n    end\n    repeat (10)\n        change size by (-1)\n    end\nend\n\nwhen flag clicked\nhide\nshow list [userleveldifficultyrating v]\nshow list [userplatformslist v]\nshow list [userplatformsusernames v]\n\nwhen this sprite clicked\nbroadcast (ShowLoadingScreen v)\nbroadcast (HideUserWorldLoadingScreens v)\nset [test yes/no   /play/singleload v] to [Play]\nset [classicgametypeall/single v] to [Single]\nset [platformcode v] to (item (UserWorldNumber) of [userplatformslist v])\nbroadcast (LoadPlatformData v) and wait\nbroadcast (ShowPlatformer v) and wait\nbroadcast (Start v)\nwait (2) seconds\nbroadcast (GlideUsernameUp v)\n\nwhen I receive [hideuserworldloadingscreens v]\nhide\n\nhide\n\nbroadcast (GlideUsernameUp v) and wait\n\nbroadcast (Start v)\n\n@Joystick\n\nwhen I receive [joymousesensedown v]\nclear graphic effects\nforever\n    if <<(Test Yes/No   /Play/SingleLoad) = [No]> and <(ClassicGameTypeAll/Single) = [Neither]>> then\n        hide\n    else\n        if <<mouse down?> and <(distance to [mouse-pointer v]) < [100]>> then\n            broadcast (Flickofcontroller v)\n            show\n            go to [front v] layer\n            set [ghost v] effect to (50)\n            set [joyshowcounter v] to [0]\n        else\n            change [joyshowcounter v] by (1)\n            if <(JoyShowCounter) > [25]> then\n                switch costume to (neutral v)\n            end\n            if <(JoyShowCounter) > [50]> then\n                hide\n            end\n        end\n    end\nend\n\nwhen I receive [start v]\nwait (0.1) seconds\nbroadcast (JoyMouseSenseDown v)\ngo to x: (162) y: (-102)\nforever\n    if <<(Test Yes/No   /Play/SingleLoad) = [No]> and <(ClassicGameTypeAll/Single) = [Neither]>> then\nend\n\nhide\n\nwhen flag clicked\nhide\n\nif <(XVelocity) > (MaxXVelocity)> then\n    set [xvelocity v] to (MaxXVelocity)\nend\n\nif <(XVelocity) < ((0) - (MaxXVelocity))> then\n    set [xvelocity v] to ((0) - (MaxXVelocity))\nend\n\nif <(XVelocity) < ((0) - (MaxXVelocity))> then\n    set [xvelocity v] to ((0) - (MaxXVelocity))\nend\n\nset y to (-102)\n\n@LEVELS Adder\n\nhide list [userleveldifficultyrating v]\nhide list [userplatformsusernames v]\nhide list [userplatformslist v]\n\nshow list [userleveldifficultyrating v]\nshow list [userplatformsusernames v]\nshow list [userplatformslist v]\n\n
Hello everyone... and welcome to: Geometry Dash A Platformer! A platformer by @YungSky! I hope u enjoy and dont forget to love, fav and Follow me, I WORKED SOOOOO HARD ON IT! :D... move with arrow keys, WASD or touch... The blue is the portal... Full screen not recommended! 1000+ views in one day!