Pour compiler:
TASM nomdufichier.asm
TLINK nomdufichier
Les touches z,e,r,t,y,u,i emmettent un son
ESC pour quitter
Surtout ne vous préoccupez pas de la routine de l'IRQ, il provient de la source de détection des touches
Source / Exemple :
.386
code segment use16
assume cs:code,ds:code
prog:
push cs
pop ds
xor ax,ax
mov es,ax
mov eax, es:[09h*4]
mov oldirq1, eax ;sauvegarde de l'IRQ1 lié à l'INT 09h (sinon PANIC)
mov ax, cs
shl eax, 16
mov ax, offset irq1
mov es:[09h*4], eax ;place celle du code présent
mov al,0B6h ;on initialise le PIT au counter 2, avec diviseur 16bits,
out 43h,al ;mode 3, compteur binaire (Bref pour le speaker!)
boucle:
mov bx,42614 ;diviseur de base
cmp scode, 17 ;Touche z
jz pit_c2
shr bx,1
cmp scode, 18 ;Touche e
jz pit_c2
shr bx,1
cmp scode, 19 ;Touche r
jz pit_c2
shr bx,1
cmp scode, 20 ;Touche t
jz pit_c2
shr bx,1
cmp scode, 21 ;Touche y
jz pit_c2
shr bx,1
cmp scode, 22 ;Touche u
jz pit_c2
shr bx,1
cmp scode, 23 ;Touche i
jz pit_c2
cmp scode,81h ;Dès que la touche ESC est relâché on quitte
jnz boucle
fin:
xor al,al
out 61h,al ;on éteint le haut parleur
mov eax, oldirq1 ;restauration de l'Int 09h
mov es:[09h*4], eax
mov ah,4Ch
int 21h ;code de fin
pit_c2:
mov al,3 ;on met la valeur 3 pour
out 61h,al ;allumer le haut parleur
mov al,bl
out 42h,al ;LSB du diviseur
mov al,bh
out 42h,al ;MSB du diviseur
jmp boucle
irq1:
push ax
in al,60h ;Lecture du Scancode
mov scode,al
cmp al,81h ;Test de la touche Esc relâchée
jz irqfin
jge break
jmp irqfin
break:
cmp al,0E0h ;Teste si le code E0h est présent pour les touches étendues
jz .e0
cmp al,0E1h ;Teste si le code E1h est présent (seul la touche Pause l'utilise)
jz .e0
jmp irqfin
.e0:
irqfin:
mov al,20h
out 20h,al ;End Of Interrupt
pop ax
iret ;Comme ret sauf pour interruption
oldirq1 dd ? ;sauvegarde de l'ancienne adresse de l'IRQ1 (irq du clavier)
scode db 0 ;test du code 81h c'est le BreakCode de la touche Echap qui permettra de quitter le programme
code ends
end prog
Conclusion :
formule à savoir pour le diviseur: Fréquence = 1193180 / diviseur
nb: Je ne suis pas musicien mais les notes ne sont pas très bien accordées.
Je me demande si je devrai faire une source sur la SB16 aussi les sons sont bien meilleurs!
Vous n'êtes pas encore membre ?
inscrivez-vous, c'est gratuit et ça prend moins d'une minute !
Les membres obtiennent plus de réponses que les utilisateurs anonymes.
Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.
Le fait d'être membre vous permet d'avoir des options supplémentaires.