|Ron| A platformer| #Games #All #Art #Movies
@Stage\n\nwhen I receive [dark v]\nrepeat (25)\n    change [brightness v] effect by (-1)\nend\n\nwhen I receive [dark v]\nswitch backdrop to (sky v)\nrepeat (9)\n    next backdrop\n    wait (0.05) seconds\nend\n\nwhen flag clicked\nswitch backdrop to (sky v)\n\nwhen flag clicked\nforever\n    play sound [Music v] until done\nend\n\n@ron\n\nwhen flag clicked\nshow\nswitch costume to (front v)\ngo to x: (-200) y: (0)\nset [x v] to [0]\nset [y v] to [0]\nset [level v] to [1]\nforever\n    if <<<key (right arrow v) pressed?> or <key (d v) pressed?>> or <<mouse down?> and <(mouse x) > (x position)>>> then\n        change [x v] by (.9)\n    end\n    if <<<key (left arrow v) pressed?> or <key (a v) pressed?>> or <<mouse down?> and <(mouse x) < (x position)>>> then\n        change [x v] by (-.9)\n    end\n    set [x v] to ((x) * (.9))\n    change x by (x)\n    if <touching (ground v)?> then\n        change y by (1)\n        if <touching (ground v)?> then\n            change y by (1)\n            if <touching (ground v)?> then\n                change y by (1)\n                if <touching (ground v)?> then\n                    change y by (1)\n                    if <touching (ground v)?> then\n                        change y by (1)\n                        if <touching (ground v)?> then\n                            change y by (-5)\n                            change x by ((x) * (-1))\n                            if <<<key (up arrow v) pressed?> or <key (w v) pressed?>> or <<mouse down?> and <(mouse y) > ((y position) + (10))>>> then\n                                if <(x) > [0]> then\n                                    set [x v] to [-5]\n                                else\n                                    set [x v] to [5]\n                                end\n                                set [y v] to [12]\n                            else\n                                set [x v] to [0]\n                            end\n                        end\n                    end\n                end\n            end\n        end\n    end\n    change [y v] by (-1)\n    change y by (y)\n    if <touching (ground v)?> then\n        change y by ((y) * (-1))\n        set [y v] to [0]\n    end\n    change y by (-1)\n    if <touching (ground v)?> then\n        if <<<key (up arrow v) pressed?> or <key (w v) pressed?>> or <<mouse down?> and <(mouse y) > ((y position) + (10))>>> then\n            change [y v] by (12)\n        end\n    end\n    change y by (1)\n    if <<(x position) < [-240]> and <(level) = [1]>> then\n        set x to (-240)\n    end\n    if <<touching (brambles v)?> or <touching (brambles v)?>> then\n        switch costume to (front v)\n        repeat (10)\n            change [ghost v] effect by (6)\n            change [pixelate v] effect by (6)\n        end\n        hide\n        wait (0.5) seconds\n        clear graphic effects\n        show\n        change [deaths v] by (1)\n        go to x: (-200) y: (0)\n        set [x v] to [0]\n        set [y v] to [0]\n    end\nend\n\nwhen flag clicked\nforever\n    if <not <<<<<key (right arrow v) pressed?> or <key (d v) pressed?>> or <<mouse down?> and <(mouse x) > (x position)>>> or <<<key (left arrow v) pressed?> or <key (a v) pressed?>> or <<mouse down?> and <(mouse x) < (x position)>>>> or <<<key (up arrow v) pressed?> or <key (w v) pressed?>> or <<mouse down?> and <(mouse y) > ((y position) + (10))>>>>> then\n        switch costume to (front v)\n    end\n    if <<<key (right arrow v) pressed?> or <key (d v) pressed?>> or <<mouse down?> and <(mouse x) > (x position)>>> then\n        switch costume to (right v)\n    end\n    if <<<key (left arrow v) pressed?> or <key (a v) pressed?>> or <<mouse down?> and <(mouse x) < (x position)>>> then\n        switch costume to (left v)\n    end\n    if <<<key (up arrow v) pressed?> or <key (w v) pressed?>> or <<mouse down?> and <(mouse y) > ((y position) + (10))>>> then\n        switch costume to (up v)\n    end\n    if <<<<key (right arrow v) pressed?> or <key (d v) pressed?>> or <<mouse down?> and <(mouse x) > (x position)>>> and <<<key (up arrow v) pressed?> or <key (w v) pressed?>> or <<mouse down?> and <(mouse y) > ((y position) + (10))>>>> then\n        switch costume to (up right v)\n    end\n    if <<<<key (left arrow v) pressed?> or <key (a v) pressed?>> or <<mouse down?> and <(mouse x) < (x position)>>> and <<<key (up arrow v) pressed?> or <key (w v) pressed?>> or <<mouse down?> and <(mouse y) > ((y position) + (10))>>>> then\n        switch costume to (up left v)\n    end\nend\n\nwhen flag clicked\nforever\n    if <(x position) > [240]> then\n        go to x: (-240) y: (y position)\n        change [level v] by (1)\n    end\n    if <<(x position) < [-240]> and <not <(level) = [1]>>> then\n        go to x: (240) y: (y position)\n        change [level v] by (-1)\n    end\nend\n\nwhen flag clicked\nset [deaths v] to [0]\nwait (15) seconds\nbroadcast (dark v)\n\nwhen I receive [dead v]\n\nwhen I receive [alive v]\n\nwhen flag clicked\nshow\n\nwhen I receive [done v]\nhide\n\n@ground\n\nwhen flag clicked\ngo to [front v] layer\ngo [backward v] (2) layers\nforever\n    switch costume to (level)\nend\n\nwhen I receive [dark v]\nrepeat (25)\n    change [brightness v] effect by (-1)\nend\n\nwhen flag clicked\nshow\n\nwhen I receive [done v]\nhide\n\n@brambles\n\nwhen flag clicked\ngo to [back v] layer\nforever\n    switch costume to (level)\nend\n\nwhen I receive [dark v]\nrepeat (25)\n    change [brightness v] effect by (-1)\nend\n\nwhen flag clicked\nshow\n\nwhen I receive [done v]\nhide\n\n@txt\n\nwhen flag clicked\ngo to [front v] layer\nforever\n    switch costume to (level)\nend\n\nwhen flag clicked\nforever\n    go to [front v] layer\n    go [forward v] (35) layers\nend\n\nwhen flag clicked\nforever\n    go to [front v] layer\n    go [forward v] (35) layers\nend\n\nwhen flag clicked\nshow\n\nwhen I receive [done v]\nhide\n\n@grassy stuff?\n\nwhen flag clicked\ngo to [back v] layer\nforever\n    switch costume to (level)\nend\n\nwhen I receive [dark v]\nrepeat (25)\n    change [brightness v] effect by (-1)\nend\n\nwhen flag clicked\nforever\n    go to [front v] layer\n    go [backward v] (1) layers\nend\n\nwhen flag clicked\nshow\n\nwhen I receive [done v]\nhide\n\n@grassy stuff?2\n\nwhen flag clicked\ngo to [back v] layer\nforever\n    switch costume to (level)\nend\n\nwhen I receive [dark v]\nrepeat (25)\n    change [brightness v] effect by (-1)\nend\n\nwhen flag clicked\nforever\n    go to [back v] layer\nend\n\nwhen flag clicked\nforever\n    if <(level) = [11]> then\n        wait (10) seconds\n        forever\n            broadcast (done v)\n        end\n    end\nend\n\nwhen I receive [done v]\nhide\n\nwhen flag clicked\nshow\n\n@fireflys\n\nwhen flag clicked\nhide\nshow variable [deaths v]\nshow variable [time v]\n\nwhen I start as a clone\nset [ghost v] effect to (100)\nrepeat (50)\n    change [ghost v] effect by (-5)\nend\npoint in direction (0)\ngo to (random position v)\nshow\nset size to (10) %\ngo [backward v] (100) layers\ngo [forward v] (40) layers\nrepeat (10)\n    turn right (pick random (-4) to (4)) degrees\n    move (2) steps\nend\nforever\n    if <touching (_edge_ v)?> then\n        repeat (30)\n            change [ghost v] effect by (10)\n        end\n        delete this clone\n    else\n        turn left (pick random (-3) to (3)) degrees\n        move (2) steps\n    end\nend\n\nwhen I receive [dark v]\nforever\n    create clone of (_myself_ v)\n    wait (1.50) seconds\nend\n\nwhen I start as a clone\nforever\n    repeat (15)\n        change [ghost v] effect by (-5)\n    end\n    repeat (15)\n        change [ghost v] effect by (5)\n    end\nend\n\nwhen I receive [done v]\nhide\nhide variable [time v]\nhide variable [deaths v]\n\n@Sprite1\n\nwhen flag clicked\nset [time v] to [0]\nforever\n    go to [front v] layer\n    go [forward v] (60606060606080905404598) layers\nend\n\nwhen flag clicked\nwait until <key (any v) pressed?>\nforever\n    wait (1) seconds\n    change [time v] by (1)\nend\n\nwhen flag clicked\nshow\n\nwhen I receive [done v]\nhide\n\n@music\n\nwhen flag clicked\nshow\n\nwhen I receive [done v]\nhide\n\n@tb\n\nwhen flag clicked\nset [ghost v] effect to (100)\nshow\nforever\n    go to [front v] layer\nend\n\nwhen flag clicked\nshow\n\n@Sprite2\n\nwhen flag clicked\nset [color v] effect to (0)\nset [ghost v] effect to (100)\nhide\n\nwhen I receive [done v]\nshow\nforever\n    go to [front v] layer\n    go [forward v] (50000) layers\nend\n\nset [level v] to [11]\n\nwhen I receive [done v]\nshow\nforever\n    go to [front v] layer\n    go [forward v] (1) layers\nend\n\nset [ghost v] effect to (100)\n\nwhen I receive [done v]\nrepeat (600)\n    change [ghost v] effect by (-5)\nend\n\n