Arkanoid

[bits 16]
[org 100h]

[segment .text]
start:
mov ax,13h ; mode 13h
int 10h
mov ax,0a000h ; adresse video
mov es,ax ; adresse video dans segment es
    call affiche_fond ; affichage du fond avec les vies
    ; call affiche_briquesL1 ; affichage du tableau des briques
    boucle:
    push word 6
    call printLvl
    call affiche_raquette ; affichage de la raquette
    call affiche_balle   ; affichage de la balle
    call deplace_balle  ; déplacer la balle
    call affiche_score

           ; ------- gestion du clavier ----------
            mov ah, 1
            int 16h
            jnz keyIn
           ; -------------------------------------
           jmp boucle

; déplacement de la raquette à droite
droite:
     ; A compléter
    add word [xr], 3
    cmp word [xr], 187
    jl boucle
    sub word [xr], 3
    jmp boucle

; déplacement de la raquette à gauche
gauche:
     ; A compléter
    sub word [xr], 3
    cmp word [xr], 38
    jg boucle
    add word [xr], 3
    jmp boucle

fin:
mov ax, 3h      ; retour mode console
int 10h
mov ax,04c00h   ; rends la main au DOS
int 21h

affiche_sprite: ;routine d'affichage d'un sprite
    push ax
    push bx
    push cx
    push dx
    push di

    mov bx,[add_sprite]
    mov ax,[y]
    mov cx,320
    mul cx
    mov dx,[x]
    add dx,ax
    mov di,dx
    mov cx,[h]
    ligne:
    push cx
    mov cx,[l]
        col:
            mov al,[bx]
            stosb ;equivalent à mov [es:di],al
            inc bx
        loop col
        sub di,[l]
        add di,320
    pop cx
    loop ligne

    pop di
    pop dx
    pop cx
    pop bx
    pop ax
ret

affiche_raquette:
     ; A compléter
     push ax
     mov word [add_sprite], raquette
     mov word [l], 31
     mov word [h], 8
     mov ax, [xr]
     mov [x], ax
     mov word [y], 175
     call affiche_sprite
     pop ax
ret

affiche_balle:
     ; A compléter
     mov word [add_sprite], balle
     mov word [l], 7
     mov word [h], 7
     mov ax, [xb]
     mov word [x], ax
     mov ax, [yb]
     mov word [y], ax
     call affiche_sprite

ret

deplace_balle:
     ; A compléter

     mov al, [waitKey]
     test al, al
     jz dplBallContinue

     mov ax, [xr]
     add ax, 2
     mov bx, 169
     mov word [xb], ax
     mov word [yb], bx

     jmp endDplBalle


     dplBallContinue:
     xor ah, ah                 ; gestion temporisation déplacement
     int 1Ah
     mov ax, [top_balle]
     cmp dx, ax
     jb endDplBalle
     add dx, 1
     mov [top_balle], dx

     mov ax, [sensxb]
     dec word [xb]
     test ax, ax
     jz dplBallY
     add word [xb], 2

     dplBallY:
     mov ax, [sensyb]
     inc word [yb]
     test ax, ax
     jz checkBallLimits
     sub word [yb], 2

     checkBallLimits:
        mov ax, [xb]
        cmp ax, 209
        jb checkXBallMin
        mov word [sensxb], 0

        checkXBallMin:
        mov ax, [xb]
        cmp ax, 40
        ja checkYBallMin
        mov word [sensxb], 1

        checkYBallMin:
        mov ax, [yb]
        cmp ax, 8
        ja checkYBallMax
        mov word [sensyb], 0

        checkYBallMax:
        mov ax, [yb]
        cmp ax, 184
        jb checkBatColliReal
        mov word [yb], 184

    checkBatColliReal:
        mov ax, [yb]
        cmp ax, 168
        jb endDplBalle

        mov ax, [xb]
        mov bx, [xr]
        cmp ax, bx
        jb checkBatColliLeft
        jmp checkBatColliRight

        checkBatColliLeft:
        add ax, 4
        cmp ax, bx
        jbe looseProcess
        jmp BallColliBat

        checkBatColliRight:
        add bx, 28
        cmp ax, bx
        jae looseProcess

        BallColliBat:
        mov word [sensyb], 1
        add word [score], 10
        jmp endDplBalle

     endDplBalle:
ret

looseProcess:
     mov word [add_sprite], balle_masque
     mov word [l], 7
     mov word [h], 7
     mov ax, [xb]
     mov bx, [yb]
     mov [x], ax
     mov [y], bx
     call affiche_sprite

     mov word [xb], 112
     mov word [yb], 169
     mov word [sensxb], 1
     mov word [sensyb], 1
     dec byte [nb_vies]
     mov al, [nb_vies]
     cmp al, 2
     jne looseProcess2
     call efface_vie2

     looseProcess2:
     cmp al, 1
     jne looseProcess3
     call efface_vie1

     looseProcess3:
     test al, al
     jz gameOverProcess

     mov ax, [xr]
     add ax, 2
     mov bx, 169
     mov word [xb], ax
     mov word [yb], bx
     mov byte [waitKey], 1

     jmp boucle


gameOverProcess:
     mov word [add_sprite], gameover_texte
     mov word [l], 78
     mov word [h], 6
     mov word [x], 90
     mov word [y], 150
     call affiche_sprite
     call efface_raq
     xor ax, ax
     int 16h
     jmp fin


affiche_score:
     ; A compléter
     mov word [add_sprite], score_texte
     mov word [l], 39
     mov word [h], 8
     mov word [x], 245
     mov word [y], 52
     call affiche_sprite

     mov word [x], 281
     mov word [y], 63
     mov cx, 6
     mov ax, [score]
     mov bx, 10
     scoreDigit:
        xor dx, dx
        div bx
        push ax
        mov ax, zero
        test dx, dx
        jz afficheChiffre
        mov ax, un
        cmp dx, 1
        je afficheChiffre
        mov ax, deux
        cmp dx, 2
        je afficheChiffre
        mov ax, trois
        cmp dx, 3
        je afficheChiffre
        mov ax, quatre
        cmp dx, 4
        je afficheChiffre
        mov ax, cinq
        cmp dx, 5
        je afficheChiffre
        mov ax, six
        cmp dx, 6
        je afficheChiffre
        mov ax, sept
        cmp dx, 7
        je afficheChiffre
        mov ax, huit
        cmp dx, 8
        je afficheChiffre
        mov ax, neuf
        cmp dx, 9
        je afficheChiffre

        afficheChiffre:
            mov word [add_sprite], ax
            mov word [l], 6
            mov word [h], 6
            call affiche_sprite
            sub word [x], 8
            pop ax
            loop scoreDigit

ret

affiche_briquesL1: ; affichage des briques du niveau 1
     ; A compléter
ret

affiche_fond:
     ; A compléter
     push word 32
     call wallStruct
     push word 216
     call wallStruct
     mov word [add_sprite], mur3
     mov word [l], 6
     mov word [h], 7
     mov word [x], 33
     mov word [y], 1
     call affiche_sprite
     mov word [add_sprite], mur5
     mov word [l], 41
     mov word [h], 6
     mov word [x], 39
     mov word [y], 1
     call affiche_sprite
     mov word [add_sprite], mur7
     mov word [l], 25
     mov word [h], 8
     mov word [x], 80
     mov word [y], 0
     call affiche_sprite
     mov word [add_sprite], mur6
     mov word [l], 47
     mov word [h], 6
     mov word [x], 105
     mov word [y], 1
     call affiche_sprite
     mov word [add_sprite], mur7
     mov word [l], 25
     mov word [h], 8
     mov word [x], 152
     mov word [y], 0
     call affiche_sprite
     mov word [add_sprite], mur6
     mov word [l], 47
     mov word [h], 6
     mov word [x], 177
     mov word [y], 1
     call affiche_sprite
     mov word [add_sprite], mur4
     mov word [l], 7
     mov word [h], 7
     mov word [x], 217
     mov word [y], 1
     call affiche_sprite
     mov word [add_sprite], vie
     mov word [l], 12
     mov word [h], 3
     mov word [x], 48
     mov word [y], 193
     call affiche_sprite
     mov word [add_sprite], vie
     mov word [l], 12
     mov word [h], 3
     mov word [x], 63
     mov word [y], 193
     call affiche_sprite

     mov word [add_sprite], titre
     mov word [l], 63
     mov word [h], 14
     mov word [x], 236
     mov word [y], 20
     call affiche_sprite
     mov word [add_sprite], round
     mov word [l], 39
     mov word [h], 8
     mov word [x], 244
     mov word [y], 115
     call affiche_sprite

ret

wallStruct:
    pop ax
    pop word [x]
    push ax
    mov cx, 4
    mov word [y], 174

    wallBlock:
        push cx
        inc word [x]
        mov word [add_sprite], mur1
        mov word [l], 6
        mov word [h], 22
        call affiche_sprite
        dec word [x]
        sub word [y], 24
        mov word [add_sprite], mur2
        mov word [l], 8
        mov word [h], 23
        call affiche_sprite
        sub word [y], 23
        pop cx

        loop wallBlock

    ret


efface_vie1:
     ; A compléter
    push ax
    push bx
    push di
    push cx

    mov ax, 193
    mov bx, 320
    mul bx
    add ax, 48
    mov di, ax
    mov al, 0       ; black color to erase
    mov cx, 3
    effaceVie1col:
        push cx
        mov cx, 12
        effaceVie1line:
            stosb
            loop effaceVie1line
        pop cx
        add di, 308
        loop effaceVie1col
    pop cx
    pop di
    pop bx
    pop ax
ret

efface_vie2:
     ; A compléter
    push ax
    push bx

    mov ax, 193
    mov bx, 320
    mul bx
    add ax, 63
    mov di, ax
    mov al, 0       ; black color to erase
    mov cx, 3
    effaceVie2col:
        push cx
        mov cx, 12
        effaceVie2line:
            stosb
            loop effaceVie2line
        pop cx
        add di, 308
        loop effaceVie2col
    pop bx
    pop ax
ret

efface_raq:
     ; A compléter
    push ax
    push bx

    mov ax, 175
    mov bx, 320
    mul bx
    add ax, [xr]
    mov di, ax
    mov al, 0       ; black color to erase
    mov cx, 8
    efface_raq2col:
        push cx
        mov cx, 31
        efface_raq2line:
            stosb
            loop efface_raq2line
        pop cx
        add di, 289
        loop efface_raq2col
    pop bx
    pop ax
ret

gameover:
  ; A compléter
ret


keyIn:
    mov byte [waitKey], 0
    xor ax, ax
    int 16h
    cmp ah, 4Bh
    je gauche
    cmp ah, 4Dh
    je droite
    cmp ah, 1h
    je fin
jmp boucle


printLvl:
    pop bx
    pop cx  ;   1 param : Height
    push bx

    push cx

    printLvlHeight:
        mov si, sp
        mov ax, [si]    ; get height
        sub ax, cx
        mov bx, 8
        mul bx
        add ax, [ytab]
        mov [y], ax

        push cx
        mov cx, 11

        printLvlWidth:
            mov ax, 16
            mov bx, 11
            sub bx, cx
            mul bx
            add ax, [xtab]

            mov si, sp
            mov dx, [si]    ; get cur height index
            mov bx, [si+2]  ; get height
            sub bx, dx
            push bx
            push ax
            pop bx
            pop ax
            mov dx, 11
            mul dx
            mov dx, 11
            sub dx, cx
            add ax, dx
            mov [x], bx

            mov dx, tabNiv1
            add dx, ax
            mov si, dx
            mov al, [si]
            jmp printLvlNoJmploopMiddle

            printLvlHeightJmploopMiddle:
            jmp printLvlHeight

            printLvlWidthJmploopMiddle:
            jmp printLvlWidth

            printLvlNoJmploopMiddle:
            mov dx, briqueGrise
            cmp al, 7
            je printLvlBlock

            mov dx, briqueRouge
            cmp al, 4
            je printLvlBlock

            mov dx, briqueJaune1
            cmp al, 14
            je printLvlBlock

            mov dx, briqueBleue
            cmp al, 9
            je printLvlBlock

            mov dx, briqueRose
            cmp al, 13
            je printLvlBlock

            mov dx, briqueVerte
            cmp al, 10
            je printLvlBlock

            mov dx, briqueNoire
            test al, al
            jz printLvlBlock

            mov dx, briqueBlanche
            cmp al, 15
            je printLvlBlock

            ;   if reached, invalid color block


            printLvlBlock:
            mov word [add_sprite], dx
            mov word [l], 15
            mov word [h], 7
            call affiche_sprite

            loop printLvlWidthJmploopMiddle
        pop cx
        loop printLvlHeightJmploopMiddle


    add sp, 2

ret


[segment .data]
;ensemble des variables
score dw 0xFFF6 ;score max=65536 - 1
highScore dw 0 ;score max=65536 - 1
xc dw 283 ; position x du score
nb_vies db 3 ;nb de vies
lb dw 17 ;largeur brique+1
hb dw 8 ; hauteur brique+1
ltab dw 11 ;largeur du tableau
randomize db 0 ;tirage aléatoire pour décaler d'un pixel la balle
couleur db 0
add_sprite dw 0 ;adresse d'un sprite à afficher
xr dw 110 ;position x de la raquette
xb dw 112 ;position x de la balle
yb dw 169 ;position y de la balle
sensyb dw 1;sens deplacement balle
sensxb dw 1;sens deplacement balle
x dw 0 ;parametre x de la routine d'affichage de sprite
y dw 0 ;parametre y de la routine d'affichage de sprite
h dw 0 ;hauteur du sprite à afficher dans la routine d'affichage
l dw 0 ;largeur du sprite à afficher dans la routine d'affichage
h_tabNiv1 dw 6 ;nb de briques vertical niv 1
l_tabNiv1 dw 11 ;nb de briques horizontal niv 1
nb_briques dw 0 ;nb de brique du niveau en cours
xtab dw 41 ;x du tableau de briques
ytab dw 33 ;y du tableau de briques
v_balle_cpt dw 40 ;compteur pour la vitesse de la balle
v_balle dw 40 ;vitesse de la balle
qx dw 0 ;quotient en x pour déterminer l'abscisse de la brique touchée
qy dw 0 ;quotient en y pour déterminer l'abscisse de la brique touchée
top_balle dw 0
waitKey db 0

raquette db 00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00
         db 00,00,00,00,00,04,04,00,07,07,07,07,07,07,07,07,07,07,07,07,07,07,07,00,04,04,00,00,00,00,00
         db 00,00,00,00,04,12,12,00,15,15,15,15,15,15,15,15,15,15,15,15,15,15,15,00,12,12,04,00,00,00,00
         db 00,00,00,09,12,04,04,00,07,07,07,07,07,07,07,07,07,07,07,07,07,07,07,00,04,04,04,09,00,00,00
         db 00,00,00,09,04,04,04,00,07,07,07,07,07,07,07,07,07,07,07,07,07,07,07,00,04,04,04,09,00,00,00
         db 00,00,00,00,04,04,04,00,07,07,07,07,07,07,07,07,07,07,07,07,07,07,07,00,04,04,04,00,00,00,00
         db 00,00,00,00,00,04,04,00,08,08,08,08,08,08,08,08,08,08,08,08,08,08,08,00,04,04,00,00,00,00,00
         db 00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00

balle db 00,00,00,00,00,00,00
      db 00,00,07,07,07,00,00
      db 00,07,15,15,07,08,00
      db 00,07,15,07,07,08,00
      db 00,07,07,07,08,08,00
      db 00,00,08,08,08,00,00
      db 00,00,00,00,00,00,00

balle_masque db 00,00,00,00,00,00,00
             db 00,00,00,00,00,00,00
             db 00,00,00,00,00,00,00
             db 00,00,00,00,00,00,00
             db 00,00,00,00,00,00,00
             db 00,00,00,00,00,00,00
             db 00,00,00,00,00,00,00


mur1 db 07,15,07,08,08,08
     db 07,15,07,08,08,07
     db 07,15,07,08,08,07
     db 07,15,07,08,08,07
     db 07,15,07,08,08,07
     db 07,15,07,08,08,07
     db 07,15,07,08,08,07
     db 07,15,07,08,08,07
     db 07,15,07,08,08,07
     db 07,15,07,08,08,07
     db 07,15,07,08,08,07
     db 07,15,07,08,08,07
     db 07,15,07,08,08,07
     db 07,15,07,08,08,07
     db 07,15,07,08,08,07
     db 07,15,07,08,08,07
     db 07,15,07,08,08,07
     db 07,15,07,08,08,07
     db 07,15,07,08,08,07
     db 07,15,07,08,08,07
     db 07,15,07,08,08,07
     db 07,15,07,08,08,07
     db 07,15,07,08,08,07

mur2 db 00,07,15,07,08,07,07,00
     db 07,15,15,07,08,08,07,07
     db 07,15,15,07,08,08,07,07
     db 07,15,15,07,08,08,07,07
     db 07,15,15,07,08,08,07,07
     db 07,15,15,07,08,08,07,07
     db 07,15,15,07,08,08,07,07
     db 07,15,15,07,08,08,07,07
     db 00,08,00,08,00,00,08,00
     db 07,15,15,07,08,08,07,07
     db 00,08,00,08,00,00,08,00
     db 07,15,15,07,08,08,07,07
     db 00,08,00,08,00,00,08,00
     db 07,15,15,07,08,08,07,07
     db 00,08,00,08,00,00,08,00
     db 07,15,15,07,08,08,07,07
     db 07,15,15,07,08,08,07,07
     db 07,15,15,07,08,08,07,07
     db 07,15,15,07,08,08,07,07
     db 07,15,15,07,08,08,07,07
     db 07,15,15,07,08,08,07,07
     db 07,15,15,07,08,08,07,07
     db 00,07,15,07,08,08,08,00

mur3 db 00,00,07,07,07,07
     db 00,07,07,15,15,15
     db 07,07,07,07,07,07
     db 07,15,07,07,07,07
     db 07,15,07,07,07,08
     db 07,15,07,07,07,08
     db 07,15,15,07,07,08

mur4 db 07,07,07,07,00,00,00
     db 15,15,15,15,07,00,00
     db 07,07,07,07,15,07,00
     db 08,08,08,08,07,07,00
     db 08,08,07,08,08,07,00
     db 08,07,07,08,08,07,00
     db 07,15,07,07,08,07,00

mur5 db 07,07,07,07,07,07,07,07,07,07,07,07,07,07,07,07,07,07,07,07,07,07,07,07,07,07,07,07,07,07,07,07,07,07,07,07,07,07,07,07,07
     db 15,15,15,15,15,15,15,15,15,15,15,15,15,15,15,15,15,15,15,15,15,15,15,15,15,15,15,15,15,15,15,15,15,15,15,15,15,15,15,15,15
     db 07,07,07,07,07,07,07,07,07,07,07,07,07,07,07,07,07,07,07,07,07,07,07,07,07,07,07,07,07,07,07,07,07,07,07,07,07,07,07,07,07
     db 07,07,07,07,07,07,07,07,07,07,07,07,07,07,07,07,07,07,07,07,07,07,07,07,07,07,07,07,07,07,07,07,07,07,07,07,07,07,07,07,07
     db 08,08,08,08,08,08,08,08,08,08,08,08,08,08,08,08,08,08,08,08,08,08,08,08,08,08,08,08,08,08,08,08,08,08,08,08,08,08,08,08,08
     db 08,08,08,08,08,08,08,08,08,08,08,08,08,08,08,08,08,08,08,08,08,08,08,08,08,08,08,08,08,08,08,08,08,08,08,08,08,08,08,08,08

mur6 db 07,07,07,07,07,07,07,07,07,07,07,07,07,07,07,07,07,07,07,07,07,07,07,07,07,07,07,07,07,07,07,07,07,07,07,07,07,07,07,07,07,07,07,07,07,07,07
     db 07,15,15,15,15,15,15,15,15,15,15,15,15,15,15,15,15,15,15,15,15,15,15,15,15,15,15,15,15,15,15,15,15,15,15,15,15,15,15,15,15,15,15,15,15,15,15
     db 07,07,07,07,07,07,07,07,07,07,07,07,07,07,07,07,07,07,07,07,07,07,07,07,07,07,07,07,07,07,07,07,07,07,07,07,07,07,07,07,07,07,07,07,07,07,07
     db 08,08,08,08,08,08,08,08,08,08,08,08,08,08,08,08,08,08,08,08,08,08,08,08,08,08,08,08,08,08,08,08,08,08,08,08,08,08,08,08,08,08,08,08,08,08,08
     db 08,08,08,08,08,08,08,08,08,08,08,08,08,08,08,08,08,08,08,08,08,08,08,08,08,08,08,08,08,08,08,08,08,08,08,08,08,08,08,08,08,08,08,08,08,08,08
     db 08,08,08,08,08,08,08,08,08,08,08,08,08,08,08,08,08,08,08,08,08,08,08,08,08,08,08,08,08,08,08,08,08,08,08,08,08,08,08,08,08,08,08,08,08,08,08

mur7 db 00,00,07,07,07,07,07,07,07,00,07,00,07,00,07,00,07,07,07,07,07,07,07,00,00
     db 00,07,15,15,15,15,15,15,15,08,15,08,15,08,15,08,15,15,15,15,15,15,15,07,00
     db 00,15,15,15,15,15,15,15,15,00,15,00,15,00,15,00,15,15,15,15,15,15,15,15,00
     db 00,07,07,07,07,07,07,07,07,08,07,08,07,08,07,08,07,07,07,07,07,07,07,07,00
     db 00,07,08,08,08,08,08,08,08,00,08,00,08,00,08,00,08,08,08,08,08,08,08,08,00
     db 00,07,07,08,08,08,08,08,08,00,08,00,08,00,08,00,08,08,08,08,08,08,08,08,00
     db 00,07,07,07,07,07,07,07,07,08,07,08,07,08,07,08,07,07,07,07,07,07,08,08,00
     db 00,00,07,07,07,07,07,07,07,00,07,00,07,00,07,00,07,07,07,07,07,07,07,00,00

vie db 00,04,07,07,07,07,07,07,07,15,04,00
    db 09,04,07,07,07,07,07,07,07,07,04,09
    db 00,04,08,08,08,08,08,08,08,08,04,00

viemasque db 00,00,00,00,00,00,00,00,00,00,00,00
          db 00,00,00,00,00,00,00,00,00,00,00,00
          db 00,00,00,00,00,00,00,00,00,00,00,00

titre db 00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,15,00,00,00,00
      db 00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,15,12,15,00,00,00
      db 00,00,00,00,00,00,00,00,15,00,00,00,00,15,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,15,15,00,00,00,00,00,00,00,00,00,15,15,15,15,15,00,00,15,15,15,15,15,15,12,12,12,15,00,00
      db 00,00,00,00,00,00,00,15,15,15,15,15,15,12,15,00,00,15,15,15,15,00,00,15,00,00,00,00,00,00,00,00,15,15,12,15,00,00,15,15,15,15,00,15,12,12,12,12,12,15,00,15,12,12,15,12,12,15,12,12,12,15,00
      db 00,00,00,00,00,00,15,12,15,12,12,15,12,12,12,15,00,15,12,12,15,00,15,12,15,00,00,00,00,00,00,15,12,15,12,12,15,00,15,12,12,15,15,12,12,12,12,12,12,12,15,15,04,04,15,04,04,15,15,04,04,04,15
      db 00,00,00,00,00,15,04,04,15,04,04,15,15,04,04,04,15,15,04,04,15,15,04,04,04,15,00,00,00,00,15,04,04,15,04,04,04,15,15,04,04,15,04,04,04,15,15,15,04,04,04,15,04,04,15,04,04,15,04,04,04,15,00
      db 00,00,00,00,15,04,04,04,15,04,04,15,04,04,04,15,00,15,04,04,15,04,04,04,15,00,00,00,00,15,04,04,04,15,04,04,04,04,15,04,04,15,04,04,15,00,00,00,15,04,04,15,04,04,15,04,04,04,04,04,15,00,00
      db 00,00,00,15,01,01,01,01,15,01,01,01,01,01,15,00,00,15,01,01,01,01,01,15,00,00,00,00,15,01,01,01,01,15,01,01,01,01,01,01,01,15,01,01,15,00,00,00,15,01,01,15,01,01,15,01,01,01,01,15,00,00,00
      db 00,00,15,01,01,01,01,01,15,01,01,01,01,15,00,00,00,15,01,01,01,01,15,00,00,00,00,15,01,01,01,01,01,15,01,01,01,01,01,01,01,15,01,01,15,00,00,00,15,01,01,15,01,01,15,01,01,01,15,00,00,00,00
      db 00,15,01,01,01,15,01,01,15,01,01,01,01,01,15,00,00,15,01,01,01,01,01,15,00,00,15,01,01,01,15,01,01,15,01,01,15,01,01,01,01,15,01,01,01,15,15,15,01,01,01,15,01,01,15,01,01,15,00,00,00,00,00
      db 15,00,00,00,15,15,00,00,15,00,00,15,00,00,00,15,00,15,00,00,15,00,00,00,15,15,00,00,00,15,15,00,00,15,00,00,15,15,00,00,00,15,15,00,00,00,00,00,00,00,15,15,00,15,15,00,15,00,00,00,00,00,00
      db 00,15,00,00,00,15,00,00,15,00,15,00,15,00,00,00,15,15,00,15,00,15,00,00,00,15,15,00,00,00,15,00,00,15,00,00,15,00,15,00,15,00,00,15,00,00,00,00,00,15,00,15,15,00,15,15,00,00,00,00,00,00,00
      db 00,00,15,00,15,15,15,15,15,15,00,00,00,15,00,15,00,15,15,00,00,00,15,00,15,00,00,15,00,15,15,15,15,15,15,15,15,00,00,15,00,00,00,00,15,15,15,15,15,00,00,15,00,00,15,00,00,00,00,00,00,00,00
      db 00,00,00,15,00,00,00,00,15,00,00,00,00,00,15,00,00,15,00,00,00,00,00,15,00,00,00,00,15,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00

score_texte db 00,07,07,07,07,00,00,00,00,00,07,07,07,07,00,00,00,00,07,07,07,00,00,00,07,07,07,07,07,07,00,00,07,07,07,07,07,07,07
            db 07,09,09,09,09,07,00,00,00,07,09,09,09,09,07,00,00,07,09,09,09,07,00,00,09,09,09,09,09,09,07,00,09,09,09,09,09,09,09
            db 09,09,07,00,09,09,00,00,07,09,09,00,00,09,09,00,07,09,09,00,09,09,07,00,00,09,09,00,00,09,09,00,00,09,09,00,07,00,09
            db 09,09,09,07,00,00,00,00,09,09,00,00,00,00,00,00,09,09,00,00,00,09,09,00,00,09,09,07,07,09,09,00,00,09,09,07,09,00,00
            db 00,09,09,09,07,07,00,00,09,09,00,00,00,00,00,00,09,09,00,00,00,09,09,00,00,09,09,09,09,09,00,00,00,09,09,09,09,00,00
            db 07,07,00,09,09,09,00,00,09,09,07,00,00,07,07,00,09,09,07,00,07,09,09,00,00,09,09,00,09,09,07,00,00,09,09,00,09,00,07
            db 09,09,07,07,09,09,00,00,00,09,09,07,07,09,09,00,00,09,09,07,09,09,00,00,07,09,09,00,00,09,09,00,07,09,09,07,07,07,09
            db 00,09,09,09,09,00,00,00,00,00,09,09,09,09,00,00,00,00,09,09,09,00,00,00,09,09,09,00,00,09,09,00,09,09,09,09,09,09,09

round db 07,07,07,07,07,07,00,00,00,00,07,07,07,00,00,00,07,07,00,00,07,07,00,00,07,07,00,00,00,07,07,00,07,07,07,07,07,00,00
      db 13,13,13,13,13,13,07,00,00,07,13,13,13,07,00,00,13,13,00,00,13,13,00,00,13,13,07,00,00,13,13,00,13,13,13,13,13,07,00
      db 00,13,13,00,00,13,13,00,07,13,13,00,13,13,07,00,13,13,00,00,13,13,00,00,13,13,13,07,00,13,13,00,00,13,13,00,13,13,07
      db 00,13,13,07,07,13,13,00,13,13,00,00,00,13,13,00,13,13,00,00,13,13,00,00,13,13,13,13,07,13,13,00,00,13,13,00,00,13,13
      db 00,13,13,13,13,13,00,00,13,13,00,00,00,13,13,00,13,13,00,00,13,13,00,00,13,13,00,13,13,13,13,00,00,13,13,00,00,13,13
      db 00,13,13,00,13,13,07,00,13,13,07,00,07,13,13,00,13,13,00,00,13,13,00,00,13,13,00,00,13,13,13,00,00,13,13,00,07,13,13
      db 07,13,13,00,00,13,13,00,00,13,13,07,13,13,00,00,13,13,07,07,13,13,00,00,13,13,00,00,00,13,13,00,07,13,13,07,13,13,00
      db 13,13,13,00,00,13,13,00,00,00,13,13,13,00,00,00,13,13,13,13,13,13,00,00,13,13,00,00,00,13,13,00,13,13,13,13,13,00,00

briqueGrise db 15,15,15,15,15,15,15,15,15,15,15,15,15,15,15
            db 15,07,07,07,07,07,07,07,07,07,07,07,07,07,07
            db 15,07,07,07,07,07,07,07,07,07,07,07,07,07,07
            db 15,07,07,07,07,07,07,07,07,07,07,07,07,07,07
            db 15,07,07,07,07,07,07,07,07,07,07,07,07,07,07
            db 15,07,07,07,07,07,07,07,07,07,07,07,07,07,07
            db 15,07,07,07,07,07,07,07,07,07,07,07,07,07,07

briqueRouge db 04,04,04,04,04,04,04,04,04,04,04,04,04,04,04
            db 04,04,04,04,04,04,04,04,04,04,04,04,04,04,04
            db 04,04,04,04,04,04,04,04,04,04,04,04,04,04,04
            db 04,04,04,04,04,04,04,04,04,04,04,04,04,04,04
            db 04,04,04,04,04,04,04,04,04,04,04,04,04,04,04
            db 04,04,04,04,04,04,04,04,04,04,04,04,04,04,04
            db 04,04,04,04,04,04,04,04,04,04,04,04,04,04,04

briqueJaune1 db 14,15,14,15,14,15,14,15,14,15,14,15,14,15,14
             db 15,14,15,14,15,14,15,14,15,14,15,14,15,14,15
             db 14,15,14,15,14,15,14,15,14,15,14,15,14,15,14
             db 15,14,15,14,15,14,15,14,15,14,15,14,15,14,15
             db 14,15,14,15,14,15,14,15,14,15,14,15,14,15,14
             db 15,14,15,14,15,14,15,14,15,14,15,14,15,14,15
             db 14,15,14,15,14,15,14,15,14,15,14,15,14,15,14

briqueBleue db 09,09,09,09,09,09,09,09,09,09,09,09,09,09,09
            db 09,09,09,09,09,09,09,09,09,09,09,09,09,09,09
            db 09,09,09,09,09,09,09,09,09,09,09,09,09,09,09
            db 09,09,09,09,09,09,09,09,09,09,09,09,09,09,09
            db 09,09,09,09,09,09,09,09,09,09,09,09,09,09,09
            db 09,09,09,09,09,09,09,09,09,09,09,09,09,09,09
            db 09,09,09,09,09,09,09,09,09,09,09,09,09,09,09

briqueRose db 13,13,13,13,13,13,13,13,13,13,13,13,13,13,13
           db 13,13,13,13,13,13,13,13,13,13,13,13,13,13,13
           db 13,13,13,13,13,13,13,13,13,13,13,13,13,13,13
           db 13,13,13,13,13,13,13,13,13,13,13,13,13,13,13
           db 13,13,13,13,13,13,13,13,13,13,13,13,13,13,13
           db 13,13,13,13,13,13,13,13,13,13,13,13,13,13,13
           db 13,13,13,13,13,13,13,13,13,13,13,13,13,13,13

briqueVerte db 10,10,10,10,10,10,10,10,10,10,10,10,10,10,10
            db 10,10,10,10,10,10,10,10,10,10,10,10,10,10,10
            db 10,10,10,10,10,10,10,10,10,10,10,10,10,10,10
            db 10,10,10,10,10,10,10,10,10,10,10,10,10,10,10
            db 10,10,10,10,10,10,10,10,10,10,10,10,10,10,10
            db 10,10,10,10,10,10,10,10,10,10,10,10,10,10,10
            db 10,10,10,10,10,10,10,10,10,10,10,10,10,10,10

briqueNoire db 00,00,00,00,00,00,00,00,00,00,00,00,00,00,00
            db 00,00,00,00,00,00,00,00,00,00,00,00,00,00,00
            db 00,00,00,00,00,00,00,00,00,00,00,00,00,00,00
            db 00,00,00,00,00,00,00,00,00,00,00,00,00,00,00
            db 00,00,00,00,00,00,00,00,00,00,00,00,00,00,00
            db 00,00,00,00,00,00,00,00,00,00,00,00,00,00,00
            db 00,00,00,00,00,00,00,00,00,00,00,00,00,00,00

briqueBlanche db 15,15,15,15,15,15,15,15,15,15,15,15,15,15,15
              db 15,15,15,15,15,15,15,15,15,15,15,15,15,15,15
              db 15,15,15,15,15,15,15,15,15,15,15,15,15,15,15
              db 15,15,15,15,15,15,15,15,15,15,15,15,15,15,15
              db 15,15,15,15,15,15,15,15,15,15,15,15,15,15,15
              db 15,15,15,15,15,15,15,15,15,15,15,15,15,15,15
              db 15,15,15,15,15,15,15,15,15,15,15,15,15,15,15

gameover_texte db 00,15,15,15,15,00,00,00,00,15,15,15,15,00,00,00,15,00,00,00,00,15,00,00,15,15,15,15,15,15,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,15,15,15,15,00,00,00,15,15,00,00,15,15,00,00,15,15,15,15,15,15,00,00,15,15,15,15,15,00
               db 15,15,00,00,15,15,00,00,15,15,00,00,15,15,00,00,15,15,00,00,15,15,00,00,15,15,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,15,15,00,00,15,15,00,00,15,15,00,00,15,15,00,00,15,15,00,00,00,00,00,00,15,15,00,00,15,15
               db 15,15,00,00,00,00,00,00,15,15,00,00,15,15,00,00,15,15,15,15,15,15,00,00,15,15,15,15,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,15,15,00,00,15,15,00,00,15,15,00,00,15,15,00,00,15,15,15,15,00,00,00,00,15,15,00,00,15,15
               db 15,15,00,15,15,15,00,00,15,15,15,15,15,15,00,00,15,15,00,00,15,15,00,00,15,15,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,15,15,00,00,15,15,00,00,15,15,00,00,15,15,00,00,15,15,00,00,00,00,00,00,15,15,15,15,15,00
               db 15,15,00,00,15,15,00,00,15,15,00,00,15,15,00,00,15,15,00,00,15,15,00,00,15,15,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,15,15,00,00,15,15,00,00,00,15,15,15,15,00,00,00,15,15,00,00,00,00,00,00,15,15,00,15,15,00
               db 00,15,15,15,15,00,00,00,15,15,00,00,15,15,00,00,15,15,00,00,15,15,00,00,15,15,15,15,15,15,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,15,15,15,15,00,00,00,00,00,15,15,00,00,00,00,15,15,15,15,15,15,00,00,15,15,00,00,15,15


tabNivEnCours db 00,00,00,00,00,00,00,00,00,00,00
              db 00,00,00,00,00,00,00,00,00,00,00
              db 00,00,00,00,00,00,00,00,00,00,00
              db 00,00,00,00,00,00,00,00,00,00,00
              db 00,00,00,00,00,00,00,00,00,00,00
              db 00,00,00,00,00,00,00,00,00,00,00

tabNiv1 db 07,07,07,07,07,07,07,07,07,07,07
        db 04,04,04,04,04,04,04,04,04,04,04
        db 14,14,14,14,14,14,14,14,14,14,14
        db 09,09,09,09,09,09,09,09,09,09,09
        db 13,13,13,13,13,13,13,13,13,13,13
        db 10,10,10,10,10,10,10,10,10,10,10

un db 00,00,15,15,00,00
   db 00,15,15,15,00,00
   db 00,00,15,15,00,00
   db 00,00,15,15,00,00
   db 00,15,15,15,15,00
   db 00,15,15,15,15,00

deux db 00,15,15,15,15,00
     db 15,15,00,00,15,15
     db 00,00,00,00,15,15
     db 00,15,15,15,15,00
     db 15,15,00,00,00,00
     db 15,15,15,15,15,15

trois db 00,15,15,15,15,00
      db 15,15,00,00,15,15
      db 00,00,00,15,15,00
      db 00,00,00,00,15,15
      db 15,15,00,00,15,15
      db 00,15,15,15,15,00

quatre db 00,00,00,15,15,00
       db 00,00,15,15,15,00
       db 00,15,00,15,15,00
       db 15,00,00,15,15,00
       db 15,15,15,15,15,15
       db 00,00,00,15,15,00

cinq db 15,15,15,15,15,15
     db 15,15,00,00,00,00
     db 15,15,15,15,15,00
     db 00,00,00,00,15,15
     db 15,15,00,00,15,15
     db 00,15,15,15,15,00

six db 00,15,15,15,15,00
    db 15,15,00,00,00,00
    db 15,15,15,15,15,00
    db 15,15,00,00,15,15
    db 15,15,00,00,15,15
    db 00,15,15,15,15,00

sept db 15,15,15,15,15,15
     db 00,00,00,00,15,15
     db 00,00,00,15,15,00
     db 00,00,00,15,15,00
     db 00,00,15,15,00,00
     db 00,00,15,15,00,00

huit db 00,15,15,15,15,00
     db 15,15,00,00,15,15
     db 00,15,15,15,15,00
     db 15,15,00,00,15,15
     db 15,15,00,00,15,15
     db 00,15,15,15,15,00

neuf db 00,15,15,15,15,00
     db 15,15,00,00,15,15
     db 15,15,00,00,15,15
     db 00,15,15,15,15,15
     db 00,00,00,00,15,15
     db 00,15,15,15,15,00

zero db 00,15,15,15,15,00
     db 15,15,00,00,15,15
     db 15,15,00,00,15,15
     db 15,15,00,00,15,15
     db 15,15,00,00,15,15
     db 00,15,15,15,15,00