1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46
| name "GraphismeTamagotchi"
drawborder proc ; affichage des bordures
mov cx,25
mov bx, 0
leftb:mov [00h+bx], 219
inc bx
mov [00h+bx], 00001111b
add bx,159
loop leftb
mov cx,25
mov bx, 158
rightb:mov [00h+bx], 219
inc bx
mov [00h+bx], 00001111b
add bx,159
loop rightb
mov cx,78
mov bx, 2
upb:mov [00h+bx], 223
inc bx
mov [00h+bx], 00001111b
inc bx
loop upb
mov cx,78
mov bx, 3842
downb:mov [00h+bx], 220
inc bx
mov [00h+bx], 00001111b
inc bx
loop downb
ret
drawborder endp
draweggh proc ;affichage de l'oeuf
;ligne 1.1
mov bx, 1338
mov [bx], 220
;[...]
mov bx, 2628
mov [bx], 223
ret
draweggh endp |
Partager