SOB PROGRAM
SOB PRZERW1
SOB PRZERW2
SOB PRZERW3
SOB PRZERW4

PROGRAM:
 WPR 1
 ŁAD TEMP
 ODE ST97
 SOM PROGRAM
 ODE ST26
 SOM WYPISZ
 SOB PROGRAM
 STP

WYPISZ:
 POB TEMP
 WYP 2
 SOB PROGRAM

PRZERW1:
 CZM MASKA // zapis aktualnej maski
 MAS 15    // zablokowanie wszystkich przerwań
 DNS       // zachowanie na stosie akumulatora
 POB ILE

LOOP1:
 ODE ST1
 ŁAD TEMPPR1
 POB ST49
 WYP 2
 POB TEMPPR1
 SOZ PR1NEXT
 SOB LOOP1

PR1NEXT:
 PZS       // pobranie ze stosu akumulatora
 MSK MASKA // przywrócenie starej maski
 PWR       // powrót z procedury obsługi przerwania

PRZERW2:
 CZM MASKA2
 MAS 7
 DNS
 POB ILE

LOOP2:
 ODE ST1
 ŁAD TEMPPR2
 POB ST50
 WYP 2
 POB TEMPPR2
 SOZ PR2NEXT
 SOB LOOP2

PR2NEXT:
 PZS
 MSK MASKA2
 PWR

PRZERW3:
 CZM MASKA3
 MAS 3
 DNS
 POB ILE

LOOP3:
 ODE ST1
 ŁAD TEMPPR3
 POB ST51
 WYP 2
 POB TEMPPR3
 SOZ PR3NEXT
 SOB LOOP3

PR3NEXT:
 PZS
 MSK MASKA3
 PWR

PRZERW4:
 CZM MASKA4
 MAS 1
 DNS
 POB ILE

LOOP4:
 ODE ST1
 ŁAD TEMPPR4
 POB ST52
 WYP 2
 POB TEMPPR4
 SOZ PR4NEXT
 SOB LOOP4

PR4NEXT:
 PZS
 MSK MASKA4
 PWR

ST1: RST 1
ST49: RST 49
ST50: RST 50
ST51: RST 51
ST52: RST 52
MASKA: RPA
MASKA2: RPA
MASKA3: RPA
MASKA4: RPA
TEMP: RPA
ST97: RST 97
ST26: RST 26
ILE: RST 10
TEMPPR1: RPA
TEMPPR2: RPA
TEMPPR3: RPA
TEMPPR4: RPA