Procédure proposée pour tester les interruptions

Le programme ci dessous comporte deux tâches: une tâche de fond (qui calcule un PGCD) et un traitant d'interruptions (qui compte les IRQ reçues). Donné en deux versions : en assembleur pour nous (les humains) et en langage machine pour digital.

PGCD:
   A <- 96
   B <- 36
loop:
   B-A ?
   JR fini if Z
   JR bigA if N
bigB:
   B-A -> B
   JA loop
bigA:
   B XOR A -> A
   B XOR A -> B
   B XOR A -> A
   JA bigB
fini:
   JR 0

addr: 00
hexa: 4C 60 4D 24 32 AA E4 0B 78 04 22 23 22 78 07 80

ISR:
   // prologue: save user context
   A -> *126
   B -> *127
   // body: increment counter
   *125 -> A
   A + 1 -> A
   A -> *125
   // epilogue: restore user context
   *126 -> A
   *127 -> B
   RETI

addr: A0
hexa: 74 7E 76 7F 6C 7D 04 01 74 7D 6C 7E 6D 7F 58