Go Home - Unfair Platformer


@Stage\n\nwhen flag clicked\nswitch backdrop to (arrière plan2 v)\nset volume to (50) %\nforever\n    play sound [Arcade Game Menu Music Loop Sound Effect \(8-Bit Style\) v] until done\nend\n\nwhen I receive [intro v]\nswitch backdrop to (arrière plan3 v)\nwait (5) seconds\nswitch backdrop to (arrière plan4 v)\n\nbroadcast (Menu v)\n\nwhen I receive [play v]\nswitch backdrop to (arrière plan4 v)\n\n@PTE\n\ndefine Write (text) Size (size) Thickness (thickness) color (color) at x | y (x) (y) Normal/Italic (n/i)\ngo to x: (x) y: (y)\nset pen color to (color)\nset pen size to (thickness)\nset [n° car. v] to [1]\nrepeat (length of (text))\n    if <[caractères v] contains (letter (n° car.) of (text))?> then\n        set [n° dans liste v] to [0]\n        repeat until <(item (n° dans liste) of [caractères v]) = (letter (n° car.) of (text))>\n            change [n° dans liste v] by (1)\n        end\n    else\n        set [n° dans liste v] to [0]\n    end\n    if <not <(n° dans liste) = [0]>> then\n        Aller à la ligne ? ((size) / (10)) (x) (y position)\n    end\n    Letter (n° dans liste) ((size) / (10)) (n/i) (x position) (y position)\n    change [n° car. v] by (1)\nend\npen up\n\ndefine Letter (n°) (size) (n/i) (xd) (yd)\nset [lire liste descr. v] to [1]\nset [largeur caract. v] to [0]\nif <not <(n°) = [0]>> then\n    repeat until <<(Lire liste Descr.) = (length of (item (n°) of [descr. caractères v]))> or <(Lire liste Descr.) > (length of (item (n°) of [descr. caractères v]))>>\n        if <(join (letter (Lire liste Descr.) of (item (n°) of [descr. caractères v])) (letter ((Lire liste Descr.) + (1)) of (item (n°) of [descr. caractères v]))) = [up]> then\n            pen up\n            change [lire liste descr. v] by (2)\n        end\n        Go to (join (letter (Lire liste Descr.) of (item (n°) of [descr. caractères v])) (letter ((Lire liste Descr.) + (1)) of (item (n°) of [descr. caractères v]))) (n/i) down left pos. : (xd) (yd) Size (size)\n        if <(largeur caract.) < (((join (letter (Lire liste Descr.) of (item (n°) of [descr. caractères v])) (letter ((Lire liste Descr.) + (1)) of (item (n°) of [descr. caractères v]))) mod (5)) + (1))> then\n            set [largeur caract. v] to (((join (letter (Lire liste Descr.) of (item (n°) of [descr. caractères v])) (letter ((Lire liste Descr.) + (1)) of (item (n°) of [descr. caractères v]))) mod (5)) + (1))\n        end\n        pen down\n        change [lire liste descr. v] by (2)\n    end\nelse\n    set [largeur caract. v] to [4]\nend\npen up\nGo to (45) (n/i) down left pos. : (xd) (yd) Size (size)\nchange x by (((largeur caract.) * (size)) * (1.2))\n\ndefine Go to (n°) (n/i) down left pos. : (xd) (yd) Size (size)\nif <(n/i) = [i]> then\n    go to x: ((xd) + ((((n°) mod (5)) * (size)) + ((([ceiling v] of (((n°) - (49)) / (5)) ) * (size)) * (-0.7)))) y: ((yd) + ((([ceiling v] of (((n°) - (49)) / (5)) ) * (size)) * (-1)))\nelse\n    go to x: ((xd) + (((n°) mod (5)) * (size))) y: ((yd) + ((([ceiling v] of (((n°) - (49)) / (5)) ) * (size)) * (-1)))\nend\n\ndefine Aller à la ligne ? (size) (x) (y)\nif <((x position) + ((5) * (size))) > [238]> then\n    go to x: (x) y: ((y) + ((-13) * (size)))\nend\n\nwhen flag clicked\nerase all\n\nwhen I receive [easy v]\nAfficher niveaux dispo.\n\nwhen I receive [medium v]\nAfficher niveaux dispo.\n\nwhen I receive [hard v]\nAfficher niveaux dispo.\n\ndefine Afficher niveaux dispo.\nerase all\ngo to x: (-200) y: (100)\ngo to [front v] layer\nset [ma variable v] to [0]\nrepeat (9)\n    change [ma variable v] by (1)\n    set x to ((-200) + ((100) * ((((ma variable) - (1)) mod (3)) + (1))))\n    if <(item ((ma variable) + ((10) * ((/EASY/MEDIUM/HARD) - (1)))) of [levels win v]) = [1]> then\n        if <(/EASY/MEDIUM/HARD) = [1]> then\n            set pen color to (#00ff21)\n        else\n            if <(/EASY/MEDIUM/HARD) = [2]> then\n                set pen color to (#fff700)\n            else\n                set pen color to (#ff0000)\n            end\n        end\n        set pen size to (85)\n        pen down\n        pen up\n        set pen size to (70)\n        set pen color to (#ffffff)\n        pen down\n        pen up\n        set pen size to (55)\n        if <(/EASY/MEDIUM/HARD) = [1]> then\n            set pen color to (#00ff21)\n        else\n            if <(/EASY/MEDIUM/HARD) = [2]> then\n                set pen color to (#fff700)\n            else\n                set pen color to (#ff0000)\n            end\n        end\n        pen down\n        pen up\n    else\n        set pen size to (75)\n        if <(/EASY/MEDIUM/HARD) = [1]> then\n            set pen color to (#00ff21)\n        else\n            if <(/EASY/MEDIUM/HARD) = [2]> then\n                set pen color to (#fff700)\n            else\n                set pen color to (#ff0000)\n            end\n        end\n        pen down\n        pen up\n    end\n    Write (ma variable) Size (60) Thickness (7) color (16777215) at x | y ((x position) - ((length of (ma variable)) * (10))) ((y position) - (18)) Normal/Italic [n]\n    set y to ((([floor v] of ((ma variable) / (3)) ) * (-100)) + (100))\nend\ngo to x: (-205) y: (147)\nset size to (100) %\nshow\nswitch costume to (return v)\nstamp\nhide\nwait until <<mouse down?> and <<<(mouse x) < [-184]> and <[125] < (mouse y)>> or <<([abs v] of (mouse x) ) < [137]> and <([abs v] of (mouse y) ) < [137]>>>>\nif <<(mouse x) < [-184]> and <[125] < (mouse y)>> then\n    broadcast (Menu v)\nelse\n    if <<([abs v] of (mouse x) ) < [137]> and <([abs v] of (mouse y) ) < [137]>> then\n        set [#level n° v] to (([ceiling v] of (((mouse x) + (138)) / (100)) ) + (((([ceiling v] of ((((mouse y) * (-1)) + (138)) / (100)) ) - (1)) * (3)) + ((10) * ((/EASY/MEDIUM/HARD) - (1)))))\n        broadcast (Play v)\n    end\nend\nerase all\n\nwhen I receive [page mort v]\nforever\n    erase all\n    set [color v] effect to (0)\n    switch costume to (costume1 v)\n    set size to (200) %\n    switch costume to (backgroundforest v)\n    go to x: (0) y: (0)\n    stamp\n    set size to (100) %\n    set [color v] effect to ((timer) * (25))\n    Write [retry] Size (25) Thickness (8) color (0) at x | y (-25) (-50) Normal/Italic []\n    Write [retry] Size (25) Thickness (3) color (16777215) at x | y (-25) (-50) Normal/Italic []\n    switch costume to (retry v)\n    go to x: (10) y: (-100)\n    set size to (100) %\n    stamp\n    Write [choose] Size (25) Thickness (8) color (0) at x | y (-150) (-40) Normal/Italic []\n    Write [level] Size (25) Thickness (8) color (0) at x | y (-140) (-65) Normal/Italic []\n    Write [choose] Size (25) Thickness (3) color (16777215) at x | y (-150) (-40) Normal/Italic []\n    Write [level] Size (25) Thickness (3) color (16777215) at x | y (-140) (-65) Normal/Italic []\n    switch costume to (home v)\n    go to x: (-110) y: (-100)\n    stamp\n    if <(#level n°) < [29]> then\n        Write [next] Size (25) Thickness (8) color (0) at x | y (115) (-40) Normal/Italic []\n        Write [level] Size (25) Thickness (8) color (0) at x | y (115) (-65) Normal/Italic []\n        Write [next] Size (25) Thickness (3) color (16777215) at x | y (115) (-40) Normal/Italic []\n        Write [level] Size (25) Thickness (3) color (16777215) at x | y (115) (-65) Normal/Italic []\n        switch costume to (next v)\n        go to x: (142) y: (-100)\n        stamp\n    end\n    if <<mouse down?> and <<[-70] > (mouse y)> and <[-130] < (mouse y)>>> then\n        erase all\n        if <([abs v] of (mouse x) ) < [50]> then\n            broadcast (Play v)\n        else\n            if <[50] < (mouse x)> then\n                if <(#level n°) < [29]> then\n                    if <(letter (length of (#level n°)) of (#level n°)) = [9]> then\n                        change [#level n° v] by (2)\n                    else\n                        change [#level n° v] by (1)\n                    end\n                    broadcast (Play v)\n                end\n            else\n                broadcast (Menu v)\n            end\n        end\n        stop [this script v]\n    end\n    switch costume to (costume2 v)\nend\n\nstop [this script v]\n\nwhen I receive [tick2 v]\nset [color v] effect to (0)\nset [ghost v] effect to (0)\nset [brightness v] effect to (0)\nswitch costume to (costume1 v)\nset size to (200) %\nswitch costume to (backgroundforest v)\nset [brightness v] effect to (-5)\ngo to x: ((#level x) / (15)) y: ((#level y) / (10))\nstamp\nswitch costume to (costume1 v)\nset size to (100) %\nswitch costume to (costume3 v)\ngo to x: (0) y: ((#level y) - (3060))\nstamp\nset size to (100) %\nWrite (join (letter (1) of ((#level n°) + (10))) (join [ - ] (letter (2) of ((#level n°) + (10))))) Size (40) Thickness (10) color (0) at x | y (-30) (140) Normal/Italic [n]\nWrite (join (letter (1) of ((#level n°) + (10))) (join [ - ] (letter (2) of ((#level n°) + (10))))) Size (40) Thickness (4) color (16777215) at x | y (-30) (140) Normal/Italic [n]\n\nwhen I receive [page mort v]\nif <not <[levels win v] contains [0]?>> then\n    change [☁ scratchers that have finished the whole game v] by (1)\nend\n\n@player's animation\n\ndefine Costume (n°)\nif <(n°) > [2]> then\n    switch costume to (costume1 v)\nelse\n    wait (n°) seconds\nend\n\nwhen I receive [play v]\nset size to (100) %\nshow\ngo to [front v] layer\npoint in direction (90)\nset rotation style [left-right v]\nforever\n    if <([abs v] of (Xv) ) < [3]> then\n        switch costume to (costume1 v)\n    else\n        if <(Xv) < [0]> then\n            switch costume to (costume2 v)\n            Costume ((0.5) / ([abs v] of (Xv) ))\n            switch costume to (costume3 v)\n            Costume ((0.5) / ([abs v] of (Xv) ))\n        else\n            switch costume to (costume4 v)\n            Costume ((0.5) / ([abs v] of (Xv) ))\n            switch costume to (costume5 v)\n            Costume ((0.5) / ([abs v] of (Xv) ))\n        end\n    end\nend\n\nwhen flag clicked\nhide\n\nwhen I receive [mort v]\nstop [other scripts in sprite v]\n\nwhen I receive [win v]\nstop [other scripts in sprite v]\nswitch costume to (costume1 v)\nwait (0.5) seconds\nswitch costume to (costumewin1 v)\nwait (0.05) seconds\nswitch costume to (costumewin2 v)\nwait (1) seconds\nswitch costume to (costumewin1 v)\nwait (0.05) seconds\nswitch costume to (costume1 v)\n\nwhen I receive [page mort v]\ngo to x: (0) y: (64)\nset size to (300) %\nforever\n    switch costume to (costume1 v)\n    wait (0.1) seconds\n    switch costume to (costume6 v)\n    wait (0.1) seconds\n    switch costume to (costume7 v)\n    wait (0.1) seconds\n    switch costume to (costume6 v)\n    wait (0.1) seconds\nend\n\nwhen I receive [page mort v]\nstop [other scripts in sprite v]\n\nwhen I receive [menu v]\nhide\nstop [other scripts in sprite v]\n\nwhen I receive [miam champi v]\nset size to (200) %\n\nif <(#level y) > [3000]> then\n    broadcast (mort v)\nend\n\nwhen I receive [tick v]\ngo to (hitbox v)\nchange y by (7)\n\nset [#level x v] to [-908]\nset [#level y v] to [8]\n\n@map\n\nwhen I receive [play v]\nreset timer\nshow\nswitch costume to (1 vide v)\nset size to (400) %\nswitch costume to ((#level n°) + (1))\ngo to x: (#level x) y: (#level y)\n\nwhen flag clicked\nhide\n\nwhen I receive [tick v]\ngo to x: (#level x) y: (#level y)\n\nwhen I receive [page mort v]\nhide\n\ngo to [front v] layer\n\nchange [#level x v] by (-500)\n\nwhen I receive [menu v]\nset size to (120) %\nswitch costume to (costume1 v)\nshow\nforever\n    go to x: ((-5) - ((mouse x) / (10))) y: (() - ((mouse y) / (10)))\n    go to [back v] layer\nend\n\nwhen I receive [easy v]\nstop [other scripts in sprite v]\nhide\n\nwhen I receive [hard v]\nstop [other scripts in sprite v]\nhide\n\nwhen I receive [medium v]\nhide\nstop [other scripts in sprite v]\n\nchange [brightness v] effect by (25)\n\nset [ghost v] effect to (25)\n\n@hitbox\n\ndefine Touch. sol <+-> <x+->\nchange [chute ? v] by (1)\nswitch costume to (costume1 v)\nif <touching (blocs v)?> then\n    broadcast (bloc touché v)\nend\nrepeat until <<<not <touching (map v)?>> and <not <touching (blocs v)?>>> and <not <touching (block chrono v)?>>>\n    if <+-> then\n        change y by (-1)\n        switch costume to (costume2 v)\n    else\n        change y by (1)\n        set [chute ? v] to [0]\n    end\n    set [yv v] to [0]\nend\nswitch costume to (costume1 v)\nif <touching (tremplin v)?> then\n    broadcast (tremplin touché v)\n    if <(size) = [100]> then\n        set [yv v] to [20]\n    else\n        set [yv v] to [25]\n    end\nend\n\ndefine mouvement\nchange [yv v] by (-1)\nchange y by (Yv)\nset rotation style [left-right v]\nTouch. sol <(Yv) > [0]> <(Xv) > [0]>\nif <<key (left arrow v) pressed?> or <[0] > (x phone)>> then\n    set [xv v] to [8]\n    avancer (Xv)\nelse\n    if <<key (right arrow v) pressed?> or <(x phone) > [0]>> then\n        set [xv v] to [-8]\n        avancer (Xv)\n    else\n        set [xv v] to [0]\n    end\nend\nchange y by (-3)\nif <<<key (up arrow v) pressed?> or <(y phone) > [0]>> and <(chute ?) < [3]>> then\n    set [yv v] to (([sqrt v] of (size) ) / (0.67))\nend\nchange [#level x v] by (() - (x position))\nchange [#level y v] by (() - (y position))\ngo to x: (0) y: (0)\n\ndefine avancer (vitesse)\npoint in direction ((([abs v] of (vitesse) ) / (vitesse)) * (90))\nchange x by ((vitesse) * (-1))\nset [pente de v] to [0]\nif <touching (tremplin v)?> then\n    broadcast (tremplin touché v)\n    set [yv v] to ((([sqrt v] of (size) ) / (0.67)) + (3))\nend\nrepeat until <<(pente de) = [6]> or <<<not <touching (map v)?>> and <not <touching (blocs v)?>>> and <not <touching (block chrono v)?>>>>\n    change y by (1)\n    change [pente de v] by (1)\nend\nif <(pente de) = [6]> then\n    change x by (vitesse)\n    change y by ((pente de) * (-1))\nend\n\nwhen I receive [message1 v]\nrepeat (1)\n    erase all\n    mouvement\n    broadcast (tick v)\n    broadcast (tick2 v)\n    wait (0) seconds\nend\nforever\n    erase all\n    mouvement\n    broadcast (tick v)\n    broadcast (tick2 v)\nend\n\nwhen I receive [play v]\ngo to x: (0) y: (0)\nshow\nset [ghost v] effect to (99)\nset [#level x v] to [700]\nset [#level y v] to [-50]\nset [yv v] to [14]\nset [xv v] to [0]\nset [chute ? v] to [10]\nset [x phone v] to [0]\nset [y phone v] to [0]\nbroadcast (tick v)\nbroadcast (message1 v)\n\nwhen flag clicked\nhide\n\nwhen I receive [win v]\nset volume to (100) %\nstop [other scripts in sprite v]\nplay sound [Win v] until done\nset [#level x v] to [700]\nset [#level y v] to [-50]\nbroadcast (page mort v)\n\nwhen I receive [miam champi v]\nset size to (200) %\n\nwhen I receive [play v]\nset size to (100) %\n\ngo to [front v] layer\n\nwhen I receive [mort v]\nstop [other scripts in sprite v]\nset volume to (100) %\nstart sound [Minecraft Alpha Damage - Sound Effect v]\nplay sound [Lose v] until done\nbroadcast (page mort v)\nset [#level x v] to [700]\nset [#level y v] to [-50]\n\nset size to (100) %\n\nset [yv v] to [-50000000000000]\n\n@home\n\nwhen I receive [play v]\nshow\nswitch costume to (1 vide v)\nset size to (400) %\nswitch costume to (1 v)\ngo to x: ((item ((((#level n°) - (1)) * (2)) + (1)) of [positions points fin v]) + (#level x)) y: ((item ((((#level n°) - (1)) * (2)) + (2)) of [positions points fin v]) + (#level y))\nif <<([abs v] of (x position) ) > [270]> or <<(y position) > [180]> or <[-230] > (y position)>>> then\n    set [ghost v] effect to (100)\nelse\n    set [ghost v] effect to ((((x position) * (x position)) * ((x position) * (x position))) / (41000000))\nend\n\nwhen flag clicked\nhide\n\nwhen I receive [tick v]\ngo to x: ((item ((((#level n°) - (1)) * (2)) + (1)) of [positions points fin v]) + (#level x)) y: ((item ((((#level n°) - (1)) * (2)) + (2)) of [positions points fin v]) + (#level y))\nif <<<(x position) > [270]> or <[-239] > (x position)>> or <<(y position) > [170]> or <[-230] > (y position)>>> then\n    set [ghost v] effect to (100)\nelse\n    set [ghost v] effect to ((((x position) * (x position)) * ((x position) * (x position))) / (41000000))\nend\nif <touching (hitbox v)?> then\n    broadcast (win v)\nend\nif <(#level y) > [3000]> then\n    broadcast (mort v)\nend\n\nwhen I receive [page mort v]\nhide\ndelete this clone\n\nwhen I receive [tick v]\nif <(#level n°) = [22]> then\n    replace item (43) of [positions points fin v] with (((-900) + ([abs v] of ((((timer) * (80)) mod (152)) - (76)) )) * (-1))\nend\n\nwhen flag clicked\ndelete all of [levels win v]\nrepeat (3)\n    repeat (9)\n        add [0] to [levels win v]\n    end\n    add [1] to [levels win v]\nend\n\nwhen I receive [win v]\nreplace item (#level n°) of [levels win v] with [1]\n\n@easy\n\nwhen I receive [medium v]\nhide\n\nwhen I receive [hard v]\nhide\n\nwhen flag clicked\nhide\n\nwhen I receive [menu v]\nshow\ngo to x: (0) y: (25)\n\nwhen this sprite clicked\nset [/easy/medium/hard v] to [1]\nbroadcast (Easy v)\nhide\n\n@medium\n\nwhen I receive [easy v]\nhide\n\nwhen I receive [hard v]\nhide\n\nwhen flag clicked\nhide\n\nwhen I receive [menu v]\nshow\ngo to x: (0) y: (-75)\n\nwhen this sprite clicked\nset [/easy/medium/hard v] to [2]\nbroadcast (Medium v)\nhide\n\n@hard\n\nwhen I receive [easy v]\nhide\n\nwhen I receive [medium v]\nhide\n\nwhen flag clicked\nhide\n\nwhen I receive [menu v]\nshow\ngo to x: (0) y: (-180)\n\nwhen this sprite clicked\nset [/easy/medium/hard v] to [3]\nbroadcast (Hard v)\nhide\n\n@pics\n\nwhen flag clicked\nhide\n\ndefine level (level)\nif <(level) = [3]> then\n    créer pic en [450] [10] [90]\n    créer pic en [945] [10] [90]\nelse\n    if <(level) = [6]> then\n        créer pic en [430] [0] [0]\n    else\n        if <(level) = [9]> then\n            créer pic en [196] [-310] [90]\n            créer pic en [-250] [-143] [90]\n        else\n            if <(level) = [11]> then\n                créer pic en [204] [123] [90]\n                créer pic en [108] [42] [90]\n            else\n                if <(level) = [12]> then\n                    créer pic en [436] [-205] [90]\n                    créer pic en [835] [-53] [-90]\n                else\n                    if <(level) = [13]> then\n                        créer pic en [740] [65] [90]\n                        créer pic en [370] [65] [90]\n                        créer pic en [-120] [65] [90]\n                    else\n                        if <(level) = [14]> then\n                            créer pic en [940] [495] [90]\n                        else\n                            if <(level) = [15]> then\n                                créer pic en [110] [28] [90]\n                            else\n                                if <(level) = [16]> then\n                                    créer pic en [370] [-15] [0]\n                                    créer pic en [370] [-95] [0]\n                                    créer pic en [215] [-156] [0]\n                                else\n                                    if <(level) = [17]> then\n                                        créer pic en [169] [-515] [90]\n                                    else\n                                        if <(level) = [18]> then\n                                            créer pic en [92] [-10] [90]\n                                        else\n                                            if <(level) = [19]> then\n                                                créer pic en [-95] [0] [0]\n                                                créer pic en [-95] [25] [0]\n                                                créer pic en [-95] [50] [0]\n                                                créer pic en [124] [402] [90]\n                                                créer pic en [404] [402] [90]\n                                                créer pic en [670] [450] [90]\n                                                créer pic en [772] [312] [-90]\n                                            else\n                                                if <(level) = [21]> then\n                                                    créer pic en [94] [240] [0]\n                                                    créer pic en [246] [235] [0]\n                                                    créer pic en [196] [131] [-90]\n                                                    créer pic en [350] [100] [180]\n                                                    créer pic en [618] [66] [180]\n                                                    créer pic en [-356] [210] [90]\n                                                else\n                                                    if <(level) = [22]> then\n                                                        créer pic en [398] [0] [90]\n                                                        créer pic en [368] [0] [90]\n                                                        créer pic en [428] [0] [90]\n                                                        créer pic en [458] [0] [90]\n                                                        créer pic en [488] [0] [90]\n                                                        créer pic en [-172] [109] [90]\n                                                        créer pic en [-44] [12] [90]\n                                                        créer pic en [-462] [20] [0]\n                                                        créer pic en [-580] [-3] [90]\n                                                        créer pic en [-550] [-3] [90]\n                                                        créer pic en [-520] [-3] [90]\n                                                        créer pic en [-490] [-3] [90]\n                                                    else\n                                                        if <(level) = [23]> then\n                                                            créer pic en [455] [-15] [90]\n                                                            créer pic en [398] [-42] [90]\n                                                            créer pic en [342] [-18] [90]\n                                                            créer pic en [188] [32] [90]\n                                                            créer pic en [-28] [32] [90]\n                                                        else\n                                                            if <(level) = [25]> then\n                                                                créer pic en [-556] [-190] [-90]\n                                                            else\n                                                                if <(level) = [26]> then\n                                                                    créer pic en [245] [-55] [77]\n                                                                    créer pic en [-220] [-143] [90]\n                                                                    créer pic en [-315] [-143] [90]\n                                                                    créer pic en [-412] [-691] [90]\n                                                                    créer pic en [-412] [-711] [90]\n                                                                    créer pic en [-412] [-731] [90]\n                                                                else\n                                                                    if <(level) = [27]> then\n                                                                        créer pic en [-92] [-77] [90]\n                                                                    else\n                                                                        if <(level) = [28]> then\n                                                                            créer pic en [-744] [-472] [90]\n                                                                        else\n                                                                            if <(level) = [29]> then\n                                                                                créer pic en [570] [312] [90]\n                                                                                créer pic en [530] [312] [90]\n                                                                                créer pic en [490] [312] [90]\n                                                                                créer pic en [450] [312] [90]\n                                                                                créer pic en [410] [312] [90]\n                                                                                créer pic en [370] [312] [90]\n                                                                                créer pic en [270] [170] [-90]\n                                                                                créer pic en [230] [170] [-90]\n                                                                                créer pic en [190] [170] [-90]\n                                                                                créer pic en [150] [170] [-90]\n                                                                                créer pic en [110] [170] [-90]\n                                                                                créer pic en [70] [170] [-90]\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\n                end\n            end\n        end\n    end\nend\nset [x pic v] to [a]\nset [y pic v] to [a]\n\nwhen I receive [menu v]\ndelete this clone\n\nwhen I receive [play v]\nwait (0.1) seconds\nlevel (#level n°)\n\ndefine créer pic en (x) (y) (orientation)\nset [x pic v] to (x)\nset [y pic v] to (y)\npoint in direction (orientation)\ncreate clone of (_myself_ v)\n\nwhen I start as a clone\nset [ghost v] effect to (100)\nset [brightness v] effect to (-10)\nshow\n\nwhen I receive [tick v]\nif <not <(x pic) = [a]>> then\n    go to x: ((#level x) - (x pic)) y: ((#level y) - (y pic))\n    if <touching (hitbox v)?> then\n        broadcast (mort v)\n        switch costume to (costume1 v)\n        set [ghost v] effect to (0)\n        repeat (4)\n            next costume\n        end\n    end\n    go to [front v] layer\nend\n\nset [ghost v] effect to (0)\n\nstop [all v]\n\nwhen I receive [page mort v]\ndelete this clone\n\nwhen I receive [menu v]\ndelete this clone\n\n@Ennemis\n\nwhen flag clicked\nhide\n\ndefine level (level)\nif <(level) = [7]> then\n    créer hérisson qui marche de [370] [-53] à [150] [-53] vitesse [25] début à % [0]\nelse\n    if <(level) = [8]> then\n        créer hérisson qui marche de [410] [-53] à [150] [-53] vitesse [100] début à % [0]\n        créer hérisson qui marche de [410] [-53] à [150] [-53] vitesse [25] début à % [0]\n    else\n        if <(level) = [11]> then\n            créer hérisson qui marche de [36] [29] à [-396] [29] vitesse [100] début à % [0]\n        else\n            if <(level) = [13]> then\n                créer hérisson qui marche de [650] [52] à [100] [52] vitesse [40] début à % [0]\n                créer hérisson qui marche de [650] [52] à [100] [52] vitesse [40] début à % [25]\n                créer hérisson qui marche de [650] [52] à [100] [52] vitesse [40] début à % [50]\n                créer hérisson qui marche de [650] [52] à [100] [52] vitesse [40] début à % [75]\n                créer hérisson qui marche de [650] [52] à [100] [52] vitesse [40] début à % [100]\n            else\n                if <(level) = [14]> then\n                    créer hérisson qui marche de [380] [47] à [-572] [-216] vitesse [40] début à % [0]\n                    créer hérisson qui marche de [380] [47] à [-572] [-216] vitesse [40] début à % [3.5]\n                    créer hérisson qui marche de [380] [47] à [-572] [-216] vitesse [40] début à % [7]\n                else\n                    if <(level) = [15]> then\n                        créer hérisson qui marche de [300] [15] à [244] [15] vitesse [40] début à % [7]\n                    else\n                        if <(level) = [16]> then\n                            créer hérisson qui marche de [365] [79] à [-188] [210] vitesse [40] début à % [0]\n                            créer hérisson qui marche de [365] [79] à [-188] [210] vitesse [40] début à % [3]\n                            créer hérisson qui marche de [365] [79] à [-188] [210] vitesse [40] début à % [6]\n                        else\n                            if <(level) = [18]> then\n                                créer hérisson qui marche de [60] [-22] à [-132] [-24] vitesse [40] début à % [0]\n                            else\n                                if <(level) = [21]> then\n                                    créer hérisson qui marche de [788] [193] à [364] [193] vitesse [20] début à % [0]\n                                else\n                                    if <(level) = [22]> then\n                                        créer hérisson qui marche de [4] [0] à [-140] [0] vitesse [40] début à % [0]\n                                        créer hérisson qui marche de [-412] [96] à [-692] [96] vitesse [40] début à % [0]\n                                        créer hérisson qui marche de [-748] [-400] à [-900] [-400] vitesse [80] début à % [0]\n                                    else\n                                        if <(level) = [24]> then\n                                            créer hérisson qui marche de [900] [-300] à [-1000] [-300] vitesse [40] début à % [0]\n                                            créer hérisson qui marche de [900] [-250] à [-1000] [-250] vitesse [40] début à % [0]\n                                            créer hérisson qui marche de [900] [-200] à [-1000] [-200] vitesse [40] début à % [0]\n                                            créer hérisson qui marche de [900] [-150] à [-1000] [-150] vitesse [40] début à % [0]\n                                            créer hérisson qui marche de [900] [-100] à [-1000] [-100] vitesse [40] début à % [0]\n                                            créer hérisson qui marche de [900] [-50] à [-1000] [-50] vitesse [40] début à % [0]\n                                            créer hérisson qui marche de [900] [0] à [-1000] [0] vitesse [40] début à % [0]\n                                            créer hérisson qui marche de [900] [50] à [-1000] [50] vitesse [40] début à % [0]\n                                            créer hérisson qui marche de [900] [100] à [-1000] [100] vitesse [40] début à % [0]\n                                            créer hérisson qui marche de [900] [150] à [-1000] [150] vitesse [40] début à % [0]\n                                        else\n                                            if <(level) = [26]> then\n                                                créer hérisson qui marche de [620] [8] à [236] [-69] vitesse [30] début à % [0]\n                                                créer hérisson qui marche de [620] [8] à [236] [-69] vitesse [30] début à % [5]\n                                                créer hérisson qui marche de [260] [-65] à [-148] [-150] vitesse [30] début à % [50]\n                                                créer hérisson qui marche de [260] [-65] à [-148] [-150] vitesse [30] début à % [55]\n                                            else\n                                                if <(level) = [29]> then\n                                                    créer hérisson qui marche de [32] [302] à [-568] [302] vitesse [40] début à % [0]\n                                                    créer hérisson qui marche de [32] [302] à [-568] [302] vitesse [40] début à % [16.2]\n                                                    créer hérisson qui marche de [32] [302] à [-568] [302] vitesse [40] début à % [33.3]\n                                                    créer hérisson qui marche de [32] [302] à [-568] [302] vitesse [40] début à % [49.92]\n                                                    créer hérisson qui marche de [32] [302] à [-568] [302] vitesse [40] début à % [83.6]\n                                                    créer hérisson qui marche de [32] [302] à [-568] [302] vitesse [40] début à % [100]\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\nset [x1 v] to [a]\n\nwhen I receive [page mort v]\ndelete this clone\n\nwhen I receive [play v]\npoint in direction (90)\nwait (0.1) seconds\nlevel (#level n°)\n\ndefine créer hérisson qui marche de (x) (y) à (x2) (y2) vitesse (speed) début à % (%)\nset [x1 v] to (x)\nset [y1 v] to (y)\nset [x2 v] to (x2)\nset [y2 v] to (y2)\nset [dist. x v] to ((x) - (x2))\nset [dist y v] to ((y) - (y2))\nset [dist. xy v] to ([sqrt v] of ((((x2) - (x)) * ((x2) - (x))) + (((y2) - (y)) * ((y2) - (y)))) )\nset [speed v] to (speed)\nset [% v] to (%)\ncreate clone of (_myself_ v)\n\nset [x1 v] to (item (1) of [ennemis v])\nset [y1 v] to (item (2) of [ennemis v])\nset [x2 v] to (item (3) of [ennemis v])\nset [y2 v] to (item (4) of [ennemis v])\nset [dist. x v] to (item (5) of [ennemis v])\nset [dist y v] to (item (6) of [ennemis v])\nset [dist. xy v] to (item (7) of [ennemis v])\nset [speed v] to (item (8) of [ennemis v])\ndelete all of [ennemis v]\n\nwhen I start as a clone\n\nwhen I receive [tick v]\nif <not <(x1) = [a]>> then\n    bloc qui va vite comme forest mgl\nelse\n    hide\nend\n\ndefine bloc qui va vite comme forest mgl\nshow\ngo to x: ((#level x) - ((x2) + ((([abs v] of (((((timer) + (((%) / (100)) * ((dist. xy) / (speed)))) * (speed)) mod (dist. xy)) - ((dist. xy) / (2))) ) / ((dist. xy) / (2))) * (dist. xy)))) y: ((#level y) - (((y2) + ((([abs v] of (((((timer) + (((%) / (100)) * ((dist. xy) / (speed)))) * (speed)) mod (dist. xy)) - ((dist. xy) / (2))) ) / ((dist. xy) / (2))) * (dist y))) - ()))\npoint in direction (90)\nif <touching (hitbox v)?> then\n    switch costume to (costume6 v)\n    set [ghost v] effect to (0)\n    broadcast (mort v)\nend\nswitch costume to ((<((dist. xy) / (2)) > ((((timer) + (((%) / (100)) * ((dist. xy) / (speed)))) * (speed)) mod (dist. xy))> * (4)) + (((round (((timer) + (((%) / (100)) * ((dist. xy) / (speed)))) * (10))) mod (4)) + (1)))\nif <<([abs v] of (x position) ) > [240]> or <<(y position) > [180]> or <[-180] > (y position)>>> then\n    set [ghost v] effect to (100)\nelse\n    set [ghost v] effect to ((((x position) * (x position)) * ((x position) * (x position))) / (41000000))\nend\n\nwhen I receive [page mort v]\nhide\ndelete this clone\n\nadd (x) to [ennemis v]\nadd (y) to [ennemis v]\nadd (x2) to [ennemis v]\nadd (y2) to [ennemis v]\nadd ((x) - (x2)) to [ennemis v]\nadd ((y) - (y2)) to [ennemis v]\nadd ([sqrt v] of ((((x2) - (x)) * ((x2) - (x))) + (((y2) - (y)) * ((y2) - (y)))) ) to [ennemis v]\nadd (speed) to [ennemis v]\n\nwhen I start as a clone\nset [ghost v] effect to (0)\nshow\n\nwhen I start as a clone\n\nwait (1) seconds\n\nwhen I receive [menu v]\ndelete this clone\n\ncréer hérisson qui marche de [410] [-53] à [150] [-53] vitesse [25] début à % []\n\nset [ghost v] effect to ((((x position) * (x position)) * ((x position) * (x position))) / (41000000))\n\ngo to x: ((#level x) - ((x2) + ((([abs v] of (((((timer) + (((%) / (100)) * ((dist. xy) / (speed)))) * (speed)) mod (dist. xy)) - ((dist. xy) / (2))) ) / ((dist. xy) / (2))) * (dist. xy)))) y: ((#level y) - (((y2) + ((([abs v] of (((((timer) + (((%) / (100)) * ((dist. xy) / (speed)))) * (speed)) mod (dist. xy)) - ((dist. xy) / (2))) ) / ((dist. xy) / (2))) * (dist y))) - ()))\n\n@passages secrets\n\nwhen flag clicked\nhide\n\ndefine level (level)\nif <(level) = [11]> then\n    créer passage [2]\nelse\n    if <(level) = [15]> then\n        créer passage [3]\n    else\n        if <(level) = [17]> then\n            créer passage [4]\n        else\n            if <(level) = [18]> then\n                créer passage [5]\n            else\n                if <(level) = [19]> then\n                    créer passage [6]\n                else\n                    if <(level) = [21]> then\n                        créer passage [7]\n                    else\n                        if <(level) = [23]> then\n                            créer passage [8]\n                        else\n                            if <(level) = [24]> then\n                                créer passage [9]\n                            else\n                                if <(level) = [29]> then\n                                    créer passage [10]\n                                else\n                                    if <(level) = [26]> then\n                                        créer passage [11]\n                                    else\n                                        if <(level) = [28]> then\n                                            créer passage [12]\n                                        end\n                                    end\n                                end\n                            end\n                        end\n                    end\n                end\n            end\n        end\n    end\nend\nset [clone? v] to [a]\n\nwhen I receive [menu v]\ndelete this clone\n\nwhen I receive [play v]\nwait (0.1) seconds\nlevel (#level n°)\n\ndefine créer passage (costume n°)\npoint in direction (90)\nswitch costume to (costume1 v)\nset size to (400) %\nswitch costume to (costume n°)\nset [clone? v] to [1]\ncreate clone of (_myself_ v)\n\nwhen I start as a clone\nset [ghost v] effect to (0)\nshow\n\nwhen I receive [tick v]\nif <(clone?) = [1]> then\n    go to x: (#level x) y: (#level y)\n    if <touching (hitbox v)?> then\n        set [ghost v] effect to (40)\n    else\n        set [ghost v] effect to (0)\n    end\nend\ngo to [front v] layer\n\nstop [all v]\n\nwhen I receive [page mort v]\ndelete this clone\n\nwhen I receive [menu v]\ndelete this clone\n\nif <(level) = [17]> then\n    créer passage [4]\nend\n\n@champi\n\ndefine créer champi en (x) (y) (orientation)\nset [x champi v] to (x)\nset [y champi v] to (y)\npoint in direction (orientation)\ncreate clone of (_myself_ v)\n\ndefine level (level)\nif <(level) = [16]> then\n    créer champi en [-250] [185] [90]\nelse\n    if <(level) = [17]> then\n        créer champi en [780] [625] [90]\n        créer champi en [12] [270] [90]\n    else\n        if <(level) = [19]> then\n            créer champi en [150] [40] [90]\n        else\n            if <(level) = [21]> then\n                créer champi en [400] [-200] [90]\n            else\n                if <(level) = [25]> then\n                    créer champi en [452] [-1050] [90]\n                    créer champi en [740] [172] [90]\n                end\n            end\n        end\n    end\nend\nset [x champi v] to [a]\nset [y champi v] to [a]\n\nwhen I receive [tick v]\nif <not <(x champi) = [a]>> then\n    go to x: ((#level x) - (x champi)) y: ((#level y) - (y champi))\n    if <touching (hitbox v)?> then\n        broadcast (miam champi v)\n        delete this clone\n    end\n    go to [front v] layer\n    set [ghost v] effect to ((((x position) * (x position)) * ((x position) * (x position))) / (41000000))\n    if <([abs v] of ((#level y) - (y champi)) ) > [180]> then\n        set [ghost v] effect to (100)\n    end\nend\n\nwhen I receive [menu v]\ndelete this clone\n\nwhen I receive [page mort v]\ndelete this clone\n\nwhen I start as a clone\nclear graphic effects\nshow\n\nwhen I receive [play v]\nwait (0.1) seconds\nlevel (#level n°)\n\nwhen flag clicked\nhide\n\ncréer champi en [100] [40] [90]\n\n@intro\n\nwhen flag clicked\nhide\ngo to x: (-240) y: (180)\nerase all\npen up\nset pen color to (#ff0000)\nrepeat (12)\n    create clone of (_myself_ v)\n    change x by (44)\n    change pen (color v) by (1.6)\nend\nwait (2) seconds\nbroadcast (intro v)\nstop [other scripts in sprite v]\nset [n intro v] to [0]\nrepeat until <[11] < (n intro)>\n    erase all\n    broadcast (refresh intro v)\nend\nerase all\nbroadcast (Menu v)\n\nwhen I start as a clone\nset [y v] to (pick random (0.0) to (1))\nwait (y) seconds\nset [y v] to ((1000) + ((y) * (300)))\nset pen size to (44)\nrepeat until <(y position) < [-175]>\n    pen down\n    change y by (-10)\nend\n\nwhen I receive [refresh intro v]\npen up\nset y to (-180)\nset [x v] to (x position)\nif <<(x position) < [250]> and <[-181] < (y)>> then\n    pen down\n    set y to (y)\n    change [y v] by (-10)\n    pen up\n    if <(timer) < [5.2]> then\n        fast\n    end\nelse\n    if <(x position) < [250]> then\n        change [n intro v] by (1)\n        delete this clone\n    end\nend\n\nbroadcast (refresh intro v)\n\nwhen I receive [menu v]\ndelete this clone\n\n\n\nwhen I receive [refresh intro v]\nif <not <<(x position) < [250]> and <[-181] < (y)>>> then\n    pen down\n    change y by (-10)\nend\n\ndefine fast\ngo to x: (0) y: (0)\nset size to ((([cos v] of ((timer) * (100)) ) + (1)) * (50)) %\nswitch costume to (sans titre 3 v)\nshow\nset [ghost v] effect to (0)\nstamp\nhide\nswitch costume to (costume1 v)\ngo to x: (x) y: (0)\n\n@blocs\n\nwhen flag clicked\nhide\n\ndefine level (level)\nif <(level) = [18]> then\n    créer bloc en [449] [-100] [100] [1]\n    créer bloc en [410] [-100] [100] [1]\n    créer bloc en [371] [-100] [100] [1]\n    créer bloc en [332] [-100] [100] [1]\nelse\n    if <(level) = [21]> then\n        créer bloc en [300] [110] [100] [1]\n        créer bloc en [269] [110] [100] [1]\n        créer bloc en [532] [0] [70] [1]\n        créer bloc en [532] [-80] [70] [1]\n    else\n        if <(level) = [22]> then\n            créer bloc en [490] [-100] [100] [1]\n            créer bloc en [-640] [-90] [100] [1]\n            créer bloc en [-670] [-90] [100] [1]\n        else\n            if <(level) = [23]> then\n                créer bloc en [200] [-50] [100] [1]\n                créer bloc en [-75] [-120] [500] [2]\n            else\n                if <(level) = [25]> then\n                    créer bloc en [44] [-720] [75] [1]\n                    créer bloc en [156] [-800] [75] [1]\n                    créer bloc en [300] [-880] [75] [1]\n                    créer bloc en [450] [-960] [75] [1]\n                    créer bloc en [700] [780] [75] [1]\n                else\n                    if <(level) = [26]> then\n                        créer bloc en [-264] [-402] [75] [1]\n                        créer bloc en [-240] [-485] [75] [1]\n                        créer bloc en [-280] [-560] [75] [1]\n                        créer bloc en [-300] [-640] [75] [1]\n                    else\n                        if <(level) = [29]> then\n                            créer bloc en [-360] [140] [75] [1]\n                            créer bloc en [-290] [140] [75] [1]\n                        end\n                    end\n                end\n            end\n        end\n    end\nend\nset [x bloc v] to [a]\nset [y bloc v] to [a]\n\nwhen I receive [menu v]\ndelete this clone\n\nwhen I receive [play v]\npoint in direction (90)\nwait (0.1) seconds\nlevel (#level n°)\n\ndefine créer bloc en (x) (y) (taille) (costume)\nset [x bloc v] to (x)\nset [y bloc v] to (y)\nset [chrono v] to [99]\nswitch costume to (costume)\nset size to (taille) %\ncreate clone of (_myself_ v)\n\nwhen I start as a clone\nset [ghost v] effect to (99)\nshow\n\nwhen I receive [tick v]\nif <not <(x bloc) = [a]>> then\n    go to x: ((#level x) - (x bloc)) y: ((#level y) - (y bloc))\n    if <(chrono) = [0]> then\n        set [ghost v] effect to ((((x position) * (x position)) * ((x position) * (x position))) / (35000000))\n    end\nend\n\nwhen I receive [page mort v]\ndelete this clone\n\nwhen I receive [menu v]\ndelete this clone\n\nwhen I receive [bloc touché v]\nset [ghost v] effect to (99)\nset [chrono v] to [99]\nif <<not <(x bloc) = [a]>> and <(chrono) = [99]>> then\n    if <<([abs v] of ((#level x) - (x bloc)) ) < [40]> and <([abs v] of ((#level y) - (y bloc)) ) < [100]>> then\n        set [chrono v] to [0]\n        set [ghost v] effect to (0)\n    end\nend\n\nreset timer\n\nwhen I receive [bloc touché v]\n\ndelete this clone\n\n@tremplin\n\ndefine créer tremplin en (x) (y)\nset [x tremplin v] to (x)\nset [y tremplin v] to (y)\npoint in direction (90)\ncreate clone of (_myself_ v)\n\ndefine level (level)\nif <(level) = [19]> then\n    créer tremplin en [150] [194]\n    créer tremplin en [130] [194]\n    créer tremplin en [110] [194]\n    créer tremplin en [90] [194]\n    créer tremplin en [170] [194]\n    créer tremplin en [190] [194]\n    créer tremplin en [210] [194]\nelse\n    if <(level) = [22]> then\n        créer tremplin en [-748] [13]\n        créer tremplin en [-820] [13]\n        créer tremplin en [-900] [13]\n        créer tremplin en [-748] [-103]\n        créer tremplin en [-820] [-103]\n        créer tremplin en [-900] [-103]\n        créer tremplin en [-748] [-203]\n        créer tremplin en [-820] [-203]\n        créer tremplin en [-900] [-203]\n        créer tremplin en [-748] [-303]\n        créer tremplin en [-820] [-303]\n        créer tremplin en [-900] [-303]\n    else\n        if <(level) = [25]> then\n            créer tremplin en [-556] [-57]\n        else\n            if <(level) = [29]> then\n                créer tremplin en [610] [303]\n                créer tremplin en [570] [303]\n                créer tremplin en [530] [303]\n                créer tremplin en [490] [303]\n                créer tremplin en [450] [303]\n                créer tremplin en [410] [303]\n                créer tremplin en [370] [303]\n                créer tremplin en [330] [303]\n                créer tremplin en [290] [303]\n                créer tremplin en [250] [303]\n                créer tremplin en [210] [303]\n                créer tremplin en [170] [303]\n                créer tremplin en [130] [303]\n                créer tremplin en [90] [303]\n                créer tremplin en [50] [303]\n                créer tremplin en [10] [303]\n                créer tremplin en [-590] [303]\n                créer tremplin en [-550] [303]\n                créer tremplin en [-510] [303]\n                créer tremplin en [-470] [303]\n                créer tremplin en [-430] [303]\n                créer tremplin en [-390] [303]\n                créer tremplin en [-350] [303]\n                créer tremplin en [-310] [303]\n                créer tremplin en [-270] [303]\n                créer tremplin en [-230] [303]\n                créer tremplin en [-190] [303]\n                créer tremplin en [-150] [303]\n                créer tremplin en [-110] [303]\n                créer tremplin en [-70] [303]\n                créer tremplin en [-30] [303]\n                créer tremplin en [-690] [230]\n                créer tremplin en [-788] [20]\n                créer tremplin en [-788] [-100]\n                créer tremplin en [-788] [-300]\n                créer tremplin en [-750] [-450]\n            else\n                if <(level) = [27]> then\n                    créer tremplin en [-932] [9]\n                else\n                    if <(level) = [26]> then\n                        créer tremplin en [-524] [-153]\n                        créer tremplin en [-524] [-253]\n                        créer tremplin en [-524] [-353]\n                    end\n                end\n            end\n        end\n    end\nend\nset [x tremplin v] to [a]\nset [y tremplin v] to [a]\n\nwhen I receive [tick v]\nif <not <(x tremplin) = [a]>> then\n    go to x: ((#level x) - (x tremplin)) y: ((#level y) - (y tremplin))\n    go to [front v] layer\n    set [ghost v] effect to ((((x position) * (x position)) * ((x position) * (x position))) / (41000000))\n    if <([abs v] of (y position) ) > [180]> then\n        set [ghost v] effect to (100)\n    end\nend\n\nwhen I receive [menu v]\ndelete this clone\n\nwhen I receive [page mort v]\ndelete this clone\n\nwhen I start as a clone\nclear graphic effects\nshow\n\nwhen I receive [play v]\nwait (0.1) seconds\nlevel (#level n°)\n\nwhen flag clicked\nhide\n\nwhen I receive [tremplin touché v]\nif <not <(x tremplin) = [a]>> then\n    if <<([abs v] of ((#level x) - (x tremplin)) ) < [20]> and <([abs v] of ((#level y) - (y tremplin)) ) < [150]>> then\n        repeat until <(costume [number v]) = [4]>\n            next costume\n        end\n        wait (0.5) seconds\n        repeat until <(costume [number v]) = [1]>\n            switch costume to ((costume [number v]) - (1))\n        end\n    end\nend\n\nstop [all v]\n\nif <(level) = [26]> then\n\ncréer tremplin en [548] [230]\ncréer tremplin en [444] [97]\ncréer tremplin en [556] [-35]\ncréer tremplin en [180] [96]\ncréer tremplin en [-36] [-36]\ncréer tremplin en [-188] [-168]\n\n@block chrono\n\nwhen flag clicked\nhide\n\ndefine level (level)\nif <(level) = [27]> then\n    créer block chrono [2] [0.8] [0]\n    créer block chrono [3] [0.8] [0.5]\nend\nset [clone? v] to [a]\n\nwhen I receive [menu v]\nhide\ndelete this clone\n\nwhen I receive [play v]\nwait (0.1) seconds\nlevel (#level n°)\n\ndefine créer block chrono (costume n°) (fréquence) (+)\npoint in direction (90)\nswitch costume to (costume1 v)\nset size to (400) %\nswitch costume to (costume n°)\nset [clone? v] to [1]\nset [fréquence v] to (fréquence)\nset [+ v] to (+)\ncreate clone of (_myself_ v)\n\nwhen I start as a clone\nset [ghost v] effect to (0)\nshow\n\nwhen I receive [tick v]\nif <(clone?) = [1]> then\n    go to x: (#level x) y: (#level y)\n    if <((((timer) + ((+) * (fréquence))) mod (fréquence)) / (0.5)) < (fréquence)> then\n        show\n    else\n        hide\n    end\nend\ngo to [front v] layer\n\nstop [all v]\n\nwhen I receive [page mort v]\ndelete this clone\n\nwhen I receive [menu v]\ndelete this clone\n\n@Sprite1\n\nwhen I receive [tick v]\nif <(#level n°) = [28]> then\n    set size to (400) %\n    show\n    go to x: ((#level x) - (30)) y: ((#level y) - (190))\n    set [ghost v] effect to ((((x position) * (x position)) * ((x position) * (x position))) / (41000000))\n    if <<([abs v] of ((#level y) - (190)) ) > [180]> or <([abs v] of (x position) ) > [240]>> then\n        hide\n    else\n        if <<touching (mouse-pointer v)?> and <mouse down?>> then\n            set [#level x v] to [-688]\n            set [#level y v] to [-500]\n            set [yv v] to [20]\n        end\n    end\nelse\n    hide\nend\n\nset [ghost v] effect to (100)\n\n@Sprite2\n\nwhen flag clicked\nhide\nset size to (100) %\ngo to x: (0) y: (0)\nshow\nforever\n    set [ghost v] effect to (100)\n    go to [front v] layer\nend\n\n@Sprite3\n\nwhen I receive [menu v]\ncreate clone of (_myself_ v)\ngo to x: (198) y: (-147)\nforever\n    show\n    go to [front v] layer\n    switch costume to (Mode)\nend\n\nwhen flag clicked\nset [mode v] to [1]\nhide\n\nwhen I receive [easy v]\nhide\nstop [other scripts in sprite v]\ndelete this clone\n\nwhen I receive [hard v]\nhide\nstop [other scripts in sprite v]\ndelete this clone\n\nwhen I receive [medium v]\nhide\nstop [other scripts in sprite v]\ndelete this clone\n\nwhen I start as a clone\ngo to x: (198) y: (-160)\nforever\n    show\n    go to [front v] layer\n    go [forward v] (1) layers\n    switch costume to ((Mode) + (2))\n    if <<mouse down?> and <touching (mouse-pointer v)?>> then\n        set [mode v] to (((Mode) mod (2)) + (1))\n        switch costume to ((Mode) + (2))\n        wait until <<not <touching (mouse-pointer v)?>> or <not <mouse down?>>>\n    end\nend\n\n@joystick\n\nwhen I receive [play v]\nif <(Mode) = [2]> then\n    show\n    switch costume to (1 vide v)\n    go to x: (155) y: (-175)\n    set [clone? v] to [1]\n    create clone of (_myself_ v)\n    set [clone? v] to [0]\n    set size to (175) %\nend\n\nwhen flag clicked\nhide\n\nwhen I receive [tick v]\nif <(Mode) = [2]> then\n    go to [front v] layer\n    go [forward v] (1) layers\n    if <(clone?) = [0]> then\n        go to x: (155) y: (-175)\n        show\n    else\n        go to x: (155) y: (-175)\n        switch costume to (1 vide2 v)\n        set [x phone v] to [0]\n        set [y phone v] to [0]\n        if <mouse down?> then\n            point towards (mouse-pointer v)\n            move (75) steps\n            set [x phone v] to (round (((x position) - (155)) / (75)))\n            set [y phone v] to (round ([abs v] of (((y position) - (-175)) / (75)) ))\n        end\n    end\nend\n\nwhen I receive [page mort v]\nhide\nstop [other scripts in sprite v]\ndelete this clone\n\nchange [#level x v] by (-500)\n\nwhen I receive [menu v]\nhide\nstop [other scripts in sprite v]\ndelete this clone\n\nwhen I receive [easy v]\nstop [other scripts in sprite v]\nhide\ndelete this clone\n\nwhen I receive [hard v]\nstop [other scripts in sprite v]\nhide\ndelete this clone\n\nwhen I receive [medium v]\nhide\nstop [other scripts in sprite v]\ndelete this clone\n\nchange [brightness v] effect by (25)\n\nset [ghost v] effect to (25)\n\ngo [forward v] (1) layers\n\n@Sprite4\n\nwhen I receive [win v]\nshow\ngo to x: (0) y: (-100)\nset [t v] to ((timer) * (30))\nset size to (2) %\nforever\n    set size to (([sin v] of (((timer) * (30)) - (t)) ) * (140)) %\n    go to [front v] layer\n    go [backward v] (1) layers\nend\n\nwhen I receive [page mort v]\nhide\nstop [other scripts in sprite v]\n\nwhen flag clicked\nhide\n\n@Sprite5\n\nwhen I receive [mort v]\nshow\ngo to x: (0) y: (-100)\nset [t v] to ((timer) * (30))\nset size to (2) %\nforever\n    set size to (([sin v] of (((timer) * (30)) - (t)) ) * (140)) %\n    go to [front v] layer\n    go [backward v] (1) layers\nend\n\nwhen I receive [page mort v]\nhide\nstop [other scripts in sprite v]\n\nwhen flag clicked\nhide\n\n