KÜP IV (a HARD Platformer)

Instructions:  ▧▧▧▧▧▧▧▧▧▧▧ KÜP IV ▧▧▧▧▧▧▧▧▧▧▧▧\n➳W,A,S,D veya YÖN TUŞLARI ile oynanır\n➳"M" Tuşu ile müzik kapatılır. \n➳"R" Tuşu İle Bölüm yeniden başlatılır\n➳"BÖLÜM ATLA" Tuşuna basarak bölüm atlayın (2 hak var)\n➳Mermilere ve Dikenlere değmeyin\n➳"G" Tuşu ile İntroyu Geçebilirsiniz\n➳Oyun test edilmiştir İMKANSIZ BÖLÜM YOKTUR\n\n►KÜP IV Oyununu KÜP III' ten Ayıran Özellikler Grafikler ve Bölümlerdir\n\n-Arkadaşlar bölümler çok zor biliyorum o yüzden yoğun istek gelirse bi tık daha kolay yapabilirim\n\n

@Stage\n\nwhen flag clicked\nforever\n    switch backdrop to (!Level)\nend\n\n@Back\n\nwhen I receive [i̇ntro bitişe git v]\nhide\n\nwhen flag clicked\nshow\n\n@Engeller\n\nwhen flag clicked\nforever\n    switch costume to (!Level)\nend\n\nwhen flag clicked\nhide\n\nwhen I receive [oyun başladıo v]\nshow\n\n@Level\n\nwhen flag clicked\nforever\n    switch costume to (!Level)\nend\n\nwhen flag clicked\ngo to [front v] layer\nhide\n\nwhen I receive [oyun başladıo v]\nshow\n\n@Tikenn\n\nwhen flag clicked\n\ngo to x: (16) y: (-77)\nforever\n    if <(!Level) = [14]> then\n        wait until <(distance to [oyuncu v]) < [70]>\n        go to x: (16) y: (0)\n    end\nend\n\nwhen I receive [oof v]\nset [x v] to [0]\nset [y v] to [0]\nwait (0.01) seconds\ngo to x: (16) y: (-77)\n\nwhen flag clicked\nhide\n\nwhen flag clicked\n\nforever\n    if <(!Level) = [14]> then\n        show\n    else\n        hide\n    end\nend\n\n@TN\n\nwhen flag clicked\nset [ghost v] effect to (100)\ngo to [front v] layer\n\n@Yazı\n\nwhen flag clicked\nswitch costume to (kostüm 2 v)\nset size to (100) %\nhide\ngo to x: (-85) y: (0)\n\nwhen I receive [i̇ntro bitişe git v]\nbroadcast (Oyun Başladıo v)\nforever\n    hide\nend\n\nwhen I receive [yazı gelsin v]\nshow\ngo to x: (-85) y: (0)\nrepeat until <<mouse down?> or <key (any v) pressed?>>\n    show\n    wait (1) seconds\n    hide\n    wait (0.2) seconds\nend\n\nwhen I receive [haber1 v]\nswitch costume to (kostüm 1 v)\n\nwhen I receive [haber2 v]\nswitch costume to (kostüm 2 v)\n\nwhen I receive [i̇ntro bitişe git v]\nstop [other scripts in sprite v]\nstop [this script v]\n\nwhen I receive [yazı gelsin v]\nwait until <<mouse down?> or <key (any v) pressed?>>\nbroadcast (İntro Bitişe git v)\n\nwhen flag clicked\nwait until <key (g v) pressed?>\nbroadcast (İntro Bitişe git v)\n\n@Panel\n\nwhen flag clicked\nset [bölüm test v] to [0]\nforever\n    if <<<key (c v) pressed?> and <key (v v) pressed?>> and < (Yöneticiler) contains (username)?>> then\n        ask [] and wait\n        if <(answer) = [bt]> then\n            if <(Bölüm Test) = [0]> then\n                set [bölüm test v] to [1]\n            else\n                set [bölüm test v] to [0]\n            end\n        end\n        if <(answer) = [g]> then\n            change [!level v] by (-1)\n        end\n        if <(answer) = [i]> then\n            change [!level v] by (1)\n        end\n    end\n    if <(answer) = [m]> then\n        ask [] and wait\n        if <not <(answer) = []>> then\n            set [for musc v] to (answer)\n        end\n    end\nend\n\nwhen flag clicked\nset [bölüm test v] to [0]\nforever\n    if <<key (b v) pressed?> and < (Yöneticiler) contains (username)?>> then\n        ask [] and wait\n        if <not <(answer) = []>> then\n            set [!level v] to (answer)\n        end\n    end\nend\n\n@İntro\n\nwhen flag clicked\nset size to (90) %\ngo to x: (0) y: (-10)\nset [efekt v] to [0]\nset [i̇ntro geçildi mi v] to [0]\nrepeat until <(İntro Geçildi mi) = [1]>\n    point in direction ((90) + (([sin v] of (Efekt) ) * (3)))\n    change [efekt v] by (5)\n    change y by ((0) + (([sin v] of (Efekt) ) * (0.5)))\nend\n\nwhen flag clicked\nset volume to (50) %\nstart sound [Spooky Scary Skeletons \[Remix\] \[Extended Mix\] v]\n\nrepeat until <(İntro Geçildi mi) = [1]>\nend\n\nwhen flag clicked\nforever\n    set [gereksiz v] to (timer)\nend\n\nwhen flag clicked\ngo to [front v] layer\nshow\nset size to (95) %\nswitch costume to (cepte v)\nwait (7.530) seconds\nrepeat until <(İntro Geçildi mi) = [1]>\n    switch costume to (dunk v)\n    set size to (105) %\n    create clone of (_myself_ v)\n    wait (0.46) seconds\n    create clone of (_myself_ v)\n    set size to (95) %\n    wait (0.46) seconds\n    set size to (105) %\n    create clone of (_myself_ v)\n    wait (0.46) seconds\n    switch costume to (kostüm 1 v)\n    create clone of (_myself_ v)\n    set size to (95) %\n    wait (0.46) seconds\n    set size to (105) %\n    create clone of (_myself_ v)\n    wait (0.46) seconds\n    create clone of (_myself_ v)\n    set size to (95) %\n    wait (0.46) seconds\n    switch costume to (cepte v)\n    set size to (105) %\n    create clone of (_myself_ v)\n    wait (0.46) seconds\n    create clone of (_myself_ v)\n    set size to (95) %\n    wait (0.46) seconds\n    switch costume to (cepte2 v)\n    set size to (105) %\n    create clone of (_myself_ v)\n    wait (0.46) seconds\n    set size to (95) %\n    create clone of (_myself_ v)\n    wait (0.46) seconds\nend\n\nwhen I start as a clone\nrepeat (10)\n    change size by (6)\n    change [ghost v] effect by (10)\n    wait (0.01) seconds\nend\ndelete this clone\n\nset size to (110) %\nset size to (100) %\nset size to (110) %\n\nwhen flag clicked\nwait (12.13) seconds\nbroadcast (Yazı Gelsin v)\n\nwhen I receive [i̇ntro bitişe git v]\nhide\nstop [other scripts in sprite v]\nstop [this script v]\n\nwhen I receive [i̇ntro bitişe git v]\nrepeat (10)\n    delete this clone\nend\n\nwhen I receive [oyun başladıo v]\nstop all sounds\n\n@Oyuncu\n\ndefine Oyuncuyu getir: (x) (y) Büyüklüğü: (size)\ngo to x: (x) y: (y)\nset size to (size) %\n\ndefine Yerçekimi ve Fizikler falan\nforever\n    if <(Bölüm Test) = [1]> then\n        change [y v] by (-1)\n        if <<key (a v) pressed?> or <<mouse down?> and <(mouse x) < (x position)>>> then\n            if <<(!Level) = [18]> or <(!Level) = [18]>> then\n                point in direction (-90)\n                change [x v] by (-0.5)\n            else\n                point in direction (-90)\n                change [x v] by (-1)\n            end\n        end\n        if <<key (d v) pressed?> or <<mouse down?> and <(mouse x) > (x position)>>> then\n            if <<(!Level) = [18]> or <(!Level) = [18]>> then\n                point in direction (90)\n                change [x v] by (0.5)\n            else\n                point in direction (90)\n                change [x v] by (1)\n            end\n        end\n        set [x v] to ((x) * (0.9))\n        change x by (x)\n        if <touching (level v)?> then\n            change y by (1)\n        end\n        if <touching (level v)?> then\n            change y by (1)\n        end\n        if <touching (level v)?> then\n            change y by (1)\n        end\n        if <touching (level v)?> then\n            change y by (1)\n        end\n        if <touching (level v)?> then\n            change y by (-4)\n            change x by ((x) * (-1))\n            if <<key (w v) pressed?> or <<mouse down?> and <(mouse y) > [0]>>> then\n                if <<(!Level) = [18]> or <(!Level) = [18]>> then\n                    set [y v] to [17]\n                else\n                    set [y v] to [17]\n                end\n                if <(x) > [0]> then\n                    set [x v] to [-10]\n                else\n                    set [x v] to [10]\n                end\n            else\n                set [x v] to [0]\n            end\n        end\n        change y by (y)\n        if <touching (level v)?> then\n            change y by ((y) - ((y) * (2)))\n            set [y v] to [0]\n        end\n        change y by (-1)\n        if <<<key (w v) pressed?> or <<mouse down?> and <((mouse y) - (y position)) > [50]>>> and <touching (level v)?>> then\n            set [y v] to [15]\n        end\n        change y by (1)\n        if <<<<touching (tikenn v)?> or <touching (engeller v)?>> or <(y position) < [-175]>> or <<key (r v) pressed?> or <touching (rip 1 v)?>>> then\n            if <(!Level) = [18]> then\n                wait (0) seconds\n                Oyuncuyu getir: [-173] [-122] Büyüklüğü: [30]\n                broadcast (OOf v)\n            else\n                wait (0) seconds\n                Oyuncuyu getir: [-173] [-122] Büyüklüğü: [40]\n                broadcast (OOf v)\n            end\n        end\n        if <touching color (#f6ff00)?> then\n            set [y v] to [20]\n        end\n    else\n        change [y v] by (-1)\n        if <<<key (a v) pressed?> or <key (left arrow v) pressed?>> or <<mouse down?> and <(mouse x) < (x position)>>> then\n            point in direction (-90)\n            change [x v] by (-1)\n        end\n        if <<<key (d v) pressed?> or <key (right arrow v) pressed?>> or <<mouse down?> and <(mouse x) > (x position)>>> then\n            point in direction (90)\n            change [x v] by (1)\n        end\n        set [x v] to ((x) * (0.9))\n        change x by (x)\n        if <touching (level v)?> then\n            change y by (1)\n        end\n        if <touching (level v)?> then\n            change y by (1)\n        end\n        if <touching (level v)?> then\n            change y by (1)\n        end\n        if <touching (level v)?> then\n            change y by (1)\n        end\n        if <touching (level v)?> then\n            change y by (-4)\n            change x by ((x) * (-1))\n            if <<<key (up arrow v) pressed?> or <key (w v) pressed?>> or <<mouse down?> and <(mouse y) > [0]>>> then\n                set [y v] to [17]\n                if <(x) > [0]> then\n                    set [x v] to [-10]\n                else\n                    set [x v] to [10]\n                end\n            else\n                set [x v] to [0]\n            end\n        end\n        change y by (y)\n        if <touching (level v)?> then\n            change y by ((y) - ((y) * (2)))\n            set [y v] to [0]\n        end\n        change y by (-1)\n        if <<<<key (up arrow v) pressed?> or <key (w v) pressed?>> or <<mouse down?> and <((mouse y) - (y position)) > [50]>>> and <touching (level v)?>> then\n            set [y v] to [15]\n        end\n        change y by (1)\n        if <<<<touching (tikenn v)?> or <touching (engeller v)?>> or <(y position) < [-175]>> or <<key (r v) pressed?> or <touching (rip 1 v)?>>> then\n            if <(!Level) = [18]> then\n                wait (0) seconds\n                Oyuncuyu getir: [-173] [-122] Büyüklüğü: [30]\n                broadcast (OOf v)\n            else\n                wait (0) seconds\n                Oyuncuyu getir: [-173] [-122] Büyüklüğü: [40]\n                broadcast (OOf v)\n            end\n        end\n        if <touching color (#f6ff00)?> then\n            set [y v] to [20]\n        end\n    end\nend\n\nwhen flag clicked\nset [müzik v] to [1]\nset [for musc v] to [1]\n\nwhen [m v] key pressed\nset [müzik v] to [0]\nstop all sounds\n\nwhen flag clicked\nhide\nforever\n    if <<(!Level) = [18]> or <(!Level) = [18]>> then\n        set size to (30) %\n    else\n        set size to (40) %\n    end\nend\n\nwhen I receive [oyun başladıo v]\nset [!level v] to [1]\nshow\nOyuncuyu getir: [-173] [-122] Büyüklüğü: [40]\nhide variable [y v]\nhide variable [x v]\nset [y v] to [0]\nset [x v] to [0]\nforever\n    Yerçekimi ve Fizikler falan\nend\n\nwhen I receive [oyun başladıo v]\nforever\n    if <(username) = [OYUNKONSOLU41]> then\n        switch costume to (8 v)\n    end\n    if <(username) = [efegamer66]> then\n        switch costume to (4 v)\n    end\n    if <(username) = [hasanbaba123456789h]> then\n        switch costume to (7 v)\n    end\n    if <not <<<(username) = [efegamer66]> or <(username) = [hasanbaba123456789h]>> or <(username) = [OYUNKONSOLU41]>>> then\n        switch costume to (1 v)\n    end\nend\n\nwhen I receive [oyun başladıo v]\nforever\n    if <(Müzik) = [1]> then\n        if <not <(!Level) = [24]>> then\n            wait (0) seconds\n            play sound [Rude Buster v] until done\n        end\n    end\nend\n\nwhen flag clicked\nwait (0.01) seconds\nforever\n    if <(!Level) = [24]> then\n        stop all sounds\n        wait until <[1] = [2]>\n    end\nend\n\nwhen flag clicked\nwait (0.01) seconds\nforever\n    if <(!Level) = [24]> then\n        play sound [Dance Around v] until done\n    end\nend\n\nwhen flag clicked\nset [!level v] to [1]\n\nwhen I receive [i̇ntro bitişe git v]\nforever\n    if <<not <(!Level) = [24]>> and <not <(!Level) = [5]>>> then\n        if <(x position) > [230]> then\n            change [!level v] by (1)\n            if <(!Level) = [18]> then\n                Oyuncuyu getir: [-173] [-122] Büyüklüğü: [30]\n            else\n                Oyuncuyu getir: [-173] [-122] Büyüklüğü: [40]\n            end\n        end\n    else\n        if <[-230] > (x position)> then\n            if <(!Level) = [5]> then\n                change [!level v] by (1)\n                Oyuncuyu getir: [-173] [-122] Büyüklüğü: [40]\n            end\n        end\n    end\nend\n\npoint in direction (-90)\nchange [x v] by (-1)\n\nwhen I receive [oyuncu bölüm goyur v]\nOyuncuyu getir: [-173] [-122] Büyüklüğü: [40]\n\n@Taret 1\n\nwhen flag clicked\nforever\n    set [taret 1 yön v] to (direction)\n    point towards (oyuncu v)\nend\n\nwhen flag clicked\nforever\n    if <<(!Level) = [19]> or <(!Level) = [20]>> then\n        show\n        if <(!Level) = [19]> then\n            go to x: (172) y: (90)\n        else\n            go to x: (0) y: (100)\n        end\n    else\n        hide\n    end\nend\n\n@Rip 1\n\nwhen flag clicked\nhide\nforever\n    point in direction (Taret 1 yön)\n    go to (taret 1 v)\nend\n\nwhen flag clicked\nforever\n    if <(!Level) = [19]> then\n        wait (1.2) seconds\n        ateş\n    else\n        if <(!Level) = [20]> then\n            wait (2.4) seconds\n            ateş\n        end\n    end\nend\n\ndefine ateş\ncreate clone of (_myself_ v)\n\nwhen I start as a clone\nshow\nrepeat until <<touching (_edge_ v)?> or <touching (oyuncu v)?>>\n    move (10) steps\nend\nwait (0.01) seconds\ndelete this clone\n\nwhen I start as a clone\nforever\n    if <<(!Level) = [19]> or <(!Level) = [20]>> then\nend\n\n@Atla\n\nwhen flag clicked\nhide\n\nwhen I receive [oyun başladıo v]\nshow\npoint in direction (90)\nrepeat until <(!Level) = [24]>\n    change [efekt v] by (5)\n    go to x: (203) y: (-156)\n    point in direction ((90) + (([sin v] of (Efekt) ) * (3)))\n    go to [front v] layer\nend\n\nwhen I receive [oyun başladıo v]\nset [atlama haqqıı v] to [2]\nforever\n    if <(Atlama Haqqıı) = [2]> then\n        switch costume to (2 kaldı v)\n        if <touching (mouse-pointer v)?> then\n            set size to (75) %\n        else\n            set size to (70) %\n        end\n    else\n        if <(Atlama Haqqıı) = [1]> then\n            switch costume to (1 kaldı v)\n            if <touching (mouse-pointer v)?> then\n                set size to (75) %\n            else\n                set size to (70) %\n            end\n        else\n            switch costume to (kalmadı v)\n        end\n    end\nend\n\nwhen I receive [oyun başladıo v]\nforever\n    if <<(Atlama Haqqıı) = [1]> or <(Atlama Haqqıı) = [2]>> then\n        wait until <<touching (mouse-pointer v)?> and <mouse down?>>\n        start sound [pop v]\n        change [!level v] by (1)\n        change [atlama haqqıı v] by (-1)\n        broadcast (Oyuncu bölüm goyur v)\n        wait until <not <<touching (mouse-pointer v)?> and <mouse down?>>>\n    end\nend\n\nwhen I receive [oyun başladıo v]\nwait until <(!Level) = [24]>\nhide\n\n