67 lines
1.6 KiB
NASM
67 lines
1.6 KiB
NASM
; programme lisant une touche et l’affichant
|
||
; headers (voir helloworld pour plus d’information)
|
||
org 0x4000
|
||
db "AB"
|
||
dw init
|
||
db 00,00,00,00,00,00
|
||
|
||
init: ; init écran
|
||
call 0x006F
|
||
ld a, 32
|
||
ld (0xF3B0), a
|
||
|
||
main:
|
||
ld hl, message
|
||
call printf
|
||
|
||
call 0x009F ; on attend une entrée. Elle sera stockée dans a
|
||
|
||
ld b, a ; on sauvegarde a dans b pour l’afficher
|
||
call newLine
|
||
ld hl, messageTouche
|
||
call printf
|
||
call newLine
|
||
|
||
ld a, b ; on récupère la lettre
|
||
cp 0x71 ; on vérifie si ce n’est pas q (code ascii)
|
||
jp z, fin ; si oui, on arrete le programme
|
||
jr main
|
||
|
||
fin:
|
||
call newLine
|
||
ld hl, messageFin
|
||
call printf
|
||
|
||
di
|
||
halt
|
||
|
||
newLine: ; une nouvelle ligne = 13 (retour chariot)
|
||
ld a, 13 ; + 10 (nouvelle ligne)
|
||
call 0x00A2
|
||
ld a, 10
|
||
call 0x00A2
|
||
ret
|
||
|
||
printf:
|
||
ld a, (hl)
|
||
cp 1 ; si on tombe sur 1 dans la string, on affiche
|
||
jp z, printChar ; le caractère
|
||
cp 0
|
||
ret z
|
||
|
||
inc hl
|
||
call 0x00A2
|
||
jr printf
|
||
|
||
printChar:
|
||
ld a, b ; on reprend le caractère sauvegardé dans b
|
||
inc hl
|
||
call 0x00A2
|
||
jr printf
|
||
|
||
message: db 'Tapez sur une touche (q pour arreter): ', 0
|
||
messageFin: db 'Programme fini !', 0
|
||
messageTouche: db 'Vous avez tape sur: ', 1, 0
|
||
|
||
org 0xC000
|