Janusz platformer
@Stage\n\n@januszszzszszsz\n\nwhen flag clicked\nset drag mode [not draggable v]\nshow\ngo to x: (-194) y: (-52)\nset [xv v] to [0]\nset [yv v] to [0]\nset [level v] to [1]\nforever\n    if <<key (left arrow v) pressed?> or <key (a v) pressed?>> then\n        set [xv v] to [-3]\n        point in direction (-90)\n    end\n    if <<key (right arrow v) pressed?> or <key (d v) pressed?>> then\n        set [xv v] to [3]\n        point in direction (90)\n    end\n    if <not <<key (right arrow v) pressed?> or <<key (left arrow v) pressed?> or <<key (a v) pressed?> or <key (d v) pressed?>>>>> then\n        set [xv v] to [0]\n    end\n    if <touching (platformy v)?> then\n        kolizja\n    end\nend\n\nmove (-10) steps\n\nwhen flag clicked\nforever\n    change x by (Xv)\n    change y by (Yv)\nend\n\nwhen flag clicked\nforever\n    if <not <touching (platformy v)?>> then\n        repeat until <touching (platformy v)?>\n            change [yv v] by (-1)\n        end\n        set [yv v] to [0]\n    end\nend\n\nwhen flag clicked\nforever\n    if <touching (platformy v)?> then\n        if <<key (up arrow v) pressed?> or <key (w v) pressed?>> then\n            set [yv v] to [15]\n        end\n    end\nend\n\nwait (0) seconds\nset [yv v] to [0]\n\nchange x by (10)\n\nwhen flag clicked\nforever\n    if <(x position) = [240]> then\n        go to x: (-194) y: (-52)\n        change [level v] by (1)\n    end\nend\n\nwhen flag clicked\nforever\n    if <<touching (kolce v)?> or <touching (somsiad v)?>> then\n        wait (0) seconds\n        go to x: (-194) y: (-52)\n    end\nend\n\nwhen flag clicked\nforever\n    if <not <touching (platformy v)?>> then\n        if <<key (down arrow v) pressed?> or <key (s v) pressed?>> then\n            set [yv v] to [-15]\n        end\n    end\nend\n\nwhen flag clicked\nset [śmierci v] to [0]\nforever\n    if <<touching (somsiad v)?> or <touching (kolce v)?>> then\n        wait (0) seconds\n        change [śmierci v] by (1)\n    end\nend\n\ndefine kolizja\nif <touching (platformy v)?> then\n    change y by (2)\n    if <touching (platformy v)?> then\n        change y by (2)\n        if <touching (platformy v)?> then\n            change y by (2)\n            if <touching (platformy v)?> then\n                change y by (2)\n                if <touching (platformy v)?> then\n                    change y by (2)\n                    if <touching (platformy v)?> then\n                        change y by (2)\n                        if <touching (platformy v)?> then\n                            change x by ((Xv) * (-1.5))\n                            change y by (-6)\n                        end\n                    end\n                end\n            end\n        end\n    end\nend\n\n@platformy\n\nwhen flag clicked\nforever\n    go to x: (0) y: (0)\n    switch costume to (level)\nend\n\nset [level v] to [0]\n\nchange [level v] by (1)\n\n@kolce\n\nwhen flag clicked\nforever\n    go to x: (0) y: (0)\n    switch costume to (level)\n    go to [back v] layer\nend\n\n@SomSiad\n\nwhen flag clicked\nhide variable [yv v]\nhide variable [xv v]\ngo to [back v] layer\nhide\nwait until <(level) = [4]>\nswitch costume to (kostium1 v)\nshow\nstart sound [Dun Dun Dunnn v]\nrepeat until <not <(level) = [4]>>\n    go to x: (210) y: (-79)\n    point in direction (-90)\n    repeat (100)\n        change x by (-2.5)\n    end\n    point in direction (90)\n    repeat (100)\n        change x by (2.5)\n    end\nend\nhide\nwait until <(level) = [7]>\nswitch costume to (kostium2 v)\nshow\nrepeat until <not <(level) = [7]>>\n    switch costume to (kostium2 v)\n    go to x: (210) y: (-79)\n    point in direction (-90)\n    repeat (125)\n        change x by (-2)\n    end\n    point in direction (90)\n    repeat (125)\n        change x by (2)\n    end\nend\nhide\nwait until <(level) = [9]>\nswitch costume to (kostium2 v)\nshow\nswitch costume to (kostium2 v)\ngo to x: (131) y: (-76)\npoint in direction (90)\nwait until <(distance to [januszszzszszsz v]) < [200]>\nrepeat (10)\n    change x by (10)\nend\nhide\n\nwhen [space v] key pressed\nshow variable [yv v]\nshow variable [xv v]\n\n@level\n\nwhen flag clicked\nforever\n    switch costume to (level)\nend\n\nif <(level) > [11]> then\nelse\n    switch costume to (4013-cebula-zolta12 v)\nend\n\n@thumbnail\n\nwhen flag clicked\ngo to [front v] layer\nset [ghost v] effect to (100)\n\n
NOWA CZĘŚĆ: https://scratch.mit.edu/projects/600999143/ (Zawiera ona jedynkę też, spokojnie)\n\nstrzałki i WSAD\n\nJESTEŚ JANUSZEM KTÓRY... Idzie do lydla po promocję? Tak nie mam pomysłu na platformówkę\ndobra jak coś silnik oficjalnie nazywam "Silnik Janusza"\n\n#games #janusz #cebula