ÚVOD | Novinky | 8 Bitů | Příslušenství | Drobnosti | TTL | Kontakt
SAPI-1 | ONDRA | PMI-80 | PMD-85 | klony PMD-85 | klony SM50/40 | PETR | PLAN-80A | IQ151 | TNS | FK-1 | HVĚZDA | SP 830 | PCS 1-QR6000
ZPS | Technické prostředky | Programové vybavení | Dokumentace
PROGRAM IOT MACRO-80 3.44 09-Dec-81 PAGE 1
TITLE PROGRAM IOT
; TEST IO
; PROGRAM PROVEDE POUZE ZAKLADNI FUNKCNI TEST IO
; C 02.08.2024EC
;%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
;NASTAVENI PARAMETRU PRO PREKLAD
0000 SYS EQU 0 ;-- -1 = CPM
;\- 00 = MIKOS
0000 MIKOSD EQU 0 ;-1 = MIKOS/D
;-------------------------------
;ADRESACE DESEK
0038 VADR EQU 38H ;VYCOZI ADRESA PRO BWP-1
00D0 ADP1_1 EQU 0D0H ;VYCOZI ADRESA PRO PRVNI ADP-1
00E0 ADP1_2 EQU 0E0H ;VYCOZI ADRESA PRO DRUHOU ADP-1
;-------------------------------
;POPIS PROVADENE OPRACE PRI KROKOVANI
FFFF POPIS EQU -1 ;-1 ZAPNUTO
;-------------------------------
;POMOCNE KNIHOVNY IO
FFFF TESLA EQU -1 ;-1 ZAPNUTO
FFFF RUS EQU -1 ;-1 ZAPNUTO
;%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
IF SYS
START EQU 0100H ;CPM
ELSE
4400 START EQU 4400H ;MIKOS
ENDIF
0000' ASEG
IF SYS
BDOS EQU 0005H
NEXT EQU 0 ;PREDANI RIZENI SYSTEMU
ORG START ;CPM
ELSE
IF MIKOSD
DB '<'
DW $KONEC
DW START
DB '>'
SUM EQU LOW $KONEC+HIGH $KONEC+LOW START+HIGH START+'>'
DB LOW SUM
ENDIF
.PHASE START ;MIKOS
0103 CI EQU 0103H ;VSTUP ZNAKU Z CONSOLY
;VYSTUP: A - ASCII KOD ZNAKU
PROGRAM IOT MACRO-80 3.44 09-Dec-81 PAGE 1-1
;RUSI: PSW
0109 CO EQU 0109H ;VYSTUP ZNAKU NA CONSOLY
;vstup: C - ASCII KOD ZNAKU
;RUSI: PSW
0112 CSTS EQU 0112H ;TEST KONSOLY
;VYSTUP: A = 0 NENI ZNAK
; A <> 0 JE ZNAK
;RUSI: PSW
0139 NEXT EQU 0139H ;PREDANI RIZENI MONITORU
4400 C3 4403 JMP START+3
ENDIF
;POLE PRO ZPRACOVANI NAPETI, ZAROVNANO NA XX00
F200 POLE2 EQU HIGH $KONEC*100H+100H
;===============================
;KONSTANTY
0003 CTRLC EQU 3
000D CR EQU 0DH
000A LF EQU 0AH
001B ESC EQU 27
000A PPK EQU 10 ;POCET PRUCHODU TESTEM
00F7 ZPC EQU 11110111B ;ZAPIS PREHOD NA CTENI
;NASTAVENI ROZHODOVACI UROVNE PRO KONTROLU LOG. ROZDILU
0020 VELN EQU 20H ;MAX ROZDILOVE NAPETI PRO LOG. UROVEN "DESITKOVE" V 0.XXV
0032 VELN1 EQU '2' ;PRVNI PISMENO TEXTU
0030 VELN2 EQU '0' ;DRUHE PISMENO TEXTU
;===============================
;ADRESY PRO TESTER
0038 PORT1 EQU VADR
0039 PORT2 EQU PORT1 + 1
003A PORT3 EQU PORT1 + 2
003B P_REG EQU PORT1 + 3
;-------------------------------
;ADRESACE PRO PREVODNIKY ADP-1
;PRVNI ADP-1
00D0 ADP1D EQU ADP1_1
00D1 ADP1R EQU ADP1_1+1
;DRUHA ADP-1
00E0 ADP2D EQU ADP1_2
00E1 ADP2R EQU ADP1_2+1
;===============================
;KONSTATY PRO POMOCNY REGISTR
;VYBER POVOLOVACICH REGISTRU PRO VYSTUP
00C0 POV_OUT EQU 11000000B
PROGRAM IOT MACRO-80 3.44 09-Dec-81 PAGE 1-2
;ZAKLADNI STAV POMOCNEHO REGISTRU
0040 ZSTAV EQU 01000000B
;PRIPRAVA NA ZAPNUTI NAPAJENI PRO ZIF28
;ROZSVITI ZELENOU SVITIVKU NAD PATICI ZIF28
0044 DIL14 EQU 01000100B
0045 DIL16 EQU 01000101B
0046 DIL20 EQU 01000110B
0047 DIL24 EQU 01000111B
;PRIPRAVA NA ZAPNUTI NAPAJENI PRO ZIF16
;ROZSVITI ZELENOU SVITIVKU NAD PATICI ZIF16
0048 DIL5_12 EQU 01001000B
0049 DIL4_12 EQU 01001001B
004A DIL4_13 EQU 01001010B
004B DIL5_13 EQU 01001011B
;PRO ZAPNUTI NAPAJENI JE POTREBA PRICIST KONSTANTU
0020 Z_NAP EQU 00100000B
;===============================
;STRUKTURA IDENTIFIKATORU PARAMETRU
;NASTAVENI VSTUPU A VYSTUPU
0008 T_VV2 EQU 00001000B ;PORT 1 A 2
0010 T_VV3 EQU 00010000B ;PORT 1, 2 A 3
;PRO ZAPIS S NASLEDNYM CTENIM
0019 T_W1 EQU 00011001B ;PORT 1
001A T_W2 EQU 00011010B ;PORT 2
001B T_W12 EQU 00011011B ;PORT 1 A 2
001C T_W3 EQU 00011100B ;PORT 3
001D T_W13 EQU 00011101B ;PORT 1 A 3
001E T_W23 EQU 00011110B ;PORT 2 A 3
001F T_W123 EQU 00011111B ;PORT 1, 2 A 3
;KONSTANTA V/V PARAMATRU
0018 KVVP EQU 00011000B
;PRO CTENI
0001 T_I1 EQU 00000001B ;PORT 1
0002 T_I2 EQU 00000010B ;PORT 2
0003 T_I12 EQU 00000011B ;PORT 1 A 2
0004 T_I3 EQU 00000100B ;PORT 3
0005 T_I13 EQU 00000101B ;PORT 1 A 3
0006 T_I23 EQU 00000110B ;PORT 2 A 3
0007 T_I123 EQU 00000111B ;PORT 1, 2 A 3
;KONSTANTA PRO UPRAVU NA CTENI (AND)
00E7 CTENI EQU 11100111B
PROGRAM IOT MACRO-80 3.44 09-Dec-81 PAGE 1-3
;PRO ZAPIS
0009 T_O1 EQU 00001001B ;PORT 1
000A T_O2 EQU 00001010B ;PORT 2
000B T_O12 EQU 00001011B ;PORT 1 A 2
000C T_O3 EQU 00001100B ;PORT 3
000D T_O13 EQU 00001101B ;PORT 1 A 3
000E T_O23 EQU 00001110B ;PORT 2 A 3
000F T_O123 EQU 00001111B ;PORT 1, 2 A 3
;KONSTANTA PRO UPRAVU NA ZAPIS (AND)
00EF ZAPIS EQU 11101111B
;SKOKY V RAMCI TESTOVACICH DAT
0020 T_GOTO EQU 00100000B ;PRESKOK (ADRESA)
0021 T_GOSUB EQU 00100001B ;ODSKOK DO "PODPROGRAMU" (ADRESA)
0022 T_RET EQU 00100010B ;NAVRAT Z "PODPROGRAMU"
0023 T_PROG EQU 00100011B ;SKOK DO SROJOVEHO KODU (ADRESA)
;OSTATNI
0024 T_NAP EQU 00100100B ;NAPAJENI
0025 T_NZ2 EQU 00100101B ;NEZAPOJENE VYNODY PORT 1 A 2
0026 T_NZ3 EQU 00100110B ;NEZAPOJENE VYNODY PORT 1, 2 A 3
0027 T_ZIF14 EQU 00100111B ;POUZDRO DIL 14 V ZIF 16 (BEZ PARAMETRU)
0000 T_NIC EQU 00000000B ;NEJSOU TESTOVACI DATA
00FE T_KONEC EQU 11111110B ;KONEC TESTOVACI TABULKY
;===============================
FFEB BLOKO EQU 0FFFFH-BLOKP+1 ;KONSTANTA PRO ODECTENI BLOKU
;*******************************
;ZACATEK PROGRAMU
;HLAVNI SMICKA
4403 31 5BBF LXI SP,STACK ;ZALOZ ZASOBNIK
4406 CD 48F9 CALL VYSTAV ;VYCHOZI STAV TESTTERU
4409 AF XRA A
440A 21 5977 LXI H,KROKO
440D 77 MOV M,A ;KROKO KROKOVANI VYPNUTO
440E 23 INX H
440F 77 MOV M,A ;ZOBRO ZOBRAZENI DIL VYPNUTO
4410 23 INX H
4411 77 MOV M,A ;MNAP ZOBRAZENI MERENI NAPETI U DIL VYPNUTO
4412 23 INX H
4413 77 MOV M,A ;PAKNAP ZRUS PRIZNAK ADRESY PRO ZAPIS DRUHE POLOVINY NAPETI
4414 23 INX H
4415 77 MOV M,A ;KTN TRIDENI NAPETI VYPNUTO
4416 23 INX H
4417 77 MOV M,A ;LOG KOTROLA TTL LOG UROVNI
4418 23 INX H
4419 77 MOV M,A ;CPU FREKVENCE CPU (2 NEBO 4 MHZ)
441A 11 53D0 LXI D,UVOD
441D CD 489C CALL PRINT ;VYPIS UVOD
4420 21 5BC0 LXI H,SADYIO
4423 22 596E SHLD STAB ;POLOHA V TABULCE SKUPIN IO
PROGRAM IOT MACRO-80 3.44 09-Dec-81 PAGE 1-4
4426 31 5BBF PRVVYB: LXI SP,STACK ;OBNOV ZASOBNIK
4429 21 5BC0 LXI H,SADYIO
442C 22 5966 SHLD ZTAB
442F 11 FFEB LXI D,BLOKO
4432 21 5D3A LXI H,SADYIOK
4435 19 DAD D
4436 22 5968 SHLD KTAB
4439 CD 4896 CALL CRLF2
443C 11 5586 LXI D,VYB1T
443F CD 489C CALL PRINT ;PRVNI VYBER, SADA IO
4442 CD 4896 CALL CRLF2
4445 2A 596E LHLD STAB ;POLOHA V TABULCE SKUPIN IO
4448 CD 4800 CALL VYBER1
444B FE 0D CPI CR
444D 22 596E SHLD STAB ;SHOV POLOHU V TABULCE SKUPIN IO
4450 CA 4465 JZ VYBIO
4453 CD 48F9 KONEC: CALL VYSTAV ;VYCHOZI STAV TESTTERU
4456 CD 4896 CALL CRLF2
4459 11 5575 LXI D,KONECT ;KONEC PROGRAMU
445C CD 489C CALL PRINT
445F C3 0139 JMP NEXT ;VRACENI RIZENI MONITORU/SYSTEMU
4462 2A 596A VYBIO2: LHLD PTAB ;OBNOV POZICI V TABULCE
4465 11 0011 VYBIO: LXI D,TEXTP ;DELKA TEXTU
4468 19 DAD D ;PRICTI JI K
4469 5E MOV E,M ;NACTI NIZSI BYTE
446A 23 INX H
446B 56 MOV D,M ;NACTI VYSSI BYTE
446C EB XCHG ;PROHOD A
446D 22 5966 SHLD ZTAB ;ULOZ ZACATEK TABULKY
4470 EB XCHG ;PROHOD A
4471 23 INX H
4472 5E MOV E,M ;NACTI NIZSI BYTE
4473 23 INX H
4474 56 MOV D,M ;NACTI VYSSI BYTE
4475 EB XCHG ;PROHOD A
4476 11 FFEB LXI D,BLOKO
4479 19 DAD D
447A 22 5968 SHLD KTAB ;ULOZ KONEC TABULKY
447D CD 4896 CALL CRLF2
4480 11 5594 LXI D,VYB2T
4483 CD 489C CALL PRINT ;DRUHY VYBER, IO
4486 CD 4896 CALL CRLF2
4489 CD 47FD VYBIO1: CALL VYBER
448C C3 44A1 JMP VYBIO4
448F CD 4896 VYBIO3: CALL CRLF2
4492 11 5594 LXI D,VYB2T ;OBNOVA VYBERU IO
4495 CD 489C CALL PRINT ;DRUHY VYBER, IO
4498 CD 4896 CALL CRLF2
449B 2A 596A LHLD PTAB ;OBNOV POZICI V TABULCE VYBERU IO
449E CD 4800 CALL VYBER1 ;OBNOV VYBER IO
44A1 FE 1B VYBIO4: CPI ESC
44A3 CA 4426 JZ PRVVYB ;NAVRAT NA VYBER SKUPINY IO
44A6 FE 0D CPI CR
44A8 CA 44AE JZ TEST ;JDEM TESTOVAT
44AB C3 4489 JMP VYBIO1
PROGRAM IOT MACRO-80 3.44 09-Dec-81 PAGE 1-5
;*******************************
;TEST IO
44AE 22 596A TEST: SHLD PTAB ;ULOZ POLOHU V TABULCE VYBERU IO
44B1 CD 4899 CALL CRLF ;ODRADKUJ
44B4 11 0011 LXI D,TEXTP ;DELKA TEXTU
44B7 19 DAD D ;PRICTI JI K
44B8 5E MOV E,M ;NACTI NIZSI BYTE
44B9 23 INX H
44BA 56 MOV D,M ;NACTI VYSSI BYTE
44BB D5 PUSH D ;SCHOV SI ADRESU POLOHY POPISU NAPAJENI IO
44BC 13 INX D
44BD 13 INX D ;POCATEK POPISU IO
44BE CD 489C CALL PRINT ;VYPIS POPIS IO
44C1 CD 4899 CALL CRLF ;ODRADKUJ
44C4 D1 POP D ;OBNOV SI ADRESU POLOHY POPISU NAPAJENI IO
44C5 E5 PUSH H ;SCHOV SI UKAZOVATKO
44C6 EB XCHG ;ADRESU POPISU NAPAJENI IO DO
44C7 5E MOV E,M ;NACTI NIZSI BYTE
44C8 23 INX H
44C9 56 MOV D,M ;NACTI VYSSI BYTE
44CA CD 489C CALL PRINT ;VYPIS POPISU NAPAJENI IO
44CD E1 POP H ;OBNOV UKAZOVATKO
44CE CD 4896 CALL CRLF2
44D1 11 559D LXI D,POKT
44D4 CD 489C CALL PRINT ;POKRACOVAT?
44D7 CD 48B4 TEST1: CALL CTIZ ;CTI KONZOLI
44DA FE 1B CPI ESC
44DC CA 448F JZ VYBIO3 ;NAVRAT NA VYBER IO
44DF FE 0D CPI CR
44E1 C2 44D7 JNZ TEST1 ;SPUST TEST
;===============================
;VLASTNI TEST
44E4 23 INX H ;ADRESA TEST TABULKY
44E5 5E MOV E,M ;NACTI NIZSI BYTE
44E6 23 INX H
44E7 56 MOV D,M ;NACTI VYSSI BYTE (V ADRESA TEST TABULKY)
44E8 3E 0A MVI A,PPK ;POCET PRUCHODU TESTEM
44EA 32 5971 STA PP ;A ULOZ JE
44ED 21 0000 LXI H,0 ;VYCHOZI STAV NEZAPOJENYCH VIVODU PRO ZOBRAZOVANI
44F0 22 598F SHLD NCZ
44F3 22 5991 SHLD NCZ+2 ;+ VYCHOZI STAV PRO ZIF16 PRO ZOBRAZOVANI
44F6 22 5992 SHLD NCZ+3 ;+ VYCHOZI STAV PRO ERR PRO ZOBRAZOVANI
44F9 2B DCX H
44FA 22 5985 SHLD VDAT ;VYCHOZI NASTAVENI VYSTUPNICH DAT PRO ZOBRAZENI
44FD 22 5986 SHLD VDAT+1
IF POPIS
4500 21 5962 LXI H,TXNDEF
4503 22 5964 SHLD OPR ;VYCHOZI NASTAVENI PRO TEXT PROVEDENE OPERACE
ENDIF
4506 EB XCHG ;ADRESA TEST TABULKY IO DO
4507 22 596C SHLD TTAB ;ULOZ AKTUALNI TEST TABULKU IO
PROGRAM IOT MACRO-80 3.44 09-Dec-81 PAGE 1-6
450A C3 450E JMP TEST3
450D 23 TESTHS: INX H ;DALSI ADRESA V TABULCE
; CALL WAIT24 ;CHVILI POCKEJ MAME KB-01 TJ. 2M KABLU
450E 3A 5977 TEST3: LDA KROKO ;NACTI PRIZNAK KROKOVANI
4511 FE 01 CPI 01
4513 C2 4526 JNZ TEST8 ;NENI KROKOVANI
IF POPIS
4516 EB XCHG
4517 2A 5964 LHLD OPR ;NACTI ADRESU TEXTU PROVEDENE OPERACE
451A EB XCHG
451B CD 489C CALL PRINT ;VYTISNI TEXT OPERACE
ENDIF
451E E5 PUSH H
451F CD 4917 CALL HADR ;TISK OBSAHU
4522 CD 48B4 CALL CTIZ ;CTI ZNAK Z KONZOLY
4525 E1 POP H
4526 3A 5972 TEST8: LDA VVP ;TEST NA V/V PARAMETR
4529 A7 ANA A
452A CA 4530 JZ TEST7 ;NENI DRUHA FAZE V/V PARAMETR
452D 2A 5973 LHLD WZTAB ;OBNOV ADRESU V TEST TABULCE
4530 7E TEST7: MOV A,M ;NACTI PARAMETR PRO TEST
4531 47 MOV B,A ;A ULOZ I DO
4532 E6 F8 ANI 11111000B ;JEN HORNICH 5 BITU
4534 FE 18 CPI KVVP ;PARAMETR V/V PARAMETRU
4536 C2 4559 JNZ TEST5 ;NENI V/v PARAMETR - JDEM HLEDAT
4539 3A 5972 LDA VVP ;STAV V/V PARAMETR
453C A7 ANA A
453D CA 454E JZ TEST6 ;PRVNI FAZE V/V PARAMETRU
4540 AF XRA A ;DRUHA FAZE V/V PARAMATRU
4541 32 5972 STA VVP ;VYCHOZI STAV PRO V/V PARAMETR
4544 78 MOV A,B
4545 E6 E7 ANI CTENI ;VYTVOR CTENI
4547 47 MOV B,A ;VRAT DO
4548 11 45C8 LXI D,TABTT ;PRESKOCI ZAPIS
454B C3 455C JMP TEST4
454E 3C TEST6: INR A
454F 32 5972 STA VVP ;ULOZ ZE ZAPISUJEM
4552 22 5973 SHLD WZTAB ;ULOZ ADRESU V TEST TABULCE
4555 78 MOV A,B ;
4556 E6 EF ANI ZAPIS ;JEN SPODNI 3 BITY - BUDE ZAPIS
4558 47 MOV B,A ;VRAT DO
;-------------------------------
;PROHLEDA TABULKU A SKOCI NA ADRSU
;V JE CO SE HLEDA
;ZACHOVA
4559 11 45A5 TEST5: LXI D,TABTST ;ADRESA POCATKU DABULKY
455C E5 TEST4: PUSH H ;SCHOV ADRESU V TEST TABULCE
455D EB XCHG ;ADRESU TABULKY PRIKAZU DO
455E 7E PROHL: MOV A,M ;CTI PRIKAZ
PROGRAM IOT MACRO-80 3.44 09-Dec-81 PAGE 1-7
455F B8 CMP B
4560 CA 4570 JZ PROHU ;NASEL PRIKAZ
4563 FE FF CPI -1 ;KONEC TABULKY
4565 CA 4580 JZ PROHK
4568 23 INX H ;HL=HL+3 / +5 ->
4569 23 INX H ;DALSI POZICE
456A 23 INX H
IF POPIS
456B 23 INX H
456C 23 INX H
ENDIF
456D C3 455E JMP PROHL ;DALSI PRIKAZ V TABULCE
4570 23 PROHU: INX H ;VYBER ADRESU Z TABULKY
IF POPIS
4571 5E MOV E,M ;DO
4572 23 INX H
4573 56 MOV D,M ;DALSI PULKU DO
4574 EB XCHG
4575 22 5964 SHLD OPR ;ULOZ ADRESU TEXTU OPERACE
4578 EB XCHG
4579 23 INX H ;VYBER ADRESU Z TABULKY
ENDIF
457A 5E MOV E,M ;DO
457B 23 INX H
457C 56 MOV D,M ;DALSI PULKU DO
457D EB XCHG ;ADRESU PROGRAMU DO HL
457E E3 XTHL ;OBNOV (ADRESU V TEST TAB. IO) A ADRESU PROGAMU NA ZASOBNIK
457F C9 RET ;SKOK DO PROGRAMU -> JMP
4580 E1 PROHK: POP H ;OBNOV ADRESU V TEST TABULCE
4581 11 5606 LXI D,NEZKO ;NEZNAMI KOD
4584 CD 489C VYSTV1: CALL PRINT
4587 CD 4899 CALL CRLF
458A CD 4917 CALL HADR ;TISK OBSAHU
458D CD 4899 CALL CRLF
4590 7E MOV A,M
4591 CD 491C CALL DBYT
4594 3A 5977 VYSTV3: LDA KROKO ;NACTI PRIZNAK KROKOVANI
4597 FE 01 CPI 01
4599 C2 459F JNZ VYSTV2 ;NENI KROKOVANI
459C CD 48B4 CALL CTIZ ;CTI ZNAK Z KOZOLI
459F CD 48F9 VYSTV2: CALL VYSTAV ;VYCHOZI STAV TESTTERU
45A2 C3 448F JMP VYBIO3 ;NOVY VYBER
;-------------------------------
;TABULKA PRIKAZU V TESTOVACI TABULCE
IF POPIS
PROGRAM IOT MACRO-80 3.44 09-Dec-81 PAGE 1-8
45A5 0B TABTST: DB T_O12
45A6 58D2 DW TXO12 ;ADRESA TEXTU OPERACE
45A8 46BF DW TO12 ;VYSTAVENI DAT NA PORT 12
45AA 0F DB T_O123
45AB 58D8 DW TXO123
45AD 46D1 DW TO123 ;VYSTAVENI DAT NA PORT 123
45AF 09 DB T_O1
45B0 58DF DW TXO1
45B2 46B9 DW TO1 ;VYSTAVENI DAT NA PORT 1
45B4 0A DB T_O2
45B5 58E4 DW TXO2
45B7 46C2 DW TO2 ;VYSTAVENI DAT NA PORT 2
45B9 0C DB T_O3
45BA 58E9 DW TXO3
45BC 46D7 DW TO3 ;VYSTAVENI DAT NA PORT 3
45BE 0D DB T_O13
45BF 58EE DW TXO13
45C1 46C8 DW TO13 ;VYSTAVENI DAT NA PORT 13
45C3 0E DB T_O23
45C4 58F4 DW TXO23
45C6 46D4 DW TO23 ;VYSTAVENI DAT NA PORT 23
45C8 03 TABTT: DB T_I12
45C9 58FA DW TXI12
45CB 46FB DW TI12 ;POROVNANI DAT Z PORTU 12
45CD 07 DB T_I123
45CE 5900 DW TXI123
45D0 470D DW TI123 ;POROVNANI DAT Z PORTU 123
45D2 01 DB T_I1
45D3 5907 DW TXI1
45D5 46F5 DW TI1 ;POROVNANI DAT Z PORTU 1
45D7 02 DB T_I2
45D8 590C DW TXI2
45DA 46FE DW TI2 ;POROVNANI DAT Z PORTU 2
45DC 04 DB T_I3
45DD 5911 DW TXI3
45DF 4713 DW TI3 ;POROVNANI DAT Z PORTU 3
45E1 05 DB T_I13
45E2 5916 DW TXI13
45E4 4704 DW TI13 ;POROVNANI DAT Z PORTU 13
45E6 06 DB T_I23
45E7 591C DW TXI23
45E9 4710 DW TI23 ;POROVNANI DAT Z PORTU 23
45EB 08 DB T_VV2
45EC 5922 DW TXVV2
45EE 4628 DW TVV2 ;NASTAV V/V MAX DIL 16
45F0 10 DB T_VV3
45F1 5928 DW TXVV3
45F3 464D DW TVV3 ;NASTAV V/V MAX DIL 24
45F5 24 DB T_NAP
45F6 592E DW TXNAP
45F8 467E DW TNAP ;NASTAV, ZAPNI NAPAJENI
45FA 20 DB T_GOTO
45FB 5934 DW TXGOTO
45FD 4775 DW TGOTO ;SKOK V TABULCE
45FF 21 DB T_GOSUB
PROGRAM IOT MACRO-80 3.44 09-Dec-81 PAGE 1-9
4600 593B DW TXGOSUB
4602 47DD DW TGOSUB ;PODPROGRAM V DATECH
4604 22 DB T_RET
4605 5943 DW TXRET
4607 47E8 DW TRET ;NAVRAT Z DATOVEHO PODPROGRAMU
4609 23 DB T_PROG
460A 5949 DW TXPROG
460C 47EE DW TPROG ;SKOK DO STROJOVEHO KODU
460E 25 DB T_NZ2
460F 5950 DW TXNZ2
4611 465A DW TNZ2 ;NEZAPONENE VYVODY PRO ZOBRAZENI DIL MAX DIL 16
4613 26 DB T_NZ3
4614 5956 DW TXNZ3
4616 466B DW TNZ3 ;NEZAPONENE VYVODY PRO ZOBRAZENI DIL MAX DIL 24
4618 27 DB T_ZIF14
4619 595C DW TXZIF14
461B 4676 DW TZIF14 ;PRIZNAK POUZDRA DIL14 V ZIF16
461D 00 DB T_NIC
461E 5962 DW TXNDEF
4620 477D DW TNIC ;NENI TESTOVACI TABULKA
4622 FE DB T_KONEC
4623 5962 DW TXNDEF
4625 4786 DW TKONEC ;KONEC TESTU
4627 FF DB -1 ;KONEC TABULKY
ELSE
TABTST: DB T_O12
DW TO12 ;VYSTAVENI DAT NA PORT 12
DB T_O123
DW TO123 ;VYSTAVENI DAT NA PORT 123
DB T_O1
DW TO1 ;VYSTAVENI DAT NA PORT 1
DB T_O2
DW TO2 ;VYSTAVENI DAT NA PORT 2
DB T_O3
DW TO3 ;VYSTAVENI DAT NA PORT 3
DB T_O13
DW TO13 ;VYSTAVENI DAT NA PORT 13
DB T_O23
DW TO23 ;VYSTAVENI DAT NA PORT 23
TABTT: DB T_I12
DW TI12 ;POROVNANI DAT Z PORTU 12
DB T_I123
DW TI123 ;POROVNANI DAT Z PORTU 123
DB T_I1
DW TI1 ;POROVNANI DAT Z PORTU 1
DB T_I2
DW TI2 ;POROVNANI DAT Z PORTU 2
DB T_I3
DW TI3 ;POROVNANI DAT Z PORTU 3
DB T_I13
DW TI13 ;POROVNANI DAT Z PORTU 13
DB T_I23
DW TI23 ;POROVNANI DAT Z PORTU 23
DB T_VV2
PROGRAM IOT MACRO-80 3.44 09-Dec-81 PAGE 1-10
DW TVV2 ;NASTAV V/V MAX DIL 16
DB T_VV3
DW TVV3 ;NASTAV V/V MAX DIL 24
DB T_NAP
DW TNAP ;NASTAV, ZAPNI NAPAJENI
DB T_GOTO
DW TGOTO ;SKOK V TABULCE
DB T_GOSUB
DW TGOSUB ;PODPROGRAM V DATECH
DB T_RET
DW TRET ;NAVRAT Z DATOVEHO PODPROGRAMU
DB T_PROG
DW TPROG ;SKOK DO STROJOVEHO KODU
DB T_NZ2
DW TNZ2 ;NEZAPONENE VYVODY PRO ZOBRAZENI DIL MAX DIL 16
DB T_NZ3
DW TNZ3 ;NEZAPONENE VYVODY PRO ZOBRAZENI DIL MAX DIL 24
DB T_ZIF14
DW TZIF14 ;PRIZNAK POUZDRA DIL14 V ZIF16
DB T_NIC
DW TNIC ;NENI TESTOVACI TABULKA
DB T_KONEC
DW TKONEC ;KONEC TESTU
DB -1 ;KONEC TABULKY
ENDIF
;===============================
;NASTAVENI V/V PRO MAX DIL 16
4628 CD 4636 TVV2: CALL TVV2P
462B 3A 5970 TVVN: LDA ANAP ;STAV NAPAJENI
462E 06 40 MVI B,ZSTAV ;JESTE ZAKLADNI STAV P. REG.
4630 B0 ORA B
4631 D3 3B OUT P_REG ;ZAPIS DO POM. REGISTRU
4633 C3 450D JMP TESTHS ;NAVRAT DO HLAVI SMICKY
;-------------------------------
4636 06 C0 TVV2P: MVI B,POV_OUT ;VYBER POV. REG. PRO VYSTUP
4638 3A 5970 LDA ANAP
463B B0 ORA B ;A PRICI AKTUALNI NAPAJENI
463C D3 3B OUT P_REG ;ZAPIS DO POM. REGISTRU
463E 23 INX H
463F 7E MOV A,M
4640 D3 38 OUT PORT1
4642 32 5982 STA VVZ ;ULOZ PRO ZOBRAZENI PRO DIL CO JE VSTUP A VYSTUP PORT 1
4645 23 INX H
4646 7E MOV A,M
4647 D3 39 OUT PORT2
4649 32 5983 STA VVZ+1 ;ULOZ PRO ZOBRAZENI PRO DIL CO JE VSTUP A VYSTUP PORT 2
464C C9 RET
;===============================
;NASTAVENI V/V PRO MAX DIL 24
464D CD 4636 TVV3: CALL TVV2P
4650 23 INX H
4651 7E MOV A,M
4652 D3 3A OUT PORT3
4654 32 5984 STA VVZ+2 ;ULOZ PRO ZOBRAZENI PRO DIL CO JE VSTUP A VYSTUP PORT 3
PROGRAM IOT MACRO-80 3.44 09-Dec-81 PAGE 1-11
4657 C3 462B JMP TVVN ;NASTAV AKTUALNI NAPAJENI
;===============================
;NASTAVENI NEZAPOJENYCH VYVODU PRO ZOBRAZENI DIL
465A CD 4660 TNZ2: CALL TNZ2A
465D C3 450D JMP TESTHS ;NAVRAT DO HLAVI SMICKY
4660 23 TNZ2A: INX H
4661 7E MOV A,M
4662 32 598F STA NCZ ;ULOZ NEZAPOJENE VYVODY PRO ZOBRAZENI DIL NA PORTU 1
4665 23 INX H
4666 7E MOV A,M
4667 32 5990 STA NCZ+1 ;ULOZ NEZAPOJENE VYVODY PRO ZOBRAZENI DIL NA PORTU 2
466A C9 RET
;===============================
466B CD 4660 TNZ3: CALL TNZ2A
466E 23 INX H
466F 7E MOV A,M
4670 32 5991 STA NCZ+2 ;ULOZ NEZAPOJENE VYVODY PRO ZOBRAZENI DIL NA PORTU 3
4673 C3 450D JMP TESTHS ;NAVRAT DO HLAVI SMICKY
;===============================
;NASTAV PRIZNAK POUZDRA DIL14 V ZIF16
4676 3E 01 TZIF14: MVI A,1
4678 32 5992 STA ZIF14 ;ULOZ PRIZNAK POUZDRA DIL14 V ZIF16
467B C3 450D JMP TESTHS ;NAVRAT DO HLAVI SMICKY
;===============================
;NASTAVENI A ZAPNUTI NAPETI
467E 23 TNAP: INX H
467F 3A 5971 LDA PP ;POCET PRUCHODU
4682 FE 0A CPI PPK ;JE TO PRVNI PRUCHOD
4684 C2 46B3 JNZ TNAP3 ;JINAK POKRACUJEM
4687 7E MOV A,M
4688 32 5970 STA ANAP ;ULOZ PRO POZDEJI
468B D3 3B OUT P_REG ;ROZNI LED
468D E6 07 ANI 00000111B ;CHCEME JEN SPODI 3 BITY
468F 32 597F STA DIL ;ULOZ PRO ZOBRAZENI DIL NAPAJENI
4692 CD 4896 CALL CRLF2
4695 11 55CE LXI D,ZALOZT
4698 CD 489C CALL PRINT ;ZALOZ IO
469B CD 48B4 TNAP2: CALL CTIZ
469E FE 1B CPI ESC
46A0 CA 448F JZ VYBIO3 ;NAVRAT NA VYBER IO
46A3 FE 0D CPI CR
46A5 C2 469B JNZ TNAP2 ;CEKAME NA "CR"
46A8 06 20 MVI B,Z_NAP ;PRIZNAK PRO ZAPNUTI NAPAJANI
46AA 3A 5970 LDA ANAP ;JAKE NAPAJENI
46AD B0 ORA B
46AE 32 5970 STA ANAP ;ULOZ STAV NAPAJENI
46B1 D3 3B OUT P_REG ;ZAPNI NAPAJENI
46B3 CD 4903 TNAP3: CALL WAIT24 ;POCKEJ 24mS
46B6 C3 450D JMP TESTHS ;NAVRAT DO HLAVI SMICKY
;===============================
;BLOK PRO VYSTAVEVANI DAT NA PORT
46B9 CD 46DD TO1: CALL TO1P
PROGRAM IOT MACRO-80 3.44 09-Dec-81 PAGE 1-12
46BC C3 450D JMP TESTHS ;NAVRAT DO HLAVI SMICKY
46BF CD 46DD TO12: CALL TO1P
46C2 CD 46E5 TO2: CALL TO2P
46C5 C3 450D JMP TESTHS ;NAVRAT DO HLAVI SMICKY
46C8 CD 46DD TO13: CALL TO1P
46CB CD 46ED CALL TO3P
46CE C3 450D JMP TESTHS ;NAVRAT DO HLAVI SMICKY
46D1 CD 46DD TO123: CALL TO1P
46D4 CD 46E5 TO23: CALL TO2P
46D7 CD 46ED TO3: CALL TO3P
46DA C3 450D JMP TESTHS ;NAVRAT DO HLAVI SMICKY
46DD 23 TO1P: INX H ;VYSTAVENI DAT NA PORT1
46DE 7E MOV A,M
46DF D3 38 OUT PORT1
46E1 32 5985 STA VDAT ;ULOZ PRO ZOBRAZENI DIL Z PORTU 1
46E4 C9 RET
46E5 23 TO2P: INX H ;VYSTAVENI DAT NA PORT2
46E6 7E MOV A,M
46E7 D3 39 OUT PORT2
46E9 32 5986 STA VDAT+1 ;ULOZ PRO ZOBRAZENI DIL Z PORTU 2
46EC C9 RET
46ED 23 TO3P: INX H ;VYSTAVENI DAT NA PORT3
46EE 7E MOV A,M
46EF D3 3A OUT PORT3
46F1 32 5987 STA VDAT+2 ;ULOZ PRO ZOBRAZENI DIL Z PORTU 3
46F4 C9 RET
;===============================
;BLOK PRO POROVNANI DAT Z PORTU
46F5 CD 4728 TI1: CALL TI1P
46F8 C3 4716 JMP TI
46FB CD 4728 TI12: CALL TI1P
46FE CD 473B TI2: CALL TI2P
4701 C3 4716 JMP TI
4704 CD 4728 TI13: CALL TI1P
4707 CD 474E CALL TI3P
470A C3 4716 JMP TI
470D CD 4728 TI123: CALL TI1P
4710 CD 473B TI23: CALL TI2P
4713 CD 474E TI3: CALL TI3P
4716 3A 5978 TI: LDA ZOBRO ;PRIZNAK ZOBRAZOVANI DIL
4719 FE 01 CPI 01
471B CC 4D05 CZ ZDIL ;SKOK POKUT SE ZOBRAZUJE DIL
471E 3A 5993 LDA ERR ;PRIZNAK CHYBY
4721 A7 ANA A
4722 C4 4D05 CNZ ZDIL ;JE-LI TAK ZOBRAZ DIL
4725 C3 450D JMP TESTHS ;NAVRAT DO HLAVI SMICKY
4728 DB 38 TI1P: IN PORT1 ;POROVNANI DAT Z PORTU 1
472A 47 MOV B,A ;SCHOV DATA Z PORTU
472B 32 5988 STA CDAT ;ULOZ CTENA DATA Z PORTU 1 PRO ZOBRAZENI DIL
472E 23 INX H
472F 7E MOV A,M
4730 32 5985 STA VDAT ;ULOZ PRO ZOBRAZENI DIL Z PORTU 1
4733 A8 XRA B ;POROVNEJ
4734 C8 RZ
PROGRAM IOT MACRO-80 3.44 09-Dec-81 PAGE 1-13
4735 11 55F1 LXI D,ERR1T
4738 C3 475E JMP TIXP
473B DB 39 TI2P: IN PORT2 ;POROVNANI DAT Z PORTU 2
473D 47 MOV B,A ;SCHOV DATA Z PORTU
473E 32 5989 STA CDAT+1 ;ULOZ CTENA DATA Z PORTU 2 PRO ZOBRAZENI DIL
4741 23 INX H
4742 7E MOV A,M
4743 32 5986 STA VDAT+1 ;ULOZ PRO ZOBRAZENI DIL Z PORTU 2
4746 A8 XRA B ;POROVNEJ
4747 C8 RZ
4748 11 55F4 LXI D,ERR2T
474B C3 475E JMP TIXP
474E DB 3A TI3P: IN PORT3 ;POROVNANI DAT Z PORTU 3
4750 47 MOV B,A ;SCHOV DATA Z PORTU
4751 32 598A STA CDAT+2 ;ULOZ CTENA DATA Z PORTU 3 PRO ZOBRAZENI DIL
4754 23 INX H
4755 7E MOV A,M
4756 32 5987 STA VDAT+2 ;ULOZ PRO ZOBRAZENI DIL Z PORTU 3
4759 A8 XRA B ;POROVNEJ
475A C8 RZ
475B 11 55F7 LXI D,ERR3T
475E 3A 5993 TIXP: LDA ERR ;PRIZNAK CHYBY
4761 A7 ANA A
4762 C0 RNZ ;JE-LI TAK SE VRAT
4763 22 598B SHLD HLERR ;ULOZ A PRO ZOBRAZENI CHYBZ
4766 EB XCHG
4767 22 598D SHLD DEERR
476A EB XCHG ;VRAT DO PUVODNIHO STAVU
476B 78 MOV A,B
476C 32 5971 STA PP ;ULOZ DATA Z PORTU
476F 3E 01 MVI A,1
4771 32 5993 STA ERR ;ULOZ PRIZNAK CHIBY
4774 C9 RET
;===============================
;SKOK V TABULCE
4775 23 TGOTO: INX H
4776 5E MOV E,M ;NACTI NIZSI BYTE
4777 23 INX H
4778 56 MOV D,M ;NACTI VYSSI BYTE
4779 EB XCHG ;PROHOD A
477A C3 450E JMP TEST3 ;POKRACUJ V TESTU
;===============================
;NENI TESTOVACI TABULKA
477D CD 4896 TNIC: CALL CRLF2
4780 11 5614 LXI D,TNICT
4783 C3 4584 JMP VYSTV1 ;NA VYBER IO
;===============================
;KONEC TABULKY PRO TEST
4786 3E 2E TKONEC: MVI A,'.'
4788 CD 4937 CALL COA ;ZA PRUCHOD UDELA TECKU
478B 3A 5977 LDA KROKO ;NACTI PRIZNAK KROKOVANI
PROGRAM IOT MACRO-80 3.44 09-Dec-81 PAGE 1-14
478E FE 01 CPI 01
4790 C2 479D JNZ TKONEC1 ;NENI KROKOVANI
4793 CD 48B4 CALL CTIZ ;CTI ZNAK Z KOZOLI
4796 3A 5977 LDA KROKO ;NACTI PRIZNAK KROKOVANI
4799 07 RLC ;VYPNI DOCASNE KROKOVANI
479A 32 5977 STA KROKO ;ULOZ PRIZNAK KROKOVANI
479D 3A 5978 TKONEC1:LDA ZOBRO ;NACTI PRIZNAK ZOBRAZOVANI DIL
47A0 FE 01 CPI 01
47A2 C2 47A9 JNZ TKONEC2 ;NENI ZOBRAZOVANI DIL
47A5 07 RLC ;VYPNI DOCASNE ZOBRAZOVANI DIL
47A6 32 5978 STA ZOBRO ;ULOZ PRIZNAK ZOBRAZOVANI DIL
47A9 3A 5971 TKONEC2:LDA PP ;NACTI POCET PRUCHODU
47AC 3D DCR A ;POCET PRUCHODU -1
47AD 32 5971 STA PP ;ULOZ POCET PRUCHODU
47B0 CA 47B9 JZ FKONEC ;JE KONEC TESTU
47B3 2A 596C LHLD TTAB ;OBNOV AKTUALNI TEST TABULKU
47B6 C3 450E JMP TEST3 ;POKRACUJ V TESTU
47B9 3A 5977 FKONEC: LDA KROKO ;NACTI PRIZNAK KROKOVANI
47BC FE 02 CPI 02
47BE C2 47C5 JNZ TKONEC3 ;NENI DACASNE VYPNUTE KROKOVANI
47C1 0F RRC ;ZAPNI DACASNE VYPNUTE KROKOVANI
47C2 32 5977 STA KROKO ;ULOZ PRIZNAK KROKOVANI
47C5 3A 5978 TKONEC3:LDA ZOBRO ;NACTI PRIZNAK ZOBRAZOVANI DIL
47C8 FE 02 CPI 02
47CA C2 47D1 JNZ TKONEC4 ;NENI DACASNE VYPNUTE ZOBRAZOVANI DIL
47CD 0F RRC ;ZAPNI DACASNE VYPNUTE ZOBRAZOVANI DIL
47CE 32 5978 STA ZOBRO ;ULOZ PRIZNAK ZOBRAZOVANI DIL
47D1 CD 4896 TKONEC4:CALL CRLF2
47D4 11 55FA LXI D,TKT ;TEXT USPESNEHO KONCE TESTU
47D7 CD 489C CALL PRINT
47DA C3 459F JMP VYSTV2 ;NA VYBER IO
;===============================
;SKOK DO PODPROGRAMU V TABULCE
;JE MOZNA JEN JEDNA UROVEN
47DD 23 TGOSUB: INX H
47DE 5E MOV E,M ;NACTI NIZSI BYTE
47DF 23 INX H
47E0 56 MOV D,M ;NACTI VYSSI BYTE
47E1 22 5975 SHLD AGOSUB ;ULOZ ADRESU PRO NAVRAT
47E4 EB XCHG ;PROHOD A
47E5 C3 450E JMP TEST3 ;POKRACUJ V TESTU
;===============================
;NAVRAT Z PODPOGRAMU V TABUKCU
47E8 2A 5975 TRET: LHLD AGOSUB ;OBNOV ADRESU V TABULCE
47EB C3 450D JMP TESTHS ;NAVRAT DO HLAVI SMICKY
;===============================
;SKOK DO STROJOVEHO KODU
;NAVRAT ZE STROJOVEHO KODU SE PROVEDE STANDARTNE INSTRUKCI RET
47EE 23 TPROG: INX H
47EF 5E MOV E,M ;NACTI NIZSI BYTE
47F0 23 INX H
47F1 56 MOV D,M ;NACTI VYSSI BYTE ADRESY STOJOVEHO PODPROGRAMU
47F2 E5 PUSH H ;SCHOV ADRESU V TESTOVACI TABULCE
PROGRAM IOT MACRO-80 3.44 09-Dec-81 PAGE 1-15
47F3 21 47F9 LXI H,TPROGR ;NAVRATOVA ADRESA
47F6 E5 PUSH H ;A ULOZ JI
47F7 EB XCHG ;PROHOD A
47F8 E9 PCHL ;SKOC DO SROJOVEHO KODU
47F9 E1 TPROGR: POP H ;OBNOV ADRESU V TESTOVACI TABULCE
47FA C3 450D JMP TESTHS ;NAVRAT DO HLAVNI PROGRAMOVE SMYCKY
;*******************************
;PODPROGRAMY
;*******************************
47FD 2A 5966 VYBER: LHLD ZTAB ;POCATEKU TABULKY
4800 3E 0D VYBER1: MVI A,CR
4802 CD 4937 CALL COA ;NA ZACATEK RADKU
4805 54 MOV D,H
4806 5D MOV E,L ; DO
4807 CD 489C CALL PRINT ;ZOBRAZ TEXT
480A CD 48B4 VYBER2: CALL CTIZ ;CTI ZNAK Z KOZOLI
480D FE 3E CPI '>'
480F CA 4825 JZ DALSI ;DALSI POLOZKA
4812 FE 3C CPI '<'
4814 CA 4843 JZ KZP ;PREDCHOZI POLOZKA
4817 FE 0D CPI CR
4819 C8 RZ
481A FE 1B CPI ESC ;NAVRAT O UROVEN VISE
481C C8 RZ
481D FE 23 CPI '#'
481F CC 4861 CZ NASTAV ;NASTAVENI ...
4822 C3 4800 JMP VYBER1
4825 EB DALSI: XCHG ;PROHOD A
4826 21 5968 LXI H,KTAB ;ADRESA PROMNENE KONECE TABULKY
4829 23 INX H ;ADRESA VYSSIHO BYTE
482A 7E MOV A,M ;NACTI VYSSI BYTE
482B BA CMP D ;POROVNEJ S AKTUALNIM VYSSI BYTE
482C C2 483B JNZ DALSI1
482F 2B DCX H ;ADRESA NIZSIHO BYTE
4830 7E MOV A,M ;NACTI NIZSSI BYTE
4831 BB CMP E ;POVNEJ S AKTUALNIM NIZSSI BYTE
4832 C2 483B JNZ DALSI1
4835 2A 5966 LHLD ZTAB ;POKUT SHOTA TAK NA ZACATEK TABULKY
4838 C3 4800 JMP VYBER1 ;DALSI VYBER
483B EB DALSI1: XCHG ;PROHOD A
483C 11 0015 LXI D,BLOKP
483F 19 DAD D ;PRICTI DELKU TABULKY
4840 C3 4800 JMP VYBER1 ;DALSI VYBER
4843 EB KZP: XCHG ;PROHOD A
4844 21 5966 LXI H,ZTAB ;ADRESA PROMNENE ZACATKU TABULKY
4847 23 INX H ;ADRESA VYSSIHO BYTE
4848 7E MOV A,M ;NACTI VYSSI BYTE
4849 BA CMP D ;POVNEJ S AKTUALNIM VYSSI BYTE
484A C2 4859 JNZ KZP1
484D 2B DCX H ;ADRESA NIZSIHO BYTE
484E 7E MOV A,M ;NACTI NIZSSI BYTE
484F BB CMP E ;POVNEJ S AKTUALNIM NIZSSI BYTE
PROGRAM IOT MACRO-80 3.44 09-Dec-81 PAGE 1-16
4850 C2 4859 JNZ KZP1
4853 2A 5968 LHLD KTAB ;POKUT SHOTA TAK NA KONEC TABULKY
4856 C3 4800 JMP VYBER1 ;DALSI VYBER
4859 EB KZP1: XCHG ;PROHOD A
485A 11 FFEB LXI D,BLOKO
485D 19 DAD D ;ODECTI DELKU TABULKY
485E C3 4800 JMP VYBER1 ;DALSI VYBER
;===============================
4861 11 57D1 NASTAV: LXI D,NASTAVT
4864 CD 489C CALL PRINT
4867 CD 48B4 NASTAV2:CALL CTIZ ;CTI ZNAK Z KOZOLI
486A FE 41 CPI 'A'
486C CA 4AF7 JZ NADP1 ;NASTAVENI PREVODNIKU ADP-1
486F FE 61 CPI 'a'
4871 CA 4AF7 JZ NADP1 ;NASTAVENI PREVODNIKU ADP-1
4874 FE 44 CPI 'D'
4876 CA 4C21 JZ DTO ;NASTAVENI NAPETI A PROUDU NA DTO-1
4879 FE 64 CPI 'd'
487B CA 4C21 JZ DTO ;NASTAVENI NAPETI A PROUDU NA DTO-1
487E FE 43 CPI 'C'
4880 CA 4A3A JZ FCPU ;NASTAVENI FREKVENCE CPU
4883 FE 63 CPI 'c'
4885 CA 4A3A JZ FCPU ;NASTAVENI FREKVENCE CPU
4888 FE 1B CPI ESC
488A CA 4896 JZ CRLF2 ;NAVRAT
488D C3 4867 JMP NASTAV2
;===============================
4890 11 5401 HELP: LXI D,HELPT
4893 CD 489C CALL PRINT
4896 CRLF2:
4896 CD 4899 NAVRAT: CALL CRLF
;===============================
4899 11 5583 CRLF: LXI D,CRLFT
;===============================
IF SYS ;CPM
PRINT: MVI C,9
BDOS1: PUSH B
PUSH H
CALL BDOS
POP H
POP B
RET
ELSE ;MIKOS
489C 1A PRINT: LDAX D ;NACTI DATA
489D FE 24 CPI '$' ;TEST KONCE TEXTU
489F C8 RZ ;JE-LI TAK NAVRAT
48A0 FE 60 CPI 'a'-1
PROGRAM IOT MACRO-80 3.44 09-Dec-81 PAGE 1-17
48A2 DA 48AC JC PRINT1
48A5 FE 7B CPI 'z'+1
48A7 D2 48AC JNC PRINT1
48AA E6 DF ANI 11011111B ;PREVED NA VELKA PISMENA
48AC 4F PRINT1: MOV C,A
48AD CD 0109 CALL CO ;VYTISKNI ZNAK Z REG. 'C'
48B0 13 INX D ;ADRESA DAT +1
48B1 C3 489C JMP PRINT
ENDIF
;===============================
IF SYS ;CPM
CTIZ: MVI C,6
MVI E,0FFH ;CHCEME ZNAK
CALL BDOS1
ANA A
JZ CTIZ ;ZADNY NENI
ELSE ;MIKOS
48B4 CD 0103 CTIZ: CALL CI
ENDIF
48B7 FE 03 CPI CTRLC
48B9 CA 4453 JZ KONEC ;^C - KONEC PROGRAMU
48BC FE 3F CPI '?'
48BE CA 4890 JZ HELP ;ZOBRAZ NAPOVDU
48C1 FE 4B CPI 'K'
48C3 CA 495B JZ KROK ;ZAPNE / VYPNE KROKOVANI
48C6 FE 6B CPI 'k'
48C8 CA 495B JZ KROK ;ZAPNE / VYPNE KROKOVANI
48CB FE 5A CPI 'Z'
48CD CA 4985 JZ NDIL ;ZAPNE / VYPNE ZOBRAZENI DIL
48D0 FE 7A CPI 'z'
48D2 CA 4985 JZ NDIL ;ZAPNE / VYPNE ZOBRAZENI DIL
48D5 FE 4D CPI 'M'
48D7 CA 49AF JZ ZDNAP ;ZAPNE / VYPNE MERENI NAPETI PRO ZOBRAZENI DIL
48DA FE 6D CPI 'm'
48DC CA 49AF JZ ZDNAP ;ZAPNE / VYPNE MERENI NAPETI PRO ZOBRAZENI DIL
48DF FE 54 CPI 'T'
48E1 CA 49E0 JZ ZTN ;ZAPNE / VYPNE TRIDENI NAPETI
48E4 FE 74 CPI 't'
48E6 CA 49E0 JZ ZTN ;ZAPNE / VYPNE TRIDENI NAPETI
48E9 FE 4C CPI 'L'
48EB CA 4A0A JZ LOGN ;NASTAVI KONTROLNI LOG. UROVNE
48EE FE 6C CPI 'l'
48F0 CA 4A0A JZ LOGN ;NASTAVI KONTROLNI LOG. UROVNE
48F3 FE 2A CPI '*'
48F5 CA 4A64 JZ STAVY ;ZOBRAZI STAVY PREPINACU
48F8 C9 RET
;===============================
;NASTAVENI POCATECNICH PARAMETRU
PROGRAM IOT MACRO-80 3.44 09-Dec-81 PAGE 1-18
48F9 AF VYSTAV: XRA A
48FA D3 3B OUT P_REG ;TETESR DO VYCHOZIHO STAVU
48FC 32 5970 STA ANAP ;I STAV NAPAJENI
48FF 32 5972 STA VVP ;VYCHOZI STAV PRO V/V PARAMETR
4902 C9 RET
;===============================
4903 11 07D0 WAIT24: LXI D,2000D ;24 MILI SEKUND PRO 2MHZ CPU
4906 3A 597D LDA CPU
4909 A7 ANA A
490A CA 4910 JZ WAIT
490D 11 0FA0 LXI D,4000D ;24 MILI SEKUND PRO 4MHZ CPU
;===============================
;CEKACI SMYCKA
4910 1B WAIT: DCX D ;DE*12us+5us
4911 7A MOV A,D
4912 B3 ORA E
4913 C2 4910 JNZ WAIT ;DOKUD NENI DE=0
4916 C9 RET
;===============================
;TISK OBSAHU V HEXA KODU
4917 7C HADR: MOV A,H
4918 CD 491C CALL DBYT ;VYPISE H
491B 7D MOV A,L
;-------------------------------
491C F5 DBYT: PUSH PSW ;VYPISE BYTE V REG. A
491D CD 492A CALL HBYTE
4920 CD 4937 CALL COA
4923 F1 POP PSW
4924 CD 492E CALL LBYTE ;VYPISE DOLNI NIBBLE REG A
4927 C3 4937 JMP COA
;-------------------------------
492A 0F HBYTE: RRC
492B 0F RRC
492C 0F RRC
492D 0F RRC
492E E6 0F LBYTE: ANI 0FH
4930 C6 90 ADI 90H ;PREVOD HEX-->ASCII
4932 27 DAA
4933 CE 40 ACI '@'
4935 27 DAA
4936 C9 RET
;-------------------------------
;TISK ZNAKU Z REG. <A>
4937 E5 COA: PUSH H
4938 D5 PUSH D
4939 C5 PUSH B
IF SYS ;CPM
MOV E,A
MVI C,2
CALL BDOS ;VYPIS ZNAKU Z REG. 'E'
PROGRAM IOT MACRO-80 3.44 09-Dec-81 PAGE 1-19
ELSE ;MIKOS
493A 4F MOV C,A
493B CD 0109 CALL CO ;VYPIS ZNAKU Z REG. 'C'
ENDIF
493E C1 POP B
493F D1 POP D
4940 E1 POP H
4941 C9 RET
;===============================
;TISK REGISRTRU "A" V BIN. TVARU
4942 57 DBIN: MOV D,A ;SCHOV DATA
4943 3E 20 MVI A,' ' ;MEZERA
4945 CD 4937 CALL COA ;TISK MEZERY
4948 1E 08 MVI E,8 ;MAME 8 BITU
494A 7A DBIN2: MOV A,D ;OBNOV DATA
494B 17 RAL ;DALSI BIT DO "CY"
494C 57 MOV D,A ;SCHOV DATA
494D 3E 31 MVI A,'1' ;NASTAV 1
494F DA 4953 JC DBIN1 ;JDEM TISKNOUT 1
4952 3D DCR A ;BUDE 0
4953 CD 4937 DBIN1: CALL COA ;VYTISKNI ZNAK
4956 1D DCR E ;POCITALO -1
4957 C2 494A JNZ DBIN2 ;ZNOVU
495A C9 RET
;===============================
;ZAPNE / VYPNE KROKOVANI
495B CD 4896 KROK: CALL CRLF2
495E 3A 5977 LDA KROKO ;NACTI PRIZNAK KROKO
4961 A7 ANA A
4962 CA 4975 JZ KROK1
4965 3D DCR A ;VYPNI KROKOVANI
4966 32 5977 STA KROKO ;ULOZ PRIZNAK KROKO
4969 11 5645 LXI D,KROKT
496C CD 489C CALL PRINT
496F 11 5638 LXI D,VYPT
4972 C3 489C JMP PRINT
4975 3C KROK1: INR A ;ZAPNI KROKOVANI
4976 32 5977 STA KROKO ;ULOZ PRIZNAK KROKO
4979 11 5645 LXI D,KROKT
497C CD 489C CALL PRINT
497F 11 562B LXI D,ZAPT
4982 C3 489C JMP PRINT
;===============================
;ZAPNE / VYPNE ZOBRAZOVANI DIL
4985 CD 4896 NDIL: CALL CRLF2
4988 3A 5978 LDA ZOBRO ;NACTI PRIZNAK ZOBRO
498B A7 ANA A
498C CA 499F JZ NDIL1
498F 3D DCR A ;VYPNI ZOBRAZOVANI DIL
4990 32 5978 STA ZOBRO ;ULOZ PRIZNAK ZOBRO
PROGRAM IOT MACRO-80 3.44 09-Dec-81 PAGE 1-20
4993 11 564F LXI D,ZOBRT
4996 CD 489C CALL PRINT
4999 11 5638 LXI D,VYPT
499C C3 489C JMP PRINT
499F 3C NDIL1: INR A ;ZAPNI ZOBRAZOVANI DIL
49A0 32 5978 STA ZOBRO ;ULOZ PRIZNAK KROKO
49A3 11 564F LXI D,ZOBRT
49A6 CD 489C CALL PRINT
49A9 11 562B LXI D,ZAPT
49AC C3 489C JMP PRINT
;===============================
;ZAPNE / VYPNE ZOBRAZOVANI NAPETI U DIL
49AF CD 4896 ZDNAP: CALL CRLF2
49B2 3A 5979 LDA MNAP ;NACTI PRIZNAK MNAP
49B5 A7 ANA A
49B6 CA 49C9 JZ ZDNAP1
49B9 3D ZDNAP2: DCR A ;VYPNI ZOBRAZOVANI NAPETI U DIL
49BA 32 5979 STA MNAP ;ULOZ PRIZNAK MNAP
49BD 11 565D LXI D,MNAPT
49C0 CD 489C CALL PRINT
49C3 11 5638 LXI D,VYPT
49C6 C3 489C JMP PRINT
49C9 CD 4BDD ZDNAP1: CALL PADP1 ;TEST NA PRITOMNOST PREVODNIKU ADP-1
49CC A7 ANA A
49CD C2 49B9 JNZ ZDNAP2 ;JE-LI CHYBA VYPNI ZOBRAZOVANI
49D0 3C INR A ;ZAPNI ZOBRAZOVANI NAPETI U DIL
49D1 32 5979 STA MNAP ;ULOZ PRIZNAK MNAP
49D4 11 565D LXI D,MNAPT
49D7 CD 489C CALL PRINT
49DA 11 562B LXI D,ZAPT
49DD C3 489C JMP PRINT
;===============================
;ZAPNE / VYPNE TRIDENI NAPETI
49E0 CD 4896 ZTN: CALL CRLF2
49E3 3A 597B LDA KTN ;NACTI PRIZNAK TRIDENI NAPETI
49E6 A7 ANA A
49E7 CA 49FA JZ ZTN1
49EA 3D DCR A ;VYPNI TRIDENI NAPETI
49EB 32 597B STA KTN ;ULOZ PRIZNAK KTN
49EE 11 571C LXI D,ZTNT
49F1 CD 489C CALL PRINT
49F4 11 5638 LXI D,VYPT
49F7 C3 489C JMP PRINT
49FA 3C ZTN1: INR A ;ZAPNI TRIDENI NAPETI
49FB 32 597B STA KTN ;ULOZ PRIZNAK KTN
49FE 11 571C LXI D,ZTNT
4A01 CD 489C CALL PRINT
4A04 11 562B LXI D,ZAPT
4A07 C3 489C JMP PRINT
;===============================
;NASTAVI LOG. UROVNE PRO KOTROLU TTL/CMOS
4A0A CD 4896 LOGN: CALL CRLF2
4A0D 3A 597C LDA LOG ;NACTI PRIZNAK LOG UROVNI
PROGRAM IOT MACRO-80 3.44 09-Dec-81 PAGE 1-21
4A10 A7 ANA A
4A11 CA 4A27 JZ LOGN1
4A14 3D DCR A ;VYPNI TRIDENI NAPETI
4A15 32 597C STA LOG ;ULOZ PRIZNAK KTN
4A18 11 57BB LXI D,LOGT
4A1B CD 489C CALL PRINT
4A1E 11 57B0 LXI D,TTLT
4A21 CD 489C CALL PRINT
4A24 C3 4896 JMP CRLF2
4A27 3C LOGN1: INR A ;ZAPNI TRIDENI NAPETI
4A28 32 597C STA LOG ;ULOZ PRIZNAK KTN
4A2B 11 57BB LXI D,LOGT
4A2E CD 489C CALL PRINT
4A31 11 57B5 LXI D,CMOST
4A34 CD 489C CALL PRINT
4A37 C3 4896 JMP CRLF2
;===============================
;NASTAVI FREKVENCI CPU
4A3A CD 4896 FCPU: CALL CRLF2
4A3D 3A 597D LDA CPU ;NACTI PRIZNAK FREKVENCE CPU
4A40 A7 ANA A
4A41 CA 4A54 JZ FCPU1
4A44 3D DCR A ;VYPNI TRIDENI NAPETI
4A45 32 597D STA CPU ;ULOZ PRIZNAK CPU
4A48 11 5845 LXI D,CPUT
4A4B CD 489C CALL PRINT
4A4E 11 5854 LXI D,MHZ2T
4A51 C3 489C JMP PRINT
4A54 3C FCPU1: INR A ;ZAPNI TRIDENI NAPETI
4A55 32 597D STA CPU ;ULOZ PRIZNAK CPU
4A58 11 5845 LXI D,CPUT
4A5B CD 489C CALL PRINT
4A5E 11 585D LXI D,MHZ4T
4A61 C3 489C JMP PRINT
;===============================
;ZOBRAZI STAV PREPINACU
4A64 CD 4896 STAVY: CALL CRLF2
4A67 3E 4B MVI A,'K' ;KROKOVANI
4A69 CD 4937 CALL COA
4A6C 3E 2D MVI A,'-'
4A6E CD 4937 CALL COA
4A71 3A 5977 LDA KROKO
4A74 C6 30 ADI '0'
4A76 CD 4937 CALL COA
4A79 3E 20 MVI A,' '
4A7B CD 4937 CALL COA
4A7E 3E 5A MVI A,'Z' ;ZOBRAZENI DIL
4A80 CD 4937 CALL COA
4A83 3E 2D MVI A,'-'
4A85 CD 4937 CALL COA
4A88 3A 5978 LDA ZOBRO
4A8B C6 30 ADI '0'
4A8D CD 4937 CALL COA
4A90 3E 20 MVI A,' '
PROGRAM IOT MACRO-80 3.44 09-Dec-81 PAGE 1-22
4A92 CD 4937 CALL COA
4A95 3E 4D MVI A,'M' ;MERENI NAPETI
4A97 CD 4937 CALL COA
4A9A 3E 2D MVI A,'-'
4A9C CD 4937 CALL COA
4A9F 3A 5979 LDA MNAP
4AA2 C6 30 ADI '0'
4AA4 CD 4937 CALL COA
4AA7 3E 20 MVI A,' '
4AA9 CD 4937 CALL COA
4AAC 3E 54 MVI A,'T' ;TRIDENI NAPETI
4AAE CD 4937 CALL COA
4AB1 3E 2D MVI A,'-'
4AB3 CD 4937 CALL COA
4AB6 3A 597B LDA KTN
4AB9 C6 30 ADI '0'
4ABB CD 4937 CALL COA
4ABE 3E 20 MVI A,' '
4AC0 CD 4937 CALL COA
4AC3 3E 4C MVI A,'L' ;NASTAVENI LOG UROVNI
4AC5 CD 4937 CALL COA
4AC8 3E 2D MVI A,'-'
4ACA CD 4937 CALL COA
4ACD 11 57B0 LXI D,TTLT
4AD0 3A 597C LDA LOG
4AD3 A7 ANA A
4AD4 CA 4ADA JZ STAVY1
4AD7 11 57B5 LXI D,CMOST
4ADA CD 489C STAVY1: CALL PRINT
4ADD 3E 43 MVI A,'C' ;NASTAVENI FREKVENCE CPU
4ADF CD 4937 CALL COA
4AE2 3E 2D MVI A,'-'
4AE4 CD 4937 CALL COA
4AE7 11 5854 LXI D,MHZ2T
4AEA 3A 597D LDA CPU
4AED A7 ANA A
4AEE CA 4AF4 JZ STAVY2
4AF1 11 585D LXI D,MHZ4T
4AF4 C3 489C STAVY2: JMP PRINT
;===============================
;NASTAVENI PREVODNIKU ADP-1
4AF7 CD 4896 NADP1: CALL CRLF2
4AFA CD 4BDD CALL PADP1 ;ZJISTI PRITOMNOST PREVODNIKU
4AFD A7 ANA A
4AFE C0 RNZ ;PRI CHYBE NAVRAT
4AFF 11 56BB LXI D,TTPOP
4B02 CD 489C CALL PRINT ;UVODNI TEXT PRO NASTAVENI ADP-1
4B05 CD 4896 CALL CRLF2
4B08 06 00 MVI B,0 ;PRO ZACATEK BUDE ZESILENI A=1 A KANAL 0
4B0A NADP2:
IF SYS ;CPM
PUSH B
MVI C,6
PROGRAM IOT MACRO-80 3.44 09-Dec-81 PAGE 1-23
MVI E,0FFH ;CHCEME ZNAK
CALL BDOS1
POP B
ELSE ;MIKOS
4B0A CD 0112 CALL CSTS ;JE STISKLA KLAVESA
4B0D A7 ANA A
4B0E CA 4B28 JZ NADP3 ;NENI
4B11 CD 0103 CALL CI ;PRECTI ZNAK Z KLAVESNICE
ENDIF
4B14 FE 30 CPI '0'
4B16 CA 4B60 JZ ZA1 ;ZESILENI A=1
4B19 FE 31 CPI '1'
4B1B CA 4B65 JZ ZA10 ;ZESILENI A=10
4B1E FE 0D CPI CR
4B20 CA 4896 JZ NAVRAT ;KONEC NASTAVENI
4B23 FE 03 CPI CTRLC
4B25 CA 4453 JZ KONEC ;^C - KONEC PROGRAMU
4B28 78 NADP3: MOV A,B
4B29 A7 ANA A
4B2A 11 5710 LXI D,TZA1 ;ZESILENI A=1
4B2D CA 4B33 JZ NADP4
4B30 11 5717 LXI D,TZA10 ;ZESILENI A=10
4B33 CD 489C NADP4: CALL PRINT
4B36 11 5697 LXI D,TADP1 ;ADP-1/0DH
4B39 CD 489C CALL PRINT
4B3C CD 4B6A CALL CADP1 ;SPUST PRENOD A CTI DATA
4B3F CD 4B96 CALL PNCA ;PREVOD NA KONSOLI "A"
4B42 DB D0 IN ADP1D ;SPODNI CISLICE
4B44 CD 4BC9 CALL PNCB ;PREVOD NA KONSOLI "B"
4B47 11 56B1 LXI D,TADP2M ;../0EH
4B4A CD 489C CALL PRINT
4B4D CD 4B7A CALL CADP2 ;SPUST PRENOD A CTI DATA
4B50 CD 4B96 CALL PNCA ;PREVOD NA KONSOLI "A"
4B53 DB E0 IN ADP2D ;SPODNI CISLICE
4B55 CD 4BC9 CALL PNCB ;PREVOD NA KONSOLI "B"
4B58 3E 0D MVI A,CR
4B5A CD 4937 CALL COA ;NA ZACATEK RADKU
4B5D C3 4B0A JMP NADP2 ;ZNONU
4B60 06 00 ZA1: MVI B,0 ;ZESILENI A=1 A KANAL 0
4B62 C3 4B28 JMP NADP3
4B65 06 10 ZA10: MVI B,10H ;ZESILENI A=10 A KANAL 0
4B67 C3 4B28 JMP NADP3
;-------------------------------
;SPUSTENI PREVODU A PRECTENI NENISIHO BYTE A ZNAMENKA
;V JE CISLO KANALU A ZESILENI
4B6A 78 CADP1: MOV A,B
4B6B D3 D1 OUT ADP1R ;PREPNI KANAL
PROGRAM IOT MACRO-80 3.44 09-Dec-81 PAGE 1-24
4B6D CD 4B8A CALL CEKEJ ;POCKEJ NA USTALENI HODNOT
4B70 D3 D1 OUT ADP1R ;SPUST PREVOD
4B72 DB D1 CADP1A: IN ADP1R
4B74 07 RLC ;NACTI READY DO
4B75 DA 4B72 JC CADP1A ;NENI-LI PREVOD HOTOV TAK ZNOVU
4B78 0F RRC ;NACTENA DATA DO PUVODNIHO STAVU
4B79 C9 RET
;DRUHY PREVODNIK
4B7A 78 CADP2: MOV A,B
4B7B D3 E1 OUT ADP2R ;PREPNI KANAL
4B7D CD 4B8A CALL CEKEJ ;POCKEJ NA USTALENI HODNOT
4B80 D3 E1 OUT ADP2R ;SPUST PREVOD
4B82 DB E1 CADP2A: IN ADP2R
4B84 07 RLC ;NACTI READY DO
4B85 DA 4B82 JC CADP2A ;NENI-LI PREVOD HOTOV TAK ZNOVU
4B88 0F RRC ;NACTENA DATA DO PUVODNIHO STAVU
4B89 C9 RET
;POCKEJ NEZ SE PREPNENE MAC16 A USTALI HODOTA PREVODU
;CEKA SE ASI 1000X DELE NEZ JE KATALOGOVA HODNOTA (CCA MAX 3uS PRO MAC16)
;PROC TO TAK JE NETUSIM
4B8A F5 CEKEJ: PUSH PSW
4B8B C5 PUSH B
4B8C D5 PUSH D
4B8D E5 PUSH H
4B8E CD 4903 CALL WAIT24 ;POCKEJ 24 mS
4B91 E1 POP H
4B92 D1 POP D
4B93 C1 POP B
4B94 F1 POP PSW
4B95 C9 RET
;-------------------------------
;PREVOD NA KONSOLI ZNAMENKO A NEJVISSI CISLICE
4B96 4F PNCA: MOV C,A ;SCHOV NACTENA DATA
4B97 E6 10 ANI 00010000B ;CHCEME JEN ZNAMENKO
4B99 A7 ANA A
4B9A 3E 2B MVI A,'+'
4B9C CA 4BA1 JZ PNCA1
4B9F 3E 2D MVI A,'-'
4BA1 CD 4937 PNCA1: CALL COA ;ZOBRAZ ZNAMENKO
4BA4 78 MOV A,B ;JAKE MAME ZESILENI
4BA5 E6 10 ANI 00010000B ;CHCEME JEN ZESILENI
4BA7 CA 4BBC JZ PNCA2 ;MAME A=1
4BAA 3E 30 MVI A,'0'
4BAC CD 4937 CALL COA ;ZOBRAZ NULU
4BAF 3E 2E MVI A,'.'
4BB1 CD 4937 CALL COA ;A TECKU
4BB4 79 MOV A,C ;OBNOV DATA
4BB5 CD 5373 CALL LDEC ;PREVED SPODNI NIBL
4BB8 CD 4937 CALL COA ;COBRAZ CISLO
4BBB C9 RET
4BBC 79 PNCA2: MOV A,C ;OBNOV DATA
4BBD CD 5373 CALL LDEC ;PREVED SPODNI NIBL
PROGRAM IOT MACRO-80 3.44 09-Dec-81 PAGE 1-25
4BC0 CD 4937 CALL COA ;COBRAZ CISLO
4BC3 3E 2E MVI A,'.'
4BC5 CD 4937 CALL COA ;A TECKU
4BC8 C9 RET
;-------------------------------
;PREVOD NA KONSOLI NIZSI DVE CISLICE A JEDNOTKU
4BC9 4F PNCB: MOV C,A ;SCHOV NACTENA DATA
4BCA CD 536F CALL HDEC ;PREVED HORNI NIBL
4BCD CD 4937 CALL COA ;COBRAZ CISLO
4BD0 79 MOV A,C ;OBNOV DATA
4BD1 CD 5373 CALL LDEC ;PREVED SPODNI NIBL
4BD4 CD 4937 CALL COA ;COBRAZ CISLO
4BD7 3E 56 MVI A,'V'
4BD9 CD 4937 CALL COA ;ZOBRAZ "V"
4BDC C9 RET
;===============================
;TEST NA PRITOMNOST PREVODNIKU ADP-1
;V <A> VRATI:
;ADP-1 PRITOMNY = 0
;CHYBA U NEKTERE ADP-1 = 1
4BDD 0E 00 PADP1: MVI C,0
4BDF DB D1 IN ADP1R
4BE1 17 RAL ;NACTI READY DO
4BE2 D2 4BEE JNC PADP2
4BE5 AF XRA A
4BE6 D3 D1 OUT ADP1R ;SPUST PREVOD
4BE8 DB D1 IN ADP1R
4BEA 17 RAL ;NACTI READY DO
4BEB D2 4BFF JNC PADP3
4BEE 11 5687 PADP2: LXI D,TADPT
4BF1 CD 489C CALL PRINT
4BF4 11 5697 LXI D,TADP1
4BF7 CD 489C CALL PRINT
4BFA CD 4896 CALL CRLF2
4BFD 0E 01 MVI C,1
4BFF DB E1 PADP3: IN ADP2R
4C01 17 RAL ;NACTI READY DO
4C02 D2 4C0E JNC PADP4
4C05 AF XRA A
4C06 D3 E1 OUT ADP2R ;SPUST PREVOD
4C08 DB E1 IN ADP2R
4C0A 17 RAL ;NACTI READY DO
4C0B D2 4C1F JNC PADP5
4C0E 11 5687 PADP4: LXI D,TADPT
4C11 CD 489C CALL PRINT
4C14 11 56A4 LXI D,TADP2
4C17 CD 489C CALL PRINT
4C1A CD 4896 CALL CRLF2
4C1D 0E 01 MVI C,1
4C1F 79 PADP5: MOV A,C
4C20 C9 RET
PROGRAM IOT MACRO-80 3.44 09-Dec-81 PAGE 1-26
;===============================
;NASTAVENI NAPETI A PROUDU NA DTO-1A
4C21 CD 4896 DTO: CALL CRLF2
4C24 CD 4BDD CALL PADP1 ;ZJISTI PRITOMNOST PREVODNIKU
4C27 A7 ANA A
4C28 C0 RNZ ;PRI CHYBE NAVRAT
4C29 E5 PUSH H ;SCHOV ANEB UKAZOVATKO V TABULCE
4C2A 11 5866 LXI D,DTOT
4C2D CD 489C CALL PRINT ;UVODNI TEXT PRO NAPETI A PROUDU NA DTO-1A
4C30 CD 4896 CALL CRLF2
4C33 3E 67 MVI A,DIL24+Z_NAP ;PRO DIL 24
4C35 D3 3B OUT P_REG ;ZAPNI NAPAJENI
4C37 3E 01 MVI A,1 ;PRO ZACATEK DRUHA ADP-1
4C39 32 5971 STA PP ;ULOZ TO DO POCITADLA PROCHODU TESTEM
4C3C D3 D1 OUT ADP1R ;PRVI ADP-1 NASTAV MIMO KANAL 13, 14 a 15
4C3E 06 0C DTO2: MVI B,12 ;MERENI NAPAJECIHO NAPETI, ZESILENI A=1 NA KANALU 13
IF SYS ;CPM
PUSH B
MVI C,6
MVI E,0FFH ;CHCEME ZNAK
CALL BDOS1
POP B
ELSE ;MIKOS
4C40 CD 0112 CALL CSTS ;JE STISKLA KLAVESA
4C43 A7 ANA A
4C44 CA 4C60 JZ DTO3 ;NENI
4C47 CD 0103 CALL CI ;PRECTI ZNAK Z KLAVESNICE
ENDIF
4C4A FE 31 CPI '1'
4C4C CA 4CF2 JZ ADP ;ADP-1/D0
4C4F FE 32 CPI '2'
4C51 CA 4CF2 JZ ADP ;ADP-1/E0
4C54 FE 0D CPI CR
4C56 E1 POP H ;OBNOV ANEB UKAZOVATKO V TABULCE
4C57 CA 4CA9 JZ DTO8 ;KONEC NASTAVENI
4C5A FE 03 CPI CTRLC
4C5C CA 4453 JZ KONEC ;^C - KONEC PROGRAMU
4C5F E5 PUSH H ;SCHOV ANEB UKAZOVATKO V TABULCE
4C60 3A 5971 DTO3: LDA PP
4C63 A7 ANA A
4C64 11 569F LXI D,TADP1D ;0DH
4C67 CA 4C6D JZ DTO4
4C6A 11 56AC LXI D,TADP2D ;0EH
4C6D CD 489C DTO4: CALL PRINT
4C70 11 58BC LXI D,DTONT ;NAPETI
4C73 CD 489C CALL PRINT
4C76 CD 4CE8 CALL DTO5 ;SPUST PRENOD A CTI DATA
4C79 67 MOV H,A ;ULOZ PRO VYPOCRT PROUDU (MENSI CILO)
4C7A CD 4B96 CALL PNCA ;PREVOD NA KONSOLI "A"
4C7D CD 4CDE CALL DTO6 ;SPODNI CISLICE
PROGRAM IOT MACRO-80 3.44 09-Dec-81 PAGE 1-27
4C80 6F MOV L,A ;ULOZ PRO VYPOCET PROUDU
4C81 CD 4BC9 CALL PNCB ;PREVOD NA KONSOLI "B"
4C84 11 58C5 LXI D,DTOPT ;PROUD
4C87 CD 489C CALL PRINT
4C8A E5 PUSH H
4C8B 06 0D MVI B,13 ;MERENI NAPAJECIHO PROUDU, ZESILENI A=1 NA KANALU 14
4C8D CD 4CAF CALL DTO1
4C90 CD 4CD0 CALL DTO7
4C93 E1 POP H
4C94 06 0E MVI B,14 ;MERENI NAPAJECIHO PROUDU, ZESILENI A=1 NA KANALU 15
4C96 CD 4CAF CALL DTO1
4C99 3E 2E MVI A,'.' ;ZOBRAZ TECCKU
4C9B CD 4937 CALL COA
4C9E CD 4CD0 CALL DTO7
4CA1 3E 0D MVI A,CR ;NA ZACETEK RADKU
4CA3 CD 4937 CALL COA
4CA6 C3 4C3E JMP DTO2 ;DALSI MERENI
4CA9 CD 48F9 DTO8: CALL VYSTAV ;VYCHOZI STAV DTO-1 A BWP-1
4CAC C3 4896 JMP NAVRAT ;KONEC NASTAVENI
;SPOLECNE CASTI
4CAF CD 4CE8 DTO1: CALL DTO5 ;SPUST PRENOD A CTI DATA
4CB2 E6 0F ANI 00001111B ;CHCEMA JEN CISLO
4CB4 57 MOV D,A ;ULOZ PRO VYPOCRT PROUDU (VETSI CILO)
4CB5 CD 4CDE CALL DTO6 ;SPODNI CISLICE
4CB8 5F MOV E,A ;ULOZ PRO VYPOCRT PROUDU
4CB9 7C MOV A,H
4CBA E6 0F ANI 00001111B ;CHCEMA JEN CISLO
4CBC 47 MOV B,A
4CBD 4D MOV C,L ;MENSI CILO JE V
4CBE CD 527A CALL ODECTI ;ODECITANI DESTKOVE -=
4CC1 7D MOV A,L ;STOVKY
4CC2 CD 5373 CALL LDEC ;PREVED SPODNI NIBL
4CC5 CD 4937 CALL COA ;COBRAZ CISLO
4CC8 7C MOV A,H ;DESITKY
4CC9 CD 536F CALL HDEC ;PREVED HORNI NIBL
4CCC CD 4937 CALL COA ;COBRAZ CISLO
4CCF C9 RET
4CD0 7C DTO7: MOV A,H ;JEDNOTKY
4CD1 CD 5373 CALL LDEC ;PREVED SPODNI NIBL
4CD4 CD 4937 CALL COA ;COBRAZ CISLO
4CD7 11 58CE LXI D,DTOJT ;JEDNOTKY
4CDA CD 489C CALL PRINT
4CDD C9 RET
4CDE 3A 5971 DTO6: LDA PP ;KTEROU ADP-1
4CE1 A7 ANA A
4CE2 DB D0 IN ADP1D ;SPODNI CISLICE ADP-1/0DH
4CE4 C8 RZ
4CE5 DB E0 IN ADP2D ;SPODNI CISLICE ADP-1/0EH
4CE7 C9 RET
4CE8 3A 5971 DTO5: LDA PP ;KTEROU ADP-1
4CEB A7 ANA A
4CEC CA 4B6A JZ CADP1 ;SPUST PRENOD NA ADP-1/0DH A CTI DATA
PROGRAM IOT MACRO-80 3.44 09-Dec-81 PAGE 1-28
4CEF C3 4B7A JMP CADP2 ;SPUST PRENOD NA ADP-1/0EH A CTI DATA
4CF2 3D ADP: DCR A ;-1
4CF3 E6 01 ANI 00000001B ;CHCEMA JEN NEJNISI BIT
4CF5 32 5971 STA PP ;ULOZ KTEROU ADP-1 DO POCITADLA PROCHODU TESTEM
4CF8 CA 4D00 JZ ADP1
4CFB D3 E1 OUT ADP2R ;DRUHOU ADP-1 NASTAV MIMO KANAL 12 A 13
4CFD C3 4C60 JMP DTO3
4D00 D3 D1 ADP1: OUT ADP1R ;PRVI ADP-1 NASTAV MIMO KANAL 12 A 13
4D02 C3 4C60 JMP DTO3
;===============================
;ZOBRAZENI DIL ANEB PREHLEDNE ZOBAZENI STAVU NA DIL PRI CTENI
;VYMAZ CELE TABULKY A NASTAVENI ZAKLADNICH CR-LF A $
;FORMAT RADKU
;
; 1 2 3
;12345678901234567890123456789012345678
;+0.00V 0 0 XXX 1 14 YYY 1 1 +0.00V
; | | | | | | | | | |
; | | | | | | | | | +- NAPETI NA PATICI
; | | | | | | | | +----- LOG. STAV NA PATICI
; | | | | | | | +-------- LOG. STAV DLE TABULKY
; | | | | | | +----------- TYP SIGNALU (GND, VCC, IN, OUT, NZ)
; | | | | +---+-------------- CISLO VYVODU
; | | | +---------------------- TYP SIGNALU (GND, VCC, IN, OUT, NZ)
; | | +------------------------- LOG. STAV DLE TABULKY
; | +---------------------------- LOG. STAV NA PATICI
; +--------------------------------- NAPETI NA PATICI
;
; 1 2 3
;12345678901234567890123456789012345678
; 000mA 0 0 XXX 1 14 YYY 1 1 000mA
; | |
; | |
; +-------------------------------+- NAPAJECI PROUD V mA NA POZICI GND
;
; 1 2 3
;12345678901234567890123456789012345678
;00.0mA 0 0 XXX 1 14 YYY 1 1 00.0mA
; | |
; +-------------------------------+- NAPAJECI PROUD V 0.1mA NA POZICI GND
;
4D05 E5 ZDIL: PUSH H ;SCHOV UKAZATEL V TESTOVACI TABULCE
4D06 21 599F LXI H,POLE ;POCATEK POLE PRO ZOBRAZENI DIL
4D09 E5 PUSH H ;ULOZ POCATEK POLE
4D0A 11 01E0 LXI D,480 ;VELIKOST POLE
4D0D 36 20 ZDIL1: MVI M,' ' ;ULOZ MEZERU
4D0F 23 INX H ;ADRESA +1
4D10 1B DCX D ;POCITALO -1
4D11 7B MOV A,E
4D12 B2 ORA D
4D13 C2 4D0D JNZ ZDIL1 ;NENI-LI KONEC TAK ZNOVU
4D16 21 F200 LXI H,POLE2 ;POCATEK POLE PRO VYHODNOCENI NAPETI
4D19 11 0200 LXI D,512 ;VELIKOST POLE
4D1C 36 FF ZDIL17: MVI M,-1 ;BUDEME ZAPISOVAT FFH
PROGRAM IOT MACRO-80 3.44 09-Dec-81 PAGE 1-29
4D1E 23 INX H ;ADRESA +1
4D1F 1B DCX D ;POCITALO -1
4D20 7B MOV A,E
4D21 B2 ORA D
4D22 C2 4D1C JNZ ZDIL17 ;NENI-LI KONEC TAK ZNOVU
4D25 E1 POP H ;OBNOV POCATEK POLE PRO ZOBRAZENI DIL
4D26 06 0B MVI B,11 ;POCET RADKU
4D28 11 0026 LXI D,38 ;KROK V TABULCE
4D2B 19 ZDIL2: DAD D
4D2C 36 0D MVI M,CR ;ULOZ CR
4D2E 23 INX H
4D2F 36 0A MVI M,LF ;ULOZ LF
4D31 23 INX H
4D32 05 DCR B
4D33 C2 4D2B JNZ ZDIL2 ;NENI-LI KONEC TAK ZNOVU
4D36 3E 24 MVI A,'$'
4D38 32 5B7D STA POLE+478 ;ULOZ KONCOVY ZNAK
;-------------------------------
;NACTENI PARAMTU PRO ZOBRAZENI DIL, GND, VCC, ...
4D3B 3A 597F LDA DIL ;NACTI NAPAJENI
4D3E 07 RLC ;* 2
4D3F 07 RLC ;* 4
4D40 07 RLC ;* 8
4D41 4F MOV C,A
4D42 06 00 MVI B,0 ;KOLIK PRICIST
4D44 21 5378 LXI H,TABD1 ;POCATEK TABULKY
4D47 09 DAD B ;V ADRESA V TABULCE
4D48 46 MOV B,M ;POCATECNI HODNOTA PRO LEVI SLOUPEC
4D49 23 INX H
4D4A 4E MOV C,M ;POCATECNI HODNOTA PRO PRVY SLOPEC
4D4B 23 INX H
4D4C 5E MOV E,M ;NACTI NIZSI BYTE
4D4D 23 INX H
4D4E 56 MOV D,M ;NACTI VYSSI BYTE ADRESY ODKUT ZOBRAZOVAT
4D4F D5 PUSH D ;SCHOV ADRESU ODKUT ZOBRAZIT
4D50 23 INX H
4D51 5E MOV E,M ;NACTI NIZSI BYTE
4D52 23 INX H
4D53 56 MOV D,M ;NACTI VYSSI BYTE ADRESY GND
4D54 D5 PUSH D ;SCHOV ADRESU GND
4D55 23 INX H
4D56 5E MOV E,M ;NACTI NIZSI BYTE
4D57 23 INX H
4D58 56 MOV D,M ;NACTI VYSSI BYTE ADRESY VCC
4D59 D5 PUSH D ;SCHOV ADRESU VCC
4D5A 3A 5992 LDA ZIF14 ;NACTI PRIZNAK DIL14 V ZIF16
4D5D A7 ANA A
4D5E CA 4D68 JZ ZDIL3
4D61 0E 07 MVI C,7H ;NOVY POCATEK PRO PRAVY SLOPEC
4D63 3E 24 MVI A,'$'
4D65 32 5B55 STA POLE+480-42 ;NOVY ULOZ KONCOVY ZNAK
;-------------------------------
;CISELNY POPIS (CISLA PRO DIL)
;ZOBRAZI CISLA, LEVY SLOUPEC
4D68 C5 ZDIL3: PUSH B
PROGRAM IOT MACRO-80 3.44 09-Dec-81 PAGE 1-30
4D69 11 0027 LXI D,39 ;O KOLIK JE NOVY RADEK
4D6C 21 59AF LXI H,POLE+16 ;ADRESA ODKUD UKLADAT
4D6F CD 52F7 CALL ZDIL4
4D72 C1 POP B
;ZOBRAZI CISLA, PRAVI SLOUPEC
4D73 41 MOV B,C
4D74 11 FFD7 LXI D,-41 ;O KOLIK JE NOVY RADEK
4D77 21 5B6B LXI H,POLE+20+40*11 ;ADRESA ODKUD UKLADAT
4D7A CD 52F7 CALL ZDIL4
;-------------------------------
;POPIS IN A OUT
;ZOBRAZI IN OUT, PORT 1
4D7D 3A 5982 LDA VVZ ;STAV V/V PORT1
4D80 0E 08 MVI C,8 ;POCET BYTE
4D82 11 0026 LXI D,38 ;O KOLIK JE NOVY RADEK
4D85 21 5A4B LXI H,POLE+12+40*4 ;ADRESA ODKUD UKLADAT
4D88 CD 5307 CALL ZDIL7
;ZOBRAZI IN OUT, PORT 2
4D8B 3A 5983 LDA VVZ+1 ;STAV V/V PORT2
4D8E 0E 08 MVI C,8 ;POCET BYTE
4D90 11 FFD6 LXI D,-42 ;O KOLIK JE NOVY RADEK
4D93 21 5B6E LXI H,POLE+23+40*11 ;ADRESA ODKUD UKLADAT
4D96 CD 5307 CALL ZDIL7
;ZOBRAZI IN OUT, PORT 3
4D99 3A 5984 LDA VVZ+2 ;STAV V/V PORT3
4D9C 0E 04 MVI C,4 ;POCET BYTE
4D9E 11 0026 LXI D,38 ;O KOLIK JE NOVY RADEK
4DA1 21 59AB LXI H,POLE+12 ;ADRESA ODKUD UKLADAT
4DA4 CD 5307 CALL ZDIL7
;ZOBRAZI IN OUT, PORT 3
4DA7 0E 04 MVI C,4 ;POCET BYTE
4DA9 11 FFD6 LXI D,-42 ;O KOLIK JE NOVY RADEK
4DAC 21 5A2E LXI H,POLE+23+40*3 ;ADRESA ODKUD UKLADAT
4DAF CD 5307 CALL ZDIL7
;-------------------------------
;POPIS NEZOPOJENE VYVODY
;ZOBRAZI NZ, PORT 1
4DB2 3A 598F LDA NCZ ;NAZAPOJENE VYVODY PORT1
4DB5 0E 08 MVI C,8 ;POCET BYTE
4DB7 11 0026 LXI D,38 ;O KOLIK JE NOVY RADEK
4DBA 21 5A4B LXI H,POLE+12+40*4 ;ADRESA ODKUD UKLADAT
4DBD CD 5324 CALL ZDIL10
;ZOBRAZI NZ, PORT 2
4DC0 3A 5990 LDA NCZ+1 ;NAZAPOJENE VYVODY PORT2
4DC3 0E 08 MVI C,8 ;POCET BYTE
4DC5 11 FFD6 LXI D,-42 ;O KOLIK JE NOVY RADEK
4DC8 21 5B6E LXI H,POLE+23+40*11 ;ADRESA ODKUD UKLADAT
4DCB CD 5324 CALL ZDIL10
;ZOBRAZI NZ, PORT 3
4DCE 3A 5991 LDA NCZ+2 ;NAZAPOJENE VYVODY PORT3
PROGRAM IOT MACRO-80 3.44 09-Dec-81 PAGE 1-31
4DD1 0E 04 MVI C,4 ;POCET BYTE
4DD3 11 0026 LXI D,38 ;O KOLIK JE NOVY RADEK
4DD6 21 59AB LXI H,POLE+12 ;ADRESA ODKUD UKLADAT
4DD9 CD 5324 CALL ZDIL10
;ZOBRAZI NZ, PORT 3
4DDC 0E 04 MVI C,4 ;POCET BYTE
4DDE 11 FFD6 LXI D,-42 ;O KOLIK JE NOVY RADEK
4DE1 21 5A2E LXI H,POLE+23+40*3 ;ADRESA ODKUD UKLADAT
4DE4 CD 5324 CALL ZDIL10
;-------------------------------
;ZOBRAZENI VCC GND
;ZOBRAZI VCC
4DE7 E1 POP H ;VYZVEDNI ADRESU VCC
4DE8 22 599B SHLD AVCC ;ULOZ DRESU V TABULCE PRO VCC PRO MERENI NAPETI
4DEB 36 56 MVI M,'V'
4DED 23 INX H
4DEE 36 43 MVI M,'C'
4DF0 23 INX H
4DF1 36 43 MVI M,'C'
;ZOBRAZI GND
4DF3 E1 POP H ;VYZVEDNI ADRESU GND
4DF4 22 599D SHLD AGND ;ULOZ DRESU V TABULCE PRO GND PRO MERENI PROUDU
4DF7 36 47 MVI M,'G'
4DF9 23 INX H
4DFA 36 4E MVI M,'N'
4DFC 23 INX H
4DFD 36 44 MVI M,'D'
;-------------------------------
;ZOBRAZENI ZAPISOVANYCH DAT
;ZOBRAZI ZAPISOVANA DATA, PORT 1
4DFF 3A 5985 LDA VDAT ;VYSTUPNI DATA PORT1
4E02 0E 08 MVI C,8 ;POCET BYTE
4E04 11 0028 LXI D,40 ;O KOLIK JE NOVY RADEK
4E07 21 5A49 LXI H,POLE+10+40*4 ;ADRESA ODKUD UKLADAT
4E0A CD 533B CALL ZDIL8
;ZOBRAZI ZAPISOVANA DATA, PORT 2
4E0D 3A 5986 LDA VDAT+1 ;VYSTUPNI DATA PORT2
4E10 0E 08 MVI C,8 ;POCET BYTE
4E12 11 FFD8 LXI D,-40 ;O KOLIK JE NOVY RADEK
4E15 21 5B72 LXI H,POLE+27+40*11 ;ADRESA ODKUD UKLADAT
4E18 CD 533B CALL ZDIL8
;ZOBRAZI ZAPISOVANA DATA, PORT 3
4E1B 3A 5987 LDA VDAT+2 ;VYSTUPNI DATA PORT3
4E1E 0E 04 MVI C,4 ;POCET BYTE
4E20 11 0028 LXI D,40 ;O KOLIK JE NOVY RADEK
4E23 21 59A9 LXI H,POLE+10 ;ADRESA ODKUD UKLADAT
4E26 CD 533B CALL ZDIL8
;ZOBRAZI ZAPISOVANA DATA, PORT 3
4E29 0E 04 MVI C,4 ;POCET BYTE
4E2B 11 FFD8 LXI D,-40 ;O KOLIK JE NOVY RADEK
4E2E 21 5A32 LXI H,POLE+27+40*3 ;ADRESA ODKUD UKLADAT
PROGRAM IOT MACRO-80 3.44 09-Dec-81 PAGE 1-32
4E31 CD 533B CALL ZDIL8
;-------------------------------
;ZOBRAZENI CTENYCH DAT
;ZOBRAZI CTENA DATA, PORT 1
4E34 3A 5988 LDA CDAT ;CTENA DATA PORT1
4E37 0E 08 MVI C,8 ;POCET BYTE
4E39 11 0028 LXI D,40 ;O KOLIK JE NOVY RADEK
4E3C 21 5A46 LXI H,POLE+7+40*4 ;ADRESA ODKUD UKLADAT
4E3F CD 533B CALL ZDIL8
;ZOBRAZI CTENA DATA, PORT 2
4E42 3A 5989 LDA CDAT+1 ;CTENA DATA PORT2
4E45 0E 08 MVI C,8 ;POCET BYTE
4E47 11 FFD8 LXI D,-40 ;O KOLIK JE NOVY RADEK
4E4A 21 5B75 LXI H,POLE+30+40*11 ;ADRESA ODKUD UKLADAT
4E4D CD 533B CALL ZDIL8
;ZOBRAZI CTENA DATA, PORT 3
4E50 3A 598A LDA CDAT+2 ;CTENA DATA PORT3
4E53 0E 04 MVI C,4 ;POCET BYTE
4E55 11 0028 LXI D,40 ;O KOLIK JE NOVY RADEK
4E58 21 59A6 LXI H,POLE+7 ;ADRESA ODKUD UKLADAT
4E5B CD 533B CALL ZDIL8
;ZOBRAZI CTENA DATA, PORT 3
4E5E 0E 04 MVI C,4 ;POCET BYTE
4E60 11 FFD8 LXI D,-40 ;O KOLIK JE NOVY RADEK
4E63 21 5A35 LXI H,POLE+30+40*3 ;ADRESA ODKUD UKLADAT
4E66 CD 533B CALL ZDIL8
;-------------------------------
;DOBRAZENI NAPETI
;ZDIL14:
4E69 3A 5979 LDA MNAP ;NACTI PRIZNAK MNAP
4E6C A7 ANA A
4E6D CA 500B JZ ZDIL13 ;ZOBRAZOVAT NAPETI SE NEBUDE
4E70 3A 597F LDA DIL ;KOLIK RADKU BUDEM ZOBRAZOVAT
4E73 16 00 MVI D,0
4E75 5F MOV E,A ;POZICE V TABULCE DELEK IO
4E76 21 53B8 LXI H,DILDEL ;TABULKA DELEK IO
4E79 19 DAD D ;VYPOCITEJ ADRESU
4E7A 4E MOV C,M ;A NACTI DELKU
4E7B 3A 5992 LDA ZIF14 ;NACTI PRIZNAK DIL14 V ZIF16
4E7E 47 MOV B,A ;ULOZ HO JAKO POCATEK ODKUD MERIT
4E7F A7 ANA A
4E80 CA 4E84 JZ ZDIL14 ;NENI-LI DIL14 V ZIF16
4E83 0D DCR C ;ZKRAT POCITADLO DELKY IO
4E84 C5 ZDIL14: PUSH B ;SCHOV SI TO PRO DRUHY PREVODNIK
;LEVA RADA
4E85 11 FFD3 LXI D,-45 ;O KOLIK JE NOVY RADEK
4E88 21 5B2F LXI H,POLE+40*10 ;ADRESA ODKUD UKLADAT PRO DIL14 V ZIF16
4E8B A7 ANA A
4E8C C2 4E92 JNZ ZDIL15 ;JE DIL14 V ZIF16
4E8F 21 5B57 LXI H,POLE+40*11 ;ADRESA ODKUD UKLADAT
PROGRAM IOT MACRO-80 3.44 09-Dec-81 PAGE 1-33
4E92 CD 4B6A ZDIL15: CALL CADP1 ;SPUST PREVOD A CTI DATA
4E95 D5 PUSH D ;POSCHOVAVEJ REGISTRY
4E96 E5 PUSH H
4E97 F5 PUSH PSW
4E98 3A 597B LDA KTN ;PRIZNAK TRIDENI
4E9B A7 ANA A
4E9C CA 4EDE JZ KNAP1 ;NENILI PRIZNAK TAK TRIDIT NEBUDEMA
4E9F 11 000C LXI D,12 ;POSUV NA SLOUPEC S TYPEM VSTUPU
4EA2 19 DAD D ;CO BUDE ZA VSTUP
4EA3 7E MOV A,M
4EA4 FE 49 CPI 'I' ;VSTUP
4EA6 CA 4EAE JZ KNAP ;NENI-LI 'I' TAK TEST NA 'O'
4EA9 FE 4F CPI 'O' ;VYSTUP
4EAB C2 4EDE JNZ KNAP1 ;NENI-LI 'O' TAK NAVRAT
4EAE E6 02 KNAP: ANI 00000010B ;CHCEME JEN BIT 1
4EB0 0F RRC ;A DO BITU 0
4EB1 16 F2 MVI D,HIGH POLE2 ;ZACATEK POLE2 HORNI ARESA
4EB3 82 ADD D
4EB4 57 MOV D,A ;HORNI ADRSA
4EB5 2B DCX H
4EB6 2B DCX H ;ADRESA LOG. HODNOTY
4EB7 7E MOV A,M ;A NACTIJI
4EB8 23 INX H
4EB9 23 INX H
4EBA 23 INX H
4EBB 23 INX H
4EBC 23 INX H
4EBD 23 INX H ;ADRESA ODKUT SE PRECTE CISLO RADKU
4EBE E6 01 ANI 00000001B ;CHCEME JEN BIT 0
4EC0 0F RRC ;A DO BITU 7 ... A MAME ADRESU BLOKU (IN0 00,IN1 01, OUT0 10, OUT1 11)
4EC1 5F MOV E,A ;ULOZ NA POZDEJI
4EC2 78 MOV A,B ;CISLO KANALU DO <A>, LEVA STRANA
4EC3 07 RLC
4EC4 07 RLC ;POSUN DOLEVA
4EC5 B3 ORA E ;SPOJ
4EC6 5F MOV E,A ;V (.......A BCDDDD00) ANEB ADRESA V POLE2
;A - IN/OUT
;B - 0/1
;C - STRAN
;D - KANAL
4EC7 F1 POP PSW
4EC8 E6 1F ANI 00011111B ;JEN PLATNE BITY
4ECA 12 STAX D ;ULOZ HORNI BYTE NAPETI
4ECB F5 PUSH PSW
4ECC 13 INX D
4ECD EB XCHG
4ECE 22 5994 SHLD AKNAP ;ULOZ ADRESU PRO ZAPIS DRUHE POLOVINY NAPETI
4ED1 EB XCHG
4ED2 3E 01 MVI A,1
4ED4 32 597A STA PAKNAP ;ULOZ PRIZNAK ADRESY PRO ZAPIS DRUHE POLOVINY NAPETI
4ED7 13 INX D ;ADRSA V POLE2 ANEB KAM ULOZIT CISLO RADKU
4ED8 7E MOV A,M
4ED9 12 STAX D ;ULOZ PRVNI CISLO
4EDA 23 INX H
4EDB 13 INX D
PROGRAM IOT MACRO-80 3.44 09-Dec-81 PAGE 1-34
4EDC 7E MOV A,M
4EDD 12 STAX D ;ULOZ DRUHE CISLO
4EDE F1 KNAP1: POP PSW ;OBNOV REGISTY
4EDF E1 POP H
4EE0 D1 POP D
4EE1 CD 52D3 CALL ZDILA ;PREVOD DO TABULKY "A"
4EE4 3A 597A LDA PAKNAP ;NACTI PRIZNAK ADRESY PRO ZAPIS DRUHE POLOVINY NAPETI
4EE7 A7 ANA A
4EE8 DB D0 IN ADP1D ;SPODNI CISLICE
4EEA CA 4EF8 JZ KNAP4
4EED E5 PUSH H
4EEE 2A 5994 LHLD AKNAP ;ADRESA V POLE2
4EF1 77 MOV M,A ;ULOZ DOLNI BYTE NAPETI
4EF2 AF XRA A
4EF3 32 597A STA PAKNAP ;ZRUS PRIZNAK ADRESY PRO ZAPIS DRUHE POLOVINY NAPETI
4EF6 7E MOV A,M
4EF7 E1 POP H
4EF8 CD 52EA KNAP4: CALL ZDILB ;PREVOD DO TABULKY "B"
4EFB 19 DAD D ;NOVA ADRESA V POLI
4EFC 04 INR B ;DALSI KANAL
4EFD 0D DCR C ;POCET RADKU -1
4EFE C2 4E92 JNZ ZDIL15 ;NENI-LI KONEC ZNOVU
;PRAVA RADA
4F01 C1 POP B ;OBNOV DATA PRO DRUHY PREVODNIK
4F02 11 FFD3 LXI D,-45 ;O KOLIK JE NOVY RADEK
4F05 21 5B4F LXI H,POLE+32+40*10 ;ADRESA ODKUD UKLADAT PRO DIL14 V ZIF16
4F08 78 MOV A,B
4F09 A7 ANA A
4F0A C2 4F10 JNZ ZDIL16 ;JE DIL14 V ZIF16
4F0D 21 5B77 LXI H,POLE+32+40*11 ;ADRESA ODKUD UKLADAT
4F10 CD 4B7A ZDIL16: CALL CADP2 ;SPUST PREVOD A CTI DATA
4F13 D5 PUSH D ;POSCHOVAVEJ REGISTRY
4F14 E5 PUSH H
4F15 F5 PUSH PSW
4F16 3A 597B LDA KTN ;PRIZNAK TRIDENI
4F19 A7 ANA A
4F1A CA 4F61 JZ KNAP3 ;NENILI PRIZNAK TAK TRIDIT NEBUDEMA
4F1D 11 FFF7 LXI D,-9 ;POSUV NA SLOUPEC S TYPEM VSTUPU
4F20 19 DAD D ;CO BUDE ZA VSTUP
4F21 7E MOV A,M
4F22 FE 49 CPI 'I' ;VSTUP
4F24 CA 4F2C JZ KNAP2 ;NENI-LI 'I' TAK TEST NA 'O'
4F27 FE 4F CPI 'O' ;VYSTUP
4F29 C2 4F61 JNZ KNAP3 ;NENI-LI 'O' TAK NAVRAT
4F2C E6 02 KNAP2: ANI 00000010B ;CHCEME JEN BIT 1
4F2E 0F RRC ;A DO BITU 0
4F2F 16 F2 MVI D,HIGH POLE2 ;HORNI ARESA
4F31 82 ADD D
4F32 57 MOV D,A ;HORNI ADRSA
4F33 23 INX H
4F34 23 INX H
4F35 23 INX H
4F36 23 INX H ;ADRESA LOG. HODNOTY
4F37 7E MOV A,M ;A NACTIJI
PROGRAM IOT MACRO-80 3.44 09-Dec-81 PAGE 1-35
4F38 2B DCX H
4F39 2B DCX H
4F3A 2B DCX H
4F3B 2B DCX H
4F3C 2B DCX H
4F3D 2B DCX H
4F3E 2B DCX H ;ADRESA ODKUT SE PRECTE CISLO RADKU
4F3F E6 01 ANI 00000001B ;CHCEME JEN BIT 0
4F41 0F RRC ;A DO BITU 7 ... A MAME ADRESU BLOKU (IN0 00,IN1 01, OUT0 10, OUT1 11)
4F42 5F MOV E,A ;ULOZ NA POZDEJI
4F43 78 MOV A,B ;CISLO KANALU DO <A>,
4F44 F6 10 ORI 0010000B ;A LEVA STRANA
4F46 07 RLC
4F47 07 RLC ;POSUN DOLEVA
4F48 B3 ORA E ;SECTI
4F49 5F MOV E,A ;V (.......A BCDDDD00) ANEB ADRESA V POLE2
;A - IN/OUT
;B - 0/1
;C - STRAN
;D - KANAL
4F4A F1 POP PSW
4F4B E6 1F ANI 00011111B ;JEN PLATNE BITY
4F4D 12 STAX D ;ULOZ HORNI BYTE NAPETI
4F4E F5 PUSH PSW
4F4F 13 INX D
4F50 EB XCHG
4F51 22 5994 SHLD AKNAP ;ULOZ ADRESU PRO ZAPIS DRUHE POLOVINY NAPETI
4F54 EB XCHG
4F55 3E 01 MVI A,1
4F57 32 597A STA PAKNAP ;ULOZ PRIZNAK ADRESY PRO ZAPIS DRUHE POLOVINY NAPETI
4F5A 13 INX D ;ADRSA V POLE2 ANEB KAM ULOZIT CISLO RADKU
4F5B 7E MOV A,M
4F5C 12 STAX D ;ULOZ PRVNI CISLO
4F5D 23 INX H
4F5E 13 INX D
4F5F 7E MOV A,M
4F60 12 STAX D ;ULOZ DRUHE CISLO
4F61 F1 KNAP3: POP PSW ;OBNOV REGISTY
4F62 E1 POP H
4F63 D1 POP D
4F64 CD 52D3 CALL ZDILA ;PREVOD DO TABULKY "A"
4F67 3A 597A LDA PAKNAP ;NACTI PRIZNAK ADRESY PRO ZAPIS DRUHE POLOVINY NAPETI
4F6A A7 ANA A
4F6B DB E0 IN ADP2D ;SPODNI CISLICE
4F6D CA 4F7B JZ KNAP5
4F70 E5 PUSH H
4F71 2A 5994 LHLD AKNAP ;ODRESA V POLE2
4F74 77 MOV M,A ;ULOZ DOLNI BYTE NAPETI
4F75 AF XRA A
4F76 32 597A STA PAKNAP ;ZRUS PRIZNAK ADRESY PRO ZAPIS DRUHE POLOVINY NAPETI
4F79 7E MOV A,M
4F7A E1 POP H
4F7B CD 52EA KNAP5: CALL ZDILB ;PREVOD DO TABULKY "B"
4F7E 19 DAD D ;NOVA ADRESA V POLI
4F7F 04 INR B ;DALSI KANAL
PROGRAM IOT MACRO-80 3.44 09-Dec-81 PAGE 1-36
4F80 0D DCR C ;POCET RADKU -1
4F81 C2 4F10 JNZ ZDIL16 ;NENI-LI KONEC ZNOVU
;-------------------------------
;ZMERENI A ZAPSANI NAPAJECIHO NAPETI A PROUDU
;NAPETI
4F84 3A 597F LDA DIL ;JAKE NAPAJENI
4F87 E6 04 ANI 00000100B ;JEN ROZLISENI ZIF
4F89 2A 599B LHLD AVCC ;ADRESU VCC DO
4F8C 01 0009 LXI B,9 ;KOREKCE NA ZACATEK RADKU
4F8F C2 4F95 JNZ MDTO1
4F92 01 FFF4 LXI B,-12 ;KOREKCE NA KONEC RADKU
4F95 09 MDTO1: DAD B ;V ADRESA ODKUD ZAPISOVAT
4F96 06 0C MVI B,12 ;MERENI NAPAJECIHO NAPETI, ZESILENI A=1 NA KANALU 13
4F98 CD 4B6A CALL CADP1 ;SPUST PREVOD A CTI DATA
4F9B E6 0F ANI 00001111B ;CHCEME JEN CISLO
4F9D 57 MOV D,A ;ULOZ PRO VYPOCERT PROUDU (MENSI CILO)
4F9E CD 52D3 CALL ZDILA ;PREVOD DO TABULKY "A"
4FA1 DB D0 IN ADP1D ;SPODNI CISLICE
4FA3 5F MOV E,A ;ULOZ PRO VYPOCERT PROUDU
4FA4 CD 52EA CALL ZDILB ;PREVOD DO TABULKY "B"
4FA7 D5 PUSH D ;ULOZ NAPETI PRO POZDEJI
;PROUD
4FA8 06 0E MVI B,14 ;MERENI PROUDU NA 0.1mA,, ZESILENI A=1 NA KANALU 15
4FAA 0E 00 MVI C,0 ;BUDE ROZLISENI NA 0.1mA
4FAC CD 4B6A CALL CADP1 ;SPUST PREVOD A CTI DATA
4FAF 57 MOV D,A ;ULOZ PRO VYPOCERT PROUDU (MENSI CILO)
4FB0 E6 1F ANI 00011111B ;CHCEME JEN CISLO A ZNAMENKO
4FB2 FE 09 CPI 9 ;VICE JAK 39.9mA NEBO ZAPORNY PROUD TJ. 9 A VICE VOLTU
4FB4 DA 4FBD JC MDTO3 ;TAK PROUD Z ROZLISENIM NA 1mA
4FB7 0C INR C ;BUDE ROZLISENI NA 1mA
4FB8 05 DCR B ;MERENI PROUDU NA 1mA, ZESILENI A=1 NA KANALU 14
4FB9 CD 4B6A CALL CADP1 ;SPUST PREVOD A CTI DATA
4FBC 57 MOV D,A ;ULOZ PRO VYPOCERT PROUDU (MENSI CILO)
4FBD 7A MDTO3: MOV A,D
4FBE E6 0F ANI 00001111B ;CHCEME JEN CISLO
4FC0 57 MOV D,A
4FC1 DB D0 IN ADP1D ;SPODNI CISLICE
4FC3 5F MOV E,A ;ULOZ PRO VYPOCERT PROUDU
4FC4 79 MOV A,C
4FC5 32 597A STA PAKNAP ;ULOZ PRIZNAK ROZLISENI PROUDU
4FC8 C1 POP B ;OBNOVA NAPETI PRO VYPOCET PROUDU
4FC9 CD 527A CALL ODECTI ;ODECITANI DESTKOVE -=
4FCC 7D MOV A,L
4FCD FE 99 CPI 99H ;ZAPORNY PROUD
4FCF C2 4FD5 JNZ MDTO8 ;NENI-LI TAK POKRACUJ
4FD2 21 0000 LXI H,0 ;JINAK NASTAV NA NULA
4FD5 EB MDTO8: XCHG ;VYSLEDEK DO
4FD6 3A 597F LDA DIL ;JAKE NAPAJENI
4FD9 E6 04 ANI 00000100B ;JEN ROZLISENI ZIF
4FDB 2A 599D LHLD AGND ;ADRESU GND DO
4FDE 01 FFF4 LXI B,-12 ;KOREKCE NA ZACATEK RADKU
4FE1 C2 4FE7 JNZ MDTO2
4FE4 01 0009 LXI B,9 ;KOREKCE NA KONEC RADKU
4FE7 09 MDTO2: DAD B ;V ADRESA ODKUD ZAPISOVAT
4FE8 3A 597A LDA PAKNAP ;OBNOV PRIZNAK ROZLISENI PROUDU
PROGRAM IOT MACRO-80 3.44 09-Dec-81 PAGE 1-37
4FEB 4F MOV C,A ;ULOZ PRO POZDEJI
4FEC A7 ANA A
4FED C2 4FF9 JNZ MDTO4 ;PROUD NA 1mA
4FF0 CD 5349 CALL MDTO7 ;SPOLECNA CAST, PDVNI A DRUHA CISLICE
4FF3 23 INX H
4FF4 36 2E MVI M,'.' ;ULOZ TECKU
4FF6 C3 4FFF JMP MDTO5
4FF9 36 20 MDTO4: MVI M,' ' ;ULOZ MEZERU
4FFB 23 INX H
4FFC CD 5349 CALL MDTO7 ;SPOLECNA CAST, PDVNI A DRUHA CISLICE
4FFF 23 MDTO5: INX H
5000 7A MOV A,D ;TRETI CISLICE
5001 CD 492E CALL LBYTE
5004 77 MOV M,A
5005 23 INX H
5006 36 6D MVI M,'m'
5008 23 INX H
5009 36 41 MVI M,'A'
;-------------------------------
;ZOBRAZENI SESTAVENE TABULKY
500B CD 4899 ZDIL13: CALL CRLF ;ZOBRA CO JSME ZPACHALI
500E D1 POP D ;ODRESA ODKUT ZOBRAZIT
500F CD 489C CALL PRINT
; CALL CRLF
; CALL CRLF
; LXI D,POLE ;KOMPLETNI TABULKA
; MVI A,CR
; STA POLE+480-42 ;I POSLEDNI RADEK
; CALL PRINT
5012 CD 4899 CALL CRLF
;-------------------------------
;ZOBARENI TRIDENEHO NAPETI
; 1 2 3 4
;1234567890123456789012345678901234567890
; IN 0 IN 1 OUT 0 OUT 1
;+0.00V 1 +0.00V 10 +0.00V 11 +0.00V 15
;+0.00V 1 +0.00V 10 +0.00V 11 +0.00V 15
;+0.00V 1 +0.00V 10 +0.00V 11 +0.00V 15
;+0.00V 1 +0.00V 10 +0.00V 11 +0.00V 15
;+0.00V 1 +0.00V 10 +0.00V 11 +0.00V 15
;+0.00V 1 +0.00V 10 +0.00V 11 +0.00V 15
5015 3A 5979 LDA MNAP ;PRIZNAK MERENI NAPETI
5018 A7 ANA A
5019 CA 528C JZ KCHYB ;NENILI PRIZNAK TAK TRIDIT A ZOBRAZOVAT NEBUDEM
501C 3A 597B LDA KTN ;PRIZNAK TRIDENI
501F A7 ANA A
5020 CA 528C JZ KCHYB ;NENILI PRIZNAK TAK TRIDIT A ZOBRAZOVAT NEBUDEM
; CALL DUMP ;POLE2
5023 AF XRA A
5024 32 5980 STA CHLOG
5027 32 5981 STA CHLOG1 ;VINULUJ PRIZNAKY CHIBNE LOG UROVNE
502A CD 51FF CALL TTN ;SETRID NAPETI
502D 11 5736 LXI D,PZTTNT
5030 CD 489C CALL PRINT ;POPIS TABULKY
PROGRAM IOT MACRO-80 3.44 09-Dec-81 PAGE 1-38
5033 06 20 MVI B,32 ;MAX 32 RADKU
5035 21 F200 LXI H,POLE2 ;POCATEK POLE K ZOBRAZENI
5038 11 007D ZTTN4: LXI D,125 ;DALSI POLOZKA
503B 3E 04 MVI A,4 ;POCET POLI
503D 32 5996 STA PR ;PRO NALEZENI KONCE DAT
5040 AF XRA A
5041 32 597E STA POUT1 ;VINULUJ PRIZNAK OUT 1
5044 CD 5121 CALL ZTTN1 ;ZOBRAZ POLOZKU IN0 NA RADKU
5047 19 DAD D
5048 CD 5121 CALL ZTTN1 ;ZOBRAZ POLOZKU IN1 NA RADKU
504B 19 DAD D
504C CD 5121 CALL ZTTN1 ;ZOBRAZ POLOZKU OUT0 NA RADKU
504F 19 DAD D
5050 3E 01 MVI A,1
5052 32 597E STA POUT1 ;NASTAV PRIZNAK OUT 1
5055 CD 5121 CALL ZTTN1 ;ZOBRAZ POLOZKU OUT1 NA RADKU
5058 3A 5996 LDA PR
505B A7 ANA A
505C CA 506A JZ ZTTN5 ;PRAZDNY RADEK
505F CD 4899 CALL CRLF
5062 11 FE81 LXI D,-383 ;DALSI RADEK
5065 19 DAD D
5066 05 DCR B
5067 C2 5038 JNZ ZTTN4
506A CD 4899 ZTTN5: CALL CRLF
;SPOCITEJ ROZDILI MIN/MAX
506D AF XRA A
506E 32 5996 STA PR ;VZNULUJ PRIZNAK VELKEHO ROZDILU
5071 32 597E STA POUT1 ;VINULUJ PRIZNAK OUT 1
5074 3D DCR A
5075 32 5980 STA CHLOG ;VYPNI KONTROLU LOG UROVNI
5078 21 F200 LXI H,POLE2
507B 06 04 MVI B,4 ;POCET POLI
507D E5 ZTTN10: PUSH H
507E C5 PUSH B
;ZOBRAZI POLOZKU Z POLE2
;V ADRESA POLOZKY
;V POLOZKA V POLI
;V POCET POLOZEK K ZOBRAZENI
;.......A BCDDDD00, ADRESA V POLE2
;A - IN/OUT
;B - 0/1
;C - STRAN
;D - KANAL
507F 01 001F LXI B,31 ;MAX. POCET POLOZEK POLE A POLOZKA V POLI
5082 E5 ZTTN11: PUSH H ;ULOZ POCATEK BLOKU V POLE2
5083 79 MOV A,C ;POJEDEME OD KONCE
5084 07 RLC
5085 07 RLC
5086 B5 ORA L
5087 6F MOV L,A ;ADESA POLOZKY
PROGRAM IOT MACRO-80 3.44 09-Dec-81 PAGE 1-39
5088 7E MOV A,M
5089 E1 POP H ;OBNOV POCATEK POLE2
508A FE FF CPI -1
508C C2 50A3 JNZ ZTTN12 ;JSOU PRVNI DATA OD KONCE
508F 0D DCR C
5090 C2 5082 JNZ ZTTN11 ;NENI-LI KONEC DALSI POLOZKA
5093 3A 597E LDA POUT1 ;NACTI PRIZNAK OUT
5096 A7 ANA A
5097 C2 50D8 JNZ ZTTN13 ;JE OUT 1 TAK BEZ MEZER
509A 11 572B LXI D,MEZ10T ;JINAK TISKNI MEZERY
509D CD 489C CALL PRINT ;ANEB NENI CO POCITAT
50A0 C3 50D8 JMP ZTTN13
50A3 54 ZTTN12: MOV D,H ;V JE ADRESA NEJNISSIHO NAPETI
50A4 5D MOV E,L ;ADRSU POCATKU POLE I DO
50A5 79 MOV A,C
50A6 07 RLC
50A7 07 RLC
50A8 B3 ORA E
50A9 5F MOV E,A ;V JE ADRESA NEJVISSIHO NAPETI
50AA 46 MOV B,M
50AB 23 INX H
50AC 4E MOV C,M ;NEJNISSI NAPETI DO MENSITEL
50AD EB XCHG
50AE 56 MOV D,M
50AF 23 INX H
50B0 5E MOV E,M ;NEJVISSIHO NAPETI DO MENSENEC
50B1 CD 527A CALL ODECTI ;ODECITANI DESTKOVE -=
50B4 22 5997 SHLD RNAP ;ULOZ PRO TISK
50B7 A7 ANA A ;BUDE MENE NEZ 1V
50B8 C2 50C7 JNZ ZTTN14
50BB 7C MOV A,H
50BC FE 21 CPI VELN+1 ;MAX ROZDIL
50BE D2 50C7 JNC ZTTN14
50C1 21 2020 LXI H,2020H ;MEZERY
50C4 C3 50CF JMP ZTTN15 ;RODIL NAPETI POD 0.20V
50C7 21 202A ZTTN14: LXI H,202AH ;"* "
50CA 3E 01 MVI A,1
50CC 32 5996 STA PR ;ULOZ, BYL VELKY ROZDIL NAPETI
50CF 22 5999 ZTTN15: SHLD RNAP+2 ;MISTO CISEL
50D2 21 5997 LXI H,RNAP ;ODKUT VITISKNOUT
50D5 CD 5121 CALL ZTTN1 ;VYTISKNI ROZDILOVE NAPETI
50D8 C1 ZTTN13: POP B
50D9 E1 POP H
50DA 11 0080 LXI D,128 ;DELKA POLE
50DD 19 DAD D
50DE 05 DCR B
50DF 78 MOV A,B
50E0 FE 01 CPI 1
50E2 C2 50E8 JNZ ZTTN18
50E5 32 597E STA POUT1 ;ULOZ PRIZNAK OUT 1
50E8 A7 ZTTN18: ANA A
50E9 C2 507D JNZ ZTTN10 ;JESTE NEJSOU VSECHNY BLOKY
50EC CD 4896 CALL CRLF2
50EF 3A 5996 LDA PR
PROGRAM IOT MACRO-80 3.44 09-Dec-81 PAGE 1-40
50F2 A7 ANA A
50F3 CA 50FC JZ ZTTN16 ;JE-LI ROZPTIL V PORADKU TAK NA KONTROLU LOG UROVNI
50F6 11 575F LXI D,VELNT
50F9 CD 489C CALL PRINT ;TISK UPOZORNENI
50FC 3A 5981 ZTTN16: LDA CHLOG1
50FF A7 ANA A
5100 CA 5109 JZ ZTTN17 ;JSOU-LI LOG UROBNE V PORADKU TAK NA KONTROLU CHYB
5103 11 5788 LXI D,CHLOGT
5106 CD 489C CALL PRINT ;TISK UPOZORNENI
5109 3A 5996 ZTTN17: LDA PR
510C 4F MOV C,A
510D 3A 5981 LDA CHLOG1
5110 B1 ORA C
5111 CA 528C JZ KCHYB ;NENI CHYBA
5114 3A 5993 LDA ERR ;PRIZNAK CHYBY
5117 A7 ANA A
5118 C2 528C JNZ KCHYB ;PRESKOC POKUT JE CHYBA
511B CD 48B4 CALL CTIZ ;POCKEJ NA POTVRENI
511E C3 528C JMP KCHYB ;NA ZOBRAZENI CHYBI
;-------------------------------
;ZOBRAZENI JDNOHO POLE NA RADKU SE SETRIZENIM NAPETIM
5121 7E ZTTN1: MOV A,M ;NACTI DATA ... 1
5122 4F MOV C,A ;SCHOV
5123 FE FF CPI -1 ;TEST NA PRITOMNOST DAT
5125 C2 5142 JNZ ZTTN2 ;JSOU-LI DATA TAK JE VYTISKNI
5128 3A 597E LDA POUT1 ;NACTI PRIZNAK OUT
512B A7 ANA A
512C C2 5137 JNZ ZTTN1M ;JE OUT 1 TAK BEZ MEZER
512F D5 PUSH D
5130 11 572B LXI D,MEZ10T ;JINAK TISKNI MEZERY
5133 CD 489C CALL PRINT
5136 D1 POP D
5137 23 ZTTN1M: INX H
5138 23 INX H
5139 23 INX H
513A 3A 5996 LDA PR
513D 3D DCR A ;ODECET ZA PRAZDNE POLE
513E 32 5996 STA PR
5141 C9 RET
;V ADRESA POLOZKY
;.......A BCDDDD00, ADRESA V POLE2
;A - IN/OUT
;B - 0/1
;C - STRAN
;D - KANAL
5142 3A 5980 ZTTN2: LDA CHLOG
5145 FE FF CPI -1
5147 CA 51AA JZ ZTTN20 ;JE VIPNUTA KONTROLA LOG UROVNI
514A D5 PUSH D
514B C5 PUSH B
PROGRAM IOT MACRO-80 3.44 09-Dec-81 PAGE 1-41
514C E5 PUSH H
514D 11 53C0 LXI D,NTTL ;TABUKA LOG NAPETI PRO TTL
5150 3A 597C LDA LOG ;PRIZNAK NA TTL/CMOS
5153 A7 ANA A
5154 CA 515A JZ ZTTN21 ;MAME TTL
5157 11 53C8 LXI D,NCMOS ;TABUKA LOG NAPETI PRO TTL
515A 29 ZTTN21: DAD H
515B 29 DAD H ; O DVA BITY DO LEVA
515C 7C MOV A,H
515D E6 06 ANI 00000110B ;CHCEME JEN BITY 1 A 2
515F 4F MOV C,A ;SPOCITEJ ADRESU LOG UROVE PRO KONTROLU
5160 06 00 MVI B,0
5162 EB XCHG
5163 09 DAD B
5164 EB XCHG ;V JE ADRESA LOG NAPETI PRO KONTROLU
5165 E1 POP H ;OBNOV ADRESU V POLE 2
5166 E5 PUSH H ;A ZASE JI SCHOV
5167 7D MOV A,L
5168 17 RAL ;TEST NA LOG 0/1
5169 DA 5183 JC ZTTN22
;LOG 0
516C 46 MOV B,M ;DATA
516D 1A LDAX D ;KONSTANTA
516E B8 CMP B
516F CA 5178 JZ ZTTN27 ;SHODA NAPETI ... JEDNOTKY VOLTU
5172 D2 5198 JNC ZTTN25 ;NAPETI V TOLERANCI ... JEDNOTKY VOLTU
5175 DA 519F JC ZTTN24 ;NAPETI MIMO TOLERANCI ... JEDNOTKY VOLTU
5178 23 ZTTN27: INX H
5179 13 INX D ;KONSTANTA
517A 46 MOV B,M ;DATA
517B 1A LDAX D
517C B8 CMP B
517D DA 519F JC ZTTN24 ;NAPETI MIMO TOLERANCI ... DESETINY VOLTU
5180 C3 5198 JMP ZTTN25 ;NAPETI V TOLERANCI
;LOG 1
5183 EB ZTTN22: XCHG
5184 1A LDAX D ;DATA
5185 46 MOV B,M ;KONSTANTA
5186 B8 CMP B
5187 CA 5190 JZ ZTTN28 ;SHODA NAPETI ... JEDNOTKY VOLTU
518A D2 5198 JNC ZTTN25 ;NAPETI V TOLERANCI ... JEDNOTKY VOLTU
518D DA 519F JC ZTTN24 ;NAPETI MIMO TOLERANCI ... JEDNOTKY VOLTU
5190 23 ZTTN28: INX H
5191 13 INX D
5192 1A LDAX D ;DATA
5193 46 MOV B,M ;KONSTANTA
5194 B8 CMP B
5195 DA 519F JC ZTTN24 ;NAPETI MIMO TOLERANCI ... DESETINY VOLTU
5198 AF ZTTN25: XRA A
5199 32 5980 STA CHLOG ;NAPETI V TOLERANCI
519C C3 51A7 JMP ZTTN23
519F 3E 01 ZTTN24: MVI A,1
51A1 32 5980 STA CHLOG ;NAPETI MIMO TOLERANCI
51A4 32 5981 STA CHLOG1
PROGRAM IOT MACRO-80 3.44 09-Dec-81 PAGE 1-42
51A7 E1 ZTTN23: POP H
51A8 C1 POP B
51A9 D1 POP D
51AA 79 ZTTN20: MOV A,C
51AB E6 10 ANI 00010000B ;CHCEME JEN ZNAMENKO
51AD A7 ANA A
51AE 3E 2B MVI A,'+'
51B0 CA 51B5 JZ ZTTN3
51B3 3E 2D MVI A,'-'
51B5 CD 4937 ZTTN3: CALL COA ;TISKNI ZNAMENKO
51B8 79 MOV A,C ;OBNOV DATA
51B9 CD 5373 CALL LDEC ;PREVOD NA ASCII
51BC CD 4937 CALL COA ;DISKNI CISLO
51BF 3E 2E MVI A,'.' ;ULOZ DESETINOU TECKU
51C1 CD 4937 CALL COA ;DISKNI TECKU
51C4 23 INX H ;DALSI POZICE ... 2
51C5 7E MOV A,M
51C6 4F MOV C,A ;SCHOV
51C7 CD 536F CALL HDEC ;DESITKY
51CA CD 4937 CALL COA ;DISKNI CISLO
51CD 79 MOV A,C ;OBNOV
51CE CD 5373 CALL LDEC ;ZAPIS SPONIHO NYBLU
51D1 CD 4937 CALL COA ;DISKNI CISLO
51D4 3E 56 MVI A,'V' ;JESTE ZNAK NAPETI
51D6 CD 4937 CALL COA
51D9 3A 5980 LDA CHLOG ;PRINAK CHIBNE LOG UROVNE
51DC A7 ANA A
51DD 3E 20 MVI A,' ' ;MEZERU
51DF FA 51E7 JM ZTTN26 ;VYPNUTA KONTROLOLA LOG UROVNI
51E2 CA 51E7 JZ ZTTN26 ;JE CHIBNA LOG UROVEN
51E5 3E 21 MVI A,'!' ;VYKRICNIK
51E7 CD 4937 ZTTN26: CALL COA
51EA 23 INX H ;DALSI POZICE ... 3
51EB 7E MOV A,M ;A CISLO VYVODU
51EC CD 4937 CALL COA
51EF 23 INX H ;DALSI POZICE ... 4
51F0 7E MOV A,M ;A CISLO VYVODU
51F1 CD 4937 CALL COA
51F4 3A 597E LDA POUT1 ;NACTI PRIZNAK OUT
51F7 A7 ANA A
51F8 C0 RNZ ;JE OUT 1 TAK BEZ MEZERY
51F9 3E 20 MVI A,' ' ;MEZERU
51FB CD 4937 CALL COA
51FE C9 RET
;-------------------------------
;SETRIDENI POLE2
51FF 21 F200 TTN: LXI H,POLE2
5202 06 04 MVI B,4 ;POCET POLI
5204 E5 TTN1: PUSH H
5205 C5 PUSH B
;V ADRESA POLOZKY
;V ADRESA POLOZKY+1
;V POLOZKA V POLI
;V POCET POLOZEK KE TRIDENI
PROGRAM IOT MACRO-80 3.44 09-Dec-81 PAGE 1-43
;.......A BCDDDD00, ADRESA V POLE2
;A - IN/OUT
;B - 0/1
;C - STRAN
;D - KANAL
5206 01 001F LXI B,31 ;MAX. POCET POLOZEK POLE PRO TRIDENI A POLOZKA V POLI
5209 E5 TTN6: PUSH H ;ULOZ POCATEK BLOKU V POLE2
520A 79 MOV A,C ;POJEDEME OD KONCE
520B 07 RLC
520C 07 RLC
520D B5 ORA L
520E 6F MOV L,A ;ADESA POLOZKY
520F 7E MOV A,M
5210 E1 POP H ;OBNOV POCATEK POLE2
5211 FE FF CPI -1
5213 C2 5220 JNZ TTN4 ;JSOU PRVNI DATA OD KONCE
5216 79 MOV A,C
5217 FE 02 CPI 2
5219 CA 5220 JZ TTN4 ;ZARIZNI TO NA TRETI POZICI
521C 0D DCR C
521D C3 5209 JMP TTN6 ;DALSI POLOZKA
5220 E5 TTN4: PUSH H ;ULOZ POCATEK BLOKU V POLE2
5221 54 MOV D,H
5222 5D MOV E,L ;ADRSU POCATKU POLE I DO
5223 78 MOV A,B
5224 07 RLC
5225 07 RLC
5226 B5 ORA L
5227 6F MOV L,A ;ADESA POLOZKY
5228 78 MOV A,B
5229 3C INR A
522A 07 RLC
522B 07 RLC
522C B3 ORA E
522D 5F MOV E,A ;ADRESA POLOZKY +1
522E 1A LDAX D
522F BE CMP M
5230 DA 523D JC TTN3 ;PROHOD
5233 C2 5257 JNZ TTN5 ;JEST-LI NEJSOU SHODNE TAK DALSI POLOZKA
5236 2C INR L
5237 1C INR E ;DRHA CAST NAPETI
5238 1A LDAX D
5239 BE CMP M
523A D2 5257 JNC TTN5 ;PROHOD
523D C5 TTN3: PUSH B
523E 06 04 MVI B,4 ;POCET PREHAZOVANYCH DAT
5240 7D MOV A,L
5241 E6 FC ANI 11111100B ;CHCEME PRVNI POZICI POLOZKY
5243 6F MOV L,A
5244 7B MOV A,E
5245 E6 FC ANI 11111100B ;CHCEME PRVNI POZICI POLOZKY +1
5247 5F MOV E,A
5248 4E TTN2: MOV C,M
5249 1A LDAX D
PROGRAM IOT MACRO-80 3.44 09-Dec-81 PAGE 1-44
524A 77 MOV M,A
524B 79 MOV A,C
524C 12 STAX D
524D 2C INR L
524E 1C INR E
524F 05 DCR B
5250 C2 5248 JNZ TTN2 ;POKUT NENI VSE TAK DALSI
5253 C1 POP B
5254 32 5996 STA PR ;ULOZ NECO ANEB SE PREHAZOVALO
5257 E1 TTN5: POP H ;OBNOV POCATEK BLOKU V POLE2
5258 04 INR B ;DALSI PAR POLOZEK
5259 79 MOV A,C
525A B8 CMP B
525B C2 5220 JNZ TTN4 ;JESTE NENI PROJITO VSECHY POLOZEK
525E 06 00 MVI B,0 ;OD PRVNI POLOZKY
5260 3A 5996 LDA PR ;NACTI ZNACKU SETRIDENI
5263 A7 ANA A
5264 CA 526F JZ TTN8 ;JE SETRIDENO DALSI POLE
5267 AF XRA A
5268 32 5996 STA PR ;VYNULUJ ZNACKU SETRIDENI
526B 0D DCR C ;POCET POLOZEK -1
526C C2 5220 JNZ TTN4 ;JESTE NENI VSE HOTOVO
526F C1 TTN8: POP B
5270 E1 POP H
5271 11 0080 LXI D,128 ;DELKA POLE
5274 19 DAD D
5275 05 DCR B
5276 C2 5204 JNZ TTN1 ;JESTE NEJSOU VSECHNY BLOKY
5279 C9 RET
;-------------------------------
;ODECITANI DESTKOVE -=
527A 37 ODECTI: STC ;CY=1 STOVKOVY DOPLNEK PRO 1. ODECET
527B 3E 99 MVI A,99H ;HLEDANI DOPLNKU 99 NEBO 100
527D CE 00 ACI 0 ;MENSITELE (CY=0 NEBO 1)
527F 91 SUB C ;ODECET S CY
5280 83 ADD E ;PRICTENI MENSENCE
5281 27 DAA ;PREVOD NA DESITKOVE CISLO
5282 67 MOV H,A ;ULOZ
5283 3E 99 MVI A,99H ;HLEDANI DOPLNKU 99 NEBO 100, VYSSI BYTE
5285 CE 00 ACI 0 ;MENSITELE (CY=0 NEBO 1)
5287 90 SUB B ;ODECET S CY
5288 82 ADD D ;PRICTENI MENSENCE
5289 27 DAA ;PREVOD NA DESITKOVE CISLO
528A 6F MOV L,A ;ULOZ
528B C9 RET
;-------------------------------
;KONTROLA NA CHYBU, TISK CHYBY A NAVRAT
528C E1 KCHYB: POP H ;OBNOV UKAZATEL V TESTOVACI TABULCE
528D 3A 5993 LDA ERR ;PRIZNAK CHYBY
5290 A7 ANA A
5291 C8 RZ ;NAVRAT POKUT NENI CHYBA
5292 11 5674 LXI D,CHPOT
5295 CD 489C CALL PRINT ;TISK "CHYBA PORT"
5298 2A 598D LHLD DEERR ;OBNOV DATA PRO VYPIS CHYBY
PROGRAM IOT MACRO-80 3.44 09-Dec-81 PAGE 1-45
529B EB XCHG
529C 2A 598B LHLD HLERR
529F 33 INX SP
52A0 33 INX SP ;SROVNEJ ZASOBNIK
52A1 CD 489C CALL PRINT
52A4 CD 4899 CALL CRLF
52A7 CD 4917 CALL HADR ;TISK OBSAHU
52AA CD 4899 CALL CRLF
52AD 3A 5971 LDA PP ;OBNOV DATA Z PORTU
52B0 CD 491C CALL DBYT ;TISK DAT Z PORTU
52B3 3A 5971 LDA PP ;OBNOV DATA Z PORTU
52B6 CD 4942 CALL DBIN ;TISK DAT ALE BINARNE
52B9 11 567B LXI D,PORTT ;DATA Z PORTU
52BC CD 489C CALL PRINT
52BF CD 4899 CALL CRLF
52C2 7E MOV A,M
52C3 CD 491C CALL DBYT ;TISK DAT Z TABULKY
52C6 7E MOV A,M
52C7 CD 4942 CALL DBIN ;TISK DAT Z TABULKY ALE BINARNE
52CA 11 5681 LXI D,TABT ;TADA Z TABULKY
52CD CD 489C CALL PRINT
52D0 C3 4594 JMP VYSTV3 ;VZPIS CHYBY A NOVY VYBER IO
;-------------------------------
;-------------------------------
;PREVOD CISLA Z PREVODNIKU A ULOZENI DO TABULKY
;ZNAMENKO A NEVISI NYBL
52D3 F5 ZDILA: PUSH PSW ;SCHOV SI DATA
52D4 E6 10 ANI 00010000B ;CHCEME JEN ZNAMENKO
52D6 A7 ANA A
52D7 3E 2B MVI A,'+'
52D9 CA 52DE JZ ZDILA1
52DC 3E 2D MVI A,'-'
52DE 77 ZDILA1: MOV M,A ;ULOZ ZNAMENKO
52DF 23 INX H
52E0 F1 POP PSW ;OBNOV DATA
52E1 CD 5373 CALL LDEC ;PREVOD NA ASCII
52E4 77 MOV M,A
52E5 23 INX H
52E6 36 2E MVI M,'.' ;ULOZ DESETINOU TECKU
52E8 23 INX H
52E9 C9 RET
;PREVOD Z BIN/DEC NA TXT
52EA F5 ZDILB: PUSH PSW ;ZAPISE DO POLE CISLO Z <A>
52EB CD 536F CALL HDEC
52EE 77 MOV M,A
52EF F1 POP PSW
52F0 CD 5369 CALL DEC2 ;ZAPIS SPONIHO NYBLU
52F3 23 INX H
52F4 36 56 MVI M,'V' ;JESTE ZNAK NAPETI
52F6 C9 RET
;-------------------------------
;PODPROGRAMI PRO DIL
;ZOBRAZI CISLA, SPOLECNA CAST
PROGRAM IOT MACRO-80 3.44 09-Dec-81 PAGE 1-46
52F7 0E 0C ZDIL4: MVI C,12 ;POCET RADU
52F9 78 ZDIL4A: MOV A,B
52FA CD 535C CALL DEC ;PREVOD NA TXT CISLO
52FD 78 MOV A,B
52FE 3C INR A ;POCITADLO NOZICEK +1
52FF 27 DAA ;DEKADICKA KOREKCE
5300 47 MOV B,A
5301 19 DAD D ;NOVA ADRESA V POLI
5302 0D DCR C ;POCET RADKU -1
5303 C2 52F9 JNZ ZDIL4A ;NENI-LI KONEC ZNOVU
5306 C9 RET
;-------------------------------
;ZOBRAZI IN OUT, SPOLECNA CAST
5307 0F ZDIL7: RRC ;ROTACE V PRAVO
5308 D2 5316 JNC ZDIL5
;ZOBRAZI IN
530B 36 49 MVI M,'I'
530D 23 INX H
530E 36 4E MVI M,'N'
5310 23 INX H
5311 36 20 MVI M,' '
5313 C3 531E JMP ZDIL6
;ZOBRAZI OUT
5316 36 4F ZDIL5: MVI M,'O'
5318 23 INX H
5319 36 55 MVI M,'U'
531B 23 INX H
531C 36 54 MVI M,'T'
531E 19 ZDIL6: DAD D ;NOVA ADRESA V POLI
531F 0D DCR C ;POCET RADKU -1
5320 C2 5307 JNZ ZDIL7 ;NENI-LI KONEC ZNOVU
5323 C9 RET
;-------------------------------
;ZOBRAZI NZ, SPOLECNA CAST
5324 0F ZDIL10: RRC ;ROTACE V PRAVO
5325 D2 5333 JNC ZDIL11
;ZOBRAZI NZ
5328 36 4E MVI M,'N'
532A 23 INX H
532B 36 43 MVI M,'C'
532D 23 INX H
532E 36 20 MVI M,' '
5330 C3 5335 JMP ZDIL12
5333 23 ZDIL11: INX H
5334 23 INX H
5335 19 ZDIL12: DAD D ;NOVA ADRESA V POLI
5336 0D DCR C ;POCET RADKU -1
5337 C2 5324 JNZ ZDIL10 ;NENI-LI KONEC ZNOVU
533A C9 RET
;-------------------------------
;ZOBRAZI 0 1, SPOLECNA CAST
533B 0F ZDIL8: RRC ;ROTACE V PRAVO
533C 36 30 MVI M,'0'
PROGRAM IOT MACRO-80 3.44 09-Dec-81 PAGE 1-47
533E D2 5343 JNC ZDIL9
5341 36 31 MVI M,'1'
5343 19 ZDIL9: DAD D ;NOVA ADRESA V POLI
5344 0D DCR C ;POCET RADKU -1
5345 C2 533B JNZ ZDIL8 ;NENI-LI KONEC ZNOVU
5348 C9 RET
;-------------------------------
;SPOLECNA CAST, PDVNI A DRUHA CISLICE
5349 7B MDTO7: MOV A,E ;PRVNI CISLICE
534A 36 20 MVI M,' ' ;ULOZ MEZERU
534C FE 00 CPI 0
534E CA 5355 JZ MDTO6 ;POKUD JE NULA
5351 CD 492E CALL LBYTE ;JINAK CISLO
5354 77 MOV M,A
5355 23 MDTO6: INX H
5356 7A MOV A,D ;DRUHA CISLICE
5357 CD 492A CALL HBYTE
535A 77 MOV M,A
535B C9 RET
;-------------------------------
;PREVOD Z BIN/DEC NA TXT
535C F5 DEC: PUSH PSW ;ZAPISE DO POLE CISLO Z <A>
535D CD 536F CALL HDEC
5360 FE 30 CPI '0'
5362 C2 5367 JNZ DEC1
5365 3E 20 MVI A,' '
5367 77 DEC1: MOV M,A
5368 F1 POP PSW
5369 CD 5373 DEC2: CALL LDEC ;ZAPISE DO POLE NIBBLE <A>
536C 23 INX H
536D 77 MOV M,A
536E C9 RET
;-------------------------------
536F 0F HDEC: RRC
5370 0F RRC
5371 0F RRC
5372 0F RRC
5373 E6 0F LDEC: ANI 0FH
5375 C6 30 ADI 30H ;PREVOD DEC-->ASCII
5377 C9 RET
;-------------------------------
;DUMP: LXI H,POLE2 ;POCATEK POLE K ZOBRAZENI
; LXI D,512 ;DELKA
;DUMP1: MOV A,L
; ANI 00001111B ;JEN SPODNI 4 BITY
; PUSH D ;
; PUSH PSW ;
; CZ CRLF
; MOV A,L
; ANI 01111111B
; CZ CRLF
; POP PSW ;
; CZ HADR
PROGRAM IOT MACRO-80 3.44 09-Dec-81 PAGE 1-48
; MVI A,' ' ;MEZERU
; CALL COA
; MOV A,L
; ANI 00000011B
; MVI A,' ' ;MEZERU
; CZ COA
; POP D ;
; MOV A,M
; CALL DBYT
; INX H
; DCX D
; MOV A,E
; ORA D
; JNZ DUMP1 ;NENI-LI KONEC TAK ZNOVU
; JMP CRLF2
;-------------------------------
;TABULKA POCATECNICH CISEL A ADRES GND VCC A ODKUD ZOBRAZOVAT
5378 97 09 TABD1: DB 97H,9H ;POCATECNI CISLA DIL5_12
537A 5A3F DW POLE+40*4 ;ADRESA ODKUD ZOBRAZOVAT
537C 5AF6 DW POLE+23+40*8 ;GND
537E 5AEB DW POLE+12+40*8 ;VCC
5380 97 09 DB 97H,9H ;DIL4_12
5382 5A3F DW POLE+40*4
5384 5AF6 DW POLE+23+40*8
5386 5AC3 DW POLE+12+40*7
5388 97 09 DB 97H,9H ;DIL4_13
538A 5A3F DW POLE+40*4
538C 5ACE DW POLE+23+40*7
538E 5AC3 DW POLE+12+40*7
5390 97 09 DB 97H,9H ;DIL5_13
5392 5A3F DW POLE+40*4
5394 5ACE DW POLE+23+40*7
5396 5AEB DW POLE+12+40*8
5398 96 08 DB 96H,8H ;DIL14
539A 5A67 DW POLE+40*5
539C 5B63 DW POLE+12+40*11
539E 5A7E DW POLE+23+40*5
53A0 97 09 DB 97H,9H ;DIL16
53A2 5A3F DW POLE+40*4
53A4 5B63 DW POLE+12+40*11
53A6 5A56 DW POLE+23+40*4
53A8 99 11 DB 99H,11H ;DIL20
53AA 59EF DW POLE+40*2
53AC 5B63 DW POLE+12+40*11
53AE 5A06 DW POLE+23+40*2
53B0 01 13 DB 1H,13H ;DIL24
53B2 599F DW POLE
53B4 5B63 DW POLE+12+40*11
53B6 59B6 DW POLE+23
;-------------------------------
; TABULKA DELEK IO PRO MERENI NAPETI
53B8 08 08 08 08 DILDEL: DB 8,8,8,8,7,8,10,12
53BC 07 08 0A 0C
PROGRAM IOT MACRO-80 3.44 09-Dec-81 PAGE 1-49
;-------------------------------
;NAPETOVE KONSTANY PRO KONTROLU LOG. UROVNI TTL A CMOS
;TTL
53C0 00 80 NTTL: DB 00H,80H ;UIL VSTUPNI LOG0 MAX 0.80V
53C2 02 00 DB 02H,00H ;UIH VSTUPNI LOG1 MIN 2.00V
53C4 00 40 DB 00H,40H ;UOL VYSTUPNI LOG0 MAX 0.40V
53C6 02 40 DB 02H,40H ;UOH VYSTUPNI LOG1 MIN 2.40V
;CMOS 5V
53C8 01 50 NCMOS: DB 01H,50H ;UIL VSTUPNI LOG0 MAX 1.50V
53CA 03 50 DB 03H,50H ;UIH VSTUPNI LOG1 MIN 3.50V
53CC 00 50 DB 00H,50H ;UOL VYSTUPNI LOG0 MAX 0.50V
53CE 04 44 DB 04H,44H ;UOH VYSTUPNI LOG1 MIN 4.44V
;===============================
;TEXTY 1 2 3 4 5 6
; 1234567890123456789012345678901234567890123456789012345678901234
53D0 0D 0A 49 4F UVOD: DB CR,LF,'IO TEST - ZAKLADNI FUNKCNI TEST',CR,LF
53D4 20 54 45 53
53D8 54 20 2D 20
53DC 5A 41 4B 4C
53E0 41 44 4E 49
53E4 20 46 55 4E
53E8 4B 43 4E 49
53EC 20 54 45 53
53F0 54 0D 0A
53F3 43 20 30 32 DB 'C 02.08.2024EC'
53F7 2E 30 38 2E
53FB 32 30 32 34
53FF 45 43
5401 0D 0A 0D 0A HELPT: DB CR,LF,CR,LF
5405 22 3C 22 20 DB '"<" - PREDCHOZI POLOZKA',CR,LF
5409 20 20 2D 20
540D 50 52 45 44
5411 43 48 4F 5A
5415 49 20 50 4F
5419 4C 4F 5A 4B
541D 41 0D 0A
5420 22 3E 22 20 DB '">" - NASLEDUJICI POLOZKA',CR,LF
5424 20 20 2D 20
5428 4E 41 53 4C
542C 45 44 55 4A
5430 49 43 49 20
5434 50 4F 4C 4F
5438 5A 4B 41 0D
543C 0A
543D 22 43 52 22 DB '"CR" - VYBER',CR,LF
5441 20 20 2D 20
5445 56 59 42 45
5449 52 0D 0A
544C 22 3F 22 20 DB '"?" - NAPOVEDA',CR,LF
5450 20 20 2D 20
5454 4E 41 50 4F
5458 56 45 44 41
545C 0D 0A
545E 22 45 53 43 DB '"ESC" - O UROVEN VYS',CR,LF
5462 22 20 2D 20
PROGRAM IOT MACRO-80 3.44 09-Dec-81 PAGE 1-50
5466 4F 20 55 52
546A 4F 56 45 4E
546E 20 56 59 53
5472 0D 0A
5474 22 4B 22 20 DB '"K" - ZAPNE / VYPNE KROKOVANI',CR,LF
5478 20 20 2D 20
547C 5A 41 50 4E
5480 45 20 2F 20
5484 56 59 50 4E
5488 45 20 4B 52
548C 4F 4B 4F 56
5490 41 4E 49 0D
5494 0A
5495 22 5A 22 20 DB '"Z" - ZAPNE / VYPNE ZOBRAZENI DIL',CR,LF
5499 20 20 2D 20
549D 5A 41 50 4E
54A1 45 20 2F 20
54A5 56 59 50 4E
54A9 45 20 5A 4F
54AD 42 52 41 5A
54B1 45 4E 49 20
54B5 44 49 4C 0D
54B9 0A
54BA 22 4D 22 20 DB '"M" - ZAPNE / VYPNE ZOBRAZENI NAPETI',CR,LF
54BE 20 20 2D 20
54C2 5A 41 50 4E
54C6 45 20 2F 20
54CA 56 59 50 4E
54CE 45 20 5A 4F
54D2 42 52 41 5A
54D6 45 4E 49 20
54DA 4E 41 50 45
54DE 54 49 0D 0A
54E2 22 54 22 20 DB '"T" - ZAPNE / VYPNE TRIDENI NAPETI',CR,LF
54E6 20 20 2D 20
54EA 5A 41 50 4E
54EE 45 20 2F 20
54F2 56 59 50 4E
54F6 45 20 54 52
54FA 49 44 45 4E
54FE 49 20 4E 41
5502 50 45 54 49
5506 0D 0A
5508 22 4C 22 20 DB '"L" - KONTROLA LOG. UROVNI TTL/CMOS',CR,LF
550C 20 20 2D 20
5510 4B 4F 4E 54
5514 52 4F 4C 41
5518 20 4C 4F 47
551C 2E 20 55 52
5520 4F 56 4E 49
5524 20 54 54 4C
5528 2F 43 4D 4F
552C 53 0D 0A
552F 22 2A 22 20 DB '"*" - STAV PREPINACU',CR,LF
5533 20 20 2D 20
5537 53 54 41 56
PROGRAM IOT MACRO-80 3.44 09-Dec-81 PAGE 1-51
553B 20 50 52 45
553F 50 49 4E 41
5543 43 55 0D 0A
5547 22 23 22 20 DB '"#" - NASTAVENI ...',CR,LF
554B 20 20 2D 20
554F 4E 41 53 54
5553 41 56 45 4E
5557 49 20 2E 2E
555B 2E 0D 0A
555E 22 5E 43 22 DB '"^C" - KONEC PROGRAMU$'
5562 20 20 2D 20
5566 4B 4F 4E 45
556A 43 20 50 52
556E 4F 47 52 41
5572 4D 55 24
5575 4B 4F 4E 45 KONECT: DB 'KONEC PROGRAMU'
5579 43 20 50 52
557D 4F 47 52 41
5581 4D 55
5583 0D 0A 24 CRLFT: CR,LF,'$'
5586 56 59 42 45 VYB1T: DB 'VYBER SADU IO$'
558A 52 20 53 41
558E 44 55 20 49
5592 4F 24
5594 56 59 42 45 VYB2T: DB 'VYBER IO$'
5598 52 20 49 4F
559C 24
559D 22 43 52 22 POKT: DB '"CR" - SPUSTIT TEST',CR,LF
55A1 20 20 2D 20
55A5 53 50 55 53
55A9 54 49 54 20
55AD 54 45 53 54
55B1 0D 0A
55B3 22 45 53 43 DB '"ESC" - NAVRAT NA VYBER IO$'
55B7 22 20 2D 20
55BB 4E 41 56 52
55BF 41 54 20 4E
55C3 41 20 56 59
55C7 42 45 52 20
55CB 49 4F 24
55CE 5A 41 4C 4F ZALOZT: DB 'ZALOZ IO',CR,LF
55D2 5A 20 49 4F
55D6 0D 0A
55D8 22 43 52 22 DB '"CR" - PRO POKRACOVANI',CR,LF,'$'
55DC 20 2D 20 50
55E0 52 4F 20 50
55E4 4F 4B 52 41
55E8 43 4F 56 41
55EC 4E 49 0D 0A
55F0 24
55F1 20 31 24 ERR1T: DB ' 1$'
55F4 20 32 24 ERR2T: DB ' 2$'
55F7 20 33 24 ERR3T: DB ' 3$'
55FA 4B 4F 4E 45 TKT: DB 'KONEC TESTU$'
55FE 43 20 54 45
5602 53 54 55 24
PROGRAM IOT MACRO-80 3.44 09-Dec-81 PAGE 1-52
5606 0D 0A 4E 45 NEZKO: DB CR,LF,'NEZNAMY KOD$'
560A 5A 4E 41 4D
560E 59 20 4B 4F
5612 44 24
5614 4E 45 4E 49 TNICT: DB 'NENI TESTOVACI TABULKA$'
5618 20 54 45 53
561C 54 4F 56 41
5620 43 49 20 54
5624 41 42 55 4C
5628 4B 41 24
562B 20 5A 41 50 ZAPT: DB ' ZAPNUTO',CR,LF,CR,LF,'$'
562F 4E 55 54 4F
5633 0D 0A 0D 0A
5637 24
5638 20 56 59 50 VYPT: DB ' VYPNUTO',CR,LF,CR,LF,'$'
563C 4E 55 54 4F
5640 0D 0A 0D 0A
5644 24
5645 4B 52 4F 4B KROKT: DB 'KROKOVANI$'
5649 4F 56 41 4E
564D 49 24
564F 5A 4F 42 52 ZOBRT: DB 'ZOBRAZENI DIL$'
5653 41 5A 45 4E
5657 49 20 44 49
565B 4C 24
565D 5A 4F 42 52 MNAPT: DB 'ZOBRAZENI NAPETI U DIL$'
5661 41 5A 45 4E
5665 49 20 4E 41
5669 50 45 54 49
566D 20 55 20 44
5671 49 4C 24
5674 0D 0A 43 48 CHPOT: DB CR,LF,'CHYBA'
5678 59 42 41
567B 20 50 4F 52 PORTT: DB ' PORT$'
567F 54 24
5681 20 44 41 54 TABT: DB ' DATA$'
5685 41 24
5687 4E 45 4E 49 TADPT: DB 'NENI NEBO CHYBA$'
568B 20 4E 45 42
568F 4F 20 43 48
5693 59 42 41 24
5697 20 20 41 44 TADP1: DB ' ADP-1/'
569B 50 2D 31 2F
569F 30 44 48 20 TADP1D: DB '0DH $'
56A3 24
56A4 20 20 41 44 TADP2: DB ' ADP-1/'
56A8 50 2D 31 2F
56AC 30 45 48 20 TADP2D: DB '0EH $'
56B0 24
56B1 20 20 2E 2E TADP2M: DB ' ../0EH $'
56B5 2F 30 45 48
56B9 20 24
56BB 4E 41 53 54 TTPOP: DB 'NASTAVENI PREVODNIKU ADP-1',CR,LF
56BF 41 56 45 4E
56C3 49 20 50 52
56C7 45 56 4F 44
PROGRAM IOT MACRO-80 3.44 09-Dec-81 PAGE 1-53
56CB 4E 49 4B 55
56CF 20 41 44 50
56D3 2D 31 0D 0A
56D7 22 30 22 20 DB '"0" - ZESILENI A= 1',CR,LF
56DB 20 2D 20 5A
56DF 45 53 49 4C
56E3 45 4E 49 20
56E7 41 3D 20 31
56EB 0D 0A
56ED 22 31 22 20 DB '"1" - ZESILENI A=10',CR,LF
56F1 20 2D 20 5A
56F5 45 53 49 4C
56F9 45 4E 49 20
56FD 41 3D 31 30
5701 0D 0A
5703 22 43 52 22 DB '"CR" - KONEC$'
5707 20 2D 20 4B
570B 4F 4E 45 43
570F 24
5710 41 3D 31 20 TZA1: DB 'A=1 $'
5714 20 20 24
5717 41 3D 31 30 TZA10: DB 'A=10$'
571B 24
571C 54 52 49 44 ZTNT: DB 'TRIDENI NAPETI$'
5720 45 4E 49 20
5724 4E 41 50 45
5728 54 49 24
572B 20 20 20 20 MEZ10T: DB ' $'
572F 20 20 20 20
5733 20 20 24
5736 0D 0A 20 49 PZTTNT: DB CR,LF,' IN 0 IN 1 OUT 0 OUT 1',CR,LF,'$'
573A 4E 20 30 20
573E 20 20 20 20
5742 20 49 4E 20
5746 31 20 20 20
574A 20 20 20 4F
574E 55 54 20 30
5752 20 20 20 20
5756 20 4F 55 54
575A 20 31 0D 0A
575E 24
575F 2A 20 2D 20 VELNT: DB '* - ROZDIL LOG. UROVNI VETSI NEZ 0.',VELN1,VELN2,'V',CR,LF,'$'
5763 52 4F 5A 44
5767 49 4C 20 4C
576B 4F 47 2E 20
576F 55 52 4F 56
5773 4E 49 20 56
5777 45 54 53 49
577B 20 4E 45 5A
577F 20 30 2E 32
5783 30 56 0D 0A
5787 24
5788 21 20 2D 20 CHLOGT: DB '! - NAPETI LOG. UROVNE MIMO TOLERANCI',CR,LF,'$'
578C 4E 41 50 45
5790 54 49 20 4C
5794 4F 47 2E 20
PROGRAM IOT MACRO-80 3.44 09-Dec-81 PAGE 1-54
5798 55 52 4F 56
579C 4E 45 20 4D
57A0 49 4D 4F 20
57A4 54 4F 4C 45
57A8 52 41 4E 43
57AC 49 0D 0A 24
57B0 54 54 4C 20 TTLT: DB 'TTL $'
57B4 24
57B5 43 4D 4F 53 CMOST: DB 'CMOS $'
57B9 20 24
57BB 4B 4F 4E 54 LOGT: DB 'KONTROLA LOG. UROVNI $'
57BF 52 4F 4C 41
57C3 20 4C 4F 47
57C7 2E 20 55 52
57CB 4F 56 4E 49
57CF 20 24
57D1 0D 0A 0D 0A NASTAVT:DB CR,LF,CR,LF
57D5 4E 41 53 54 DB 'NASTAVENI ...',CR,LF
57D9 41 56 45 4E
57DD 49 20 2E 2E
57E1 2E 0D 0A
57E4 22 45 53 43 DB '"ESC" - NAVRAT',CR,LF
57E8 22 20 2D 20
57EC 4E 41 56 52
57F0 41 54 0D 0A
57F4 22 41 22 20 DB '"A" - ... PREVODNIKU ADP-1',CR,LF
57F8 20 20 2D 20
57FC 2E 2E 2E 20
5800 50 52 45 56
5804 4F 44 4E 49
5808 4B 55 20 41
580C 44 50 2D 31
5810 0D 0A
5812 22 44 22 20 DB '"D" - ... NAPETI A PROUDU NA DTO-1A',CR,LF
5816 20 20 2D 20
581A 2E 2E 2E 20
581E 4E 41 50 45
5822 54 49 20 41
5826 20 50 52 4F
582A 55 44 55 20
582E 4E 41 20 44
5832 54 4F 2D 31
5836 41 0D 0A
5839 22 43 22 20 DB '"C" - ... '
583D 20 20 2D 20
5841 2E 2E 2E 20
5845 46 52 45 4B CPUT: DB 'FREKVENCE CPU $'
5849 56 45 4E 43
584D 45 20 43 50
5851 55 20 24
5854 32 4D 48 7A MHZ2T: DB '2MHz',CR,LF,CR,LF,'$'
5858 0D 0A 0D 0A
585C 24
585D 34 4D 48 7A MHZ4T: DB '4MHz',CR,LF,CR,LF,'$'
5861 0D 0A 0D 0A
5865 24
PROGRAM IOT MACRO-80 3.44 09-Dec-81 PAGE 1-55
5866 4E 41 53 54 DTOT: DB 'NASTAVENI NAPETI A PROUDU NA DTO-1A',CR,LF
586A 41 56 45 4E
586E 49 20 4E 41
5872 50 45 54 49
5876 20 41 20 50
587A 52 4F 55 44
587E 55 20 4E 41
5882 20 44 54 4F
5886 2D 31 41 0D
588A 0A
588B 22 31 22 20 DB '"1" - ADP-1/0DH',CR,LF
588F 20 2D 20 41
5893 44 50 2D 31
5897 2F 30 44 48
589B 0D 0A
589D 22 32 22 20 DB '"2" - ADP-1/0EH',CR,LF
58A1 20 2D 20 41
58A5 44 50 2D 31
58A9 2F 30 45 48
58AD 0D 0A
58AF 22 43 52 22 DB '"CR" - KONEC$'
58B3 20 2D 20 4B
58B7 4F 4E 45 43
58BB 24
58BC 20 4E 41 50 DTONT: DB ' NAPETI $'
58C0 45 54 49 20
58C4 24
58C5 20 20 50 52 DTOPT: DB ' PROUD $'
58C9 4F 55 44 20
58CD 24
58CE 6D 41 20 24 DTOJT: DB 'mA $'
IF POPIS
58D2 2D 4F 31 32 TXO12: DB '-O12 $'
58D6 20 24
58D8 2D 4F 31 32 TXO123: DB '-O123 $'
58DC 33 20 24
58DF 2D 4F 31 20 TXO1: DB '-O1 $'
58E3 24
58E4 2D 4F 32 20 TXO2: DB '-O2 $'
58E8 24
58E9 2D 4F 33 20 TXO3: DB '-O3 $'
58ED 24
58EE 2D 4F 31 33 TXO13: DB '-O13 $'
58F2 20 24
58F4 2D 4F 32 33 TXO23: DB '-O23 $'
58F8 20 24
58FA 2D 49 31 32 TXI12: DB '-I12 $'
58FE 20 24
5900 2D 49 31 32 TXI123: DB '-I123 $'
5904 33 20 24
5907 2D 49 31 20 TXI1: DB '-I1 $'
590B 24
590C 2D 49 32 20 TXI2: DB '-I2 $'
5910 24
PROGRAM IOT MACRO-80 3.44 09-Dec-81 PAGE 1-56
5911 2D 49 33 20 TXI3: DB '-I3 $'
5915 24
5916 2D 49 31 33 TXI13: DB '-I13 $'
591A 20 24
591C 2D 49 32 33 TXI23: DB '-I23 $'
5920 20 24
5922 2D 56 56 32 TXVV2: DB '-VV2 $'
5926 20 24
5928 2D 56 56 33 TXVV3: DB '-VV3 $'
592C 20 24
592E 2D 4E 41 50 TXNAP: DB '-NAP $'
5932 20 24
5934 2D 47 4F 54 TXGOTO: DB '-GOTO $'
5938 4F 20 24
593B 2D 47 4F 53 TXGOSUB:DB '-GOSUB $'
593F 55 42 20 24
5943 2D 52 45 54 TXRET: DB '-RET $'
5947 20 24
5949 2D 50 52 4F TXPROG: DB '-PROG $'
594D 47 20 24
5950 2D 4E 5A 32 TXNZ2: DB '-NZ2 $'
5954 20 24
5956 2D 4E 5A 33 TXNZ3: DB '-NZ3 $'
595A 20 24
595C 2D 5A 49 46 TXZIF14:DB '-ZIF14'
5960 31 34
5962 20 24 TXNDEF: DB ' $'
;*****************************
;PROMNENE
5964 OPR: DS 2 ;ADRESA TEXTU PROVADENE OPRACE Z TABULKY
ENDIF
5966 ZTAB: DS 2 ;ZACATEK AKTIVNI TABULKY
5968 KTAB: DS 2 ;KONEC AKTIVNI TABULKY
596A PTAB: DS 2 ;POZICE V AKTIVNI TABULCE
596C TTAB: DS 2 ;ADRESA AKTIVNI TEST TABULKY
596E STAB: DS 2 ;ADRESA V TABULCE SKUPIN IO
5970 ANAP: DS 1 ;AKTUALNI NAPAJANI
5971 PP: DS 1 ;POCET PRUOCHODU TESTEM
5972 VVP: DS 1 ;PRIZNAK V/V PARAMETRU
5973 WZTAB: DS 2 ;V/V ZALOHA V TABULCE
5975 AGOSUB: DS 2 ;USCHOVA ADRESY PRO NAVRAT PRI "GOSUB"
5977 KROKO: DS 1 ;PRIZNAK KROKOVANI
;PRO ZOBRAZOVANI DIL
5978 ZOBRO: DS 1 ;PRIZNAK ZOBRAZENI DIL
5979 MNAP: DS 1 ;PRIZNAK MERENI NAPETI PRI ZOBRAZENI DIL
597A PAKNAP: DS 1 ;PRIZNAK ADRESY PRO ZAPIS DRUHE POLOVINY NAPETI
597B KTN: DS 1 ;PRIZNAK TRIDENI NAPETI
597C LOG: DS 1 ;PRIZNAK PRO TYP KONTROLOVANYCH LOG. UROVNI TTL/CMOS
597D CPU: DS 1 ;PRIZNAK FREKVENCE CPU
597E POUT1: DS 1 ;PRIZNAK PRO OUT 1 PRI VYPISECH
597F DIL: DS 1 ;KDE NAPAJENI
PROGRAM IOT MACRO-80 3.44 09-Dec-81 PAGE 1-57
5980 CHLOG: DS 1 ;PRIZNAK CHYBI KONKRETNI ZOBRAZOVANE LOG UROVNE
5981 CHLOG1: DS 1 ;CELKOVY PRIZNAK ZE JE CHYBA LOG UROVNE
5982 VVZ: DS 3 ;CO JE VSTUP A VYSTUP
5985 VDAT: DS 3 ;ZAPISOVANA DATA PRO ZOBRAZENI DIL
5988 CDAT: DS 3 ;CTENA DATA PRO ZOBRAZENI DIL
598B HLERR: DS 2 ;ARESA V TABULCE DAT PRI CHYBE
598D DEERR: DS 2 ;ARESA CHIBOVE HLASKY PRI CHYBE
598F NCZ: DS 3 ;KDE NEZAPOJENE VYVODY
5992 ZIF14: DS 1 ;JE DIL14 V ZIF16
5993 ERR: DS 1 ;PRIZNAK CHYBY
5994 AKNAP: DS 2 ;ARESA V TABULCE PRO ZPRACOVANI NAPETI
5996 PR: DS 1 ;POCITALO PRO PRAZDNZ RADEK (TRIDENE NAPETI)
5997 RNAP: DS 4 ;ROZDILOVE NAPETI PRO TISK
599B AVCC: DS 2 ;ADRESA VCC PRO ZOBRAZENI NAPAJECIHO NAPETI
599D AGND: DS 2 ;ADRESA GND PRO ZOBRAYENI NAPAJECIHO PROUDU
599F POLE: DS 480 ;DATOVE POLE PRO ZOBRAZENI DIL (38+CR+LF*12)
;********************************
5B7F DS 64
5BBF STACK:
5BBF DS 1
;
;********************************
;$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$
;$$ DATOVE POLE $$
;$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$
;===============================
;SEZNAM SKUPIN IO
; 1234567890123456
5BC0 SADYIO:
5BC0 37 34 30 30 DB '7400 - 7499 $' ;SKIPINA IO (16 ZNAKU + $)
5BC4 20 2D 20 37
5BC8 34 39 39 20
5BCC 20 20 20 20
5BD0 24
0011 TEXTP EQU $-SADYIO ;DELKA TEXTU
5BD1 5D3A DW I7400 ;POCATEK SKUPINY IO
5BD3 641E DW I7400K ;KONEC SKUPINY IO
0015 BLOKP EQU $-SADYIO ;DELKA BLOKU
5BD5 37 34 31 30 DB '74100 - 74199 $'
5BD9 30 20 2D 20
5BDD 37 34 31 39
5BE1 39 20 20 20
5BE5 24
5BE6 641E DW I74100
5BE8 69DC DW I74100K
5BEA 37 34 32 30 DB '74200 - 74299 $'
5BEE 30 20 2D 20
5BF2 37 34 32 39
5BF6 39 20 20 20
5BFA 24
5BFB 69DC DW I74200
PROGRAM IOT MACRO-80 3.44 09-Dec-81 PAGE 1-58
5BFD 6C67 DW I74200K
5BFF 37 34 33 30 DB '74300 - 74399 $'
5C03 30 20 2D 20
5C07 37 34 33 39
5C0B 39 20 20 20
5C0F 24
5C10 6C67 DW I74300
5C12 6E0B DW I74300K
5C14 37 34 34 30 DB '74400 - 74499 $'
5C18 30 20 2D 20
5C1C 37 34 34 39
5C20 39 20 20 20
5C24 24
5C25 6E0B DW I74400
5C27 6F5B DW I74400K
5C29 37 34 35 30 DB '74500 - 74599 $'
5C2D 30 20 2D 20
5C31 37 34 35 39
5C35 39 20 20 20
5C39 24
5C3A 6F5B DW I74500
5C3C 7096 DW I74500K
5C3E 37 34 36 30 DB '74600 - 74699 $'
5C42 30 20 2D 20
5C46 37 34 36 39
5C4A 39 20 20 20
5C4E 24
5C4F 7096 DW I74600
5C51 730C DW I74600K
5C53 37 34 37 30 DB '74700 - 74... $'
5C57 30 20 2D 20
5C5B 37 34 2E 2E
5C5F 2E 20 20 20
5C63 24
5C64 730C DW I74700
5C66 73F3 DW I74700K
5C68 34 30 30 30 DB '4000 - 4099 $'
5C6C 20 2D 20 34
5C70 30 39 39 20
5C74 20 20 20 20
5C78 24
5C79 7558 DW I4000
5C7B 78F4 DW I4000K
5C7D 34 35 30 30 DB '4500 - 4599 $'
5C81 20 2D 20 34
5C85 35 39 39 20
5C89 20 20 20 20
5C8D 24
5C8E 78F4 DW I4500
PROGRAM IOT MACRO-80 3.44 09-Dec-81 PAGE 1-59
5C90 7A6E DW I4500K
5C92 34 58 58 58 DB '4XXX - 4XXXX $'
5C96 20 2D 20 34
5C9A 58 58 58 58
5C9E 20 20 20 20
5CA2 24
5CA3 7A6E DW I4XXX
5CA5 7A98 DW I4XXXK
5CA7 33 32 58 58 DB '32XX, 82XX, ... $'
5CAB 2C 20 38 32
5CAF 58 58 2C 20
5CB3 2E 2E 2E 20
5CB7 24
5CB8 73F3 DW I3200
5CBA 74C5 DW I3200K
5CBC 44 44 52 20 DB 'DDR $'
5CC0 20 20 20 20
5CC4 20 20 20 20
5CC8 20 20 20 20
5CCC 24
5CCD 74C5 DW IDDR
5CCF 7558 DW IDDRK
5CD1 37 35 58 58 DB '75XXX $'
5CD5 58 20 20 20
5CD9 20 20 20 20
5CDD 20 20 20 20
5CE1 24
5CE2 7A98 DW I75XXX
5CE4 7B2B DW I75XXXK
5CE6 4F 53 54 41 DB 'OSTATNI IO $'
5CEA 54 4E 49 20
5CEE 49 4F 20 20
5CF2 20 20 20 20
5CF6 24
5CF7 7B2B DW OIO
5CF9 7BBE DW OIOK
IF RUS
5CFB 43 43 43 50 DB 'CCCP TTL $'
5CFF 20 54 54 4C
5D03 20 20 20 20
5D07 20 20 20 20
5D0B 24
5D0C 7BBE DW IRUS
5D0E 8431 DW IRUSK
ENDIF
IF TESLA
PROGRAM IOT MACRO-80 3.44 09-Dec-81 PAGE 1-60
5D10 54 45 53 4C DB 'TESLA MH74/MH74S$'
5D14 41 20 4D 48
5D18 37 34 2F 4D
5D1C 48 37 34 53
5D20 24
5D21 8431 DW ITESLA
5D23 8725 DW ITESLAK
ENDIF
5D25 54 45 53 54 DB 'TEST TESTERU IO $'
5D29 20 54 45 53
5D2D 54 45 52 55
5D31 20 49 4F 20
5D35 24
5D36 8725 DW ITEST
5D38 8764 DW ITESTK
5D3A SADYIOK:
;===============================
;SEZNAM SKUPINY 7400 - 7499
; 1234567890123456
5D3A I7400:
5D3A 37 34 30 30 DB '7400 LA3 LB3$' ;TYP TESTOVANEHO IO
5D3E 20 20 20 20
5D42 20 4C 41 33
5D46 20 4C 42 33
5D4A 24
5D4B 8764 DW I7400P ;ADRESA PODROBNEHO POPISU
5D4D AE3C DW I7400T ;TESTOVACI TABULKA
;7401
5D4F 37 34 30 31 DB '7401 LA8 LB0$'
5D53 20 20 20 20
5D57 20 4C 41 38
5D5B 20 4C 42 30
5D5F 24
5D60 8772 DW I7401P
5D62 AE4E DW I7401T
;7402
5D64 37 34 30 32 DB '7402 LE1$'
5D68 20 20 20 20
5D6C 20 20 20 20
5D70 20 4C 45 31
5D74 24
5D75 8780 DW I7402P
5D77 AE60 DW I7402T
;7403
5D79 37 34 30 33 DB '7403 LA9$'
5D7D 20 20 20 20
5D81 20 20 20 20
5D85 20 4C 41 39
5D89 24
5D8A 8772 DW I7401P
5D8C AE3C DW I7400T
;7404
5D8E 37 34 30 34 DB '7404 LN1$'
PROGRAM IOT MACRO-80 3.44 09-Dec-81 PAGE 1-61
5D92 20 20 20 20
5D96 20 20 20 20
5D9A 20 4C 4E 31
5D9E 24
5D9F 878D DW I7404P
5DA1 AE72 DW I7404T
;7405
5DA3 37 34 30 35 DB '7405 LN2$'
5DA7 20 20 20 20
5DAB 20 20 20 20
5DAF 20 4C 4E 32
5DB3 24
5DB4 879E DW I7405P
5DB6 AE72 DW I7404T
;7406
5DB8 37 34 30 36 DB '7406 LN3$'
5DBC 20 20 20 20
5DC0 20 20 20 20
5DC4 20 4C 4E 33
5DC8 24
5DC9 87AF DW I7406P
5DCB AE72 DW I7404T
;7407
5DCD 37 34 30 37 DB '7407 LN4 LP9$'
5DD1 20 20 20 20
5DD5 20 4C 4E 34
5DD9 20 4C 50 39
5DDD 24
5DDE 87D1 DW I7407P
5DE0 AE7E DW I7407T
;7408
5DE2 37 34 30 38 DB '7408 LI1$'
5DE6 20 20 20 20
5DEA 20 20 20 20
5DEE 20 4C 49 31
5DF2 24
5DF3 87EB DW I7408P
5DF5 AE8A DW I7408T
;7409
5DF7 37 34 30 39 DB '7409 LI2$'
5DFB 20 20 20 20
5DFF 20 20 20 20
5E03 20 4C 49 32
5E07 24
5E08 87F8 DW I7409P
5E0A AE8A DW I7408T
;7410
5E0C 37 34 31 30 DB '7410 LA4 LB4$'
5E10 20 20 20 20
5E14 20 4C 41 34
5E18 20 4C 42 34
5E1C 24
5E1D 8805 DW I7410P
5E1F AE9C DW I7410T
;7411
5E21 37 34 31 31 DB '7411 LI3$'
PROGRAM IOT MACRO-80 3.44 09-Dec-81 PAGE 1-62
5E25 20 20 20 20
5E29 20 20 20 20
5E2D 20 4C 49 33
5E31 24
5E32 8813 DW I7411P
5E34 AEBA DW I7411T
;7412
5E36 37 34 31 32 DB '7412 LA10$'
5E3A 20 20 20 20
5E3E 20 20 20 20
5E42 4C 41 31 30
5E46 24
5E47 8820 DW I7412P
5E49 AE9C DW I7410T
;7413
5E4B 37 34 31 33 DB '7413 TL1$'
5E4F 20 20 20 20
5E53 20 20 20 20
5E57 20 54 4C 31
5E5B 24
5E5C 882E DW I7413P
5E5E AED8 DW I7413T
;7414
5E60 37 34 31 34 DB '7414 TL2$'
5E64 20 20 20 20
5E68 20 20 20 20
5E6C 20 54 4C 32
5E70 24
5E71 8845 DW I7414P
5E73 AE72 DW I7404T
;7415
5E75 37 34 31 35 DB '7415 LI4$'
5E79 20 20 20 20
5E7D 20 20 20 20
5E81 20 4C 49 34
5E85 24
5E86 885F DW I7415P
5E88 AEBA DW I7411T
;7416
5E8A 37 34 31 36 DB '7416 LN5$'
5E8E 20 20 20 20
5E92 20 20 20 20
5E96 20 4C 4E 35
5E9A 24
5E9B 886C DW I7416P
5E9D AE72 DW I7404T
;7417
5E9F 37 34 31 37 DB '7417 LP4$'
5EA3 20 20 20 20
5EA7 20 20 20 20
5EAB 20 4C 50 34
5EAF 24
5EB0 888E DW I7417P
5EB2 AE7E DW I7407T
;7418
5EB4 37 34 31 38 DB '7418 .$'
PROGRAM IOT MACRO-80 3.44 09-Dec-81 PAGE 1-63
5EB8 20 20 20 20
5EBC 20 20 20 20
5EC0 20 20 20 2E
5EC4 24
5EC5 88A8 DW I7418P
5EC7 AED8 DW I7413T
;7419
5EC9 37 34 31 39 DB '7419 .$'
5ECD 20 20 20 20
5ED1 20 20 20 20
5ED5 20 20 20 2E
5ED9 24
5EDA 88C6 DW I7419P
5EDC AE72 DW I7404T
;7420
5EDE 37 34 32 30 DB '7420 LA1 LB1$'
5EE2 20 20 20 20
5EE6 20 4C 41 31
5EEA 20 4C 42 31
5EEE 24
5EEF 88E0 DW I7420P
5EF1 AED8 DW I7413T
;7421
5EF3 37 34 32 31 DB '7421 LI6$'
5EF7 20 20 20 20
5EFB 20 20 20 20
5EFF 20 4C 49 36
5F03 24
5F04 88EE DW I7421P
5F06 AEFF DW I7421T
;7422
5F08 37 34 32 32 DB '7422 LA7 LB7$'
5F0C 20 20 20 20
5F10 20 4C 41 37
5F14 20 4C 42 37
5F18 24
5F19 88FB DW I7422P
5F1B AED8 DW I7413T
;7423
5F1D 37 34 32 33 DB '7423 LE2R$'
5F21 20 20 20 20
5F25 20 20 20 20
5F29 4C 45 32 52
5F2D 24
5F2E 8909 DW I7423P
5F30 AF26 DW I7423T
;7423 + 7460
5F32 37 34 32 33 DB '7423 + 7460 R$'
5F36 20 2B 20 37
5F3A 34 36 30 20
5F3E 20 20 20 52
5F42 24
5F43 8909 DW I7423P
5F45 AF53 DW I7423R
;7424
5F47 37 34 32 34 DB '7424 $'
PROGRAM IOT MACRO-80 3.44 09-Dec-81 PAGE 1-64
5F4B 20 20 20 20
5F4F 20 20 20 20
5F53 20 20 20 20
5F57 24
5F58 892F DW I7424P
5F5A AE3C DW I7400T
;7425
5F5C 37 34 32 35 DB '7425 LE3$'
5F60 20 20 20 20
5F64 20 20 20 20
5F68 20 4C 45 33
5F6C 24
5F6D 8946 DW I7425P
5F6F AFC3 DW I7425T
;7426
5F71 37 34 32 36 DB '7426 LA11$'
5F75 20 20 20 20
5F79 20 20 20 20
5F7D 4C 41 31 31
5F81 24
5F82 895F DW I7426P
5F84 AE3C DW I7400T
;7427
5F86 37 34 32 37 DB '7427 LE4$'
5F8A 20 20 20 20
5F8E 20 20 20 20
5F92 20 4C 45 34
5F96 24
5F97 8971 DW I7427P
5F99 B005 DW I7427T
;7428
5F9B 37 34 32 38 DB '7428 LE5$'
5F9F 20 20 20 20
5FA3 20 20 20 20
5FA7 20 4C 45 35
5FAB 24
5FAC 897E DW I7428P
5FAE AE60 DW I7402T
;7430
5FB0 37 34 33 30 DB '7430 LA2 LB2$'
5FB4 20 20 20 20
5FB8 20 4C 41 32
5FBC 20 4C 42 32
5FC0 24
5FC1 8992 DW I7430P
5FC3 B023 DW I7430T
;7431
5FC5 37 34 33 31 DB '7431 $'
5FC9 20 20 20 20
5FCD 20 20 20 20
5FD1 20 20 20 20
5FD5 24
5FD6 899D DW I7431P
5FD8 B062 DW I7431T
;7432
5FDA 37 34 33 32 DB '7432 LL1$'
PROGRAM IOT MACRO-80 3.44 09-Dec-81 PAGE 1-65
5FDE 20 20 20 20
5FE2 20 20 20 20
5FE6 20 4C 4C 31
5FEA 24
5FEB 89B6 DW I7432P
5FED B074 DW I7432T
;7433
5FEF 37 34 33 33 DB '7433 LE11$'
5FF3 20 20 20 20
5FF7 20 20 20 20
5FFB 4C 45 31 31
5FFF 24
6000 89C2 DW I7433P
6002 AE60 DW I7402T
;7434
6004 37 34 33 34 DB '7434 LI9*$'
6008 20 20 20 20
600C 20 20 20 20
6010 4C 49 39 2A
6014 24
6015 89D6 DW I7434P
6017 AE7E DW I7407T
;7435
6019 37 34 33 35 DB '7435 *$'
601D 20 20 20 20
6021 20 20 20 20
6025 20 20 20 2A
6029 24
602A 89EC DW I7435P
602C AE7E DW I7407T
;7436
602E 37 34 33 36 DB '7436 nt$'
6032 20 20 20 20
6036 20 20 20 20
603A 20 20 6E 74
603E 24
603F 8A02 DW I7436P
6041 B086 DW I7436T
;7437
6043 37 34 33 37 DB '7437 LA12$'
6047 20 20 20 20
604B 20 20 20 20
604F 4C 41 31 32
6053 24
6054 8A0F DW I7437P
6056 AE3C DW I7400T
;7438
6058 37 34 33 38 DB '7438 LA13$'
605C 20 20 20 20
6060 20 20 20 20
6064 4C 41 31 33
6068 24
6069 8A24 DW I7438P
606B AE3C DW I7400T
;7439
606D 37 34 33 39 DB '7439 $'
PROGRAM IOT MACRO-80 3.44 09-Dec-81 PAGE 1-66
6071 20 20 20 20
6075 20 20 20 20
6079 20 20 20 20
607D 24
607E 8A24 DW I7438P
6080 AE4E DW I7401T
;7440
6082 37 34 34 30 DB '7440 LA6 LB6$'
6086 20 20 20 20
608A 20 4C 41 36
608E 20 4C 42 36
6092 24
6093 8A39 DW I7440P
6095 AED8 DW I7413T
;7441
6097 37 34 34 31 DB '7441 $'
609B 20 20 20 20
609F 20 20 20 20
60A3 20 20 20 20
60A7 24
60A8 8A4E DW I7441P
60AA B098 DW I7441T
;7442
60AC 37 34 34 32 DB '7442 ID6$'
60B0 20 20 20 20
60B4 20 20 20 20
60B8 20 49 44 36
60BC 24
60BD 8A66 DW I7442P
60BF B0CE DW I7442T
;7443
60C1 37 34 34 33 DB '7443 $'
60C5 20 20 20 20
60C9 20 20 20 20
60CD 20 20 20 20
60D1 24
60D2 8A7F DW I7443P
60D4 B104 DW I7443T
;7444
60D6 37 34 34 34 DB '7444 $'
60DA 20 20 20 20
60DE 20 20 20 20
60E2 20 20 20 20
60E6 24
60E7 8A99 DW I7444P
60E9 B13A DW I7444T
;7445
60EB 37 34 34 35 DB '7445 ID24$'
60EF 20 20 20 20
60F3 20 20 20 20
60F7 49 44 32 34
60FB 24
60FC 8AB4 DW I7445P
60FE B0CE DW I7442T
;7446
6100 37 34 34 36 DB '7446 $'
PROGRAM IOT MACRO-80 3.44 09-Dec-81 PAGE 1-67
6104 20 20 20 20
6108 20 20 20 20
610C 20 20 20 20
6110 24
6111 8ACC DW I7446P
6113 B170 DW I7446T
;7447
6115 37 34 34 37 DB '7447 $'
6119 20 20 20 20
611D 20 20 20 20
6121 20 20 20 20
6125 24
6126 8AE8 DW I7447P
6128 B170 DW I7446T
;7448
612A 37 34 34 38 DB '7448 $'
612E 20 20 20 20
6132 20 20 20 20
6136 20 20 20 20
613A 24
613B 8B04 DW I7448P
613D B1C3 DW I7448T
;7449
613F 37 34 34 39 DB '7449 PP4$'
6143 20 20 20 20
6147 20 20 20 20
614B 20 50 50 34
614F 24
6150 8B1C DW I7449P
6152 B216 DW I7449T
;7450
6154 37 34 35 30 DB '7450 LR1 R$'
6158 20 20 20 20
615C 20 20 20 4C
6160 52 31 20 52
6164 24
6165 8B39 DW I7450P
6167 B2B4 DW I7450T
;7450 + 7460
6169 37 34 35 30 DB '7450 + 7460 R$'
616D 20 2B 20 37
6171 34 36 30 20
6175 20 20 20 52
6179 24
617A 8B39 DW I7450P
617C B2E3 DW I7450R
;7451
617E 37 34 35 31 DB '7451 LR11$'
6182 20 20 20 20
6186 20 20 20 20
618A 4C 52 31 31
618E 24
618F 8B6A DW I7451P
6191 B318 DW I7451T
;74LS51
6193 37 34 4C 53 DB '74LS51 LR11$'
PROGRAM IOT MACRO-80 3.44 09-Dec-81 PAGE 1-68
6197 35 31 20 20
619B 20 20 20 20
619F 4C 52 31 31
61A3 24
61A4 8B83 DW I74X51P
61A6 B33F DW I74LS51
;7453
61A8 37 34 35 33 DB '7453 LR3 R$'
61AC 20 20 20 20
61B0 20 20 20 4C
61B4 52 33 20 52
61B8 24
61B9 8B9E DW I7453P
61BB B36F DW I7453T
;7453 + 7460
61BD 37 34 35 33 DB '7453 + 7460 R$'
61C1 20 2B 20 37
61C5 34 36 30 20
61C9 20 20 20 52
61CD 24
61CE 8B9E DW I7453P
61D0 B3B7 DW I7453R
;7454
61D2 37 34 35 34 DB '7454 LR13$'
61D6 20 20 20 20
61DA 20 20 20 20
61DE 4C 52 31 33
61E2 24
61E3 8BD0 DW I7454P
61E5 B3E9 DW I7454T
;74LS54
61E7 37 34 4C 53 DB '74LS54 LR13$'
61EB 35 34 20 20
61EF 20 20 20 20
61F3 4C 52 31 33
61F7 24
61F8 8BEA DW I74X54P
61FA B434 DW I74LS54
;7455
61FC 37 34 35 35 DB '7455 LR4 R$'
6200 20 20 20 20
6204 20 20 20 4C
6208 52 34 20 52
620C 24
620D 8C04 DW I7455P
620F B467 DW I7455T
;7455 + 7460
6211 37 34 35 35 DB '7455 + 7460 R$'
6215 20 2B 20 37
6219 34 36 30 20
621D 20 20 20 52
6221 24
6222 8C04 DW I7455P
6224 B496 DW I7455R
;74LS55
6226 37 34 4C 53 DB '74LS55 LR4 $'
PROGRAM IOT MACRO-80 3.44 09-Dec-81 PAGE 1-69
622A 35 35 20 20
622E 20 20 20 20
6232 4C 52 34 20
6236 24
6237 8C32 DW I74X55P
6239 B4C7 DW I74LS55
;7458
623B 37 34 35 38 DB '7458 $'
623F 20 20 20 20
6243 20 20 20 20
6247 20 20 20 20
624B 24
624C 8C48 DW I7458P
624E B4FA DW I7458T
;7460 + 7423, 7450, 7453, 7455
6250 37 34 36 30 DB '7460+X LP1 LD1 R$'
6254 2B 58 20 4C
6258 50 31 20 4C
625C 44 31 20 52
6260 24
6261 8C5C DW I7460P
6263 B52A DW I7460T
;7464
6265 37 34 36 34 DB '7464 LR9$'
6269 20 20 20 20
626D 20 20 20 20
6271 20 4C 52 39
6275 24
6276 8C9D DW I7464P
6278 B52B DW I7464T
;7465
627A 37 34 36 35 DB '7465 LR10$'
627E 20 20 20 20
6282 20 20 20 20
6286 4C 52 31 30
628A 24
628B 8CB8 DW I7465P
628D B52B DW I7464T
;7472
628F 37 34 37 32 DB '7472 TV1 TK1$'
6293 20 20 20 20
6297 20 54 56 31
629B 20 54 4B 31
629F 24
62A0 8CD3 DW I7472P
62A2 B55E DW I7472T
;7473
62A4 37 34 37 33 DB '7473 $'
62A8 20 20 20 20
62AC 20 20 20 20
62B0 20 20 20 20
62B4 24
62B5 8CE6 DW I7473P
62B7 B59A DW I7473T
;7474
62B9 37 34 37 34 DB '7474 TM2 TK2$'
PROGRAM IOT MACRO-80 3.44 09-Dec-81 PAGE 1-70
62BD 20 20 20 20
62C1 20 54 4D 32
62C5 20 54 4B 32
62C9 24
62CA 8CFB DW I7474P
62CC B5BE DW I7474T
;7475
62CE 37 34 37 35 DB '7475 TM7$'
62D2 20 20 20 20
62D6 20 20 20 20
62DA 20 54 4D 37
62DE 24
62DF 8D0F DW I7475P
62E1 B5D6 DW I7475T
;7476
62E3 37 34 37 36 DB '7476 TK3$'
62E7 20 20 20 20
62EB 20 20 20 20
62EF 20 54 4B 33
62F3 24
62F4 8D24 DW I7476P
62F6 B5EE DW I7476T
;7477
62F8 37 34 37 37 DB '7477 TM5$'
62FC 20 20 20 20
6300 20 20 20 20
6304 20 54 4D 35
6308 24
6309 8D3A DW I7477P
630B B617 DW I7477T
;7481
630D 37 34 38 31 DB '7481 RU1$'
6311 20 20 20 20
6315 20 20 20 20
6319 20 52 55 31
631D 24
631E 8D50 DW I7481P
6320 B633 DW I7481T
;7483
6322 37 34 38 33 DB '7483 IM3$'
6326 20 20 20 20
632A 20 20 20 20
632E 20 49 4D 33
6332 24
6333 8D61 DW I7483P
6335 B6D2 DW I7483T
;7485
6337 37 34 38 35 DB '7485 SP1$'
633B 20 20 20 20
633F 20 20 20 20
6343 20 53 50 31
6347 24
6348 8D7B DW I7485P
634A B6F6 DW I7485T
;7486
634C 37 34 38 36 DB '7486 LP5$'
PROGRAM IOT MACRO-80 3.44 09-Dec-81 PAGE 1-71
6350 20 20 20 20
6354 20 20 20 20
6358 20 4C 50 35
635C 24
635D 8D91 DW I7486P
635F B717 DW I7486T
;74L86
6361 37 34 4C 38 DB '74L86 LP5$'
6365 36 20 20 20
6369 20 20 20 20
636D 20 4C 50 35
6371 24
6372 8D91 DW I7486P
6374 CED2 DW I74386T
;7489
6376 37 34 38 39 DB '7489 RU2$'
637A 20 20 20 20
637E 20 20 20 20
6382 20 52 55 32
6386 24
6387 8DA0 DW I7489P
6389 B729 DW I7489T
;7490
638B 37 34 39 30 DB '7490 IE2$'
638F 20 20 20 20
6393 20 20 20 20
6397 20 49 45 32
639B 24
639C 8DB2 DW I7490P
639E B7D5 DW I7490T
;7491
63A0 37 34 39 31 DB '7491 IR2$'
63A4 20 20 20 20
63A8 20 20 20 20
63AC 20 49 52 32
63B0 24
63B1 8DC1 DW I7491P
63B3 B803 DW I7491T
;7492
63B5 37 34 39 32 DB '7492 IE4$'
63B9 20 20 20 20
63BD 20 20 20 20
63C1 20 49 45 34
63C5 24
63C6 8DD8 DW I7492P
63C8 B84D DW I7492T
;7493
63CA 37 34 39 33 DB '7493 IE5$'
63CE 20 20 20 20
63D2 20 20 20 20
63D6 20 49 45 35
63DA 24
63DB 8DEF DW I7493P
63DD B884 DW I7493T
;7495
63DF 37 34 39 35 DB '7495 IR1$'
PROGRAM IOT MACRO-80 3.44 09-Dec-81 PAGE 1-72
63E3 20 20 20 20
63E7 20 20 20 20
63EB 20 49 52 31
63EF 24
63F0 8E04 DW I7495P
63F2 B8C7 DW I7495T
;7496
63F4 37 34 39 36 DB '7496 $'
63F8 20 20 20 20
63FC 20 20 20 20
6400 20 20 20 20
6404 24
6405 8E3F DW I7496P
6407 B8E6 DW I7496T
;7497
6409 37 34 39 37 DB '7497 IE8$'
640D 20 20 20 20
6411 20 20 20 20
6415 20 49 45 38
6419 24
641A 8E7D DW I7497P
641C B918 DW I7497T
641E I7400K:
;===============================
;SEZNAM SKUPINY 74100 - 74199
; 1234567890123456
641E I74100:
641E 37 34 31 30 DB '74100 TK7 R$'
6422 30 20 20 20
6426 20 20 20 54
642A 4B 37 20 52
642E 24
642F 8E99 DW I74100P
6431 B9C9 DW I74100T
;74106
6433 37 34 31 30 DB '74106 $'
6437 36 20 20 20
643B 20 20 20 20
643F 20 20 20 20
6443 24
6444 8D24 DW I7476P
6446 B5EE DW I7476T
;74107
6448 37 34 31 30 DB '74107 TV6$'
644C 37 20 20 20
6450 20 20 20 20
6454 20 54 56 36
6458 24
6459 8EBE DW I74107P
645B B9EA DW I74107T
;74109
645D 37 34 31 30 DB '74109 TV15$'
6461 39 20 20 20
6465 20 20 20 20
6469 54 56 31 35
646D 24
PROGRAM IOT MACRO-80 3.44 09-Dec-81 PAGE 1-73
646E 8ED3 DW I74109P
6470 BA0D DW I74109T
;74110
6472 37 34 31 31 DB '74110 $'
6476 30 20 20 20
647A 20 20 20 20
647E 20 20 20 20
6482 24
6483 8CD3 DW I7472P
6485 B55E DW I7472T
;74111
6487 37 34 31 31 DB '74111 $'
648B 31 20 20 20
648F 20 20 20 20
6493 20 20 20 20
6497 24
6498 8ED3 DW I74109P
649A BA43 DW I74111T
;74112
649C 37 34 31 31 DB '74112 TV9$'
64A0 32 20 20 20
64A4 20 20 20 20
64A8 20 54 56 39
64AC 24
64AD 8ED3 DW I74109P
64AF BA70 DW I74112T
;74113
64B1 37 34 31 31 DB '74113 TV10$'
64B5 33 20 20 20
64B9 20 20 20 20
64BD 54 56 31 30
64C1 24
64C2 8EE9 DW I74113P
64C4 BA9D DW I74113T
;74114
64C6 37 34 31 31 DB '74114 TV11$'
64CA 34 20 20 20
64CE 20 20 20 20
64D2 54 56 31 31
64D6 24
64D7 8EFE DW I74114P
64D9 BABE DW I74114T
;74119
64DB 37 34 31 31 DB '74119 $'
64DF 39 20 20 20
64E3 20 20 20 20
64E7 20 20 20 20
64EB 24
64EC 8F21 DW I74119P
64EE BAE2 DW I74119T
;74121
64F0 37 34 31 32 DB '74121 AG1 R$'
64F4 31 20 20 20
64F8 20 20 20 41
64FC 47 31 20 52
6500 24
PROGRAM IOT MACRO-80 3.44 09-Dec-81 PAGE 1-74
6501 8F44 DW I74121P
6503 BB01 DW I74121T
;74123
6505 37 34 31 32 DB '74123 AG3 R$'
6509 33 20 20 20
650D 20 20 20 41
6511 47 33 20 52
6515 24
6516 8F55 DW I74123P
6518 BB5E DW I74123T
;74125
651A 37 34 31 32 DB '74125 LP8$'
651E 35 20 20 20
6522 20 20 20 20
6526 20 4C 50 38
652A 24
652B 8F77 DW I74125P
652D BC22 DW I74125T
;74126
652F 37 34 31 32 DB '74126 LP14$'
6533 36 20 20 20
6537 20 20 20 20
653B 4C 50 31 34
653F 24
6540 8F77 DW I74125P
6542 BC34 DW I74126T
;74128
6544 37 34 31 32 DB '74128 LE6$'
6548 38 20 20 20
654C 20 20 20 20
6550 20 4C 45 36
6554 24
6555 8F8E DW I74128P
6557 AE60 DW I7402T
;74130
; DB '74130 $'
; DW I74130P
; DW I74130T
;74131
6559 37 34 31 33 DB '74131 $'
655D 31 20 20 20
6561 20 20 20 20
6565 20 20 20 20
6569 24
656A 8FAD DW I74131P
656C BC46 DW I74131T
;74132
656E 37 34 31 33 DB '74132 TL3$'
6572 32 20 20 20
6576 20 20 20 20
657A 20 54 4C 33
657E 24
657F 8FCE DW I74132P
6581 AE3C DW I7400T
;74133
6583 37 34 31 33 DB '74133 $'
PROGRAM IOT MACRO-80 3.44 09-Dec-81 PAGE 1-75
6587 33 20 20 20
658B 20 20 20 20
658F 20 20 20 20
6593 24
6594 8FE5 DW I74133P
6596 BC83 DW I74133T
;74136
6598 37 34 31 33 DB '74136 LL3 LP12$'
659C 36 20 20 20
65A0 4C 4C 33 20
65A4 4C 50 31 32
65A8 24
65A9 8FF7 DW I74136P
65AB B717 DW I7486T
;74137
65AD 37 34 31 33 DB '74137 $'
65B1 37 20 20 20
65B5 20 20 20 20
65B9 20 20 20 20
65BD 24
65BE 9004 DW I74137P
65C0 BCB6 DW I74137T
;74138
65C2 37 34 31 33 DB '74138 ID7$'
65C6 38 20 20 20
65CA 20 20 20 20
65CE 20 49 44 37
65D2 24
65D3 9029 DW I74138P
65D5 BCE9 DW I74138T
;74139
65D7 37 34 31 33 DB '74139 ID14$'
65DB 39 20 20 20
65DF 20 20 20 20
65E3 49 44 31 34
65E7 24
65E8 9042 DW I74139P
65EA BD1C DW I74139T
;74140
65EC 37 34 31 34 DB '74140 LA16$'
65F0 30 20 20 20
65F4 20 20 20 20
65F8 4C 41 31 36
65FC 24
65FD 905C DW I74140P
65FF AED8 DW I7420T
;74141
6601 37 34 31 34 DB '74141 ID1$'
6605 31 20 20 20
6609 20 20 20 20
660D 20 49 44 31
6611 24
6612 907A DW I74141P
6614 B098 DW I7441T
;74143
6616 37 34 31 34 DB '74143 $'
PROGRAM IOT MACRO-80 3.44 09-Dec-81 PAGE 1-76
661A 33 20 20 20
661E 20 20 20 20
6622 20 20 20 20
6626 24
6627 9094 DW I74143P
6629 BD3A DW I74143T
;74144
662B 37 34 31 34 DB '74144 $'
662F 34 20 20 20
6633 20 20 20 20
6637 20 20 20 20
663B 24
663C 90B1 DW I74144P
663E BD3A DW I74143T
;74145
6640 37 34 31 34 DB '74145 ID10$'
6644 35 20 20 20
6648 20 20 20 20
664C 49 44 31 30
6650 24
6651 90D4 DW I74145P
6653 B0CE DW I7442T
;74147
6655 37 34 31 34 DB '74147 IV3$'
6659 37 20 20 20
665D 20 20 20 20
6661 20 49 56 33
6665 24
6666 90F2 DW I74147P
6668 BDC1 DW I74147T
;74148
666A 37 34 31 34 DB '74148 IV1$'
666E 38 20 20 20
6672 20 20 20 20
6676 20 49 56 31
667A 24
667B 910C DW I74148P
667D BDE8 DW I74148T
;74150
667F 37 34 31 35 DB '74150 KP1$'
6683 30 20 20 20
6687 20 20 20 20
668B 20 4B 50 31
668F 24
6690 9126 DW I74150P
6692 BE0C DW I74150T
;74151
6694 37 34 31 35 DB '74151 KP7$'
6698 31 20 20 20
669C 20 20 20 20
66A0 20 4B 50 37
66A4 24
66A5 913E DW I74151P
66A7 BE7B DW I74151T
;74152
66A9 37 34 31 35 DB '74152 KP5$'
PROGRAM IOT MACRO-80 3.44 09-Dec-81 PAGE 1-77
66AD 32 20 20 20
66B1 20 20 20 20
66B5 20 4B 50 35
66B9 24
66BA 9155 DW I74152P
66BC BEB7 DW I74152T
;74153
66BE 37 34 31 35 DB '74153 KP2$'
66C2 33 20 20 20
66C6 20 20 20 20
66CA 20 4B 50 32
66CE 24
66CF 916C DW I74153P
66D1 BEED DW I74153T
;74154
66D3 37 34 31 35 DB '74154 ID3$'
66D7 34 20 20 20
66DB 20 20 20 20
66DF 20 49 44 33
66E3 24
66E4 9186 DW I74154P
66E6 BF11 DW I74154T
;74155
66E8 37 34 31 35 DB '74155 ID4$'
66EC 35 20 20 20
66F0 20 20 20 20
66F4 20 49 44 34
66F8 24
66F9 919A DW I74155P
66FB BF64 DW I74155T
;74156
66FD 37 34 31 35 DB '74156 ID5$'
6701 36 20 20 20
6705 20 20 20 20
6709 20 49 44 35
670D 24
670E 91B1 DW I74156P
6710 BF64 DW I74155T
;74157
6712 37 34 31 35 DB '74157 KP16$'
6716 37 20 20 20
671A 20 20 20 20
671E 4B 50 31 36
6722 24
6723 91C8 DW I74157P
6725 BF7F DW I74157T
;74158
6727 37 34 31 35 DB '74158 KP18$'
672B 38 20 20 20
672F 20 20 20 20
6733 4B 50 31 38
6737 24
6738 91E2 DW I74158P
673A BF97 DW I74158T
;74159
673C 37 34 31 35 DB '74159 ID19$'
PROGRAM IOT MACRO-80 3.44 09-Dec-81 PAGE 1-78
6740 39 20 20 20
6744 20 20 20 20
6748 49 44 31 39
674C 24
674D 9204 DW I74159P
674F BF11 DW I74154T
;74160
6751 37 34 31 36 DB '74160 IE9$'
6755 30 20 20 20
6759 20 20 20 20
675D 20 49 45 39
6761 24
6762 9218 DW I74160P
6764 BFAF DW I74160T
;74161
6766 37 34 31 36 DB '74161 IE10$'
676A 31 20 20 20
676E 20 20 20 20
6772 49 45 31 30
6776 24
6777 9237 DW I74161P
6779 BFD6 DW I74161T
;74162
677B 37 34 31 36 DB '74162 IE11$'
677F 32 20 20 20
6783 20 20 20 20
6787 49 45 31 31
678B 24
678C 9256 DW I74162P
678E C005 DW I74162T
;74163
6790 37 34 31 36 DB '74163 IE18$'
6794 33 20 20 20
6798 20 20 20 20
679C 49 45 31 38
67A0 24
67A1 927C DW I74163P
67A3 C00B DW I74163T
;74164
67A5 37 34 31 36 DB '74164 IR8$'
67A9 34 20 20 20
67AD 20 20 20 20
67B1 20 49 52 38
67B5 24
67B6 92A2 DW I74164P
67B8 C080 DW I74164T
;74165
67BA 37 34 31 36 DB '74165 IR9$'
67BE 35 20 20 20
67C2 20 20 20 20
67C6 20 49 52 39
67CA 24
67CB 92DB DW I74165P
67CD C0B8 DW I74165T
;74166
67CF 37 34 31 36 DB '74166 IR10$'
PROGRAM IOT MACRO-80 3.44 09-Dec-81 PAGE 1-79
67D3 36 20 20 20
67D7 20 20 20 20
67DB 49 52 31 30
67DF 24
67E0 9315 DW I74166P
67E2 C101 DW I74166T
;74168
67E4 37 34 31 36 DB '74168 IE16$'
67E8 38 20 20 20
67EC 20 20 20 20
67F0 49 45 31 36
67F4 24
67F5 9358 DW I74168P
67F7 C157 DW I74168T
;74169
67F9 37 34 31 36 DB '74169 IE17$'
67FD 39 20 20 20
6801 20 20 20 20
6805 49 45 31 37
6809 24
680A 937E DW I74169P
680C C1BC DW I74169T
;74170
680E 37 34 31 37 DB '74170 IR32 RP1$'
6812 30 20 20 20
6816 49 52 33 32
681A 20 52 50 31
681E 24
681F 93A4 DW I74170P
6821 C25F DW I74170T
;74173
6823 37 34 31 37 DB '74173 IR15$'
6827 33 20 20 20
682B 20 20 20 20
682F 49 52 31 35
6833 24
6834 93B6 DW I74173P
6836 C2BD DW I74173T
;74174
6838 37 34 31 37 DB '74174 TM9$'
683C 34 20 20 20
6840 20 20 20 20
6844 20 54 4D 39
6848 24
6849 93C8 DW I74174P
684B C2DB DW I74174T
;74175
684D 37 34 31 37 DB '74175 TM8$'
6851 35 20 20 20
6855 20 20 20 20
6859 20 54 4D 38
685D 24
685E 93D7 DW I74175P
6860 C2F0 DW I74175T
;74176
6862 37 34 31 37 DB '74176 .$'
PROGRAM IOT MACRO-80 3.44 09-Dec-81 PAGE 1-80
6866 36 20 20 20
686A 20 20 20 20
686E 20 20 20 2E
6872 24
6873 93E6 DW I74176P
6875 C305 DW I74176T
;74177
6877 37 34 31 37 DB '74177 nt$'
687B 37 20 20 20
687F 20 20 20 20
6883 20 20 6E 74
6887 24
6888 93FE DW I74177P
688A C312 DW I74177T
;74180
688C 37 34 31 38 DB '74180 IP2$'
6890 30 20 20 20
6894 20 20 20 20
6898 20 49 50 32
689C 24
689D 9416 DW I74180P
689F C364 DW I74180T
;74181
68A1 37 34 31 38 DB '74181 IP3$'
68A5 31 20 20 20
68A9 20 20 20 20
68AD 20 49 50 33
68B1 24
68B2 9442 DW I74181P
68B4 C388 DW I74181T
;74182
68B6 37 34 31 38 DB '74182 IP4$'
68BA 32 20 20 20
68BE 20 20 20 20
68C2 20 49 50 34
68C6 24
68C7 9451 DW I74182P
68C9 C3CF DW I74182T
;74184
68CB 37 34 31 38 DB '74184 PR6$'
68CF 34 20 20 20
68D3 20 20 20 20
68D7 20 50 52 36
68DB 24
68DC 9478 DW I74184P
68DE C408 DW I74184T
;74185
68E0 37 34 31 38 DB '74185 PR7$'
68E4 35 20 20 20
68E8 20 20 20 20
68EC 20 50 52 37
68F0 24
68F1 948F DW I74185P
68F3 C474 DW I74185T
;74188
68F5 37 34 31 38 DB '74188 $'
PROGRAM IOT MACRO-80 3.44 09-Dec-81 PAGE 1-81
68F9 38 20 20 20
68FD 20 20 20 20
6901 20 20 20 20
6905 24
6906 94A6 DW I74188P
6908 C4DC DW I74188T
;74189
690A 37 34 31 38 DB '74189 RU8$'
690E 39 20 20 20
6912 20 20 20 20
6916 20 52 55 38
691A 24
691B 94B9 DW I74189P
691D C548 DW I74189T
;74190
691F 37 34 31 39 DB '74190 IE12 nt$'
6923 30 20 20 20
6927 20 49 45 31
692B 32 20 6E 74
692F 24
6930 9358 DW I74168P
6932 C553 DW I74190T
;74191
6934 37 34 31 39 DB '74191 IE13$'
6938 31 20 20 20
693C 20 20 20 20
6940 49 45 31 33
6944 24
6945 937E DW I74169P
6947 C5AA DW I74191T
;74192
6949 37 34 31 39 DB '74192 IE6$'
694D 32 20 20 20
6951 20 20 20 20
6955 20 49 45 36
6959 24
695A 94CB DW I74192P
695C C650 DW I74192T
;74193
695E 37 34 31 39 DB '74193 IE7$'
6962 33 20 20 20
6966 20 20 20 20
696A 20 49 45 37
696E 24
696F 94FE DW I74193P
6971 C697 DW I74193T
;74194
6973 37 34 31 39 DB '74194 IR11$'
6977 34 20 20 20
697B 20 20 20 20
697F 49 52 31 31
6983 24
6984 9531 DW I74194P
6986 C736 DW I74194T
;74195
6988 37 34 31 39 DB '74195 IR12$'
PROGRAM IOT MACRO-80 3.44 09-Dec-81 PAGE 1-82
698C 35 20 20 20
6990 20 20 20 20
6994 49 52 31 32
6998 24
6999 9577 DW I74195P
699B C784 DW I74195T
;74196
699D 37 34 31 39 DB '74196 IE14$'
69A1 36 20 20 20
69A5 20 20 20 20
69A9 49 45 31 34
69AD 24
69AE 93E6 DW I74176P
69B0 C305 DW I74176T
;74197
69B2 37 34 31 39 DB '74197 IE15 nt$'
69B6 37 20 20 20
69BA 20 49 45 31
69BE 35 20 6E 74
69C2 24
69C3 93FE DW I74177P
69C5 C312 DW I74177T
;74198
69C7 37 34 31 39 DB '74198 IR13$'
69CB 38 20 20 20
69CF 20 20 20 20
69D3 49 52 31 33
69D7 24
69D8 95B3 DW I74198P
69DA C7B5 DW I74198T
69DC I74100K:
;===============================
;SEZNAM SKUPINY 74200 - 74299
; 1234567890123456
69DC I74200:
;74225
; DB '74225 RU10#$'
; DW I74225P
; DW I74225T
;74238
69DC 37 34 32 33 DB '74238 ID19$'
69E0 38 20 20 20
69E4 20 20 20 20
69E8 49 44 31 39
69EC 24
69ED 9029 DW I74138P
69EF C7F9 DW I74238T
;74240
69F1 37 34 32 34 DB '74240 AP3$'
69F5 30 20 20 20
69F9 20 20 20 20
69FD 20 41 50 33
6A01 24
6A02 95F9 DW I74240P
6A04 C82C DW I74240T
;74241
PROGRAM IOT MACRO-80 3.44 09-Dec-81 PAGE 1-83
6A06 37 34 32 34 DB '74241 AP4$'
6A0A 31 20 20 20
6A0E 20 20 20 20
6A12 20 41 50 34
6A16 24
6A17 961E DW I74241P
6A19 C853 DW I74241T
;74242
6A1B 37 34 32 34 DB '74242 IP6$'
6A1F 32 20 20 20
6A23 20 20 20 20
6A27 20 49 50 36
6A2B 24
6A2C 963B DW I74242P
6A2E C87A DW I74242T
;74243
6A30 37 34 32 34 DB '74243 IP7$'
6A34 33 20 20 20
6A38 20 20 20 20
6A3C 20 49 50 37
6A40 24
6A41 9668 DW I74243P
6A43 C8AD DW I74243T
;74244
6A45 37 34 32 34 DB '74244 AP5$'
6A49 34 20 20 20
6A4D 20 20 20 20
6A51 20 41 50 35
6A55 24
6A56 968D DW I74244P
6A58 C8E0 DW I74244T
;74245
6A5A 37 34 32 34 DB '74245 AP6$'
6A5E 35 20 20 20
6A62 20 20 20 20
6A66 20 41 50 36
6A6A 24
6A6B 96A4 DW I74245P
6A6D C907 DW I74245T
;74246
6A6F 37 34 32 34 DB '74246 $'
6A73 36 20 20 20
6A77 20 20 20 20
6A7B 20 20 20 20
6A7F 24
6A80 8ACC DW I7446P
6A82 B17E DW ID146T
;74247
6A84 37 34 32 34 DB '74247 ID18$'
6A88 37 20 20 20
6A8C 20 20 20 20
6A90 49 44 31 38
6A94 24
6A95 96C6 DW I74247P
6A97 B17E DW ID146T
;74248
PROGRAM IOT MACRO-80 3.44 09-Dec-81 PAGE 1-84
6A99 37 34 32 34 DB '74248 $'
6A9D 38 20 20 20
6AA1 20 20 20 20
6AA5 20 20 20 20
6AA9 24
6AAA 8B04 DW I7448P
6AAC B1D1 DW I74248T
;74249
6AAE 37 34 32 34 DB '74249 $'
6AB2 39 20 20 20
6AB6 20 20 20 20
6ABA 20 20 20 20
6ABE 24
6ABF 96E2 DW I74249P
6AC1 B1D1 DW I74248T
;74251
6AC3 37 34 32 35 DB '74251 KP15$'
6AC7 31 20 20 20
6ACB 20 20 20 20
6ACF 4B 50 31 35
6AD3 24
6AD4 96FF DW I74251P
6AD6 C986 DW I74251T
;74253
6AD8 37 34 32 35 DB '74253 KP12$'
6ADC 33 20 20 20
6AE0 20 20 20 20
6AE4 4B 50 31 32
6AE8 24
6AE9 9718 DW I74253P
6AEB C994 DW I74253T
;74256
6AED 37 34 32 35 DB '74256 $'
6AF1 36 20 20 20
6AF5 20 20 20 20
6AF9 20 20 20 20
6AFD 24
6AFE 9734 DW I74256P
6B00 C9A2 DW I74256T
;74257
6B02 37 34 32 35 DB '74257 KP11$'
6B06 37 20 20 20
6B0A 20 20 20 20
6B0E 4B 50 31 31
6B12 24
6B13 9754 DW I74257P
6B15 C9E3 DW I74257T
;74258
6B17 37 34 32 35 DB '74258 KP14$'
6B1B 38 20 20 20
6B1F 20 20 20 20
6B23 4B 50 31 34
6B27 24
6B28 976E DW I74258P
6B2A BF97 DW I74158T
;74259
PROGRAM IOT MACRO-80 3.44 09-Dec-81 PAGE 1-85
6B2C 37 34 32 35 DB '74259 IR30$'
6B30 39 20 20 20
6B34 20 20 20 20
6B38 49 52 33 30
6B3C 24
6B3D 9790 DW I74259P
6B3F C9F1 DW I74259T
;74260
6B41 37 34 32 36 DB '74260 LE7$'
6B45 30 20 20 20
6B49 20 20 20 20
6B4D 20 4C 45 37
6B51 24
6B52 97B5 DW I74260P
6B54 CA4A DW I74260T
;74265
6B56 37 34 32 36 DB '74265 $'
6B5A 35 20 20 20
6B5E 20 20 20 20
6B62 20 20 20 20
6B66 24
6B67 97C2 DW I74265P
6B69 CA65 DW I74265T
;74266
6B6B 37 34 32 36 DB '74266 LP12$'
6B6F 36 20 20 20
6B73 20 20 20 20
6B77 4C 50 31 32
6B7B 24
6B7C 97DD DW I74266P
6B7E CA77 DW I74266T
;74273
6B80 37 34 32 37 DB '74273 IR35$'
6B84 33 20 20 20
6B88 20 20 20 20
6B8C 49 52 33 35
6B90 24
6B91 97ED DW I74273P
6B93 CA89 DW I74273T
;74276
6B95 37 34 32 37 DB '74276 $'
6B99 36 20 20 20
6B9D 20 20 20 20
6BA1 20 20 20 20
6BA5 24
6BA6 9806 DW I74276P
6BA8 CAC6 DW I74276T
;74279
6BAA 37 34 32 37 DB '74279 TR2$'
6BAE 39 20 20 20
6BB2 20 20 20 20
6BB6 20 54 52 32
6BBA 24
6BBB 9827 DW I74279P
6BBD CB68 DW I74279T
;74280
PROGRAM IOT MACRO-80 3.44 09-Dec-81 PAGE 1-86
6BBF 37 34 32 38 DB '74280 IP5$'
6BC3 30 20 20 20
6BC7 20 20 20 20
6BCB 20 49 50 35
6BCF 24
6BD0 9416 DW I74180P
6BD2 CB7D DW I74280T
;74283
6BD4 37 34 32 38 DB '74283 IM6$'
6BD8 33 20 20 20
6BDC 20 20 20 20
6BE0 20 49 4D 36
6BE4 24
6BE5 9838 DW I74283P
6BE7 CB95 DW I74283T
;74287
6BE9 37 34 32 38 DB '74287 $'
6BED 37 20 20 20
6BF1 20 20 20 20
6BF5 20 20 20 20
6BF9 24
6BFA 9852 DW I74287P
6BFC CAFD DW I74287T
;74290
6BFE 37 34 32 39 DB '74290 $'
6C02 30 20 20 20
6C06 20 20 20 20
6C0A 20 20 20 20
6C0E 24
6C0F 9866 DW I74290P
6C11 CBB9 DW I74290T
;74292
; DB '74292 PC1?$'
; DW I74292P
; DW I74292T
;74293
6C13 37 34 32 39 DB '74293 $'
6C17 33 20 20 20
6C1B 20 20 20 20
6C1F 20 20 20 20
6C23 24
6C24 987C DW I74293P
6C26 CBE1 DW I74293T
;74295
6C28 37 34 32 39 DB '74295 IR16$'
6C2C 35 20 20 20
6C30 20 20 20 20
6C34 49 52 31 36
6C38 24
6C39 9898 DW I74295P
6C3B CC1A DW I74295T
;74298
6C3D 37 34 32 39 DB '74298 KP13$'
6C41 38 20 20 20
6C45 20 20 20 20
6C49 4B 50 31 33
PROGRAM IOT MACRO-80 3.44 09-Dec-81 PAGE 1-87
6C4D 24
6C4E 98C4 DW I74298P
6C50 CC48 DW I74298T
;74299
6C52 37 34 32 39 DB '74299 IR24$'
6C56 39 20 20 20
6C5A 20 20 20 20
6C5E 49 52 32 34
6C62 24
6C63 98E7 DW I74299P
6C65 CC7F DW I74299T
6C67 I74200K:
;===============================
;SEZNAM SKUPINY 74300 - 74399
; 1234567890123456
6C67 I74300:
;74322
6C67 37 34 33 32 DB '74322 IR28$'
6C6B 32 20 20 20
6C6F 20 20 20 20
6C73 49 52 32 38
6C77 24
6C78 990B DW I74322P
6C7A CCDB DW I74322T
;74348
6C7C 37 34 33 34 DB '74348 IV2$'
6C80 38 20 20 20
6C84 20 20 20 20
6C88 20 49 56 32
6C8C 24
6C8D 9966 DW I74348P
6C8F BDE8 DW I74148T
;74351
6C91 37 34 33 35 DB '74351 $'
6C95 31 20 20 20
6C99 20 20 20 20
6C9D 20 20 20 20
6CA1 24
6CA2 9988 DW I74351P
6CA4 CD66 DW I74351T
;74352
6CA6 37 34 33 35 DB '74352 KP19$'
6CAA 32 20 20 20
6CAE 20 20 20 20
6CB2 4B 50 31 39
6CB6 24
6CB7 99AA DW I74352P
6CB9 CDA6 DW I74352T
;74353
6CBB 37 34 33 35 DB '74353 KP17$'
6CBF 33 20 20 20
6CC3 20 20 20 20
6CC7 4B 50 31 37
6CCB 24
6CCC 99CC DW I74353P
6CCE CDA6 DW I74352T
PROGRAM IOT MACRO-80 3.44 09-Dec-81 PAGE 1-88
;74363
6CD0 37 34 33 36 DB '74363 $'
6CD4 33 20 20 20
6CD8 20 20 20 20
6CDC 20 20 20 20
6CE0 24
6CE1 99EE DW I74363P
6CE3 CDCA DW I74363T
;74365
6CE5 37 34 33 36 DB '74365 LP10$'
6CE9 35 20 20 20
6CED 20 20 20 20
6CF1 4C 50 31 30
6CF5 24
6CF6 9A13 DW I74365P
6CF8 CDF5 DW I74365T
;74366
6CFA 37 34 33 36 DB '74366 LN6$'
6CFE 36 20 20 20
6D02 20 20 20 20
6D06 20 4C 4E 36
6D0A 24
6D0B 9A2A DW I74366P
6D0D CE0A DW I74366T
;74367
6D0F 37 34 33 36 DB '74367 LL11 LP11$'
6D13 37 20 20 4C
6D17 4C 31 31 20
6D1B 4C 50 31 31
6D1F 24
6D20 9A49 DW I74367P
6D22 CE1F DW I74367T
;74368
6D24 37 34 33 36 DB '74368 LN7$'
6D28 38 20 20 20
6D2C 20 20 20 20
6D30 20 4C 4E 37
6D34 24
6D35 9A67 DW I74368P
6D37 CE34 DW I74368T
;74373
6D39 37 34 33 37 DB '74373 IR22$'
6D3D 33 20 20 20
6D41 20 20 20 20
6D45 49 52 32 32
6D49 24
6D4A 9A8D DW I74373P
6D4C CDCA DW I74363T
;74374
6D4E 37 34 33 37 DB '74374 IR23$'
6D52 34 20 20 20
6D56 20 20 20 20
6D5A 49 52 32 33
6D5E 24
6D5F 9AAC DW I74374P
6D61 CE49 DW I74374T
PROGRAM IOT MACRO-80 3.44 09-Dec-81 PAGE 1-89
;74377
6D63 37 34 33 37 DB '74377 IR27$'
6D67 37 20 20 20
6D6B 20 20 20 20
6D6F 49 52 32 37
6D73 24
6D74 9ACC DW I74377P
6D76 CE61 DW I74377T
;74378
6D78 37 34 33 37 DB '74378 $'
6D7C 38 20 20 20
6D80 20 20 20 20
6D84 20 20 20 20
6D88 24
6D89 9AEC DW I74378P
6D8B CE7E DW I74378T
;74379
6D8D 37 34 33 37 DB '74379 TM10$'
6D91 39 20 20 20
6D95 20 20 20 20
6D99 54 4D 31 30
6D9D 24
6D9E 9B0C DW I74379P
6DA0 CEA8 DW I74379T
;74386
6DA2 37 34 33 38 DB '74386 $'
6DA6 36 20 20 20
6DAA 20 20 20 20
6DAE 20 20 20 20
6DB2 24
6DB3 8D91 DW I7486P
6DB5 CED2 DW I74386T
;74390
6DB7 37 34 33 39 DB '74390 IE20$'
6DBB 30 20 20 20
6DBF 20 20 20 20
6DC3 49 45 32 30
6DC7 24
6DC8 9B42 DW I74390P
6DCA CEE4 DW I74390T
;74393
6DCC 37 34 33 39 DB '74393 IE19$'
6DD0 33 20 20 20
6DD4 20 20 20 20
6DD8 49 45 31 39
6DDC 24
6DDD 9B54 DW I74393P
6DDF CF14 DW I74393T
;74395
6DE1 37 34 33 39 DB '74395 IR25$'
6DE5 35 20 20 20
6DE9 20 20 20 20
6DED 49 52 32 35
6DF1 24
6DF2 9B66 DW I74395P
6DF4 CF86 DW I74395T
PROGRAM IOT MACRO-80 3.44 09-Dec-81 PAGE 1-90
;74399
6DF6 37 34 33 39 DB '74399 KP20$'
6DFA 39 20 20 20
6DFE 20 20 20 20
6E02 4B 50 32 30
6E06 24
6E07 9B9E DW I74399P
6E09 CFB5 DW I74399T
6E0B I74300K:
;===============================
;SEZNAM SKUPINY 74400 - 74499
; 1234567890123456
6E0B I74400:
;74405
6E0B 37 34 34 30 DB '74405 $'
6E0F 35 20 20 20
6E13 20 20 20 20
6E17 20 20 20 20
6E1B 24
6E1C 9029 DW I74138P
6E1E BCE9 DW I74138T
;74412
6E20 37 34 34 31 DB '74412 $'
6E24 32 20 20 20
6E28 20 20 20 20
6E2C 20 20 20 20
6E30 24
6E31 9BBF DW I74412P
6E33 CFD3 DW I74412T
;74414
6E35 37 34 34 31 DB '74414 $'
6E39 34 20 20 20
6E3D 20 20 20 20
6E41 20 20 20 20
6E45 24
6E46 9BDF DW I74414P
6E48 D012 DW I74414T
;74416
6E4A 37 34 34 31 DB '74416 $'
6E4E 36 20 20 20
6E52 20 20 20 20
6E56 20 20 20 20
6E5A 24
6E5B 9C00 DW I74416P
6E5D D0DF DW I74416T
;74426
6E5F 37 34 34 32 DB '74426 $'
6E63 36 20 20 20
6E67 20 20 20 20
6E6B 20 20 20 20
6E6F 24
6E70 9C23 DW I74426P
6E72 D0F6 DW I74426T
;74440
6E74 37 34 34 34 DB '74440 .$'
6E78 30 20 20 20
PROGRAM IOT MACRO-80 3.44 09-Dec-81 PAGE 1-91
6E7C 20 20 20 20
6E80 20 20 20 2E
6E84 24
6E85 9C4E DW I74440P
6E87 D11D DW I74442T
;74441
6E89 37 34 34 34 DB '74441 .$'
6E8D 31 20 20 20
6E91 20 20 20 20
6E95 20 20 20 2E
6E99 24
6E9A 9C68 DW I74441P
6E9C D1E2 DW I74443T
;74442
6E9E 37 34 34 34 DB '74442 $'
6EA2 32 20 20 20
6EA6 20 20 20 20
6EAA 20 20 20 20
6EAE 24
6EAF 9C8A DW I74442P
6EB1 D11D DW I74442T
;74443
6EB3 37 34 34 34 DB '74443 $'
6EB7 33 20 20 20
6EBB 20 20 20 20
6EBF 20 20 20 20
6EC3 24
6EC4 9CA4 DW I74443P
6EC6 D1E2 DW I74443T
;74444
6EC8 37 34 34 34 DB '74444 $'
6ECC 34 20 20 20
6ED0 20 20 20 20
6ED4 20 20 20 20
6ED8 24
6ED9 9CC6 DW I74444P
6EDB D221 DW I74444T
;74448
6EDD 37 34 34 34 DB '74448 .$'
6EE1 38 20 20 20
6EE5 20 20 20 20
6EE9 20 20 20 2E
6EED 24
6EEE 9CF2 DW I74448P
6EF0 D221 DW I74444T
;74461
6EF2 37 34 34 36 DB '74461 $'
6EF6 31 20 20 20
6EFA 20 20 20 20
6EFE 20 20 20 20
6F02 24
6F03 9D1E DW I74461P
6F05 D2AA DW I74461T
;74482
6F07 37 34 34 38 DB '74482 $'
6F0B 32 20 20 20
PROGRAM IOT MACRO-80 3.44 09-Dec-81 PAGE 1-92
6F0F 20 20 20 20
6F13 20 20 20 20
6F17 24
6F18 9D3A DW I74482P
6F1A D3E6 DW I74482T
;74483
6F1C 37 34 34 38 DB '74483 $'
6F20 33 20 20 20
6F24 20 20 20 20
6F28 20 20 20 20
6F2C 24
6F2D 9D59 DW I74483P
6F2F D405 DW I74483T
;74486
6F31 37 34 34 38 DB '74486 $'
6F35 36 20 20 20
6F39 20 20 20 20
6F3D 20 20 20 20
6F41 24
6F42 96A4 DW I74245P
6F44 D424 DW I74486T
;74487
6F46 37 34 34 38 DB '74487 $'
6F4A 37 20 20 20
6F4E 20 20 20 20
6F52 20 20 20 20
6F56 24
6F57 9D80 DW I74487P
6F59 D447 DW I74487T
6F5B I74400K:
;===============================
;SEZNAM SKUPINY 74500 - 74599
; 1234567890123456
6F5B I74500:
;74518
6F5B 37 34 35 31 DB '74518 nt$'
6F5F 38 20 20 20
6F63 20 20 20 20
6F67 20 20 6E 74
6F6B 24
6F6C 9DAA DW I74518P
6F6E D46A DW I74518T
;74520
6F70 37 34 35 32 DB '74520 .$'
6F74 30 20 20 20
6F78 20 20 20 20
6F7C 20 20 20 2E
6F80 24
6F81 9DCC DW I74520P
6F83 D48A DW I74521T
;74521
6F85 37 34 35 32 DB '74521 $'
6F89 31 20 20 20
6F8D 20 20 20 20
6F91 20 20 20 20
6F95 24
PROGRAM IOT MACRO-80 3.44 09-Dec-81 PAGE 1-93
6F96 9DCC DW I74520P
6F98 D48A DW I74521T
;74533
; DB '74533 IR40$'
; DW I74533P
; DW I74533T
;74534
6F9A 37 34 35 33 DB '74534 IR41$'
6F9E 34 20 20 20
6FA2 20 20 20 20
6FA6 49 52 34 31
6FAA 24
6FAB 9DF6 DW I74534P
6FAD D4A9 DW I74534T
;74540
6FAF 37 34 35 34 DB '74540 AP12$'
6FB3 30 20 20 20
6FB7 20 20 20 20
6FBB 41 50 31 32
6FBF 24
6FC0 9E1E DW I74540P
6FC2 D4CC DW I74540T
;74541
6FC4 37 34 35 34 DB '74541 AP13$'
6FC8 31 20 20 20
6FCC 20 20 20 20
6FD0 41 50 31 33
6FD4 24
6FD5 9E40 DW I74541P
6FD7 D4EE DW I74541T
;74563
6FD9 37 34 35 36 DB '74563 $'
6FDD 33 20 20 20
6FE1 20 20 20 20
6FE5 20 20 20 20
6FE9 24
6FEA 9E5A DW I74563P
6FEC D4FF DW I74563T
;74564
6FEE 37 34 35 36 DB '74564 $'
6FF2 34 20 20 20
6FF6 20 20 20 20
6FFA 20 20 20 20
6FFE 24
6FFF 9DF6 DW I74534P
7001 D527 DW I74564T
;74571
7003 37 34 35 37 DB '74571 $'
7007 31 20 20 20
700B 20 20 20 20
700F 20 20 20 20
7013 24
7014 9E81 DW I74571P
7016 D543 DW I74571T
;74573
7018 37 34 35 37 DB '74573 IR33$'
PROGRAM IOT MACRO-80 3.44 09-Dec-81 PAGE 1-94
701C 33 20 20 20
7020 20 20 20 20
7024 49 52 33 33
7028 24
7029 9A8D DW I74373P
702B D56E DW I74573T
;74574
702D 37 34 35 37 DB '74574 IR37$'
7031 34 20 20 20
7035 20 20 20 20
7039 49 52 33 37
703D 24
703E 9AAC DW I74374P
7040 D596 DW I74574T
;74576
7042 37 34 35 37 DB '74576 $'
7046 36 20 20 20
704A 20 20 20 20
704E 20 20 20 20
7052 24
7053 9DF6 DW I74534P
7055 D527 DW I74564T
;74580
7057 37 34 35 38 DB '74580 $'
705B 30 20 20 20
705F 20 20 20 20
7063 20 20 20 20
7067 24
7068 9E5A DW I74563P
706A D4FF DW I74563T
;74595
706C 37 34 35 39 DB '74595 $'
7070 35 20 20 20
7074 20 20 20 20
7078 20 20 20 20
707C 24
707D 9E95 DW I74595P
707F D5B2 DW I74595T
;74596
7081 37 34 35 39 DB '74596 .$'
7085 36 20 20 20
7089 20 20 20 20
708D 20 20 20 2E
7091 24
7092 9EDA DW I74596P
7094 D5B2 DW I74595T
7096 I74500K:
;===============================
;SEZNAM SKUPINY 74600 - 74699
; 1234567890123456
7096 I74600:
;74638
7096 37 34 36 33 DB '74638 .$'
709A 38 20 20 20
709E 20 20 20 20
70A2 20 20 20 2E
PROGRAM IOT MACRO-80 3.44 09-Dec-81 PAGE 1-95
70A6 24
70A7 9F1F DW I74638P
70A9 D61A DW I74640T
;74639
70AB 37 34 36 33 DB '74639 $'
70AF 39 20 20 20
70B3 20 20 20 20
70B7 20 20 20 20
70BB 24
70BC 9F4C DW I74639P
70BE C907 DW I74245T
;74640
70C0 37 34 36 34 DB '74640 AP9$'
70C4 30 20 20 20
70C8 20 20 20 20
70CC 20 41 50 39
70D0 24
70D1 9F71 DW I74640P
70D3 D61A DW I74640T
;74641
70D5 37 34 36 34 DB '74641 AP7$'
70D9 31 20 20 20
70DD 20 20 20 20
70E1 20 41 50 37
70E5 24
70E6 9F9B DW I74641P
70E8 C907 DW I74245T
;74642
70EA 37 34 36 34 DB '74642 $'
70EE 32 20 20 20
70F2 20 20 20 20
70F6 20 20 20 20
70FA 24
70FB 9FBD DW I74642P
70FD D61A DW I74640T
;74643
70FF 37 34 36 34 DB '74643 AP16$'
7103 33 20 20 20
7107 20 20 20 20
710B 41 50 31 36
710F 24
7110 9FE7 DW I74643P
7112 D699 DW I74643T
;74644
7114 37 34 36 34 DB '74644 $'
7118 34 20 20 20
711C 20 20 20 20
7120 20 20 20 20
7124 24
7125 A01C DW I74644P
7127 D699 DW I74643T
;74645
7129 37 34 36 34 DB '74645 AP8$'
712D 35 20 20 20
7131 20 20 20 20
7135 20 41 50 38
PROGRAM IOT MACRO-80 3.44 09-Dec-81 PAGE 1-96
7139 24
713A 96A4 DW I74245P
713C C907 DW I74245T
;74646
713E 37 34 36 34 DB '74646 VA1$'
7142 36 20 20 20
7146 20 20 20 20
714A 20 56 41 31
714E 24
714F A050 DW I74646P
7151 D6A0 DW I74646T
;74647
7153 37 34 36 34 DB '74647 $'
7157 37 20 20 20
715B 20 20 20 20
715F 20 20 20 20
7163 24
7164 A07B DW I74647P
7166 D6A0 DW I74646T
;74648
7168 37 34 36 34 DB '74648 VA2 nt$'
716C 38 20 20 20
7170 20 20 56 41
7174 32 20 6E 74
7178 24
7179 A0A6 DW I74648P
717B D6EF DW I74648T
;74649
717D 37 34 36 34 DB '74649 nt$'
7181 39 20 20 20
7185 20 20 20 20
7189 20 20 6E 74
718D 24
718E A0D9 DW I74649P
7190 D6EF DW I74648T
;74651
7192 37 34 36 35 DB '74651 AP17$'
7196 31 20 20 20
719A 20 20 20 20
719E 41 50 31 37
71A2 24
71A3 A10C DW I74651P
71A5 D785 DW I74653T
;74652
71A7 37 34 36 35 DB '74652 AP24$'
71AB 32 20 20 20
71AF 20 20 20 20
71B3 41 50 32 34
71B7 24
71B8 A13D DW I74652P
71BA D73E DW I74652T
;74653
71BC 37 34 36 35 DB '74653 $'
71C0 33 20 20 20
71C4 20 20 20 20
71C8 20 20 20 20
PROGRAM IOT MACRO-80 3.44 09-Dec-81 PAGE 1-97
71CC 24
71CD A166 DW I74653P
71CF D785 DW I74653T
;74654
71D1 37 34 36 35 DB '74654 $'
71D5 34 20 20 20
71D9 20 20 20 20
71DD 20 20 20 20
71E1 24
71E2 A19A DW I74654P
71E4 D73E DW I74652T
;74668
71E6 37 34 36 36 DB '74668 $'
71EA 38 20 20 20
71EE 20 20 20 20
71F2 20 20 20 20
71F6 24
71F7 9358 DW I74168P
71F9 C157 DW I74168T
;74669
71FB 37 34 36 36 DB '74669 $'
71FF 39 20 20 20
7203 20 20 20 20
7207 20 20 20 20
720B 24
720C 937E DW I74169P
720E C1BC DW I74169T
;74670
7210 37 34 36 37 DB '74670 IR26$'
7214 30 20 20 20
7218 20 20 20 20
721C 49 52 32 36
7220 24
7221 A1C6 DW I74670P
7223 C25F DW I74170T
;74673
7225 37 34 36 37 DB '74673 #$'
7229 33 20 20 20
722D 20 20 20 20
7231 20 20 20 23
7235 24
7236 A1DE DW I74673P
7238 D7CC DW I74673T
;74674
723A 37 34 36 37 DB '74674 #$'
723E 34 20 20 20
7242 20 20 20 20
7246 20 20 20 23
724A 24
724B A20E DW I74674P
724D D7CD DW I74674T
;74688
724F 37 34 36 38 DB '74688 $'
7253 38 20 20 20
7257 20 20 20 20
725B 20 20 20 20
PROGRAM IOT MACRO-80 3.44 09-Dec-81 PAGE 1-98
725F 24
7260 9DCC DW I74520P
7262 D48A DW I74521T
;74690
7264 37 34 36 39 DB '74690 $'
7268 30 20 20 20
726C 20 20 20 20
7270 20 20 20 20
7274 24
7275 A238 DW I74690P
7277 D7CE DW I74690T
;74691
7279 37 34 36 39 DB '74691 $'
727D 31 20 20 20
7281 20 20 20 20
7285 20 20 20 20
7289 24
728A A26E DW I74691P
728C D7EF DW I74691T
;74692
728E 37 34 36 39 DB '74692 $'
7292 32 20 20 20
7296 20 20 20 20
729A 20 20 20 20
729E 24
729F A2A4 DW I74692P
72A1 D81C DW I74692T
;74693
72A3 37 34 36 39 DB '74693 $'
72A7 33 20 20 20
72AB 20 20 20 20
72AF 20 20 20 20
72B3 24
72B4 A2E1 DW I74693P
72B6 D825 DW I74693T
;74696
72B8 37 34 36 39 DB '74696 $'
72BC 36 20 20 20
72C0 20 20 20 20
72C4 20 20 20 20
72C8 24
72C9 A31E DW I74696P
72CB D8A1 DW I74696T
;74697
72CD 37 34 36 39 DB '74697 $'
72D1 37 20 20 20
72D5 20 20 20 20
72D9 20 20 20 20
72DD 24
72DE A35A DW I74697P
72E0 D8DD DW I74697T
;74698
72E2 37 34 36 39 DB '74698 $'
72E6 38 20 20 20
72EA 20 20 20 20
72EE 20 20 20 20
PROGRAM IOT MACRO-80 3.44 09-Dec-81 PAGE 1-99
72F2 24
72F3 A396 DW I74698P
72F5 D913 DW I74698T
;74699
72F7 37 34 36 39 DB '74699 $'
72FB 39 20 20 20
72FF 20 20 20 20
7303 20 20 20 20
7307 24
7308 A3DD DW I74699P
730A D925 DW I74699T
730C I74600K:
;===============================
;SEZNAM SKUPINY 74700 - 74...
; 1234567890123456
730C I74700:
;74794
730C 37 34 37 39 DB '74794 $'
7310 34 20 20 20
7314 20 20 20 20
7318 20 20 20 20
731C 24
731D A424 DW I74794P
731F DA07 DW I74794T
;74821
7321 37 34 38 32 DB '74821 $'
7325 31 20 20 20
7329 20 20 20 20
732D 20 20 20 20
7331 24
7332 A444 DW I74821P
7334 DA32 DW I74821T
;74827
7336 37 34 38 32 DB '74827 $'
733A 37 20 20 20
733E 20 20 20 20
7342 20 20 20 20
7346 24
7347 A466 DW I74827P
7349 DA4E DW I74827T
;74828
734B 37 34 38 32 DB '74828 NT$'
734F 38 20 20 20
7353 20 20 20 20
7357 20 20 4E 54
735B 24
735C A481 DW I74828P
735E DA6A DW I74828T
;74841
7360 37 34 38 34 DB '74841 $'
7364 31 20 20 20
7368 20 20 20 20
736C 20 20 20 20
7370 24
7371 A4A4 DW I74841P
7373 DA86 DW I74841T
PROGRAM IOT MACRO-80 3.44 09-Dec-81 PAGE 1-100
;74848
7375 37 34 38 34 DB '74848 $'
7379 38 20 20 20
737D 20 20 20 20
7381 20 20 20 20
7385 24
7386 9966 DW I74348P
7388 BDE8 DW I74148T
;74873
738A 37 34 38 37 DB '74873 IR34$'
738E 33 20 20 20
7392 20 20 20 20
7396 49 52 33 34
739A 24
739B A4C7 DW I74873P
739D DAAF DW I74873T
;74874
739F 37 34 38 37 DB '74874 IR38$'
73A3 34 20 20 20
73A7 20 20 20 20
73AB 49 52 33 38
73AF 24
73B0 A4F0 DW I74874P
73B2 DACE DW I74874T
;741004
73B4 37 34 31 30 DB '741004 LN8$'
73B8 30 34 20 20
73BC 20 20 20 20
73C0 20 4C 4E 38
73C4 24
73C5 A50D DW I71004P
73C7 AE72 DW I7404T
;741005
73C9 37 34 31 30 DB '741005 LN10$'
73CD 30 35 20 20
73D1 20 20 20 20
73D5 4C 4E 31 30
73D9 24
73DA A523 DW I71005P
73DC AE72 DW I7404T
;741245
73DE 37 34 31 32 DB '741245 $'
73E2 34 35 20 20
73E6 20 20 20 20
73EA 20 20 20 20
73EE 24
73EF 96A4 DW I74245P
73F1 C907 DW I74245T
73F3 I74700K:
;===============================
;SEZNAM SKUPINY 32XX, 82XX, ....
; 1234567890123456
73F3 I3200:
;3205
73F3 33 32 30 35 DB '3205, 8205 $'
73F7 2C 20 38 32
PROGRAM IOT MACRO-80 3.44 09-Dec-81 PAGE 1-101
73FB 30 35 20 20
73FF 20 20 20 20
7403 24
7404 9029 DW I74138P
7406 BCE9 DW I74138T
;3212
7408 33 32 31 32 DB '3212, 8212 IR12$'
740C 2C 20 38 32
7410 31 32 20 20
7414 49 52 31 32
7418 24
7419 9BBF DW I74412P
741B CFD3 DW I74412T
;3214
741D 33 32 31 34 DB '3214, 8214 IK14$'
7421 2C 20 38 32
7425 31 34 20 20
7429 49 4B 31 34
742D 24
742E 9BDF DW I74414P
7430 D012 DW I74414T
;3216
7432 33 32 31 36 DB '3216, 8216 AP16$'
7436 2C 20 38 32
743A 31 36 20 20
743E 41 50 31 36
7442 24
7443 9C00 DW I74416P
7445 D0DF DW I74416T
;3226
7447 33 32 32 36 DB '3226, 8226 AP26$'
744B 2C 20 38 32
744F 32 36 20 20
7453 41 50 32 36
7457 24
7458 9C23 DW I74426P
745A D0F6 DW I74426T
;8243
745C 38 32 34 33 DB '8243 $'
7460 20 20 20 20
7464 20 20 20 20
7468 20 20 20 20
746C 24
746D A5E8 DW I8243P
746F DAE8 DW I8243T
;8282
7471 38 32 38 32 DB '8282 $'
7475 20 20 20 20
7479 20 20 20 20
747D 20 20 20 20
7481 24
7482 9D3A DW I74482P
7484 D3E6 DW I74482T
;8283
7486 38 32 38 33 DB '8283 $'
748A 20 20 20 20
PROGRAM IOT MACRO-80 3.44 09-Dec-81 PAGE 1-102
748E 20 20 20 20
7492 20 20 20 20
7496 24
7497 9D59 DW I74483P
7499 D405 DW I74483T
;8286
749B 38 32 38 36 DB '8286 $'
749F 20 20 20 20
74A3 20 20 20 20
74A7 20 20 20 20
74AB 24
74AC 96A4 DW I74245P
74AE D424 DW I74486T
;8287
74B0 38 32 38 37 DB '8287 $'
74B4 20 20 20 20
74B8 20 20 20 20
74BC 20 20 20 20
74C0 24
74C1 9D80 DW I74487P
74C3 D447 DW I74487T
74C5 I3200K:
;===============================
;SEZNAM SKUPINY DDR 7seg. dekod.
; 1234567890123456
74C5 IDDR:
;D146
74C5 44 31 34 36 DB 'D146D/E146D $'
74C9 44 2F 45 31
74CD 34 36 44 20
74D1 20 20 20 20
74D5 24
74D6 8ACC DW I7446P
74D8 B17E DW ID146T
;D147
74DA 44 31 34 37 DB 'D147D/E147D $'
74DE 44 2F 45 31
74E2 34 37 44 20
74E6 20 20 20 20
74EA 24
74EB 8AE8 DW I7447P
74ED B17E DW ID146T
;D345
74EF 44 33 34 35 DB 'D345D/E345D $'
74F3 44 2F 45 33
74F7 34 35 44 20
74FB 20 20 20 20
74FF 24
7500 A53D DW ID345P
7502 B252 DW ID345T
;D346
7504 44 33 34 36 DB 'D346D/E346D R$'
7508 44 2F 45 33
750C 34 36 44 20
7510 20 20 20 52
7514 24
PROGRAM IOT MACRO-80 3.44 09-Dec-81 PAGE 1-103
7515 A559 DW ID346P
7517 B252 DW ID345T
;D347
7519 44 33 34 37 DB 'D347D/E347D $'
751D 44 2F 45 33
7521 34 37 44 20
7525 20 20 20 20
7529 24
752A A58B DW ID347P
752C B26F DW ID347T
;D348
752E 44 33 34 38 DB 'D348D/E348D R$'
7532 44 2F 45 33
7536 34 38 44 20
753A 20 20 20 52
753E 24
753F A5AE DW ID348P
7541 B26F DW ID347T
;D351
7543 44 33 35 31 DB 'D351D/E351D $'
7547 44 2F 45 33
754B 35 31 44 20
754F 20 20 20 20
7553 24
7554 ACA5 DW ID351P
7556 EBDC DW ID351T
7558 IDDRK:
;===============================
;SEZNAM SKUPINY 4000 - 4099
; 1234567890123456
7558 I4000:
;4000
7558 34 30 30 30 DB '4000 LP4$'
755C 20 20 20 20
7560 20 20 20 20
7564 20 4C 50 34
7568 24
7569 A610 DW I4000P
756B DC21 DW I4000T
;4001
756D 34 30 30 31 DB '4001 LE5$'
7571 20 20 20 20
7575 20 20 20 20
7579 20 4C 45 35
757D 24
757E A624 DW I4001P
7580 DC42 DW I4001T
;4002
7582 34 30 30 32 DB '4002 LE6$'
7586 20 20 20 20
758A 20 20 20 20
758E 20 4C 45 36
7592 24
7593 A62E DW I4002P
7595 DC54 DW I4002T
;4011
PROGRAM IOT MACRO-80 3.44 09-Dec-81 PAGE 1-104
7597 34 30 31 31 DB '4011 LA7$'
759B 20 20 20 20
759F 20 20 20 20
75A3 20 4C 41 37
75A7 24
75A8 A638 DW I4011P
75AA DC7B DW I4011T
;4012
75AC 34 30 31 32 DB '4012 LA8$'
75B0 20 20 20 20
75B4 20 20 20 20
75B8 20 4C 41 38
75BC 24
75BD A643 DW I4012P
75BF DC8D DW I4012T
;4013
75C1 34 30 31 33 DB '4013 TM2$'
75C5 20 20 20 20
75C9 20 20 20 20
75CD 20 54 4D 32
75D1 24
75D2 A64E DW I4013P
75D4 DCB4 DW I4013T
;4015
75D6 34 30 31 35 DB '4015 IR2$'
75DA 20 20 20 20
75DE 20 20 20 20
75E2 20 49 52 32
75E6 24
75E7 A65F DW I4015P
75E9 DCCF DW I4015T
;4017
75EB 34 30 31 37 DB '4017 IE8$'
75EF 20 20 20 20
75F3 20 20 20 20
75F7 20 49 45 38
75FB 24
75FC A695 DW I4017P
75FE DCFC DW I4017T
;4020
7600 34 30 32 30 DB '4020 IE16$'
7604 20 20 20 20
7608 20 20 20 20
760C 49 45 31 36
7610 24
7611 A6B2 DW I4020P
7613 DD6A DW I4020T
;4021
7615 34 30 32 31 DB '4021 $'
7619 20 20 20 20
761D 20 20 20 20
7621 20 20 20 20
7625 24
7626 A6D1 DW I4021P
7628 DE7F DW I4021T
;4023
PROGRAM IOT MACRO-80 3.44 09-Dec-81 PAGE 1-105
762A 34 30 32 33 DB '4023 LA9$'
762E 20 20 20 20
7632 20 20 20 20
7636 20 4C 41 39
763A 24
763B A70F DW I4023P
763D DEC8 DW I4023T
;4024
763F 34 30 32 34 DB '4024 IE1$'
7643 20 20 20 20
7647 20 20 20 20
764B 20 49 45 31
764F 24
7650 A71A DW I4024P
7652 DEE6 DW I4024T
;4025
7654 34 30 32 35 DB '4025 LE10$'
7658 20 20 20 20
765C 20 20 20 20
7660 4C 45 31 30
7664 24
7665 A72C DW I4025P
7667 DFB8 DW I4025T
;4027
7669 34 30 32 37 DB '4027 TV1$'
766D 20 20 20 20
7671 20 20 20 20
7675 20 54 56 31
7679 24
767A A736 DW I4027P
767C DFD6 DW I4027T
;4028
767E 34 30 32 38 DB '4028 ID1$'
7682 20 20 20 20
7686 20 20 20 20
768A 20 49 44 31
768E 24
768F A749 DW I4028P
7691 DFFD DW I4028T
;4029
7693 34 30 32 39 DB '4029 IE14$'
7697 20 20 20 20
769B 20 20 20 20
769F 49 45 31 34
76A3 24
76A4 A75F DW I4029P
76A6 E033 DW I4029T
;4030
76A8 34 30 33 30 DB '4030 LP2$'
76AC 20 20 20 20
76B0 20 20 20 20
76B4 20 4C 50 32
76B8 24
76B9 A780 DW I4030P
76BB E113 DW I4030T
;4032
PROGRAM IOT MACRO-80 3.44 09-Dec-81 PAGE 1-106
76BD 34 30 33 32 DB '4032 IM2$'
76C1 20 20 20 20
76C5 20 20 20 20
76C9 20 49 4D 32
76CD 24
76CE A78C DW I4032P
76D0 E125 DW I4032T
;4034
76D2 34 30 33 34 DB '4034 IR6$'
76D6 20 20 20 20
76DA 20 20 20 20
76DE 20 49 52 36
76E2 24
76E3 A79F DW I4034P
76E5 E195 DW I4034T
;4035
76E7 34 30 33 35 DB '4035 IR9$'
76EB 20 20 20 20
76EF 20 20 20 20
76F3 20 49 52 39
76F7 24
76F8 A7CB DW I4035P
76FA E29F DW I4035T
;4040
76FC 34 30 34 30 DB '4040 IE20$'
7700 20 20 20 20
7704 20 20 20 20
7708 49 45 32 30
770C 24
770D A7E6 DW I4040P
770F E2E4 DW I4040T
;4042
7711 34 30 34 32 DB '4042 TM3$'
7715 20 20 20 20
7719 20 20 20 20
771D 20 54 4D 33
7721 24
7722 A7F9 DW I4042P
7724 E44E DW I4042T
;4043
7726 34 30 34 33 DB '4043 TR2$'
772A 20 20 20 20
772E 20 20 20 20
7732 20 54 52 32
7736 24
7737 A808 DW I4043P
7739 E46F DW I4043T
;4048
773B 34 30 34 38 DB '4048 $'
773F 20 20 20 20
7743 20 20 20 20
7747 20 20 20 20
774B 24
774C A81E DW I4048P
774E E499 DW I4048T
;4063
PROGRAM IOT MACRO-80 3.44 09-Dec-81 PAGE 1-107
7750 34 30 36 33 DB '4063 $'
7754 20 20 20 20
7758 20 20 20 20
775C 20 20 20 20
7760 24
7761 A841 DW I4063P
7763 B6F6 DW I7485T
;4068 NAND-AND
7765 34 30 36 38 DB '4068 NAND-AND$'
7769 20 20 20 20
776D 4E 41 4E 44
7771 2D 41 4E 44
7775 24
7776 A854 DW I4068P
7778 E5AD DW I4068T
;4068 NAND
777A 34 30 36 38 DB '4068 NAND$'
777E 20 20 20 20
7782 20 20 20 20
7786 4E 41 4E 44
778A 24
778B A860 DW I4068PA
778D E586 DW I4068TA
;4069
778F 34 30 36 39 DB '4069 PU7$'
7793 20 20 20 20
7797 20 20 20 20
779B 20 50 55 37
779F 24
77A0 A868 DW I4069P
77A2 AE72 DW I7404T
;4070
77A4 34 30 37 30 DB '4070 LP14 LP2$'
77A8 20 20 20 20
77AC 4C 50 31 34
77B0 20 4C 50 32
77B4 24
77B5 A780 DW I4030P
77B7 E113 DW I4030T
;4071
77B9 34 30 37 31 DB '4071 $'
77BD 20 20 20 20
77C1 20 20 20 20
77C5 20 20 20 20
77C9 24
77CA A874 DW I4071P
77CC E5D4 DW I4071T
;4072
77CE 34 30 37 32 DB '4072 $'
77D2 20 20 20 20
77D6 20 20 20 20
77DA 20 20 20 20
77DE 24
77DF A87D DW I4072P
77E1 E5E6 DW I4072T
;4073
PROGRAM IOT MACRO-80 3.44 09-Dec-81 PAGE 1-108
77E3 34 30 37 33 DB '4073 $'
77E7 20 20 20 20
77EB 20 20 20 20
77EF 20 20 20 20
77F3 24
77F4 A886 DW I4073P
77F6 E60D DW I4073T
;4075
77F8 34 30 37 35 DB '4075 $'
77FC 20 20 20 20
7800 20 20 20 20
7804 20 20 20 20
7808 24
7809 A890 DW I4075P
780B E62B DW I4075T
;4076
780D 34 30 37 36 DB '4076 IR14$'
7811 20 20 20 20
7815 20 20 20 20
7819 49 52 31 34
781D 24
781E A899 DW I4076P
7820 E649 DW I4076T
;4077
7822 34 30 37 37 DB '4077 $'
7826 20 20 20 20
782A 20 20 20 20
782E 20 20 20 20
7832 24
7833 A8A8 DW I4077P
7835 E676 DW I4077T
;4078 NOR-OR
7837 34 30 37 38 DB '4078 NOR-OR$'
783B 20 20 20 20
783F 20 20 4E 4F
7843 52 2D 4F 52
7847 24
7848 A8B5 DW I4078P
784A E693 DW I4078T
;4078 NOR
784C 34 30 37 38 DB '4078 NOR$'
7850 20 20 20 20
7854 20 20 20 20
7858 20 4E 4F 52
785C 24
785D A8BF DW I4078PA
785F E688 DW I4078TA
;4081
7861 34 30 38 31 DB '4081 LI2$'
7865 20 20 20 20
7869 20 20 20 20
786D 20 4C 49 32
7871 24
7872 A8C6 DW I4081P
7874 E6BA DW I4081T
;4082
PROGRAM IOT MACRO-80 3.44 09-Dec-81 PAGE 1-109
7876 34 30 38 32 DB '4082 $'
787A 20 20 20 20
787E 20 20 20 20
7882 20 20 20 20
7886 24
7887 A8D0 DW I4082P
7889 E6CC DW I4082T
;4093
788B 34 30 39 33 DB '4093 TL1$'
788F 20 20 20 20
7893 20 20 20 20
7897 20 54 4C 31
789B 24
789C A8DA DW I4093P
789E DC7B DW I4011T
;4094
78A0 34 30 39 34 DB '4094 PR1$'
78A4 20 20 20 20
78A8 20 20 20 20
78AC 20 50 52 31
78B0 24
78B1 A8F3 DW I4094P
78B3 E6F3 DW I4094T
;4095
78B5 34 30 39 35 DB '4095 nt$'
78B9 20 20 20 20
78BD 20 20 20 20
78C1 20 20 6E 74
78C5 24
78C6 A924 DW I4095P
78C8 E76E DW I4095T
;4096
78CA 34 30 39 36 DB '4096 nt$'
78CE 20 20 20 20
78D2 20 20 20 20
78D6 20 20 6E 74
78DA 24
78DB A924 DW I4095P
78DD E7AA DW I4096T
;4099
78DF 34 30 39 39 DB '4099 $'
78E3 20 20 20 20
78E7 20 20 20 20
78EB 20 20 20 20
78EF 24
78F0 A934 DW I4099P
78F2 E7E6 DW I4099T
78F4 I4000K:
;===============================
;SEZNAM SKUPINY 4500 - 4599
; 1234567890123456
78F4 I4500:
;4502
78F4 34 35 30 32 DB '4502 LN1$'
78F8 20 20 20 20
78FC 20 20 20 20
PROGRAM IOT MACRO-80 3.44 09-Dec-81 PAGE 1-110
7900 20 4C 4E 31
7904 24
7905 A980 DW I4502P
7907 E8B6 DW I4502T
;4503
7909 34 35 30 33 DB '4503 $'
790D 20 20 20 20
7911 20 20 20 20
7915 20 20 20 20
7919 24
791A 9A49 DW I74367P
791C CE1F DW I74367T
;4507
791E 34 35 30 37 DB '4507 $'
7922 20 20 20 20
7926 20 20 20 20
792A 20 20 20 20
792E 24
792F A780 DW I4030P
7931 E113 DW I4030T
;4511
7933 34 35 31 31 DB '4511 $'
7937 20 20 20 20
793B 20 20 20 20
793F 20 20 20 20
7943 24
7944 A9A0 DW I4511P
7946 E8C8 DW I4511T
;4512
7948 34 35 31 32 DB '4512 KP3$'
794C 20 20 20 20
7950 20 20 20 20
7954 20 4B 50 33
7958 24
7959 A9C7 DW I4512P
795B E914 DW I4512T
;4515
795D 34 35 31 35 DB '4515 $'
7961 20 20 20 20
7965 20 20 20 20
7969 20 20 20 20
796D 24
796E A9DE DW I4515P
7970 E942 DW I4515T
;4516
7972 34 35 31 36 DB '4516 IE11$'
7976 20 20 20 20
797A 20 20 20 20
797E 49 45 31 31
7982 24
7983 A9FC DW I4516P
7985 E99D DW I4516T
;4518
7987 34 35 31 38 DB '4518 $'
798B 20 20 20 20
798F 20 20 20 20
PROGRAM IOT MACRO-80 3.44 09-Dec-81 PAGE 1-111
7993 20 20 20 20
7997 24
7998 AA1B DW I4518P
799A EA3F DW I4518T
;4520
799C 34 35 32 30 DB '4520 IE10$'
79A0 20 20 20 20
79A4 20 20 20 20
79A8 49 45 31 30
79AC 24
79AD AA2A DW I4520P
79AF EA8E DW I4520T
;4531
79B1 34 35 33 31 DB '4531 SA1$'
79B5 20 20 20 20
79B9 20 20 20 20
79BD 20 53 41 31
79C1 24
79C2 AA39 DW I4531P
79C4 EAB8 DW I4531T
;4532
79C6 34 35 33 32 DB '4532 $'
79CA 20 20 20 20
79CE 20 20 20 20
79D2 20 20 20 20
79D6 24
79D7 AA50 DW I4532P
79D9 EAD0 DW I4532T
;4543
79DB 34 35 34 33 DB '4543 ID2$'
79DF 20 20 20 20
79E3 20 20 20 20
79E7 20 49 44 32
79EB 24
79EC AA6A DW I4543P
79EE EAF4 DW I4543T
;4555
79F0 34 35 35 35 DB '4555 ID6$'
79F4 20 20 20 20
79F8 20 20 20 20
79FC 20 49 44 36
7A00 24
7A01 AA95 DW I4555P
7A03 EB70 DW I4555T
;4556
7A05 34 35 35 36 DB '4556 ID7$'
7A09 20 20 20 20
7A0D 20 20 20 20
7A11 20 49 44 37
7A15 24
7A16 AAAB DW I4556P
7A18 EB85 DW I4556T
;4560
7A1A 34 35 36 30 DB '4560 $'
7A1E 20 20 20 20
7A22 20 20 20 20
PROGRAM IOT MACRO-80 3.44 09-Dec-81 PAGE 1-112
7A26 20 20 20 20
7A2A 24
7A2B AAC1 DW I4560P
7A2D EB9A DW I4560T
;4581
7A2F 34 35 38 31 DB '4581 IP3$'
7A33 20 20 20 20
7A37 20 20 20 20
7A3B 20 49 50 33
7A3F 24
7A40 AADA DW I4581P
7A42 C388 DW I74181T
;4582
7A44 34 35 38 32 DB '4582 IP4$'
7A48 20 20 20 20
7A4C 20 20 20 20
7A50 20 49 50 34
7A54 24
7A55 AAE6 DW I4582P
7A57 C3CF DW I74182T
;4585
7A59 34 35 38 35 DB '4585 IP2$'
7A5D 20 20 20 20
7A61 20 20 20 20
7A65 20 49 50 32
7A69 24
7A6A A841 DW I4063P
7A6C EBBB DW I4585T
7A6E I4500K:
;===============================
;SEZNAM SKUPINY 4x00 - 4xxx
; 1234567890123456
7A6E I4XXX:
;4311
7A6E 34 33 31 31 DB '4311 $'
7A72 20 20 20 20
7A76 20 20 20 20
7A7A 20 20 20 20
7A7E 24
7A7F A95A DW I4311P
7A81 E86A DW I4311T
;40106
7A83 34 30 31 30 DB '40106 TL2$'
7A87 36 20 20 20
7A8B 20 20 20 20
7A8F 20 54 4C 32
7A93 24
7A94 AB0A DW I40106P
7A96 AE72 DW I7404T
7A98 I4XXXK:
;===============================
;SEZNAM SKUPINY 75XXX
; 1234567890123456
7A98 I75XXX:
;75123
7A98 37 35 31 32 DB '75123 559IP4 R$'
PROGRAM IOT MACRO-80 3.44 09-Dec-81 PAGE 1-113
7A9C 33 20 20 20
7AA0 35 35 39 49
7AA4 50 34 20 52
7AA8 24
7AA9 AB7B DW I8T23P
7AAB EE9D DW I8T23T
;75124
7AAD 37 35 31 32 DB '75124 559IP5/7$'
7AB1 34 20 20 20
7AB5 35 35 39 49
7AB9 50 35 2F 37
7ABD 24
7ABE ABA7 DW I8T24P
7AC0 EEBE DW I8T24T
;75160
7AC2 37 35 31 36 DB '75160 $'
7AC6 30 20 20 20
7ACA 20 20 20 20
7ACE 20 20 20 20
7AD2 24
7AD3 ABC9 DW I75160P
7AD5 EEF4 DW I75160T
;75161
7AD7 37 35 31 36 DB '75161 $'
7ADB 31 20 20 20
7ADF 20 20 20 20
7AE3 20 20 20 20
7AE7 24
7AE8 ABF1 DW I75161P
7AEA EF6B DW I75161T
;75162 DIL24
7AEC 37 35 31 36 DB '75162 DIL24$'
7AF0 32 20 20 20
7AF4 20 20 20 44
7AF8 49 4C 32 34
7AFC 24
7AFD AC25 DW I75162P
7AFF EFDB DW I75162T
;75162 DIL22
7B01 37 35 31 36 DB '75162 DIL22 R$'
7B05 32 20 20 20
7B09 20 44 49 4C
7B0D 32 32 20 52
7B11 24
7B12 AC56 DW I75162R
7B14 EFDB DW I75162T
;75163
7B16 37 35 31 36 DB '75163 $'
7B1A 33 20 20 20
7B1E 20 20 20 20
7B22 20 20 20 20
7B26 24
7B27 ABC9 DW I75160P
7B29 EEF4 DW I75160T
7B2B I75XXXK:
;===============================
PROGRAM IOT MACRO-80 3.44 09-Dec-81 PAGE 1-114
;SEZNAM SKUPINY OSTATNI IO
; 1234567890123456
7B2B OIO:
;MAB1502
7B2B 4D 41 42 31 DB 'MAB1502 MAC1502 $'
7B2F 35 30 32 20
7B33 4D 41 43 31
7B37 35 30 32 20
7B3B 24
7B3C AB42 DW I1502P
7B3E ED1C DW I1502T
;MAB1504
7B40 4D 41 42 31 DB 'MAB1504 MAC1504 $'
7B44 35 30 34 20
7B48 4D 41 43 31
7B4C 35 30 34 20
7B50 24
7B51 AB5E DW I1504P
7B53 ED9E DW I1504T
;MH8641
7B55 4D 48 2F 44 DB 'MH/DS8641 559IP3$'
7B59 53 38 36 34
7B5D 31 20 35 35
7B61 39 49 50 33
7B65 24
7B66 AB1F DW I8641P
7B68 ECF5 DW I8641T
;AM25S05
7B6A 41 4D 32 35 DB 'AM25S05 IK1$'
7B6E 53 30 35 20
7B72 20 20 20 20
7B76 20 49 4B 31
7B7A 24
7B7B AC90 DW I25S05P
7B7D EFDC DW I25S05T
;DS8838
7B7F 4D 48 38 36 DB 'MH8641 DS8838 $'
7B83 34 31 20 44
7B87 53 38 38 33
7B8B 38 20 20 20
7B8F 24
7B90 AB1F DW I8641P
7B92 ECF5 DW I8641T
;8T23
7B94 38 54 32 33 DB '8T23 559IP4 R$'
7B98 20 20 20 20
7B9C 35 35 39 49
7BA0 50 34 20 52
7BA4 24
7BA5 AB7B DW I8T23P
7BA7 EE9D DW I8T23T
;8T24
7BA9 38 54 32 34 DB '8T24 559IP5/7$'
7BAD 20 20 20 20
7BB1 35 35 39 49
PROGRAM IOT MACRO-80 3.44 09-Dec-81 PAGE 1-115
7BB5 50 35 2F 37
7BB9 24
7BBA ABA7 DW I8T24P
7BBC EEBE DW I8T24T
7BBE OIOK:
;===============================
;RAZENI DLE CCCP ZNACENI
IF RUS
7BBE IRUS:
;74121
7BBE 41 47 20 31 DB 'AG 1 74121 R$'
7BC2 20 20 20 20
7BC6 20 37 34 31
7BCA 32 31 20 52
7BCE 24
7BCF 8F44 DW I74121P
7BD1 BB01 DW I74121T
;74123
7BD3 41 47 20 33 DB 'AG 3 74123 R$'
7BD7 20 20 20 20
7BDB 20 37 34 31
7BDF 32 33 20 52
7BE3 24
7BE4 8F55 DW I74123P
7BE6 BB5E DW I74123T
;74240
7BE8 41 50 20 33 DB 'AP 3 74240$'
7BEC 20 20 20 20
7BF0 20 20 20 37
7BF4 34 32 34 30
7BF8 24
7BF9 95F9 DW I74240P
7BFB C82C DW I74240T
;74241
7BFD 41 50 20 34 DB 'AP 4 74241$'
7C01 20 20 20 20
7C05 20 20 20 37
7C09 34 32 34 31
7C0D 24
7C0E 961E DW I74241P
7C10 C853 DW I74241T
;74245
7C12 41 50 20 36 DB 'AP 6 74245$'
7C16 20 20 20 20
7C1A 20 20 20 37
7C1E 34 32 34 35
7C22 24
7C23 96A4 DW I74245P
7C25 C907 DW I74245T
;74141
7C27 49 44 20 31 DB 'ID 1 74141$'
7C2B 20 20 20 20
7C2F 20 20 20 37
7C33 34 31 34 31
PROGRAM IOT MACRO-80 3.44 09-Dec-81 PAGE 1-116
7C37 24
7C38 907A DW I74141P
7C3A B098 DW I7441T
;74154
7C3C 49 44 20 33 DB 'ID 3 74154$'
7C40 20 20 20 20
7C44 20 20 20 37
7C48 34 31 35 34
7C4C 24
7C4D 9186 DW I74154P
7C4F BF11 DW I74154T
;74155
7C51 49 44 20 34 DB 'ID 4 74155$'
7C55 20 20 20 20
7C59 20 20 20 37
7C5D 34 31 35 35
7C61 24
7C62 919A DW I74155P
7C64 BF64 DW I74155T
;74138
7C66 49 44 20 37 DB 'ID 7 74138$'
7C6A 20 20 20 20
7C6E 20 20 20 37
7C72 34 31 33 38
7C76 24
7C77 9029 DW I74138P
7C79 BCE9 DW I74138T
;74145
7C7B 49 44 31 30 DB 'ID10 74145$'
7C7F 20 20 20 20
7C83 20 20 20 37
7C87 34 31 34 35
7C8B 24
7C8C 90D4 DW I74145P
7C8E B0CE DW I7442T
;74139
7C90 49 44 31 34 DB 'ID14 74139$'
7C94 20 20 20 20
7C98 20 20 20 37
7C9C 34 31 33 39
7CA0 24
7CA1 9042 DW I74139P
7CA3 BD1C DW I74139T
;74247
7CA5 49 44 31 38 DB 'ID18 74247$'
7CA9 20 20 20 20
7CAD 20 20 20 37
7CB1 34 32 34 37
7CB5 24
7CB6 96C6 DW I74247P
7CB8 B17E DW ID146T
;7490
7CBA 49 45 20 32 DB 'IE 2 7490$'
7CBE 20 20 20 20
7CC2 20 20 20 20
7CC6 37 34 39 30
PROGRAM IOT MACRO-80 3.44 09-Dec-81 PAGE 1-117
7CCA 24
7CCB 8DB2 DW I7490P
7CCD B7D5 DW I7490T
;7493
7CCF 49 45 20 35 DB 'IE 5 7493$'
7CD3 20 20 20 20
7CD7 20 20 20 20
7CDB 37 34 39 33
7CDF 24
7CE0 8DEF DW I7493P
7CE2 B884 DW I7493T
;74192
7CE4 49 45 20 36 DB 'IE 6 74192$'
7CE8 20 20 20 20
7CEC 20 20 20 37
7CF0 34 31 39 32
7CF4 24
7CF5 94CB DW I74192P
7CF7 C650 DW I74192T
;74193
7CF9 49 45 20 37 DB 'IE 7 74193$'
7CFD 20 20 20 20
7D01 20 20 20 37
7D05 34 31 39 33
7D09 24
7D0A 94FE DW I74193P
7D0C C697 DW I74193T
;7497
7D0E 49 45 20 38 DB 'IE 8 7497$'
7D12 20 20 20 20
7D16 20 20 20 20
7D1A 37 34 39 37
7D1E 24
7D1F 8E7D DW I7497P
7D21 B918 DW I7497T
;74160
7D23 49 45 20 39 DB 'IE 9 74160$'
7D27 20 20 20 20
7D2B 20 20 20 37
7D2F 34 31 36 30
7D33 24
7D34 9218 DW I74160P
7D36 BFAF DW I74160T
;74161
7D38 49 45 31 30 DB 'IE10 74161$'
7D3C 20 20 20 20
7D40 20 20 20 37
7D44 34 31 36 31
7D48 24
7D49 9237 DW I74161P
7D4B BFD6 DW I74161T
;74196
7D4D 49 45 31 34 DB 'IE14 74196$'
7D51 20 20 20 20
7D55 20 20 20 37
7D59 34 31 39 36
PROGRAM IOT MACRO-80 3.44 09-Dec-81 PAGE 1-118
7D5D 24
7D5E 93E6 DW I74176P
7D60 C305 DW I74176T
;74168
7D62 49 45 31 36 DB 'IE16 74168$'
7D66 20 20 20 20
7D6A 20 20 20 37
7D6E 34 31 36 38
7D72 24
7D73 9358 DW I74168P
7D75 C157 DW I74168T
;AM25S05
7D77 49 4B 20 31 DB 'IK 1 AM25S05$'
7D7B 20 20 20 20
7D7F 20 41 4D 32
7D83 35 53 30 35
7D87 24
7D88 AC90 DW I25S05P
7D8A EFDC DW I25S05T
;7483
7D8C 49 4D 20 33 DB 'IM 3 7483$'
7D90 20 20 20 20
7D94 20 20 20 20
7D98 37 34 38 33
7D9C 24
7D9D 8D61 DW I7483P
7D9F B6D2 DW I7483T
;74180
7DA1 49 50 20 32 DB 'IP 2 74180$'
7DA5 20 20 20 20
7DA9 20 20 20 37
7DAD 34 31 38 30
7DB1 24
7DB2 9416 DW I74180P
7DB4 C364 DW I74180T
;74181
7DB6 49 50 20 33 DB 'IP 3 74181$'
7DBA 20 20 20 20
7DBE 20 20 20 37
7DC2 34 31 38 31
7DC6 24
7DC7 9442 DW I74181P
7DC9 C388 DW I74181T
;74182
7DCB 49 50 20 34 DB 'IP 4 74182$'
7DCF 20 20 20 20
7DD3 20 20 20 37
7DD7 34 31 38 32
7DDB 24
7DDC 9451 DW I74182P
7DDE C3CF DW I74182T
;74280
7DE0 49 50 20 35 DB 'IP 5 74280$'
7DE4 20 20 20 20
7DE8 20 20 20 37
7DEC 34 32 38 30
PROGRAM IOT MACRO-80 3.44 09-Dec-81 PAGE 1-119
7DF0 24
7DF1 9416 DW I74180P
7DF3 CB7D DW I74280T
;7495
7DF5 49 52 20 31 DB 'IR 1 7495$'
7DF9 20 20 20 20
7DFD 20 20 20 20
7E01 37 34 39 35
7E05 24
7E06 8E04 DW I7495P
7E08 B8C7 DW I7495T
;74164
7E0A 49 52 20 38 DB 'IR 8 74164$'
7E0E 20 20 20 20
7E12 20 20 20 37
7E16 34 31 36 34
7E1A 24
7E1B 92A2 DW I74164P
7E1D C080 DW I74164T
;74194
7E1F 49 52 31 31 DB 'IR11 74194$'
7E23 20 20 20 20
7E27 20 20 20 37
7E2B 34 31 39 34
7E2F 24
7E30 9531 DW I74194P
7E32 C736 DW I74194T
;74198
7E34 49 52 31 33 DB 'IR13 74198$'
7E38 20 20 20 20
7E3C 20 20 20 37
7E40 34 31 39 38
7E44 24
7E45 95B3 DW I74198P
7E47 C7B5 DW I74198T
;74173
7E49 49 52 31 35 DB 'IR15 74173$'
7E4D 20 20 20 20
7E51 20 20 20 37
7E55 34 31 37 33
7E59 24
7E5A 93B6 DW I74173P
7E5C C2BD DW I74173T
;74295
7E5E 49 52 31 36 DB 'IR16 74295$'
7E62 20 20 20 20
7E66 20 20 20 37
7E6A 34 32 39 35
7E6E 24
7E6F 9898 DW I74295P
7E71 CC1A DW I74295T
;74373
7E73 49 52 32 32 DB 'IR22 74373$'
7E77 20 20 20 20
7E7B 20 20 20 37
7E7F 34 33 37 33
PROGRAM IOT MACRO-80 3.44 09-Dec-81 PAGE 1-120
7E83 24
7E84 9A8D DW I74373P
7E86 CDCA DW I74363T
;74374
7E88 49 52 32 33 DB 'IR23 74374$'
7E8C 20 20 20 20
7E90 20 20 20 37
7E94 34 33 37 34
7E98 24
7E99 9AAC DW I74374P
7E9B CE49 DW I74374T
;74170
7E9D 49 52 33 32 DB 'IR32 RP1 74170$'
7EA1 20 52 50 31
7EA5 20 20 20 37
7EA9 34 31 37 30
7EAD 24
7EAE 93A4 DW I74170P
7EB0 C25F DW I74170T
;74148
7EB2 49 56 20 31 DB 'IV 1 74148$'
7EB6 20 20 20 20
7EBA 20 20 20 37
7EBE 34 31 34 38
7EC2 24
7EC3 910C DW I74148P
7EC5 BDE8 DW I74148T
;74153
7EC7 4B 50 20 32 DB 'KP 2 74153$'
7ECB 20 20 20 20
7ECF 20 20 20 37
7ED3 34 31 35 33
7ED7 24
7ED8 916C DW I74153P
7EDA BEED DW I74153T
;74151
7EDC 4B 50 20 37 DB 'KP 7 74151$'
7EE0 20 20 20 20
7EE4 20 20 20 37
7EE8 34 31 35 31
7EEC 24
7EED 913E DW I74151P
7EEF BE7B DW I74151T
;74257
7EF1 4B 50 31 31 DB 'KP11 74257$'
7EF5 20 20 20 20
7EF9 20 20 20 37
7EFD 34 32 35 37
7F01 24
7F02 9754 DW I74257P
7F04 C9E3 DW I74257T
;74253
7F06 4B 50 31 32 DB 'KP12 74253$'
7F0A 20 20 20 20
7F0E 20 20 20 37
7F12 34 32 35 33
PROGRAM IOT MACRO-80 3.44 09-Dec-81 PAGE 1-121
7F16 24
7F17 9718 DW I74253P
7F19 C994 DW I74253T
;74298
7F1B 4B 50 31 33 DB 'KP13 74298$'
7F1F 20 20 20 20
7F23 20 20 20 37
7F27 34 32 39 38
7F2B 24
7F2C 98C4 DW I74298P
7F2E CC48 DW I74298T
;74258
7F30 4B 50 31 34 DB 'KP14 74258$'
7F34 20 20 20 20
7F38 20 20 20 37
7F3C 34 32 35 38
7F40 24
7F41 976E DW I74258P
7F43 BF97 DW I74158T
;74251
7F45 4B 50 31 35 DB 'KP15 74251$'
7F49 20 20 20 20
7F4D 20 20 20 37
7F51 34 32 35 31
7F55 24
7F56 96FF DW I74251P
7F58 C986 DW I74251T
;7420
7F5A 4C 41 20 31 DB 'LA 1 LB1 7420$'
7F5E 20 4C 42 31
7F62 20 20 20 20
7F66 37 34 32 30
7F6A 24
7F6B 88E0 DW I7420P
7F6D AED8 DW I7413T
;7430
7F6F 4C 41 20 32 DB 'LA 2 LB2 7430$'
7F73 20 4C 42 32
7F77 20 20 20 20
7F7B 37 34 33 30
7F7F 24
7F80 8992 DW I7430P
7F82 B023 DW I7430T
;7400:
7F84 4C 41 20 33 DB 'LA 3 LB3 7400$'
7F88 20 4C 42 33
7F8C 20 20 20 20
7F90 37 34 30 30
7F94 24
7F95 8764 DW I7400P
7F97 AE3C DW I7400T
;7410
7F99 4C 41 20 34 DB 'LA 4 LB4 7410$'
7F9D 20 4C 42 34
7FA1 20 20 20 20
7FA5 37 34 31 30
PROGRAM IOT MACRO-80 3.44 09-Dec-81 PAGE 1-122
7FA9 24
7FAA 8805 DW I7410P
7FAC AE9C DW I7410T
;7440
7FAE 4C 41 20 36 DB 'LA 6 LB6 7440$'
7FB2 20 4C 42 36
7FB6 20 20 20 20
7FBA 37 34 34 30
7FBE 24
7FBF 8A39 DW I7440P
7FC1 AED8 DW I7413T
;7422
7FC3 4C 41 20 37 DB 'LA 7 LB7 7422$'
7FC7 20 4C 42 37
7FCB 20 20 20 20
7FCF 37 34 32 32
7FD3 24
7FD4 88FB DW I7422P
7FD6 AED8 DW I7413T
;7401
7FD8 4C 41 20 38 DB 'LA 8 LB0 7401$'
7FDC 20 4C 42 30
7FE0 20 20 20 20
7FE4 37 34 30 31
7FE8 24
7FE9 8772 DW I7401P
7FEB AE4E DW I7401T
;7403
7FED 4C 41 20 39 DB 'LA 9 7403$'
7FF1 20 20 20 20
7FF5 20 20 20 20
7FF9 37 34 30 33
7FFD 24
7FFE 8772 DW I7401P
8000 AE3C DW I7400T
;7412
8002 4C 41 31 30 DB 'LA10 7412$'
8006 20 20 20 20
800A 20 20 20 20
800E 37 34 31 32
8012 24
8013 8820 DW I7412P
8015 AE9C DW I7410T
;7437
8017 4C 41 31 32 DB 'LA12 7437$'
801B 20 20 20 20
801F 20 20 20 20
8023 37 34 33 37
8027 24
8028 8A0F DW I7437P
802A AE3C DW I7400T
;7438
802C 4C 41 31 33 DB 'LA13 7438$'
8030 20 20 20 20
8034 20 20 20 20
8038 37 34 33 38
PROGRAM IOT MACRO-80 3.44 09-Dec-81 PAGE 1-123
803C 24
803D 8A24 DW I7438P
803F AE3C DW I7400T
;74140
8041 4C 41 31 36 DB 'LA16 74140$'
8045 20 20 20 20
8049 20 20 20 37
804D 34 31 34 30
8051 24
8052 905C DW I74140P
8054 AED8 DW I7420T
;7402
8056 4C 45 20 31 DB 'LE 1 7402$'
805A 20 20 20 20
805E 20 20 20 20
8062 37 34 30 32
8066 24
8067 8780 DW I7402P
8069 AE60 DW I7402T
;7423
806B 4C 45 20 32 DB 'LE 2 7423 R$'
806F 20 20 20 20
8073 20 20 37 34
8077 32 33 20 52
807B 24
807C 8909 DW I7423P
807E AF26 DW I7423T
;7423 + 7460
8080 4C 45 20 32 DB 'LE 2 + LD 1 23+R$'
8084 20 2B 20 4C
8088 44 20 31 20
808C 32 33 2B 52
8090 24
8091 8909 DW I7423P
8093 AF53 DW I7423R
;7425
8095 4C 45 20 33 DB 'LE 3 7425$'
8099 20 20 20 20
809D 20 20 20 20
80A1 37 34 32 35
80A5 24
80A6 8946 DW I7425P
80A8 AFC3 DW I7425T
;7427
80AA 4C 45 20 34 DB 'LE 4 7427$'
80AE 20 20 20 20
80B2 20 20 20 20
80B6 37 34 32 37
80BA 24
80BB 8971 DW I7427P
80BD B005 DW I7427T
;7408
80BF 4C 49 20 31 DB 'LI 1 7408$'
80C3 20 20 20 20
80C7 20 20 20 20
80CB 37 34 30 38
PROGRAM IOT MACRO-80 3.44 09-Dec-81 PAGE 1-124
80CF 24
80D0 87EB DW I7408P
80D2 AE8A DW I7408T
;7409
80D4 4C 49 20 32 DB 'LI 2 7409$'
80D8 20 20 20 20
80DC 20 20 20 20
80E0 37 34 30 39
80E4 24
80E5 87F8 DW I7409P
80E7 AE8A DW I7408T
;7411
80E9 4C 49 20 33 DB 'LI 3 7411$'
80ED 20 20 20 20
80F1 20 20 20 20
80F5 37 34 31 31
80F9 24
80FA 8813 DW I7411P
80FC AEBA DW I7411T
;7415
80FE 4C 49 20 34 DB 'LI 4 7415$'
8102 20 20 20 20
8106 20 20 20 20
810A 37 34 31 35
810E 24
810F 885F DW I7415P
8111 AEBA DW I7411T
;7421
8113 4C 49 20 36 DB 'LI 6 7421$'
8117 20 20 20 20
811B 20 20 20 20
811F 37 34 32 31
8123 24
8124 88EE DW I7421P
8126 AEFF DW I7421T
;7432
8128 4C 4C 20 31 DB 'LL 1 7432$'
812C 20 20 20 20
8130 20 20 20 20
8134 37 34 33 32
8138 24
8139 89B6 DW I7432P
813B B074 DW I7432T
;7404
813D 4C 4E 20 31 DB 'LN 1 7404$'
8141 20 20 20 20
8145 20 20 20 20
8149 37 34 30 34
814D 24
814E 878D DW I7404P
8150 AE72 DW I7404T
;7405
8152 4C 4E 20 32 DB 'LN 2 7405$'
8156 20 20 20 20
815A 20 20 20 20
815E 37 34 30 35
PROGRAM IOT MACRO-80 3.44 09-Dec-81 PAGE 1-125
8162 24
8163 879E DW I7405P
8165 AE72 DW I7404T
;7406
8167 4C 4E 20 33 DB 'LN 3 7406$'
816B 20 20 20 20
816F 20 20 20 20
8173 37 34 30 36
8177 24
8178 87AF DW I7406P
817A AE72 DW I7404T
;7407
817C 4C 4E 20 34 DB 'LN 4 LP9 7407$'
8180 20 4C 50 39
8184 20 20 20 20
8188 37 34 30 37
818C 24
818D 87D1 DW I7407P
818F AE7E DW I7407T
;7460 + 7423, 7450, 7453, 7455
8191 4C 50 20 31 DB 'LP 1+X LD1 7460R$'
8195 2B 58 20 4C
8199 44 31 20 37
819D 34 36 30 52
81A1 24
81A2 8C5C DW I7460P
81A4 B52A DW I7460T
;74366
81A6 4C 4E 20 36 DB 'LN 6 74366$'
81AA 20 20 20 20
81AE 20 20 20 37
81B2 34 33 36 36
81B6 24
81B7 9A2A DW I74366P
81B9 CE0A DW I74366T
;7486
81BB 4C 50 20 35 DB 'LP 5 7486$'
81BF 20 20 20 20
81C3 20 20 20 20
81C7 37 34 38 36
81CB 24
81CC 8D91 DW I7486P
81CE B717 DW I7486T
;74125
81D0 4C 50 20 38 DB 'LP 8 74125$'
81D4 20 20 20 20
81D8 20 20 20 37
81DC 34 31 32 35
81E0 24
81E1 8F77 DW I74125P
81E3 BC22 DW I74125T
;74365
81E5 4C 50 31 30 DB 'LP10 74365$'
81E9 20 20 20 20
81ED 20 20 20 37
81F1 34 33 36 35
PROGRAM IOT MACRO-80 3.44 09-Dec-81 PAGE 1-126
81F5 24
81F6 9A13 DW I74365P
81F8 CDF5 DW I74365T
;7450
81FA 4C 52 20 31 DB 'LR 1 7450 R$'
81FE 20 20 20 20
8202 20 20 37 34
8206 35 30 20 52
820A 24
820B 8B39 DW I7450P
820D B2B4 DW I7450T
;7450 + 7460
820F 4C 52 20 31 DB 'LR 1 + LD 1 50+R$'
8213 20 2B 20 4C
8217 44 20 31 20
821B 35 30 2B 52
821F 24
8220 8B39 DW I7450P
8222 B2E3 DW I7450R
;7453
8224 4C 52 20 33 DB 'LR 3 7453 R$'
8228 20 20 20 20
822C 20 20 37 34
8230 35 33 20 52
8234 24
8235 8B9E DW I7453P
8237 B36F DW I7453T
;7453 + 7460
8239 4C 52 20 33 DB 'LR 3 + LD 1 53+R$'
823D 20 2B 20 4C
8241 44 20 31 20
8245 35 33 2B 52
8249 24
824A 8B9E DW I7453P
824C B3B7 DW I7453R
;7455
824E 4C 52 20 34 DB 'LR 4 7455 R$'
8252 20 20 20 20
8256 20 20 37 34
825A 35 35 20 52
825E 24
825F 8C04 DW I7455P
8261 B467 DW I7455T
;7455 + 7460
8263 4C 52 20 34 DB 'LR 4 + LD 1 55+R$'
8267 20 2B 20 4C
826B 44 20 31 20
826F 35 35 2B 52
8273 24
8274 8C04 DW I7455P
8276 B496 DW I7455R
;74LS55
8278 4C 52 20 34 DB 'LR 4 74LS55$'
827C 20 20 20 20
8280 20 20 37 34
8284 4C 53 35 35
PROGRAM IOT MACRO-80 3.44 09-Dec-81 PAGE 1-127
8288 24
8289 8C32 DW I74X55P
828B B4C7 DW I74LS55
;7464
828D 4C 52 20 39 DB 'LR 9 7464$'
8291 20 20 20 20
8295 20 20 20 20
8299 37 34 36 34
829D 24
829E 8C9D DW I7464P
82A0 B52B DW I7464T
;7451
82A2 4C 52 31 31 DB 'LR11 7451$'
82A6 20 20 20 20
82AA 20 20 20 20
82AE 37 34 35 31
82B2 24
82B3 8B6A DW I7451P
82B5 B318 DW I7451T
;74LS51
82B7 4C 52 31 31 DB 'LR11 74LS51$'
82BB 20 20 20 20
82BF 20 20 37 34
82C3 4C 53 35 31
82C7 24
82C8 8B83 DW I74X51P
82CA B33F DW I74LS51
;74184
82CC 50 52 20 36 DB 'PR 6 74184$'
82D0 20 20 20 20
82D4 20 20 20 37
82D8 34 31 38 34
82DC 24
82DD 9478 DW I74184P
82DF C408 DW I74184T
;74185
82E1 50 52 20 37 DB 'PR 7 74185$'
82E5 20 20 20 20
82E9 20 20 20 37
82ED 34 31 38 35
82F1 24
82F2 948F DW I74185P
82F4 C474 DW I74185T
;7489
82F6 52 55 20 32 DB 'RU 2 7489$'
82FA 20 20 20 20
82FE 20 20 20 20
8302 37 34 38 39
8306 24
8307 8DA0 DW I7489P
8309 B729 DW I7489T
;7485
830B 53 50 20 31 DB 'SP 1 7485$'
830F 20 20 20 20
8313 20 20 20 20
8317 37 34 38 35
PROGRAM IOT MACRO-80 3.44 09-Dec-81 PAGE 1-128
831B 24
831C 8D7B DW I7485P
831E B6F6 DW I7485T
;7413
8320 54 4C 20 31 DB 'TL 1 7413$'
8324 20 20 20 20
8328 20 20 20 20
832C 37 34 31 33
8330 24
8331 882E DW I7413P
8333 AED8 DW I7413T
;7414
8335 54 4C 20 32 DB 'TL 2 7414$'
8339 20 20 20 20
833D 20 20 20 20
8341 37 34 31 34
8345 24
8346 8845 DW I7414P
8348 AE72 DW I7404T
;74132
834A 54 4C 20 33 DB 'TL 3 74132$'
834E 20 20 20 20
8352 20 20 20 37
8356 34 31 33 32
835A 24
835B 8FCE DW I74132P
835D AE3C DW I7400T
;7474
835F 54 4D 20 32 DB 'TM 2 TK2 7474$'
8363 20 54 4B 32
8367 20 20 20 20
836B 37 34 37 34
836F 24
8370 8CFB DW I7474P
8372 B5BE DW I7474T
;7477
8374 54 4D 20 35 DB 'TM 5 7477$'
8378 20 20 20 20
837C 20 20 20 20
8380 37 34 37 37
8384 24
8385 8D3A DW I7477P
8387 B617 DW I7477T
;7475
8389 54 4D 20 37 DB 'TM 7 7475$'
838D 20 20 20 20
8391 20 20 20 20
8395 37 34 37 35
8399 24
839A 8D0F DW I7475P
839C B5D6 DW I7475T
;74175
839E 54 4D 20 38 DB 'TM 8 74175$'
83A2 20 20 20 20
83A6 20 20 20 37
83AA 34 31 37 35
PROGRAM IOT MACRO-80 3.44 09-Dec-81 PAGE 1-129
83AE 24
83AF 93D7 DW I74175P
83B1 C2F0 DW I74175T
;74174
83B3 54 4D 20 39 DB 'TM 9 74174$'
83B7 20 20 20 20
83BB 20 20 20 37
83BF 34 31 37 34
83C3 24
83C4 93C8 DW I74174P
83C6 C2DB DW I74174T
;74279
83C8 54 52 20 32 DB 'TR 2 74279$'
83CC 20 20 20 20
83D0 20 20 20 37
83D4 34 32 37 39
83D8 24
83D9 9827 DW I74279P
83DB CB68 DW I74279T
;7472
83DD 54 56 20 31 DB 'TV 1 TK1 7472$'
83E1 20 54 4B 31
83E5 20 20 20 20
83E9 37 34 37 32
83ED 24
83EE 8CD3 DW I7472P
83F0 B55E DW I7472T
;74107
83F2 54 56 20 36 DB 'TV 6 74107$'
83F6 20 20 20 20
83FA 20 20 20 37
83FE 34 31 30 37
8402 24
8403 8EBE DW I74107P
8405 B9EA DW I74107T
;74112
8407 54 56 20 39 DB 'TV 9 74112$'
840B 20 20 20 20
840F 20 20 20 37
8413 34 31 31 32
8417 24
8418 8ED3 DW I74109P
841A BA70 DW I74112T
;74114
841C 54 56 31 31 DB 'TV11 74114$'
8420 20 20 20 20
8424 20 20 20 37
8428 34 31 31 34
842C 24
842D 8EFE DW I74114P
842F BABE DW I74114T
8431 IRUSK:
ENDIF
;===============================
PROGRAM IOT MACRO-80 3.44 09-Dec-81 PAGE 1-130
;VYBER TTL Z PRODUKCE TESLA BEZ RADY ALS
IF TESLA
8431 ITESLA:
;7400
8431 37 34 30 30 DB '7400 LA3 LB3$'
8435 20 20 20 20
8439 20 4C 41 33
843D 20 4C 42 33
8441 24
8442 8764 DW I7400P
8444 AE3C DW I7400T
;7403
8446 37 34 30 33 DB '7403 LA9$'
844A 20 20 20 20
844E 20 20 20 20
8452 20 4C 41 39
8456 24
8457 8772 DW I7401P
8459 AE3C DW I7400T
;7404
845B 37 34 30 34 DB '7404 LN1$'
845F 20 20 20 20
8463 20 20 20 20
8467 20 4C 4E 31
846B 24
846C 878D DW I7404P
846E AE72 DW I7404T
;7405
8470 37 34 30 35 DB '7405 LN2$'
8474 20 20 20 20
8478 20 20 20 20
847C 20 4C 4E 32
8480 24
8481 879E DW I7405P
8483 AE72 DW I7404T
;7410
8485 37 34 31 30 DB '7410 LA4 LB4$'
8489 20 20 20 20
848D 20 4C 41 34
8491 20 4C 42 34
8495 24
8496 8805 DW I7410P
8498 AE9C DW I7410T
;7420
849A 37 34 32 30 DB '7420 LA1 LB1$'
849E 20 20 20 20
84A2 20 4C 41 31
84A6 20 4C 42 31
84AA 24
84AB 88E0 DW I7420P
84AD AED8 DW I7413T
;7430
84AF 37 34 33 30 DB '7430 LA2 LB2$'
84B3 20 20 20 20
PROGRAM IOT MACRO-80 3.44 09-Dec-81 PAGE 1-131
84B7 20 4C 41 32
84BB 20 4C 42 32
84BF 24
84C0 8992 DW I7430P
84C2 B023 DW I7430T
;7437
84C4 37 34 33 37 DB '7437 LA12$'
84C8 20 20 20 20
84CC 20 20 20 20
84D0 4C 41 31 32
84D4 24
84D5 8A0F DW I7437P
84D7 AE3C DW I7400T
;7438
84D9 37 34 33 38 DB '7438 LA13$'
84DD 20 20 20 20
84E1 20 20 20 20
84E5 4C 41 31 33
84E9 24
84EA 8A24 DW I7438P
84EC AE3C DW I7400T
;7440
84EE 37 34 34 30 DB '7440 LA6 LB6$'
84F2 20 20 20 20
84F6 20 4C 41 36
84FA 20 4C 42 36
84FE 24
84FF 8A39 DW I7440P
8501 AED8 DW I7413T
;7442
8503 37 34 34 32 DB '7442 ID6$'
8507 20 20 20 20
850B 20 20 20 20
850F 20 49 44 36
8513 24
8514 8A66 DW I7442P
8516 B0CE DW I7442T
;7450
8518 37 34 35 30 DB '7450 LR1 R$'
851C 20 20 20 20
8520 20 20 20 4C
8524 52 31 20 52
8528 24
8529 8B39 DW I7450P
852B B2B4 DW I7450T
;7450 + 7460
852D 37 34 35 30 DB '7450 + 7460 R$'
8531 20 2B 20 37
8535 34 36 30 20
8539 20 20 20 52
853D 24
853E 8B39 DW I7450P
8540 B2E3 DW I7450R
;7451
8542 37 34 35 31 DB '7451 LR11$'
8546 20 20 20 20
PROGRAM IOT MACRO-80 3.44 09-Dec-81 PAGE 1-132
854A 20 20 20 20
854E 4C 52 31 31
8552 24
8553 8B6A DW I7451P
8555 B318 DW I7451T
;7453
8557 37 34 35 33 DB '7453 LR3 R$'
855B 20 20 20 20
855F 20 20 20 4C
8563 52 33 20 52
8567 24
8568 8B9E DW I7453P
856A B36F DW I7453T
;7453 + 7460
856C 37 34 35 33 DB '7453 + 7460 R$'
8570 20 2B 20 37
8574 34 36 30 20
8578 20 20 20 52
857C 24
857D 8B9E DW I7453P
857F B3B7 DW I7453R
;7454
8581 37 34 35 34 DB '7454 LR13$'
8585 20 20 20 20
8589 20 20 20 20
858D 4C 52 31 33
8591 24
8592 8BD0 DW I7454P
8594 B3E9 DW I7454T
;7460 + 7423, 7450, 7453, 7455
8596 37 34 36 30 DB '7460+X LD1 LP1 R$'
859A 2B 58 20 4C
859E 44 31 20 4C
85A2 50 31 20 52
85A6 24
85A7 8C5C DW I7460P
85A9 B52A DW I7460T
;7472
85AB 37 34 37 32 DB '7472 TV1 TK1$'
85AF 20 20 20 20
85B3 20 54 56 31
85B7 20 54 4B 31
85BB 24
85BC 8CD3 DW I7472P
85BE B55E DW I7472T
;7474
85C0 37 34 37 34 DB '7474 TM2 TK2$'
85C4 20 20 20 20
85C8 20 54 4D 32
85CC 20 54 4B 32
85D0 24
85D1 8CFB DW I7474P
85D3 B5BE DW I7474T
;7475
85D5 37 34 37 35 DB '7475 TM7$'
85D9 20 20 20 20
PROGRAM IOT MACRO-80 3.44 09-Dec-81 PAGE 1-133
85DD 20 20 20 20
85E1 20 54 4D 37
85E5 24
85E6 8D0F DW I7475P
85E8 B5D6 DW I7475T
;7489
85EA 37 34 38 39 DB '7489 RU2$'
85EE 20 20 20 20
85F2 20 20 20 20
85F6 20 52 55 32
85FA 24
85FB 8DA0 DW I7489P
85FD B729 DW I7489T
;7490
85FF 37 34 39 30 DB '7490 IE2$'
8603 20 20 20 20
8607 20 20 20 20
860B 20 49 45 32
860F 24
8610 8DB2 DW I7490P
8612 B7D5 DW I7490T
;7493
8614 37 34 39 33 DB '7493 IE5$'
8618 20 20 20 20
861C 20 20 20 20
8620 20 49 45 35
8624 24
8625 8DEF DW I7493P
8627 B884 DW I7493T
;7496
8629 37 34 39 36 DB '7496 $'
862D 20 20 20 20
8631 20 20 20 20
8635 20 20 20 20
8639 24
863A 8E3F DW I7496P
863C B8E6 DW I7496T
;74112
863E 37 34 31 31 DB '74112 TV9$'
8642 32 20 20 20
8646 20 20 20 20
864A 20 54 56 39
864E 24
864F 8ED3 DW I74109P
8651 BA70 DW I74112T
;74141
8653 37 34 31 34 DB '74141 ID1$'
8657 31 20 20 20
865B 20 20 20 20
865F 20 49 44 31
8663 24
8664 907A DW I74141P
8666 B098 DW I7441T
;74150
8668 37 34 31 35 DB '74150 KP1$'
866C 30 20 20 20
PROGRAM IOT MACRO-80 3.44 09-Dec-81 PAGE 1-134
8670 20 20 20 20
8674 20 4B 50 31
8678 24
8679 9126 DW I74150P
867B BE0C DW I74150T
;74151
867D 37 34 31 35 DB '74151 KP7$'
8681 31 20 20 20
8685 20 20 20 20
8689 20 4B 50 37
868D 24
868E 913E DW I74151P
8690 BE7B DW I74151T
;74154
8692 37 34 31 35 DB '74154 ID3$'
8696 34 20 20 20
869A 20 20 20 20
869E 20 49 44 33
86A2 24
86A3 9186 DW I74154P
86A5 BF11 DW I74154T
;74164
86A7 37 34 31 36 DB '74164 IR8$'
86AB 34 20 20 20
86AF 20 20 20 20
86B3 20 49 52 38
86B7 24
86B8 92A2 DW I74164P
86BA C080 DW I74164T
;74188
86BC 37 34 31 38 DB '74188 $'
86C0 38 20 20 20
86C4 20 20 20 20
86C8 20 20 20 20
86CC 24
86CD 94A6 DW I74188P
86CF C4DC DW I74188T
;74192
86D1 37 34 31 39 DB '74192 IE6$'
86D5 32 20 20 20
86D9 20 20 20 20
86DD 20 49 45 36
86E1 24
86E2 94CB DW I74192P
86E4 C650 DW I74192T
;74193
86E6 37 34 31 39 DB '74193 IE7$'
86EA 33 20 20 20
86EE 20 20 20 20
86F2 20 49 45 37
86F6 24
86F7 94FE DW I74193P
86F9 C697 DW I74193T
;74287
86FB 37 34 32 38 DB '74287 $'
86FF 37 20 20 20
PROGRAM IOT MACRO-80 3.44 09-Dec-81 PAGE 1-135
8703 20 20 20 20
8707 20 20 20 20
870B 24
870C 9852 DW I74287P
870E CAFD DW I74287T
;74571
8710 37 34 35 37 DB '74571 $'
8714 31 20 20 20
8718 20 20 20 20
871C 20 20 20 20
8720 24
8721 9E81 DW I74571P
8723 D543 DW I74571T
8725 ITESLAK:
ENDIF
;===============================
;SEZNAM TESTU TESTRU IO - DTO-1
; 1234567890123456
8725 ITEST:
;TEST 1
8725 54 45 53 54 DB 'TEST 1 (BWP-1)$'
8729 20 31 20 20
872D 20 28 42 57
8731 50 2D 31 29
8735 24
8736 ACC5 DW ITEST1P
8738 F08F DW ITEST1T
;TEST 2
873A 54 45 53 54 DB 'TEST 2 ZIF28 R$'
873E 20 32 20 20
8742 20 5A 49 46
8746 32 38 20 52
874A 24
874B ACDB DW ITEST2P
874D F12E DW ITEST2T
;TEST 3
874F 54 45 53 54 DB 'TEST 3 ZIF16 R$'
8753 20 33 20 20
8757 20 5A 49 46
875B 31 36 20 52
875F 24
8760 AD01 DW ITEST3P
8762 F137 DW ITEST3T
8764 ITESTK:
;===============================
;POPISY IO TTL
;===============================
8764 AD27 I7400P: DW PP1
8766 34 78 20 32 DB '4x 2NAND TP$'
876A 4E 41 4E 44
876E 20 54 50 24
8772 AD27 I7401P: DW PP1
8774 34 78 20 32 DB '4x 2NAND OC$'
8778 4E 41 4E 44
PROGRAM IOT MACRO-80 3.44 09-Dec-81 PAGE 1-136
877C 20 4F 43 24
8780 AD27 I7402P: DW PP1
8782 34 78 20 32 DB '4x 2NOR TP$'
8786 4E 4F 52 20
878A 54 50 24
878D AD27 I7404P: DW PP1
878F 36 78 20 69 DB '6x invertor TP$'
8793 6E 76 65 72
8797 74 6F 72 20
879B 54 50 24
879E AD27 I7405P: DW PP1
87A0 36 78 20 69 DB '6x invertor OC$'
87A4 6E 76 65 72
87A8 74 6F 72 20
87AC 4F 43 24
87AF AD27 I7406P: DW PP1
87B1 36 78 20 69 DB '6x invert. budici stupen 30V OC$'
87B5 6E 76 65 72
87B9 74 2E 20 62
87BD 75 64 69 63
87C1 69 20 73 74
87C5 75 70 65 6E
87C9 20 33 30 56
87CD 20 4F 43 24
87D1 AD27 I7407P: DW PP1
87D3 36 78 20 62 DB '6x budici stupen 30V OC$'
87D7 75 64 69 63
87DB 69 20 73 74
87DF 75 70 65 6E
87E3 20 33 30 56
87E7 20 4F 43 24
87EB AD27 I7408P: DW PP1
87ED 34 78 20 32 DB '4x 2AND TP$'
87F1 41 4E 44 20
87F5 54 50 24
87F8 AD27 I7409P: DW PP1
87FA 34 78 20 32 DB '4x 2AND OC$'
87FE 41 4E 44 20
8802 4F 43 24
8805 AD27 I7410P: DW PP1
8807 33 78 20 33 DB '3x 3NAND TP$'
880B 4E 41 4E 44
880F 20 54 50 24
8813 AD27 I7411P: DW PP1
8815 33 78 20 33 DB '3x 3AND TP$'
8819 41 4E 44 20
881D 54 50 24
8820 AD27 I7412P: DW PP1
8822 33 78 20 33 DB '3x 3NAND OC$'
8826 4E 41 4E 44
882A 20 4F 43 24
882E AD27 I7413P: DW PP1
8830 32 78 20 34 DB '2x 4NAND Schmitt. TP$'
8834 4E 41 4E 44
8838 20 53 63 68
883C 6D 69 74 74
PROGRAM IOT MACRO-80 3.44 09-Dec-81 PAGE 1-137
8840 2E 20 54 50
8844 24
8845 AD27 I7414P: DW PP1
8847 36 78 20 53 DB '6x Schmitt. invertor TP$'
884B 63 68 6D 69
884F 74 74 2E 20
8853 69 6E 76 65
8857 72 74 6F 72
885B 20 54 50 24
885F AD27 I7415P: DW PP1
8861 33 78 20 33 DB '3x 3AND OC$'
8865 41 4E 44 20
8869 4F 43 24
886C AD27 I7416P: DW PP1
886E 36 78 20 69 DB '6x invert. budici stupen 15V OC$'
8872 6E 76 65 72
8876 74 2E 20 62
887A 75 64 69 63
887E 69 20 73 74
8882 75 70 65 6E
8886 20 31 35 56
888A 20 4F 43 24
888E AD27 I7417P: DW PP1
8890 36 78 20 62 DB '6x budici stupen 15V OC$'
8894 75 64 69 63
8898 69 20 73 74
889C 75 70 65 6E
88A0 20 31 35 56
88A4 20 4F 43 24
88A8 AD27 I7418P: DW PP1
88AA 32 78 20 34 DB '2x 4vstup. Schmitt. NAND TP$'
88AE 76 73 74 75
88B2 70 2E 20 53
88B6 63 68 6D 69
88BA 74 74 2E 20
88BE 4E 41 4E 44
88C2 20 54 50 24
88C6 AD27 I7419P: DW PP1
88C8 36 78 20 53 DB '6x Schmitt. invertor TP$'
88CC 63 68 6D 69
88D0 74 74 2E 20
88D4 69 6E 76 65
88D8 72 74 6F 72
88DC 20 54 50 24
88E0 AD27 I7420P: DW PP1
88E2 32 78 20 34 DB '2x 4NAND TP$'
88E6 4E 41 4E 44
88EA 20 54 50 24
88EE AD27 I7421P: DW PP1
88F0 32 78 20 34 DB '2x 4AND TP$'
88F4 41 4E 44 20
88F8 54 50 24
88FB AD27 I7422P: DW PP1
88FD 32 78 20 34 DB '2x 4NAND OC$'
8901 4E 41 4E 44
8905 20 4F 43 24
PROGRAM IOT MACRO-80 3.44 09-Dec-81 PAGE 1-138
8909 AD3C I7423P: DW PP2
890B 32 78 20 72 DB '2x rozsirit. 4NOR TP (LE2) s R7460A$'
890F 6F 7A 73 69
8913 72 69 74 2E
8917 20 34 4E 4F
891B 52 20 54 50
891F 20 28 4C 45
8923 32 29 20 73
8927 20 52 37 34
892B 36 30 41 24
892F AD27 I7424P: DW PP1
8931 34 78 20 32 DB '4x 2NAND Schmitt. TP$'
8935 4E 41 4E 44
8939 20 53 63 68
893D 6D 69 74 74
8941 2E 20 54 50
8945 24
8946 AD27 I7425P: DW PP1
8948 32 78 20 34 DB '2x 4NOR s uvolnenim TP$'
894C 4E 4F 52 20
8950 73 20 75 76
8954 6F 6C 6E 65
8958 6E 69 6D 20
895C 54 50 24
895F AD27 I7426P: DW PP1
8961 34 78 20 32 DB '4x 2NAND 15V OC$'
8965 4E 41 4E 44
8969 20 31 35 56
896D 20 4F 43 24
8971 AD27 I7427P: DW PP1
8973 33 78 20 33 DB '3x 3NOR TP$'
8977 4E 4F 52 20
897B 54 50 24
897E AD27 I7428P: DW PP1
8980 34 78 20 32 DB '4x 2NOR vykon. TP$'
8984 4E 4F 52 20
8988 76 79 6B 6F
898C 6E 2E 20 54
8990 50 24
8992 AD27 I7430P: DW PP1
8994 38 4E 41 4E DB '8NAND TP$'
8998 44 20 54 50
899C 24
899D AD3C I7431P: DW PP2
899F 36 78 20 7A DB '6x zpozdovaci obvOd TP$'
89A3 70 6F 7A 64
89A7 6F 76 61 63
89AB 69 20 6F 62
89AF 76 4F 64 20
89B3 54 50 24
89B6 AD27 I7432P: DW PP1
89B8 34 78 20 32 DB '4x 2OR TP$'
89BC 4F 52 20 54
89C0 50 24
89C2 AD27 I7433P: DW PP1
89C4 34 78 20 32 DB '4x 2NOR vykon. OC$'
PROGRAM IOT MACRO-80 3.44 09-Dec-81 PAGE 1-139
89C8 4E 4F 52 20
89CC 76 79 6B 6F
89D0 6E 2E 20 4F
89D4 43 24
89D6 AD27 I7434P: DW PP1
89D8 36 78 20 62 DB '6x budici stupen TP$'
89DC 75 64 69 63
89E0 69 20 73 74
89E4 75 70 65 6E
89E8 20 54 50 24
89EC AD27 I7435P: DW PP1
89EE 36 78 20 62 DB '6x budici stupen OC$'
89F2 75 64 69 63
89F6 69 20 73 74
89FA 75 70 65 6E
89FE 20 4F 43 24
8A02 AD27 I7436P: DW PP1
8A04 34 78 20 32 DB '4x 2NOR TP$'
8A08 4E 4F 52 20
8A0C 54 50 24
8A0F AD27 I7437P: DW PP1
8A11 34 78 20 32 DB '4x 2NAND vykon. TP$'
8A15 4E 41 4E 44
8A19 20 76 79 6B
8A1D 6F 6E 2E 20
8A21 54 50 24
8A24 AD27 I7438P: DW PP1
8A26 34 78 20 32 DB '4x 2NAND vykon. OC$'
8A2A 4E 41 4E 44
8A2E 20 76 79 6B
8A32 6F 6E 2E 20
8A36 4F 43 24
8A39 AD27 I7440P: DW PP1
8A3B 32 78 20 34 DB '2x 4NAND vykon. TP$'
8A3F 4E 41 4E 44
8A43 20 76 79 6B
8A47 6F 6E 2E 20
8A4B 54 50 24
8A4E AD7D I7441P: DW PP5 ;DIL16 GND=12 VCC=5
8A50 64 65 6B 2E DB 'dek. BCD na 1 z 10 OC$'
8A54 20 42 43 44
8A58 20 6E 61 20
8A5C 31 20 7A 20
8A60 31 30 20 4F
8A64 43 24
8A66 AD3C I7442P: DW PP2
8A68 64 65 6B 2E DB 'dek. BCD na 1 z 10, TP$'
8A6C 20 42 43 44
8A70 20 6E 61 20
8A74 31 20 7A 20
8A78 31 30 2C 20
8A7C 54 50 24
8A7F AD3C I7443P: DW PP2
8A81 64 65 6B 2E DB 'dek. BCD+3 na 1 z 10 TP$'
8A85 20 42 43 44
8A89 2B 33 20 6E
PROGRAM IOT MACRO-80 3.44 09-Dec-81 PAGE 1-140
8A8D 61 20 31 20
8A91 7A 20 31 30
8A95 20 54 50 24
8A99 AD3C I7444P: DW PP2
8A9B 64 65 6B 2E DB 'dek. Gray+3 na 1 z 10 TP$'
8A9F 20 47 72 61
8AA3 79 2B 33 20
8AA7 6E 61 20 31
8AAB 20 7A 20 31
8AAF 30 20 54 50
8AB3 24
8AB4 AD3C I7445P: DW PP2
8AB6 64 65 6B 2E DB 'dek. BCD na 1 z 10 OC$'
8ABA 20 42 43 44
8ABE 20 6E 61 20
8AC2 31 20 7A 20
8AC6 31 30 20 4F
8ACA 43 24
8ACC AD3C I7446P: DW PP2
8ACE 64 65 6B 2E DB 'dek. BCD/7 seg. SA 30V OC$'
8AD2 20 42 43 44
8AD6 2F 37 20 73
8ADA 65 67 2E 20
8ADE 53 41 20 33
8AE2 30 56 20 4F
8AE6 43 24
8AE8 AD3C I7447P: DW PP2
8AEA 64 65 6B 2E DB 'dek. BCD/7 seg. SA 15V OC$'
8AEE 20 42 43 44
8AF2 2F 37 20 73
8AF6 65 67 2E 20
8AFA 53 41 20 31
8AFE 35 56 20 4F
8B02 43 24
8B04 AD3C I7448P: DW PP2
8B06 64 65 6B 2E DB 'dek. BCD/7 seg. SK TP$'
8B0A 20 42 43 44
8B0E 2F 37 20 73
8B12 65 67 2E 20
8B16 53 4B 20 54
8B1A 50 24
8B1C AD27 I7449P: DW PP1
8B1E 64 65 6B 2E DB 'dek. BCD/7 seg. SK 5.5V OC$'
8B22 20 42 43 44
8B26 2F 37 20 73
8B2A 65 67 2E 20
8B2E 53 4B 20 35
8B32 2E 35 56 20
8B36 4F 43 24
8B39 AD27 I7450P: DW PP1
8B3B 32 78 20 32 DB '2x 2-2AND-OR-INVERT rozsirit. TP (LR1) s R7460$'
8B3F 2D 32 41 4E
8B43 44 2D 4F 52
8B47 2D 49 4E 56
8B4B 45 52 54 20
8B4F 72 6F 7A 73
PROGRAM IOT MACRO-80 3.44 09-Dec-81 PAGE 1-141
8B53 69 72 69 74
8B57 2E 20 54 50
8B5B 20 28 4C 52
8B5F 31 29 20 73
8B63 20 52 37 34
8B67 36 30 24
8B6A AD27 I7451P: DW PP1
8B6C 32 78 20 32 DB '2x 2-2AND-OR-INVERT TP$'
8B70 2D 32 41 4E
8B74 44 2D 4F 52
8B78 2D 49 4E 56
8B7C 45 52 54 20
8B80 54 50 24
8B83 AD27 I74X51P:DW PP1
8B85 32 2D 32 2C DB '2-2, 3-3AND-OR-INVERT TP$'
8B89 20 33 2D 33
8B8D 41 4E 44 2D
8B91 4F 52 2D 49
8B95 4E 56 45 52
8B99 54 20 54 50
8B9D 24
8B9E AD27 I7453P: DW PP1
8BA0 72 6F 7A 73 DB 'rozsirit. 2-2-2-2AND-OR-INVERT TP (LR3) s R7460$'
8BA4 69 72 69 74
8BA8 2E 20 32 2D
8BAC 32 2D 32 2D
8BB0 32 41 4E 44
8BB4 2D 4F 52 2D
8BB8 49 4E 56 45
8BBC 52 54 20 54
8BC0 50 20 28 4C
8BC4 52 33 29 20
8BC8 73 20 52 37
8BCC 34 36 30 24
8BD0 AD27 I7454P: DW PP1
8BD2 32 2D 32 2D DB '2-2-2-2AND-OR-INVERT TP$'
8BD6 32 2D 32 41
8BDA 4E 44 2D 4F
8BDE 52 2D 49 4E
8BE2 56 45 52 54
8BE6 20 54 50 24
8BEA AD27 I74X54P:DW PP1
8BEC 32 2D 33 2D DB '2-3-3-2AND-OR-INVERT TP$'
8BF0 33 2D 32 41
8BF4 4E 44 2D 4F
8BF8 52 2D 49 4E
8BFC 56 45 52 54
8C00 20 54 50 24
8C04 AD27 I7455P: DW PP1
8C06 72 6F 7A 73 DB 'rozsirit. 4-4AND-OR-INVERT TP (LR4) s R7460$'
8C0A 69 72 69 74
8C0E 2E 20 34 2D
8C12 34 41 4E 44
8C16 2D 4F 52 2D
8C1A 49 4E 56 45
8C1E 52 54 20 54
PROGRAM IOT MACRO-80 3.44 09-Dec-81 PAGE 1-142
8C22 50 20 28 4C
8C26 52 34 29 20
8C2A 73 20 52 37
8C2E 34 36 30 24
8C32 AD27 I74X55P:DW PP1
8C34 34 2D 34 41 DB '4-4AND-OR-INVERT TP$'
8C38 4E 44 2D 4F
8C3C 52 2D 49 4E
8C40 56 45 52 54
8C44 20 54 50 24
8C48 AD27 I7458P: DW PP1
8C4A 32 2D 32 2C DB '2-2, 3-3AND-OR TP$'
8C4E 20 33 2D 33
8C52 41 4E 44 2D
8C56 4F 52 20 54
8C5A 50 24
8C5C AD27 I7460P: DW PP1
8C5E 32 78 20 34 DB '2x 4AND expander (LP1 LD1), testonano s 7423, 7450, 7453, 7455$'
8C62 41 4E 44 20
8C66 65 78 70 61
8C6A 6E 64 65 72
8C6E 20 28 4C 50
8C72 31 20 4C 44
8C76 31 29 2C 20
8C7A 74 65 73 74
8C7E 6F 6E 61 6E
8C82 6F 20 73 20
8C86 37 34 32 33
8C8A 2C 20 37 34
8C8E 35 30 2C 20
8C92 37 34 35 33
8C96 2C 20 37 34
8C9A 35 35 24
8C9D AD27 I7464P: DW PP1
8C9F 34 2D 32 2D DB '4-2-3-2AND-OR-INVERT, TP$'
8CA3 33 2D 32 41
8CA7 4E 44 2D 4F
8CAB 52 2D 49 4E
8CAF 56 45 52 54
8CB3 2C 20 54 50
8CB7 24
8CB8 AD27 I7465P: DW PP1
8CBA 34 2D 32 2D DB '4-2-3-2AND-OR-INVERT, OC$'
8CBE 33 2D 32 41
8CC2 4E 44 2D 4F
8CC6 52 2D 49 4E
8CCA 56 45 52 54
8CCE 2C 20 4F 43
8CD2 24
8CD3 AD27 I7472P: DW PP1
8CD5 4B 2E 4F 2E DB 'K.O. J-K s SR TP$'
8CD9 20 4A 2D 4B
8CDD 20 73 20 53
8CE1 52 20 54 50
8CE5 24
8CE6 AD92 I7473P: DW PP6 ;DIL14 GND=11, VCC=4
PROGRAM IOT MACRO-80 3.44 09-Dec-81 PAGE 1-143
8CE8 32 58 20 4B DB '2X K.O. J-K s R TP$'
8CEC 2E 4F 2E 20
8CF0 4A 2D 4B 20
8CF4 73 20 52 20
8CF8 54 50 24
8CFB AD27 I7474P: DW PP1 ;
8CFD 32 58 20 4B DB '2X K.O. D s SR TP$'
8D01 2E 4F 2E 20
8D05 44 20 73 20
8D09 53 52 20 54
8D0D 50 24
8D0F AD7D I7475P: DW PP5 ;DIL16 GND=12, VCC=5
8D11 32 58 20 32 DB '2X 2bit. stradac T$'
8D15 62 69 74 2E
8D19 20 73 74 72
8D1D 61 64 61 63
8D21 20 54 24
8D24 ADA7 I7476P: DW PP7 ;DIL16 GND=13, VCC=5
8D26 32 58 20 4B DB '2X K.O. J-K s SR TP$'
8D2A 2E 4F 2E 20
8D2E 4A 2D 4B 20
8D32 73 20 53 52
8D36 20 54 50 24
8D3A ADBC I7477P: DW PP8 ;DIL14 GND=11, VCC=4
8D3C 32 58 20 32 DB '2X 2bit. stradac TP$'
8D40 62 69 74 2E
8D44 20 73 74 72
8D48 61 64 61 63
8D4C 20 54 50 24
8D50 ADD1 I7481P: DW PP9 ;DIL14 GND=10, VCC=4
8D52 52 41 4D 20 DB 'RAM 16x1bit OC$'
8D56 31 36 78 31
8D5A 62 69 74 20
8D5E 4F 43 24
8D61 AD7D I7483P: DW PP5 ;DIL16 GND=12, VCC=5
8D63 34 62 69 74 DB '4bit. uplna scitacka TP$'
8D67 2E 20 75 70
8D6B 6C 6E 61 20
8D6F 73 63 69 74
8D73 61 63 6B 61
8D77 20 54 50 24
8D7B AD3C I7485P: DW PP2
8D7D 34 62 69 74 DB '4bit. komparator TP$'
8D81 2E 20 6B 6F
8D85 6D 70 61 72
8D89 61 74 6F 72
8D8D 20 54 50 24
8D91 AD27 I7486P: DW PP1
8D93 34 78 20 32 DB '4x 2EX-OR TP$'
8D97 45 58 2D 4F
8D9B 52 20 54 50
8D9F 24
8DA0 AD3C I7489P: DW PP2
8DA2 52 41 4D 20 DB 'RAM 16x4bity OC$'
8DA6 31 36 78 34
8DAA 62 69 74 79
PROGRAM IOT MACRO-80 3.44 09-Dec-81 PAGE 1-144
8DAE 20 4F 43 24
8DB2 ADE6 I7490P: DW PP10
8DB4 42 43 44 20 DB 'BCD citac TP$'
8DB8 63 69 74 61
8DBC 63 20 54 50
8DC0 24
8DC1 ADE6 I7491P: DW PP10
8DC3 38 62 69 74 DB '8bit. posuv. reg. TP$'
8DC7 2E 20 70 6F
8DCB 73 75 76 2E
8DCF 20 72 65 67
8DD3 2E 20 54 50
8DD7 24
8DD8 ADE6 I7492P: DW PP10
8DDA 34 62 69 74 DB '4bit. citac do 12 TP$'
8DDE 2E 20 63 69
8DE2 74 61 63 20
8DE6 64 6F 20 31
8DEA 32 20 54 50
8DEE 24
8DEF ADE6 I7493P: DW PP10
8DF1 34 62 69 74 DB '4bit. BIN citac TP$'
8DF5 2E 20 42 49
8DF9 4E 20 63 69
8DFD 74 61 63 20
8E01 54 50 24
8E04 AD27 I7495P: DW PP1
8E06 34 62 69 74 DB '4bit. posuv. reg. s par. a ser. vstupem, par. vystup, TP$'
8E0A 2E 20 70 6F
8E0E 73 75 76 2E
8E12 20 72 65 67
8E16 2E 20 73 20
8E1A 70 61 72 2E
8E1E 20 61 20 73
8E22 65 72 2E 20
8E26 76 73 74 75
8E2A 70 65 6D 2C
8E2E 20 70 61 72
8E32 2E 20 76 79
8E36 73 74 75 70
8E3A 2C 20 54 50
8E3E 24
8E3F AD7D I7496P: DW PP5
8E41 35 62 69 74 DB '5bit. posuv. reg. s par. a ser. vstupem, par. vystup, R, TP$'
8E45 2E 20 70 6F
8E49 73 75 76 2E
8E4D 20 72 65 67
8E51 2E 20 73 20
8E55 70 61 72 2E
8E59 20 61 20 73
8E5D 65 72 2E 20
8E61 76 73 74 75
8E65 70 65 6D 2C
8E69 20 70 61 72
8E6D 2E 20 76 79
8E71 73 74 75 70
PROGRAM IOT MACRO-80 3.44 09-Dec-81 PAGE 1-145
8E75 2C 20 52 2C
8E79 20 54 50 24
8E7D AD3C I7497P: DW PP2
8E7F 73 79 6E 63 DB 'synchr. program. delic TP$'
8E83 68 72 2E 20
8E87 70 72 6F 67
8E8B 72 61 6D 2E
8E8F 20 64 65 6C
8E93 69 63 20 54
8E97 50 24
8E99 ADFB I74100P:DW PP11
8E9B 32 78 20 34 DB '2x 4bit. stradac TP (TK7) s R74100$'
8E9F 62 69 74 2E
8EA3 20 73 74 72
8EA7 61 64 61 63
8EAB 20 54 50 20
8EAF 28 54 4B 37
8EB3 29 20 73 20
8EB7 52 37 34 31
8EBB 30 30 24
8EBE AD27 I74107P:DW PP1
8EC0 32 78 20 4B DB '2x K.O. J-K s R TP$'
8EC4 2E 4F 2E 20
8EC8 4A 2D 4B 20
8ECC 73 20 52 20
8ED0 54 50 24
8ED3 AD3C I74109P:DW PP2
8ED5 32 78 20 4B DB '2x K.O. J-K s SR TP$'
8ED9 2E 4F 2E 20
8EDD 4A 2D 4B 20
8EE1 73 20 53 52
8EE5 20 54 50 24
8EE9 AD27 I74113P:DW PP1
8EEB 32 78 20 4B DB '2x K.O. J-K s S TP$'
8EEF 2E 4F 2E 20
8EF3 4A 2D 4B 20
8EF7 73 20 53 20
8EFB 54 50 24
8EFE AD27 I74114P:DW PP1
8F00 32 78 20 4B DB '2x K.O. J-K s S, spol. R, CLK TP$'
8F04 2E 4F 2E 20
8F08 4A 2D 4B 20
8F0C 73 20 53 2C
8F10 20 73 70 6F
8F14 6C 2E 20 52
8F18 2C 20 43 4C
8F1C 4B 20 54 50
8F20 24
8F21 AD67 I74119P:DW PP4
8F23 36 78 20 4B DB '6x K.O. R-S/stradac s spol. R TP$'
8F27 2E 4F 2E 20
8F2B 52 2D 53 2F
8F2F 73 74 72 61
8F33 64 61 63 20
8F37 73 20 73 70
8F3B 6F 6C 2E 20
PROGRAM IOT MACRO-80 3.44 09-Dec-81 PAGE 1-146
8F3F 52 20 54 50
8F43 24
8F44 AD27 I74121P:DW PP1
8F46 4D 4B 4F 20 DB 'MKO TP s R_MKO$'
8F4A 54 50 20 73
8F4E 20 52 5F 4D
8F52 4B 4F 24
8F55 AD3C I74123P:DW PP2
8F57 32 78 20 4D DB '2x MKO s nas. spous. TP s R_MKO$'
8F5B 4B 4F 20 73
8F5F 20 6E 61 73
8F63 2E 20 73 70
8F67 6F 75 73 2E
8F6B 20 54 50 20
8F6F 73 20 52 5F
8F73 4D 4B 4F 24
8F77 AD27 I74125P:DW PP1
8F79 34 78 20 62 DB '4x budic sbernice TS$'
8F7D 75 64 69 63
8F81 20 73 62 65
8F85 72 6E 69 63
8F89 65 20 54 53
8F8D 24
8F8E AD27 I74128P:DW PP1
8F90 34 78 20 32 DB '4x 2NOR - 50/75ohm. budic TP$'
8F94 4E 4F 52 20
8F98 2D 20 35 30
8F9C 2F 37 35 6F
8FA0 68 6D 2E 20
8FA4 62 75 64 69
8FA8 63 20 54 50
8FAC 24
;I74130P:DW PP
; DB 'DIL14 4x 2vstup. AND budici stupen (30 V), OC 130p DIL16 2x monostabilni multivibra. s nasle. spousten, TP$'
8FAD AD3C I74131P:DW PP2
8FAF 64 65 6B 6F DB 'dekoder 1 z 8 se stradacem, OC$'
8FB3 64 65 72 20
8FB7 31 20 7A 20
8FBB 38 20 73 65
8FBF 20 73 74 72
8FC3 61 64 61 63
8FC7 65 6D 2C 20
8FCB 4F 43 24
8FCE AD27 I74132P:DW PP1
8FD0 34 78 20 32 DB '4x 2NAND Schmitt. TP$'
8FD4 4E 41 4E 44
8FD8 20 53 63 68
8FDC 6D 69 74 74
8FE0 2E 20 54 50
8FE4 24
8FE5 AD3C I74133P:DW PP2
8FE7 31 33 76 73 DB '13vstup NAND TP$'
8FEB 74 75 70 20
8FEF 4E 41 4E 44
8FF3 20 54 50 24
8FF7 AD27 I74136P:DW PP1
PROGRAM IOT MACRO-80 3.44 09-Dec-81 PAGE 1-147
8FF9 34 78 20 32 DB '4x 2XOR OC$'
8FFD 58 4F 52 20
9001 4F 43 24
9004 AD3C I74137P:DW PP2
9006 33 62 69 74 DB '3bit. dekoder 1 z 8 s registrem TP$'
900A 2E 20 64 65
900E 6B 6F 64 65
9012 72 20 31 20
9016 7A 20 38 20
901A 73 20 72 65
901E 67 69 73 74
9022 72 65 6D 20
9026 54 50 24
9029 AD3C I74138P:DW PP2
902B 33 62 69 74 DB '3bit. dekoder 1 z 8 TP$'
902F 2E 20 64 65
9033 6B 6F 64 65
9037 72 20 31 20
903B 7A 20 38 20
903F 54 50 24
9042 AD3C I74139P:DW PP2
9044 32 78 20 32 DB '2x 2bit. dekoder 2 ze 4$'
9048 62 69 74 2E
904C 20 64 65 6B
9050 6F 64 65 72
9054 20 32 20 7A
9058 65 20 34 24
905C AD27 I74140P:DW PP1
905E 32 78 20 34 DB '2x 4NAND - 50 ohm. budic TS$'
9062 4E 41 4E 44
9066 20 2D 20 35
906A 30 20 6F 68
906E 6D 2E 20 62
9072 75 64 69 63
9076 20 54 53 24
907A AD3C I74141P:DW PP2
907C 64 65 6B 6F DB 'dekoder 1 z 10 (60V) OC$'
9080 64 65 72 20
9084 31 20 7A 20
9088 31 30 20 28
908C 36 30 56 29
9090 20 4F 43 24
9094 AD67 I74143P:DW PP4
9096 42 43 44 20 DB 'BCD citac se 7seg. dek. OC$'
909A 63 69 74 61
909E 63 20 73 65
90A2 20 37 73 65
90A6 67 2E 20 64
90AA 65 6B 2E 20
90AE 4F 43 24
90B1 AD67 I74144P:DW PP4
90B3 42 43 44 20 DB 'BCD citac se 7seg. dek. (15v) OC$'
90B7 63 69 74 61
90BB 63 20 73 65
90BF 20 37 73 65
90C3 67 2E 20 64
PROGRAM IOT MACRO-80 3.44 09-Dec-81 PAGE 1-148
90C7 65 6B 2E 20
90CB 28 31 35 76
90CF 29 20 4F 43
90D3 24
90D4 AD3C I74145P:DW PP2
90D6 64 65 6B 6F DB 'dekoder BCD 1 z 10 (15V) OC$'
90DA 64 65 72 20
90DE 42 43 44 20
90E2 31 20 7A 20
90E6 31 30 20 28
90EA 31 35 56 29
90EE 20 4F 43 24
90F2 AD3C I74147P:DW PP2
90F4 42 49 4E 2F DB 'BIN/BCD prior. koder TP$'
90F8 42 43 44 20
90FC 70 72 69 6F
9100 72 2E 20 6B
9104 6F 64 65 72
9108 20 54 50 24
910C AD3C I74148P:DW PP2
910E 38 76 73 74 DB '8vstup. prior. koder TP$'
9112 75 70 2E 20
9116 70 72 69 6F
911A 72 2E 20 6B
911E 6F 64 65 72
9122 20 54 50 24
9126 AD67 I74150P:DW PP4
9128 31 36 76 73 DB '16vstup. multiplex TP$'
912C 74 75 70 2E
9130 20 6D 75 6C
9134 74 69 70 6C
9138 65 78 20 54
913C 50 24
913E AD3C I74151P:DW PP2
9140 38 76 73 74 DB '8vstup. multiplex TP$'
9144 75 70 2E 20
9148 6D 75 6C 74
914C 69 70 6C 65
9150 78 20 54 50
9154 24
9155 AD27 I74152P:DW PP1
9157 38 76 73 74 DB '8vstup. multiplex TP$'
915B 75 70 2E 20
915F 6D 75 6C 74
9163 69 70 6C 65
9167 78 20 54 50
916B 24
916C AD3C I74153P:DW PP2
916E 32 78 20 34 DB '2x 4vstup. multiplex TP$'
9172 76 73 74 75
9176 70 2E 20 6D
917A 75 6C 74 69
917E 70 6C 65 78
9182 20 54 50 24
9186 AD67 I74154P:DW PP4
9188 64 65 6B 6F DB 'dekoder 1 z 16 TP$'
PROGRAM IOT MACRO-80 3.44 09-Dec-81 PAGE 1-149
918C 64 65 72 20
9190 31 20 7A 20
9194 31 36 20 54
9198 50 24
919A AD3C I74155P:DW PP2
919C 32 78 20 64 DB '2x dekoder 1 ze 4 TP$'
91A0 65 6B 6F 64
91A4 65 72 20 31
91A8 20 7A 65 20
91AC 34 20 54 50
91B0 24
91B1 AD3C I74156P:DW PP2
91B3 32 78 20 64 DB '2x dekoder 1 ze 4 OC$'
91B7 65 6B 6F 64
91BB 65 72 20 31
91BF 20 7A 65 20
91C3 34 20 4F 43
91C7 24
91C8 AD3C I74157P:DW PP2
91CA 34 78 20 32 DB '4x 2vstup. multiplex TP$'
91CE 76 73 74 75
91D2 70 2E 20 6D
91D6 75 6C 74 69
91DA 70 6C 65 78
91DE 20 54 50 24
91E2 AD3C I74158P:DW PP2
91E4 34 78 20 32 DB '4x 2vstup. multiplex invert. TP$'
91E8 76 73 74 75
91EC 70 2E 20 6D
91F0 75 6C 74 69
91F4 70 6C 65 78
91F8 20 69 6E 76
91FC 65 72 74 2E
9200 20 54 50 24
9204 AD67 I74159P:DW PP4
9206 64 65 6B 6F DB 'dekoder 1 z 16 OC$'
920A 64 65 72 20
920E 31 20 7A 20
9212 31 36 20 4F
9216 43 24
9218 AD3C I74160P:DW PP2
921A 73 79 6E 63 DB 'sync. prog. BCD citac s R TP$'
921E 2E 20 70 72
9222 6F 67 2E 20
9226 42 43 44 20
922A 63 69 74 61
922E 63 20 73 20
9232 52 20 54 50
9236 24
9237 AD3C I74161P:DW PP2
9239 73 79 6E 63 DB 'sync. prog. BIN citac s R TP$'
923D 2E 20 70 72
9241 6F 67 2E 20
9245 42 49 4E 20
9249 63 69 74 61
924D 63 20 73 20
PROGRAM IOT MACRO-80 3.44 09-Dec-81 PAGE 1-150
9251 52 20 54 50
9255 24
9256 AD3C I74162P:DW PP2
9258 73 79 6E 63 DB 'sync. prog. BCD citac se sync. R TP$'
925C 2E 20 70 72
9260 6F 67 2E 20
9264 42 43 44 20
9268 63 69 74 61
926C 63 20 73 65
9270 20 73 79 6E
9274 63 2E 20 52
9278 20 54 50 24
927C AD3C I74163P:DW PP2
927E 73 79 6E 63 DB 'sync. prog. BIN citac se sync. R TP$'
9282 2E 20 70 72
9286 6F 67 2E 20
928A 42 49 4E 20
928E 63 69 74 61
9292 63 20 73 65
9296 20 73 79 6E
929A 63 2E 20 52
929E 20 54 50 24
92A2 AD3C I74164P:DW PP2
92A4 73 79 6E 63 DB 'sync. 8bit. posuv. reg. s R ser. vstup, par. vystup TP$'
92A8 2E 20 38 62
92AC 69 74 2E 20
92B0 70 6F 73 75
92B4 76 2E 20 72
92B8 65 67 2E 20
92BC 73 20 52 20
92C0 73 65 72 2E
92C4 20 76 73 74
92C8 75 70 2C 20
92CC 70 61 72 2E
92D0 20 76 79 73
92D4 74 75 70 20
92D8 54 50 24
92DB AD3C I74165P:DW PP2
92DD 38 62 69 74 DB '8bit. posuv. reg. s R ser. a par. vstup, ser. vystup TP$'
92E1 2E 20 70 6F
92E5 73 75 76 2E
92E9 20 72 65 67
92ED 2E 20 73 20
92F1 52 20 73 65
92F5 72 2E 20 61
92F9 20 70 61 72
92FD 2E 20 76 73
9301 74 75 70 2C
9305 20 73 65 72
9309 2E 20 76 79
930D 73 74 75 70
9311 20 54 50 24
9315 AD3C I74166P:DW PP2
9317 73 79 6E 63 DB 'sync. 8bit. posuv. registr s R ser. a par. vstup, ser. vystup TP$'
931B 2E 20 38 62
931F 69 74 2E 20
PROGRAM IOT MACRO-80 3.44 09-Dec-81 PAGE 1-151
9323 70 6F 73 75
9327 76 2E 20 72
932B 65 67 69 73
932F 74 72 20 73
9333 20 52 20 73
9337 65 72 2E 20
933B 61 20 70 61
933F 72 2E 20 76
9343 73 74 75 70
9347 2C 20 73 65
934B 72 2E 20 76
934F 79 73 74 75
9353 70 20 54 50
9357 24
9358 AD3C I74168P:DW PP2
935A 73 79 6E 63 DB 'sync. obousmer. BCD. prog. citac TP$'
935E 2E 20 6F 62
9362 6F 75 73 6D
9366 65 72 2E 20
936A 42 43 44 2E
936E 20 70 72 6F
9372 67 2E 20 63
9376 69 74 61 63
937A 20 54 50 24
937E AD3C I74169P:DW PP2
9380 73 79 6E 63 DB 'sync. obousmer. BIN. prog. citac TP$'
9384 2E 20 6F 62
9388 6F 75 73 6D
938C 65 72 2E 20
9390 42 49 4E 2E
9394 20 70 72 6F
9398 67 2E 20 63
939C 69 74 61 63
93A0 20 54 50 24
93A4 AD3C I74170P:DW PP2
93A6 72 65 67 2E DB 'reg. 4x4bit. OC$'
93AA 20 34 78 34
93AE 62 69 74 2E
93B2 20 4F 43 24
93B6 AD3C I74173P:DW PP2
93B8 34 62 69 74 DB '4bit. reg. D TS$'
93BC 2E 20 72 65
93C0 67 2E 20 44
93C4 20 54 53 24
93C8 AD3C I74174P:DW PP2
93CA 36 78 20 4B DB '6x K.O. D TP$'
93CE 2E 4F 2E 20
93D2 44 20 54 50
93D6 24
93D7 AD3C I74175P:DW PP2
93D9 34 78 20 4B DB '4x K.O. D TP$'
93DD 2E 4F 2E 20
93E1 44 20 54 50
93E5 24
93E6 AD27 I74176P:DW PP1
93E8 70 72 6F 67 DB 'program. BCD citac TP$'
PROGRAM IOT MACRO-80 3.44 09-Dec-81 PAGE 1-152
93EC 72 61 6D 2E
93F0 20 42 43 44
93F4 20 63 69 74
93F8 61 63 20 54
93FC 50 24
93FE AD27 I74177P:DW PP1
9400 70 72 6F 67 DB 'program. BCD citac TP$'
9404 72 61 6D 2E
9408 20 42 43 44
940C 20 63 69 74
9410 61 63 20 54
9414 50 24
9416 AD27 I74180P:DW PP1
9418 39 62 69 74 DB '9bit. renerator parity/paritni skousec TP$'
941C 2E 20 72 65
9420 6E 65 72 61
9424 74 6F 72 20
9428 70 61 72 69
942C 74 79 2F 70
9430 61 72 69 74
9434 6E 69 20 73
9438 6B 6F 75 73
943C 65 63 20 54
9440 50 24
9442 AD67 I74181P:DW PP4
9444 34 62 69 74 DB '4bit. ALU TP$'
9448 2E 20 41 4C
944C 55 20 54 50
9450 24
9451 AD3C I74182P:DW PP2
9453 34 62 69 74 DB '4bit. obvod pro urychleni prenosu TP$'
9457 2E 20 6F 62
945B 76 6F 64 20
945F 70 72 6F 20
9463 75 72 79 63
9467 68 6C 65 6E
946B 69 20 70 72
946F 65 6E 6F 73
9473 75 20 54 50
9477 24
9478 AD3C I74184P:DW PP2
947A 70 72 65 76 DB 'prevodnik BCD/BIN OC$'
947E 6F 64 6E 69
9482 6B 20 42 43
9486 44 2F 42 49
948A 4E 20 4F 43
948E 24
948F AD3C I74185P:DW PP2
9491 70 72 65 76 DB 'prevodnik BIN/BCD OC$'
9495 6F 64 6E 69
9499 6B 20 42 49
949D 4E 2F 42 43
94A1 44 20 4F 43
94A5 24
94A6 AD3C I74188P:DW PP2
94A8 50 52 4F 4D DB 'PROM 32x8bitu OC$'
PROGRAM IOT MACRO-80 3.44 09-Dec-81 PAGE 1-153
94AC 20 33 32 78
94B0 38 62 69 74
94B4 75 20 4F 43
94B8 24
94B9 AD3C I74189P:DW PP2
94BB 52 41 4D 20 DB 'RAM 16x4bity TS$'
94BF 31 36 78 34
94C3 62 69 74 79
94C7 20 54 53 24
94CB AD3C I74192P:DW PP2
94CD 73 79 6E 63 DB 'sync.(ne v kaskade) obousmer. prog. BCD citac TP$'
94D1 2E 28 6E 65
94D5 20 76 20 6B
94D9 61 73 6B 61
94DD 64 65 29 20
94E1 6F 62 6F 75
94E5 73 6D 65 72
94E9 2E 20 70 72
94ED 6F 67 2E 20
94F1 42 43 44 20
94F5 63 69 74 61
94F9 63 20 54 50
94FD 24
94FE AD3C I74193P:DW PP2
9500 73 79 6E 63 DB 'sync.(ne v kaskade) obousmer. prog. BIN citac TP$'
9504 2E 28 6E 65
9508 20 76 20 6B
950C 61 73 6B 61
9510 64 65 29 20
9514 6F 62 6F 75
9518 73 6D 65 72
951C 2E 20 70 72
9520 6F 67 2E 20
9524 42 49 4E 20
9528 63 69 74 61
952C 63 20 54 50
9530 24
9531 AD3C I74194P:DW PP2
9533 34 62 69 74 DB '4bit. obousmer. posuv. registr se ser. a par. vstup, par. vystup TP$'
9537 2E 20 6F 62
953B 6F 75 73 6D
953F 65 72 2E 20
9543 70 6F 73 75
9547 76 2E 20 72
954B 65 67 69 73
954F 74 72 20 73
9553 65 20 73 65
9557 72 2E 20 61
955B 20 70 61 72
955F 2E 20 76 73
9563 74 75 70 2C
9567 20 70 61 72
956B 2E 20 76 79
956F 73 74 75 70
9573 20 54 50 24
9577 AD3C I74195P:DW PP2
PROGRAM IOT MACRO-80 3.44 09-Dec-81 PAGE 1-154
9579 34 62 69 74 DB '4bit. posuv. registr se ser. a par. vstup, par. vystup TP$'
957D 2E 20 70 6F
9581 73 75 76 2E
9585 20 72 65 67
9589 69 73 74 72
958D 20 73 65 20
9591 73 65 72 2E
9595 20 61 20 70
9599 61 72 2E 20
959D 76 73 74 75
95A1 70 2C 20 70
95A5 61 72 2E 20
95A9 76 79 73 74
95AD 75 70 20 54
95B1 50 24
95B3 AD67 I74198P:DW PP4
95B5 38 62 69 74 DB '8bit. posuv. obousmer. registr se ser. a par. vstup, par. vystup TP$'
95B9 2E 20 70 6F
95BD 73 75 76 2E
95C1 20 6F 62 6F
95C5 75 73 6D 65
95C9 72 2E 20 72
95CD 65 67 69 73
95D1 74 72 20 73
95D5 65 20 73 65
95D9 72 2E 20 61
95DD 20 70 61 72
95E1 2E 20 76 73
95E5 74 75 70 2C
95E9 20 70 61 72
95ED 2E 20 76 79
95F1 73 74 75 70
95F5 20 54 50 24
;I74225P:DW PP3
; DB 'FIFO registr 16x 5bit TS$'
95F9 AD51 I74240P:DW PP3
95FB 32 78 20 34 DB '2x 4bit. invert. budic sbernice TS$'
95FF 62 69 74 2E
9603 20 69 6E 76
9607 65 72 74 2E
960B 20 62 75 64
960F 69 63 20 73
9613 62 65 72 6E
9617 69 63 65 20
961B 54 53 24
961E AD51 I74241P:DW PP3
9620 32 78 20 34 DB '2x 4bit. budic sbernice TS$'
9624 62 69 74 2E
9628 20 62 75 64
962C 69 63 20 73
9630 62 65 72 6E
9634 69 63 65 20
9638 54 53 24
963B AD3C I74242P:DW PP2
963D 34 62 69 74 DB '4bit. prijimac/vysilac sbernice invert. TS$'
9641 2E 20 70 72
PROGRAM IOT MACRO-80 3.44 09-Dec-81 PAGE 1-155
9645 69 6A 69 6D
9649 61 63 2F 76
964D 79 73 69 6C
9651 61 63 20 73
9655 62 65 72 6E
9659 69 63 65 20
965D 69 6E 76 65
9661 72 74 2E 20
9665 54 53 24
9668 AD3C I74243P:DW PP2
966A 34 62 69 74 DB '4bit. prijimac/vysilac sbernice TS$'
966E 2E 20 70 72
9672 69 6A 69 6D
9676 61 63 2F 76
967A 79 73 69 6C
967E 61 63 20 73
9682 62 65 72 6E
9686 69 63 65 20
968A 54 53 24
968D AD51 I74244P:DW PP3
968F 38 78 20 62 DB '8x budic sbernice TS$'
9693 75 64 69 63
9697 20 73 62 65
969B 72 6E 69 63
969F 65 20 54 53
96A3 24
96A4 AD51 I74245P:DW PP3
96A6 38 78 20 76 DB '8x vysilac/prijimac sbernice TS$'
96AA 79 73 69 6C
96AE 61 63 2F 70
96B2 72 69 6A 69
96B6 6D 61 63 20
96BA 73 62 65 72
96BE 6E 69 63 65
96C2 20 54 53 24
96C6 AD3C I74247P:DW PP2
96C8 64 65 6B 2E DB 'dek. BCD/7 seg. SA 15V OC$'
96CC 20 42 43 44
96D0 2F 37 20 73
96D4 65 67 2E 20
96D8 53 41 20 31
96DC 35 56 20 4F
96E0 43 24
96E2 AD3C I74249P:DW PP2
96E4 64 65 6B 2E DB 'dek. BCD/7 seg. SA 5.5V OC$'
96E8 20 42 43 44
96EC 2F 37 20 73
96F0 65 67 2E 20
96F4 53 41 20 35
96F8 2E 35 56 20
96FC 4F 43 24
96FF AD3C I74251P:DW PP2
9701 38 6B 61 6E DB '8kanal. multiplexer TS$'
9705 61 6C 2E 20
9709 6D 75 6C 74
970D 69 70 6C 65
PROGRAM IOT MACRO-80 3.44 09-Dec-81 PAGE 1-156
9711 78 65 72 20
9715 54 53 24
9718 AD3C I74253P:DW PP2
971A 32 78 20 34 DB '2x 4vstup. multiplexer TS$'
971E 76 73 74 75
9722 70 2E 20 6D
9726 75 6C 74 69
972A 70 6C 65 78
972E 65 72 20 54
9732 53 24
9734 AD3C I74256P:DW PP2
9736 32 78 20 34 DB '2x 4bit adresovatelny stradac$'
973A 62 69 74 20
973E 61 64 72 65
9742 73 6F 76 61
9746 74 65 6C 6E
974A 79 20 73 74
974E 72 61 64 61
9752 63 24
9754 AD3C I74257P:DW PP2
9756 34 78 20 32 DB '4x 2vstup. multiplex TS$'
975A 76 73 74 75
975E 70 2E 20 6D
9762 75 6C 74 69
9766 70 6C 65 78
976A 20 54 53 24
976E AD3C I74258P:DW PP2
9770 34 78 20 32 DB '4x 2vstup. multiplex invert. TS$'
9774 76 73 74 75
9778 70 2E 20 6D
977C 75 6C 74 69
9780 70 6C 65 78
9784 20 69 6E 76
9788 65 72 74 2E
978C 20 54 53 24
9790 AD3C I74259P:DW PP2
9792 38 62 69 74 DB '8bit. adres. registr typu Latch TP$'
9796 2E 20 61 64
979A 72 65 73 2E
979E 20 72 65 67
97A2 69 73 74 72
97A6 20 74 79 70
97AA 75 20 4C 61
97AE 74 63 68 20
97B2 54 50 24
97B5 AD27 I74260P:DW PP1
97B7 32 78 20 35 DB '2x 5NOR TP$'
97BB 4E 4F 52 20
97BF 54 50 24
97C2 AD3C I74265P:DW PP2
97C4 32 58 20 32 DB '2X 2NAND + 2x invert. TP$'
97C8 4E 41 4E 44
97CC 20 2B 20 32
97D0 78 20 69 6E
97D4 76 65 72 74
97D8 2E 20 54 50
PROGRAM IOT MACRO-80 3.44 09-Dec-81 PAGE 1-157
97DC 24
97DD AD27 I74266P:DW PP1
97DF 34 78 20 32 DB '4x 2EX-NOR OC$'
97E3 45 58 2D 4E
97E7 4F 52 20 4F
97EB 43 24
97ED AD51 I74273P:DW PP3
97EF 38 62 69 74 DB '8bit. registr D s R TP$'
97F3 2E 20 72 65
97F7 67 69 73 74
97FB 72 20 44 20
97FF 73 20 52 20
9803 54 50 24
9806 AD51 I74276P:DW PP3
9808 34 78 20 4B DB '4x K.O. J-K se spolecnim SR TP$'
980C 2E 4F 2E 20
9810 4A 2D 4B 20
9814 73 65 20 73
9818 70 6F 6C 65
981C 63 6E 69 6D
9820 20 53 52 20
9824 54 50 24
9827 AD3C I74279P:DW PP2
9829 34 78 20 4B DB '4x K.O. R-S TP$'
982D 2E 4F 2E 20
9831 52 2D 53 20
9835 54 50 24
9838 AD3C I74283P:DW PP2
983A 34 62 69 74 DB '4bit. uplna scitacka TP$'
983E 2E 20 75 70
9842 6C 6E 61 20
9846 73 63 69 74
984A 61 63 6B 61
984E 20 54 50 24
9852 AD3C I74287P:DW PP2
9854 50 52 4F 4D DB 'PROM 256x4bity TS$'
9858 20 32 35 36
985C 78 34 62 69
9860 74 79 20 54
9864 53 24
9866 AD27 I74290P:DW PP1
9868 61 73 79 6E DB 'async. BCD citac TP$'
986C 63 2E 20 42
9870 43 44 20 63
9874 69 74 61 63
9878 20 54 50 24
;I74292P:DW PP2
; DB 'prog. 32bit. BIN citac/delic TP$'
987C AD27 I74293P:DW PP1
987E 34 62 69 74 DB '4bit. async. BIN citac TP$'
9882 2E 20 61 73
9886 79 6E 63 2E
988A 20 42 49 4E
988E 20 63 69 74
9892 61 63 20 54
9896 50 24
PROGRAM IOT MACRO-80 3.44 09-Dec-81 PAGE 1-158
9898 AD27 I74295P:DW PP1
989A 34 62 69 74 DB '4bit. posuv. reg. s par. vstup, vystup TS$'
989E 2E 20 70 6F
98A2 73 75 76 2E
98A6 20 72 65 67
98AA 2E 20 73 20
98AE 70 61 72 2E
98B2 20 76 73 74
98B6 75 70 2C 20
98BA 76 79 73 74
98BE 75 70 20 54
98C2 53 24
98C4 AD3C I74298P:DW PP2
98C6 34 78 20 32 DB '4x 2vstup. multiplex s pameti TP$'
98CA 76 73 74 75
98CE 70 2E 20 6D
98D2 75 6C 74 69
98D6 70 6C 65 78
98DA 20 73 20 70
98DE 61 6D 65 74
98E2 69 20 54 50
98E6 24
98E7 AD51 I74299P:DW PP3
98E9 38 62 69 74 DB '8bit. univers. posuv. reg. s R TS$'
98ED 2E 20 75 6E
98F1 69 76 65 72
98F5 73 2E 20 70
98F9 6F 73 75 76
98FD 2E 20 72 65
9901 67 2E 20 73
9905 20 52 20 54
9909 53 24
990B AD51 I74322P:DW PP3
990D 6B 61 73 6B DB 'kaskadovatelny 8bit. uni. posuv. registr se sinc. R a par. vstup. vystup. ser. vystup TS$'
9911 61 64 6F 76
9915 61 74 65 6C
9919 6E 79 20 38
991D 62 69 74 2E
9921 20 75 6E 69
9925 2E 20 70 6F
9929 73 75 76 2E
992D 20 72 65 67
9931 69 73 74 72
9935 20 73 65 20
9939 73 69 6E 63
993D 2E 20 52 20
9941 61 20 70 61
9945 72 2E 20 76
9949 73 74 75 70
994D 2E 20 76 79
9951 73 74 75 70
9955 2E 20 73 65
9959 72 2E 20 76
995D 79 73 74 75
9961 70 20 54 53
9965 24
PROGRAM IOT MACRO-80 3.44 09-Dec-81 PAGE 1-159
9966 AD3C I74348P:DW PP2
9968 38 76 73 74 DB '8vstup. prior. koder kaskada TS$'
996C 75 70 2E 20
9970 70 72 69 6F
9974 72 2E 20 6B
9978 6F 64 65 72
997C 20 6B 61 73
9980 6B 61 64 61
9984 20 54 53 24
9988 AD51 I74351P:DW PP3
998A 32 78 20 38 DB '2x 8vstup. multiplex invert. TS$'
998E 76 73 74 75
9992 70 2E 20 6D
9996 75 6C 74 69
999A 70 6C 65 78
999E 20 69 6E 76
99A2 65 72 74 2E
99A6 20 54 53 24
99AA AD3C I74352P:DW PP2
99AC 32 78 20 34 DB '2x 4vstup. multiplex invert. TP$'
99B0 76 73 74 75
99B4 70 2E 20 6D
99B8 75 6C 74 69
99BC 70 6C 65 78
99C0 20 69 6E 76
99C4 65 72 74 2E
99C8 20 54 50 24
99CC AD3C I74353P:DW PP2
99CE 32 78 20 34 DB '2x 4vstup. multiplex invert. TS$'
99D2 76 73 74 75
99D6 70 2E 20 6D
99DA 75 6C 74 69
99DE 70 6C 65 78
99E2 20 69 6E 76
99E6 65 72 74 2E
99EA 20 54 53 24
99EE AD51 I74363P:DW PP3
99F0 38 62 69 74 DB '8bit stradac (MOS uP interface) TP$'
99F4 20 73 74 72
99F8 61 64 61 63
99FC 20 28 4D 4F
9A00 53 20 75 50
9A04 20 69 6E 74
9A08 65 72 66 61
9A0C 63 65 29 20
9A10 54 50 24
9A13 AD3C I74365P:DW PP2
9A15 36 78 20 62 DB '6x budic sbernice TS$'
9A19 75 64 69 63
9A1D 20 73 62 65
9A21 72 6E 69 63
9A25 65 20 54 53
9A29 24
9A2A AD3C I74366P:DW PP2
9A2C 36 78 20 69 DB '6x invert. budic sbernice TS$'
9A30 6E 76 65 72
PROGRAM IOT MACRO-80 3.44 09-Dec-81 PAGE 1-160
9A34 74 2E 20 62
9A38 75 64 69 63
9A3C 20 73 62 65
9A40 72 6E 69 63
9A44 65 20 54 53
9A48 24
9A49 AD3C I74367P:DW PP2
9A4B 34 20 2B 20 DB '4 + 2bit. budic sbernice TS$'
9A4F 32 62 69 74
9A53 2E 20 62 75
9A57 64 69 63 20
9A5B 73 62 65 72
9A5F 6E 69 63 65
9A63 20 54 53 24
9A67 AD3C I74368P:DW PP2
9A69 34 20 2B 20 DB '4 + 2bit. invert. budic sbernice TS$'
9A6D 32 62 69 74
9A71 2E 20 69 6E
9A75 76 65 72 74
9A79 2E 20 62 75
9A7D 64 69 63 20
9A81 73 62 65 72
9A85 6E 69 63 65
9A89 20 54 53 24
9A8D AD51 I74373P:DW PP3
9A8F 38 62 69 74 DB '8bit. transparent. reg. D TS$'
9A93 2E 20 74 72
9A97 61 6E 73 70
9A9B 61 72 65 6E
9A9F 74 2E 20 72
9AA3 65 67 2E 20
9AA7 44 20 54 53
9AAB 24
9AAC AD51 I74374P:DW PP3
9AAE 38 62 69 74 DB '8bit. reg. D s hradlovanim TS$'
9AB2 2E 20 72 65
9AB6 67 2E 20 44
9ABA 20 73 20 68
9ABE 72 61 64 6C
9AC2 6F 76 61 6E
9AC6 69 6D 20 54
9ACA 53 24
9ACC AD51 I74377P:DW PP3
9ACE 38 62 69 74 DB '8bit. reg. D s hradlovanim TP$'
9AD2 2E 20 72 65
9AD6 67 2E 20 44
9ADA 20 73 20 68
9ADE 72 61 64 6C
9AE2 6F 76 61 6E
9AE6 69 6D 20 54
9AEA 50 24
9AEC AD3C I74378P:DW PP2
9AEE 36 62 69 74 DB '6bit. reg. D s hradlovanim TP$'
9AF2 2E 20 72 65
9AF6 67 2E 20 44
9AFA 20 73 20 68
PROGRAM IOT MACRO-80 3.44 09-Dec-81 PAGE 1-161
9AFE 72 61 64 6C
9B02 6F 76 61 6E
9B06 69 6D 20 54
9B0A 50 24
9B0C AD3C I74379P:DW PP2
9B0E 34 62 69 74 DB '4bit. reg. D s hradlovanim a komplement. vystupy TP$'
9B12 2E 20 72 65
9B16 67 2E 20 44
9B1A 20 73 20 68
9B1E 72 61 64 6C
9B22 6F 76 61 6E
9B26 69 6D 20 61
9B2A 20 6B 6F 6D
9B2E 70 6C 65 6D
9B32 65 6E 74 2E
9B36 20 76 79 73
9B3A 74 75 70 79
9B3E 20 54 50 24
9B42 AD3C I74390P:DW PP2
9B44 32 78 20 42 DB '2x BCD citac TP$'
9B48 43 44 20 63
9B4C 69 74 61 63
9B50 20 54 50 24
9B54 AD3C I74393P:DW PP2
9B56 32 78 20 42 DB '2x BIN citac TP$'
9B5A 49 4E 20 63
9B5E 69 74 61 63
9B62 20 54 50 24
9B66 AD3C I74395P:DW PP2
9B68 34 62 69 74 DB '4bit. posuvny reg. s par. a ser. vstup, vystup a R TS$'
9B6C 2E 20 70 6F
9B70 73 75 76 6E
9B74 79 20 72 65
9B78 67 2E 20 73
9B7C 20 70 61 72
9B80 2E 20 61 20
9B84 73 65 72 2E
9B88 20 76 73 74
9B8C 75 70 2C 20
9B90 76 79 73 74
9B94 75 70 20 61
9B98 20 52 20 54
9B9C 53 24
9B9E AD3C I74399P:DW PP2
9BA0 34 78 20 32 DB '4x 2vstup. multiplex s reg. TP$'
9BA4 76 73 74 75
9BA8 70 2E 20 6D
9BAC 75 6C 74 69
9BB0 70 6C 65 78
9BB4 20 73 20 72
9BB8 65 67 2E 20
9BBC 54 50 24
9BBF AD67 I74412P:DW PP4
9BC1 38 62 69 74 DB '8bit. multyfunkcni stradac TS$'
9BC5 2E 20 6D 75
9BC9 6C 74 79 66
PROGRAM IOT MACRO-80 3.44 09-Dec-81 PAGE 1-162
9BCD 75 6E 6B 63
9BD1 6E 69 20 73
9BD5 74 72 61 64
9BD9 61 63 20 54
9BDD 53 24
9BDF AD67 I74414P:DW PP4
9BE1 72 69 64 69 DB 'ridici obvod prior. prerus. OC$'
9BE5 63 69 20 6F
9BE9 62 76 6F 64
9BED 20 70 72 69
9BF1 6F 72 2E 20
9BF5 70 72 65 72
9BF9 75 73 2E 20
9BFD 4F 43 24
9C00 AD3C I74416P:DW PP2
9C02 34 62 69 74 DB '4bit. vysilac primac sbernice TS$'
9C06 2E 20 76 79
9C0A 73 69 6C 61
9C0E 63 20 70 72
9C12 69 6D 61 63
9C16 20 73 62 65
9C1A 72 6E 69 63
9C1E 65 20 54 53
9C22 24
9C23 AD3C I74426P:DW PP2
9C25 34 62 69 74 DB '4bit. invert. vysilac primac sbernice TS$'
9C29 2E 20 69 6E
9C2D 76 65 72 74
9C31 2E 20 76 79
9C35 73 69 6C 61
9C39 63 20 70 72
9C3D 69 6D 61 63
9C41 20 73 62 65
9C45 72 6E 69 63
9C49 65 20 54 53
9C4D 24
9C4E AD51 I74440P:DW PP3
9C50 34 78 20 70 DB '4x prepinac sbernice OC$'
9C54 72 65 70 69
9C58 6E 61 63 20
9C5C 73 62 65 72
9C60 6E 69 63 65
9C64 20 4F 43 24
9C68 AD51 I74441P:DW PP3
9C6A 34 78 20 69 DB '4x invert. prepinac sbernice OC$'
9C6E 6E 76 65 72
9C72 74 2E 20 70
9C76 72 65 70 69
9C7A 6E 61 63 20
9C7E 73 62 65 72
9C82 6E 69 63 65
9C86 20 4F 43 24
9C8A AD51 I74442P:DW PP3
9C8C 34 78 20 70 DB '4x prepinac sbernice TS$'
9C90 72 65 70 69
9C94 6E 61 63 20
PROGRAM IOT MACRO-80 3.44 09-Dec-81 PAGE 1-163
9C98 73 62 65 72
9C9C 6E 69 63 65
9CA0 20 54 53 24
9CA4 AD51 I74443P:DW PP3
9CA6 34 78 20 69 DB '4x invert. prepinac sbernice TS$'
9CAA 6E 76 65 72
9CAE 74 2E 20 70
9CB2 72 65 70 69
9CB6 6E 61 63 20
9CBA 73 62 65 72
9CBE 6E 69 63 65
9CC2 20 54 53 24
9CC6 AD51 I74444P:DW PP3
9CC8 34 78 20 69 DB '4x invert./neinvert. prepinac sbernice TS$'
9CCC 6E 76 65 72
9CD0 74 2E 2F 6E
9CD4 65 69 6E 76
9CD8 65 72 74 2E
9CDC 20 70 72 65
9CE0 70 69 6E 61
9CE4 63 20 73 62
9CE8 65 72 6E 69
9CEC 63 65 20 54
9CF0 53 24
9CF2 AD51 I74448P:DW PP3
9CF4 34 78 20 69 DB '4x invert./neinvert. prepinac sbernice OC$'
9CF8 6E 76 65 72
9CFC 74 2E 2F 6E
9D00 65 69 6E 76
9D04 65 72 74 2E
9D08 20 70 72 65
9D0C 70 69 6E 61
9D10 63 20 73 62
9D14 65 72 6E 69
9D18 63 65 20 4F
9D1C 43 24
9D1E AD67 I74461P:DW PP4
9D20 38 62 69 74 DB '8bit. synchroni BIN citac$'
9D24 2E 20 73 79
9D28 6E 63 68 72
9D2C 6F 6E 69 20
9D30 42 49 4E 20
9D34 63 69 74 61
9D38 63 24
9D3A AD51 I74482P:DW PP3
9D3C 38 58 20 73 DB '8X stradac budic sbernice TS$'
9D40 74 72 61 64
9D44 61 63 20 62
9D48 75 64 69 63
9D4C 20 73 62 65
9D50 72 6E 69 63
9D54 65 20 54 53
9D58 24
9D59 AD51 I74483P:DW PP3
9D5B 38 58 20 73 DB '8X stradac invert. budic sbernice TS$'
9D5F 74 72 61 64
PROGRAM IOT MACRO-80 3.44 09-Dec-81 PAGE 1-164
9D63 61 63 20 69
9D67 6E 76 65 72
9D6B 74 2E 20 62
9D6F 75 64 69 63
9D73 20 73 62 65
9D77 72 6E 69 63
9D7B 65 20 54 53
9D7F 24
9D80 AD51 I74487P:DW PP3
9D82 38 78 20 69 DB '8x invert. vysilac/prijimac sbernice TS$'
9D86 6E 76 65 72
9D8A 74 2E 20 76
9D8E 79 73 69 6C
9D92 61 63 2F 70
9D96 72 69 6A 69
9D9A 6D 61 63 20
9D9E 73 62 65 72
9DA2 6E 69 63 65
9DA6 20 54 53 24
9DAA AD51 I74518P:DW PP3
9DAC 38 62 69 74 DB '8bit. komparator s uvolnenim OC$'
9DB0 2E 20 6B 6F
9DB4 6D 70 61 72
9DB8 61 74 6F 72
9DBC 20 73 20 75
9DC0 76 6F 6C 6E
9DC4 65 6E 69 6D
9DC8 20 4F 43 24
9DCC AD51 I74520P:DW PP3
9DCE 38 62 69 74 DB '8bit. invert. komparator s uvolnenim TP$'
9DD2 2E 20 69 6E
9DD6 76 65 72 74
9DDA 2E 20 6B 6F
9DDE 6D 70 61 72
9DE2 61 74 6F 72
9DE6 20 73 20 75
9DEA 76 6F 6C 6E
9DEE 65 6E 69 6D
9DF2 20 54 50 24
9DF6 AD51 I74534P:DW PP3
9DF8 38 62 69 74 DB '8bit. invert. reg. D s hradlovanim TS$'
9DFC 2E 20 69 6E
9E00 76 65 72 74
9E04 2E 20 72 65
9E08 67 2E 20 44
9E0C 20 73 20 68
9E10 72 61 64 6C
9E14 6F 76 61 6E
9E18 69 6D 20 54
9E1C 53 24
9E1E AD51 I74540P:DW PP3
9E20 38 62 69 74 DB '8bit. invert. budic sbernice TS$'
9E24 2E 20 69 6E
9E28 76 65 72 74
9E2C 2E 20 62 75
9E30 64 69 63 20
PROGRAM IOT MACRO-80 3.44 09-Dec-81 PAGE 1-165
9E34 73 62 65 72
9E38 6E 69 63 65
9E3C 20 54 53 24
9E40 AD51 I74541P:DW PP3
9E42 38 62 69 74 DB '8bit. budic sbernice TS$'
9E46 2E 20 62 75
9E4A 64 69 63 20
9E4E 73 62 65 72
9E52 6E 69 63 65
9E56 20 54 53 24
;I74533P:
9E5A AD51 I74563P:DW PP3
9E5C 38 62 69 74 DB '8bit. invert. transparent. reg. D TS$'
9E60 2E 20 69 6E
9E64 76 65 72 74
9E68 2E 20 74 72
9E6C 61 6E 73 70
9E70 61 72 65 6E
9E74 74 2E 20 72
9E78 65 67 2E 20
9E7C 44 20 54 53
9E80 24
9E81 AD3C I74571P:DW PP2
9E83 50 52 4F 4D DB 'PROM 512x4bity TS$'
9E87 20 35 31 32
9E8B 78 34 62 69
9E8F 74 79 20 54
9E93 53 24
9E95 AD3C I74595P:DW PP2
9E97 38 62 69 74 DB '8bit. posuv. reg. s vystup. stradacem ser. vstup a para. vystup TS$'
9E9B 2E 20 70 6F
9E9F 73 75 76 2E
9EA3 20 72 65 67
9EA7 2E 20 73 20
9EAB 76 79 73 74
9EAF 75 70 2E 20
9EB3 73 74 72 61
9EB7 64 61 63 65
9EBB 6D 20 73 65
9EBF 72 2E 20 76
9EC3 73 74 75 70
9EC7 20 61 20 70
9ECB 61 72 61 2E
9ECF 20 76 79 73
9ED3 74 75 70 20
9ED7 54 53 24
9EDA AD3C I74596P:DW PP2
9EDC 38 62 69 74 DB '8bit. posuv. reg. s vystup. stradacem ser. vstup a para. vystup OC$'
9EE0 2E 20 70 6F
9EE4 73 75 76 2E
9EE8 20 72 65 67
9EEC 2E 20 73 20
9EF0 76 79 73 74
9EF4 75 70 2E 20
9EF8 73 74 72 61
9EFC 64 61 63 65
PROGRAM IOT MACRO-80 3.44 09-Dec-81 PAGE 1-166
9F00 6D 20 73 65
9F04 72 2E 20 76
9F08 73 74 75 70
9F0C 20 61 20 70
9F10 61 72 61 2E
9F14 20 76 79 73
9F18 74 75 70 20
9F1C 4F 43 24
9F1F AD51 I74638P:DW PP3
9F21 38 62 69 74 DB '8bit. invert. vysilac/primac sbrnice TC,OC$'
9F25 2E 20 69 6E
9F29 76 65 72 74
9F2D 2E 20 76 79
9F31 73 69 6C 61
9F35 63 2F 70 72
9F39 69 6D 61 63
9F3D 20 73 62 72
9F41 6E 69 63 65
9F45 20 54 43 2C
9F49 4F 43 24
9F4C AD51 I74639P:DW PP3
9F4E 38 62 69 74 DB '8bit. vysilac/primac sbrnice TC,OC$'
9F52 2E 20 76 79
9F56 73 69 6C 61
9F5A 63 2F 70 72
9F5E 69 6D 61 63
9F62 20 73 62 72
9F66 6E 69 63 65
9F6A 20 54 43 2C
9F6E 4F 43 24
9F71 AD51 I74640P:DW PP3
9F73 38 62 69 74 DB '8bit. invert. vysilac/primac sbrnice TS$'
9F77 2E 20 69 6E
9F7B 76 65 72 74
9F7F 2E 20 76 79
9F83 73 69 6C 61
9F87 63 2F 70 72
9F8B 69 6D 61 63
9F8F 20 73 62 72
9F93 6E 69 63 65
9F97 20 54 53 24
9F9B AD51 I74641P:DW PP3
9F9D 38 62 69 74 DB '8bit. vysilac/primac sbrnice OC$'
9FA1 2E 20 76 79
9FA5 73 69 6C 61
9FA9 63 2F 70 72
9FAD 69 6D 61 63
9FB1 20 73 62 72
9FB5 6E 69 63 65
9FB9 20 4F 43 24
9FBD AD51 I74642P:DW PP3
9FBF 38 62 69 74 DB '8bit. invert. vysilac/primac sbrnice OC$'
9FC3 2E 20 69 6E
9FC7 76 65 72 74
9FCB 2E 20 76 79
9FCF 73 69 6C 61
PROGRAM IOT MACRO-80 3.44 09-Dec-81 PAGE 1-167
9FD3 63 2F 70 72
9FD7 69 6D 61 63
9FDB 20 73 62 72
9FDF 6E 69 63 65
9FE3 20 4F 43 24
9FE7 AD51 I74643P:DW PP3
9FE9 38 62 69 74 DB '8bit. invert./neinvert. vysilac/primac sbrnice, TS$'
9FED 2E 20 69 6E
9FF1 76 65 72 74
9FF5 2E 2F 6E 65
9FF9 69 6E 76 65
9FFD 72 74 2E 20
A001 76 79 73 69
A005 6C 61 63 2F
A009 70 72 69 6D
A00D 61 63 20 73
A011 62 72 6E 69
A015 63 65 2C 20
A019 54 53 24
A01C AD51 I74644P:DW PP3
A01E 38 62 69 74 DB '8bit. invert./neinvert. vysilac/primac sbrnice OC$'
A022 2E 20 69 6E
A026 76 65 72 74
A02A 2E 2F 6E 65
A02E 69 6E 76 65
A032 72 74 2E 20
A036 76 79 73 69
A03A 6C 61 63 2F
A03E 70 72 69 6D
A042 61 63 20 73
A046 62 72 6E 69
A04A 63 65 20 4F
A04E 43 24
A050 AD67 I74646P:DW PP4
A052 38 62 69 74 DB '8bit. vysilac/primac s obousmer. reg. TS$'
A056 2E 20 76 79
A05A 73 69 6C 61
A05E 63 2F 70 72
A062 69 6D 61 63
A066 20 73 20 6F
A06A 62 6F 75 73
A06E 6D 65 72 2E
A072 20 72 65 67
A076 2E 20 54 53
A07A 24
A07B AD67 I74647P:DW PP4
A07D 38 62 69 74 DB '8bit. vysilac/primac s obousmer. reg. OC$'
A081 2E 20 76 79
A085 73 69 6C 61
A089 63 2F 70 72
A08D 69 6D 61 63
A091 20 73 20 6F
A095 62 6F 75 73
A099 6D 65 72 2E
A09D 20 72 65 67
A0A1 2E 20 4F 43
PROGRAM IOT MACRO-80 3.44 09-Dec-81 PAGE 1-168
A0A5 24
A0A6 AD67 I74648P:DW PP4
A0A8 38 62 69 74 DB '8bit. invert. vysilac/primac s obousmer. reg. TS$'
A0AC 2E 20 69 6E
A0B0 76 65 72 74
A0B4 2E 20 76 79
A0B8 73 69 6C 61
A0BC 63 2F 70 72
A0C0 69 6D 61 63
A0C4 20 73 20 6F
A0C8 62 6F 75 73
A0CC 6D 65 72 2E
A0D0 20 72 65 67
A0D4 2E 20 54 53
A0D8 24
A0D9 AD67 I74649P:DW PP4
A0DB 38 62 69 74 DB '8bit. invert. vysilac/primac s obousmer. reg. OC$'
A0DF 2E 20 69 6E
A0E3 76 65 72 74
A0E7 2E 20 76 79
A0EB 73 69 6C 61
A0EF 63 2F 70 72
A0F3 69 6D 61 63
A0F7 20 73 20 6F
A0FB 62 6F 75 73
A0FF 6D 65 72 2E
A103 20 72 65 67
A107 2E 20 4F 43
A10B 24
A10C AD67 I74651P:DW PP4
A10E 38 62 69 74 DB '8bit. invert. vysilac/primac sbrnice s reg. TS$'
A112 2E 20 69 6E
A116 76 65 72 74
A11A 2E 20 76 79
A11E 73 69 6C 61
A122 63 2F 70 72
A126 69 6D 61 63
A12A 20 73 62 72
A12E 6E 69 63 65
A132 20 73 20 72
A136 65 67 2E 20
A13A 54 53 24
A13D AD67 I74652P:DW PP4
A13F 38 62 69 74 DB '8bit. vysilac/primac sbrnice s reg. TS$'
A143 2E 20 76 79
A147 73 69 6C 61
A14B 63 2F 70 72
A14F 69 6D 61 63
A153 20 73 62 72
A157 6E 69 63 65
A15B 20 73 20 72
A15F 65 67 2E 20
A163 54 53 24
A166 AD67 I74653P:DW PP4
A168 38 62 69 74 DB '8bit. invert. vysilac/primac sbrnice s reg. TS,OC$'
A16C 2E 20 69 6E
PROGRAM IOT MACRO-80 3.44 09-Dec-81 PAGE 1-169
A170 76 65 72 74
A174 2E 20 76 79
A178 73 69 6C 61
A17C 63 2F 70 72
A180 69 6D 61 63
A184 20 73 62 72
A188 6E 69 63 65
A18C 20 73 20 72
A190 65 67 2E 20
A194 54 53 2C 4F
A198 43 24
A19A AD67 I74654P:DW PP4
A19C 38 62 69 74 DB '8bit. vysilac/primac sbrnice s reg. TS,OC$'
A1A0 2E 20 76 79
A1A4 73 69 6C 61
A1A8 63 2F 70 72
A1AC 69 6D 61 63
A1B0 20 73 62 72
A1B4 6E 69 63 65
A1B8 20 73 20 72
A1BC 65 67 2E 20
A1C0 54 53 2C 4F
A1C4 43 24
A1C6 AD3C I74670P:DW PP2
A1C8 52 41 4D 20 DB 'RAM 4x 4bit., reg. TS$'
A1CC 34 78 20 34
A1D0 62 69 74 2E
A1D4 2C 20 72 65
A1D8 67 2E 20 54
A1DC 53 24
A1DE AD67 I74673P:DW PP4
A1E0 31 36 62 69 DB '16bit posuvny registr s par vstupem a reg. TS$'
A1E4 74 20 70 6F
A1E8 73 75 76 6E
A1EC 79 20 72 65
A1F0 67 69 73 74
A1F4 72 20 73 20
A1F8 70 61 72 20
A1FC 76 73 74 75
A200 70 65 6D 20
A204 61 20 72 65
A208 67 2E 20 54
A20C 53 24
A20E AD67 I74674P:DW PP4
A210 31 36 62 69 DB '16bit posuvny registr s par. vstupem TS$'
A214 74 20 70 6F
A218 73 75 76 6E
A21C 79 20 72 65
A220 67 69 73 74
A224 72 20 73 20
A228 70 61 72 2E
A22C 20 76 73 74
A230 75 70 65 6D
A234 20 54 53 24
A238 AD51 I74690P:DW PP3
A23A 73 79 6E 63 DB 'sync. program. BCD citac s R a mux. vystup. reg. TS$'
PROGRAM IOT MACRO-80 3.44 09-Dec-81 PAGE 1-170
A23E 2E 20 70 72
A242 6F 67 72 61
A246 6D 2E 20 42
A24A 43 44 20 63
A24E 69 74 61 63
A252 20 73 20 52
A256 20 61 20 6D
A25A 75 78 2E 20
A25E 76 79 73 74
A262 75 70 2E 20
A266 72 65 67 2E
A26A 20 54 53 24
A26E AD51 I74691P:DW PP3
A270 73 79 6E 63 DB 'sync. program. BIN citac s R a mux. vystup. reg. TS$'
A274 2E 20 70 72
A278 6F 67 72 61
A27C 6D 2E 20 42
A280 49 4E 20 63
A284 69 74 61 63
A288 20 73 20 52
A28C 20 61 20 6D
A290 75 78 2E 20
A294 76 79 73 74
A298 75 70 2E 20
A29C 72 65 67 2E
A2A0 20 54 53 24
A2A4 AD51 I74692P:DW PP3
A2A6 73 79 6E 63 DB 'sync. program. BCD citac se sinc. R a mux. vystup. reg. TS$'
A2AA 2E 20 70 72
A2AE 6F 67 72 61
A2B2 6D 2E 20 42
A2B6 43 44 20 63
A2BA 69 74 61 63
A2BE 20 73 65 20
A2C2 73 69 6E 63
A2C6 2E 20 52 20
A2CA 61 20 6D 75
A2CE 78 2E 20 76
A2D2 79 73 74 75
A2D6 70 2E 20 72
A2DA 65 67 2E 20
A2DE 54 53 24
A2E1 AD51 I74693P:DW PP3
A2E3 73 79 6E 63 DB 'sync. program. BIN citac se sinc, R a mux. vystup. reg. TS$'
A2E7 2E 20 70 72
A2EB 6F 67 72 61
A2EF 6D 2E 20 42
A2F3 49 4E 20 63
A2F7 69 74 61 63
A2FB 20 73 65 20
A2FF 73 69 6E 63
A303 2C 20 52 20
A307 61 20 6D 75
A30B 78 2E 20 76
A30F 79 73 74 75
A313 70 2E 20 72
PROGRAM IOT MACRO-80 3.44 09-Dec-81 PAGE 1-171
A317 65 67 2E 20
A31B 54 53 24
A31E AD51 I74696P:DW PP3
A320 73 79 6E 63 DB 'sync. obousmer. BCD citac program. a mux. vystup. reg. TS$'
A324 2E 20 6F 62
A328 6F 75 73 6D
A32C 65 72 2E 20
A330 42 43 44 20
A334 63 69 74 61
A338 63 20 70 72
A33C 6F 67 72 61
A340 6D 2E 20 61
A344 20 6D 75 78
A348 2E 20 76 79
A34C 73 74 75 70
A350 2E 20 72 65
A354 67 2E 20 54
A358 53 24
A35A AD51 I74697P:DW PP3
A35C 73 79 6E 63 DB 'sync. obousmer. BIN citac program. a mux. vystup. reg. TS$'
A360 2E 20 6F 62
A364 6F 75 73 6D
A368 65 72 2E 20
A36C 42 49 4E 20
A370 63 69 74 61
A374 63 20 70 72
A378 6F 67 72 61
A37C 6D 2E 20 61
A380 20 6D 75 78
A384 2E 20 76 79
A388 73 74 75 70
A38C 2E 20 72 65
A390 67 2E 20 54
A394 53 24
A396 AD51 I74698P:DW PP3
A398 73 79 6E 63 DB 'sync. obousmer. BCD citac program. se sinc, R a mux. vystup. reg. TS$'
A39C 2E 20 6F 62
A3A0 6F 75 73 6D
A3A4 65 72 2E 20
A3A8 42 43 44 20
A3AC 63 69 74 61
A3B0 63 20 70 72
A3B4 6F 67 72 61
A3B8 6D 2E 20 73
A3BC 65 20 73 69
A3C0 6E 63 2C 20
A3C4 52 20 61 20
A3C8 6D 75 78 2E
A3CC 20 76 79 73
A3D0 74 75 70 2E
A3D4 20 72 65 67
A3D8 2E 20 54 53
A3DC 24
A3DD AD51 I74699P:DW PP3
A3DF 73 79 6E 63 DB 'sync. obousmer. BIN citac program. se sinc, R a mux. vystup. reg. TS$'
A3E3 2E 20 6F 62
PROGRAM IOT MACRO-80 3.44 09-Dec-81 PAGE 1-172
A3E7 6F 75 73 6D
A3EB 65 72 2E 20
A3EF 42 49 4E 20
A3F3 63 69 74 61
A3F7 63 20 70 72
A3FB 6F 67 72 61
A3FF 6D 2E 20 73
A403 65 20 73 69
A407 6E 63 2C 20
A40B 52 20 61 20
A40F 6D 75 78 2E
A413 20 76 79 73
A417 74 75 70 2E
A41B 20 72 65 67
A41F 2E 20 54 53
A423 24
A424 AD51 I74794P:DW PP3
A426 38 62 69 74 DB '8bit. reg TP, zpetny budic TS$'
A42A 2E 20 72 65
A42E 67 20 54 50
A432 2C 20 7A 70
A436 65 74 6E 79
A43A 20 62 75 64
A43E 69 63 20 54
A442 53 24
A444 AD67 I74821P:DW PP4
A446 31 30 62 69 DB '10bit. reg. D budic sbernice TS$'
A44A 74 2E 20 72
A44E 65 67 2E 20
A452 44 20 62 75
A456 64 69 63 20
A45A 73 62 65 72
A45E 6E 69 63 65
A462 20 54 53 24
A466 AD67 I74827P:DW PP4
A468 31 30 62 69 DB '10bit. budic sbernice TS$'
A46C 74 2E 20 62
A470 75 64 69 63
A474 20 73 62 65
A478 72 6E 69 63
A47C 65 20 54 53
A480 24
A481 AD67 I74828P:DW PP4
A483 31 30 62 69 DB '10bit. invert. budic sbernice TS$'
A487 74 2E 20 69
A48B 6E 76 65 72
A48F 74 2E 20 62
A493 75 64 69 63
A497 20 73 62 65
A49B 72 6E 69 63
A49F 65 20 54 53
A4A3 24
A4A4 AD67 I74841P:DW PP4
A4A6 31 30 62 69 DB '10bit. transparent. stradac D TS$'
A4AA 74 2E 20 74
A4AE 72 61 6E 73
PROGRAM IOT MACRO-80 3.44 09-Dec-81 PAGE 1-173
A4B2 70 61 72 65
A4B6 6E 74 2E 20
A4BA 73 74 72 61
A4BE 64 61 63 20
A4C2 44 20 54 53
A4C6 24
A4C7 AD67 I74873P:DW PP4
A4C9 32 78 20 34 DB '2x 4bit. stradac D transparent. a R TS$'
A4CD 62 69 74 2E
A4D1 20 73 74 72
A4D5 61 64 61 63
A4D9 20 44 20 74
A4DD 72 61 6E 73
A4E1 70 61 72 65
A4E5 6E 74 2E 20
A4E9 61 20 52 20
A4ED 54 53 24
A4F0 AD67 I74874P:DW PP4
A4F2 32 78 20 34 DB '2x 4bit. reg. D a reset TS$'
A4F6 62 69 74 2E
A4FA 20 72 65 67
A4FE 2E 20 44 20
A502 61 20 72 65
A506 73 65 74 20
A50A 54 53 24
A50D AD27 I71004P:DW PP1
A50F 36 78 20 69 DB '6x invert. budic TP$'
A513 6E 76 65 72
A517 74 2E 20 62
A51B 75 64 69 63
A51F 20 54 50 24
A523 AD27 I71005P:DW PP1
A525 36 78 20 69 DB '6x invert. oddelonac OC$'
A529 6E 76 65 72
A52D 74 2E 20 6F
A531 64 64 65 6C
A535 6F 6E 61 63
A539 20 4F 43 24
A53D AD3C ID345P: DW PP2
A53F 64 65 6B 2E DB 'dek. HEX/7 seg. SA 15V OC$'
A543 20 48 45 58
A547 2F 37 20 73
A54B 65 67 2E 20
A54F 53 41 20 31
A553 35 56 20 4F
A557 43 24
A559 AD3C ID346P: DW PP2
A55B 64 65 6B 2E DB 'dek. HEX/7 seg. SA 15V rizeni jasu OC s R_346/8$'
A55F 20 48 45 58
A563 2F 37 20 73
A567 65 67 2E 20
A56B 53 41 20 31
A56F 35 56 20 72
A573 69 7A 65 6E
A577 69 20 6A 61
A57B 73 75 20 4F
PROGRAM IOT MACRO-80 3.44 09-Dec-81 PAGE 1-174
A57F 43 20 73 20
A583 52 5F 33 34
A587 36 2F 38 24
A58B AD3C ID347P: DW PP2
A58D 64 65 6B 2E DB 'dek. BCD, EUdcA/7 seg. SA 15V OC$'
A591 20 42 43 44
A595 2C 20 45 55
A599 64 63 41 2F
A59D 37 20 73 65
A5A1 67 2E 20 53
A5A5 41 20 31 35
A5A9 56 20 4F 43
A5AD 24
A5AE AD3C ID348P: DW PP2
A5B0 64 65 6B 2E DB 'dek. BCD, EUdcA/7 seg. SA 15V rizeni jasu OC s R_346/8$'
A5B4 20 42 43 44
A5B8 2C 20 45 55
A5BC 64 63 41 2F
A5C0 37 20 73 65
A5C4 67 2E 20 53
A5C8 41 20 31 35
A5CC 56 20 20 72
A5D0 69 7A 65 6E
A5D4 69 20 6A 61
A5D8 73 75 20 4F
A5DC 43 20 73 20
A5E0 52 5F 33 34
A5E4 36 2F 38 24
A5E8 AD67 I8243P: DW PP4
A5EA 65 78 70 61 DB 'expander pro rozsireni vstup./vystup.$'
A5EE 6E 64 65 72
A5F2 20 70 72 6F
A5F6 20 72 6F 7A
A5FA 73 69 72 65
A5FE 6E 69 20 76
A602 73 74 75 70
A606 2E 2F 76 79
A60A 73 74 75 70
A60E 2E 24
;===============================
;POPISY IO CMOS
;===============================
A610 AD27 I4000P: DW PP1
A612 32 78 20 33 DB '2x 3NOR + invert.$'
A616 4E 4F 52 20
A61A 2B 20 69 6E
A61E 76 65 72 74
A622 2E 24
A624 AD27 I4001P: DW PP1
A626 34 78 20 32 DB '4x 2NOR$'
A62A 4E 4F 52 24
A62E AD27 I4002P: DW PP1
A630 32 78 20 34 DB '2x 4NOR$'
A634 4E 4F 52 24
A638 AD27 I4011P: DW PP1
A63A 34 78 20 32 DB '4x 2NAND$'
PROGRAM IOT MACRO-80 3.44 09-Dec-81 PAGE 1-175
A63E 4E 41 4E 44
A642 24
A643 AD27 I4012P: DW PP1
A645 32 78 20 34 DB '2x 4NAND$'
A649 4E 41 4E 44
A64D 24
A64E AD27 I4013P: DW PP1
A650 32 58 20 4B DB '2X K.O. D s SR$'
A654 2E 4F 2E 20
A658 44 20 73 20
A65C 53 52 24
A65F AD3C I4015P: DW PP2
A661 32 78 20 34 DB '2x 4bit. posuv. reg. s ser. vstupem, par. vystup, R$'
A665 62 69 74 2E
A669 20 70 6F 73
A66D 75 76 2E 20
A671 72 65 67 2E
A675 20 73 20 73
A679 65 72 2E 20
A67D 76 73 74 75
A681 70 65 6D 2C
A685 20 70 61 72
A689 2E 20 76 79
A68D 73 74 75 70
A691 2C 20 52 24
A695 AD3C I4017P: DW PP2
A697 31 30 73 74 DB '10stupnovy johonson. citac$'
A69B 75 70 6E 6F
A69F 76 79 20 6A
A6A3 6F 68 6F 6E
A6A7 73 6F 6E 2E
A6AB 20 63 69 74
A6AF 61 63 24
A6B2 AD3C I4020P: DW PP2
A6B4 31 34 62 69 DB '14bit. BIN citac (Q0,Q3-Q13)$'
A6B8 74 2E 20 42
A6BC 49 4E 20 63
A6C0 69 74 61 63
A6C4 20 28 51 30
A6C8 2C 51 33 2D
A6CC 51 31 33 29
A6D0 24
A6D1 AD3C I4021P: DW PP2
A6D3 38 62 69 74 DB '8bit. posuv. reg. s par. a ser. vstupem, ser. vystup(Q5-7)$'
A6D7 2E 20 70 6F
A6DB 73 75 76 2E
A6DF 20 72 65 67
A6E3 2E 20 73 20
A6E7 70 61 72 2E
A6EB 20 20 61 20
A6EF 73 65 72 2E
A6F3 20 76 73 74
A6F7 75 70 65 6D
A6FB 2C 20 73 65
A6FF 72 2E 20 76
A703 79 73 74 75
PROGRAM IOT MACRO-80 3.44 09-Dec-81 PAGE 1-176
A707 70 28 51 35
A70B 2D 37 29 24
A70F AD27 I4023P: DW PP1
A711 33 78 20 33 DB '3x 3NAND$'
A715 4E 41 4E 44
A719 24
A71A AD27 I4024P: DW PP1
A71C 37 62 69 74 DB '7bit. BIN citac$'
A720 2E 20 42 49
A724 4E 20 63 69
A728 74 61 63 24
A72C AD27 I4025P: DW PP1
A72E 33 78 20 33 DB '3x 3NOR$'
A732 4E 4F 52 24
A736 AD3C I4027P: DW PP2
A738 32 78 20 4B DB '2x K.O. J-K s SR$'
A73C 2E 4F 2E 20
A740 4A 2D 4B 20
A744 73 20 53 52
A748 24
A749 AD3C I4028P: DW PP2
A74B 34 62 69 74 DB '4bit dekoder 1 z 10$'
A74F 20 64 65 6B
A753 6F 64 65 72
A757 20 31 20 7A
A75B 20 31 30 24
A75F AD3C I4029P: DW PP2
A761 34 62 69 74 DB '4bit BIN/BCD sync. vrat. citac$'
A765 20 42 49 4E
A769 2F 42 43 44
A76D 20 73 79 6E
A771 63 2E 20 76
A775 72 61 74 2E
A779 20 63 69 74
A77D 61 63 24
A780 AD27 I4030P: DW PP1
A782 34 78 20 32 DB '4x 2EX-OR$'
A786 45 58 2D 4F
A78A 52 24
A78C AD3C I4032P: DW PP2
A78E 33 78 20 73 DB '3x ser. scitacka$'
A792 65 72 2E 20
A796 73 63 69 74
A79A 61 63 6B 61
A79E 24
A79F AD67 I4034P: DW PP4
A7A1 38 62 69 74 DB '8bit obosmerny posuv. R se ser. a par. VV$'
A7A5 20 6F 62 6F
A7A9 73 6D 65 72
A7AD 6E 79 20 70
A7B1 6F 73 75 76
A7B5 2E 20 52 20
A7B9 73 65 20 73
A7BD 65 72 2E 20
A7C1 61 20 70 61
A7C5 72 2E 20 56
PROGRAM IOT MACRO-80 3.44 09-Dec-81 PAGE 1-177
A7C9 56 24
A7CB AD3C I4035P: DW PP2
A7CD 34 62 69 74 DB '4bit posuvny R s par. VV$'
A7D1 20 70 6F 73
A7D5 75 76 6E 79
A7D9 20 52 20 73
A7DD 20 70 61 72
A7E1 2E 20 56 56
A7E5 24
A7E6 AD3C I4040P: DW PP2
A7E8 31 32 62 69 DB '12bit. BIN citac$'
A7EC 74 2E 20 42
A7F0 49 4E 20 63
A7F4 69 74 61 63
A7F8 24
A7F9 AD3C I4042P: DW PP2
A7FB 34 62 69 74 DB '4bit. stradc$'
A7FF 2E 20 73 74
A803 72 61 64 63
A807 24
A808 AD3C I4043P: DW PP2
A80A 34 62 69 74 DB '4bit. stradac RS TS$'
A80E 2E 20 73 74
A812 72 61 64 61
A816 63 20 52 53
A81A 20 54 53 24
A81E AD3C I4048P: DW PP2
A820 38 76 73 74 DB '8vstup. hradlo s program. funkci$'
A824 75 70 2E 20
A828 68 72 61 64
A82C 6C 6F 20 73
A830 20 70 72 6F
A834 67 72 61 6D
A838 2E 20 66 75
A83C 6E 6B 63 69
A840 24
A841 AD3C I4063P: DW PP2
A843 34 62 69 74 DB '4bit. komparator$'
A847 2E 20 6B 6F
A84B 6D 70 61 72
A84F 61 74 6F 72
A853 24
A854 AD27 I4068P: DW PP1
A856 38 4E 41 4E DB '8NAND-AND$'
A85A 44 2D 41 4E
A85E 44 24
A860 AD27 I4068PA:DW PP1
A862 38 4E 41 4E DB '8NAND$'
A866 44 24
A868 AD27 I4069P: DW PP1
A86A 36 78 20 69 DB '6x inver.$'
A86E 6E 76 65 72
A872 2E 24
A874 AD27 I4071P: DW PP1
A876 34 78 20 32 DB '4x 2OR$'
A87A 4F 52 24
PROGRAM IOT MACRO-80 3.44 09-Dec-81 PAGE 1-178
A87D AD27 I4072P: DW PP1
A87F 32 78 20 34 DB '2x 4OR$'
A883 4F 52 24
A886 AD27 I4073P: DW PP1
A888 33 78 20 33 DB '3x 3AND$'
A88C 41 4E 44 24
A890 AD27 I4075P: DW PP1
A892 33 78 20 33 DB '3x 3OR$'
A896 4F 52 24
A899 AD3C I4076P: DW PP2
A89B 34 78 20 4B DB '4x K.O. D TS$'
A89F 2E 4F 2E 20
A8A3 44 20 54 53
A8A7 24
A8A8 AD27 I4077P: DW PP1
A8AA 34 78 20 32 DB '4x 2EX-NOR$'
A8AE 45 58 2D 4E
A8B2 4F 52 24
A8B5 AD27 I4078P: DW PP1
A8B7 38 4E 4F 52 DB '8NOR-OR$'
A8BB 2D 4F 52 24
A8BF AD27 I4078PA:DW PP1
A8C1 38 4E 4F 52 DB '8NOR$'
A8C5 24
A8C6 AD27 I4081P: DW PP1
A8C8 34 78 20 32 DB '4x 2AND$'
A8CC 41 4E 44 24
A8D0 AD27 I4082P: DW PP1
A8D2 32 78 20 34 DB '2x 4AND$'
A8D6 41 4E 44 24
A8DA AD27 I4093P: DW PP1
A8DC 34 78 20 32 DB '4x 2NAND Schmitt. NAND$'
A8E0 4E 41 4E 44
A8E4 20 53 63 68
A8E8 6D 69 74 74
A8EC 2E 20 4E 41
A8F0 4E 44 24
A8F3 AD3C I4094P: DW PP2
A8F5 38 62 69 74 DB '8bit. posuv. reg. se stradcem par. vystupem TS$'
A8F9 2E 20 70 6F
A8FD 73 75 76 2E
A901 20 72 65 67
A905 2E 20 73 65
A909 20 73 74 72
A90D 61 64 63 65
A911 6D 20 70 61
A915 72 2E 20 76
A919 79 73 74 75
A91D 70 65 6D 20
A921 54 53 24
A924 AD27 I4095P: DW PP1
A926 4B 2E 4F 2E DB 'K.O. J-K s SR$'
A92A 20 4A 2D 4B
A92E 20 73 20 53
A932 52 24
A934 AD3C I4099P: DW PP2
PROGRAM IOT MACRO-80 3.44 09-Dec-81 PAGE 1-179
A936 38 62 69 74 DB '8bit. stradac (adresonatelna pamet)$'
A93A 2E 20 73 74
A93E 72 61 64 61
A942 63 20 28 61
A946 64 72 65 73
A94A 6F 6E 61 74
A94E 65 6C 6E 61
A952 20 70 61 6D
A956 65 74 29 24
A95A AD3C I4311P: DW PP2
A95C 64 65 6B 2E DB 'dek. BIN/7seg. se stradac. ITRON SK$'
A960 20 42 49 4E
A964 2F 37 73 65
A968 67 2E 20 73
A96C 65 20 73 74
A970 72 61 64 61
A974 63 2E 20 49
A978 54 52 4F 4E
A97C 20 53 4B 24
A980 AD3C I4502P: DW PP2
A982 36 78 20 73 DB '6x strob. invert. odelovac TS$'
A986 74 72 6F 62
A98A 2E 20 69 6E
A98E 76 65 72 74
A992 2E 20 6F 64
A996 65 6C 6F 76
A99A 61 63 20 54
A99E 53 24
A9A0 AD3C I4511P: DW PP2
A9A2 64 65 6B 2E DB 'dek. BCD/7 seg. se stradac. ITRON sK$'
A9A6 20 42 43 44
A9AA 2F 37 20 73
A9AE 65 67 2E 20
A9B2 73 65 20 73
A9B6 74 72 61 64
A9BA 61 63 2E 20
A9BE 49 54 52 4F
A9C2 4E 20 73 4B
A9C6 24
A9C7 AD3C I4512P: DW PP2
A9C9 38 76 73 74 DB '8vstup. multiplex TS$'
A9CD 75 70 2E 20
A9D1 6D 75 6C 74
A9D5 69 70 6C 65
A9D9 78 20 54 53
A9DD 24
A9DE AD67 I4515P: DW PP4
A9E0 64 65 6B 6F DB 'dekoder 1 z 16 se stradacem$'
A9E4 64 65 72 20
A9E8 31 20 7A 20
A9EC 31 36 20 73
A9F0 65 20 73 74
A9F4 72 61 64 61
A9F8 63 65 6D 24
A9FC AD3C I4516P: DW PP2
A9FE 73 79 6E 63 DB 'sync. vratny prog. BIN citac$'
PROGRAM IOT MACRO-80 3.44 09-Dec-81 PAGE 1-180
AA02 2E 20 76 72
AA06 61 74 6E 79
AA0A 20 70 72 6F
AA0E 67 2E 20 42
AA12 49 4E 20 63
AA16 69 74 61 63
AA1A 24
AA1B AD3C I4518P: DW PP2
AA1D 32 78 20 42 DB '2x BCD citac$'
AA21 43 44 20 63
AA25 69 74 61 63
AA29 24
AA2A AD3C I4520P: DW PP2
AA2C 32 78 20 42 DB '2x BIN citac$'
AA30 49 4E 20 63
AA34 69 74 61 63
AA38 24
AA39 AD3C I4531P: DW PP2
AA3B 31 32 62 69 DB '12bit. rener. parity$'
AA3F 74 2E 20 72
AA43 65 6E 65 72
AA47 2E 20 70 61
AA4B 72 69 74 79
AA4F 24
AA50 AD3C I4532P: DW PP2
AA52 38 76 73 74 DB '8vstup. prioritni koder$'
AA56 75 70 2E 20
AA5A 70 72 69 6F
AA5E 72 69 74 6E
AA62 69 20 6B 6F
AA66 64 65 72 24
AA6A AD3C I4543P: DW PP2
AA6C 64 65 6B 2E DB 'dek. BCD/7 seg. se stradac. LCD LED SK/A$'
AA70 20 42 43 44
AA74 2F 37 20 73
AA78 65 67 2E 20
AA7C 73 65 20 73
AA80 74 72 61 64
AA84 61 63 2E 20
AA88 4C 43 44 20
AA8C 4C 45 44 20
AA90 53 4B 2F 41
AA94 24
AA95 AD3C I4555P: DW PP2
AA97 32 78 20 64 DB '2x dekoder 1 ze 4 H$'
AA9B 65 6B 6F 64
AA9F 65 72 20 31
AAA3 20 7A 65 20
AAA7 34 20 48 24
AAAB AD3C I4556P: DW PP2
AAAD 32 78 20 64 DB '2x dekoder 1 ze 4 L$'
AAB1 65 6B 6F 64
AAB5 65 72 20 31
AAB9 20 7A 65 20
AABD 34 20 4C 24
AAC1 AD3C I4560P: DW PP2
PROGRAM IOT MACRO-80 3.44 09-Dec-81 PAGE 1-181
AAC3 70 61 72 61 DB 'paralerni BCD scitacka$'
AAC7 6C 65 72 6E
AACB 69 20 42 43
AACF 44 20 73 63
AAD3 69 74 61 63
AAD7 6B 61 24
AADA AD67 I4581P: DW PP4
AADC 34 62 69 74 DB '4bit. ALU$'
AAE0 2E 20 41 4C
AAE4 55 24
AAE6 AD3C I4582P: DW PP2
AAE8 34 62 69 74 DB '4bit. obvod pro urychleni prenosu$'
AAEC 2E 20 6F 62
AAF0 76 6F 64 20
AAF4 70 72 6F 20
AAF8 75 72 79 63
AAFC 68 6C 65 6E
AB00 69 20 70 72
AB04 65 6E 6F 73
AB08 75 24
AB0A AD27 I40106P:DW PP1
AB0C 36 78 20 73 DB '6x schmitt invert.$'
AB10 63 68 6D 69
AB14 74 74 20 69
AB18 6E 76 65 72
AB1C 74 2E 24
;===============================
;POPISY OSTATNI IO A 75XXX
;===============================
AB1F AD3C I8641P: DW PP2
AB21 34 78 20 76 DB '4x vysilac/primac sbrnice (GPIB)$'
AB25 79 73 69 6C
AB29 61 63 2F 70
AB2D 72 69 6D 61
AB31 63 20 73 62
AB35 72 6E 69 63
AB39 65 20 28 47
AB3D 50 49 42 29
AB41 24
AB42 AD3C I1502P: DW PP2
AB44 61 70 72 6F DB 'aproximacni registr 8bit.$'
AB48 78 69 6D 61
AB4C 63 6E 69 20
AB50 72 65 67 69
AB54 73 74 72 20
AB58 38 62 69 74
AB5C 2E 24
AB5E AD67 I1504P: DW PP4
AB60 61 70 72 6F DB 'aproximacni registr 12bit.$'
AB64 78 69 6D 61
AB68 63 6E 69 20
AB6C 72 65 67 69
AB70 73 74 72 20
AB74 31 32 62 69
AB78 74 2E 24
AB7B AD3C I8T23P: DW PP2
PROGRAM IOT MACRO-80 3.44 09-Dec-81 PAGE 1-182
AB7D 32 58 20 6C DB '2X linkovy vysilac (IBM 360/370) s R75123$'
AB81 69 6E 6B 6F
AB85 76 79 20 76
AB89 79 73 69 6C
AB8D 61 63 20 28
AB91 49 42 4D 20
AB95 33 36 30 2F
AB99 33 37 30 29
AB9D 20 73 20 52
ABA1 37 35 31 32
ABA5 33 24
ABA7 AD3C I8T24P: DW PP2
ABA9 33 78 20 6C DB '3x linkovy primac (IBM 360/370)$'
ABAD 69 6E 6B 6F
ABB1 76 79 20 70
ABB5 72 69 6D 61
ABB9 63 20 28 49
ABBD 42 4D 20 33
ABC1 36 30 2F 33
ABC5 37 30 29 24
ABC9 AD51 I75160P:DW PP3
ABCB 38 78 20 76 DB '8x vysilac/primac dat. sbrnice (GPIB)$'
ABCF 79 73 69 6C
ABD3 61 63 2F 70
ABD7 72 69 6D 61
ABDB 63 20 64 61
ABDF 74 2E 20 73
ABE3 62 72 6E 69
ABE7 63 65 20 28
ABEB 47 50 49 42
ABEF 29 24
ABF1 AD51 I75161P:DW PP3
ABF3 38 78 20 76 DB '8x vysilac/primac ridici sbernice (pristroj GPIB)$'
ABF7 79 73 69 6C
ABFB 61 63 2F 70
ABFF 72 69 6D 61
AC03 63 20 72 69
AC07 64 69 63 69
AC0B 20 73 62 65
AC0F 72 6E 69 63
AC13 65 20 28 70
AC17 72 69 73 74
AC1B 72 6F 6A 20
AC1F 47 50 49 42
AC23 29 24
AC25 AD67 I75162P:DW PP4
AC27 38 78 20 76 DB '8x vysilac/primac ridici sbernice (radic GPIB)$'
AC2B 79 73 69 6C
AC2F 61 63 2F 70
AC33 72 69 6D 61
AC37 63 20 72 69
AC3B 64 69 63 69
AC3F 20 73 62 65
AC43 72 6E 69 63
AC47 65 20 28 72
AC4B 61 64 69 63
PROGRAM IOT MACRO-80 3.44 09-Dec-81 PAGE 1-183
AC4F 20 47 50 49
AC53 42 29 24
AC56 AE10 I75162R:DW PP12
AC58 38 78 20 76 DB '8x vysilac/primac ridici sbernice (radic GPIB) s R75162$'
AC5C 79 73 69 6C
AC60 61 63 2F 70
AC64 72 69 6D 61
AC68 63 20 72 69
AC6C 64 69 63 69
AC70 20 73 62 65
AC74 72 6E 69 63
AC78 65 20 28 72
AC7C 61 64 69 63
AC80 20 47 50 49
AC84 42 29 20 73
AC88 20 52 37 35
AC8C 31 36 32 24
AC90 AD67 I25S05P:DW PP4
AC92 6E 61 73 6F DB 'nasobicka 4x2 bitu$'
AC96 62 69 63 6B
AC9A 61 20 34 78
AC9E 32 20 62 69
ACA2 74 75 24
ACA5 AD27 ID351P: DW PP1
ACA7 64 65 6C 69 DB 'delic kmitocu pro D355D/E355D$'
ACAB 63 20 6B 6D
ACAF 69 74 6F 63
ACB3 75 20 70 72
ACB7 6F 20 44 33
ACBB 35 35 44 2F
ACBF 45 33 35 35
ACC3 44 24
;===============================
;POPISI TESTU TESTERU IO
;===============================
ACC5 AD67 ITEST1P:DW PP4
ACC7 54 65 73 74 DB 'Test prevazne BWP-1$'
ACCB 20 70 72 65
ACCF 76 61 7A 6E
ACD3 65 20 42 57
ACD7 50 2D 31 24
ACDB AE26 ITEST2P:DW PPX
ACDD 54 65 73 74 DB 'Test prevazne DTO-1 ZIF28 s R_TEST1$'
ACE1 20 70 72 65
ACE5 76 61 7A 6E
ACE9 65 20 44 54
ACED 4F 2D 31 20
ACF1 5A 49 46 32
ACF5 38 20 73 20
ACF9 52 5F 54 45
ACFD 53 54 31 24
AD01 AE26 ITEST3P:DW PPX
AD03 54 65 73 74 DB 'Test prevazne DTO-1 ZIF16 s R_TEST2$'
AD07 20 70 72 65
AD0B 76 61 7A 6E
AD0F 65 20 44 54
PROGRAM IOT MACRO-80 3.44 09-Dec-81 PAGE 1-184
AD13 4F 2D 31 20
AD17 5A 49 46 31
AD1B 36 20 73 20
AD1F 52 5F 54 45
AD23 53 54 32 24
;===============================
;POPISY POUZDRO, NAPAJENI
AD27 44 49 4C 31 PP1: DB 'DIL14 GND=7, VCC=14$'
AD2B 34 20 20 47
AD2F 4E 44 3D 37
AD33 2C 20 56 43
AD37 43 3D 31 34
AD3B 24
AD3C 44 49 4C 31 PP2: DB 'DIL16 GND=8, VCC=16$'
AD40 36 20 20 47
AD44 4E 44 3D 38
AD48 2C 20 56 43
AD4C 43 3D 31 36
AD50 24
AD51 44 49 4C 32 PP3: DB 'DIL20 GND=10, VCC=20$'
AD55 30 20 20 47
AD59 4E 44 3D 31
AD5D 30 2C 20 56
AD61 43 43 3D 32
AD65 30 24
AD67 44 49 4C 32 PP4: DB 'DIL24 GND=12, VCC=24$'
AD6B 34 20 20 47
AD6F 4E 44 3D 31
AD73 32 2C 20 56
AD77 43 43 3D 32
AD7B 34 24
AD7D 44 49 4C 31 PP5: DB 'DIL16 GND=12, VCC=5$'
AD81 36 20 20 47
AD85 4E 44 3D 31
AD89 32 2C 20 56
AD8D 43 43 3D 35
AD91 24
AD92 44 49 4C 31 PP6: DB 'DIL14 GND=11, VCC=4$'
AD96 34 20 20 47
AD9A 4E 44 3D 31
AD9E 31 2C 20 56
ADA2 43 43 3D 34
ADA6 24
ADA7 44 49 4C 31 PP7: DB 'DIL16 GND=13, VCC=5$'
ADAB 36 20 20 47
ADAF 4E 44 3D 31
ADB3 33 2C 20 56
ADB7 43 43 3D 35
ADBB 24
ADBC 44 49 4C 31 PP8: DB 'DIL14 GND=11, VCC=4$'
ADC0 34 20 20 47
ADC4 4E 44 3D 31
ADC8 31 2C 20 56
ADCC 43 43 3D 34
ADD0 24
ADD1 44 49 4C 31 PP9: DB 'DIL14 GND=10, VCC=4$'
PROGRAM IOT MACRO-80 3.44 09-Dec-81 PAGE 1-185
ADD5 34 20 20 47
ADD9 4E 44 3D 31
ADDD 30 2C 20 56
ADE1 43 43 3D 34
ADE5 24
ADE6 44 49 4C 31 PP10: DB 'DIL14 GND=10, VCC=5$'
ADEA 34 20 20 47
ADEE 4E 44 3D 31
ADF2 30 2C 20 56
ADF6 43 43 3D 35
ADFA 24
ADFB 44 49 4C 32 PP11: DB 'DIL24 GND=7, VCC=24$'
ADFF 34 20 20 47
AE03 4E 44 3D 37
AE07 2C 20 56 43
AE0B 43 3D 32 34
AE0F 24
AE10 44 49 4C 32 PP12: DB 'DIL22 GND=11, VCC=22$'
AE14 32 20 20 47
AE18 4E 44 3D 31
AE1C 31 2C 20 56
AE20 43 43 3D 32
AE24 32 24
AE26 42 75 64 65 PPX: DB 'Bude se cvakat s RELE$'
AE2A 20 73 65 20
AE2E 63 76 61 6B
AE32 61 74 20 73
AE36 20 52 45 4C
AE3A 45 24
;===============================
;ZAPOJENI PATIC
;ZIF28
; D D D D D D D D
; I I I I I I I I
; L L L L L L L L
; 2 2 1 1 1 1 2 2
; 4 0 6 4 ZIF 28 4 6 0 4
; . . . . +--\/--+ . . . .
;( . . . . = 1 28= . . . . P1-7)
;(PR-4 . . . . = 2 27= . . . . P3-7)
; P2-0 1 . . . = 3 26= . . . 24 VCC
; P2-1 2 . . . = 4 25= . . . 23 P2-6
; P2-2 3 1 . . = 5 24= . . 20 22 P2-5/VCC
; P2-3 4 2 . . = 6 23= . . 19 21 P2-4
; P0-O 5 3 1 . = 7 22= . 16 18 20 P1-7/VCC
; P0-1 6 4 2 1 = 8 21= 14 15 17 19 P1-6/VCC
; P0-2 7 5 3 2 = 9 20= 13 14 16 18 P1-5
; P0-3 8 6 4 3 =10 19= 12 13 15 17 P1-4
; P0-4 9 7 5 4 =11 18= 11 12 14 16 P1-3
; P0-5 10 8 6 5 =12 17= 10 11 13 15 P1-2
; P0-6 11 9 7 6 =13 16= 9 10 12 14 P1-1
; GND 12 10 8 7 =14 15= 8 9 11 13 P1-0
; +------+
PROGRAM IOT MACRO-80 3.44 09-Dec-81 PAGE 1-186
;ZIF16
; D D D D
; I I I I
; L L L L
; 1 1 1 1
; 6 4 ZIF 16 4 6
; . . +--\/--+ . .
; P0-O 1 1 = 1 16= 14 16 P1-7
; P0-1 2 2 = 2 15= 13 15 P1-6
; P0-2 3 3 = 3 14= 12 14 P1-5
; P0-3/VCC 4 4 = 4 13= 11 13 P1-4/GND
; P0-4/VCC 5 5 = 5 12= 10 12 P1-3/GND
; P0-5 8 6 = 6 11= 9 11 P1-2
; P0-6 7 7 = 7 10= 8 10 P1-1
; P0-7 8 = 8 9= 9 P1-0
; +------+
;===============================
;TESTOVACI TABULKY
;4x 2vstup. NAND
;7400, 7403, 7424, 7426, 7437, 7438, 74132
AE3C I7400T: ; ZYABYABX XNABYABY
AE3C 08 36 36 DB T_VV2, 00110110B, 00110110B
AE3F 24 44 DB T_NAP, DIL14
AE41 1B BD D9 DB T_W12, 10111101B, 11011001B
AE44 1B C7 EB DB T_W12, 11000111B, 11101011B
AE47 1B D9 F5 DB T_W12, 11011001B, 11110101B
AE4A 1B EB CE DB T_W12, 11101011B, 11001110B
AE4D FE DB T_KONEC
;4x 2vstup. NAND jinak vyvody
;7401, 7439
AE4E I7401T: ; ZBAYBAYX XNYBAYBA
AE4E 08 6C 1B DB T_VV2, 01101100B, 00011011B
AE51 24 44 DB T_NAP, DIL14
AE53 1B 97 F3 DB T_W12, 10010111B, 11110011B
AE56 1B BB DC DB T_W12, 10111011B, 11011100B
AE59 1B DD E5 DB T_W12, 11011101B, 11100101B
AE5C 1B E3 EE DB T_W12, 11100011B, 11101110B
AE5F FE DB T_KONEC
;4x 2vstup. NOR
;7402, 7428, 7433, 74128
AE60 I7402T: ; ZBAYBAYX XNYBAYBA
AE60 08 6C 1B DB T_VV2, 01101100B, 00011011B
AE63 24 44 DB T_NAP, DIL14
AE65 1B 95 D3 DB T_W12, 10010101B, 11010011B
AE68 1B A9 DC DB T_W12, 10101001B, 11011100B
AE6B 1B CD E1 DB T_W12, 11001101B, 11100001B
AE6E 1B E3 CA DB T_W12, 11100011B, 11001010B
AE71 FE DB T_KONEC
;6x invertor
;7404, 7405, 7406, 7414, 7416, 7419, 4069, 40106
PROGRAM IOT MACRO-80 3.44 09-Dec-81 PAGE 1-187
AE72 I7404T: ; ZYAYAYAX XNAYAYAY
AE72 08 2A 2A DB T_VV2, 00101010B, 00101010B
AE75 24 44 DB T_NAP, DIL14
AE77 1B B3 E6 DB T_W12, 10110011B, 11100110B
AE7A 1B CD D9 DB T_W12, 11001101B, 11011001B
AE7D FE DB T_KONEC
;6x budici stupen
;7407, 7417, 7434, 7435
AE7E I7407T: ; ZYAYAYAX XNAYAYAY
AE7E 08 2A 2A DB T_VV2, 00101010B, 00101010B
AE81 24 44 DB T_NAP, DIL14
AE83 1B 99 F3 DB T_W12, 10011001B, 11110011B
AE86 1B E7 CC DB T_W12, 11100111B, 11001100B
AE89 FE DB T_KONEC
;4x 2vstup. AND
;7408, 7409
AE8A I7408T: ; ZYABYABX XNABYABY
AE8A 08 36 36 DB T_VV2, 00110110B, 00110110B
AE8D 24 44 DB T_NAP, DIL14
AE8F 1B F5 D0 DB T_W12, 11110101B, 11010000B
AE92 1B 8F E2 DB T_W12, 10001111B, 11100010B
AE95 1B 91 FC DB T_W12, 10010001B, 11111100B
AE98 1B A3 C7 DB T_W12, 10100011B, 11000111B
AE9B FE DB T_KONEC
;3x 3vstup. NAND
;7410, 7412 222211 113333
AE9C I7410T: ; ZYCBABAX XNCYCBAY
AE9C 08 3E 2E DB T_VV2, 00111110B, 00101110B
AE9F 24 44 DB T_NAP, DIL14
AEA1 1B C3 D5 DB T_W12, 11000011B, 11010101B
AEA4 1B CD D7 DB T_W12, 11001101B, 11010111B
AEA7 1B D7 D9 DB T_W12, 11010111B, 11011001B
AEAA 1B D9 FB DB T_W12, 11011001B, 11111011B
AEAD 1B E3 FD DB T_W12, 11100011B, 11111101B
AEB0 1B ED FE DB T_W12, 11101101B, 11111110B
AEB3 1B F7 E1 DB T_W12, 11110111B, 11100001B
AEB6 1B B9 D3 DB T_W12, 10111001B, 11010011B
AEB9 FE DB T_KONEC
;3x 3vstup. AND
;7411, 7415 222211 113333
AEBA I7411T: ; ZYCBABAX XNCYCBAY
AEBA 08 3E 2E DB T_VV2, 00111110B, 00101110B
AEBD 24 44 DB T_NAP, DIL14
AEBF 1B 83 C4 DB T_W12, 10000011B, 11000100B
AEC2 1B 8D C6 DB T_W12, 10001101B, 11000110B
AEC5 1B 97 C8 DB T_W12, 10010111B, 11001000B
AEC8 1B 99 EA DB T_W12, 10011001B, 11101010B
AECB 1B A3 EC DB T_W12, 10100011B, 11101100B
AECE 1B AD EF DB T_W12, 10101101B, 11101111B
AED1 1B B7 F0 DB T_W12, 10110111B, 11110000B
AED4 1B F9 C2 DB T_W12, 11111001B, 11000010B
AED7 FE DB T_KONEC
PROGRAM IOT MACRO-80 3.44 09-Dec-81 PAGE 1-188
;2x 4vstup. NAND
;7413, 7418, 7420, 7422, 7440, 74140
AED8 I7413T: ; ZYDCXBAX XNDCXBAY
AED8 25 09 88 I7420T: DB T_NZ2, 00001001B, 10001000B
AEDB 08 36 36 DB T_VV2, 00110110B, 00110110B
AEDE 24 44 DB T_NAP, DIL14
AEE0 1B BF C9 DB T_W12, 10111111B, 11001001B
AEE3 1B C9 FE DB T_W12, 11001001B, 11111110B
AEE6 1B FD E9 DB T_W12, 11111101B, 11101001B
AEE9 1B FB D9 DB T_W12, 11111011B, 11011001B
AEEC 1B EF CD DB T_W12, 11101111B, 11001101B
AEEF 1B DF CB DB T_W12, 11011111B, 11001011B
AEF2 1B E9 FD DB T_W12, 11101001B, 11111101B
AEF5 1B D9 FB DB T_W12, 11011001B, 11111011B
AEF8 1B CD EF DB T_W12, 11001101B, 11101111B
AEFB 1B CB DF DB T_W12, 11001011B, 11011111B
AEFE FE DB T_KONEC
;2x 4vstup. AND
;7421
AEFF I7421T: ; ZYDCXBAX XNDCXBAY
AEFF 25 09 88 DB T_NZ2, 00001001B, 10001000B
AF02 08 36 36 DB T_VV2, 00110110B, 00110110B
AF05 24 44 DB T_NAP, DIL14
AF07 1B FF C8 DB T_W12, 11111111B, 11001000B
AF0A 1B 89 FF DB T_W12, 10001001B, 11111111B
AF0D 1B BD E8 DB T_W12, 10111101B, 11101000B
AF10 1B BB D8 DB T_W12, 10111011B, 11011000B
AF13 1B AF CC DB T_W12, 10101111B, 11001100B
AF16 1B 9F CA DB T_W12, 10011111B, 11001010B
AF19 1B A9 FC DB T_W12, 10101001B, 11111100B
AF1C 1B 99 FA DB T_W12, 10011001B, 11111010B
AF1F 1B 8D EE DB T_W12, 10001101B, 11101110B
AF22 1B 8B DE DB T_W12, 10001011B, 11011110B
AF25 FE DB T_KONEC
;2x rozsirit. 4vstup. NOR
; EEEEEE E E
;7423 ; BBBAAA1 22A21 B 2221111
AF26 I7423T: ; ZCBACBAB GCDDAXXD NBAYGYDC
AF26 25 00 06 DB T_NZ2, 00000000B, 00000110B
AF29 10 7F F9 6B DB T_VV3, 01111111B, 11111001B, 01101011B
AF2D 24 47 DB T_NAP, DIL24
AF2F 1F 80 D6 C4 G7423T: DB T_W123, 10000000B, 11010110B, 11000100B
AF33 1E D6 AC DB T_W23, 11010110B, 10101100B
AF36 1E 9E E8 DB T_W23, 10011110B, 11101000B
AF39 1F 81 C6 E8 DB T_W123, 10000001B, 11000110B, 11101000B
AF3D 1F 80 86 A9 DB T_W123, 10000000B, 10000110B, 10101001B
AF41 1C CA DB T_W3, 11001010B
AF43 1F 81 C6 8B DB T_W123, 10000001B, 11000110B, 10001011B
AF47 1F 80 DE 8B DB T_W123, 10000000B, 11011110B, 10001011B
AF4B 1F 81 8E 9A DB T_W123, 10000001B, 10001110B, 10011010B
AF4F 1E 0E 99 DB T_W23, 00001110B, 10011001B
AF52 FE DB T_KONEC
PROGRAM IOT MACRO-80 3.44 09-Dec-81 PAGE 1-189
;2x rozsirit. 4vstup. NOR
; EEEEEE E E
;7423 + 7460 ; BBBAAA1 22A21 B 2221111
AF53 I7423R: ; ZCBACBAB GCDDAXXD NBAYGYDC
AF53 25 00 06 DB T_NZ2, 00000000B, 00000110B
AF56 10 7F F9 6B DB T_VV3, 01111111B, 11111001B, 01101011B
AF5A 24 47 DB T_NAP, DIL24
AF5C 1F FF A7 9A DB T_W123, 11111111B, 10100111B, 10011010B ;X=1
AF60 1F 9C EE 88 DB T_W123, 10011100B, 11101110B, 10001000B ;X=0
AF64 1F AB B6 88 DB T_W123, 10101011B, 10110110B, 10001000B ;X=0
AF68 1F C6 A6 C9 DB T_W123, 11000110B, 10100110B, 11001001B ;X=0
AF6C 1F 8E 87 AA DB T_W123, 10001110B, 10000111B, 10101010B ;X=0
AF70 1F 9C B6 EC DB T_W123, 10011100B, 10110110B, 11101100B ;X=0
AF74 1F AA E6 EC DB T_W123, 10101010B, 11100110B, 11101100B ;X=0
AF78 1F C6 F6 AC DB T_W123, 11000110B, 11110110B, 10101100B ;X=0
AF7C 1F 8E D7 CC DB T_W123, 10001110B, 11010111B, 11001100B ;X=0
AF80 1F 8E A6 92 DB T_W123, 10001110B, 10100110B, 10010010B ;X=1
AF84 1F F1 07 99 DB T_W123, 11110001B, 00000111B, 10011001B ;X=1
AF88 1F AE A7 92 DB T_W123, 10101110B, 10100111B, 10010010B ;X=1
AF8C 1F F1 07 99 DB T_W123, 11110001B, 00000111B, 10011001B ;X=1
AF90 1F DE A6 92 DB T_W123, 11011110B, 10100110B, 10010010B ;X=1
AF94 1F F5 27 99 DB T_W123, 11110101B, 00100111B, 10011001B ;X=1
AF98 1F 8E A6 92 DB T_W123, 10001110B, 10100110B, 10010010B ;X=1
AF9C 1F FB 07 99 DB T_W123, 11111011B, 00000111B, 10011001B ;X=1
AFA0 1F E3 C7 8B DB T_W123, 11100011B, 11000111B, 10001011B ;X=0
AFA4 1F D4 9F EB DB T_W123, 11010100B, 10011111B, 11101011B ;X=0
AFA8 1F B9 8F CA DB T_W123, 10111001B, 10001111B, 11001010B ;X=0
AFAC 1F F1 AE A9 DB T_W123, 11110001B, 10101110B, 10101001B ;X=0
AFB0 1F E2 87 9C DB T_W123, 11100010B, 10000111B, 10011100B ;X=0
AFB4 1F D4 87 9C DB T_W123, 11010100B, 10000111B, 10011100B ;X=0
AFB8 1F B8 87 9C DB T_W123, 10111000B, 10000111B, 10011100B ;X=0
AFBC 1F F0 A6 9C DB T_W123, 11110000B, 10100110B, 10011100B ;X=0
AFC0 20 DB T_GOTO
AFC1 AF2F DW G7423T
;2x 4vstup. NOR s uvolnenim
;7425
AFC3 I7425T: ; ZYDCGBAX XNDCGBAY
AFC3 08 3E 3E DB T_VV2, 00111110B, 00111110B
AFC6 24 44 DB T_NAP, DIL14
AFC8 1B BF C1 DB T_W12, 10111111B, 11000001B
AFCB 1B C9 F7 DB T_W12, 11001001B, 11110111B
AFCE 1B BD E1 DB T_W12, 10111101B, 11100001B
AFD1 1B BB D1 DB T_W12, 10111011B, 11010001B
AFD4 1B AF C5 DB T_W12, 10101111B, 11000101B
AFD7 1B 9F C3 DB T_W12, 10011111B, 11000011B
AFDA 1B A9 F5 DB T_W12, 10101001B, 11110101B
AFDD 1B 99 F3 DB T_W12, 10011001B, 11110011B
AFE0 1B 8D E7 DB T_W12, 10001101B, 11100111B
AFE3 1B 8B D7 DB T_W12, 10001011B, 11010111B
AFE6 1B F7 C9 DB T_W12, 11110111B, 11001001B
AFE9 1B C1 FE DB T_W12, 11000001B, 11111110B
AFEC 1B F5 E8 DB T_W12, 11110101B, 11101000B
AFEF 1B F3 D8 DB T_W12, 11110011B, 11011000B
AFF2 1B E7 CC DB T_W12, 11100111B, 11001100B
AFF5 1B D7 CA DB T_W12, 11010111B, 11001010B
PROGRAM IOT MACRO-80 3.44 09-Dec-81 PAGE 1-190
AFF8 1B E1 FC DB T_W12, 11100001B, 11111100B
AFFB 1B D1 FA DB T_W12, 11010001B, 11111010B
AFFE 1B C5 EE DB T_W12, 11000101B, 11101110B
B001 1B C3 DE DB T_W12, 11000011B, 11011110B
B004 FE DB T_KONEC
;3x 3vstup. NOR
;7427 222211 113333
B005 I7427T: ; ZYCBABAX XNCYCBAY
B005 08 3E 2E DB T_VV2, 00111110B, 00101110B
B008 24 44 DB T_NAP, DIL14
B00A 1B C3 C4 DB T_W12, 11000011B, 11000100B
B00D 1B 8D C6 DB T_W12, 10001101B, 11000110B
B010 1B 97 C8 DB T_W12, 10010111B, 11001000B
B013 1B 99 EA DB T_W12, 10011001B, 11101010B
B016 1B A3 EC DB T_W12, 10100011B, 11101100B
B019 1B AD EE DB T_W12, 10101101B, 11101110B
B01C 1B B7 E1 DB T_W12, 10110111B, 11100001B
B01F 1B B9 D2 DB T_W12, 10111001B, 11010010B
B022 FE DB T_KONEC
;8vstup. NAND
;7430
B023 I7430T: ; ZFEDCBAX XNXHGXXY
B023 25 00 26 DB T_NZ2, 00000000B, 00100110B
B026 08 7E 18 DB T_VV2, 01111110B, 00011000B
B029 24 44 DB T_NAP, DIL14
B02B 1B 81 E7 DB T_W12, 10000001B, 11100111B
B02E 1B FF FE DB T_W12, 11111111B, 11111110B
B031 1B BF FF DB T_W12, 10111111B, 11111111B
B034 1B DF FF DB T_W12, 11011111B, 11111111B
B037 1B EF FF DB T_W12, 11101111B, 11111111B
B03A 1B F7 FF DB T_W12, 11110111B, 11111111B
B03D 1B FB FF DB T_W12, 11111011B, 11111111B
B040 1B FD FF DB T_W12, 11111101B, 11111111B
B043 1B FF EF DB T_W12, 11111111B, 11101111B
B046 1B FF F7 DB T_W12, 11111111B, 11110111B
B049 1B 81 EF DB T_W12, 10000001B, 11101111B
B04C 1B 81 F7 DB T_W12, 10000001B, 11110111B
B04F 1B 83 E7 DB T_W12, 10000011B, 11100111B
B052 1B 85 E7 DB T_W12, 10000101B, 11100111B
B055 1B 89 E7 DB T_W12, 10001001B, 11100111B
B058 1B 91 E7 DB T_W12, 10010001B, 11100111B
B05B 1B A1 E7 DB T_W12, 10100001B, 11100111B
B05E 1B C1 E7 DB T_W12, 11000001B, 11100111B
B061 FE DB T_KONEC
;6x zpozdovaci obvod
;7431 3332211 6655444
B062 I7431T: ; ZYBAYAYA NAYAYBAY
B062 08 35 56 DB T_VV2, 00110101B, 01010110B
B065 24 45 DB T_NAP, DIL16
B067 1B BE C1 DB T_W12, 10111110B, 11000001B
B06A 1B C1 BB DB T_W12, 11000001B, 10111011B
B06D 1B D2 DD DB T_W12, 11010010B, 11011101B
B070 1B ED A6 DB T_W12, 11101101B, 10100110B
PROGRAM IOT MACRO-80 3.44 09-Dec-81 PAGE 1-191
B073 FE DB T_KONEC
;4x 2vstup. OR
;7432
B074 I7432T: ; ZYBAYBAX XNBAYBAY
B074 08 36 36 DB T_VV2, 00110110B, 00110110B
B077 24 44 DB T_NAP, DIL14
B079 1B FD D8 DB T_W12, 11111101B, 11011000B
B07C 1B 8F EB DB T_W12, 10001111B, 11101011B
B07F 1B D1 FD DB T_W12, 11010001B, 11111101B
B082 1B EB C7 DB T_W12, 11101011B, 11000111B
B085 FE DB T_KONEC
;4x 2vstup. NOR, JINAK VIVODY NEZ 7402
;7436
B086 I7436T: ; ZYBAYBAX XNBAYBAY
B086 08 36 36 DB T_VV2, 00110110B, 00110110B
B089 24 44 DB T_NAP, DIL14
B08B 1B B5 D1 DB T_W12, 10110101B, 11010001B
B08E 1B C7 E2 DB T_W12, 11000111B, 11100010B
B091 1B 99 F4 DB T_W12, 10011001B, 11110100B
B094 1B A3 CE DB T_W12, 10100011B, 11001110B
B097 FE DB T_KONEC
;dek. BCD na 1 z 10, JINAK VYNODY 7442, 7445
;7441 221 3098 0154 673
B098 I7441T: ; YAANAAYY YYYYZYYY
B098 08 6C 00 DB T_VV2, 01101100B, 00000000B
B09B 24 48 DB T_NAP, DIL5_12
B09D 1B 93 7F DB T_W12, 10010011B, 01111111B
B0A0 1B 97 BF DB T_W12, 10010111B, 10111111B
B0A3 1B 33 FF DB T_W12, 00110011B, 11111111B
B0A6 1B B7 FE DB T_W12, 10110111B, 11111110B
B0A9 1B D3 EF DB T_W12, 11010011B, 11101111B
B0AC 1B D7 DF DB T_W12, 11010111B, 11011111B
B0AF 1B F3 FB DB T_W12, 11110011B, 11111011B
B0B2 1B F7 FD DB T_W12, 11110111B, 11111101B
B0B5 1B 9A FF DB T_W12, 10011010B, 11111111B
B0B8 1B 9D FF DB T_W12, 10011101B, 11111111B
B0BB 1B BB FF DB T_W12, 10111011B, 11111111B
B0BE 1B BF FF DB T_W12, 10111111B, 11111111B
B0C1 1B DB FF DB T_W12, 11011011B, 11111111B
B0C4 1B DF FF DB T_W12, 11011111B, 11111111B
B0C7 1B FB FF DB T_W12, 11111011B, 11111111B
B0CA 1B FF FF DB T_W12, 11111111B, 11111111B
B0CD FE DB T_KONEC
;dek. BCD na 1 z 10, TP
;7442, 7445, 74145
B0CE I7442T: ; Z6543210 NABCD987
B0CE 08 00 78 DB T_VV2, 00000000B, 01111000B
B0D1 24 45 DB T_NAP, DIL16
B0D3 1B FE 87 DB T_W12, 11111110B, 10000111B
B0D6 1B FD C7 DB T_W12, 11111101B, 11000111B
B0D9 1B FB A7 DB T_W12, 11111011B, 10100111B
B0DC 1B F7 E7 DB T_W12, 11110111B, 11100111B
PROGRAM IOT MACRO-80 3.44 09-Dec-81 PAGE 1-192
B0DF 1B EF 97 DB T_W12, 11101111B, 10010111B
B0E2 1B DF D7 DB T_W12, 11011111B, 11010111B
B0E5 1B BF B7 DB T_W12, 10111111B, 10110111B
B0E8 1B FF F6 DB T_W12, 11111111B, 11110110B
B0EB 1B FF 8D DB T_W12, 11111111B, 10001101B
B0EE 1B FF CB DB T_W12, 11111111B, 11001011B
B0F1 1B FF AF DB T_W12, 11111111B, 10101111B
B0F4 1B FF EF DB T_W12, 11111111B, 11101111B
B0F7 1B FF 9F DB T_W12, 11111111B, 10011111B
B0FA 1B FF DF DB T_W12, 11111111B, 11011111B
B0FD 1B FF BF DB T_W12, 11111111B, 10111111B
B100 1B FF FF DB T_W12, 11111111B, 11111111B
B103 FE DB T_KONEC
;dek. BCD+3 na 1 z 10
;7443
B104 I7443T: ; Z6543210 NABCD987
B104 08 00 78 DB T_VV2, 00000000B, 01111000B
B107 24 45 DB T_NAP, DIL16
B109 1B FF 87 DB T_W12, 11111111B, 10000111B
B10C 1B FF C7 DB T_W12, 11111111B, 11000111B
B10F 1B FF A7 DB T_W12, 11111111B, 10100111B
B112 1B FE E7 DB T_W12, 11111110B, 11100111B
B115 1B FD 97 DB T_W12, 11111101B, 10010111B
B118 1B FB D7 DB T_W12, 11111011B, 11010111B
B11B 1B F7 B7 DB T_W12, 11110111B, 10110111B
B11E 1B EF F7 DB T_W12, 11101111B, 11110111B
B121 1B DF 8F DB T_W12, 11011111B, 10001111B
B124 1B BF CF DB T_W12, 10111111B, 11001111B
B127 1B FF AE DB T_W12, 11111111B, 10101110B
B12A 1B FF ED DB T_W12, 11111111B, 11101101B
B12D 1B FF 9B DB T_W12, 11111111B, 10011011B
B130 1B FF DF DB T_W12, 11111111B, 11011111B
B133 1B FF BF DB T_W12, 11111111B, 10111111B
B136 1B FF FF DB T_W12, 11111111B, 11111111B
B139 FE DB T_KONEC
;dek. Gray+3 na 1 z 10
;7444
B13A I7444T: ; Z6543210 NABCD987
B13A 08 00 78 DB T_VV2, 00000000B, 01111000B
B13D 24 45 DB T_NAP, DIL16
B13F 1B FF 87 DB T_W12, 11111111B, 10000111B
B142 1B FF C7 DB T_W12, 11111111B, 11000111B
B145 1B FE A7 DB T_W12, 11111110B, 10100111B
B148 1B FF E7 DB T_W12, 11111111B, 11100111B
B14B 1B EF 97 DB T_W12, 11101111B, 10010111B
B14E 1B F7 D7 DB T_W12, 11110111B, 11010111B
B151 1B FD B7 DB T_W12, 11111101B, 10110111B
B154 1B FB F7 DB T_W12, 11111011B, 11110111B
B157 1B FF 8F DB T_W12, 11111111B, 10001111B
B15A 1B FF CF DB T_W12, 11111111B, 11001111B
B15D 1B FF AB DB T_W12, 11111111B, 10101011B
B160 1B FF EF DB T_W12, 11111111B, 11101111B
B163 1B DF 9F DB T_W12, 11011111B, 10011111B
B166 1B BF DF DB T_W12, 10111111B, 11011111B
PROGRAM IOT MACRO-80 3.44 09-Dec-81 PAGE 1-193
B169 1B FF BD DB T_W12, 11111111B, 10111101B
B16C 1B FF FE DB T_W12, 11111111B, 11111110B
B16F FE DB T_KONEC
;dek. BCD / 7 seg. SA RR
;7446; 7447 03BBL21
B170 I7446T: ; ZAAIOTAA Nfgabcde
B170 08 77 00 DB T_VV2, 01110111B, 00000000B ;/RBO VYSTUP
B173 24 45 DB T_NAP, DIL16
B175 1B 9F 98 DB T_W12, 10011111B, 10011000B ;6
B178 1B EC 83 DB T_W12, 11101100B, 10000011B ;9
B17B 20 DB T_GOTO
B17C B189 DW G7446T
;D146D, D147D, 74246, 74247
;dek. BCD / 7 seg. SA RR
; 03BBL21
B17E ID146T: ; ZAAIOTAA Nfgabcde
B17E 08 77 00 DB T_VV2, 01110111B, 00000000B ;/RBO VYSTUP
B181 24 45 DB T_NAP, DIL16
B183 1B 9F 88 DB T_W12, 10011111B, 10001000B ;6
B186 1B EC 81 DB T_W12, 11101100B, 10000001B ;9
;SPOLECNE PRO 7446, 7447, D146D, D147D
;dek. BCD / 7 seg. SA RR
; 03BBL21
B189 G7446T: ; ZAAIOTAA Nfgabcde
B189 1B AA 80 DB T_W12, 10101010B, 10000000B ;TEST
B18C 1B 84 FF DB T_W12, 10000100B, 11111111B ;POTLA. NULA
B18F 08 7F 00 DB T_VV2, 01111111B, 00000000B ;/RBO VSTUP
B192 1B D5 FF DB T_W12, 11010101B, 11111111B ;ZHASNUTI DISPLEJE
B195 08 77 00 DB T_VV2, 01110111B, 00000000B ;/RBO VYSTUP
B198 1B 9C A0 DB T_W12, 10011100B, 10100000B ;0
B19B 1B DC F3 DB T_W12, 11011100B, 11110011B ;1
B19E 1B 9D C4 DB T_W12, 10011101B, 11000100B ;2
B1A1 1B DD C1 DB T_W12, 11011101B, 11000001B ;3
B1A4 1B 9E 93 DB T_W12, 10011110B, 10010011B ;4
B1A7 1B DE 89 DB T_W12, 11011110B, 10001001B ;5
B1AA 1B DF E3 DB T_W12, 11011111B, 11100011B ;7
B1AD 1B BC 80 DB T_W12, 10111100B, 10000000B ;8
B1B0 1B BD DC DB T_W12, 10111101B, 11011100B ;10
B1B3 1B FD D9 DB T_W12, 11111101B, 11011001B ;11
B1B6 1B BE 97 DB T_W12, 10111110B, 10010111B ;12
B1B9 1B FE 8D DB T_W12, 11111110B, 10001101B ;13
B1BC 1B BF 9C DB T_W12, 10111111B, 10011100B ;14
B1BF 1B FF FF DB T_W12, 11111111B, 11111111B ;15
B1C2 FE DB T_KONEC
;dek. BCD / 7 seg. SK RR
;7448 03BBL21
B1C3 I7448T: ; ZAAIOTAA Nfgabcde
B1C3 08 77 00 DB T_VV2, 01110111B, 00000000B ;/RBO VYSTUP
B1C6 24 45 DB T_NAP, DIL16
B1C8 1B 9F E7 DB T_W12, 10011111B, 11100111B ;6
B1CB 1B EC FC DB T_W12, 11101100B, 11111100B ;9
B1CE 20 DB T_GOTO
PROGRAM IOT MACRO-80 3.44 09-Dec-81 PAGE 1-194
B1CF B1DC DW G7448T
;74248, 74249
;dek. BCD / 7 seg. SK RR
; 03BBL21
B1D1 I74248T: ; ZAAIOTAA Nfgabcde
B1D1 08 77 00 DB T_VV2, 01110111B, 00000000B ;/RBO VYSTUP
B1D4 24 45 DB T_NAP, DIL16
B1D6 1B 9F F7 DB T_W12, 10011111B, 11110111B ;6
B1D9 1B EC FE DB T_W12, 11101100B, 11111110B ;9
;SPOLECNE PRO 7448, 74248,
;dek. BCD / 7 seg. SK RR
; 03BBL21
B1DC G7448T: ; ZAAIOTAA Nfgabcde
B1DC 1B AA FF DB T_W12, 10101010B, 11111111B ;TEST
B1DF 1B 84 80 DB T_W12, 10000100B, 10000000B ;POTLA. NULA
B1E2 08 7F 00 DB T_VV2, 01111111B, 00000000B ;/RBO VSTUP
B1E5 1B D5 80 DB T_W12, 11010101B, 10000000B ;ZHASNUTI DISPLEJE
B1E8 08 77 00 DB T_VV2, 01110111B, 00000000B ;/RBO VYSTUP
B1EB 1B 9C DF DB T_W12, 10011100B, 11011111B ;0
B1EE 1B DC 8C DB T_W12, 11011100B, 10001100B ;1
B1F1 1B 9D BB DB T_W12, 10011101B, 10111011B ;2
B1F4 1B DD BE DB T_W12, 11011101B, 10111110B ;3
B1F7 1B 9E EC DB T_W12, 10011110B, 11101100B ;4
B1FA 1B DE F6 DB T_W12, 11011110B, 11110110B ;5
B1FD 1B DF 9C DB T_W12, 11011111B, 10011100B ;7
B200 1B BC FF DB T_W12, 10111100B, 11111111B ;8
B203 1B BD A3 DB T_W12, 10111101B, 10100011B ;10
B206 1B FD A6 DB T_W12, 11111101B, 10100110B ;11
B209 1B BE E8 DB T_W12, 10111110B, 11101000B ;12
B20C 1B FE F2 DB T_W12, 11111110B, 11110010B ;13
B20F 1B BF E3 DB T_W12, 10111111B, 11100011B ;14
B212 1B FF 80 DB T_W12, 11111111B, 10000000B ;15
B215 FE DB T_KONEC
;dek. BCD / 7 seg. SK 03I21
B216 I7449T: ; ZeAABAAX xNfgabcd
B216 08 3E 00 DB T_VV2, 00111110B, 00000000B
B219 24 44 DB T_NAP, DIL14
B21B 1B C9 EF DB T_W12, 11001001B, 11101111B ;0
B21E 1B A9 C6 DB T_W12, 10101001B, 11000110B ;1
B221 1B CB DD DB T_W12, 11001011B, 11011101B ;2
B224 1B AB DF DB T_W12, 10101011B, 11011111B ;3
B227 1B 8D F6 DB T_W12, 10001101B, 11110110B ;4
B22A 1B AD FB DB T_W12, 10101101B, 11111011B ;5
B22D 1B CF F3 DB T_W12, 11001111B, 11110011B ;6
B230 1B AF CE DB T_W12, 10101111B, 11001110B ;7
B233 1B D9 FF DB T_W12, 11011001B, 11111111B ;8
B236 1B B9 FE DB T_W12, 10111001B, 11111110B ;9
B239 1B DB D1 DB T_W12, 11011011B, 11010001B ;10
B23C 1B BB D3 DB T_W12, 10111011B, 11010011B ;11
B23F 1B 9D F4 DB T_W12, 10011101B, 11110100B ;12
B242 1B BD F9 DB T_W12, 10111101B, 11111001B ;13
B245 1B DF F1 DB T_W12, 11011111B, 11110001B ;14
B248 1B BF C0 DB T_W12, 10111111B, 11000000B ;15
PROGRAM IOT MACRO-80 3.44 09-Dec-81 PAGE 1-195
B24B 1B A3 C0 DB T_W12, 10100011B, 11000000B ;ZHASNUTI DISPLEJE
B24E 1B 95 C0 DB T_W12, 10010101B, 11000000B ;ZHASNUTI DISPLEJE
B251 FE DB T_KONEC
;D345, D346 S REDUKCI R_346/8
;dek. HEX / 7 seg. SA RR
; 03BBX21
B252 ID345T: ; ZAAIOXAA Nfgabcde
B252 25 04 00 DB T_NZ2, 00000100B, 00000000B
B255 08 73 00 DB T_VV2, 01110011B, 00000000B ;/RBO VYSTUP
B258 24 45 DB T_NAP, DIL16
B25A 1B BD 82 DB T_W12, 10111101B, 10000010B ;10 - A
B25D 1B FD 98 DB T_W12, 11111101B, 10011000B ;11 - b
B260 1B BE AC DB T_W12, 10111110B, 10101100B ;12 - c
B263 1B FE D0 DB T_W12, 11111110B, 11010000B ;13 - d
B266 1B BF 8C DB T_W12, 10111111B, 10001100B ;14 - E
B269 1B FF 8E DB T_W12, 11111111B, 10001110B ;15 - F
B26C 20 DB T_GOTO
B26D B289 DW GD347T
;D347, D348 S REDUKCI R_346/8
;dek. HEX / 7 seg. SA RR
B26F ID347T: ; ZAAIOXAA Nfgabcde
B26F 25 04 00 DB T_NZ2, 00000100B, 00000000B
B272 08 73 00 DB T_VV2, 01110011B, 00000000B ;/RBO VYSTUP
B275 24 45 DB T_NAP, DIL16
B277 1B BD DF DB T_W12, 10111101B, 11011111B ;10 - -
B27A 1B FD 8C DB T_W12, 11111101B, 10001100B ;11 - E
B27D 1B BE B0 DB T_W12, 10111110B, 10110000B ;12 - U
B280 1B FE D0 DB T_W12, 11111110B, 11010000B ;13 - d
B283 1B BF DC DB T_W12, 10111111B, 11011100B ;14 - c
B286 1B FF 82 DB T_W12, 11111111B, 10000010B ;15 - A
;SPOLECNE PRO D345, D346, D347, D348
;dek. HEX/BCD/7 seg. SA RR
; 03BB 21
B289 GD347T: ; ZAAIOXAA Nfgabcde
B289 1B 84 FF DB T_W12, 10000100B, 11111111B ;POTLA. NULA
B28C 08 7B 00 DB T_VV2, 01111011B, 00000000B ;/RBO VSTUP
B28F 1B D5 FF DB T_W12, 11010101B, 11111111B ;ZHASNUTI DISPLEJE
B292 08 77 00 DB T_VV2, 01110111B, 00000000B ;/RBO VYSTUP
B295 1B 9C A0 DB T_W12, 10011100B, 10100000B ;0
B298 1B DC F3 DB T_W12, 11011100B, 11110011B ;1
B29B 1B 9D C4 DB T_W12, 10011101B, 11000100B ;2
B29E 1B DD C1 DB T_W12, 11011101B, 11000001B ;3
B2A1 1B 9E 93 DB T_W12, 10011110B, 10010011B ;4
B2A4 1B DE 89 DB T_W12, 11011110B, 10001001B ;5
B2A7 1B 9F 88 DB T_W12, 10011111B, 10001000B ;6
B2AA 1B DF A3 DB T_W12, 11011111B, 10100011B ;7
B2AD 1B BC 80 DB T_W12, 10111100B, 10000000B ;8
B2B0 1B EC 81 DB T_W12, 11101100B, 10000001B ;9
B2B3 FE DB T_KONEC
;2x 2-2vstup. rozsirit. AND-OR-INVERT S R7460
; EEEEEE E E
;7450 ; BBBAAA2 11A2 B 1 12221
PROGRAM IOT MACRO-80 3.44 09-Dec-81 PAGE 1-196
B2B4 I7450T: ; ZCBACBAD CYDYXXXD NBXDCBAA
B2B4 26 00 0E 20 DB T_NZ3, 00000000B, 00001110B, 00100000B
B2B8 10 7F A1 5F DB T_VV3, 01111111B, 10100001B, 01011111B
B2BC 24 47 DB T_NAP, DIL24
B2BE 1F 81 4E BE G7450T: DB T_W123, 10000001B, 01001110B, 10111110B
B2C2 1F 80 DE A0 DB T_W123, 10000000B, 11011110B, 10100000B
B2C6 1F 81 4E EC DB T_W123, 10000001B, 01001110B, 11101100B
B2CA 1E 4E AB DB T_W23, 01001110B, 10101011B
B2CD 1E 8E F6 DB T_W23, 10001110B, 11110110B
B2D0 1F 80 8E BF DB T_W123, 10000000B, 10001110B, 10111111B
B2D4 1F 81 1E F1 DB T_W123, 10000001B, 00011110B, 11110001B
B2D8 1F 80 9E E9 DB T_W123, 10000000B, 10011110B, 11101001B
B2DC 1E 5E A4 DB T_W23, 01011110B, 10100100B
B2DF 1E 9E F3 DB T_W23, 10011110B, 11110011B
B2E2 FE DB T_KONEC
;2x 2-2vstup. rozsirit. AND-OR-INVERT S R7460 A 7460
; EEEEEE E E
;7450 + 7460 ; BBBAAA2 11A2 B 1 12221
B2E3 I7450R: ; ZCBACBAD CYDYXXXD NBXDCBAA
B2E3 26 00 0E 20 DB T_NZ3, 00000000B, 00001110B, 00100000B
B2E7 10 7F A1 5F DB T_VV3, 01111111B, 10100001B, 01011111B
B2EB 24 47 DB T_NAP, DIL24
B2ED 1F 8E 2E AE DB T_W123, 10001110B, 00101110B, 10101110B
B2F1 1F F1 0F A6 DB T_W123, 11110001B, 00001111B, 10100110B
B2F5 1F F1 6E AA DB T_W123, 11110001B, 01101110B, 10101010B
B2F9 1F B9 4F AC DB T_W123, 10111001B, 01001111B, 10101100B
B2FD 1F D5 4F A8 DB T_W123, 11010101B, 01001111B, 10101000B
B301 1F E2 5F AA DB T_W123, 11100010B, 01011111B, 10101010B
B305 1F 9D 7E A4 DB T_W123, 10011101B, 01111110B, 10100100B
B309 1F AA 6E A6 DB T_W123, 10101010B, 01101110B, 10100110B
B30D 1F C7 7E A2 DB T_W123, 11000111B, 01111110B, 10100010B
B311 1F 8E 5F AC DB T_W123, 10001110B, 01011111B, 10101100B
B315 20 DB T_GOTO
B316 B2BE DW G7450T
;2x 2-2vstup. AND-OR-INVERT
;7451 222221 1 111
B318 I7451T: ; ZYDCBAAX XNBXXDCY
B318 25 01 98 DB T_NZ2, 00000001B, 10011000B
B31B 08 3E 26 DB T_VV2, 00111110B, 00100110B
B31E 24 44 DB T_NAP, DIL14
B320 1B B3 F8 DB T_W12, 10110011B, 11111000B
B323 1B 8D DE DB T_W12, 10001101B, 11011110B
B326 1B BD D9 DB T_W12, 10111101B, 11011001B
B329 1B C3 FE DB T_W12, 11000011B, 11111110B
B32C 1B EB DD DB T_W12, 11101011B, 11011101B
B32F 1B D5 FB DB T_W12, 11010101B, 11111011B
B332 1B B7 FC DB T_W12, 10110111B, 11111100B
B335 1B BB FA DB T_W12, 10111011B, 11111010B
B338 1B AF DE DB T_W12, 10101111B, 11011110B
B33B 1B 9D FE DB T_W12, 10011101B, 11111110B
B33E FE DB T_KONEC
;3-3vstup. 2-2vstup. AND-OR-INVERT
;74LS51 222221 111111
PROGRAM IOT MACRO-80 3.44 09-Dec-81 PAGE 1-197
B33F I74LS51: ; ZYDCBAAX XNCBFEDY
B33F 08 3E 3E DB T_VV2, 00111110B, 00111110B
B342 24 44 DB T_NAP, DIL14
B344 1B B3 F0 DB T_W12, 10110011B, 11110000B
B347 1B 8D CE DB T_W12, 10001101B, 11001110B
B34A 1B BD C1 DB T_W12, 10111101B, 11000001B
B34D 1B C3 FE DB T_W12, 11000011B, 11111110B
B350 1B EB ED DB T_W12, 11101011B, 11101101B
B353 1B D7 DB DB T_W12, 11010111B, 11011011B
B356 1B B5 F7 DB T_W12, 10110101B, 11110111B
B359 1B BB C9 DB T_W12, 10111011B, 11001001B
B35C 1B AD E5 DB T_W12, 10101101B, 11100101B
B35F 1B 9D D3 DB T_W12, 10011101B, 11010011B
B362 1B B3 F4 DB T_W12, 10110011B, 11110100B
B365 1B 8F FA DB T_W12, 10001111B, 11111010B
B368 1B BF DE DB T_W12, 10111111B, 11011110B
B36B 1B C1 EE DB T_W12, 11000001B, 11101110B
B36E FE DB T_KONEC
;2-2-2-2vstup. rozsirit. AND-OR-INVERT S R_7460
; EEEEEE E E
;7453 ; BBBAAA A B
B36F I7453T: ; ZCBACBAF GYDXXXXD NBXHEDCA
B36F 26 00 1E 20 DB T_NZ3, 00000000B, 00011110B, 00100000B
B373 10 7F A1 5F DB T_VV3, 01111111B, 10100001B, 01011111B
B377 24 47 DB T_NAP, DIL24
B379 1F 80 5E A0 G7453T: DB T_W123, 10000000B, 01011110B, 10100000B
B37D 1F 81 9E FF DB T_W123, 10000001B, 10011110B, 11111111B
B381 1E 9E FE DB T_W23, 10011110B, 11111110B
B384 1E 9E BF DB T_W23, 10011110B, 10111111B
B387 1E 9E FD DB T_W23, 10011110B, 11111101B
B38A 1E 9E FB DB T_W23, 10011110B, 11111011B
B38D 1E 9E F7 DB T_W23, 10011110B, 11110111B
B390 1F 80 9E FF DB T_W123, 10000000B, 10011110B, 11111111B
B394 1F 81 1E FF DB T_W123, 10000001B, 00011110B, 11111111B
B398 1E 9E EF DB T_W23, 10011110B, 11101111B
B39B 1F 80 5E A1 DB T_W123, 10000000B, 01011110B, 10100001B
B39F 1E 5E E0 DB T_W23, 01011110B, 11100000B
B3A2 1E 5E A2 DB T_W23, 01011110B, 10100010B
B3A5 1E 5E A4 DB T_W23, 01011110B, 10100100B
B3A8 1E 5E A8 DB T_W23, 01011110B, 10101000B
B3AB 1F 81 5E A0 DB T_W123, 10000001B, 01011110B, 10100000B
B3AF 1F 80 DE A0 DB T_W123, 10000000B, 11011110B, 10100000B
B3B3 1E 5E B0 DB T_W23, 01011110B, 10110000B
B3B6 FE DB T_KONEC
;2-2-2-2vstup. rozsirit. AND-OR-INVERT S R_7460 A 7460
; EEEEEE E E
;7453 + 7460 ; BBBAAA A B
B3B7 I7453R: ; ZCBACBAF GYDXXXXD NBXHEDCA
B3B7 26 00 1E 20 DB T_NZ3, 00000000B, 00011110B, 00100000B
B3BB 10 7F A1 5F DB T_VV3, 01111111B, 10100001B, 01011111B
B3BF 24 47 DB T_NAP, DIL24
B3C1 1F FE 3F A0 DB T_W123, 11111110B, 00111111B, 10100000B
B3C5 1B 80 5E DB T_W12, 10000000B, 01011110B
B3C8 1B F0 1F DB T_W12, 11110000B, 00011111B
PROGRAM IOT MACRO-80 3.44 09-Dec-81 PAGE 1-198
B3CB 1B 8E 3E DB T_W12, 10001110B, 00111110B
B3CE 1B 9C 7E DB T_W12, 10011100B, 01111110B
B3D1 1B AA 7E DB T_W12, 10101010B, 01111110B
B3D4 1B C6 7E DB T_W12, 11000110B, 01111110B
B3D7 1B 8E 5F DB T_W12, 10001110B, 01011111B
B3DA 1B E2 5F DB T_W12, 11100010B, 01011111B
B3DD 1B D4 5F DB T_W12, 11010100B, 01011111B
B3E0 1B B8 5F DB T_W12, 10111000B, 01011111B
B3E3 1B F0 7E DB T_W12, 11110000B, 01111110B
B3E6 20 DB T_GOTO
B3E7 B379 DW G7453T
;2x 2-2vstup. AND-OR-INVERT
;7454 33221 1 44
B3E9 I7454T: ; ZXFECDAX XNBXXHGY
B3E9 25 01 98 DB T_NZ2, 00000001B, 10011000B
B3EC 08 3E 26 DB T_VV2, 00111110B, 00100110B
B3EF 24 44 DB T_NAP, DIL14
B3F1 1B FF FE DB T_W12, 11111111B, 11111110B
B3F4 1B C1 D9 DB T_W12, 11000001B, 11011001B
B3F7 1B F1 D8 DB T_W12, 11110001B, 11011000B
B3FA 1B CD D8 DB T_W12, 11001101B, 11011000B
B3FD 1B C3 F8 DB T_W12, 11000011B, 11111000B
B400 1B C1 DE DB T_W12, 11000001B, 11011110B
B403 1B FF F8 DB T_W12, 11111111B, 11111000B
B406 1B FD DE DB T_W12, 11111101B, 11011110B
B409 1B F3 FE DB T_W12, 11110011B, 11111110B
B40C 1B CF FE DB T_W12, 11001111B, 11111110B
B40F 1B EB DD DB T_W12, 11101011B, 11011101B
B412 1B D5 FB DB T_W12, 11010101B, 11111011B
B415 1B F3 F8 DB T_W12, 11110011B, 11111000B
B418 1B CD DE DB T_W12, 11001101B, 11011110B
B41B 1B E1 D9 DB T_W12, 11100001B, 11011001B
B41E 1B D1 D9 DB T_W12, 11010001B, 11011001B
B421 1B C9 D9 DB T_W12, 11001001B, 11011001B
B424 1B C5 D9 DB T_W12, 11000101B, 11011001B
B427 1B C3 D9 DB T_W12, 11000011B, 11011001B
B42A 1B C1 F9 DB T_W12, 11000001B, 11111001B
B42D 1B C1 DD DB T_W12, 11000001B, 11011101B
B430 1B C1 DB DB T_W12, 11000001B, 11011011B
B433 FE DB T_KONEC
;3-3vstup. 2-2vstup. AND-OR-INVERT
;74LS54 22211 44333
B434 I74LS54: ; ZYEDCBAX XNJIHGFX
B434 08 3E 3E DB T_VV2, 00111110B, 00111110B
B437 24 44 DB T_NAP, DIL14
B439 1B B9 C1 DB T_W12, 10111001B, 11000001B
B43C 1B 87 C1 DB T_W12, 10000111B, 11000001B
B43F 1B 81 F1 DB T_W12, 10000001B, 11110001B
B442 1B 81 CF DB T_W12, 10000001B, 11001111B
B445 1B BF F1 DB T_W12, 10111111B, 11110001B
B448 1B BF CF DB T_W12, 10111111B, 11001111B
B44B 1B B9 FF DB T_W12, 10111001B, 11111111B
B44E 1B 87 FF DB T_W12, 10000111B, 11111111B
B451 1B EB D5 DB T_W12, 11101011B, 11010101B
PROGRAM IOT MACRO-80 3.44 09-Dec-81 PAGE 1-199
B454 1B D5 EB DB T_W12, 11010101B, 11101011B
B457 1B B9 F1 DB T_W12, 10111001B, 11110001B
B45A 1B 87 CF DB T_W12, 10000111B, 11001111B
B45D 1B CB D3 DB T_W12, 11001011B, 11010011B
B460 1B D5 E5 DB T_W12, 11010101B, 11100101B
B463 1B E3 D9 DB T_W12, 11100011B, 11011001B
B466 FE DB T_KONEC
;4-4vstup. rozsirit. AND-OR-INVERT S R_7460
; EEEEEE E E
;7455 ; BBBAAA A B
B467 I7455T: ; ZCBACBAX EYDXXXXD NHGFDCBA
B467 25 00 1E DB T_NZ2, 00000000B, 00011110B
B46A 10 7E A1 7F DB T_VV3, 01111110B, 10100001B, 01111111B
B46E 24 47 DB T_NAP, DIL24
B470 1F 81 9E FF G7455T: DB T_W123, 10000001B, 10011110B, 11111111B
B474 1E 5E 80 DB T_W23, 01011110B, 10000000B
B477 1E 1E 8F DB T_W23, 00011110B, 10001111B
B47A 1E 9E F0 DB T_W23, 10011110B, 11110000B
B47D 1E 5E F1 DB T_W23, 01011110B, 11110001B
B480 1E DE E2 DB T_W23, 11011110B, 11100010B
B483 1E DE D4 DB T_W23, 11011110B, 11010100B
B486 1E DE B8 DB T_W23, 11011110B, 10111000B
B489 1E 5E C7 DB T_W23, 01011110B, 11000111B
B48C 1E 5E AB DB T_W23, 01011110B, 10101011B
B48F 1E 5E 9D DB T_W23, 01011110B, 10011101B
B492 1E DE 8E DB T_W23, 11011110B, 10001110B
B495 FE DB T_KONEC
;4-4vstup. rozsirit. AND-OR-INVERT S R_7460 A 7460
; EEEEEE E E
;7455 + 7460 ; BBBAAA A B
B496 I7455R: ; ZCBACBAX EYDXXXXD NHGFDCBA
B496 25 00 1E DB T_NZ2, 00000000B, 00011110B
B499 10 7E A1 7F DB T_VV3, 01111110B, 10100001B, 01111111B
B49D 24 47 DB T_NAP, DIL24
B49F 1F F1 1F 80 DB T_W123, 11110001B, 00011111B, 10000000B
B4A3 1B 8F 3E DB T_W12, 10001111B, 00111110B
B4A6 1B FF 3F DB T_W12, 11111111B, 00111111B
B4A9 1B 81 5E DB T_W12, 10000001B, 01011110B
B4AC 1B 9F 5E DB T_W12, 10011111B, 01011110B
B4AF 1B AD 7E DB T_W12, 10101101B, 01111110B
B4B2 1B CB 7E DB T_W12, 11001011B, 01111110B
B4B5 1B 87 7F DB T_W12, 10000111B, 01111111B
B4B8 1B E3 5F DB T_W12, 11100011B, 01011111B
B4BB 1B D5 5F DB T_W12, 11010101B, 01011111B
B4BE 1B B9 5F DB T_W12, 10111001B, 01011111B
B4C1 1B F1 7E DB T_W12, 11110001B, 01111110B
B4C4 20 DB T_GOTO
B4C5 B470 DW G7455T
;4-4vstup. AND-OR-INVERT
;74LS55
B4C7 I74LS55: ; ZXXDCBAX XNHGFEXY
B4C7 25 61 82 DB T_NZ2, 01100001B, 10000010B
B4CA 08 1E 3C DB T_VV2, 00011110B, 00111100B
PROGRAM IOT MACRO-80 3.44 09-Dec-81 PAGE 1-200
B4CD 24 44 DB T_NAP, DIL14
B4CF 1B E1 C3 DB T_W12, 11100001B, 11000011B
B4D2 1B FF FE DB T_W12, 11111111B, 11111110B
B4D5 1B E3 DF DB T_W12, 11100011B, 11011111B
B4D8 1B E5 EF DB T_W12, 11100101B, 11101111B
B4DB 1B E9 F7 DB T_W12, 11101001B, 11110111B
B4DE 1B F1 FB DB T_W12, 11110001B, 11111011B
B4E1 1B EF C7 DB T_W12, 11101111B, 11000111B
B4E4 1B F7 CB DB T_W12, 11110111B, 11001011B
B4E7 1B FB D3 DB T_W12, 11111011B, 11010011B
B4EA 1B FD E3 DB T_W12, 11111101B, 11100011B
B4ED 1B EB FE DB T_W12, 11101011B, 11111110B
B4F0 1B F5 FE DB T_W12, 11110101B, 11111110B
B4F3 1B FF EA DB T_W12, 11111111B, 11101010B
B4F6 1B FF D6 DB T_W12, 11111111B, 11010110B
B4F9 FE DB T_KONEC
;3-3vstup. 2-2vstup. AND-OR
;7458 222221 111111
B4FA I7458T: ; ZYDCBAAX XNCBFEDY
B4FA 08 3E 3E DB T_VV2, 00111110B, 00111110B
B4FD 24 44 DB T_NAP, DIL14
B4FF 1B F3 F1 DB T_W12, 11110011B, 11110001B
B502 1B CD CF DB T_W12, 11001101B, 11001111B
B505 1B FD C0 DB T_W12, 11111101B, 11000000B
B508 1B 83 FF DB T_W12, 10000011B, 11111111B
B50B 1B AB EC DB T_W12, 10101011B, 11101100B
B50E 1B 97 DA DB T_W12, 10010111B, 11011010B
B511 1B F5 F6 DB T_W12, 11110101B, 11110110B
B514 1B FB C8 DB T_W12, 11111011B, 11001000B
B517 1B ED E4 DB T_W12, 11101101B, 11100100B
B51A 1B DD D2 DB T_W12, 11011101B, 11010010B
B51D 1B F3 F5 DB T_W12, 11110011B, 11110101B
B520 1B CF FB DB T_W12, 11001111B, 11111011B
B523 1B FF DF DB T_W12, 11111111B, 11011111B
B526 1B 81 EF DB T_W12, 10000001B, 11101111B
B529 FE DB T_KONEC
;2x 4AND expander (LD1 LP1), testonano s 7423, 7450, 7453, 7455
;7460
B52A I7460T:
B52A 00 DB T_NIC
;4-2-3-2 vstup. AND-OR-INVERT
;7464, 7465 333112 22244
B52B I7464T: ; ZIHGFEAX XNDCBKJY
B52B 08 7E 3E DB T_VV2, 01111110B, 00111110B
B52E 24 44 DB T_NAP, DIL14
B530 1B 81 C1 DB T_W12, 10000001B, 11000001B
B533 1B FF FE DB T_W12, 11111111B, 11111110B
B536 1B F5 EA DB T_W12, 11110101B, 11101010B
B539 1B AF D4 DB T_W12, 10101111B, 11010100B
B53C 1B D7 FA DB T_W12, 11010111B, 11111010B
B53F 1B AB D6 DB T_W12, 10101011B, 11010110B
B542 1B E7 C5 DB T_W12, 11100111B, 11000101B
B545 1B D9 E3 DB T_W12, 11011001B, 11100011B
PROGRAM IOT MACRO-80 3.44 09-Dec-81 PAGE 1-201
B548 1B B5 D5 DB T_W12, 10110101B, 11010101B
B54B 1B C9 CB DB T_W12, 11001001B, 11001011B
B54E 1B A7 F5 DB T_W12, 10100111B, 11110101B
B551 1B 9B EB DB T_W12, 10011011B, 11101011B
B554 1B 8F D8 DB T_W12, 10001111B, 11011000B
B557 1B E5 FE DB T_W12, 11100101B, 11111110B
B55A 1B B1 F1 DB T_W12, 10110001B, 11110001B
B55D FE DB T_KONEC
;K.O. J-K s SR
;7472, 74110 /321/ /C213
B55E I7472T: ; ZQJJJRXX XNSPKKKQ
B55E 25 03 80 DB T_NZ2, 00000011B, 10000000B
B561 08 3C 3E DB T_VV2, 00111100B, 00111110B
B564 24 44 DB T_NAP, DIL14
B566 1B C3 E0 DB T_W12, 11000011B, 11100000B ;A-RESET
B569 1B A7 C1 DB T_W12, 10100111B, 11000001B ;A-SET
B56C 1B BF E1 DB T_W12, 10111111B, 11100001B
B56F 1A F1 DB T_W2, 11110001B
B571 1B BF E1 DB T_W12, 10111111B, 11100001B ;S-SET
B574 1B 87 EF DB T_W12, 10000111B, 11101111B
B577 1A FF DB T_W2, 11111111B
B579 1B C7 EE DB T_W12, 11000111B, 11101110B ;S-RESET
B57C 1B FF EE DB T_W12, 11111111B, 11101110B
B57F 1A FE DB T_W2, 11111110B
B581 1B BF EF DB T_W12, 10111111B, 11101111B ;T
B584 1A FF DB T_W2, 11111111B
B586 1B FF EE DB T_W12, 11111111B, 11101110B ;T
B589 1B EF E4 DB T_W12, 11101111B, 11100100B
B58C 1A F4 DB T_W2, 11110100B
B58E 1B EF E4 DB T_W12, 11101111B, 11100100B ;NIC
B591 1B D7 EA DB T_W12, 11010111B, 11101010B
B594 1A FA DB T_W2, 11111010B
B596 1B D7 EA DB T_W12, 11010111B, 11101010B ;NIC
B599 FE DB T_KONEC
;2X K.O. J-K s R 222 111 111 222
;7473 /C /C / /
B59A I7473T: ; XJRPNKRP JQQZKQQX
B59A 08 77 88 DB T_VV2, 01110111B, 10001000B
B59D 24 4A DB T_NAP, DIL4_13
B59F 27 DB T_ZIF14
B5A0 1B CC 53 DB T_W12, 11001100B, 01010011B ;A-RESET
B5A3 19 FF DB T_W1, 11111111B
B5A5 1B EE 55 DB T_W12, 11101110B, 01010101B ;S-1RESET, 2SET
B5A8 1B AA DD DB T_W12, 10101010B, 11011101B
B5AB 19 BB DB T_W1, 10111011B
B5AD 1B AA BB DB T_W12, 10101010B, 10111011B ;S-2RESET, 1SET
B5B0 1B EE BB DB T_W12, 11101110B, 10111011B
B5B3 19 FF DB T_W1, 11111111B
B5B5 1B EE DD DB T_W12, 11101110B, 11011101B ;T
B5B8 19 FF DB T_W1, 11111111B
B5BA 1B EE BB DB T_W12, 11101110B, 10111011B ;T
B5BD FE DB T_KONEC
;2X K.O. D. s SR
PROGRAM IOT MACRO-80 3.44 09-Dec-81 PAGE 1-202
;7474 / /C / / C/ /
B5BE I7474T: ; ZQQSPDRX XNRDPSQQ
B5BE 08 1E 3C DB T_VV2, 00011110B, 00111100B
B5C1 24 44 DB T_NAP, DIL14
B5C3 1B A3 D5 DB T_W12, 10100011B, 11010101B ;A-SET, RESET
B5C6 1B D5 E2 DB T_W12, 11010101B, 11100010B ;A-RESET, SET
B5C9 1B D7 E6 DB T_W12, 11010111B, 11100110B
B5CC 1B BF ED DB T_W12, 10111111B, 11101101B ;S-SET, RESET
B5CF 1B B3 F5 DB T_W12, 10110011B, 11110101B
B5D2 1B DB FE DB T_W12, 11011011B, 11111110B ;S-RESET, SET
B5D5 FE DB T_KONEC
;2X 2BIT STRADAC _ _ _ _
;7475 332 2100 0111 223
B5D6 I7475T: ; QDDNEDDQ QQQEZQQQ
B5D6 08 6E 10 DB T_VV2, 01101110B, 00010000B
B5D9 24 48 DB T_NAP, DIL5_12
B5DB 1B BA BA DB T_W12, 10111010B, 10111010B ;TRANPARENTNI
B5DE 1B B2 AA DB T_W12, 10110010B, 10101010B
B5E1 1B D4 AA DB T_W12, 11010100B, 10101010B ;ZACHYT
B5E4 1B 5D 5D DB T_W12, 01011101B, 01011101B ;TRANPARENTNI
B5E7 1B 55 4D DB T_W12, 01010101B, 01001101B
B5EA 1B 33 4D DB T_W12, 00110011B, 01001101B ;ZACHYT
B5ED FE DB T_KONEC
;2X K.O. J-K s SR 222 1111 111 2222
;7476, 74106 __C __C _ _
B5EE I7476T: ; RSPNJRSP KQQZKQQJ
B5EE 08 EF 89 DB T_VV2, 11101111B, 10001001B
B5F1 24 4B DB T_NAP, DIL5_13
B5F3 1B 54 D3 DB T_W12, 01010100B, 11010011B ;A-RESET, SET
B5F6 1B 9A 3C DB T_W12, 10011010B, 00111100B ;A-SET, RESET
B5F9 1B DE 3C DB T_W12, 11011110B, 00111100B
B5FC 19 FF DB T_W1, 11111111B
B5FE 1B DE 5A DB T_W12, 11011110B, 01011010B ;S-RESET, SET
B601 1B D6 D3 DB T_W12, 11010110B, 11010011B
B604 19 F7 DB T_W1, 11110111B
B606 1B D6 B5 DB T_W12, 11010110B, 10110101B ;S-SET, RESET
B609 1B DE BD DB T_W12, 11011110B, 10111101B
B60C 19 FF DB T_W1, 11111111B
B60E 1B DE DB DB T_W12, 11011110B, 11011011B ;T
B611 19 FF DB T_W1, 11111111B
B613 1B DE BD DB T_W12, 11011110B, 10111101B ;T
B616 FE DB T_KONEC
;2X 2bit. stradac
;7477 N23 210 011 32
B617 I7477T: ; XCDDNEDD QQEZXQQX
B617 25 C0 09 DB T_NZ2, 11000000B, 00001001B
B61A 08 37 20 DB T_VV2, 00110111B, 00100000B
B61D 24 4A DB T_NAP, DIL4_13
B61F 27 DB T_ZIF14
B620 1B DD BD DB T_W12, 11011101B, 10111101B ;TRANPARENTNI
B623 1B D9 9D DB T_W12, 11011001B, 10011101B ;ZACHYT
B626 1B EA 9D DB T_W12, 11101010B, 10011101B
B629 1B EE 7B DB T_W12, 11101110B, 01111011B ;TRANPARENTNI
PROGRAM IOT MACRO-80 3.44 09-Dec-81 PAGE 1-203
B62C 1B EA 5B DB T_W12, 11101010B, 01011011B ;ZACHYT
B62F 1B D9 5B DB T_W12, 11011001B, 01011011B
B632 FE DB T_KONEC
;SRAM 16x1bit __
;7481 321 123 4HHL L4
B633 I7481T: ; xYYYNXXX XWQQZWYx
B633 08 77 C6 DB T_VV2, 01110111B, 11000110B
B636 24 49 DB T_NAP, DIL4_12
B638 27 DB T_ZIF14
B639 1B 9C 29 DB T_W12, 10011100B, 00101001B
B63C 1A 69 DB T_W2, 01101001B
B63E 1A 29 DB T_W2, 00101001B ;A=0, D=0, ZAPIS
B640 19 9A DB T_W1, 10011010B
B642 1A 2D DB T_W2, 00101101B
B644 1A 29 DB T_W2, 00101001B ;A=1, D=1
B646 19 99 DB T_W1, 10011001B
B648 1A 69 DB T_W2, 01101001B
B64A 1A 29 DB T_W2, 00101001B ;A=2, D=0
B64C 1B 98 A9 DB T_W12, 10011000B, 10101001B
B64F 1A AD DB T_W2, 10101101B
B651 1A A9 DB T_W2, 10101001B ;A=3, D=1
B653 1B AC 29 DB T_W12, 10101100B, 00101001B
B656 1A 2D DB T_W2, 00101101B
B658 1A 29 DB T_W2, 00101001B ;A=4, D=1
B65A 19 AA DB T_W1, 10101010B
B65C 1A 69 DB T_W2, 01101001B
B65E 1A 29 DB T_W2, 00101001B ;A=5, D=0
B660 19 A9 DB T_W1, 10101001B
B662 1A 2D DB T_W2, 00101101B
B664 1A 29 DB T_W2, 00101001B ;A=6, D=1
B666 1B A8 A9 DB T_W12, 10101000B, 10101001B
B669 1A E9 DB T_W2, 11101001B
B66B 1A A9 DB T_W2, 10101001B ;A=7, D=0
B66D 1B CC 29 DB T_W12, 11001100B, 00101001B
B670 1A 69 DB T_W2, 01101001B
B672 1A 29 DB T_W2, 00101001B ;A=8, D=0
B674 19 CA DB T_W1, 11001010B
B676 1A 2D DB T_W2, 00101101B
B678 1A 29 DB T_W2, 00101001B ;A=9, D=1
B67A 19 C9 DB T_W1, 11001001B
B67C 1A 69 DB T_W2, 01101001B
B67E 1A 29 DB T_W2, 00101001B ;A=A, D=0
B680 1B C8 A9 DB T_W12, 11001000B, 10101001B
B683 1A AD DB T_W2, 10101101B
B685 1A A9 DB T_W2, 10101001B ;A=B, D=1
B687 1B 8C 2B DB T_W12, 10001100B, 00101011B
B68A 1A 2F DB T_W2, 00101111B
B68C 1A 2B DB T_W2, 00101011B ;A=C, D=1
B68E 19 8A DB T_W1, 10001010B
B690 1A 6B DB T_W2, 01101011B
B692 1A 2B DB T_W2, 00101011B ;A=D, D=0
B694 19 89 DB T_W1, 10001001B
B696 1A 2F DB T_W2, 00101111B
B698 1A 2B DB T_W2, 00101011B ;A=E, D=1
B69A 1B 88 AB DB T_W12, 10001000B, 10101011B
PROGRAM IOT MACRO-80 3.44 09-Dec-81 PAGE 1-204
B69D 1A EB DB T_W2, 11101011B
B69F 1A AB DB T_W2, 10101011B ;A=F, D=0
B6A1 1B 9C 19 DB T_W12, 10011100B, 00011001B ;A=0, D=0, CTENI
B6A4 1B 9A 29 DB T_W12, 10011010B, 00101001B ;A=1, D=1
B6A7 1B 99 19 DB T_W12, 10011001B, 00011001B ;A=2, D=0
B6AA 1B 98 A9 DB T_W12, 10011000B, 10101001B ;A=3, D=1
B6AD 1B AC 29 DB T_W12, 10101100B, 00101001B ;A=4, D=1
B6B0 1B AA 19 DB T_W12, 10101010B, 00011001B ;A=5, D=0
B6B3 1B A9 29 DB T_W12, 10101001B, 00101001B ;A=6, D=1
B6B6 1B A8 99 DB T_W12, 10101000B, 10011001B ;A=7, D=0
B6B9 1B CC 19 DB T_W12, 11001100B, 00011001B ;A=8, D=0
B6BC 1B CA 29 DB T_W12, 11001010B, 00101001B ;A=9, D=1
B6BF 1B C9 19 DB T_W12, 11001001B, 00011001B ;A=A, D=0
B6C2 1B C8 A9 DB T_W12, 11001000B, 10101001B ;A=B, D=1
B6C5 1B 8C 2B DB T_W12, 10001100B, 00101011B ;A=C, D=1
B6C8 1B 8A 1B DB T_W12, 10001010B, 00011011B ;A=B, D=0
B6CB 1B 8D 2B DB T_W12, 10001101B, 00101011B ;A=C, D=1
B6CE 1B 88 9B DB T_W12, 10001000B, 10011011B ;A=D, D=0
B6D1 FE DB T_KONEC
;4bit. uplna scitacka
;7483 222 3334 44OI 111
B6D2 I7483T: ; ABSNBASA BSCCZBAS
B6D2 08 CD 96 DB T_VV2, 11001101B, 10010110B
B6D5 24 48 DB T_NAP, DIL5_12
B6D7 1B 10 08 DB T_W12, 00010000B, 00001000B ;0000+0000+0=0 0000
B6DA 1B FF FF DB T_W12, 11111111B, 11111111B ;1111+1111+1=1 1111
B6DD 1B 10 19 DB T_W12, 00010000B, 00011001B ;0000+0000+1=0 0001
B6E0 1B FF EE DB T_W12, 11111111B, 11101110B ;1111+1111+0=1 1110
B6E3 1B 3C 4E DB T_W12, 00111100B, 01001110B ;0101+0101+0=0 1010
B6E6 1B D3 A8 DB T_W12, 11010011B, 10101000B ;1010+1010+0=1 0100
B6E9 1B 3C 5F DB T_W12, 00111100B, 01011111B ;0101+0101+1=0 1011
B6EC 1B D3 B9 DB T_W12, 11010011B, 10111001B ;1010+1010+1=1 0101
B6EF 1B 76 CB DB T_W12, 01110110B, 11001011B ;0101+1010+0=0 1111
B6F2 1B 54 BA DB T_W12, 01010100B, 10111010B ;0101+1010+1=1 0000
B6F5 FE DB T_KONEC
;4bit. komparator A - B
;7485, 4063 <=>>=<3 3221100
B6F6 I7485T: ; ZQQQIIIB NABAABAB
B6F6 08 0F 7F DB T_VV2, 00001111B, 01111111B ; 3210 3210 ><= ><=
B6F9 24 45 DB T_NAP, DIL16 ; AAAA BBBB III QQQ
B6FB 1B 94 D5 DB T_W12, 10010100B, 11010101B ;A>B 1100 0011 001 100
B6FE 1B C5 AA DB T_W12, 11000101B, 10101010B ;Ab - A=B 1010 1010 100 100
B704 1B A4 B3 DB T_W12, 10100100B, 10110011B ;a=b - A=B 0101 0101 001 001
B707 1B C2 BC DB T_W12, 11000010B, 10111100B ;ab - A=B 1100 1100 111 001
B710 1B 8B FC DB T_W12, 10001011B, 11111100B ;a<>b - A=B 1110 1110 110 000
B713 1B D0 8F DB T_W12, 11010000B, 10001111B ;a..b - A=B 0011 0011 000 110
B716 FE DB T_KONEC
;4x 2EX-OR
;7486, 74136
B717 I7486T: ; ZYBAYBAX XNBAYBAY
PROGRAM IOT MACRO-80 3.44 09-Dec-81 PAGE 1-205
B717 08 36 36 DB T_VV2, 00110110B, 00110110B
B71A 24 44 DB T_NAP, DIL14
B71C 1B 8D EE DB T_W12, 10001101B, 11101110B
B71F 1B EB F0 DB T_W12, 11101011B, 11110000B
B722 1B D7 C3 DB T_W12, 11010111B, 11000011B
B725 1B B1 DD DB T_W12, 10110001B, 11011101B
B728 FE DB T_KONEC
;SRAM 16x4bity _ _ __ _ _
;7489 1100WC0 1233322
B729 I7489T: ; ZQDQDREA NAAADQDQ
B729 08 2F 7A DB T_VV2, 00101111B, 01111010B
B72C 24 45 DB T_NAP, DIL16
B72E 1B AA AA DB T_W12, 10101010B, 10101010B ;TRANSPARENTNI
B731 G7489T:
B731 1B FF AF DB T_W12, 11111111B, 10101111B ;/CE=/WR=1
B734 0B D6 85 DB T_O12, 11010110B, 10000101B ;A0=D0, ZAPIS
B737 09 D0 DB T_O1, 11010000B
B739 09 D6 DB T_O1, 11010110B
B73B 0B DF 85 DB T_O12, 11011111B, 10000101B ;A1=D1
B73E 09 C9 DB T_O1, 11001001B
B740 09 DF DB T_O1, 11011111B
B742 0B F6 C5 DB T_O12, 11110110B, 11000101B ;A2=D2
B745 09 B0 DB T_O1, 10110000B
B747 09 B6 DB T_O1, 10110110B
B749 0B AF C5 DB T_O12, 10101111B, 11000101B ;A3=D3
B74C 09 A9 DB T_O1, 10101001B
B74E 09 AF DB T_O1, 10101111B
B750 0B D6 A6 DB T_O12, 11010110B, 10100110B ;A4=D4
B753 09 D0 DB T_O1, 11010000B
B755 09 D6 DB T_O1, 11010110B
B757 0B CF A6 DB T_O12, 11001111B, 10100110B ;A5=D5
B75A 09 C9 DB T_O1, 11001001B
B75C 09 CF DB T_O1, 11001111B
B75E 0B B6 E6 DB T_O12, 10110110B, 11100110B ;A6=D6
B761 09 B0 DB T_O1, 10110000B
B763 09 B6 DB T_O1, 10110110B
B765 0B AF E6 DB T_O12, 10101111B, 11100110B ;A7=D7
B768 09 A9 DB T_O1, 10101001B
B76A 09 AF DB T_O1, 10101111B
B76C 0B D6 99 DB T_O12, 11010110B, 10011001B ;A8=D8
B76F 09 D0 DB T_O1, 11010000B
B771 09 D6 DB T_O1, 11010110B
B773 0B CF 99 DB T_O12, 11001111B, 10011001B ;A9=D9
B776 09 C9 DB T_O1, 11001001B
B778 09 CF DB T_O1, 11001111B
B77A 0B B6 D9 DB T_O12, 10110110B, 11011001B ;A10=D10
B77D 09 B0 DB T_O1, 10110000B
B77F 09 B6 DB T_O1, 10110110B
B781 0B AF D9 DB T_O12, 10101111B, 11011001B ;A11=D11
B784 09 A9 DB T_O1, 10101001B
B786 09 AF DB T_O1, 10101111B
B788 0B D6 BA DB T_O12, 11010110B, 10111010B ;A12=D12
B78B 09 D0 DB T_O1, 11010000B
B78D 09 D6 DB T_O1, 11010110B
B78F 0B CF BA DB T_O12, 11001111B, 10111010B ;A13=D13
PROGRAM IOT MACRO-80 3.44 09-Dec-81 PAGE 1-206
B792 09 C9 DB T_O1, 11001001B
B794 09 CF DB T_O1, 11001111B
B796 0B B6 FA DB T_O12, 10110110B, 11111010B ;A14=D14
B799 09 B0 DB T_O1, 10110000B
B79B 09 B6 DB T_O1, 10110110B
B79D 0B AF FA DB T_O12, 10101111B, 11111010B ;A15=D15
B7A0 09 A9 DB T_O1, 10101001B
B7A2 09 AF DB T_O1, 10101111B
B7A4 1B FC 8F DB T_W12, 11111100B, 10001111B ;A0=D0, CTENI
B7A7 1B E5 8F DB T_W12, 11100101B, 10001111B ;A1=D1
B7AA 1B 9C CF DB T_W12, 10011100B, 11001111B ;A2=D2
B7AD 1B 85 CF DB T_W12, 10000101B, 11001111B ;A3=D3
B7B0 1B FC AC DB T_W12, 11111100B, 10101100B ;A4=D4
B7B3 1B E5 AC DB T_W12, 11100101B, 10101100B ;A5=D5
B7B6 1B 9C EC DB T_W12, 10011100B, 11101100B ;A6=D6
B7B9 1B 85 EC DB T_W12, 10000101B, 11101100B ;A7=D7
B7BC 1B FC 93 DB T_W12, 11111100B, 10010011B ;A8=D8
B7BF 1B E5 93 DB T_W12, 11100101B, 10010011B ;A9=D9
B7C2 1B 9C D3 DB T_W12, 10011100B, 11010011B ;A10=D10
B7C5 1B 85 D3 DB T_W12, 10000101B, 11010011B ;A11=D11
B7C8 1B FC B0 DB T_W12, 11111100B, 10110000B ;A12=D12
B7CB 1B E5 B0 DB T_W12, 11100101B, 10110000B ;A13=D13
B7CE 1B 9C F0 DB T_W12, 10011100B, 11110000B ;A14=D14
B7D1 1B 85 F0 DB T_W12, 10000101B, 11110000B ;A15=D15
B7D4 FE DB T_KONEC
;BCD citac 21 212 1
;7490 MM MMC C 03 12
B7D5 I7490T: ; XSSNXRRP PXQQZQQX
B7D5 25 88 41 DB T_NZ2, 10001000B, 01000001B
B7D8 08 67 80 DB T_VV2, 01100111B, 10000000B
B7DB 24 48 DB T_NAP, DIL5_12
B7DD 27 DB T_ZIF14
B7DE 1B F9 F9 DB T_W12, 11111001B, 11111001B ;RESET 9
B7E1 1B 9F C9 DB T_W12, 10011111B, 11001001B ;RESET 0
B7E4 1B 9B C9 DB T_W12, 10011011B, 11001001B
B7E7 1B 9A 6D DB T_W12, 10011010B, 01101101B ;1,1
B7EA 1B 9D ED DB T_W12, 10011101B, 11101101B
B7ED 1B 9C 4B DB T_W12, 10011100B, 01001011B ;0,2
B7F0 1B D9 CB DB T_W12, 11011001B, 11001011B
B7F3 1B D8 6F DB T_W12, 11011000B, 01101111B ;1,3
B7F6 1B B9 EF DB T_W12, 10111001B, 11101111B
B7F9 1B B8 59 DB T_W12, 10111000B, 01011001B ;0,4
B7FC 1B 99 D9 DB T_W12, 10011001B, 11011001B
B7FF 1B 98 69 DB T_W12, 10011000B, 01101001B ;1,0
B802 FE DB T_KONEC
;8bit. posuv. reg. _
;7491 77AB C
B803 I7491T: ; XXXNXXXX QQDDZPXX
B803 25 EF 03 DB T_NZ2, 11101111B, 00000011B
B806 08 00 34 DB T_VV2, 00000000B, 00110100B
B809 24 48 DB T_NAP, DIL5_12
B80B 27 DB T_ZIF14
B80C 0A 0B DB T_O2, 00001011B
B80E 0A 0F DB T_O2, 00001111B ;1:ULOZ 0
PROGRAM IOT MACRO-80 3.44 09-Dec-81 PAGE 1-207
B810 0A 1B DB T_O2, 00011011B
B812 0A 1F DB T_O2, 00011111B ;2:ULOZ 0
B814 0A 2B DB T_O2, 00101011B
B816 0A 2F DB T_O2, 00101111B ;2:ULOZ 0
B818 0A 3B DB T_O2, 00111011B
B81A 0A 3F DB T_O2, 00111111B ;4:ULOZ 1
B81C 0A 0B DB T_O2, 00001011B
B81E 0A 0F DB T_O2, 00001111B ;5:ULOZ 0
B820 0A 1B DB T_O2, 00011011B
B822 0A 1F DB T_O2, 00011111B ;6:ULOZ 0
B824 0A 2B DB T_O2, 00101011B
B826 0A 2F DB T_O2, 00101111B ;7:ULOZ 0
B828 0A BB DB T_O2, 10111011B
B82A 1A BF DB T_W2, 10111111B ;8:ULOZ 1
B82C 1A 8B DB T_W2, 10001011B
B82E 1A 8F DB T_W2, 10001111B ;1:ULOZ 0
B830 1A 9B DB T_W2, 10011011B
B832 1A 9F DB T_W2, 10011111B ;2:ULOZ 0
B834 1A AB DB T_W2, 10101011B
B836 1A 6F DB T_W2, 01101111B ;3:ULOZ 0
B838 1A 7B DB T_W2, 01111011B
B83A 1A BF DB T_W2, 10111111B ;4:ULOZ 1
B83C 1A 8B DB T_W2, 10001011B
B83E 1A 8F DB T_W2, 10001111B ;5:ULOZ 0
B840 1A 9B DB T_W2, 10011011B
B842 1A 9F DB T_W2, 10011111B ;6:ULOZ 0
B844 1A AB DB T_W2, 10101011B
B846 1A 6F DB T_W2, 01101111B ;7:ULOZ 0
B848 1A 7B DB T_W2, 01111011B
B84A 1A BF DB T_W2, 10111111B ;8:ULOZ 1
B84C FE DB T_KONEC
;4bit. citac do 12 21 2 1
;7492 MM C C 01 23
B84D I7492T: ; XRRNXXXP PXQQZQQX
B84D 25 8E 41 DB T_NZ2, 10001110B, 01000001B
B850 08 61 80 DB T_VV2, 01100001B, 10000000B
B853 24 48 DB T_NAP, DIL5_12
B855 27 DB T_ZIF14
B856 1B FF C9 DB T_W12, 11111111B, 11001001B ;RESET
B859 1B 9F C9 DB T_W12, 10011111B, 11001001B
B85C 1B 9E 79 DB T_W12, 10011110B, 01111001B ;1,1
B85F 1B 9F F9 DB T_W12, 10011111B, 11111001B
B862 1B 9E 4D DB T_W12, 10011110B, 01001101B ;0,2
B865 1B BF CD DB T_W12, 10111111B, 11001101B
B868 1B BE 6B DB T_W12, 10111110B, 01101011B ;1,3
B86B 1B DF EB DB T_W12, 11011111B, 11101011B
B86E 1B DE 5B DB T_W12, 11011110B, 01011011B ;0,4
B871 1B 9F DB DB T_W12, 10011111B, 11011011B
B874 1B 9E 6F DB T_W12, 10011110B, 01101111B ;1,5
B877 1B 9F EF DB T_W12, 10011111B, 11101111B
B87A 1B 9E 49 DB T_W12, 10011110B, 01001001B ;0,0
B87D 1B 9F C9 DB T_W12, 10011111B, 11001001B
B880 1B 9E 79 DB T_W12, 10011110B, 01111001B ;1,1
B883 FE DB T_KONEC
PROGRAM IOT MACRO-80 3.44 09-Dec-81 PAGE 1-208
;4bit. BIN citac 212 1
;7493 MMC C 03 12
B884 I7493T: ; XXXNXRRP PXQQZQQX
B884 25 E8 41 DB T_NZ2, 11101000B, 01000001B
B887 08 07 80 DB T_VV2, 00000111B, 10000000B
B88A 24 48 DB T_NAP, DIL5_12
B88C 27 DB T_ZIF14
B88D 1B FF C9 DB T_W12, 11111111B, 11001001B ;RESET
B890 1B FB C9 DB T_W12, 11111011B, 11001001B
B893 1B FA 6D DB T_W12, 11111010B, 01101101B ;1,1
B896 1B F9 ED DB T_W12, 11111001B, 11101101B
B899 1B F8 4B DB T_W12, 11111000B, 01001011B ;0,2
B89C 1B FD CB DB T_W12, 11111101B, 11001011B
B89F 1B FC 6F DB T_W12, 11111100B, 01101111B ;1,3
B8A2 1B F9 EF DB T_W12, 11111001B, 11101111B
B8A5 1B F8 59 DB T_W12, 11111000B, 01011001B ;0,4
B8A8 1B F9 D9 DB T_W12, 11111001B, 11011001B
B8AB 1B F8 7D DB T_W12, 11111000B, 01111101B ;1,5
B8AE 1B F9 FD DB T_W12, 11111001B, 11111101B
B8B1 1B F8 5B DB T_W12, 11111000B, 01011011B ;0,6
B8B4 1B F9 DB DB T_W12, 11111001B, 11011011B
B8B7 1B F8 7F DB T_W12, 11111000B, 01111111B ;1,7
B8BA 1B F9 FF DB T_W12, 11111001B, 11111111B
B8BD 1B F8 49 DB T_W12, 11111000B, 01001001B ;0,0
B8C0 1B F9 C9 DB T_W12, 11111001B, 11001001B
B8C3 1B F8 6D DB T_W12, 11111000B, 01101101B ;1,1
B8C6 FE DB T_KONEC
;4bit. posuv. reg. s par. a ser. vstupem, par. vystup
;7495 3210S 012312
B8C7 I7495T: ; ZSDDDDDX XNQQQQCC
B8C7 08 7E 03 DB T_VV2, 01111110B, 00000011B
B8CA 24 44 DB T_NAP, DIL14
B8CC 0B D5 E9 DB T_O12, 11010101B, 11101001B ;11101000B
B8CF 1A E8 DB T_W2, 11101000B ;PARARELNI VSTUP DAT
B8D1 1B 83 EA DB T_W12, 10000011B, 11101010B ;SERIOVY VSTUP DAT
B8D4 1A F4 DB T_W2, 11110100B
B8D6 1B BD F6 DB T_W12, 10111101B, 11110110B ;SERIOVY VSTUP DAT
B8D9 1A D8 DB T_W2, 11011000B
B8DB 1B 83 DA DB T_W12, 10000011B, 11011010B ;SERIOVY VSTUP DAT
B8DE 1A EC DB T_W2, 11101100B
B8E0 1B 81 EE DB T_W12, 10000001B, 11101110B ;SERIOVY VSTUP DAT
B8E3 1A D4 DB T_W2, 11010100B
B8E5 FE DB T_KONEC
;5bit. posuv. reg. s par. a ser. vstupem, par. vystup, R
;7496 P43 210C M012 34S
B8E6 I7496T: ; EDDNDDDP RQQQZQQD
B8E6 08 EF 81 DB T_VV2, 11101111B, 10000001B
B8E9 24 48 DB T_NAP, DIL5_12
B8EB 1B 54 09 DB T_W12, 01010100B, 00001001B
B8EE 1B D4 AB DB T_W12, 11010100B, 10101011B
B8F1 19 54 DB T_W1, 01010100B
B8F3 1B 3F D9 DB T_W12, 00111111B, 11011001B
B8F6 1B 5E D8 DB T_W12, 01011110B, 11011000B
B8F9 1B 77 AC DB T_W12, 01110111B, 10101100B
PROGRAM IOT MACRO-80 3.44 09-Dec-81 PAGE 1-209
B8FC 1B 7A AD DB T_W12, 01111010B, 10101101B
B8FF 1B 7D DB DB T_W12, 01111101B, 11011011B
B902 1B 7A DB DB T_W12, 01111010B, 11011011B
B905 1B 77 ED DB T_W12, 01110111B, 11101101B
B908 1B 5E EC DB T_W12, 01011110B, 11101100B
B90B 1B 3F BA DB T_W12, 00111111B, 10111010B
B90E 1B 5E BB DB T_W12, 01011110B, 10111011B
B911 1B 77 DD DB T_W12, 01110111B, 11011101B
B914 1B 7A DC DB T_W12, 01111010B, 11011100B
B917 FE DB T_KONEC
;synchr. program. delic C
;7497 E 0541 32MAESC
B918 I7497T: ; ZOYZAAAA NAARSITP
B918 08 8F FF DB T_VV2, 10001111B, 11111111B
B91B 24 45 DB T_NAP, DIL16
B91D 1B DF FD DB T_W12, 11011111B, 11111101B
B920 1B FF F5 DB T_W12, 11111111B, 11110101B
B923 1B EF F4 DB T_W12, 11101111B, 11110100B
B926 1B EF FC DB T_W12, 11101111B, 11111100B
B929 1B DF FE DB T_W12, 11011111B, 11111110B
B92C 1B DF FF DB T_W12, 11011111B, 11111111B
B92F 1B FF F7 DB T_W12, 11111111B, 11110111B
B932 1B FF F6 DB T_W12, 11111111B, 11110110B
B935 1B FF E1 DB T_W12, 11111111B, 11100001B
B938 1B EF E0 DB T_W12, 11101111B, 11100000B
B93B 1B DF E9 DB T_W12, 11011111B, 11101001B
B93E 1B EF E8 DB T_W12, 11101111B, 11101000B
B941 1B DF FB DB T_W12, 11011111B, 11111011B ;RESET
B944 1B DF E9 DB T_W12, 11011111B, 11101001B
B947 23 DB T_PROG
B948 B95D DW P7497A ;64 PULZU
B94A 1B 98 89 DB T_W12, 10011000B, 10001001B
B94D 23 DB T_PROG
B94E B964 DW P7497B ;1 PULZU
B950 1B 95 A9 DB T_W12, 10010101B, 10101001B
B953 23 DB T_PROG
B954 B96B DW P7497C ;38 PULZU
B956 1B 9A C9 DB T_W12, 10011010B, 11001001B
B959 23 DB T_PROG
B95A B972 DW P7497D ;25 PULZU
B95C FE DB T_KONEC
;POKRACUJE TEST PONOCI PROGAMU VE TROJOVEM KODU
;POCET PULZU
;POCET KROKU
;POCITADLO KROKU
;POCITADLO PULZU
B95D 06 3F P7497A: MVI B,63 ;POCET PULZU
B95F 0E 3F MVI C,63 ;POCET KROKU
B961 C3 B976 JMP P7497E
B964 0E 40 P7497B: MVI C,64 ;POCET KROKU
B966 06 01 MVI B,1 ;POCET PULZU
B968 C3 B974 JMP P7497J
B96B 06 26 P7497C: MVI B,38 ;POCET PULZU
PROGRAM IOT MACRO-80 3.44 09-Dec-81 PAGE 1-210
B96D 0E 40 MVI C,64 ;POCET KROKU
B96F C3 B974 JMP P7497J
B972 06 19 P7497D: MVI B,25 ;POCET PULZU
B974 0E 40 P7497J: MVI C,64 ;POCET KROKU
B976 11 0000 P7497E: LXI D,0 ;NUNULJ POCITADLA
B979 21 0000 LXI H,0
B97C DB 39 P7497I: IN PORT2
B97E 3D DCR A
B97F D3 39 OUT PORT2 ;CP NA 0
B981 DB 38 IN PORT1 ;NACTI STAV
B983 E6 70 ANI 01110000B ;JEN BITI CO POTREBUJEM
B985 FE 50 CPI 01010000B ;TAST NA STAV BEZ PULZU
B987 CA B99D JZ P7497F ;NENI-LI PUZ TAK DALE
B98A FE 10 CPI 00010000B ;TAST NA STAV BEZ PULZU PRI PRVNIM KROKU
B98C CA B998 JZ P7497G
B98F FE 60 CPI 01100000B ;TAST NA STAV S PULZU
B991 C2 BB56 JNZ P74121C ;JE-LI CHYBA TAK NAVRAT S HLASENIM
B994 1C INR E ;PRICTI PULZ
B995 C3 B99D JMP P7497F
B998 7A P7497G: MOV A,D
B999 A7 ANA A
B99A C2 BB56 JNZ P74121C ;JE-LI CHYBA TAK NAVRAT S HLASENIM
B99D 14 P7497F: INR D ;PRICTI KROK
B99E DB 39 IN PORT2
B9A0 3C INR A
B9A1 D3 39 OUT PORT2 ;CP NA 1
B9A3 DB 38 IN PORT1 ;NACTI STAV
B9A5 E6 70 ANI 01110000B ;JEN BITY CO POTREBUJEM
B9A7 FE 10 CPI 00010000B
B9A9 CA B9B4 JZ P7497H ;POSLEDNI KROK
B9AC FE 50 CPI 01010000B
B9AE CA B97C JZ P7497I ;JESTE NENI KONEC
B9B1 C3 BB56 JMP P74121C ;VSE OSTATNI JE CHYBA
B9B4 7A P7497H: MOV A,D
B9B5 B9 CMP C
B9B6 C2 BB56 JNZ P74121C ;SPADNY POCET KROKU
B9B9 3E 2A MVI A,'*'
B9BB CD 4937 CALL COA ;"*" ZA SPAVNY POCET TROKU
B9BE 7B MOV A,E
B9BF B8 CMP B
B9C0 C2 BB56 JNZ P74121C ;SPADNY POCET PULZU
B9C3 3E 23 MVI A,'#'
B9C5 CD 4937 CALL COA ;"#" ZA SPAVNY POCET KROKU
B9C8 C9 RET ;NAVRAT ZE STROJOVEHO KODU
;2x 4bit. stradac TP 0110 0 322332 23110
;74100 BBBBB A AABBBB AAAAAA
B9C9 I74100T: ; ZEDDQQXQ QQQQDDXX NEDDQDDX
B9C9 26 02 03 01 DB T_NZ3, 00000010B, 00000011B, 00000001B
B9CD 10 70 0C 76 DB T_VV3, 01110000B, 00001100B, 01110110B
B9D1 24 47 DB T_NAP, DIL24
B9D3 1F E7 67 E3 DB T_W123, 11100111B, 01100111B, 11100011B ;TRANSPARENTNI
B9D7 1D A7 A3 DB T_w13, 10100111B, 10100011B
B9DA 1F 97 6B 95 DB T_W123, 10010111B, 01101011B, 10010101B ;ZACHYT
B9DE 1F DA 9B DD DB T_W123, 11011010B, 10011011B, 11011101B ;TRANSPARENTNI
PROGRAM IOT MACRO-80 3.44 09-Dec-81 PAGE 1-211
B9E2 1D 9A 9D DB T_w13, 10011010B, 10011101B
B9E5 1F AA 97 AB DB T_W123, 10101010B, 10010111B, 10101011B ;ZACHYT
B9E9 FE DB T_KONEC
;2x K.O. J-K s R _ _ __ __
;74107 221111 112222
B9EA I74107T: ; ZQQKQQJX XNRCKRCJ
B9EA 08 12 3F DB T_VV2, 00010010B, 00111111B
B9ED 24 44 DB T_NAP, DIL14
B9EF 1B D5 C1 DB T_W12, 11010101B, 11000001B ;A-RESET
B9F2 1A F7 DB T_W2, 11110111B
B9F4 1B B5 E5 DB T_W12, 10110101B, 11100101B ;S-1RESET, 2SET
B9F7 1B A7 EC DB T_W12, 10100111B, 11101100B
B9FA 1A FE DB T_W2, 11111110B
B9FC 1B CB EC DB T_W12, 11001011B, 11101100B ;S-2RESET, 1SET
B9FF 1B DB ED DB T_W12, 11011011B, 11101101B
BA02 1A FF DB T_W2, 11111111B
BA04 1B B7 ED DB T_W12, 10110111B, 11101101B ;T
BA07 1A FF DB T_W2, 11111111B
BA09 1B DB ED DB T_W12, 11011011B, 11101101B ;T
BA0C FE DB T_KONEC
;2x K.O. J-K s SR _ _ _ _ _ _ _ _
;74109 1111111 2222222
BA0D I74109T: ; ZQQSCKJR NRJKCSQQ
BA0D 08 1F 7C DB T_VV2, 00011111B, 01111100B
BA10 24 45 DB T_NAP, DIL16
BA12 1B D4 D2 DB T_W12, 11010100B, 11010010B ;A-1RESET, 2SET
BA15 1B A1 B5 DB T_W12, 10100001B, 10110101B ;A-2RESET, 1SET
BA18 1B B1 F5 DB T_W12, 10110001B, 11110101B
BA1B 1B D9 FE DB T_W12, 11011001B, 11111110B
BA1E 1B D1 F6 DB T_W12, 11010001B, 11110110B ;S-1RESET, 2SET
BA21 1B D7 C6 DB T_W12, 11010111B, 11000110B
BA24 1B BF CD DB T_W12, 10111111B, 11001101B
BA27 1B B7 C5 DB T_W12, 10110111B, 11000101B ;S-1RESET, 2SET
BA2A 1B A3 E5 DB T_W12, 10100011B, 11100101B
BA2D 1B BB EE DB T_W12, 10111011B, 11101110B
BA30 1B B3 E6 DB T_W12, 10110011B, 11100110B ;T
BA33 1B DB ED DB T_W12, 11011011B, 11101101B
BA36 1B D3 E5 DB T_W12, 11010011B, 11100101B ;T
BA39 1B D5 D5 DB T_W12, 11010101B, 11010101B
BA3C 1B DD DD DB T_W12, 11011101B, 11011101B
BA3F 1B D5 D5 DB T_W12, 11010101B, 11010101B ;NIC
BA42 FE DB T_KONEC
;2x K.O. J-K s SR _ __ __ _
;74111 1111111 2222222
BA43 I74111T: ; ZQQCJRSK NKSRJCQQ
BA43 08 1F 7C DB T_VV2, 00011111B, 01111100B
BA46 24 45 DB T_NAP, DIL16
BA48 1B A3 99 DB T_W12, 10100011B, 10011001B ;A-1RESET, 2SET
BA4B 1B CC E2 DB T_W12, 11001100B, 11100010B ;A-2RESET, 1SET
BA4E 1B C7 BA DB T_W12, 11000111B, 10111010B
BA51 1B D7 BE DB T_W12, 11010111B, 10111110B
BA54 1B A7 B9 DB T_W12, 10100111B, 10111001B ;S-1RESET, 2SET
BA57 1B AE F1 DB T_W12, 10101110B, 11110001B
PROGRAM IOT MACRO-80 3.44 09-Dec-81 PAGE 1-212
BA5A 1B BE F5 DB T_W12, 10111110B, 11110101B
BA5D 1B CE F2 DB T_W12, 11001110B, 11110010B ;S-2RESET, 1SET
BA60 1B CF FA DB T_W12, 11001111B, 11111010B
BA63 1B DF FE DB T_W12, 11011111B, 11111110B
BA66 1B AF F9 DB T_W12, 10101111B, 11111001B ;T
BA69 1B BF FD DB T_W12, 10111111B, 11111101B
BA6C 1B CF FA DB T_W12, 11001111B, 11111010B ;T
BA6F FE DB T_KONEC
;2x K.O. J-K s SR __ _ _ ___ _
;74112 2111111 1222222
BA70 I74112T: ; ZQQQSJKC NRRCKJSQ
BA70 08 0F 7E DB T_VV2, 00001111B, 01111110B
BA73 24 45 DB T_NAP, DIL16
BA75 1B AA A5 DB T_W12, 10101010B, 10100101B ;A-1RESET, 2SET
BA78 1B D4 CA DB T_W12, 11010100B, 11001010B ;A-2RESET, 1SET
BA7B 1B DA E6 DB T_W12, 11011010B, 11100110B
BA7E 1B DB F6 DB T_W12, 11011011B, 11110110B
BA81 1B AA E7 DB T_W12, 10101010B, 11100111B ;S-1RESET, 2SET
BA84 1B AC EB DB T_W12, 10101100B, 11101011B
BA87 1B AD FB DB T_W12, 10101101B, 11111011B
BA8A 1B DC EA DB T_W12, 11011100B, 11101010B ;S-2RESET, 1SET
BA8D 1B DE EE DB T_W12, 11011110B, 11101110B
BA90 1B DF FE DB T_W12, 11011111B, 11111110B
BA93 1B AE EF DB T_W12, 10101110B, 11101111B ;T
BA96 1B AF FF DB T_W12, 10101111B, 11111111B
BA99 1B DE EE DB T_W12, 11011110B, 11101110B ;T
BA9C FE DB T_KONEC
;2x K.O. J-K s SR _ _ _ _ _ _
;74113 111111 111111
BA9D I74113T: ; ZQQSJKCX XNCKJSQQ
BA9D 08 1E 3C DB T_VV2, 00011110B, 00111100B
BAA0 24 44 DB T_NAP, DIL14
BAA2 1B A7 E2 DB T_W12, 10100111B, 11100010B ;A-SET
BAA5 1B B7 F6 DB T_W12, 10110111B, 11110110B
BAA8 1B D5 D5 DB T_W12, 11010101B, 11010101B ;S-RESET
BAAB 1B DB ED DB T_W12, 11011011B, 11101101B
BAAE 1B B9 CE DB T_W12, 10111001B, 11001110B ;S-SET
BAB1 1B BF FE DB T_W12, 10111111B, 11111110B
BAB4 1B DD DD DB T_W12, 11011101B, 11011101B ;T
BAB7 1B DF FD DB T_W12, 11011111B, 11111101B
BABA 1B BD DE DB T_W12, 10111101B, 11011110B ;T
BABD FE DB T_KONEC
;2x K.O. J-K s SR, spol. CLK
; _ _ _ _
;74114 11111_ _22222
BABE I74114T: ; ZQQSJKRX XNCKJSQQ
BABE 08 1E 3C DB T_VV2, 00011110B, 00111100B
BAC1 24 44 DB T_NAP, DIL14
BAC3 1B D5 ED DB T_W12, 11010101B, 11101101B ;A-RESET
BAC6 1B AB F2 DB T_W12, 10101011B, 11110010B ;A-SET
BAC9 1B B7 F6 DB T_W12, 10110111B, 11110110B
BACC 1B D7 D5 DB T_W12, 11010111B, 11010101B ;S-RESET
BACF 1B DB ED DB T_W12, 11011011B, 11101101B
PROGRAM IOT MACRO-80 3.44 09-Dec-81 PAGE 1-213
BAD2 1B BB CE DB T_W12, 10111011B, 11001110B ;S-SET
BAD5 1B BF FE DB T_W12, 10111111B, 11111110B
BAD8 1B DF DD DB T_W12, 11011111B, 11011101B ;T
BADB 1B DF FD DB T_W12, 11011111B, 11111101B
BADE 1B BF DE DB T_W12, 10111111B, 11011110B ;T
BAE1 FE DB T_KONEC
;6x K.O. R-S/stradac s spol. R
; ___ __ __ ___ ___ ___
;74119 3333222 6555444R 6661111
BAE2 I74119T: ; ZSSRQSRQ QQRSQRSM NSSRQRSS
BAE2 10 76 37 77 DB T_VV3, 01110110B, 00110111B, 01110111B
BAE6 24 47 DB T_NAP, DIL24
BAE8 1F F6 36 F7 DB T_W123, 11110110B, 00110110B, 11110111B
BAEC 1F BB ED BD DB T_W123, 10111011B, 11101101B, 10111101B
BAF0 1F E4 13 E3 DB T_W123, 11100100B, 00010011B, 11100011B
BAF4 1F DB ED DE DB T_W123, 11011011B, 11101101B, 11011110B
BAF8 1F E4 13 E3 DB T_W123, 11100100B, 00010011B, 11100011B
BAFC 1F DB ED DE DB T_W123, 11011011B, 11101101B, 11011110B
BB00 FE DB T_KONEC
;MKO __
;74121 21 _
BB01 I74121T: ; ZQBAAXQX XNXXXXXX
BB01 25 05 BF DB T_NZ2, 00000101B, 10111111B
BB04 08 38 00 DB T_VV2, 00111000B, 00000000B
BB07 24 44 DB T_NAP, DIL14
BB09 23 DB T_PROG
BB0A BB0D DW P74121
BB0C FE DB T_KONEC
;POKRACUJE TEST PONOCI PROGAMU VE TROJOVEM KODU
BB0D 3E 87 P74121: MVI A,10000111B ;VYHOZI STAV
BB0F CD BB39 CALL P74121A ;PROVED TEST
BB12 3E AF MVI A,10101111B ;PULZ NA "B"
BB14 CD BB39 CALL P74121A ;PROVED TEST
BB17 3E BF MVI A,10111111B ;VYHOZI STAV
BB19 CD BB39 CALL P74121A ;PROVED TEST
BB1C 3E AF MVI A,10101111B ;PULZ NA "A1"
BB1E CD BB39 CALL P74121A ;PROVED TEST
BB21 3E BF MVI A,10111111B ;VYHOZI STAV
BB23 CD BB39 CALL P74121A ;PROVED TEST
BB26 3E AF MVI A,10101111B ;PULZ NA "A2"
BB28 CD BB39 CALL P74121A ;PROVED TEST
BB2B 3E 87 MVI A,10000111B ;VYHOZI STAV
BB2D CD BB39 CALL P74121A ;PROVED TEST
BB30 3E AF MVI A,10101111B ;PULZ NA "B"
BB32 CD BB39 CALL P74121A ;PROVED TEST
BB35 CD 4899 CALL CRLF ;PRO PREHLEDNOST ODRADKUJ
BB38 C9 RET ;NAVRAT ZE STROJOVEHO KODU
;PODPROGRAMY
;POROVNANI
;SMICKA MA 29 STROJOVYCH CIKLU PRO 8080A TJ. 14.5US
;PRI 65535 PRUCHODECH JE DOBA CMYCKY 950257.5US TJ. 0.95S
BB39 21 0000 P74121A:LXI H,0 ;VYNULUJ POCITADLO
PROGRAM IOT MACRO-80 3.44 09-Dec-81 PAGE 1-214
BB3C 4F MOV C,A ;SCHOV PRO DALSI POUZITI
BB3D D3 38 OUT PORT1 ;POSLI DATA NA PORT
BB3F DB 38 P74121B:IN PORT1 ;NACTI PORT ;10
BB41 47 MOV B,A ;SHOV DATA Z PORTU ;5
BB42 23 INX H ;POCITADLO +1 ;5
BB43 7C MOV A,H ;5
BB44 B5 ORA L ;TEST NA PRETECENI ;4
BB45 CA BB56 JZ P74121C ;POKUT JE 0 TAK NAVRAT S CHYBOU ;10
BB48 78 MOV A,B ;OBNOV DATA
BB49 B9 CMP C ;POROVNEJ
BB4A C2 BB3F JNZ P74121B ;NENI-LI SHODA TAK DALSI POKUS
BB4D CD 4917 CALL HADR ;TISK OBSAHU
BB50 3E 20 MVI A,' '
BB52 CD 4937 CALL COA ;TISK ODELOVACE TJ. MEZEREA
BB55 C9 RET ;NAVRAT
BB56 33 P74121C:INX SP
BB57 33 INX SP ;SROVNEJ ZASOBNIK
BB58 11 55F1 LXI D,ERR1T
BB5B C3 475E JMP TIXP ;CHYBOVE HLASENI S NAVRATEM
;2x MKO s nas. spous. __ _ __ _
;74123 21111 12222
BB5E I74123T: ; ZXXQQRBA NXXQQRBA
BB5E 25 60 60 DB T_NZ2, 01100000B, 01100000B
BB61 08 07 07 DB T_VV2, 00000111B, 00000111B
BB64 24 45 DB T_NAP, DIL16
BB66 1B EA EA DB T_W12, 11101010B, 11101010B
BB69 1B E9 E9 DB T_w12, 11101001B, 11101001B
BB6C 1B EB E8 DB T_w12, 11101011B, 11101000B
BB6F 1B EF EC DB T_w12, 11101111B, 11101100B
BB72 1B F6 F6 DB T_w12, 11110110B, 11110110B
BB75 1B E8 EB DB T_w12, 11101000B, 11101011B
BB78 0A EF DB T_O2, 11101111B
BB7A 23 DB T_PROG
BB7B BBED DW P74123H
BB7D 1B EC EF DB T_W12, 11101100B, 11101111B
BB80 1B F6 F6 DB T_w12, 11110110B, 11110110B
BB83 1B EA EA DB T_W12, 11101010B, 11101010B
BB86 1B E6 FA DB T_W12, 11100110B, 11111010B
BB89 1B EA EA DB T_W12, 11101010B, 11101010B
BB8C 1B FA E6 DB T_W12, 11111010B, 11100110B
BB8F 1B EB EB DB T_W12, 11101011B, 11101011B
BB92 0A EF DB T_O2, 11101111B
BB94 23 DB T_PROG
BB95 BBF3 DW P74123I
BB97 23 DB T_PROG
BB98 BBF9 DW P74123J
BB9A 1B EF EF DB T_W12, 11101111B, 11101111B
BB9D 23 DB T_PROG
BB9E BBB3 DW P74123A
BBA0 1B EF EF DB T_W12, 11101111B, 11101111B
BBA3 23 DB T_PROG
BBA4 BBB9 DW P74123B
BBA6 1B EF EF DB T_W12, 11101111B, 11101111B
BBA9 23 DB T_PROG
PROGRAM IOT MACRO-80 3.44 09-Dec-81 PAGE 1-215
BBAA BBBF DW P74123C
BBAC 1B EF EF DB T_W12, 11101111B, 11101111B
BBAF 23 DB T_PROG
BBB0 BBD3 DW P74123D
BBB2 FE DB T_KONEC
;POKRACUJE TEST PONOCI PROGAMU VE TROJOVEM KODU
BBB3 P74123A:
BBB3 3E EE P74123L:MVI A,11101110B
BBB5 CD BB39 CALL P74121A
BBB8 C9 RET ;NAVRAT ZE STROJOVEHO KODU
BBB9 3E EE P74123B:MVI A,11101110B
BBBB CD BBFD CALL P74123E
BBBE C9 RET ;NAVRAT ZE STROJOVEHO KODU
BBBF 3E EE P74123C:MVI A,11101110B
BBC1 D3 38 OUT PORT1
BBC3 21 0500 LXI H,500H
BBC6 2B P74123Q:DCX H ;POCITADLO -1 ;5
BBC7 7C MOV A,H ;5
BBC8 B5 ORA L ;TEST NA PRETECENI ;4
BBC9 C2 BBC6 JNZ P74123Q ;POKUT JE 0 TAK NAVRAT S CHYBOU ;10
BBCC 3E EF MVI A,11101111B
BBCE D3 38 OUT PORT1
BBD0 C3 BBB3 JMP P74123L
BBD3 3E EE P74123D:MVI A,11101110B
BBD5 D3 39 OUT PORT2
BBD7 21 0500 LXI H,500H
BBDA 2B P74123M:DCX H ;POCITADLO -1 ;5
BBDB 7C MOV A,H ;5
BBDC B5 ORA L ;TEST NA PRETECENI ;4
BBDD C2 BBDA JNZ P74123M ;POKUT JE 0 TAK NAVRAT S CHYBOU ;10
BBE0 3E EF MVI A,11101111B
BBE2 D3 39 OUT PORT2
BBE4 3E EE MVI A,11101110B
BBE6 CD BBFD CALL P74123E
BBE9 CD 4899 CALL CRLF ;PRO PREHLEDNOST ODRADKUJ
BBEC C9 RET ;NAVRAT ZE STROJOVEHO KODU
BBED 3E E8 P74123H:MVI A,11101000B
BBEF CD BB39 CALL P74121A
BBF2 C9 RET ;NAVRAT ZE STROJOVEHO KODU
BBF3 3E EB P74123I:MVI A,11101011B
BBF5 CD BB39 CALL P74121A
BBF8 C9 RET ;NAVRAT ZE STROJOVEHO KODU
BBF9 CD BC14 P74123J:CALL P74123K
BBFC C9 RET ;NAVRAT ZE STROJOVEHO KODU
;PODPROGRAMY
BBFD 21 0000 P74123E:LXI H,0 ;VYNULUJ POCITADLO
BC00 4F MOV C,A ;SCHOV PRO DALSI POUZITI
BC01 D3 39 OUT PORT2 ;POSLI DATA NA PORT
PROGRAM IOT MACRO-80 3.44 09-Dec-81 PAGE 1-216
BC03 DB 39 P74123F:IN PORT2 ;NACTI PORT ;10
BC05 47 MOV B,A ;SHOV DATA Z PORTU ;5
BC06 23 INX H ;POCITADLO +1 ;5
BC07 7C MOV A,H ;5
BC08 B5 ORA L ;TEST NA PRETECENI ;4
BC09 CA BC1A JZ P74123G ;POKUT JE 0 TAK NAVRAT S CHYBOU ;10
BC0C 78 MOV A,B ;OBNOV DATA
BC0D B9 CMP C ;POROVNEJ
BC0E C2 BC03 JNZ P74123F ;NENI-LI SHODA TAK DALSI POKUS
BC11 CD 4917 CALL HADR ;TISK OBSAHU
BC14 3E 20 P74123K:MVI A,' '
BC16 CD 4937 CALL COA ;TISK ODELOVACE TJ. MEZEREA
BC19 C9 RET ;NAVRAT
BC1A 33 P74123G:INX SP
BC1B 33 INX SP ;SROVNEJ ZASOBNIK
BC1C 11 55F4 LXI D,ERR2T
BC1F C3 475E JMP TIXP ;CHYBOVE HLASENI S NAVRATEM
;4x budic sbernice _ _ _ _
;74125 222111 444333
BC22 I74125T: ; ZYAEYAEX XNEAYEAY
BC22 08 36 36 DB T_VV2, 00110110B, 00110110B
BC25 24 44 DB T_NAP, DIL14
BC27 1B 8D EF DB T_W12, 10001101B, 11101111B
BC2A 1B E1 FD DB T_W12, 11100001B, 11111101B
BC2D 1B DF C3 DB T_W12, 11011111B, 11000011B
BC30 1B FB D8 DB T_W12, 11111011B, 11011000B
BC33 FE DB T_KONEC
;4x budic sbernice
;74126 222111 444333
BC34 I74126T: ; ZYAEYAEX XNEAYEAY
BC34 08 36 36 DB T_VV2, 00110110B, 00110110B
BC37 24 44 DB T_NAP, DIL14
BC39 1B 9F CB DB T_W12, 10011111B, 11001011B
BC3C 1B F3 D9 DB T_W12, 11110011B, 11011001B
BC3F 1B CD E7 DB T_W12, 11001101B, 11100111B
BC42 1B E9 FC DB T_W12, 11101001B, 11111100B
BC45 FE DB T_KONEC
;DIL14 4x 2vstup. AND budici stupen (30 V), OC 130p DIL16 2x monostabilni multivibra. s nasle. spousten, TP
;74130
;I74130T:
; DB T_NIC
;dekoder 1 z 8 se stradacem
;74131 _
BC46 I74131T: ; Z7EECAAA N0123456
BC46 08 3F 00 DB T_VV2, 00111111B, 00000000B
BC49 24 45 DB T_NAP, DIL16
BC4B 09 E0 DB T_O1, 11100000B
BC4D 1B E8 BF DB T_W12, 11101000B, 10111111B
BC50 1B E1 BF DB T_W12, 11100001B, 10111111B
BC53 1B E9 DF DB T_W12, 11101001B, 11011111B
BC56 1B E2 DF DB T_W12, 11100010B, 11011111B
PROGRAM IOT MACRO-80 3.44 09-Dec-81 PAGE 1-217
BC59 1B EA EF DB T_W12, 11101010B, 11101111B
BC5C 1B E3 EF DB T_W12, 11100011B, 11101111B
BC5F 1B EB F7 DB T_W12, 11101011B, 11110111B
BC62 1B E4 F7 DB T_W12, 11100100B, 11110111B
BC65 1B EC FB DB T_W12, 11101100B, 11111011B
BC68 1B E5 FB DB T_W12, 11100101B, 11111011B
BC6B 1B ED FD DB T_W12, 11101101B, 11111101B
BC6E 1B E6 FD DB T_W12, 11100110B, 11111101B
BC71 1B EE FE DB T_W12, 11101110B, 11111110B
BC74 1B E7 FE DB T_W12, 11100111B, 11111110B
BC77 1B AF FF DB T_W12, 10101111B, 11111111B
BC7A 1B AA FF DB T_W12, 10101010B, 11111111B
BC7D 1B AD FF DB T_W12, 10101101B, 11111111B
BC80 20 DB T_GOTO
BC81 BD09 DW G74138T
;13vstup NAND
;74133
BC83 I74133T: ; ZGFEDCBA NMLKJIHY
BC83 08 7F 7E DB T_VV2, 01111111B, 01111110B
BC86 24 45 DB T_NAP, DIL16
BC88 1B FF FE DB T_W12, 11111111B, 11111110B
BC8B 1B 80 81 DB T_W12, 10000000B, 10000001B
BC8E 1B BF FF DB T_W12, 10111111B, 11111111B
BC91 1B DF FF DB T_W12, 11011111B, 11111111B
BC94 1B EF FF DB T_W12, 11101111B, 11111111B
BC97 1B F7 FF DB T_W12, 11110111B, 11111111B
BC9A 1B FB FF DB T_W12, 11111011B, 11111111B
BC9D 1B FD FF DB T_W12, 11111101B, 11111111B
BCA0 1B FE FF DB T_W12, 11111110B, 11111111B
BCA3 1B FF BF DB T_W12, 11111111B, 10111111B
BCA6 1B FF DF DB T_W12, 11111111B, 11011111B
BCA9 1B FF EF DB T_W12, 11111111B, 11101111B
BCAC 1B FF F7 DB T_W12, 11111111B, 11110111B
BCAF 1B FF FB DB T_W12, 11111111B, 11111011B
BCB2 1B FF FD DB T_W12, 11111111B, 11111101B
BCB5 FE DB T_KONEC
;3bit. dekoder 3 z 8 s registrem
;74137 _E
BCB6 I74137T: ; Z7EELCBA N0123456
BCB6 08 3F 00 DB T_VV2, 00111111B, 00000000B
BCB9 24 45 DB T_NAP, DIL16
BCBB 1B E0 BF DB T_W12, 11100000B, 10111111B
BCBE 1B E1 DF DB T_W12, 11100001B, 11011111B
BCC1 1B E2 EF DB T_W12, 11100010B, 11101111B
BCC4 19 EA DB T_W1, 11101010B
BCC6 1B ED EF DB T_W12, 11101101B, 11101111B ;ZACHYT
BCC9 1B E3 F7 DB T_W12, 11100011B, 11110111B
BCCC 1B E4 FB DB T_W12, 11100100B, 11111011B
BCCF 1B E5 FD DB T_W12, 11100101B, 11111101B
BCD2 19 ED DB T_W1, 11101101B
BCD4 1B EA FD DB T_W12, 11101010B, 11111101B ;ZACHYT
BCD7 1B E6 FE DB T_W12, 11100110B, 11111110B
BCDA 1B A7 FF DB T_W12, 10100111B, 11111111B
BCDD 1B AF FF DB T_W12, 10101111B, 11111111B
PROGRAM IOT MACRO-80 3.44 09-Dec-81 PAGE 1-218
BCE0 1B AD FF DB T_W12, 10101101B, 11111111B
BCE3 1B AA FF DB T_W12, 10101010B, 11111111B
BCE6 20 DB T_GOTO
BCE7 BD09 DW G74138T
;3bit. dekoder 1 z 8
;74138, 74405, 3205, 8205 321
BCE9 I74138T: ; Z7EEECBA N0123456
BCE9 08 3F 00 DB T_VV2, 00111111B, 00000000B
BCEC 24 45 DB T_NAP, DIL16
BCEE 1B E0 BF DB T_W12, 11100000B, 10111111B
BCF1 1B E1 DF DB T_W12, 11100001B, 11011111B
BCF4 1B E2 EF DB T_W12, 11100010B, 11101111B
BCF7 1B E3 F7 DB T_W12, 11100011B, 11110111B
BCFA 1B E4 FB DB T_W12, 11100100B, 11111011B
BCFD 1B E5 FD DB T_W12, 11100101B, 11111101B
BD00 1B E6 FE DB T_W12, 11100110B, 11111110B
BD03 1B A7 FF DB T_W12, 10100111B, 11111111B
BD06 1B ED FF DB T_W12, 11101101B, 11111111B
BD09 G74138T:
BD09 1B C5 FF DB T_W12, 11000101B, 11111111B
BD0C 1B CA FF DB T_W12, 11001010B, 11111111B
BD0F 1B D5 FF DB T_W12, 11010101B, 11111111B
BD12 1B DA FF DB T_W12, 11011010B, 11111111B
BD15 1B F2 FF DB T_W12, 11110010B, 11111111B
BD18 1B FD FF DB T_W12, 11111101B, 11111111B
BD1B FE DB T_KONEC
;2x 2bit. dekoder 2 ze 4
;74139 321010 010123
BD1C I74139T: ; ZYYYYAAE NEAAYYYY
BD1C 08 07 70 DB T_VV2, 00000111B, 01110000B
BD1F 24 45 DB T_NAP, DIL16
BD21 1B F0 FF DB T_W12, 11110000B, 11111111B
BD24 1B EA EF DB T_W12, 11101010B, 11101111B
BD27 1B DC DF DB T_W12, 11011100B, 11011111B
BD2A 1B BE CF DB T_W12, 10111110B, 11001111B
BD2D 1B F9 BE DB T_W12, 11111001B, 10111110B
BD30 1B FD 9D DB T_W12, 11111101B, 10011101B
BD33 1B FB AB DB T_W12, 11111011B, 10101011B
BD36 1B FF 87 DB T_W12, 11111111B, 10000111B
BD39 FE DB T_KONEC
; _ _ _
;BCD citac se 7seg. dek R _ _R S
;74143, 74144 dDBB 3210 CCLB_CC
BD3A I74143T: ; ZefdpPOI QQQQbacg NEOEIRPE
BD3A 10 05 00 5F DB T_VV3, 00000101b, 00000000b, 01011111b ;/RBO VYSTUP
BD3E 24 47 DB T_NAP, DIL24
BD40 1F F8 0F A0 DB T_W123, 11111000B, 00001111B, 10100000B ;RESET
BD44 1F F8 0F A6 DB T_W123, 11111000B, 00001111B, 10100110B ;ZHASNUTA 0
BD48 1F 8A 01 AE DB T_W123, 10001010B, 00000001B, 10101110B ;0
BD4C 1C AC DB T_W3, 10101100B ;+1
BD4E 1F FA 15 AE DB T_W123, 11111010B, 00010101B, 10101110B ;1
BD52 1C AC DB T_W3, 10101100B ;+1
BD54 1F A6 22 AE DB T_W123, 10100110B, 00100010B, 10101110B ;2.
PROGRAM IOT MACRO-80 3.44 09-Dec-81 PAGE 1-219
BD58 1C BE DB T_W3, 10111110B ;zachyt
BD5A 1C BC DB T_W3, 10111100B ;+1
BD5C 1F A6 22 BE DB T_W123, 10100110B, 00100010B, 10111110B ;2.
BD60 1F EA 30 AE DB T_W123, 11101010B, 00110000B, 10101110B ;3
BD64 1C AC DB T_W3, 10101100B ;+1
BD66 1F DA 44 AE DB T_W123, 11011010B, 01000100B, 10101110B ;4
BD6A 1C AC DB T_W3, 10101100B ;+1
BD6C 1F C6 58 AE DB T_W123, 11000110B, 01011000B, 10101110B ;5.
BD70 1C BE DB T_W3, 10111110B ;zachyt
BD72 1C BC DB T_W3, 10111100B ;+1
BD74 1F C6 58 BE DB T_W123, 11000110B, 01011000B, 10111110B ;5.
BD78 1F 8A 68 AE DB T_W123, 10001010B, 01101000B, 10101110B ;6
BD7C 1C AC DB T_W3, 10101100B ;+1
BD7E 1F FA 71 AE DB T_W123, 11111010B, 01110001B, 10101110B ;7
BD82 1C AF DB T_W3, 10101111B ;SCE=1
BD84 1C AD DB T_W3, 10101101B ;+1
BD86 1F FA 71 AF DB T_W123, 11111010B, 01110001B, 10101111B ;7
BD8A 1C EE DB T_W3, 11101110B ;CE=1
BD8C 1C EC DB T_W3, 11101100B ;+1
BD8E 1F FA 71 EE DB T_W123, 11111010B, 01110001B, 11101110B ;7
BD92 1C AC DB T_W3, 10101100B ;+1
BD94 1F 8A 80 AE DB T_W123, 10001010B, 10000000B, 10101110B ;8
BD98 1C BE DB T_W3, 10111110B ;zachyt
BD9A 1C BC DB T_W3, 10111100B ;+1
BD9C 1F 8A 80 9E DB T_W123, 10001010B, 10000000B, 10011110B ;8
BDA0 1F FD 8F 9E DB T_W123, 11111101B, 10001111B, 10011110B ;ZHASNI DISPLEL
BDA4 1F CA 90 8E DB T_W123, 11001010B, 10010000B, 10001110B ;9
BDA8 1C AF DB T_W3, 10101111B ;SCE=1
BDAA 1C AD DB T_W3, 10101101B ;+1
BDAC 1F CA 90 AF DB T_W123, 11001010B, 10010000B, 10101111B ;9
BDB0 1C CE DB T_W3, 11001110B ;CE=1
BDB2 1C CC DB T_W3, 11001100B ;+1
BDB4 1F CA 90 CE DB T_W123, 11001010B, 10010000B, 11001110B ;9
BDB8 10 07 00 5F DB T_VV3, 00000111B, 00000000B, 01011111B ;/RBO VSTUP
BDBC 1F FC 9F 9C DB T_W123, 11111100B, 10011111B, 10011100B ;ZHASNI DISPLEL
BDC0 FE DB T_KONEC
;BIN/BCD prior. koder
;74147 1287654 332190
BDC1 I74147T: ; ZYYDDDDD NXYDDDDY
BDC1 08 1F 5E DB T_VV2, 00011111B, 01011110B
BDC4 24 45 DB T_NAP, DIL16
BDC6 1B FF FF DB T_W12, 11111111B, 11111111B
BDC9 1B FF BF DB T_W12, 11111111B, 10111111B
BDCC 1B FF FA DB T_W12, 11111111B, 11111010B
BDCF 1B BF B7 DB T_W12, 10111111B, 10110111B
BDD2 1B BF EA DB T_W12, 10111111B, 11101010B
BDD5 1B DE B7 DB T_W12, 11011110B, 10110111B
BDD8 1B DD EA DB T_W12, 11011101B, 11101010B
BDDB 1B 9A B7 DB T_W12, 10011010B, 10110111B
BDDE 1B 95 EA DB T_W12, 10010101B, 11101010B
BDE1 1B EA 97 DB T_W12, 11101010B, 10010111B
BDE4 1B F5 C8 DB T_W12, 11110101B, 11001000B
BDE7 FE DB T_KONEC
PROGRAM IOT MACRO-80 3.44 09-Dec-81 PAGE 1-220
;3bit prioritni BIN koder kaskadovatelny
;74148, 74348, 74848 12E7654 EG32100
BDE8 I74148T: ; ZAAIQQQQ NOSQQQQA
BDE8 08 1F 1E DB T_VV2, 00011111B, 00011110B
BDEB 24 45 DB T_NAP, DIL16
BDED 1B F5 EB DB T_W12, 11110101B, 11101011B
BDF0 1B EF BF DB T_W12, 11101111B, 10111111B
BDF3 1B 85 D4 DB T_W12, 10000101B, 11010100B ;0
BDF6 1B 8A D5 DB T_W12, 10001010B, 11010101B ;1
BDF9 1B CD CA DB T_W12, 11001101B, 11001010B ;2
BDFC 1B CE D5 DB T_W12, 11001110B, 11010101B ;3
BDFF 1B AF CA DB T_W12, 10101111B, 11001010B ;4
BE02 1B AF D5 DB T_W12, 10101111B, 11010101B ;5
BE05 1B EF DA DB T_W12, 11101111B, 11011010B ;6
BE08 1B EF DD DB T_W12, 11101111B, 11011101B ;7
BE0B FE DB T_KONEC
;16vstup. multiplexer 11111 1
;74150 3_ 0123 12345012 8904567
BE0C I74150T: ; ZSYEDDDD DDDDDSSS NDDDDDDD
BE0C 10 5F FF 7F DB T_VV3, 01011111B, 11111111B, 01111111B
BE10 24 47 DB T_NAP, DIL24
BE12 1F B5 AA A5 DB T_W123, 10110101B, 10101010B, 10100101B
BE16 1B A5 A8 DB T_W12, 10100101B, 10101000B
BE19 1B 85 AC DB T_W12, 10000101B, 10101100B
BE1C 1B A5 AA DB T_W12, 10100101B, 10101010B
BE1F 1B 85 AE DB T_W12, 10000101B, 10101110B
BE22 1B A5 A9 DB T_W12, 10100101B, 10101001B
BE25 1B 85 AD DB T_W12, 10000101B, 10101101B
BE28 1B A5 AB DB T_W12, 10100101B, 10101011B
BE2B 1B 85 AF DB T_W12, 10000101B, 10101111B
BE2E 1B E5 A8 DB T_W12, 11100101B, 10101000B
BE31 1B C5 AC DB T_W12, 11000101B, 10101100B
BE34 1B E5 AA DB T_W12, 11100101B, 10101010B
BE37 1B C5 AE DB T_W12, 11000101B, 10101110B
BE3A 1B E5 A9 DB T_W12, 11100101B, 10101001B
BE3D 1B C5 AD DB T_W12, 11000101B, 10101101B
BE40 1B E5 AB DB T_W12, 11100101B, 10101011B
BE43 1B C5 AF DB T_W12, 11000101B, 10101111B
BE46 1F FA 55 DA DB T_W123, 11111010B, 01010101B, 11011010B
BE4A 1B 8A 50 DB T_W12, 10001010B, 01010000B
BE4D 1B AA 54 DB T_W12, 10101010B, 01010100B
BE50 1B 8A 52 DB T_W12, 10001010B, 01010010B
BE53 1B AA 56 DB T_W12, 10101010B, 01010110B
BE56 1B 8A 51 DB T_W12, 10001010B, 01010001B
BE59 1B AA 55 DB T_W12, 10101010B, 01010101B
BE5C 1B 8A 53 DB T_W12, 10001010B, 01010011B
BE5F 1B AA 57 DB T_W12, 10101010B, 01010111B
BE62 1B CA 50 DB T_W12, 11001010B, 01010000B
BE65 1B EA 54 DB T_W12, 11101010B, 01010100B
BE68 1B CA 52 DB T_W12, 11001010B, 01010010B
BE6B 1B EA 56 DB T_W12, 11101010B, 01010110B
BE6E 1B CA 51 DB T_W12, 11001010B, 01010001B
BE71 1B EA 55 DB T_W12, 11101010B, 01010101B
BE74 1B CA 53 DB T_W12, 11001010B, 01010011B
BE77 1B EA 57 DB T_W12, 11101010B, 01010111B
PROGRAM IOT MACRO-80 3.44 09-Dec-81 PAGE 1-221
BE7A FE DB T_KONEC
;8vstup. multiplexer
;74151 __ 0123 4567012
BE7B I74151T: ; ZEYYDDDD NDDDDSSS
BE7B 08 4F 7F DB T_VV2, 01001111B, 01111111B
BE7E 24 45 DB T_NAP, DIL16
BE80 1B E5 AD DB T_W12, 11100101B, 10101101B
BE83 1B EA D5 DB T_W12, 11101010B, 11010101B
BE86 1B 9A D0 G74151T:DB T_W12, 10011010B, 11010000B
BE89 1B AA D4 DB T_W12, 10101010B, 11010100B
BE8C 1B 9A D2 DB T_W12, 10011010B, 11010010B
BE8F 1B AA D6 DB T_W12, 10101010B, 11010110B
BE92 1B 9A D1 DB T_W12, 10011010B, 11010001B
BE95 1B AA D5 DB T_W12, 10101010B, 11010101B
BE98 1B 9A D3 DB T_W12, 10011010B, 11010011B
BE9B 1B AA D7 DB T_W12, 10101010B, 11010111B
BE9E 1B A5 A8 DB T_W12, 10100101B, 10101000B
BEA1 1B 95 AC DB T_W12, 10010101B, 10101100B
BEA4 1B A5 AA DB T_W12, 10100101B, 10101010B
BEA7 1B 95 AE DB T_W12, 10010101B, 10101110B
BEAA 1B A5 A9 DB T_W12, 10100101B, 10101001B
BEAD 1B 95 AD DB T_W12, 10010101B, 10101101B
BEB0 1B A5 AB DB T_W12, 10100101B, 10101011B
BEB3 1B 95 AF DB T_W12, 10010101B, 10101111B
BEB6 FE DB T_KONEC
;8vstup. multiplexer
;74152 _01234 567012
BEB7 I74152T: ; ZYDDDDDX XNDDDSSS
BEB7 08 3E 3F DB T_VV2, 00111110B, 00111111B
BEBA 24 44 DB T_NAP, DIL14
BEBC 1B AB D0 DB T_W12, 10101011B, 11010000B
BEBF 1B EB D4 DB T_W12, 11101011B, 11010100B
BEC2 1B AB D2 DB T_W12, 10101011B, 11010010B
BEC5 1B EB D6 DB T_W12, 11101011B, 11010110B
BEC8 1B AB D1 DB T_W12, 10101011B, 11010001B
BECB 1B EB D5 DB T_W12, 11101011B, 11010101B
BECE 1B AB D3 DB T_W12, 10101011B, 11010011B
BED1 1B EB D7 DB T_W12, 11101011B, 11010111B
BED4 1B D5 E8 DB T_W12, 11010101B, 11101000B
BED7 1B 95 EC DB T_W12, 10010101B, 11101100B
BEDA 1B D5 EA DB T_W12, 11010101B, 11101010B
BEDD 1B 95 EE DB T_W12, 10010101B, 11101110B
BEE0 1B D5 E9 DB T_W12, 11010101B, 11101001B
BEE3 1B 95 ED DB T_W12, 10010101B, 11101101B
BEE6 1B D5 EB DB T_W12, 11010101B, 11101011B
BEE9 1B 95 EF DB T_W12, 10010101B, 11101111B
BEEC FE DB T_KONEC
;2x 4vstup. multiplexer
;74153 01231_ _03210
BEED I74153T: ; ZYDDDDSE NESDDDDY
BEED 08 3F 7E DB T_VV2, 00111111B, 01111110B
BEF0 24 45 DB T_NAP, DIL16
BEF2 1B 95 D4 DB T_W12, 10010101B, 11010100B
PROGRAM IOT MACRO-80 3.44 09-Dec-81 PAGE 1-222
BEF5 1B AB EA DB T_W12, 10101011B, 11101010B
BEF8 1B 94 94 G74153T:DB T_W12, 10010100B, 10010100B
BEFB 1B D4 B5 DB T_W12, 11010100B, 10110101B
BEFE 1B 96 94 DB T_W12, 10010110B, 10010100B
BF01 1B D6 B5 DB T_W12, 11010110B, 10110101B
BF04 1B E8 8B DB T_W12, 11101000B, 10001011B
BF07 1B A8 AA DB T_W12, 10101000B, 10101010B
BF0A 1B EA 8B DB T_W12, 11101010B, 10001011B
BF0D 1B AA AA DB T_W12, 10101010B, 10101010B
BF10 FE DB T_KONEC
;dekoder 1 z 16 1 __11111
;74154, 74159 0987654 30154321 0123210
BF11 I74154T: ; ZYYYYYYY AEEYYYYY NAAAYYYY
BF11 10 00 E0 70 DB T_VV3, 00000000B, 11100000B, 01110000B
BF15 24 47 DB T_NAP, DIL24
BF17 1F FF FF AF DB T_W123, 11111111B, 11111111B, 10101111B
BF1B 1F FF 5F DF DB T_W123, 11111111B, 01011111B, 11011111B
BF1F 1F FF BF 8F DB T_W123, 11111111B, 10111111B, 10001111B
BF23 1F FF 1F 8E DB T_W123, 11111111B, 00011111B, 10001110B
BF27 1F FF 1F CD DB T_W123, 11111111B, 00011111B, 11001101B
BF2B 1F FF 1F AB DB T_W123, 11111111B, 00011111B, 10101011B
BF2F 1F FF 1F E7 DB T_W123, 11111111B, 00011111B, 11100111B
BF33 1F FE 1F 9F DB T_W123, 11111110B, 00011111B, 10011111B
BF37 1F FD 1F DF DB T_W123, 11111101B, 00011111B, 11011111B
BF3B 1F FB 1F BF DB T_W123, 11111011B, 00011111B, 10111111B
BF3F 1F F7 1F FF DB T_W123, 11110111B, 00011111B, 11111111B
BF43 1F EF 9F 8F DB T_W123, 11101111B, 10011111B, 10001111B
BF47 1F DF 9F CF DB T_W123, 11011111B, 10011111B, 11001111B
BF4B 1F BF 9F AF DB T_W123, 10111111B, 10011111B, 10101111B
BF4F 1F FF 9E EF DB T_W123, 11111111B, 10011110B, 11101111B
BF53 1F FF 9D 9F DB T_W123, 11111111B, 10011101B, 10011111B
BF57 1F FF 9B DF DB T_W123, 11111111B, 10011011B, 11011111B
BF5B 1F FF 97 BF DB T_W123, 11111111B, 10010111B, 10111111B
BF5F 1F FF 8F FF DB T_W123, 11111111B, 10001111B, 11111111B
BF63 FE DB T_KONEC
;2x dekoder 1 ze 4 ____ _ __ ____
;74155, 74156 0123121 1203210
BF64 I74155T: ; ZYYYYAEE NEEAYYYY
BF64 08 07 70 DB T_VV2, 00000111B, 01110000B
BF67 24 45 DB T_NAP, DIL16
BF69 1B F8 FF DB T_W12, 11111000B, 11111111B
BF6C 1B FE AF DB T_W12, 11111110B, 10101111B
BF6F 1B FF DF DB T_W12, 11111111B, 11011111B
BF72 1B B9 8E DB T_W12, 10111001B, 10001110B
BF75 1B D9 9D DB T_W12, 11011001B, 10011101B
BF78 1B ED 8B DB T_W12, 11101101B, 10001011B
BF7B 1B F5 97 DB T_W12, 11110101B, 10010111B
BF7E FE DB T_KONEC
;4x 2vstup. multiplexer
;74157 222111 _444333
BF7F I74157T: ; ZYBAYBAS NEABYABY
BF7F 08 37 76 DB T_VV2, 00110111B, 01110110B
BF82 24 45 DB T_NAP, DIL16
PROGRAM IOT MACRO-80 3.44 09-Dec-81 PAGE 1-223
BF84 1B B6 F6 DB T_W12, 10110110B, 11110110B
BF87 1B B7 F6 DB T_W12, 10110111B, 11110110B
BF8A 1B A4 92 G74157T:DB T_W12, 10100100B, 10010010B
BF8D 1B DA AD DB T_W12, 11011010B, 10101101B
BF90 1B 93 A4 DB T_W12, 10010011B, 10100100B
BF93 1B ED 9B DB T_W12, 11101101B, 10011011B
BF96 FE DB T_KONEC
;4x 2vstup. multiplexer invert.
;74158, 74258 222111 _444333
BF97 I74158T: ; ZYBAYBAS NEABYABY
BF97 08 37 76 DB T_VV2, 00110111B, 01110110B
BF9A 24 45 DB T_NAP, DIL16
BF9C 1B FE FF DB T_W12, 11111110B, 11111111B
BF9F 1B FF FF DB T_W12, 11111111B, 11111111B
BFA2 1B EC 9B DB T_W12, 11101100B, 10011011B
BFA5 1B 92 A4 DB T_W12, 10010010B, 10100100B
BFA8 1B DB AD DB T_W12, 11011011B, 10101101B
BFAB 1B A5 92 DB T_W12, 10100101B, 10010010B
BFAE FE DB T_KONEC
;sync. prog. BCD citac s R
; 1 _ 2_
;74160 C3210CM T0123CP
BFAF I74160T: ; ZEDDDDPR NCQQQQEE
BFAF 21 DB T_GOSUB
BFB0 C037 DW S7416X2
BFB2 21 G74160T:DB T_GOSUB
BFB3 C053 DW S7416X3
BFB5 1B C3 E7 DB T_W12, 11000011B, 11100111B ;9
BFB8 19 C1 DB T_W1, 11000001B
BFBA 1B C3 83 DB T_W12, 11000011B, 10000011B ;0
BFBD 1B 83 83 G7416XT:DB T_W12, 10000011B, 10000011B ;CE1=0
BFC0 19 81 DB T_W1, 10000001B
BFC2 1B 83 83 DB T_W12, 10000011B, 10000011B ;0
BFC5 1B C3 81 DB T_W12, 11000011B, 10000001B ;CE2=0
BFC8 19 C1 DB T_W1, 11000001B
BFCA 1B C3 81 DB T_W12, 11000011B, 10000001B ;0
BFCD 1B 83 81 DB T_W12, 10000011B, 10000001B ;CE1=CE2=0
BFD0 19 81 DB T_W1, 10000001B
BFD2 1B 83 81 DB T_W12, 10000011B, 10000001B ;0
BFD5 FE DB T_KONEC
;sync. prog. BIN citac s R
; 1 _ 2_
;74161 C3210CM T0123CP
BFD6 I74161T: ; ZEDDDDPR NCQQQQEE
BFD6 21 DB T_GOSUB
BFD7 C037 DW S7416X2
BFD9 21 G74161T:DB T_GOSUB
BFDA C053 DW S7416X3
BFDC 1B C3 A7 DB T_W12, 11000011B, 10100111B ;9
BFDF 19 C1 DB T_W1, 11000001B
BFE1 1B C3 97 DB T_W12, 11000011B, 10010111B ;10
BFE4 19 C1 DB T_W1, 11000001B
BFE6 1B C3 B7 DB T_W12, 11000011B, 10110111B ;11
PROGRAM IOT MACRO-80 3.44 09-Dec-81 PAGE 1-224
BFE9 19 C1 DB T_W1, 11000001B
BFEB 1B C3 8F DB T_W12, 11000011B, 10001111B ;12
BFEE 19 C1 DB T_W1, 11000001B
BFF0 1B C3 AF DB T_W12, 11000011B, 10101111B ;13
BFF3 19 C1 DB T_W1, 11000001B
BFF5 1B C3 9F DB T_W12, 11000011B, 10011111B ;14
BFF8 19 C1 DB T_W1, 11000001B
BFFA 1B C3 FF DB T_W12, 11000011B, 11111111B ;15
BFFD 19 C1 DB T_W1, 11000001B
BFFF 1B C3 83 DB T_W12, 11000011B, 10000011B ;0
C002 20 DB T_GOTO
C003 BFBD DW G7416XT
;sync. prog. BCD citac se sync. R
; 1 _ 2_
;74162 C3210CM T0123CP
C005 I74162T: ; ZEDDDDPR NCQQQQEE
C005 21 DB T_GOSUB
C006 C011 DW S7416X1
C008 20 DB T_GOTO
C009 BFB2 DW G74160T
;sync. prog. BIN citac se sync. R
; 1 _ 2_
;74163 C3210CM T0123CP
C00B I74163T: ; ZEDDDDPR NCQQQQEE
C00B 21 DB T_GOSUB
C00C C011 DW S7416X1
C00E 20 DB T_GOTO
C00F BFD9 DW G74161T
;-------------------------------------------
;SPOLECNE BLOKY K 74160 AZ 74163
C011 08 7F 03 S7416X1:DB T_VV2, 01111111B, 00000011B
C014 24 45 DB T_NAP, DIL16
C016 1B AB 82 DB T_W12, 10101011B, 10000010B
C019 19 A9 DB T_W1, 10101001B
C01B 1B AB 97 DB T_W12, 10101011B, 10010111B ;NASTAV
C01E 1B AA 97 DB T_W12, 10101010B, 10010111B ;/MR=0
C021 19 A8 DB T_W1, 10101000B
C023 1B AB 83 DB T_W12, 10101011B, 10000011B ;S-RESET
C026 1B D7 82 DB T_W12, 11010111B, 10000010B
C029 19 D5 DB T_W1, 11010101B
C02B 1B D7 AB DB T_W12, 11010111B, 10101011B ;NASTAV
C02E 1B D6 AB DB T_W12, 11010110B, 10101011B ;/MR=0
C031 19 D4 DB T_W1, 11010100B
C033 1B D7 83 DB T_W12, 11010111B, 10000011B ;S-RESET
C036 22 DB T_RET
C037 08 7F 03 S7416X2:DB T_VV2, 01111111B, 00000011B
C03A 24 45 DB T_NAP, DIL16
C03C 1B AB 82 DB T_W12, 10101011B, 10000010B
C03F 19 A9 DB T_W1, 10101001B
C041 1B AB 97 DB T_W12, 10101011B, 10010111B ;NASTAV
C044 1B AA 83 DB T_W12, 10101010B, 10000011B ;A-RESET
PROGRAM IOT MACRO-80 3.44 09-Dec-81 PAGE 1-225
C047 1B D7 82 DB T_W12, 11010111B, 10000010B
C04A 19 D5 DB T_W1, 11010101B
C04C 1B D7 AB DB T_W12, 11010111B, 10101011B ;NASTAV
C04F 1B D6 83 DB T_W12, 11010110B, 10000011B ;A-RESET
C052 22 DB T_RET
C053 19 C3 S7416X3:DB T_W1, 11000011B
C055 19 C1 DB T_W1, 11000001B
C057 1B C3 A3 DB T_W12, 11000011B, 10100011B ;1
C05A 19 C1 DB T_W1, 11000001B
C05C 1B C3 93 DB T_W12, 11000011B, 10010011B ;2
C05F 19 C1 DB T_W1, 11000001B
C061 1B C3 B3 DB T_W12, 11000011B, 10110011B ;3
C064 19 C1 DB T_W1, 11000001B
C066 1B C3 8B DB T_W12, 11000011B, 10001011B ;4
C069 19 C1 DB T_W1, 11000001B
C06B 1B C3 AB DB T_W12, 11000011B, 10101011B ;5
C06E 19 C1 DB T_W1, 11000001B
C070 1B C3 9B DB T_W12, 11000011B, 10011011B ;6
C073 19 C1 DB T_W1, 11000001B
C075 1B C3 BB DB T_W12, 11000011B, 10111011B ;7
C078 19 C1 DB T_W1, 11000001B
C07A 1B C3 87 DB T_W12, 11000011B, 10000111B ;8
C07D 19 C1 DB T_W1, 11000001B
C07F 22 DB T_RET
;-------------------------------------------
;sync. 8bit. posuv. registr s R ser. vstup, par. vystup
;74164 3210BA 7654_
C080 I74164T: ; ZQQQQDDX XNQQQQRC
C080 08 06 03 DB T_VV2, 00000110B, 00000011B
C083 24 44 DB T_NAP, DIL14
C085 1B 87 C1 DB T_W12, 10000111B, 11000001B ;RESET
C088 1A C3 DB T_W2, 11000011B
C08A 1A C2 DB T_W2, 11000010B
C08C 1B 8F C3 DB T_W12, 10001111B, 11000011B ;00000001
C08F 1A C2 DB T_W2, 11000010B
C091 1B 91 C3 DB T_W12, 10010001B, 11000011B ;00000010
C094 1A C2 DB T_W2, 11000010B
C096 1B A1 C3 DB T_W12, 10100001B, 11000011B ;00000100
C099 1A C2 DB T_W2, 11000010B
C09B 1B C3 C3 DB T_W12, 11000011B, 11000011B ;00001000
C09E 1A C2 DB T_W2, 11000010B
C0A0 1B 8F C7 DB T_W12, 10001111B, 11000111B ;00010001
C0A3 1A C6 DB T_W2, 11000110B
C0A5 1B 91 CB DB T_W12, 10010001B, 11001011B ;00100010
C0A8 1A CA DB T_W2, 11001010B
C0AA 1B A3 D3 DB T_W12, 10100011B, 11010011B ;01000100
C0AD 1A D2 DB T_W2, 11010010B
C0AF 1B C5 E3 DB T_W12, 11000101B, 11100011B ;10001000
C0B2 1A E2 DB T_W2, 11100010B
C0B4 1B 8F C7 DB T_W12, 10001111B, 11000111B ;00010001
C0B7 FE DB T_KONEC
;8bit. posuv. registr s R ser. a par. vstup, ser. vystup
;74165 _7654 _ _3210S7
PROGRAM IOT MACRO-80 3.44 09-Dec-81 PAGE 1-226
C0B8 I74165T: ; ZQDDDDCL NEDDDDDQ
C0B8 08 3F 7E DB T_VV2, 00111111B, 01111110B
C0BB 24 45 DB T_NAP, DIL16
C0BD 1B D6 96 DB T_W12, 11010110B, 10010110B ;01010101 NASTAV
C0C0 19 C3 DB T_W1, 11000011B
C0C2 19 C1 DB T_W1, 11000001B
C0C4 1B 83 81 DB T_W12, 10000011B, 10000001B ;10101011
C0C7 19 81 DB T_W1, 10000001B
C0C9 1B C3 80 DB T_W12, 11000011B, 10000000B ;01010110
C0CC 19 C1 DB T_W1, 11000001B
C0CE 1B 83 83 DB T_W12, 10000011B, 10000011B ;10101100
C0D1 19 81 DB T_W1, 10000001B
C0D3 1B C3 80 DB T_W12, 11000011B, 10000000B ;01011001
C0D6 19 C1 DB T_W1, 11000001B
C0D8 1B 83 83 DB T_W12, 10000011B, 10000011B ;10110010
C0DB 19 81 DB T_W1, 10000001B
C0DD 1B C3 80 DB T_W12, 11000011B, 10000000B ;01100101
C0E0 19 C1 DB T_W1, 11000001B
C0E2 1B 83 83 DB T_W12, 10000011B, 10000011B ;11001010
C0E5 19 81 DB T_W1, 10000001B
C0E7 1B 83 81 DB T_W12, 10000011B, 10000001B ;10010101
C0EA 19 81 DB T_W1, 10000001B
C0EC 1B C3 82 DB T_W12, 11000011B, 10000010B ;00101010
C0EF 19 C1 DB T_W1, 11000001B
C0F1 1B C3 80 DB T_W12, 11000011B, 10000000B ;01010101
C0F4 19 C1 DB T_W1, 11000001B
C0F6 1B 83 83 DB T_W12, 10000011B, 10000011B ;10101010
C0F9 1A C3 DB T_W2, 11000011B ;10101010 CE=1
C0FB 19 81 DB T_W1, 10000001B
C0FD 1B 83 C3 DB T_W12, 10000011B, 11000011B ;10101010
C100 FE DB T_KONEC
;sync. 8bit. posuv. registr s nul. ser. a par. vstup, ser. vystup
;74166 _3210S _77654_
C101 I74166T: ; ZCEDDDDD NLDQDDDR
C101 08 7F 6F DB T_VV2, 01111111B, 01101111B
C104 24 45 DB T_NAP, DIL16
C106 0B D5 A5 DB T_O12, 11010101B, 10100101B
C109 09 95 DB T_O1, 10010101B
C10B 1B D5 F5 DB T_W12, 11010101B, 11110101B ;01010101 NASTAV
C10E 1A C0 DB T_W2, 11000000B ;RESET
C110 1B CB 8B DB T_W12, 11001011B, 10001011B
C113 19 8B DB T_W1, 10001011B
C115 1B CB CB DB T_W12, 11001011B, 11001011B ;01010101 NASTAV
C118 19 81 DB T_W1, 10000001B
C11A 1B C1 D1 DB T_W12, 11000001B, 11010001B ;10101011
C11D 19 80 DB T_W1, 10000000B
C11F 1B C0 C1 DB T_W12, 11000000B, 11000001B ;01010110
C122 19 80 DB T_W1, 10000000B
C124 1B C0 D1 DB T_W12, 11000000B, 11010001B ;10101100
C127 19 81 DB T_W1, 10000001B
C129 1B C1 C1 DB T_W12, 11000001B, 11000001B ;01011001
C12C 19 80 DB T_W1, 10000000B
C12E 1B C0 D1 DB T_W12, 11000000B, 11010001B ;10110010
C131 19 81 DB T_W1, 10000001B
C133 1B C1 C1 DB T_W12, 11000001B, 11000001B ;01100101
PROGRAM IOT MACRO-80 3.44 09-Dec-81 PAGE 1-227
C136 19 80 DB T_W1, 10000000B
C138 1B C0 D1 DB T_W12, 11000000B, 11010001B ;11001010
C13B 19 81 DB T_W1, 10000001B
C13D 1B C1 D1 DB T_W12, 11000001B, 11010001B ;10010101
C140 19 80 DB T_W1, 10000000B
C142 1B C0 C1 DB T_W12, 11000000B, 11000001B ;00101010
C145 19 81 DB T_W1, 10000001B
C147 1B C1 C1 DB T_W12, 11000001B, 11000001B ;01010101
C14A 19 80 DB T_W1, 10000000B
C14C 1B C0 D1 DB T_W12, 11000000B, 11010001B ;10101010
C14F 19 E0 DB T_W1, 11100000B
C151 19 A0 DB T_W1, 10100000B
C153 1B E0 D1 DB T_W12, 11100000B, 11010001B ;10101010
C156 FE DB T_KONEC
;sync. obousmer. BCD. prog. citac
; 1 U _ 2_
;74168 C3210C/ T0123CP
C157 I74168T: ; ZEDDDDPD NCQQQQEE
C157 21 DB T_GOSUB
C158 C215 DW S168X1
C15A 1B 83 A5 DB T_W12, 10000011B, 10100101B ;9
C15D 19 81 DB T_W1, 10000001B
C15F 1B 83 C1 DB T_W12, 10000011B, 11000001B ;0
C162 19 81 DB T_W1, 10000001B
C164 1B 83 E1 DB T_W12, 10000011B, 11100001B ;1
C167 19 82 DB T_W1, 10000010B ;CITAME DOLU
C169 1B 82 E1 DB T_W12, 10000010B, 11100001B ;1
C16C 19 80 DB T_W1, 10000000B
C16E 1B 82 81 DB T_W12, 10000010B, 10000001B ;0
C171 19 80 G74168T:DB T_W1, 10000000B
C173 1B 82 E5 DB T_W12, 10000010B, 11100101B ;9
C176 19 80 DB T_W1, 10000000B
C178 1B 82 C5 DB T_W12, 10000010B, 11000101B ;8
C17B 19 80 DB T_W1, 10000000B
C17D 1B 82 F9 DB T_W12, 10000010B, 11111001B ;7
C180 19 80 DB T_W1, 10000000B
C182 1B 82 D9 DB T_W12, 10000010B, 11011001B ;6
C185 19 80 DB T_W1, 10000000B
C187 1B 82 E9 DB T_W12, 10000010B, 11101001B ;5
C18A 19 80 DB T_W1, 10000000B
C18C 1B 82 C9 DB T_W12, 10000010B, 11001001B ;4
C18F 19 80 DB T_W1, 10000000B
C191 1B 82 F1 DB T_W12, 10000010B, 11110001B ;3
C194 19 80 DB T_W1, 10000000B
C196 1B 82 D1 DB T_W12, 10000010B, 11010001B ;2
C199 19 80 DB T_W1, 10000000B
C19B 1B 82 E1 DB T_W12, 10000010B, 11100001B ;1
C19E 19 80 DB T_W1, 10000000B
C1A0 1B 82 81 DB T_W12, 10000010B, 10000001B ;0
C1A3 1B 83 C3 DB T_W12, 10000011B, 11000011B ;CE2=1
C1A6 19 81 DB T_W1, 10000001B
C1A8 1B 83 C3 DB T_W12, 10000011B, 11000011B ;0
C1AB 1B C3 C1 DB T_W12, 11000011B, 11000001B ;CE1=1
C1AE 19 C1 DB T_W1, 11000001B
C1B0 1B C3 C1 DB T_W12, 11000011B, 11000001B ;0
PROGRAM IOT MACRO-80 3.44 09-Dec-81 PAGE 1-228
C1B3 1B C3 C3 DB T_W12, 11000011B, 11000011B ;CE1=CE2=1
C1B6 19 C1 DB T_W1, 11000001B
C1B8 1B C3 C3 DB T_W12, 11000011B, 11000011B ;0
C1BB FE DB T_KONEC
;sync. obousmer. BIN. prog. citac
; 1 U _ 2_
;74169 C3210C/ T0123CP
C1BC I74169T: ; ZEDDDDPD NCQQQQEE
C1BC 21 DB T_GOSUB
C1BD C215 DW S168X1
C1BF 1B 83 E5 DB T_W12, 10000011B, 11100101B ;9
C1C2 19 81 DB T_W1, 10000001B
C1C4 1B 83 D5 DB T_W12, 10000011B, 11010101B ;10
C1C7 19 81 DB T_W1, 10000001B
C1C9 1B 83 F5 DB T_W12, 10000011B, 11110101B ;11
C1CC 19 81 DB T_W1, 10000001B
C1CE 1B 83 CD DB T_W12, 10000011B, 11001101B ;12
C1D1 19 81 DB T_W1, 10000001B
C1D3 1B 83 ED DB T_W12, 10000011B, 11101101B ;13
C1D6 19 81 DB T_W1, 10000001B
C1D8 1B 83 DD DB T_W12, 10000011B, 11011101B ;14
C1DB 19 81 DB T_W1, 10000001B
C1DD 1B 83 BD DB T_W12, 10000011B, 10111101B ;15
C1E0 19 81 DB T_W1, 10000001B
C1E2 1B 83 C1 DB T_W12, 10000011B, 11000001B ;0
C1E5 19 81 DB T_W1, 10000001B
C1E7 1B 83 E1 DB T_W12, 10000011B, 11100001B ;1
C1EA 19 82 DB T_W1, 10000010B ;CITAME DOLU
C1EC 1B 82 E1 DB T_W12, 10000010B, 11100001B ;1
C1EF 19 80 DB T_W1, 10000000B
C1F1 1B 82 81 DB T_W12, 10000010B, 10000001B ;0
C1F4 19 80 DB T_W1, 10000000B
C1F6 1B 82 FD DB T_W12, 10000010B, 11111101B ;15
C1F9 19 80 DB T_W1, 10000000B
C1FB 1B 82 DD DB T_W12, 10000010B, 11011101B ;14
C1FE 19 80 DB T_W1, 10000000B
C200 1B 82 ED DB T_W12, 10000010B, 11101101B ;13
C203 19 80 DB T_W1, 10000000B
C205 1B 82 CD DB T_W12, 10000010B, 11001101B ;12
C208 19 80 DB T_W1, 10000000B
C20A 1B 82 F5 DB T_W12, 10000010B, 11110101B ;11
C20D 19 80 DB T_W1, 10000000B
C20F 1B 82 D5 DB T_W12, 10000010B, 11010101B ;10
C212 20 DB T_GOTO
C213 C171 DW G74168T
;-------------------------------------------
;SPOLECNY BLOK K 74168 A 74169
C215 08 7F 03 S168X1: DB T_VV2, 01111111B, 00000011B
C218 24 45 DB T_NAP, DIL16
C21A 0B AB D6 DB T_O12, 10101011B, 11010110B
C21D 09 A9 DB T_O1, 10101001B
C21F 1B AB D7 DB T_W12, 10101011B, 11010111B ;NASTAV 0AH
C222 1B D7 D6 DB T_W12, 11010111B, 11010110B
C225 19 D5 DB T_W1, 11010101B
PROGRAM IOT MACRO-80 3.44 09-Dec-81 PAGE 1-229
C227 1B D7 EB DB T_W12, 11010111B, 11101011B ;NASTAV 5
C22A 1B 83 E8 DB T_W12, 10000011B, 11101000B
C22D 19 81 DB T_W1, 10000001B
C22F 1B 83 C1 DB T_W12, 10000011B, 11000001B ;NASTAV 0
C232 19 83 DB T_W1, 10000011B
C234 19 81 DB T_W1, 10000001B ;CITAME NAHORU
C236 1B 83 E1 DB T_W12, 10000011B, 11100001B ;1
C239 19 81 DB T_W1, 10000001B
C23B 1B 83 D1 DB T_W12, 10000011B, 11010001B ;2
C23E 19 81 DB T_W1, 10000001B
C240 1B 83 F1 DB T_W12, 10000011B, 11110001B ;3
C243 19 81 DB T_W1, 10000001B
C245 1B 83 C9 DB T_W12, 10000011B, 11001001B ;4
C248 19 81 DB T_W1, 10000001B
C24A 1B 83 E9 DB T_W12, 10000011B, 11101001B ;5
C24D 19 81 DB T_W1, 10000001B
C24F 1B 83 D9 DB T_W12, 10000011B, 11011001B ;6
C252 19 81 DB T_W1, 10000001B
C254 1B 83 F9 DB T_W12, 10000011B, 11111001B ;7
C257 19 81 DB T_W1, 10000001B
C259 1B 83 C5 DB T_W12, 10000011B, 11000101B ;8
C25C 19 81 DB T_W1, 10000001B
C25E 22 DB T_RET
;-------------------------------------------
;reg. 4x4bit. __
;74170, 74670 23AB321 0ABWR01
C25F I74170T: ; ZQQRRDDD NDWWEEQQ
C25F 08 1F 7C DB T_VV2, 00011111B, 01111100B
C262 24 45 DB T_NAP, DIL16
C264 1B E5 8F DB T_W12, 11100101B, 10001111B
C267 1A 87 DB T_W2, 10000111B
C269 1B E5 DF DB T_W12, 11100101B, 11011111B
C26C 1B EA DF DB T_W12, 11101010B, 11011111B
C26F 1A D7 DB T_W2, 11010111B
C271 1B EA DF DB T_W12, 11101010B, 11011111B
C274 1B F6 AF DB T_W12, 11110110B, 10101111B
C277 1A A7 DB T_W2, 10100111B
C279 1B F6 AF DB T_W12, 11110110B, 10101111B
C27C 1B F9 FF DB T_W12, 11111001B, 11111111B
C27F 1A F7 DB T_W2, 11110111B
C281 1B F9 FF DB T_W12, 11111001B, 11111111B
C284 1B A0 89 DB T_W12, 10100000B, 10001001B
C287 1B C8 8A DB T_W12, 11001000B, 10001010B
C28A 1B F0 88 DB T_W12, 11110000B, 10001000B
C28D 1B 98 8B DB T_W12, 10011000B, 10001011B
C290 1B E6 8F DB T_W12, 11100110B, 10001111B
C293 1A 87 DB T_W2, 10000111B
C295 1B E6 8F DB T_W12, 11100110B, 10001111B
C298 1B E9 DF DB T_W12, 11101001B, 11011111B
C29B 1A D7 DB T_W2, 11010111B
C29D 1B E9 DF DB T_W12, 11101001B, 11011111B
C2A0 1B F5 AF DB T_W12, 11110101B, 10101111B
C2A3 1A A7 DB T_W2, 10100111B
C2A5 1B F5 AF DB T_W12, 11110101B, 10101111B
C2A8 1B FA FF DB T_W12, 11111010B, 11111111B
PROGRAM IOT MACRO-80 3.44 09-Dec-81 PAGE 1-230
C2AB 1A F7 DB T_W2, 11110111B
C2AD 1B FA FF DB T_W12, 11111010B, 11111111B
C2B0 1B E0 88 DB T_W12, 11100000B, 10001000B
C2B3 1B 88 8B DB T_W12, 10001000B, 10001011B
C2B6 1B B0 89 DB T_W12, 10110000B, 10001001B
C2B9 1B D8 8A DB T_W12, 11011000B, 10001010B
C2BC FE DB T_KONEC
;4bit. reg. D __
;74173 C3210OO M0123__
C2BD I74173T: ; ZPQQQQEE NRDDDDEE
C2BD 08 43 7F DB T_VV2, 01000011B, 01111111B
C2C0 24 45 DB T_NAP, DIL16
C2C2 1B C0 FE DB T_W12, 11000000B, 11111110B ;RESET
C2C5 1B FF BE DB T_W12, 11111111B, 10111110B
C2C8 1B BE A8 DB T_W12, 10111110B, 10101000B
C2CB 1B FD A8 DB T_W12, 11111101B, 10101000B ;ZAPIS 1010
C2CE 1B D4 BD DB T_W12, 11010100B, 10111101B ;VYSTUP 1010
C2D1 1B BE 94 DB T_W12, 10111110B, 10010100B
C2D4 1B FD 94 DB T_W12, 11111101B, 10010100B ;ZAPIS 0101
C2D7 1B E8 BF DB T_W12, 11101000B, 10111111B ;VYSTUP 0101
C2DA FE DB T_KONEC
;6x K.O. D _
;74174 221100R 554433P
C2DB I74174T: ; ZQDQDDQM NQDDQDQC
C2DB 08 2D 35 DB T_VV2, 00101101B, 00110101B
C2DE 24 45 DB T_NAP, DIL16
C2E0 1B AC B5 DB T_W12, 10101100B, 10110101B ;RESET
C2E3 1B 89 90 DB T_W12, 10001001B, 10010000B
C2E6 1B 99 99 DB T_W12, 10011001B, 10011001B
C2E9 1B B5 AC DB T_W12, 10110101B, 10101100B
C2EC 1B E7 E7 DB T_W12, 11100111B, 11100111B
C2EF FE DB T_KONEC
;4x K.O. D _ _ _ _ _
;74175 111000M 333222P
C2F0 I74175T: ; ZQQDDQQR NQQDDQQC
C2F0 08 19 19 DB T_VV2, 00011001B, 00011001B
C2F3 24 45 DB T_NAP, DIL16
C2F5 1B BC BD DB T_W12, 10111100B, 10111101B ;RESET
C2F8 1B AD AC DB T_W12, 10101101B, 10101100B
C2FB 1B AB AB DB T_W12, 10101011B, 10101011B
C2FE 1B B3 B2 DB T_W12, 10110011B, 10110010B
C301 1B D5 D5 DB T_W12, 11010101B, 11010101B
C304 FE DB T_KONEC
;program. BCD citac _ _ _ _
;74176, 74196 10022P M33110
C305 I74176T: ; ZCQDDQLX XNRQDDQC
C305 21 DB T_GOSUB
C306 C331 DW S176X1
C308 1B E3 E1 DB T_W12, 11100011B, 11100001B ;1-0
C30B 1B 83 E2 DB T_W12, 10000011B, 11100010B
C30E 1B C3 E3 DB T_W12, 11000011B, 11100011B ;0-1
PROGRAM IOT MACRO-80 3.44 09-Dec-81 PAGE 1-231
C311 FE DB T_KONEC
;program. BCD citac _ _ _ _
;74177, 74197 10022P M33110
C312 I74177T: ; ZCQDDQLX XNRQDDQC
C312 21 DB T_GOSUB
C313 C331 DW S176X1
C315 1B E3 F3 DB T_W12, 11100011B, 11110011B ;1-5
C318 1B 83 F0 DB T_W12, 10000011B, 11110000B
C31B 1B C7 F1 DB T_W12, 11000111B, 11110001B ;0-6
C31E 1B A3 F2 DB T_W12, 10100011B, 11110010B
C321 1B E7 F3 DB T_W12, 11100111B, 11110011B ;1-7
C324 1B 83 E0 DB T_W12, 10000011B, 11100000B
C327 1B C3 E1 DB T_W12, 11000011B, 11100001B ;0-0
C32A 1B A3 E2 DB T_W12, 10100011B, 11100010B
C32D 1B E3 E3 DB T_W12, 11100011B, 11100011B ;1-1
C330 FE DB T_KONEC
;-------------------------------------------
;SPOLECNY BLOK K 74176, 74177, 74196 A 74197
C331 08 5A 2D S176X1: DB T_VV2, 01011010B, 00101101B
C334 24 44 DB T_NAP, DIL14
C336 1B CD E7 DB T_W12, 11001101B, 11100111B
C339 1B CF E7 DB T_W12, 11001111B, 11100111B
C33C 1B F1 F9 DB T_W12, 11110001B, 11111001B
C33F 1B F3 F9 DB T_W12, 11110011B, 11111001B
C342 1B C3 C1 DB T_W12, 11000011B, 11000001B ;RESET
C345 1B C3 E1 DB T_W12, 11000011B, 11100001B ;0-0
C348 1B A3 E2 DB T_W12, 10100011B, 11100010B
C34B 1B E3 E3 DB T_W12, 11100011B, 11100011B ;1-1
C34E 1B 87 E0 DB T_W12, 10000111B, 11100000B
C351 1B C7 E1 DB T_W12, 11000111B, 11100001B ;0-2
C354 1B A7 E2 DB T_W12, 10100111B, 11100010B
C357 1B E7 E3 DB T_W12, 11100111B, 11100011B ;1-3
C35A 1B 83 F0 DB T_W12, 10000011B, 11110000B
C35D 1B C3 F1 DB T_W12, 11000011B, 11110001B ;0-4
C360 1B A3 E0 DB T_W12, 10100011B, 11100000B
C363 22 DB T_RET
;9bit. renerator parity
;74180 OEOE76 543210
C364 I74180T: ; ZQQPPDDX XNDDDDDD
C364 08 1E 3F DB T_VV2, 00011110B, 00111111B
C367 24 44 DB T_NAP, DIL14
C369 1B AB D5 DB T_W12, 10101011B, 11010101B
C36C 1B AB D9 DB T_W12, 10101011B, 11011001B
C36F 1B B5 EB DB T_W12, 10110101B, 11101011B
C372 1B B5 EB DB T_W12, 10110101B, 11101011B
C375 1B D1 FF DB T_W12, 11010001B, 11111111B
C378 1B D3 D5 DB T_W12, 11010011B, 11010101B
C37B 1B CD F3 DB T_W12, 11001101B, 11110011B
C37E 1B C9 F1 DB T_W12, 11001001B, 11110001B
C381 1B 9B D5 DB T_W12, 10011011B, 11010101B
C384 1B E5 EB DB T_W12, 11100101B, 11101011B
C387 FE DB T_KONEC
PROGRAM IOT MACRO-80 3.44 09-Dec-81 PAGE 1-232
;4bit. ALU
;74181, 4581 210MC01 233_C_=3 1122300
C388 I74181T: ; ZQQQDNSS BABG4PQQ NABASSAB
C388 10 0F E0 7F DB T_VV3, 00001111B, 11100000B, 01111111B
C38C 24 47 DB T_NAP, DIL24
C38E 1F B0 49 E1 DB T_W123, 10110000B, 01001001B, 11100001B ;0
C392 1F AE A8 92 DB T_W123, 10101110B, 10101000B, 10010010B ;1
C396 1F F5 7B 90 DB T_W123, 11110101B, 01111011B, 10010000B ;2
C39A 1F 8F B8 D1 DB T_W123, 10001111B, 10111000B, 11010001B ;3
C39E 1F F8 57 DA DB T_W123, 11111000B, 01010111B, 11011010B ;4
C3A2 1F 9E 8D BA DB T_W123, 10011110B, 10001101B, 10111010B ;5
C3A6 1F 81 90 9B DB T_W123, 10000001B, 10010000B, 10011011B ;6
C3AA 1F 87 55 AA DB T_W123, 10000111B, 01010101B, 10101010B ;7
C3AE 1F 94 49 A6 DB T_W123, 10010100B, 01001001B, 10100110B ;8
C3B2 1F DA 75 A7 DB T_W123, 11011010B, 01110101B, 10100111B ;9
C3B6 1F A5 AD B7 DB T_W123, 10100101B, 10101101B, 10110111B ;10
C3BA 1F F7 5B 85 DB T_W123, 11110111B, 01011011B, 10000101B ;11
C3BE 1F B0 AD BE DB T_W123, 10110000B, 10101101B, 10111110B ;12
C3C2 1F C6 74 AE DB T_W123, 11000110B, 01110100B, 10101110B ;13
C3C6 1F B5 AD 9C DB T_W123, 10110101B, 10101101B, 10011100B ;14
C3CA 1F C3 B4 9C DB T_W123, 11000011B, 10110100B, 10011100B ;15
C3CE FE DB T_KONEC
;4bit. obvod pro urychleni prenosu
; ______ __
;74182, 4582 _330011 22NXY_Z
C3CF I74182T: ; ZPPGPGPG NPGCCCGC
C3CF 08 3F 70 DB T_VV2, 00111111B, 01110000B
C3D2 24 45 DB T_NAP, DIL16
C3D4 1B 95 A2 DB T_W12, 10010101B, 10100010B
C3D7 1B 95 BF DB T_W12, 10010101B, 10111111B
C3DA 1B 95 9D DB T_W12, 10010101B, 10011101B
C3DD 1B 95 81 DB T_W12, 10010101B, 10000001B
C3E0 1B D3 99 DB T_W12, 11010011B, 10011001B
C3E3 1B D3 BA DB T_W12, 11010011B, 10111010B
C3E6 1B D6 BD DB T_W12, 11010110B, 10111101B
C3E9 1B DE A5 DB T_W12, 11011110B, 10100101B
C3EC 1B D2 AD DB T_W12, 11010010B, 10101101B
C3EF 1B 85 A0 DB T_W12, 10000101B, 10100000B
C3F2 1B 85 81 DB T_W12, 10000101B, 10000001B
C3F5 1B 90 AD DB T_W12, 10010000B, 10101101B
C3F8 1B FB FA DB T_W12, 11111011B, 11111010B
C3FB 1B FA FE DB T_W12, 11111010B, 11111110B
C3FE 1B EA FC DB T_W12, 11101010B, 11111100B
C401 1B EA AD DB T_W12, 11101010B, 10101101B
C404 1B 84 A5 DB T_W12, 10000100B, 10100101B
C407 FE DB T_KONEC
;prevodnik BCD/BIN
;74184 7654321 _ 8
C408 I74184T: ; ZYYYYYYY NGEDCBAY
C408 08 00 7E DB T_VV2, 00000000B, 01111110B
C40B 24 45 DB T_NAP, DIL16
C40D 1B A0 81 DB T_W12, 10100000B, 10000001B
C410 1B 81 83 DB T_W12, 10000001B, 10000011B
C413 1B E2 84 DB T_W12, 11100010B, 10000100B
PROGRAM IOT MACRO-80 3.44 09-Dec-81 PAGE 1-233
C416 1B C3 86 DB T_W12, 11000011B, 10000110B
C419 1B E4 88 DB T_W12, 11100100B, 10001000B
C41C 1B DF 8A DB T_W12, 11011111B, 10001010B
C41F 1B BF 8C DB T_W12, 10111111B, 10001100B
C422 1B 9F 8E DB T_W12, 10011111B, 10001110B
C425 1B A5 90 DB T_W12, 10100101B, 10010000B
C428 1B 86 92 DB T_W12, 10000110B, 10010010B
C42B 1B E7 95 DB T_W12, 11100111B, 10010101B
C42E 1B E8 97 DB T_W12, 11101000B, 10010111B
C431 1B E9 99 DB T_W12, 11101001B, 10011001B
C434 1B FF 9B DB T_W12, 11111111B, 10011011B
C437 1B FF 9D DB T_W12, 11111111B, 10011101B
C43A 1B FF 9F DB T_W12, 11111111B, 10011111B
C43D 1B 8A A0 DB T_W12, 10001010B, 10100000B
C440 1B 8B A3 DB T_W12, 10001011B, 10100011B
C443 1B 8C A5 DB T_W12, 10001100B, 10100101B
C446 1B ED A6 DB T_W12, 11101101B, 10100110B
C449 1B EE A8 DB T_W12, 11101110B, 10101000B
C44C 1B DF AA DB T_W12, 11011111B, 10101010B
C44F 1B DF AC DB T_W12, 11011111B, 10101100B
C452 1B BF AE DB T_W12, 10111111B, 10101110B
C455 1B AF B0 DB T_W12, 10101111B, 10110000B
C458 1B 90 B2 DB T_W12, 10010000B, 10110010B
C45B 1B F1 B5 DB T_W12, 11110001B, 10110101B
C45E 1B F2 B7 DB T_W12, 11110010B, 10110111B
C461 1B F3 B9 DB T_W12, 11110011B, 10111001B
C464 1B FF BB DB T_W12, 11111111B, 10111011B
C467 1B FF BD DB T_W12, 11111111B, 10111101B
C46A 1B FF BF DB T_W12, 11111111B, 10111111B
C46D 1B FF D5 G74184T:DB T_W12, 11111111B, 11010101B
C470 1B FF EB DB T_W12, 11111111B, 11101011B
C473 FE DB T_KONEC
;prevodnik BIN/BCD
; 7654321 _ 8
C474 I74185T: ; ZYYYYYYY NGEDCBAY
C474 08 00 7E DB T_VV2, 00000000B, 01111110B
C477 24 45 DB T_NAP, DIL16
C479 1B C0 81 DB T_W12, 11000000B, 10000001B
C47C 1B C1 83 DB T_W12, 11000001B, 10000011B
C47F 1B C2 85 DB T_W12, 11000010B, 10000101B
C482 1B C3 87 DB T_W12, 11000011B, 10000111B
C485 1B C4 89 DB T_W12, 11000100B, 10001001B
C488 1B C8 8B DB T_W12, 11001000B, 10001011B
C48B 1B C9 8D DB T_W12, 11001001B, 10001101B
C48E 1B CA 8F DB T_W12, 11001010B, 10001111B
C491 1B CB 91 DB T_W12, 11001011B, 10010001B
C494 1B CC 93 DB T_W12, 11001100B, 10010011B
C497 1B D0 95 DB T_W12, 11010000B, 10010101B
C49A 1B D1 97 DB T_W12, 11010001B, 10010111B
C49D 1B D2 99 DB T_W12, 11010010B, 10011001B
C4A0 1B D3 9B DB T_W12, 11010011B, 10011011B
C4A3 1B D4 9D DB T_W12, 11010100B, 10011101B
C4A6 1B D8 9F DB T_W12, 11011000B, 10011111B
C4A9 1B D9 A1 DB T_W12, 11011001B, 10100001B
C4AC 1B DA A3 DB T_W12, 11011010B, 10100011B
PROGRAM IOT MACRO-80 3.44 09-Dec-81 PAGE 1-234
C4AF 1B DB A5 DB T_W12, 11011011B, 10100101B
C4B2 1B DC A7 DB T_W12, 11011100B, 10100111B
C4B5 1B E0 A9 DB T_W12, 11100000B, 10101001B
C4B8 1B E1 AB DB T_W12, 11100001B, 10101011B
C4BB 1B E2 AD DB T_W12, 11100010B, 10101101B
C4BE 1B E3 AF DB T_W12, 11100011B, 10101111B
C4C1 1B E4 B1 DB T_W12, 11100100B, 10110001B
C4C4 1B E8 B3 DB T_W12, 11101000B, 10110011B
C4C7 1B E9 B5 DB T_W12, 11101001B, 10110101B
C4CA 1B EA B7 DB T_W12, 11101010B, 10110111B
C4CD 1B EB B9 DB T_W12, 11101011B, 10111001B
C4D0 1B EC BB DB T_W12, 11101100B, 10111011B
C4D3 1B F0 BD DB T_W12, 11110000B, 10111101B
C4D6 1B F1 BF DB T_W12, 11110001B, 10111111B
C4D9 20 DB T_GOTO
C4DA C46D DW G74184T
;PROM 32x8bitu
;74188 1234567 432108
C4DC I74188T: ; ZQQQQQQQ NSAAAAAQ
C4DC 08 00 7E DB T_VV2, 00000000B, 01111110B
C4DF 24 45 DB T_NAP, DIL16
C4E1 1B FF D5 DB T_W12, 11111111B, 11010101B
C4E4 1B FF EB DB T_W12, 11111111B, 11101011B
C4E7 1B 80 80 DB T_W12, 10000000B, 10000000B
C4EA 1B 80 82 DB T_W12, 10000000B, 10000010B
C4ED 1B 80 84 DB T_W12, 10000000B, 10000100B
C4F0 1B 80 86 DB T_W12, 10000000B, 10000110B
C4F3 1B 80 88 DB T_W12, 10000000B, 10001000B
C4F6 1B 80 8A DB T_W12, 10000000B, 10001010B
C4F9 1B 80 8C DB T_W12, 10000000B, 10001100B
C4FC 1B 80 8E DB T_W12, 10000000B, 10001110B
C4FF 1B 80 90 DB T_W12, 10000000B, 10010000B
C502 1B 80 92 DB T_W12, 10000000B, 10010010B
C505 1B 80 94 DB T_W12, 10000000B, 10010100B
C508 1B 80 96 DB T_W12, 10000000B, 10010110B
C50B 1B 80 98 DB T_W12, 10000000B, 10011000B
C50E 1B 80 9A DB T_W12, 10000000B, 10011010B
C511 1B 80 9C DB T_W12, 10000000B, 10011100B
C514 1B 80 9E DB T_W12, 10000000B, 10011110B
C517 1B 80 A0 DB T_W12, 10000000B, 10100000B
C51A 1B 80 A2 DB T_W12, 10000000B, 10100010B
C51D 1B 80 A4 DB T_W12, 10000000B, 10100100B
C520 1B 80 A6 DB T_W12, 10000000B, 10100110B
C523 1B 80 A8 DB T_W12, 10000000B, 10101000B
C526 1B 80 AA DB T_W12, 10000000B, 10101010B
C529 1B 80 AC DB T_W12, 10000000B, 10101100B
C52C 1B 80 AE DB T_W12, 10000000B, 10101110B
C52F 1B 80 B0 DB T_W12, 10000000B, 10110000B
C532 1B 80 B2 DB T_W12, 10000000B, 10110010B
C535 1B 80 B4 DB T_W12, 10000000B, 10110100B
C538 1B 80 B6 DB T_W12, 10000000B, 10110110B
C53B 1B 80 B8 DB T_W12, 10000000B, 10111000B
C53E 1B 80 BA DB T_W12, 10000000B, 10111010B
C541 1B 80 BC DB T_W12, 10000000B, 10111100B
C544 1B 80 BE DB T_W12, 10000000B, 10111110B
PROGRAM IOT MACRO-80 3.44 09-Dec-81 PAGE 1-235
C547 FE DB T_KONEC
;SRAM 16x4bity _ _ __ _ _
;74189 1100WC0 1233322
C548 I74189T: ; ZQDQDREA NAAADQDQ
C548 08 2F 7A DB T_VV2, 00101111B, 01111010B
C54B 24 45 DB T_NAP, DIL16
C54D 1B FA AF DB T_W12, 11111010B, 10101111B ;/CE=1 /WR=0
C550 20 DB T_GOTO
C551 B731 DW G7489T
;sync. obousmer. prog. BCD citac
; __ _ _
;74190 32UC011 0CRTP23
C553 I74190T: ; ZQQDEQQD NDPCCLDD
C553 21 DB T_GOSUB
C554 C608 DW S190X1
C556 1B C4 BC DB T_W12, 11000100B, 10111100B ;9
C559 1A 8C DB T_W2, 10001100B
C55B 1B 80 B4 DB T_W12, 10000000B, 10110100B ;0
C55E 1A 94 DB T_W2, 10010100B
C560 1B 84 B4 DB T_W12, 10000100B, 10110100B ;1
C563 19 8C DB T_W1, 10001100B
C565 19 9C DB T_W1, 10011100B
C567 19 94 DB T_W1, 10010100B ;DOLU
C569 1A 94 DB T_W2, 10010100B
C56B 1A 94 DB T_W2, 10010100B
C56D 1B 90 BC DB T_W12, 10010000B, 10111100B ;0
C570 1A 8C DB T_W2, 10001100B
C572 1B D4 B4 G74190T:DB T_W12, 11010100B, 10110100B ;9
C575 1A 94 DB T_W2, 10010100B
C577 1B D0 B4 DB T_W12, 11010000B, 10110100B ;8
C57A 1A 94 DB T_W2, 10010100B
C57C 1B B6 B4 DB T_W12, 10110110B, 10110100B ;7
C57F 1A 94 DB T_W2, 10010100B
C581 1B B2 B4 DB T_W12, 10110010B, 10110100B ;6
C584 1A 94 DB T_W2, 10010100B
C586 1B B4 B4 DB T_W12, 10110100B, 10110100B ;5
C589 1A 94 DB T_W2, 10010100B
C58B 1B B0 B4 DB T_W12, 10110000B, 10110100B ;4
C58E 1A 94 DB T_W2, 10010100B
C590 1B 96 B4 DB T_W12, 10010110B, 10110100B ;3
C593 1A 94 DB T_W2, 10010100B
C595 1B 92 B4 DB T_W12, 10010010B, 10110100B ;2
C598 1A 94 DB T_W2, 10010100B
C59A 1B 94 B4 DB T_W12, 10010100B, 10110100B ;1
C59D 1A 94 DB T_W2, 10010100B
C59F 1B 90 BC DB T_W12, 10010000B, 10111100B ;0
C5A2 19 98 DB T_W1, 10011000B ;CE=0
C5A4 1A 9C DB T_W2, 10011100B
C5A6 1B 98 BC DB T_W12, 10011000B, 10111100B ;0
C5A9 FE DB T_KONEC
;sync. obousmer. prog. BIN citac
; __ _ _
;74191 32UC011 0CRTP23
PROGRAM IOT MACRO-80 3.44 09-Dec-81 PAGE 1-236
C5AA I74191T: ; ZQQDEQQD NDPCCLDD
C5AA 21 DB T_GOSUB
C5AB C608 DW S190X1
C5AD 1B C4 B4 DB T_W12, 11000100B, 10110100B ;9
C5B0 1A 94 DB T_W2, 10010100B
C5B2 1B C2 B4 DB T_W12, 11000010B, 10110100B ;10
C5B5 1A 94 DB T_W2, 10010100B
C5B7 1B C6 B4 DB T_W12, 11000110B, 10110100B ;11
C5BA 1A 94 DB T_W2, 10010100B
C5BC 1B E0 B4 DB T_W12, 11100000B, 10110100B ;12
C5BF 1A 94 DB T_W2, 10010100B
C5C1 1B E4 B4 DB T_W12, 11100100B, 10110100B ;13
C5C4 1A 94 DB T_W2, 10010100B
C5C6 1B E2 B4 DB T_W12, 11100010B, 10110100B ;14
C5C9 1A 94 DB T_W2, 10010100B
C5CB 1B E6 BC DB T_W12, 11100110B, 10111100B ;15
C5CE 1A 8C DB T_W2, 10001100B
C5D0 1B 80 B4 DB T_W12, 10000000B, 10110100B ;0
C5D3 1A 94 DB T_W2, 10010100B
C5D5 1B 84 B4 DB T_W12, 10000100B, 10110100B ;1
C5D8 19 8C DB T_W1, 10001100B
C5DA 19 9C DB T_W1, 10011100B
C5DC 19 94 DB T_W1, 10010100B ;DOLU
C5DE 1A 94 DB T_W2, 10010100B
C5E0 1A 94 DB T_W2, 10010100B
C5E2 1B 90 BC DB T_W12, 10010000B, 10111100B ;0
C5E5 1A 8C DB T_W2, 10001100B
C5E7 1B F6 B4 DB T_W12, 11110110B, 10110100B ;15
C5EA 1A 94 DB T_W2, 10010100B
C5EC 1B F2 B4 DB T_W12, 11110010B, 10110100B ;14
C5EF 1A 94 DB T_W2, 10010100B
C5F1 1B F4 B4 DB T_W12, 11110100B, 10110100B ;13
C5F4 1A 94 DB T_W2, 10010100B
C5F6 1B F0 B4 DB T_W12, 11110000B, 10110100B ;12
C5F9 1A 94 DB T_W2, 10010100B
C5FB 1B D6 B4 DB T_W12, 11010110B, 10110100B ;11
C5FE 1A 94 DB T_W2, 10010100B
C600 1B D2 B4 DB T_W12, 11010010B, 10110100B ;10
C603 1A 94 DB T_W2, 10010100B
C605 20 DB T_GOTO
C606 C572 DW G74190T
;-------------------------------------------
;SPOLECNY BLOK K 74190 A 74191
C608 08 19 67 S190X1: DB T_VV2, 00011001B, 01100111B
C60B 24 45 DB T_NAP, DIL16
C60D 0B 83 B6 DB T_O12, 10000011B, 10110110B
C610 0A B2 DB T_O2, 10110010B
C612 1B A3 B6 DB T_W12, 10100011B, 10110110B ;NASTAV 5
C615 1B A2 F5 DB T_W12, 10100010B, 11110101B
C618 1A F1 DB T_W2, 11110001B
C61A 1B C4 F5 DB T_W12, 11000100B, 11110101B ;NASTAV A
C61D 1B C4 B4 DB T_W12, 11000100B, 10110100B
C620 1A B0 DB T_W2, 10110000B
C622 1B 80 B4 DB T_W12, 10000000B, 10110100B ;NASTAV 0
C625 1A 94 DB T_W2, 10010100B
PROGRAM IOT MACRO-80 3.44 09-Dec-81 PAGE 1-237
C627 1B 84 B4 DB T_W12, 10000100B, 10110100B ;NAHORU 1
C62A 1A 94 DB T_W2, 10010100B
C62C 1B 82 B4 DB T_W12, 10000010B, 10110100B ;2
C62F 1A 94 DB T_W2, 10010100B
C631 1B 86 B4 DB T_W12, 10000110B, 10110100B ;3
C634 1A 94 DB T_W2, 10010100B
C636 1B A0 B4 DB T_W12, 10100000B, 10110100B ;4
C639 1A 94 DB T_W2, 10010100B
C63B 1B A4 B4 DB T_W12, 10100100B, 10110100B ;5
C63E 1A 94 DB T_W2, 10010100B
C640 1B A2 B4 DB T_W12, 10100010B, 10110100B ;6
C643 1A 94 DB T_W2, 10010100B
C645 1B A6 B4 DB T_W12, 10100110B, 10110100B ;7
C648 1A 94 DB T_W2, 10010100B
C64A 1B C0 B4 DB T_W12, 11000000B, 10110100B ;8
C64D 1A 94 DB T_W2, 10010100B
C64F 22 DB T_RET
;sync.(ne v kaskade) obousmer. prog. BCD citac
; ___
;74192 32UD011 0MDUP23
C650 I74192T: ; ZQQPPQQD NDRDDLDD
C650 21 DB T_GOSUB
C651 C6EC DW S192X1
C653 1B CC 94 DB T_W12, 11001100B, 10010100B
C656 1B 98 9C DB T_W12, 10011000B, 10011100B ;0
C659 19 88 DB T_W1, 10001000B
C65B 1B 9C 9C DB T_W12, 10011100B, 10011100B ;1
C65E 19 94 DB T_W1, 10010100B ;DLOLU
C660 1B 98 9C DB T_W12, 10011000B, 10011100B ;0
C663 1B 90 8C DB T_W12, 10010000B, 10001100B
C666 1B DC 9C G74192T:DB T_W12, 11011100B, 10011100B ;9
C669 19 D4 DB T_W1, 11010100B
C66B 1B D8 9C DB T_W12, 11011000B, 10011100B ;8
C66E 19 D0 DB T_W1, 11010000B
C670 1B BE 9C DB T_W12, 10111110B, 10011100B ;7
C673 19 B6 DB T_W1, 10110110B
C675 1B BA 9C DB T_W12, 10111010B, 10011100B ;6
C678 19 B2 DB T_W1, 10110010B
C67A 1B BC 9C DB T_W12, 10111100B, 10011100B ;5
C67D 19 B4 DB T_W1, 10110100B
C67F 1B B8 9C DB T_W12, 10111000B, 10011100B ;4
C682 19 B0 DB T_W1, 10110000B
C684 1B 9E 9C DB T_W12, 10011110B, 10011100B ;3
C687 19 96 DB T_W1, 10010110B
C689 1B 9A 9C DB T_W12, 10011010B, 10011100B ;2
C68C 19 92 DB T_W1, 10010010B
C68E 1B 9C 9C DB T_W12, 10011100B, 10011100B ;1
C691 19 94 DB T_W1, 10010100B
C693 1B 98 9C DB T_W12, 10011000B, 10011100B ;0
C696 FE DB T_KONEC
; ___
;74193 32UD011 0MDUP23
C697 I74193T: ; ZQQPPQQD NDRDDLDD
C697 21 DB T_GOSUB
PROGRAM IOT MACRO-80 3.44 09-Dec-81 PAGE 1-238
C698 C6EC DW S192X1
C69A 19 CC DB T_W1, 11001100B
C69C 1B DA 9C DB T_W12, 11011010B, 10011100B ;10
C69F 19 CA DB T_W1, 11001010B
C6A1 1B DE 9C DB T_W12, 11011110B, 10011100B ;11
C6A4 19 CE DB T_W1, 11001110B
C6A6 1B F8 9C DB T_W12, 11111000B, 10011100B ;12
C6A9 19 E8 DB T_W1, 11101000B
C6AB 1B FC 9C DB T_W12, 11111100B, 10011100B ;13
C6AE 19 EC DB T_W1, 11101100B
C6B0 1B FA 9C DB T_W12, 11111010B, 10011100B ;14
C6B3 19 EA DB T_W1, 11101010B
C6B5 1B FE 9C DB T_W12, 11111110B, 10011100B ;15
C6B8 1B EE 94 DB T_W12, 11101110B, 10010100B
C6BB 1B 98 9C DB T_W12, 10011000B, 10011100B ;0
C6BE 19 88 DB T_W1, 10001000B
C6C0 1B 9C 9C DB T_W12, 10011100B, 10011100B ;1
C6C3 19 94 DB T_W1, 10010100B ;DLOLU
C6C5 1B 98 9C DB T_W12, 10011000B, 10011100B ;0
C6C8 1B 90 8C DB T_W12, 10010000B, 10001100B
C6CB 1B FE 9C DB T_W12, 11111110B, 10011100B ;15
C6CE 19 F6 DB T_W1, 11110110B
C6D0 1B FA 9C DB T_W12, 11111010B, 10011100B ;14
C6D3 19 F2 DB T_W1, 11110010B
C6D5 1B FC 9C DB T_W12, 11111100B, 10011100B ;13
C6D8 19 F4 DB T_W1, 11110100B
C6DA 1B F8 9C DB T_W12, 11111000B, 10011100B ;12
C6DD 19 F0 DB T_W1, 11110000B
C6DF 1B DE 9C DB T_W12, 11011110B, 10011100B ;11
C6E2 19 D6 DB T_W1, 11010110B
C6E4 1B DA 9C DB T_W12, 11011010B, 10011100B ;10
C6E7 19 D2 DB T_W1, 11010010B
C6E9 20 DB T_GOTO
C6EA C666 DW G74192T
;-------------------------------------------
;SPOLECNY BLOK K 74192 A 74193
C6EC 08 19 67 S192X1: DB T_VV2, 00011001B, 01100111B
C6EF 24 45 DB T_NAP, DIL16
C6F1 0B BB 9E DB T_O12, 10111011B, 10011110B
C6F4 0A 9A DB T_O2, 10011010B
C6F6 1B BB 9E DB T_W12, 10111011B, 10011110B ;NASTAV 5
C6F9 1B BA DD DB T_W12, 10111010B, 11011101B
C6FC 1B DC D9 DB T_W12, 11011100B, 11011001B
C6FF 1B DC DD DB T_W12, 11011100B, 11011101B ;NASTAV A
C702 1B 98 BC DB T_W12, 10011000B, 10111100B
C705 1B 98 9C DB T_W12, 10011000B, 10011100B ;RESET
C708 19 88 DB T_W1, 10001000B ;NAHORU
C70A 1B 9C 9C DB T_W12, 10011100B, 10011100B ;1
C70D 19 8C DB T_W1, 10001100B
C70F 1B 9A 9C DB T_W12, 10011010B, 10011100B ;2
C712 19 8A DB T_W1, 10001010B
C714 1B 9E 9C DB T_W12, 10011110B, 10011100B ;3
C717 19 8E DB T_W1, 10001110B
PROGRAM IOT MACRO-80 3.44 09-Dec-81 PAGE 1-239
C719 1B B8 9C DB T_W12, 10111000B, 10011100B ;4
C71C 19 A8 DB T_W1, 10101000B
C71E 1B BC 9C DB T_W12, 10111100B, 10011100B ;5
C721 19 AC DB T_W1, 10101100B
C723 1B BA 9C DB T_W12, 10111010B, 10011100B ;6
C726 19 AA DB T_W1, 10101010B
C728 1B BE 9C DB T_W12, 10111110B, 10011100B ;7
C72B 19 AE DB T_W1, 10101110B
C72D 1B D8 9C DB T_W12, 11011000B, 10011100B ;8
C730 19 C8 DB T_W1, 11001000B
C732 1B DC 9C DB T_W12, 11011100B, 10011100B ;9
C735 22 DB T_RET
;4bit. obousmer. posuv. registr se ser. a par. vstup, par. vystup
; _
;74194 D3210DM 0123C10
C736 I74194T: ; ZLDDDDRR NQQQQPSS
C736 08 7F 07 DB T_VV2, 01111111B, 00000111B
C739 24 45 DB T_NAP, DIL16
C73B 1B AA 84 DB T_W12, 10101010B, 10000100B ;RESET
C73E 1B D5 83 DB T_W12, 11010101B, 10000011B
C741 1A D7 DB T_W2, 11010111B ;NASTAV 5
C743 1B AB D3 DB T_W12, 10101011B, 11010011B
C746 1A AF DB T_W2, 10101111B ;NASTAV A
C748 1A A9 DB T_W2, 10101001B ;DOPRAVA
C74A 1A D5 DB T_W2, 11010101B
C74C 1A D1 DB T_W2, 11010001B
C74E 1A ED DB T_W2, 11101101B
C750 1B C1 E9 DB T_W12, 11000001B, 11101001B
C753 1A B5 DB T_W2, 10110101B
C755 1A B1 DB T_W2, 10110001B
C757 1A 9D DB T_W2, 10011101B
C759 1B 93 99 DB T_W12, 10010011B, 10011001B
C75C 1A CD DB T_W2, 11001101B
C75E 1B C1 C9 DB T_W12, 11000001B, 11001001B
C761 1A A5 DB T_W2, 10100101B
C763 1B 8B A1 DB T_W12, 10001011B, 10100001B
C766 1A D5 DB T_W2, 11010101B
C768 1B C1 D2 DB T_W12, 11000001B, 11010010B ;DOLEVA
C76B 1A AE DB T_W2, 10101110B
C76D 1A AA DB T_W2, 10101010B
C76F 1A DE DB T_W2, 11011110B
C771 1B 89 DA DB T_W12, 10001001B, 11011010B
C774 1A B6 DB T_W2, 10110110B
C776 1A B2 DB T_W2, 10110010B
C778 1A E6 DB T_W2, 11100110B
C77A 1B C3 E2 DB T_W12, 11000011B, 11100010B
C77D 1A CE DB T_W2, 11001110B
C77F 1A C8 DB T_W2, 11001000B ;NIC
C781 1A CC DB T_W2, 11001100B
C783 FE DB T_KONEC
;4bit. posuv. registr se ser. a par. vstup, par. vystup
; _ _ _
;74195 3210_ M 01233CP
C784 I74195T: ; ZDDDDKJR NQQQQQPE
PROGRAM IOT MACRO-80 3.44 09-Dec-81 PAGE 1-240
C784 08 7F 03 DB T_VV2, 01111111B, 00000011B
C787 24 45 DB T_NAP, DIL16
C789 1B AA 87 DB T_W12, 10101010B, 10000111B ;RESET
C78C 1B AB 84 DB T_W12, 10101011B, 10000100B
C78F 1A D6 DB T_W2, 11010110B ;NASTAV A
C791 1B D5 D4 DB T_W12, 11010101B, 11010100B
C794 1A AA DB T_W2, 10101010B ;NASTAV 5
C796 1B C7 A9 DB T_W12, 11000111B, 10101001B
C799 1A D7 DB T_W2, 11010111B
C79B 1B A5 D5 DB T_W12, 10100101B, 11010101B
C79E 1A EB DB T_W2, 11101011B
C7A0 1B 93 E9 DB T_W12, 10010011B, 11101001B
C7A3 1A B7 DB T_W2, 10110111B
C7A5 1B 89 B5 DB T_W12, 10001001B, 10110101B
C7A8 1A 9B DB T_W2, 10011011B
C7AA 1B A5 99 DB T_W12, 10100101B, 10011001B
C7AD 1A 8B DB T_W2, 10001011B
C7AF 1B B3 89 DB T_W12, 10110011B, 10001001B
C7B2 1A C7 DB T_W2, 11000111B
C7B4 FE DB T_KONEC
;8bit. posuv. obousmer. registr se ser. a par. vstup, par. vystup
; _
;74198 C332211 7665544M 1D700D0
C7B5 I74198T: ; ZPQDQDQD QDQDQDQR NSLDQDRS
C7B5 10 55 55 77 DB T_VV3, 01010101B, 01010101B, 01110111B
C7B9 24 47 DB T_NAP, DIL24
C7BB 0B C0 00 DB T_O12, 11000000B, 00000000B
C7BE 1F C0 11 D3 DB T_W123, 11000000B, 00010001B, 11010011B ;RESET
C7C2 19 91 DB T_W1, 10010001B
C7C4 1F F3 CD E7 DB T_W123, 11110011B, 11001101B, 11100111B ;NASTAV
C7C8 19 A6 DB T_W1, 10100110B
C7CA 1F CC 67 EE DB T_W123, 11001100B, 01100111B, 11101110B ;NASTAV
C7CE 19 88 DB T_W1, 10001000B
C7D0 1F F3 99 D0 DB T_W123, 11110011B, 10011001B, 11010000B ;VLEVO
C7D4 19 A2 DB T_W1, 10100010B
C7D6 1F CC 67 CE DB T_W123, 11001100B, 01100111B, 11001110B
C7DA 19 88 DB T_W1, 10001000B
C7DC 1F F3 19 83 DB T_W123, 11110011B, 00011001B, 10000011B ;VPRAVO
C7E0 19 A2 DB T_W1, 10100010B
C7E2 1F CC 67 AF DB T_W123, 11001100B, 01100111B, 10101111B
C7E6 19 88 DB T_W1, 10001000B
C7E8 1F F3 99 AD DB T_W123, 11110011B, 10011001B, 10101101B
C7EC 19 A2 DB T_W1, 10100010B
C7EE 1F CF 67 B0 DB T_W123, 11001111B, 01100111B, 10110000B ;NIC
C7F2 19 8A DB T_W1, 10001010B
C7F4 1F CF 67 B0 DB T_W123, 11001111B, 01100111B, 10110000B
C7F8 FE DB T_KONEC
;FIFO registr 16x 5bit
; 1 11111111 21
; 09876543 87654321 0921
; _
;74225 O43210U _OU01234 CIC
;I74225T: ; ZEDDDDDO RRIQQQQQ XXNBRAXX
; DB T_NIC
PROGRAM IOT MACRO-80 3.44 09-Dec-81 PAGE 1-241
; DB T_VV3, 01111110B, 10100000B, 00010100B
; DB T_NAP, DIL20
; DB T_O123, 10000000B, 00100000B, 11101111B
; DB T_W123, 11000011B, 10111111B, 11101111B
; DB T_O2, 00100000B
; DB T_W123, 10000011B, 01110000B, 11111111B ;1
; DB T_O3, 11101111B
; DB T_W123, 10000101B, 01110000B, 11111111B ;2
; DB T_O3, 11101111B
; DB T_O13, 10001001B, 11111111B ;3
; DB T_O3, 11101111B
; DB T_O13, 10010001B, 11111111B ;4
; DB T_O3, 11101111B
; DB T_O13, 10100001B, 11111111B ;5
; DB T_O3, 11101111B
; DB T_O13, 10011111B, 11111111B ;6
; DB T_O3, 11101111B
; DB T_O13, 10101111B, 11111111B ;7
; DB T_O3, 11101111B
; DB T_O13, 10110111B, 11111111B ;8
; DB T_O3, 11101011B
; DB T_O13, 10111011B, 11111111B ;9
; DB T_O3, 11111011B
; DB T_O13, 10111101B, 11111111B ;10
; DB T_O3, 11111011B
; DB T_O13, 10111111B, 11111111B ;11
; DB T_O3, 11111011B
; DB T_O13, 10000001B, 11111111B ;12
; DB T_O3, 11111011B
; DB T_O13, 10101011B, 11111111B ;13
; DB T_O3, 11111011B
; DB T_O13, 10010101B, 11111111B ;14
; DB T_O3, 11111011B
; DB T_W123, 10110011B, 01110000B, 11111111B ;15
; DB T_O3, 11111011B
; DB T_W123, 10011001B, 01110000B, 11111111B ;16
; DB T_O3, 11111011B
; DB T_W123, 10001001B, 01110000B, 11110111B ;17
; DB T_W3, 11110011B
; DB T_KONEC
; DB T_VV3, 01111110B, 10100000B, 00010100B
; DB T_NAP, DIL20
; DB T_O123, 10000001B, 00100000B, 11111111B
; DB T_O2, 10100000B
; DB T_O3, 11111011B
; DB T_O13, 10100001B, 11111111B ;1
; DB T_O3, 11111011B
; DB T_O13, 10010001B, 11111111B ;2
; DB T_O3, 11111011B
; DB T_O13, 10001001B, 11111111B ;3
; DB T_O3, 11111011B
; DB T_O13, 10000101B, 11111111B ;4
; DB T_O3, 11111011B
; DB T_O13, 10000011B, 11111111B ;5
PROGRAM IOT MACRO-80 3.44 09-Dec-81 PAGE 1-242
; DB T_O3, 11111011B
; DB T_O13, 10011111B, 11111111B ;6
; DB T_O3, 11111011B
; DB T_O13, 10101111B, 11111111B ;7
; DB T_O3, 11111011B
; DB T_O13, 10110111B, 11111111B ;8
; DB T_O3, 11111011B
; DB T_O13, 10111011B, 11111111B ;9
; DB T_O3, 11111011B
; DB T_O13, 10111101B, 11111111B ;10
; DB T_O3, 11111011B
; DB T_O13, 10111111B, 11111111B ;11
; DB T_O3, 11111011B
; DB T_O13, 10101011B, 11111111B ;12
; DB T_O3, 11111011B
; DB T_O13, 10010101B, 11111111B ;13
; DB T_O3, 11111011B
; DB T_O13, 10110011B, 11111111B ;14
; DB T_O3, 11111011B
; DB T_O13, 10001101B, 11111111B ;15
; DB T_O3, 11111011B
; DB T_O13, 10000001B, 11111111B ;16
; DB T_I23, 11100001B, 11110111B ;1
; DB T_O2, 11000001B
; DB T_W23, 10100010B, 11111111B ;2
; DB T_O2, 10000010B
; DB T_W23, 10100100B, 11111111B ;3
; DB T_O2, 10000100B
; DB T_W23, 10101000B, 11111111B ;4
; DB T_O2, 10001000B
; DB T_W23, 10110000B, 11111111B ;5
; DB T_O2, 10010000B
; DB T_W23, 10101111B, 11111111B ;6
; DB T_O2, 10001111B
; DB T_W23, 10110111B, 11111111B ;7
; DB T_O2, 10010111B
; DB T_W23, 10111011B, 11111111B ;8
; DB T_O2, 10011011B
; DB T_W23, 10111101B, 11111111B ;9
; DB T_O2, 10011101B
; DB T_W23, 10111110B, 11111111B ;10
; DB T_O2, 10011110B
; DB T_W23, 10111111B, 11111111B ;11
; DB T_O2, 10011111B
; DB T_W23, 10110101B, 11111111B ;12
; DB T_O2, 10010101B
; DB T_W23, 10101010B, 11111111B ;13
; DB T_O2, 10001010B
; DB T_W23, 10110011B, 11111111B ;14
; DB T_O2, 10010011B
; DB T_W23, 10101100B, 11111111B ;15
; DB T_O2, 10001100B
; DB T_W23, 10100000B, 11111111B ;16
; DB T_KONEC
;3bit. dekoder 1 z 8
PROGRAM IOT MACRO-80 3.44 09-Dec-81 PAGE 1-243
;74238 321
C7F9 I74238T: ; Z7EEECBA N0123456
C7F9 08 3F 00 DB T_VV2, 00111111B, 00000000B
C7FC 24 45 DB T_NAP, DIL16
C7FE 1B A0 C0 DB T_W12, 10100000B, 11000000B
C801 1B A1 A0 DB T_W12, 10100001B, 10100000B
C804 1B A2 90 DB T_W12, 10100010B, 10010000B
C807 1B A3 88 DB T_W12, 10100011B, 10001000B
C80A 1B A4 84 DB T_W12, 10100100B, 10000100B
C80D 1B A5 82 DB T_W12, 10100101B, 10000010B
C810 1B A6 81 DB T_W12, 10100110B, 10000001B
C813 1B E7 80 DB T_W12, 11100111B, 10000000B
C816 1B AD 80 DB T_W12, 10101101B, 10000000B
C819 1B 85 80 DB T_W12, 10000101B, 10000000B
C81C 1B 8A 80 DB T_W12, 10001010B, 10000000B
C81F 1B 95 80 DB T_W12, 10010101B, 10000000B
C822 1B 9A 80 DB T_W12, 10011010B, 10000000B
C825 1B B2 80 DB T_W12, 10110010B, 10000000B
C828 1B BD 80 DB T_W12, 10111101B, 10000000B
C82B FE DB T_KONEC
;8x invert. budic sbernice
; 2121212 12121212 1
;74240 YAYAYAY YAYAYAYA 2A1
C82C I74240T: ; Z1423324 14233241 XXNG1GXX
C82C 10 2A 55 1C DB T_VV3, 00101010B, 01010101B, 00011100B
C830 24 46 DB T_NAP, DIL20
C832 1F FF FF FF DB T_W123, 11111111B, 11111111B, 11111111B
C836 1F FF 55 FB DB T_W123, 11111111B, 01010101B, 11111011B
C83A 1F AA FF EF DB T_W123, 10101010B, 11111111B, 11101111B
C83E 1F D5 AA E3 DB T_W123, 11010101B, 10101010B, 11100011B
C842 1F 95 2B EB DB T_W123, 10010101B, 00101011B, 11101011B
C846 1F C7 8E E3 DB T_W123, 11000111B, 10001110B, 11100011B
C84A 1F D9 B2 E3 DB T_W123, 11011001B, 10110010B, 11100011B
C84E 1F F4 E8 E3 DB T_W123, 11110100B, 11101000B, 11100011B
C852 FE DB T_KONEC
;8x budic sbernice
; 2121212 12121212 1
;74241 YAYAYAY YAYAYAYA 2A1
C853 I74241T: ; Z1423324 14233241 XXNG1GXX
C853 10 2A 55 1C DB T_VV3, 00101010B, 01010101B, 00011100B
C857 24 46 DB T_NAP, DIL20
C859 1F D5 AA E7 DB T_W123, 11010101B, 10101010B, 11100111B
C85D 1F D5 55 E3 DB T_W123, 11010101B, 01010101B, 11100011B
C861 1F AA AA F7 DB T_W123, 10101010B, 10101010B, 11110111B
C865 1F 80 00 F3 DB T_W123, 10000000B, 00000000B, 11110011B
C869 1F C0 81 FB DB T_W123, 11000000B, 10000001B, 11111011B
C86D 1F 92 24 F3 DB T_W123, 10010010B, 00100100B, 11110011B
C871 1F 8C 18 F3 DB T_W123, 10001100B, 00011000B, 11110011B
C875 1F A1 42 F3 DB T_W123, 10100001B, 01000010B, 11110011B
C879 FE DB T_KONEC
;4bit. prijimac/vysilac sbernice invert.
; _
;74242 4321 A B 1234
PROGRAM IOT MACRO-80 3.44 09-Dec-81 PAGE 1-244
C87A I74242T: ; ZAAAAXBX XNAXBBBB
C87A 08 7A 20 DB T_VV2, 01111010B, 00100000B ;A->B
C87D 24 44 DB T_NAP, DIL14
C87F 1B 85 DF DB T_W12, 10000101B, 11011111B
C882 1B FD D0 DB T_W12, 11111101B, 11010000B
C885 1B C5 DE DB T_W12, 11000101B, 11011110B
C888 1B A5 DD DB T_W12, 10100101B, 11011101B
C88B 1B 95 DB DB T_W12, 10010101B, 11011011B
C88E 1B 8D D7 DB T_W12, 10001101B, 11010111B
C891 1B D7 DF DB T_W12, 11010111B, 11011111B
C894 08 02 2F DB T_VV2, 00000010B, 00101111B ;B->A
C897 1B FF F0 DB T_W12, 11111111B, 11110000B
C89A 1B 87 FF DB T_W12, 10000111B, 11111111B
C89D 1B BF F1 DB T_W12, 10111111B, 11110001B
C8A0 1B DF F2 DB T_W12, 11011111B, 11110010B
C8A3 1B EF F4 DB T_W12, 11101111B, 11110100B
C8A6 1B F7 F8 DB T_W12, 11110111B, 11111000B
C8A9 1B FF D5 DB T_W12, 11111111B, 11010101B
C8AC FE DB T_KONEC
;4bit. prijimac/vysilac sbernice
; _
;74243 4321 A B 1234
C8AD I74243T: ; ZAAAAXBX XNAXBBBB
C8AD 08 7A 20 DB T_VV2, 01111010B, 00100000B ;A->B
C8B0 24 44 DB T_NAP, DIL14
C8B2 1B 85 D0 DB T_W12, 10000101B, 11010000B
C8B5 1B FD DF DB T_W12, 11111101B, 11011111B
C8B8 1B C5 D1 DB T_W12, 11000101B, 11010001B
C8BB 1B A5 D2 DB T_W12, 10100101B, 11010010B
C8BE 1B 95 D4 DB T_W12, 10010101B, 11010100B
C8C1 1B 8D D8 DB T_W12, 10001101B, 11011000B
C8C4 1B 87 DF DB T_W12, 10000111B, 11011111B
C8C7 08 02 2F DB T_VV2, 00000010B, 00101111B ;B->A
C8CA 1B 87 F0 DB T_W12, 10000111B, 11110000B
C8CD 1B FF FF DB T_W12, 11111111B, 11111111B
C8D0 1B C7 F1 DB T_W12, 11000111B, 11110001B
C8D3 1B A7 F2 DB T_W12, 10100111B, 11110010B
C8D6 1B 97 F4 DB T_W12, 10010111B, 11110100B
C8D9 1B 8F F8 DB T_W12, 10001111B, 11111000B
C8DC 1B FF D0 DB T_W12, 11111111B, 11010000B
C8DF FE DB T_KONEC
;8x budic sbernice
; 2121212 12121212 1
;74244 YAYAYAY YAYAYAYA 2A1
C8E0 I74244T: ; Z1423324 14233241 XXNG1GXX
C8E0 10 2A 55 1C DB T_VV3, 00101010B, 01010101B, 00011100B
C8E4 24 46 DB T_NAP, DIL20
C8E6 1F D5 AA F7 DB T_W123, 11010101B, 10101010B, 11110111B
C8EA 1F D5 55 F3 DB T_W123, 11010101B, 01010101B, 11110011B
C8EE 1F AA AA E7 DB T_W123, 10101010B, 10101010B, 11100111B
C8F2 1F 80 00 E3 DB T_W123, 10000000B, 00000000B, 11100011B
C8F6 1F C0 81 EB DB T_W123, 11000000B, 10000001B, 11101011B
C8FA 1F 92 24 E3 DB T_W123, 10010010B, 00100100B, 11100011B
C8FE 1F 8C 18 E3 DB T_W123, 10001100B, 00011000B, 11100011B
PROGRAM IOT MACRO-80 3.44 09-Dec-81 PAGE 1-245
C902 1F A1 42 E3 DB T_W123, 10100001B, 01000010B, 11100011B
C906 FE DB T_KONEC
;8x vysilac/prijimac sbernice
;74245, 74639, 74641, 74645
; 8765432 12345678 _1
C907 I74245T: ; ZAAAAAAA BBBBBBBB XXNGADXX
C907 21 DB T_GOSUB
C908 C947 DW S74245T
C90A 10 7F 00 1C DB T_VV3, 01111111B, 00000000B, 00011100B ;A->B
C90E 1F 80 00 E7 DB T_W123, 10000000B, 00000000B, 11100111B
C912 1F FF FF EF DB T_W123, 11111111B, 11111111B, 11101111B
C916 1F AA AA EF DB T_W123, 10101010B, 10101010B, 11101111B
C91A 1F D5 55 E7 DB T_W123, 11010101B, 01010101B, 11100111B
C91E 1F AA FF FF DB T_W123, 10101010B, 11111111B, 11111111B
C922 1F D5 FF F7 DB T_W123, 11010101B, 11111111B, 11110111B
C926 1F FF 7F E7 DB T_W123, 11111111B, 01111111B, 11100111B
C92A 1F FE BF EF DB T_W123, 11111110B, 10111111B, 11101111B
C92E 1F FD DF EF DB T_W123, 11111101B, 11011111B, 11101111B
C932 1F FB EF EF DB T_W123, 11111011B, 11101111B, 11101111B
C936 1F F7 F7 EF DB T_W123, 11110111B, 11110111B, 11101111B
C93A 1F EF FB EF DB T_W123, 11101111B, 11111011B, 11101111B
C93E 1F DF FD EF DB T_W123, 11011111B, 11111101B, 11101111B
C942 1F BF FE EF DB T_W123, 10111111B, 11111110B, 11101111B
C946 FE DB T_KONEC
;------------------------------------------------------
;spolecna cast pro:74245, 74639, 74641, 74645, 74643, 74644
C947 10 00 FF 14 S74245T:DB T_VV3, 00000000B, 11111111B, 00010100B ;B->A
C94B 24 46 DB T_NAP, DIL20
C94D 1F 80 00 E3 DB T_W123, 10000000B, 00000000B, 11100011B
C951 1F FF FF EB DB T_W123, 11111111B, 11111111B, 11101011B
C955 1F FF AA FB DB T_W123, 11111111B, 10101010B, 11111011B
C959 1F FF 55 FB DB T_W123, 11111111B, 01010101B, 11111011B
C95D 1F AA AA EB DB T_W123, 10101010B, 10101010B, 11101011B
C961 1F D5 55 E3 DB T_W123, 11010101B, 01010101B, 11100011B
C965 1F C0 01 E3 DB T_W123, 11000000B, 00000001B, 11100011B
C969 1F A0 02 E3 DB T_W123, 10100000B, 00000010B, 11100011B
C96D 1F 90 04 E3 DB T_W123, 10010000B, 00000100B, 11100011B
C971 1F 88 08 E3 DB T_W123, 10001000B, 00001000B, 11100011B
C975 1F 84 10 E3 DB T_W123, 10000100B, 00010000B, 11100011B
C979 1F 82 20 E3 DB T_W123, 10000010B, 00100000B, 11100011B
C97D 1F 81 40 E3 DB T_W123, 10000001B, 01000000B, 11100011B
C981 1F 80 80 EB DB T_W123, 10000000B, 10000000B, 11101011B
C985 22 DB T_RET
;8kanal. multiplexer
;74251 __ 0123 4567012
C986 I74251T: ; ZEYYDDDD NDDDDSSS
C986 08 4F 7F DB T_VV2, 01001111B, 01111111B
C989 24 45 DB T_NAP, DIL16
C98B 1B F5 AD DB T_W12, 11110101B, 10101101B
C98E 1B FA D5 DB T_W12, 11111010B, 11010101B
C991 20 DB T_GOTO
C992 BE86 DW G74151T
PROGRAM IOT MACRO-80 3.44 09-Dec-81 PAGE 1-246
;2x 4vstup. multiplexer
;74253 01231_ _03210
C994 I74253T: ; ZYDDDDSE NESDDDDY
C994 08 3F 7E DB T_VV2, 00111111B, 01111110B
C997 24 45 DB T_NAP, DIL16
C999 1B D5 D5 DB T_W12, 11010101B, 11010101B
C99C 1B EB EB DB T_W12, 11101011B, 11101011B
C99F 20 DB T_GOTO
C9A0 BEF8 DW G74153T
;2x 4bit adresovatelny stradac _
;74256 3210A10 C_B3210
C9A2 I74256T: ; ZQQQQDAA NLEDQQQQ
C9A2 08 07 70 DB T_VV2, 00000111B, 01110000B
C9A5 24 45 DB T_NAP, DIL16
C9A7 1B 85 A0 DB T_W12, 10000101B, 10100000B ;RESET
C9AA 1B 8C 91 DB T_W12, 10001100B, 10010001B ;DEMULTIPLEXR
C9AD 1B 95 92 DB T_W12, 10010101B, 10010010B
C9B0 1B A6 94 DB T_W12, 10100110B, 10010100B
C9B3 1B C7 98 DB T_W12, 11000111B, 10011000B
C9B6 1B 85 A0 DB T_W12, 10000101B, 10100000B ;RESET
C9B9 1B C7 D8 DB T_W12, 11000111B, 11011000B ;ADRESNY ZACHYT
C9BC 1B CC D9 DB T_W12, 11001100B, 11011001B
C9BF 1B EE DD DB T_W12, 11101110B, 11011101B
C9C2 1B FD DF DB T_W12, 11111101B, 11011111B
C9C5 0A FF DB T_O2, 11111111B ;PAMNET
C9C7 1B F8 EF DB T_W12, 11111000B, 11101111B
C9CA 1B F0 CE DB T_W12, 11110000B, 11001110B ;ADRESNY ZACHYT
C9CD 1B D2 CA DB T_W12, 11010010B, 11001010B
C9D0 1B DC CA DB T_W12, 11011100B, 11001010B
C9D3 1B 9B C2 DB T_W12, 10011011B, 11000010B
C9D6 1B 9A D6 DB T_W12, 10011010B, 11010110B
C9D9 1B 90 C6 DB T_W12, 10010000B, 11000110B
C9DC 1B 81 C4 DB T_W12, 10000001B, 11000100B
C9DF 1B A6 C0 DB T_W12, 10100110B, 11000000B
C9E2 FE DB T_KONEC
;4x 2vstup. multiplexer
;74257 222111 _444333
C9E3 I74257T: ; ZYBAYBAS NEABYABY
C9E3 08 37 76 DB T_VV2, 00110111B, 01110110B
C9E6 24 45 DB T_NAP, DIL16
C9E8 1B C8 C9 DB T_W12, 11001000B, 11001001B
C9EB 1B C9 C9 DB T_W12, 11001001B, 11001001B
C9EE 20 DB T_GOTO
C9EF BF8A DW G74157T
;8bit. adres. registr typu Latch
;74259 3210210 __ 7654
C9F1 I74259T: ; ZQQQQSSS NRGDQQQQ
C9F1 08 07 70 DB T_VV2, 00000111B, 01110000B
C9F4 24 45 DB T_NAP, DIL16
C9F6 1B 85 B0 DB T_W12, 10000101B, 10110000B ;RESET
C9F9 1B 88 90 DB T_W12, 10001000B, 10010000B ;DEMULTIPLEXR
C9FC 1B 91 90 DB T_W12, 10010001B, 10010000B
PROGRAM IOT MACRO-80 3.44 09-Dec-81 PAGE 1-247
C9FF 1B A2 90 DB T_W12, 10100010B, 10010000B
CA02 1B C3 90 DB T_W12, 11000011B, 10010000B
CA05 1B 84 91 DB T_W12, 10000100B, 10010001B
CA08 1B 85 92 DB T_W12, 10000101B, 10010010B
CA0B 1B 86 94 DB T_W12, 10000110B, 10010100B
CA0E 1B 87 98 DB T_W12, 10000111B, 10011000B
CA11 1B 85 B0 DB T_W12, 10000101B, 10110000B ;RESET
CA14 1B 88 D0 DB T_W12, 10001000B, 11010000B ;ADRESNY ZACHYT
CA17 1B 99 D0 DB T_W12, 10011001B, 11010000B
CA1A 1B BA D0 DB T_W12, 10111010B, 11010000B
CA1D 1B FB D0 DB T_W12, 11111011B, 11010000B
CA20 1B FC D1 DB T_W12, 11111100B, 11010001B
CA23 1B FD D3 DB T_W12, 11111101B, 11010011B
CA26 1B FE D7 DB T_W12, 11111110B, 11010111B
CA29 1B FF DF DB T_W12, 11111111B, 11011111B
CA2C 0A EF DB T_O2, 11101111B ;PAMNET
CA2E 1B FA EF DB T_W12, 11111010B, 11101111B
CA31 1B F0 CF DB T_W12, 11110000B, 11001111B ;ADRESNY ZACHYT
CA34 1B E1 CF DB T_W12, 11100001B, 11001111B
CA37 1B C2 CF DB T_W12, 11000010B, 11001111B
CA3A 1B 83 CF DB T_W12, 10000011B, 11001111B
CA3D 1B 84 CE DB T_W12, 10000100B, 11001110B
CA40 1B 85 CC DB T_W12, 10000101B, 11001100B
CA43 1B 86 C8 DB T_W12, 10000110B, 11001000B
CA46 1B 87 C0 DB T_W12, 10000111B, 11000000B
CA49 FE DB T_KONEC
;2x 5NOR
;74260 212111 112222
CA4A I74260T: ; ZYYACBAX XNEDEDCB
CA4A 08 1E 3F DB T_VV2, 00011110B, 00111111B
CA4D 24 44 DB T_NAP, DIL14
CA4F 1B CF F0 DB T_W12, 11001111B, 11110000B
CA52 1B B1 CF DB T_W12, 10110001B, 11001111B
CA55 1B 93 C0 DB T_W12, 10010011B, 11000000B
CA58 1B 85 C1 DB T_W12, 10000101B, 11000001B
CA5B 1B 89 C2 DB T_W12, 10001001B, 11000010B
CA5E 1B 81 D4 DB T_W12, 10000001B, 11010100B
CA61 1B 81 E8 DB T_W12, 10000001B, 11101000B
CA64 FE DB T_KONEC
;2X 2NAND + 2x invert _ _ _ _
;74265 2222111 4443333
CA65 I74265T: ; ZYWBAYWA NAWYBAWY
CA65 08 19 4C DB T_VV2, 00011001B, 01001100B
CA68 24 45 DB T_NAP, DIL16
CA6A 1B C3 9E DB T_W12, 11000011B, 10011110B
CA6D 1B CC 95 DB T_W12, 11001100B, 10010101B
CA70 1B D4 E9 DB T_W12, 11010100B, 11101001B
CA73 1B BB E1 DB T_W12, 10111011B, 11100001B
CA76 FE DB T_KONEC
;4x 2EX-NOR
;74266 2221111 444333
CA77 I74266T: ; ZBAYYBAX XNBAYYBA
CA77 08 66 33 DB T_VV2, 01100110B, 00110011B
PROGRAM IOT MACRO-80 3.44 09-Dec-81 PAGE 1-248
CA7A 24 44 DB T_NAP, DIL14
CA7C 1B 93 E7 DB T_W12, 10010011B, 11100111B
CA7F 1B A5 FC DB T_W12, 10100101B, 11111100B
CA82 1B CF C9 DB T_W12, 11001111B, 11001001B
CA85 1B F9 D2 DB T_W12, 11111001B, 11010010B
CA88 FE DB T_KONEC
;8bit. registr D s R
;74273 4433221 8776655 81_
CA89 I74273T: ; ZQDDQQDD DDQQDDQC XXNQQRXX
CA89 10 33 CD 04 DB T_VV3, 00110011B, 11001101B, 00000100B
CA8D 24 46 DB T_NAP, DIL20
CA8F 1F B3 CD E3 DB T_W123, 10110011B, 11001101B, 11100011B ;RERSRT
CA93 1F 81 00 E7 DB T_W123, 10000001B, 00000000B, 11100111B
CA97 1F 81 01 EF DB T_W123, 10000001B, 00000001B, 11101111B
CA9B 1A 00 DB T_W2, 00000000B
CA9D 1F 86 01 E7 DB T_W123, 10000110B, 00000001B, 11100111B
CAA1 1A 00 DB T_W2, 00000000B
CAA3 1F 98 01 E7 DB T_W123, 10011000B, 00000001B, 11100111B
CAA7 1A 00 DB T_W2, 00000000B
CAA9 1F E0 01 E7 DB T_W123, 11100000B, 00000001B, 11100111B
CAAD 1A 04 DB T_W2, 00000100B
CAAF 1F 80 07 E7 DB T_W123, 10000000B, 00000111B, 11100111B
CAB3 1A 0A DB T_W2, 00001010B
CAB5 1F 80 19 E7 DB T_W123, 10000000B, 00011001B, 11100111B
CAB9 1A 50 DB T_W2, 01010000B
CABB 1F 80 61 E7 DB T_W123, 10000000B, 01100001B, 11100111B
CABF 1A A0 DB T_W2, 10100000B
CAC1 1F 80 81 F7 DB T_W123, 10000000B, 10000001B, 11110111B
CAC5 FE DB T_KONEC
;4x K.O. J-K se spolecnim SR
; _ _ _ _
;74276 2222111 4443333_ 41_
CAC6 I74276T: ; ZJCKQQKC CKQQKCJS XXNJJRXX
CAC6 10 73 CF 1C DB T_VV3, 01110011B, 11001111B, 00011100B
CACA 24 46 DB T_NAP, DIL20
CACC 1F AD B4 FF DB T_W123, 10101101B, 10110100B, 11111111B ;SET
CAD0 1F D2 4B E3 DB T_W123, 11010010B, 01001011B, 11100011B ;RESET
CAD4 0F B7 97 EF DB T_O123, 10110111B, 10010111B, 11101111B
CAD8 1F 96 13 EF DB T_W123, 10010110B, 00010011B, 11101111B
CADC 0F F9 A7 F7 DB T_O123, 11111001B, 10100111B, 11110111B
CAE0 1F D8 23 F7 DB T_W123, 11011000B, 00100011B, 11110111B
CAE4 0F A5 8D FF DB T_O123, 10100101B, 10001101B, 11111111B
CAE8 1F 84 09 FF DB T_W123, 10000100B, 00001001B, 11111111B
CAEC 0F E9 DF EF DB T_O123, 11101001B, 11011111B, 11101111B
CAF0 1F C8 5B EF DB T_W123, 11001000B, 01011011B, 11101111B
CAF4 0F E3 E5 F7 DB T_O123, 11100011B, 11100101B, 11110111B
CAF8 1F C2 61 F7 DB T_W123, 11000010B, 01100001B, 11110111B
CAFC FE DB T_KONEC
;PROM 256x4bity __
;74287 3214567 8211234
CAFD I74287T: ; ZAAAAAAA NASSQQQQ
CAFD 08 7F 70 DB T_VV2, 01111111B, 01110000B
PROGRAM IOT MACRO-80 3.44 09-Dec-81 PAGE 1-249
CB00 24 45 DB T_NAP, DIL16
CB02 1B AA BF DB T_W12, 10101010B, 10111111B
CB05 1B D5 EF DB T_W12, 11010101B, 11101111B
CB08 1B AA 9F DB T_W12, 10101010B, 10011111B
CB0B 23 DB T_PROG
CB0C CB0F DW P74287
CB0E FE DB T_KONEC
;POKRACUJE TEST PONOCI PROGAMU VE TROJOVEM KODU
CB0F 0E 80 P74287: MVI C,10000000B ;STAV NA PORTU2
CB11 41 MOV B,C ;POCITALO ADRES NA PORTU1
CB12 CD CB1D CALL P74287A
CB15 0E C0 MVI C,11000000B ;STAV NA PORTU2
CB17 06 80 MVI B,10000000B ;POCITALO ADRES NA PORTU1
CB19 CD CB1D CALL P74287A ;NUTNO KVULI ROVNANI ZASOBNIKU PRI CHYBE
CB1C C9 RET
CB1D 21 CB67 P74287A:LXI H,P287DAT ;NASTAV JAKO POMOCNE UKAZOVATKO
CB20 79 MOV A,C
CB21 D3 39 OUT PORT2 ;VYSTAV ADRESU A8 A POVOL DATA
CB23 32 5986 STA VDAT+1 ;ULOZ PRO ZOBRAZENI DIL Z PORTU 2
CB26 78 P74287B:MOV A,B
CB27 D3 38 OUT PORT1 ;VYSTAV ADRESY
CB29 32 5985 STA VDAT ;ULOZ PRO ZOBRAZENI DIL Z PORTU 1
CB2C DB 38 IN PORT1 ;CTI ADRESY
CB2E 32 5988 STA CDAT ;ULOZ CTENA DATA Z PORTU 1 PRO ZOBRAZENI DIL
CB31 57 MOV D,A ;SCHOV
CB32 DB 39 IN PORT2 ;CTI DATA
CB34 32 5989 STA CDAT+1 ;ULOZ CTENA DATA Z PORTU 2 PRO ZOBRAZENI DIL
CB37 B9 CMP C
CB38 C2 CB45 JNZ P74287C ;CHYBA DAT - PORT2
CB3B 7A MOV A,D ;OBNOV CTENA DATA Z PORTU 1
CB3C B8 CMP B
CB3D C2 CB4C JNZ P74287D ;CHYBA ADRES - PORT1
CB40 04 INR B ;POCITALO ADRES +1
CB41 C8 RZ ;NAVRAT JE-LI NULA
CB42 C3 CB26 JMP P74287B
;-------------------------------
;CHYBA PORT2
CB45 11 55F4 P74287C:LXI D,ERR2T
CB48 71 MOV M,C ;ULOZ PRO POTREBY ZOBRAZENI CHYBY
CB49 C3 CB50 JMP P74287E
;-------------------------------
;CHYBA PORT1
CB4C 11 55F1 P74287D:LXI D,ERR1T
CB4F 70 MOV M,B ;ULOZ PRO POTREBY ZOBRAZENI CHYBY
CB50 22 598B P74287E:SHLD HLERR ;ULOZ A PRO ZOBRAZENI CHYBY
CB53 EB XCHG
CB54 22 598D SHLD DEERR
CB57 EB XCHG ;VRAT DO PUVODNIHO STAVU
CB58 32 5971 STA PP ;ULOZ DATA Z PORTU
CB5B 3E 01 MVI A,1
CB5D 32 5993 STA ERR ;ULOZ PRIZNAK CHIBY
CB60 33 INX SP ;SROVNEJ ZASOBNIK
PROGRAM IOT MACRO-80 3.44 09-Dec-81 PAGE 1-250
CB61 33 INX SP ;VLASTNI KONTROLNI SMYCKA
CB62 33 INX SP
CB63 33 INX SP ;NAVRATOVA ADRESA Z T_PROG
CB64 C3 4D05 JMP ZDIL ;ZOBRAZ DIL ... PRI CHYBE SE VYSKAKUJE VEN A ROVNA SE ZASOBNIK
;ANEB SE SROVNA I SCHOVANE UKOZOVATKO V TEST TABULCE
CB67 P287DAT:DS 1 ;DATA CO SE BUDOU ZOBRAZOVAT PRI CHYBE
;4x K.O. R-S __ ___ __ ___
;74279 2221111 4443333
CB68 I74279T: ; ZQSRQSSR NSRQSSRQ
CB68 08 37 6E DB T_VV2, 00110111B, 01101110B
CB6B 24 45 DB T_NAP, DIL16
CB6D 1B D6 BC DB T_W12, 11010110B, 10111100B
CB70 1B AB C7 DB T_W12, 10101011B, 11000111B
CB73 1B B6 EC DB T_W12, 10110110B, 11101100B
CB76 1B DD BE DB T_W12, 11011101B, 10111110B
CB79 1B AF CB DB T_W12, 10101111B, 11001011B
CB7C FE DB T_KONEC
;9bit. renerator parity/paritni skousec
;74280 QQ
CB7D I74280T: ; ZOEIXHGX XNFEDCBA
CB7D 08 16 3F DB T_VV2, 00010110B, 00111111B
CB80 24 44 DB T_NAP, DIL14
CB82 1B DB D5 DB T_W12, 11011011B, 11010101B
CB85 1B AB EA DB T_W12, 10101011B, 11101010B
CB88 1B A9 F6 DB T_W12, 10101001B, 11110110B
CB8B 1B DF C9 DB T_W12, 11011111B, 11001001B
CB8E 1B DD DC DB T_W12, 11011101B, 11011100B
CB91 1B AD CB DB T_W12, 10101101B, 11001011B
CB94 FE DB T_KONEC
;4bit. uplna scitacka
;74283 I111222 333444O
CB95 I74283T: ; ZCBASABS NBASABSC
CB95 08 76 6C DB T_VV2, 01110110B, 01101100B
CB98 24 45 DB T_NAP, DIL16
CB9A 1B 80 80 DB T_W12, 10000000B, 10000000B ;0000+0000+0=0 0000
CB9D 1B FF FF DB T_W12, 11111111B, 11111111B ;1111+1111+1=1 1111
CBA0 1B C8 80 DB T_W12, 11001000B, 10000000B ;0000+0000+1=0 0001
CBA3 1B B7 FF DB T_W12, 10110111B, 11111111B ;1111+1111+0=1 1110
CBA6 1B B1 E2 DB T_W12, 10110001B, 11100010B ;0101+0101+0=0 1010
CBA9 1B 86 9D DB T_W12, 10000110B, 10011101B ;1010+1010+0=1 0100
CBAC 1B F9 E2 DB T_W12, 11111001B, 11100010B ;0101+0101+1=0 1011
CBAF 1B CE 9D DB T_W12, 11001110B, 10011101B ;1010+1010+1=1 0101
CBB2 1B 9B B6 DB T_W12, 10011011B, 10110110B ;0101+1010+0=0 1111
CBB5 1B D2 A5 DB T_W12, 11010010B, 10100101B ;0101+1010+1=1 0000
CBB8 FE DB T_KONEC
;async. BCD citac 2 1 2121
;74290 12M M MMCC03
CBB9 I74290T: ; ZXQQSXSX XNRRPPQQ
CBB9 25 45 80 DB T_NZ2, 01000101B, 10000000B
PROGRAM IOT MACRO-80 3.44 09-Dec-81 PAGE 1-251
CBBC 08 0A 3C DB T_VV2, 00001010B, 00111100B
CBBF 24 44 DB T_NAP, DIL14
CBC1 1B CF CF DB T_W12, 11001111B, 11001111B ;RESET 9
CBC4 1B C5 FC DB T_W12, 11000101B, 11111100B ;RESET 0
CBC7 1A DC DB T_W2, 11011100B
CBC9 1B E5 D2 DB T_W12, 11100101B, 11010010B ;1,1
CBCC 1A EE DB T_W2, 11101110B
CBCE 1B D5 E0 DB T_W12, 11010101B, 11100000B ;0,2
CBD1 1A CC DB T_W2, 11001100B
CBD3 1B FD C2 DB T_W12, 11111101B, 11000010B ;1,3
CBD6 1A CE DB T_W2, 11001110B
CBD8 1B C7 C1 DB T_W12, 11000111B, 11000001B ;0,4
CBDB 1A CD DB T_W2, 11001101B
CBDD 1B C5 C2 DB T_W12, 11000101B, 11000010B ;1,0
CBE0 FE DB T_KONEC
;prog. 32bit. BIN citac/delic
;74292
;I74292T:
; DB T_NIC
;4bit. async. BIN citac 2121
;74293 12 MMCC03
CBE1 I74293T: ; ZXQQXXXX XXRRPPQQ
CBE1 25 4F C0 DB T_NZ2, 01001111B, 11000000B
CBE4 08 00 3C DB T_VV2, 00000000B, 00111100B
CBE7 24 44 DB T_NAP, DIL14
CBE9 1B CF FC DB T_W12, 11001111B, 11111100B ;RESET
CBEC 1A DC DB T_W2, 11011100B
CBEE 1B EF D2 DB T_W12, 11101111B, 11010010B ;1,1
CBF1 1A CE DB T_W2, 11001110B
CBF3 1B DF C0 DB T_W12, 11011111B, 11000000B ;0,2
CBF6 1A EC DB T_W2, 11101100B
CBF8 1B FF E2 DB T_W12, 11111111B, 11100010B ;1,3
CBFB 1A CE DB T_W2, 11001110B
CBFD 1B CF C1 DB T_W12, 11001111B, 11000001B ;0,4
CC00 1A CD DB T_W2, 11001101B
CC02 1B EF C3 DB T_W12, 11101111B, 11000011B ;1,5
CC05 1A CF DB T_W2, 11001111B
CC07 1B DF C1 DB T_W12, 11011111B, 11000001B ;0,6
CC0A 1A CD DB T_W2, 11001101B
CC0C 1B FF C3 DB T_W12, 11111111B, 11000011B ;1,7
CC0F 1A CF DB T_W2, 11001111B
CC11 1B CF C0 DB T_W12, 11001111B, 11000000B ;0,0
CC14 1A CC DB T_W2, 11001100B
CC16 1B EF C2 DB T_W12, 11101111B, 11000010B ;1,1
CC19 FE DB T_KONEC
;4bit. posuvny registr s par. vstup a vystup
;74295 L4321D 1234 O
CC1A I74295T: ; ZSDDDDSX XNQQQQCC
CC1A 08 7E 03 DB T_VV2, 01111110B, 00000011B
CC1D 24 44 DB T_NAP, DIL14
CC1F 0A C3 DB T_O2, 11000011B
CC21 1B D5 E9 DB T_W12, 11010101B, 11101001B
CC24 1A EB DB T_W2, 11101011B
PROGRAM IOT MACRO-80 3.44 09-Dec-81 PAGE 1-252
CC26 1B EB D5 DB T_W12, 11101011B, 11010101B
CC29 1A D7 DB T_W2, 11010111B
CC2B 1B 83 E9 DB T_W12, 10000011B, 11101001B
CC2E 1A EB DB T_W2, 11101011B
CC30 1B BD D5 DB T_W12, 10111101B, 11010101B
CC33 1A D7 DB T_W2, 11010111B
CC35 1B A5 C9 DB T_W12, 10100101B, 11001001B
CC38 1A CB DB T_W2, 11001011B
CC3A 1B A5 FC DB T_W12, 10100101B, 11111100B
CC3D 1A FE DB T_W2, 11111110B
CC3F 1B 9B FC DB T_W12, 10011011B, 11111100B
CC42 1A E3 DB T_W2, 11100011B
CC44 1B 83 F1 DB T_W12, 10000011B, 11110001B
CC47 FE DB T_KONEC
;4x 2vstup. multiplexer s pameti
;74298 1221122 ABCD 1
CC48 I74298T: ; ZDDCBAAB NQQQQCSC
CC48 08 7F 07 DB T_VV2, 01111111B, 00000111B
CC4B 24 45 DB T_NAP, DIL16
CC4D 0A 05 DB T_O2, 00000101B
CC4F 1B A5 D1 DB T_W12, 10100101B, 11010001B
CC52 1A D7 DB T_W2, 11010111B
CC54 1A AB DB T_W2, 10101011B
CC56 1B C0 AC DB T_W12, 11000000B, 10101100B
CC59 1A 88 DB T_W2, 10001000B
CC5B 1B A0 8E DB T_W12, 10100000B, 10001110B
CC5E 1A 8A DB T_W2, 10001010B
CC60 1B 90 8E DB T_W12, 10010000B, 10001110B
CC63 1A 92 DB T_W2, 10010010B
CC65 1B 88 94 DB T_W12, 10001000B, 10010100B
CC68 1A A0 DB T_W2, 10100000B
CC6A 1B 84 A4 DB T_W12, 10000100B, 10100100B
CC6D 1A C0 DB T_W2, 11000000B
CC6F 1B 82 C6 DB T_W12, 10000010B, 11000110B
CC72 1A C2 DB T_W2, 11000010B
CC74 1B 81 C6 DB T_W12, 10000001B, 11000110B
CC77 1A A2 DB T_W2, 10100010B
CC79 1B 80 A5 DB T_W12, 10000000B, 10100101B
CC7C 1A 91 DB T_W2, 10010001B
CC7E FE DB T_KONEC
;8bit. univers. posuv. registr s R
; , _ , _
;74299 _AACEG2 SHHFDB S 110
CC7F I74299T: ; ZRQQQQQG LQQQQQCR XXNSGSXX
CC7F 10 41 83 1C DB T_VV3, 01000001B, 10000011B, 00011100B ;DATA VEN
CC83 24 46 DB T_NAP, DIL20
CC85 1F 80 00 E7 DB T_W123, 10000000B, 00000000B, 11100111B ;RESET
CC89 08 5F BF DB T_VV2, 01011111B, 10111111B ;DATA DOVNITR
CC8C 1F D4 95 F7 DB T_W123, 11010100B, 10010101B, 11110111B
CC90 1A 97 DB T_W2, 10010111B
CC92 08 41 83 DB T_VV2, 01000001B, 10000011B ;DATA VEN
CC95 1F F4 95 E3 DB T_W123, 11110100B, 10010101B, 11100011B ;SET
CC99 08 5F BF DB T_VV2, 01011111B, 10111111B ;DATA DOVNITR
CC9C 1F CA 69 F7 DB T_W123, 11001010B, 01101001B, 11110111B
PROGRAM IOT MACRO-80 3.44 09-Dec-81 PAGE 1-253
CCA0 1A 6B DB T_W2, 01101011B
CCA2 08 41 83 DB T_VV2, 01000001B, 10000011B ;DATA VEN
CCA5 1F CA 69 E3 DB T_W123, 11001010B, 01101001B, 11100011B ;SET
CCA9 1F DF 7D E3 DB T_W123, 11011111B, 01111101B, 11100011B
CCAD 1F DE 7D EB DB T_W123, 11011110B, 01111101B, 11101011B
CCB1 1C E7 DB T_W3, 11100111B ;VPRAVO
CCB3 1B F4 6B DB T_W12, 11110100B, 01101011B
CCB6 1A 68 DB T_W2, 01101000B
CCB8 1B C4 16 DB T_W12, 11000100B, 00010110B
CCBB 1A 15 DB T_W2, 00010101B
CCBD 1B FA 13 DB T_W12, 11111010B, 00010011B
CCC0 1A 10 DB T_W2, 00010000B
CCC2 1B C2 6E DB T_W12, 11000010B, 01101110B
CCC5 1E 6D F3 DB T_W23, 01101101B, 11110011B ;VLEVO
CCC8 1B FA 13 DB T_W12, 11111010B, 00010011B
CCCB 1A 90 DB T_W2, 10010000B
CCCD 1B C4 F6 DB T_W12, 11000100B, 11110110B
CCD0 1A 75 DB T_W2, 01110101B
CCD2 1B F6 0B DB T_W12, 11110110B, 00001011B
CCD5 1A 88 DB T_W2, 10001000B
CCD7 1B C8 FA DB T_W12, 11001000B, 11111010B
CCDA FE DB T_KONEC
;kaskadovatelny 8bit. uni. posuv. registr se sinc. R a par. vstup. vystup. ser. vystup
; C_ _ C S_
;74322 LOGECA0 S1BDFHHL D/R
CCDB I74322T: ; ZREWWWWD EDWWWWQK XXNSPEXX
CCDB 10 61 C1 1C DB T_VV3, 01100001B, 11000001B, 00011100B ;DATA VEN
CCDF 24 46 DB T_NAP, DIL20
CCE1 1F 81 41 EB DB T_W123, 10000001B, 01000001B, 11101011B ;RESET
CCE5 1B FE BC DB T_W12, 11111110B, 10111100B ;/OE
CCE8 08 7F FD DB T_VV2, 01111111B, 11111101B ;DATA DOVNITR
CCEB 1F EA 54 F3 DB T_W123, 11101010B, 01010100B, 11110011B ;DATA PRO ZAPIS PARALERNI
CCEF 1A 57 DB T_W2, 01010111B
CCF1 08 61 C1 DB T_VV2, 01100001B, 11000001B ;DATA VEN
CCF4 1F CA 56 EB DB T_W123, 11001010B, 01010110B, 11101011B
CCF8 1B FE BE DB T_W12, 11111110B, 10111110B ;/OE
CCFB 08 7F FD DB T_VV2, 01111111B, 11111101B ;DATA DOVNITR
CCFE 1F F4 6A F3 DB T_W123, 11110100B, 01101010B, 11110011B ;DATA PRO ZAPIS PARALERNI
CD02 1A 69 DB T_W2, 01101001B
CD04 08 61 C1 DB T_VV2, 01100001B, 11000001B ;DATA VEN
CD07 1F D4 68 EB DB T_W123, 11010100B, 01101000B, 11101011B
CD0B 1F DE 7C F3 DB T_W123, 11011110B, 01111100B, 11110011B
CD0F 1F FE 7C FB DB T_W123, 11111110B, 01111100B, 11111011B
CD13 1F D4 E8 FB DB T_W123, 11010100B, 11101000B, 11111011B ;SERIOVE
CD17 1A D7 DB T_W2, 11010111B
CD19 1F D6 D6 FB DB T_W123, 11010110B, 11010110B, 11111011B
CD1D 1A F7 DB T_W2, 11110111B
CD1F 1F CA F6 EB DB T_W123, 11001010B, 11110110B, 11101011B
CD23 1A E9 DB T_W2, 11101001B
CD25 1F CD A8 FB DB T_W123, 11001101B, 10101000B, 11111011B
CD29 1A 99 DB T_W2, 10011001B
CD2B 1F D5 98 EB DB T_W123, 11010101B, 10011000B, 11101011B
CD2F 1A 97 DB T_W2, 10010111B
CD31 1F DA D6 FB DB T_W123, 11011010B, 11010110B, 11111011B
CD35 1A EF DB T_W2, 11101111B
PROGRAM IOT MACRO-80 3.44 09-Dec-81 PAGE 1-254
CD37 1F CA EE EF DB T_W123, 11001010B, 11101110B, 11101111B
CD3B 1A EF DB T_W2, 11101111B
CD3D 1F CA EE FF DB T_W123, 11001010B, 11101110B, 11111111B
CD41 FE DB T_KONEC
;3bit prioritni BIN koder kaskadovatelny
;74348 12E7654 EG32100
CD42 I74348T: ; ZAAIQQQQ NOSQQQQA
CD42 08 1F 1E DB T_VV2, 00011111B, 00011110B
CD45 24 45 DB T_NAP, DIL16
CD47 1B F5 EB DB T_W12, 11110101B, 11101011B
CD4A 1B EF BF DB T_W12, 11101111B, 10111111B
CD4D 1B 85 D4 DB T_W12, 10000101B, 11010100B ;0
CD50 1B 8A D5 DB T_W12, 10001010B, 11010101B ;1
CD53 1B CD CA DB T_W12, 11001101B, 11001010B ;2
CD56 1B CE D5 DB T_W12, 11001110B, 11010101B ;3
CD59 1B AF CA DB T_W12, 10101111B, 11001010B ;4
CD5C 1B AF D5 DB T_W12, 10101111B, 11010101B ;5
CD5F 1B EF DA DB T_W12, 11101111B, 11011010B ;6
CD62 1B EF DD DB T_W12, 11101111B, 11011101B ;7
CD65 FE DB T_KONEC
;2x 8vstup. multiplex invert.
; 1111 2222
;74351 DDDD DDDDDDDD 2_1
CD66 I74351T: ; Z3210CBA 01234567 XXNYGYXX
CD66 10 7F FF 08 DB T_VV3, 01111111B, 11111111B, 00001000B
CD6A 24 46 DB T_NAP, DIL20
CD6C 1F AA 55 FF DB T_W123, 10101010B, 01010101B, 11111111B
CD70 1F D5 AA FF DB T_W123, 11010101B, 10101010B, 11111111B
CD74 1D D0 E7 DB T_W13, 11010000B, 11100111B
CD77 1D D1 F3 DB T_W13, 11010001B, 11110011B
CD7A 1D D2 E7 DB T_W13, 11010010B, 11100111B
CD7D 1D D3 F3 DB T_W13, 11010011B, 11110011B
CD80 1D D4 E3 DB T_W13, 11010100B, 11100011B
CD83 1D D5 F7 DB T_W13, 11010101B, 11110111B
CD86 1D D6 E3 DB T_W13, 11010110B, 11100011B
CD89 1D D7 F7 DB T_W13, 11010111B, 11110111B
CD8C 1F A8 55 F3 DB T_W123, 10101000B, 01010101B, 11110011B
CD90 1D A9 E7 DB T_W13, 10101001B, 11100111B
CD93 1D AA F3 DB T_W13, 10101010B, 11110011B
CD96 1D AB E7 DB T_W13, 10101011B, 11100111B
CD99 1D AC F7 DB T_W13, 10101100B, 11110111B
CD9C 1D AD E3 DB T_W13, 10101101B, 11100011B
CD9F 1D AE F7 DB T_W13, 10101110B, 11110111B
CDA2 1D AF E3 DB T_W13, 10101111B, 11100011B
CDA5 FE DB T_KONEC
;2x 4vstup. multiplex invert.
;74352, 74353 _ _
CDA6 I74352T: ; ZYDDDDSE NESDDDDY
CDA6 08 3F 7E DB T_VV2, 00111111B, 01111110B
CDA9 24 45 DB T_NAP, DIL16
CDAB 1B D5 D5 DB T_W12, 11010101B, 11010101B
CDAE 1B EB EB DB T_W12, 11101011B, 11101011B
CDB1 1B D4 95 DB T_W12, 11010100B, 10010101B
PROGRAM IOT MACRO-80 3.44 09-Dec-81 PAGE 1-255
CDB4 1B 94 B4 DB T_W12, 10010100B, 10110100B
CDB7 1B D6 95 DB T_W12, 11010110B, 10010101B
CDBA 1B 96 B4 DB T_W12, 10010110B, 10110100B
CDBD 1B A8 8A DB T_W12, 10101000B, 10001010B
CDC0 1B E8 AB DB T_W12, 11101000B, 10101011B
CDC3 1B AA 8A DB T_W12, 10101010B, 10001010B
CDC6 1B EA AB DB T_W12, 11101010B, 10101011B
CDC9 FE DB T_KONEC
;8bit stradac (MOS uP interface) ;8bit. reg. D s hradlovanim
;74363, 74373 3322110 7665544 70O
CDCA I74363T: ; ZQDDQQDD DDQQDDQE XXNQQEXX
CDCA 10 33 CD 04 DB T_VV3, 00110011B, 11001101B, 00000100B
CDCE 24 46 DB T_NAP, DIL20
CDD0 1F E6 99 F3 DB T_W123, 11100110B, 10011001B, 11110011B ;TRANSPARENTNI
CDD4 1F 99 67 EB DB T_W123, 10011001B, 01100111B, 11101011B
CDD8 1A 66 DB T_W2, 01100110B
CDDA 1F AA AA EB DB T_W123, 10101010B, 10101010B, 11101011B
CDDE 1F E6 99 F3 DB T_W123, 11100110B, 10011001B, 11110011B
CDE2 1A 98 DB T_W2, 10011000B
CDE4 1F D5 54 F3 DB T_W123, 11010101B, 01010100B, 11110011B
CDE8 1F 99 67 EB DB T_W123, 10011001B, 01100111B, 11101011B
CDEC 1F 80 01 E3 DB T_W123, 10000000B, 00000001B, 11100011B
CDF0 1F CC 33 FF DB T_W123, 11001100B, 00110011B, 11111111B
CDF4 FE DB T_KONEC
;6x budici stupen sbernice _ _
;74365 3322111 2665544
CDF5 I74365T: ; ZYAYAYAG NGAYAYAY
CDF5 08 2B 6A DB T_VV2, 00101011B, 01101010B
CDF8 24 45 DB T_NAP, DIL16
CDFA 1B E6 B3 DB T_W12, 11100110B, 10110011B
CDFD 1B 98 8C DB T_W12, 10011000B, 10001100B
CE00 1B D5 95 DB T_W12, 11010101B, 10010101B
CE03 1B FE D5 DB T_W12, 11111110B, 11010101B
CE06 1B D5 FF DB T_W12, 11010101B, 11111111B
CE09 FE DB T_KONEC
;6x invert. budici stupen sbernice
;74366 3322111 2665544
CE0A I74366T: ; ZYAYAYAG NGAYAYAY
CE0A 08 2B 6A DB T_VV2, 00101011B, 01101010B
CE0D 24 45 DB T_NAP, DIL16
CE0F 1B AA AA DB T_W12, 10101010B, 10101010B
CE12 1B D4 95 DB T_W12, 11010100B, 10010101B
CE15 1B D5 95 DB T_W12, 11010101B, 10010101B
CE18 1B FE D5 DB T_W12, 11111110B, 11010101B
CE1B 1B D5 FF DB T_W12, 11010101B, 11111111B
CE1E FE DB T_KONEC
;4 + 2bit. budici stupen sbernice
; 111111_ _222211
;74367, 4503 YAYAYA1 2AYAYAY
CE1F I74367T: ; Z332211G NG221144
CE1F 08 2B 6A DB T_VV2, 00101011B, 01101010B
CE22 24 45 DB T_NAP, DIL16
PROGRAM IOT MACRO-80 3.44 09-Dec-81 PAGE 1-256
CE24 1B 98 D7 DB T_W12, 10011000B, 11010111B
CE27 1B E6 8C DB T_W12, 11100110B, 10001100B
CE2A 1B D5 B1 DB T_W12, 11010101B, 10110001B
CE2D 1B FF B3 DB T_W12, 11111111B, 10110011B
CE30 1B D5 F5 DB T_W12, 11010101B, 11110101B
CE33 FE DB T_KONEC
;4 + 2bit. invert. budici stupen sbernice
; 111111_ _222211
;74368 YAYAYA1 2AYAYAY
CE34 I74368T: ; Z332211G NG221144
CE34 08 2B 6A DB T_VV2, 00101011B, 01101010B
CE37 24 45 DB T_NAP, DIL16
CE39 1B CC D6 DB T_W12, 11001100B, 11010110B
CE3C 1B B2 99 DB T_W12, 10110010B, 10011001B
CE3F 1B D5 A9 DB T_W12, 11010101B, 10101001B
CE42 1B FF 97 DB T_W12, 11111111B, 10010111B
CE45 1B D5 F5 DB T_W12, 11010101B, 11110101B
CE48 FE DB T_KONEC
;8bit. reg. D
;74374 3322110 7665544 70O
CE49 I74374T: ; ZQDDQQDD DDQQDDQC XXNQQEXX
CE49 21 DB T_GOSUB
CE4A CE6F DW S7437X
CE4C 1F CC 33 FF DB T_W123, 11001100B, 00110011B, 11111111B
CE50 1F A2 88 E3 G74374: DB T_W123, 10100010B, 10001000B, 11100011B
CE54 1F E6 99 F3 DB T_W123, 11100110B, 10011001B, 11110011B
CE58 1F D5 54 F3 DB T_W123, 11010101B, 01010100B, 11110011B
CE5C 1F 99 67 EB DB T_W123, 10011001B, 01100111B, 11101011B
CE60 FE DB T_KONEC
;8bit. reg. D s hradlovanim
;74377 4433221 8776655 81_
CE61 I74377T: ; ZQDDQQDD DDQQDDQC XXNQQGXX
CE61 21 DB T_GOSUB
CE62 CE6F DW S7437X
CE64 1F B3 CC E7 DB T_W123, 10110011B, 11001100B, 11100111B
CE68 1F B3 CD E7 DB T_W123, 10110011B, 11001101B, 11100111B
CE6C 20 DB T_GOTO
CE6D CE50 DW G74374
;------------------------------------------------------
;SPOLEZNY BLOK PRO 74374 A 74377
CE6F 10 33 CD 04 S7437X: DB T_VV3, 00110011B, 11001101B, 00000100B
CE73 24 46 DB T_NAP, DIL20
CE75 0F 80 00 E3 DB T_O123, 10000000B, 00000000B, 11100011B
CE79 1F 80 01 E3 DB T_W123, 10000000B, 00000001B, 11100011B
CE7D 22 DB T_RET
;6bit. reg. D s hradlovanim
;74378 332211_ 665544
CE7E I74378T: ; ZQDQDDQG NQDDQDQC
CE7E 08 2D 35 DB T_VV2, 00101101B, 00110101B
CE81 24 45 DB T_NAP, DIL16
PROGRAM IOT MACRO-80 3.44 09-Dec-81 PAGE 1-257
CE83 0B 80 80 DB T_O12, 10000000B, 10000000B
CE86 1B 80 81 DB T_W12, 10000000B, 10000001B
CE89 1B AD B4 DB T_W12, 10101101B, 10110100B
CE8C 1B AD B5 DB T_W12, 10101101B, 10110101B
CE8F 1B 88 A4 DB T_W12, 10001000B, 10100100B
CE92 1B 98 E7 DB T_W12, 10011000B, 11100111B
CE95 1B B4 D2 DB T_W12, 10110100B, 11010010B
CE98 1B E6 99 DB T_W12, 11100110B, 10011001B
CE9B 1B EE BC DB T_W12, 11101110B, 10111100B
CE9E 1B FE FF DB T_W12, 11111110B, 11111111B
CEA1 1B D3 CA DB T_W12, 11010011B, 11001010B
CEA4 1B D3 CB DB T_W12, 11010011B, 11001011B
CEA7 FE DB T_KONEC
;4bit. registr D s hradlovanim a komplement. vystupy
; _ _ _ _
;74379 222111_ 444333
CEA8 I74379T: ; ZQQDDQQG NQQDDQQC
CEA8 08 19 19 DB T_VV2, 00011001B, 00011001B
CEAB 24 45 DB T_NAP, DIL16
CEAD 0B A4 A4 DB T_O12, 10100100B, 10100100B
CEB0 1B A4 A5 DB T_W12, 10100100B, 10100101B
CEB3 1B BD BC DB T_W12, 10111101B, 10111100B
CEB6 1B BD BD DB T_W12, 10111101B, 10111101B
CEB9 1B B4 B4 DB T_W12, 10110100B, 10110100B
CEBC 1B D4 D5 DB T_W12, 11010100B, 11010101B
CEBF 1B CC CC DB T_W12, 11001100B, 11001100B
CEC2 1B AA AB DB T_W12, 10101010B, 10101011B
CEC5 1B BA BA DB T_W12, 10111010B, 10111010B
CEC8 1B DA DB DB T_W12, 11011010B, 11011011B
CECB 1B DB DA DB T_W12, 11011011B, 11011010B
CECE 1B DB DB DB T_W12, 11011011B, 11011011B
CED1 FE DB T_KONEC
;4x 2vstup. EX-OR
;74386 74L86 222111 444333
CED2 I74386T: ; ZBAYYBAX XNBAYYBA
CED2 08 66 33 DB T_VV2, 01100110B, 00110011B
CED5 24 44 DB T_NAP, DIL14
CED7 1B 8B EB DB T_W12, 10001011B, 11101011B
CEDA 1B BD F0 DB T_W12, 10111101B, 11110000B
CEDD 1B D7 C5 DB T_W12, 11010111B, 11000101B
CEE0 1B E1 DE DB T_W12, 11100001B, 11011110B
CEE3 FE DB T_KONEC
;2x BCD citac
;74390 QQQCQ C C QCQQQ
CEE4 I74390T: ; ZDCBBARA NARABBCD
CEE4 08 0B 68 DB T_VV2, 00001011B, 01101000B
CEE7 24 45 DB T_NAP, DIL16
CEE9 1B 82 A0 DB T_W12, 10000010B, 10100000B
CEEC 1B 80 80 DB T_W12, 10000000B, 10000000B ; RESET
CEEF 1B 89 C8 DB T_W12, 10001001B, 11001000B
CEF2 1B 94 94 DB T_W12, 10010100B, 10010100B ;1,1
CEF5 1B 9D DC DB T_W12, 10011101B, 11011100B
CEF8 1B A0 82 DB T_W12, 10100000B, 10000010B ;0,2
PROGRAM IOT MACRO-80 3.44 09-Dec-81 PAGE 1-258
CEFB 1B A9 CA DB T_W12, 10101001B, 11001010B
CEFE 1B B4 96 DB T_W12, 10110100B, 10010110B ;1,3
CF01 1B BD DE DB T_W12, 10111101B, 11011110B
CF04 1B C0 81 DB T_W12, 11000000B, 10000001B ;0,4
CF07 1B C9 C9 DB T_W12, 11001001B, 11001001B
CF0A 1B 84 90 DB T_W12, 10000100B, 10010000B ;1,0
CF0D 1B 8D D8 DB T_W12, 10001101B, 11011000B
CF10 1B 90 84 DB T_W12, 10010000B, 10000100B ;0,1
CF13 FE DB T_KONEC
;2x BIN citac
;74393 DDDD DDDD
CF14 I74393T: ; ZDCBARCX XNCRABCD
CF14 08 06 30 DB T_VV2, 00000110B, 00110000B
CF17 24 44 DB T_NAP, DIL14
CF19 1B 85 D0 DB T_W12, 10000101B, 11010000B
CF1C 1B 81 C0 DB T_W12, 10000001B, 11000000B ;RESET
CF1F 1B 83 E0 DB T_W12, 10000011B, 11100000B
CF22 1B 89 C8 DB T_W12, 10001001B, 11001000B ;1
CF25 1B 8B E8 DB T_W12, 10001011B, 11101000B
CF28 1B 91 C4 DB T_W12, 10010001B, 11000100B ;2
CF2B 1B 93 E4 DB T_W12, 10010011B, 11100100B
CF2E 1B 99 CC DB T_W12, 10011001B, 11001100B ;3
CF31 1B 9B EC DB T_W12, 10011011B, 11101100B
CF34 1B A1 C2 DB T_W12, 10100001B, 11000010B ;4
CF37 1B A3 E2 DB T_W12, 10100011B, 11100010B
CF3A 1B A9 CA DB T_W12, 10101001B, 11001010B ;5
CF3D 1B AB EA DB T_W12, 10101011B, 11101010B
CF40 1B B1 C6 DB T_W12, 10110001B, 11000110B ;6
CF43 1B B3 E6 DB T_W12, 10110011B, 11100110B
CF46 1B B9 CE DB T_W12, 10111001B, 11001110B ;7
CF49 1B BB EE DB T_W12, 10111011B, 11101110B
CF4C 1B C1 C1 DB T_W12, 11000001B, 11000001B ;8
CF4F 1B C3 E1 DB T_W12, 11000011B, 11100001B
CF52 1B C9 C9 DB T_W12, 11001001B, 11001001B ;9
CF55 1B CB E9 DB T_W12, 11001011B, 11101001B
CF58 1B D1 C5 DB T_W12, 11010001B, 11000101B ;A
CF5B 1B D3 E5 DB T_W12, 11010011B, 11100101B
CF5E 1B D9 CD DB T_W12, 11011001B, 11001101B ;B
CF61 1B DB ED DB T_W12, 11011011B, 11101101B
CF64 1B E1 C3 DB T_W12, 11100001B, 11000011B ;C
CF67 1B E3 E3 DB T_W12, 11100011B, 11100011B
CF6A 1B E9 CB DB T_W12, 11101001B, 11001011B ;D
CF6D 1B EB EB DB T_W12, 11101011B, 11101011B
CF70 1B F1 C7 DB T_W12, 11110001B, 11000111B ;E
CF73 1B F3 E7 DB T_W12, 11110011B, 11100111B
CF76 1B F9 CF DB T_W12, 11111001B, 11001111B ;F
CF79 1B FB EF DB T_W12, 11111011B, 11101111B
CF7C 1B 81 C0 DB T_W12, 10000001B, 11000000B ;0
CF7F 1B 83 E0 DB T_W12, 10000011B, 11100000B
CF82 1B 89 C8 DB T_W12, 10001001B, 11001000B ;1
CF85 FE DB T_KONEC
;4bit. posuvny reg. s par. a ser. vstup, vystup a R
;74395 _ QQQQ' _
CF86 I74395T: ; ZMDCBASR NABCDDCE
PROGRAM IOT MACRO-80 3.44 09-Dec-81 PAGE 1-259
CF86 08 7F 03 DB T_VV2, 01111111B, 00000011B
CF89 24 45 DB T_NAP, DIL16
CF8B 1B 82 82 DB T_W12, 10000010B, 10000010B ;RESET
CF8E 1B 82 FB DB T_W12, 10000010B, 11111011B ;/OE
CF91 1B D5 82 DB T_W12, 11010101B, 10000010B
CF94 1A D0 DB T_W2, 11010000B ;NASTAV 5
CF96 1B E9 D2 DB T_W12, 11101001B, 11010010B
CF99 1A AC DB T_W2, 10101100B ;NASTAV A
CF9B 1B 95 AE DB T_W12, 10010101B, 10101110B
CF9E 1A 90 DB T_W2, 10010000B ;SERIOVE
CFA0 1B A3 92 DB T_W12, 10100011B, 10010010B
CFA3 1A CC DB T_W2, 11001100B
CFA5 1B 91 CE DB T_W12, 10010001B, 11001110B
CFA8 1A A0 DB T_W2, 10100000B
CFAA 1B 8B A2 DB T_W12, 10001011B, 10100010B
CFAD 1A D0 DB T_W2, 11010000B
CFAF 1B 85 D2 DB T_W12, 10000101B, 11010010B
CFB2 1A AC DB T_W2, 10101100B
CFB4 FE DB T_KONEC
;4x 2vstup. multiplex invert. s reg.
;74399 B1221AW D1221C
CFB5 I74399T: ; ZQBBAAQS NQDDCCQC
CFB5 08 3D 3D DB T_VV2, 00111101B, 00111101B
CFB8 24 45 DB T_NAP, DIL16
CFBA 0B 96 E8 DB T_O12, 10010110B, 11101000B
CFBD 1B 96 E9 DB T_W12, 10010110B, 11101001B
CFC0 1B 97 E8 DB T_W12, 10010111B, 11101000B
CFC3 1B D5 AB DB T_W12, 11010101B, 10101011B
CFC6 1B E9 96 DB T_W12, 11101001B, 10010110B
CFC9 1B AB D5 DB T_W12, 10101011B, 11010101B
CFCC 1B AA D4 DB T_W12, 10101010B, 11010100B
CFCF 1B E8 97 DB T_W12, 11101000B, 10010111B
CFD2 FE DB T_KONEC
;8bit. multyfunkcni stradac _
;74412, 3212, 8212 S443322 776655_ I8811M_
CFD3 I74412T: ; ZBQDQDQD DQDQDQRS NTDQQDDS
CFD3 10 55 AB 27 DB T_VV3, 01010101B, 10101011B, 00100111B
CFD7 24 47 DB T_NAP, DIL24
CFD9 0F D5 A8 E7 DB T_O123, 11010101B, 10101000B, 11100111B
CFDD 1F D5 AA E7 DB T_W123, 11010101B, 10101010B, 11100111B ;RESET
CFE1 1F 95 AA A7 DB T_W123, 10010101B, 10101010B, 10100111B ;STROBE
CFE5 1F B3 33 B2 DB T_W123, 10110011B, 00110011B, 10110010B ;MD = 0, STROBE
CFE9 1F B3 33 F3 DB T_W123, 10110011B, 00110011B, 11110011B
CFED 1F CC CF 8E DB T_W123, 11001100B, 11001111B, 10001110B ;MD = 1
CFF1 1F CC CE CE DB T_W123, 11001100B, 11001110B, 11001110B
CFF5 1F EA 56 F8 DB T_W123, 11101010B, 01010110B, 11111000B ;MD = 0
CFF9 1F BF FF BE DB T_W123, 10111111B, 11111111B, 10111110B
CFFD 1F BF FE FE DB T_W123, 10111111B, 11111110B, 11111110B
D001 1F FF FE FC DB T_W123, 11111111B, 11111110B, 11111100B
D005 1F 80 03 82 DB T_W123, 10000000B, 00000011B, 10000010B
D009 1F 80 03 C3 DB T_W123, 10000000B, 00000011B, 11000011B
D00D 1F EA 57 D9 DB T_W123, 11101010B, 01010111B, 11011001B
D011 FE DB T_KONEC
PROGRAM IOT MACRO-80 3.44 09-Dec-81 PAGE 1-260
;ridici obvod prior. prerus.
; _ I _ EE _
; E___NCI ______NT E__S___
;74414, 3214, 8214 LAAATLN RRRRRRLL CRRGBBB
D012 I74414T: ; ZR210EKT 543210GG NS76S321
D012 10 46 FD 7F DB T_VV3, 01000110B, 11111101B, 01111111B
D016 24 47 DB T_NAP, DIL24
D018 0F FF FF FF DB T_O123, 11111111B, 11111111B, 11111111B
D01C 0C BF DB T_O3, 10111111B
D01E 1F FF FF FF DB T_W123, 11111111B, 11111111B, 11111111B ;VYCHOZI STAV
D022 1B FF FC DB T_W12, 11111111B, 11111100B ;ETLG
D025 1B BF F9 DB T_W12, 10111111B, 11111001B ;/R0
D028 1B B7 F5 DB T_W12, 10110111B, 11110101B ;/R1
D02B 1B AF E9 DB T_W12, 10101111B, 11101001B ;/R2
D02E 1B A7 DD DB T_W12, 10100111B, 11011101B ;/R3
D031 1B 9F BD DB T_W12, 10011111B, 10111101B ;/R4
D034 1B 97 6D DB T_W12, 10010111B, 01101101B ;/R5
D037 1F 8F BD EF DB T_W123, 10001111B, 10111101B, 11101111B ;/R6
D03B 1F 87 B5 DF DB T_W123, 10000111B, 10110101B, 11011111B ;/R7
D03F 1F FF 6D DF DB T_W123, 11111111B, 01101101B, 11011111B ;/ERL
D043 1E F9 FF DB T_W23, 11111001B, 11111111B ;/INT NA /R0
D046 19 BD DB T_W1, 10111101B
D048 19 BE DB T_W1, 10111110B
D04A 19 BC DB T_W1, 10111100B
D04C 1B BF FD DB T_W12, 10111111B, 11111101B
D04F 1E FD F7 DB T_W23, 11111101B, 11110111B ;/SGS
D052 1C B7 DB T_W3, 10110111B
D054 1E FD F7 DB T_W23, 11111101B, 11110111B
D057 1A F9 DB T_W2, 11111001B ;POKUS O /INT NA /R0
D059 19 BD DB T_W1, 10111101B
D05B 19 BF DB T_W1, 10111111B
D05D 1B B7 F5 DB T_W12, 10110111B, 11110101B ;/INT NA /R1
D060 19 B5 DB T_W1, 10110101B
D062 19 B6 DB T_W1, 10110110B
D064 19 B4 DB T_W1, 10110100B
D066 1B B7 FD DB T_W12, 10110111B, 11111101B
D069 1E FD F6 DB T_W23, 11111101B, 11110110B ;/SGS A /B1
D06C 1C B6 DB T_W3, 10110110B
D06E 1F BF FD F6 DB T_W123, 10111111B, 11111101B, 11110110B
D072 1B B7 F5 DB T_W12, 10110111B, 11110101B ;POKUS O /INT NA /R1
D075 19 FD DB T_W1, 11111101B
D077 19 FF DB T_W1, 11111111B
D079 1B AB ED DB T_W12, 10101011B, 11101101B ;/INTE A /R2
D07C 19 A9 DB T_W1, 10101001B
D07E 19 AB DB T_W1, 10101011B
D080 19 AF DB T_W1, 10101111B ;/INT NA /R2
D082 19 AD DB T_W1, 10101101B
D084 19 AE DB T_W1, 10101110B
D086 19 AC DB T_W1, 10101100B
D088 1B AF FD DB T_W12, 10101111B, 11111101B
D08B 1E FD F5 DB T_W23, 11111101B, 11110101B ;/SGS A /B2
D08E 1C B5 DB T_W3, 10110101B
D090 1F BF FD F5 DB T_W123, 10111111B, 11111101B, 11110101B
D094 1B AF ED DB T_W12, 10101111B, 11101101B ;POKUS O /INT NA /R2
D097 19 AD DB T_W1, 10101101B
D099 19 AF DB T_W1, 10101111B
PROGRAM IOT MACRO-80 3.44 09-Dec-81 PAGE 1-261
D09B 1B A7 DD DB T_W12, 10100111B, 11011101B ;/INT NA /R3
D09E 19 A5 DB T_W1, 10100101B
D0A0 19 A6 DB T_W1, 10100110B
D0A2 19 A4 DB T_W1, 10100100B
D0A4 1B A7 FD DB T_W12, 10100111B, 11111101B
D0A7 1E FD F3 DB T_W23, 11111101B, 11110011B ;/SGS A /B3
D0AA 1C B3 DB T_W3, 10110011B
D0AC 1F BF FD F3 DB T_W123, 10111111B, 11111101B, 11110011B
D0B0 1B 9F BD DB T_W12, 10011111B, 10111101B ;POKUS O /INT NA /R4
D0B3 19 9D DB T_W1, 10011101B
D0B5 19 9F DB T_W1, 10011111B
D0B7 1B 97 7D DB T_W12, 10010111B, 01111101B
D0BA 1B BF 7C DB T_W12, 10111111B, 01111100B ;ETLG A /R5
D0BD 19 BD DB T_W1, 10111101B
D0BF 19 BF DB T_W1, 10111111B
D0C1 1B 97 7D DB T_W12, 10010111B, 01111101B ;/INT NA /R5
D0C4 19 95 DB T_W1, 10010101B
D0C6 19 96 DB T_W1, 10010110B
D0C8 19 94 DB T_W1, 10010100B
D0CA 1B 97 FD DB T_W12, 10010111B, 11111101B
D0CD 1E FD F0 DB T_W23, 11111101B, 11110000B ;/SGS A /B3, /B2, /B1
D0D0 1C B0 DB T_W3, 10110000B ;PREUSENI ZAKAZANO
D0D2 1F BF FD F0 DB T_W123, 10111111B, 11111101B, 11110000B
D0D6 1F 87 01 CF DB T_W123, 10000111B, 00000001B, 11001111B ;POKUS O /INT
D0DA 19 85 DB T_W1, 10000101B
D0DC 19 87 DB T_W1, 10000111B
D0DE FE DB T_KONEC
;4bit. vysilac primac sbernice
;74416, 3216, 8216 111000C D333222
D0DF I74416T: ; ZIBOIBOS NCOBIOBI
D0DF 08 49 49 DB T_VV2, 01001001B, 01001001B ;I -> B
D0E2 24 45 DB T_NAP, DIL16
D0E4 1B F2 BC DB T_W12, 11110010B, 10111100B
D0E7 1B 9E A7 DB T_W12, 10011110B, 10100111B
D0EA 08 6D 5B DB T_VV2, 01101101B, 01011011B ;B -> O
D0ED 1B B8 F1 DB T_W12, 10111000B, 11110001B
D0F0 1B C6 CF DB T_W12, 11000110B, 11001111B
D0F3 20 DB T_GOTO
D0F4 D10A DW G74426T
;4bit. invert. vysilac primac sbernice
;74426, 3226, 8226 111000C D333222
D0F6 I74426T: ; ZIBOIBOS NCOBIOBI
D0F6 08 49 49 DB T_VV2, 01001001B, 01001001B ;I -> B
D0F9 24 45 DB T_NAP, DIL16
D0FB 1B D6 AE DB T_W12, 11010110B, 10101110B
D0FE 1B BA B5 DB T_W12, 10111010B, 10110101B
D101 08 6D 5B DB T_VV2, 01101101B, 01011011B ;B -> O
D104 1B AA D5 DB T_W12, 10101010B, 11010101B
D107 1B D4 EB DB T_W12, 11010100B, 11101011B
D10A 08 49 49 G74426T:DB T_VV2, 01001001B, 01001001B ;I -> B
D10D 1B BF B7 DB T_W12, 10111111B, 10110111B
D110 1B F7 BE DB T_W12, 11110111B, 10111110B
D113 08 6D 5B DB T_VV2, 01101101B, 01011011B ;B -> O
D116 1B BF B7 DB T_W12, 10111111B, 10110111B
PROGRAM IOT MACRO-80 3.44 09-Dec-81 PAGE 1-262
D119 1B F7 BE DB T_W12, 11110111B, 10111110B
D11C FE DB T_KONEC
;4x prepinac sbernice __ _ _
;74442, 74440 BCCBBCC GGAAAASS GBC
D11D I74442T: ; Z4433221 BA123410 XXNC1SXX
D11D 10 00 FF 14 DB T_VV3, 00000000B, 11111111B, 00010100B ;A -> B, A -> C
D121 24 46 DB T_NAP, DIL20
D123 1F 99 68 EB DB T_W123, 10011001B, 01101000B, 11101011B
D127 1F E6 14 E3 DB T_W123, 11100110B, 00010100B, 11100011B
D12B 10 4C C3 1C DB T_VV3, 01001100B, 11000011B, 00011100B ;B -> C, B -> A
D12F 1F E6 95 E3 DB T_W123, 11100110B, 10010101B, 11100011B
D133 1F 99 29 EB DB T_W123, 10011001B, 00101001B, 11101011B
D137 10 33 C3 14 DB T_VV3, 00110011B, 11000011B, 00010100B ;C -> A, C -> B
D13B 1F E6 16 E3 DB T_W123, 11100110B, 00010110B, 11100011B
D13F 1F 99 2A EB DB T_W123, 10011001B, 00101010B, 11101011B
D143 10 00 FF 14 DB T_VV3, 00000000B, 11111111B, 00010100B ;A -> B
D147 1F BB 68 FB DB T_W123, 10111011B, 01101000B, 11111011B
D14B 1F F7 14 F3 DB T_W123, 11110111B, 00010100B, 11110011B
D14F 21 DB T_GOSUB ;B -> C
D150 D24E DW S7444X1
D152 10 33 C3 1C DB T_VV3, 00110011B, 11000011B, 00011100B ;C -> A
D156 1F DD AA EB DB T_W123, 11011101B, 10101010B, 11101011B
D15A 1F EE 96 FB DB T_W123, 11101110B, 10010110B, 11111011B
D15E 10 00 FF 14 DB T_VV3, 00000000B, 11111111B, 00010100B ;A -> C
D162 1F DD A8 EB DB T_W123, 11011101B, 10101000B, 11101011B
D166 1F EE D4 EB DB T_W123, 11101110B, 11010100B, 11101011B
D16A 10 4C C3 1C DB T_VV3, 01001100B, 11000011B, 00011100B ;B -> A
D16E 1F BB 29 FB DB T_W123, 10111011B, 00101001B, 11111011B
D172 1F F7 95 F3 DB T_W123, 11110111B, 10010101B, 11110011B
D176 21 DB T_GOSUB ;C -> B
D177 D25B DW S7444X2
D179 10 2A D7 14 G74442T:DB T_VV3, 00101010B, 11010111B, 00010100B
D17D 1F F7 2C EF DB T_W123, 11110111B, 00101100B, 11101111B
D181 1F DD 3B EB DB T_W123, 11011101B, 00111011B, 11101011B
D185 1F F7 EC FB DB T_W123, 11110111B, 11101100B, 11111011B
D189 1F DD B8 FB DB T_W123, 11011101B, 10111000B, 11111011B
D18D 1F F7 6D FB DB T_W123, 11110111B, 01101101B, 11111011B
D191 1F DD FA EB DB T_W123, 11011101B, 11111010B, 11101011B
D195 1F DD 38 EF DB T_W123, 11011101B, 00111000B, 11101111B
D199 1F F7 2F EB DB T_W123, 11110111B, 00101111B, 11101011B
D19D 1F DD F8 FB DB T_W123, 11011101B, 11111000B, 11111011B
D1A1 1F F7 AC FB DB T_W123, 11110111B, 10101100B, 11111011B
D1A5 1F DD 79 FB DB T_W123, 11011101B, 01111001B, 11111011B
D1A9 1F F7 EE EB DB T_W123, 11110111B, 11101110B, 11101011B
D1AD 10 55 EB 1C DB T_VV3, 01010101B, 11101011B, 00011100B
D1B1 1F BB 34 E7 DB T_W123, 10111011B, 00110100B, 11100111B
D1B5 1F EE 1F EB DB T_W123, 11101110B, 00011111B, 11101011B
D1B9 1F BB F4 F3 DB T_W123, 10111011B, 11110100B, 11110011B
D1BD 1F EE 9C FB DB T_W123, 11101110B, 10011100B, 11111011B
D1C1 1F BB 75 F3 DB T_W123, 10111011B, 01110101B, 11110011B
D1C5 1F EE DE EB DB T_W123, 11101110B, 11011110B, 11101011B
D1C9 1F EE 3C EF DB T_W123, 11101110B, 00111100B, 11101111B
D1CD 1F BB 37 E3 DB T_W123, 10111011B, 00110111B, 11100011B
D1D1 1F EE DC FB DB T_W123, 11101110B, 11011100B, 11111011B
D1D5 1F BB B4 F3 DB T_W123, 10111011B, 10110100B, 11110011B
PROGRAM IOT MACRO-80 3.44 09-Dec-81 PAGE 1-263
D1D9 1F EE 5D FB DB T_W123, 11101110B, 01011101B, 11111011B
D1DD 1F BB F6 E3 DB T_W123, 10111011B, 11110110B, 11100011B
D1E1 FE DB T_KONEC
;4x invert. prepinac sbernice __ _ _
;74443, 74441 BCCBBCC GGAAAASS GBC
D1E2 I74443T: ; Z4433221 BA123410 XXNC1SXX
D1E2 21 DB T_GOSUB ;/A -> B, /A -> C
D1E3 D268 DW S7444X3
D1E5 10 4C C3 1C DB T_VV3, 01001100B, 11000011B, 00011100B ;/B -> C, /B -> A
D1E9 1F AA 95 EB DB T_W123, 10101010B, 10010101B, 11101011B
D1ED 1F D5 29 E3 DB T_W123, 11010101B, 00101001B, 11100011B
D1F1 10 33 C3 14 DB T_VV3, 00110011B, 11000011B, 00010100B ;/C -> A, /C -> B
D1F5 1F D5 16 E3 DB T_W123, 11010101B, 00010110B, 11100011B
D1F9 1F AA 2A EB DB T_W123, 10101010B, 00101010B, 11101011B
D1FD 21 DB T_GOSUB ;/A -> B
D1FE D277 DW S7444X4
D200 10 4C C3 1C DB T_VV3, 01001100B, 11000011B, 00011100B ;/B -> C
D204 1F D5 FD E3 DB T_W123, 11010101B, 11111101B, 11100011B
D208 1F AA 7D EB DB T_W123, 10101010B, 01111101B, 11101011B
D20C 21 DB T_GOSUB ;/C -> A
D20D D284 DW S7444X5
D20F 21 DB T_GOSUB ;/A -> C
D210 D291 DW S7444X6 ;/B -> A
D212 10 33 C3 14 DB T_VV3, 00110011B, 11000011B, 00010100B ;/C -> B
D216 1F AA 7E EB DB T_W123, 10101010B, 01111110B, 11101011B
D21A 1F D5 7E F3 DB T_W123, 11010101B, 01111110B, 11110011B
D21E 20 DB T_GOTO
D21F D179 DW G74442T
;4x invert./neinvert. prepinac sbernice
; __ _ _
;74444, 74448 BCCBBCC GGAAAASS GBC
D221 I74444T: ; Z4433221 BA123410 XXNC1SXX
D221 21 DB T_GOSUB ;/A -> B, /A -> C
D222 D268 DW S7444X3
D224 10 4C C3 1C DB T_VV3, 01001100B, 11000011B, 00011100B ;B -> C, /B -> A
D228 1F E6 A9 E3 DB T_W123, 11100110B, 10101001B, 11100011B
D22C 1F 99 15 EB DB T_W123, 10011001B, 00010101B, 11101011B
D230 10 33 C3 14 DB T_VV3, 00110011B, 11000011B, 00010100B ;/C -> A, C -> B
D234 1F E6 2A E3 DB T_W123, 11100110B, 00101010B, 11100011B
D238 1F 99 16 EB DB T_W123, 10011001B, 00010110B, 11101011B
D23C 21 DB T_GOSUB ;/A -> B
D23D D277 DW S7444X4
D23F 21 DB T_GOSUB ;B -> C
D240 D24E DW S7444X1
D242 21 DB T_GOSUB ;/C -> A
D243 D284 DW S7444X5
D245 21 DB T_GOSUB ;/A -> C
D246 D291 DW S7444X6 ;/B -> A
D248 21 DB T_GOSUB ;C -> B
D249 D25B DW S7444X2
D24B 20 DB T_GOTO
D24C D179 DW G74442T
;------------------------------------------------------
PROGRAM IOT MACRO-80 3.44 09-Dec-81 PAGE 1-264
;SPOLECNE BLOKY PRO 74440 AZ 74444 A 74448
D24E 10 4C C3 1C S7444X1:DB T_VV3, 01001100B, 11000011B, 00011100B ;B -> C
D252 1F 99 FD EB DB T_W123, 10011001B, 11111101B, 11101011B
D256 1F E6 7D E3 DB T_W123, 11100110B, 01111101B, 11100011B
D25A 22 DB T_RET
D25B 10 33 C3 14 S7444X2:DB T_VV3, 00110011B, 11000011B, 00010100B ;C -> B
D25F 1F 99 7E EB DB T_W123, 10011001B, 01111110B, 11101011B
D263 1F E6 7E F3 DB T_W123, 11100110B, 01111110B, 11110011B
D267 22 DB T_RET
D268 10 00 FF 14 S7444X3:DB T_VV3, 00000000B, 11111111B, 00010100B ;/A -> B, /A -> C
D26C 24 46 DB T_NAP, DIL20
D26E 1F 99 54 EB DB T_W123, 10011001B, 01010100B, 11101011B
D272 1F E6 28 E3 DB T_W123, 11100110B, 00101000B, 11100011B
D276 22 DB T_RET
D277 10 00 FF 14 S7444X4:DB T_VV3, 00000000B, 11111111B, 00010100B ;/A -> B
D27B 1F BB 54 FB DB T_W123, 10111011B, 01010100B, 11111011B
D27F 1F F7 28 F3 DB T_W123, 11110111B, 00101000B, 11110011B
D283 22 DB T_RET
D284 10 33 C3 1C S7444X5:DB T_VV3, 00110011B, 11000011B, 00011100B ;/C -> A
D288 1F EE AA EB DB T_W123, 11101110B, 10101010B, 11101011B
D28C 1F DD 96 FB DB T_W123, 11011101B, 10010110B, 11111011B
D290 22 DB T_RET
D291 10 00 FF 14 S7444X6:DB T_VV3, 00000000B, 11111111B, 00010100B ;/A -> C
D295 1F DD 94 EB DB T_W123, 11011101B, 10010100B, 11101011B
D299 1F EE E8 EB DB T_W123, 11101110B, 11101000B, 11101011B
D29D 10 4C C3 1C DB T_VV3, 01001100B, 11000011B, 00011100B ;/B -> A
D2A1 1F F7 29 F3 DB T_W123, 11110111B, 00101001B, 11110011B
D2A5 1F BB 95 FB DB T_W123, 10111011B, 10010101B, 11111011B
D2A9 22 DB T_RET
;------------------------------------------------------
;8bit. synchroni BIN citac __ _
;74461 1765432 234567CO C01100C
D2AA I74461T: ; ZIDDDDDD QQQQQQOE NIQQDDIK
D2AA 10 7F 01 4F DB T_VV3, 01111111B, 00000001B, 01001111B
D2AE 24 47 DB T_NAP, DIL24
D2B0 1F AA FF B4 DB T_W123, 10101010B, 11111111B, 10110100B ;OE
D2B4 1F AA 02 85 DB T_W123, 10101010B, 00000010B, 10000101B ;RESET
D2B8 1F EA 02 84 DB T_W123, 11101010B, 00000010B, 10000100B ;
D2BC 1F EA 56 A5 DB T_W123, 11101010B, 01010110B, 10100101B ;NASTAV
D2C0 1F D5 56 A8 DB T_W123, 11010101B, 01010110B, 10101000B ;
D2C4 1F D5 AA 99 DB T_W123, 11010101B, 10101010B, 10011001B ;NASTAV
D2C8 1F 80 AA 92 DB T_W123, 10000000B, 10101010B, 10010010B ;
D2CC 1F 80 AA 93 DB T_W123, 10000000B, 10101010B, 10010011B ;NIC
D2D0 1F C0 AA D2 DB T_W123, 11000000B, 10101010B, 11010010B ;
D2D4 1F C0 AA D3 DB T_W123, 11000000B, 10101010B, 11010011B ;NIC
D2D8 1D 80 90 DB T_W13, 10000000B, 10010000B
D2DB 1E 02 81 DB T_W23, 00000010B, 10000001B ;RESET
D2DE 1D C0 82 DB T_W13, 11000000B, 10000010B
D2E1 1E 02 A3 DB T_W23, 00000010B, 10100011B ;1
PROGRAM IOT MACRO-80 3.44 09-Dec-81 PAGE 1-265
D2E4 1C A2 DB T_W3, 10100010B
D2E6 1E 02 93 DB T_W23, 00000010B, 10010011B ;2
D2E9 1C 92 DB T_W3, 10010010B
D2EB 1E 02 B3 DB T_W23, 00000010B, 10110011B ;3
D2EE 1C B2 DB T_W3, 10110010B
D2F0 1E 82 83 DB T_W23, 10000010B, 10000011B ;4
D2F3 1C 82 DB T_W3, 10000010B
D2F5 1E 82 A3 DB T_W23, 10000010B, 10100011B ;5
D2F8 1C A2 DB T_W3, 10100010B
D2FA 1E 82 93 DB T_W23, 10000010B, 10010011B ;6
D2FD 1C 92 DB T_W3, 10010010B
D2FF 1E 82 B3 DB T_W23, 10000010B, 10110011B ;7
D302 1C B2 DB T_W3, 10110010B
D304 1E 42 83 DB T_W23, 01000010B, 10000011B ;8
D307 1C 82 DB T_W3, 10000010B
D309 1E 42 A3 DB T_W23, 01000010B, 10100011B ;9
D30C 1C A2 DB T_W3, 10100010B
D30E 1E 42 93 DB T_W23, 01000010B, 10010011B ;10
D311 1C 92 DB T_W3, 10010010B
D313 1E 42 B3 DB T_W23, 01000010B, 10110011B ;11
D316 1C B2 DB T_W3, 10110010B
D318 1E C2 83 DB T_W23, 11000010B, 10000011B ;12
D31B 1C 82 DB T_W3, 10000010B
D31D 1E C2 A3 DB T_W23, 11000010B, 10100011B ;13
D320 1C A2 DB T_W3, 10100010B
D322 1E C2 93 DB T_W23, 11000010B, 10010011B ;14
D325 1C 92 DB T_W3, 10010010B
D327 1E C2 B3 DB T_W23, 11000010B, 10110011B ;15
D32A 1C B2 DB T_W3, 10110010B
D32C 1E 22 83 DB T_W23, 00100010B, 10000011B ;16
D32F 21 DB T_GOSUB
D330 D3A7 DW G74461A
D332 1E 12 83 DB T_W23, 00010010B, 10000011B ;32
D335 21 DB T_GOSUB
D336 D3A7 DW G74461A
D338 1E 32 83 DB T_W23, 00110010B, 10000011B ;48
D33B 21 DB T_GOSUB
D33C D3A7 DW G74461A
D33E 1E 0A 83 DB T_W23, 00001010B, 10000011B ;64
D341 21 DB T_GOSUB
D342 D3A7 DW G74461A
D344 1E 2A 83 DB T_W23, 00101010B, 10000011B ;80
D347 21 DB T_GOSUB
D348 D3A7 DW G74461A
D34A 1E 1A 83 DB T_W23, 00011010B, 10000011B ;96
D34D 21 DB T_GOSUB
D34E D3A7 DW G74461A
D350 1E 3A 83 DB T_W23, 00111010B, 10000011B ;112
D353 21 DB T_GOSUB
D354 D3A7 DW G74461A
D356 1E 06 83 DB T_W23, 00000110B, 10000011B ;128
D359 21 DB T_GOSUB
D35A D3A7 DW G74461A
D35C 1E 26 83 DB T_W23, 00100110B, 10000011B ;144
D35F 21 DB T_GOSUB
D360 D3A7 DW G74461A
PROGRAM IOT MACRO-80 3.44 09-Dec-81 PAGE 1-266
D362 1E 16 83 DB T_W23, 00010110B, 10000011B ;160
D365 21 DB T_GOSUB
D366 D3A7 DW G74461A
D368 1E 36 83 DB T_W23, 00110110B, 10000011B ;176
D36B 21 DB T_GOSUB
D36C D3A7 DW G74461A
D36E 1E 0E 83 DB T_W23, 00001110B, 10000011B ;192
D371 21 DB T_GOSUB
D372 D3A7 DW G74461A
D374 1E 2E 83 DB T_W23, 00101110B, 10000011B ;208
D377 21 DB T_GOSUB
D378 D3A7 DW G74461A
D37A 1E 1E 83 DB T_W23, 00011110B, 10000011B ;224
D37D 21 DB T_GOSUB
D37E D3A7 DW G74461A
D380 1E 3E 83 DB T_W23, 00111110B, 10000011B ;240
D383 21 DB T_GOSUB
D384 D3AF DW G74461B
D386 1E FE 93 DB T_W23, 11111110B, 10010011B ;254
D389 1E FE 92 DB T_W23, 11111110B, 10010010B
D38C 1E FC B3 DB T_W23, 11111100B, 10110011B ;255
D38F 1E FC B2 DB T_W23, 11111100B, 10110010B
D392 1E 02 83 DB T_W23, 00000010B, 10000011B ;0
D395 1C 82 DB T_W3, 10000010B
D397 1E 02 A3 DB T_W23, 00000010B, 10100011B ;1
D39A 1E FF B2 DB T_W23, 11111111B, 10110010B
D39D 1E FF B3 DB T_W23, 11111111B, 10110011B ;2
D3A0 1E 02 92 DB T_W23, 00000010B, 10010010B
D3A3 1E 02 B3 DB T_W23, 00000010B, 10110011B ;3
D3A6 FE DB T_KONEC
;UDELA 15 PULZU
D3A7 0C 82 G74461A:DB T_O3, 10000010B
D3A9 0C 83 DB T_O3, 10000011B ;1
D3AB 0C 82 DB T_O3, 10000010B
D3AD 0C 83 DB T_O3, 10000011B ;2
D3AF 0C 82 G74461B:DB T_O3, 10000010B
D3B1 0C 83 DB T_O3, 10000011B ;3
D3B3 0C 82 DB T_O3, 10000010B
D3B5 0C 83 DB T_O3, 10000011B ;4
D3B7 0C 82 DB T_O3, 10000010B
D3B9 0C 83 DB T_O3, 10000011B ;5
D3BB 0C 82 DB T_O3, 10000010B
D3BD 0C 83 DB T_O3, 10000011B ;6
D3BF 0C 82 DB T_O3, 10000010B
D3C1 0C 83 DB T_O3, 10000011B ;7
D3C3 0C 82 DB T_O3, 10000010B
D3C5 0C 83 DB T_O3, 10000011B ;8
D3C7 0C 82 DB T_O3, 10000010B
D3C9 0C 83 DB T_O3, 10000011B ;9
D3CB 0C 82 DB T_O3, 10000010B
D3CD 0C 83 DB T_O3, 10000011B ;10
D3CF 0C 82 DB T_O3, 10000010B
D3D1 0C 83 DB T_O3, 10000011B ;11
D3D3 0C 82 DB T_O3, 10000010B
D3D5 0C 83 DB T_O3, 10000011B ;12
PROGRAM IOT MACRO-80 3.44 09-Dec-81 PAGE 1-267
D3D7 0C 82 DB T_O3, 10000010B
D3D9 0C 83 DB T_O3, 10000011B ;13
D3DB 0C 82 DB T_O3, 10000010B
D3DD 0C 83 DB T_O3, 10000011B ;14
D3DF 0C 82 DB T_O3, 10000010B
D3E1 0C 83 DB T_O3, 10000011B ;15
D3E3 0C 82 DB T_O3, 10000010B
D3E5 22 DB T_RET
;8X stradac budic sbernice S
;74482, 8282 OIIIIII OOOOOOOT OII
D3E6 I74482T: ; ZE765432 1234567B XXN010XX
D3E6 10 7F 01 0C DB T_VV3, 01111111B, 00000001B, 00001100B
D3EA 24 46 DB T_NAP, DIL20
D3EC 1F D5 FF F7 DB T_W123, 11010101B, 11111111B, 11110111B
D3F0 1F 95 54 F7 DB T_W123, 10010101B, 01010100B, 11110111B
D3F4 1F AA 54 FB DB T_W123, 10101010B, 01010100B, 11111011B
D3F8 1F EA FF FB DB T_W123, 11101010B, 11111111B, 11111011B
D3FC 1F AA AA EB DB T_W123, 10101010B, 10101010B, 11101011B
D400 1F BF AA EF DB T_W123, 10111111B, 10101010B, 11101111B
D404 FE DB T_KONEC
;8X stradac invert. budic sbernice S
;74483, 8283 OIIIIII OOOOOOOT OII
D405 I74483T: ; ZE765432 1234567B XXN010XX
D405 10 7F 01 0C DB T_VV3, 01111111B, 00000001B, 00001100B
D409 24 46 DB T_NAP, DIL20
D40B 1F D5 FF F7 DB T_W123, 11010101B, 11111111B, 11110111B
D40F 1F 95 AA E7 DB T_W123, 10010101B, 10101010B, 11100111B
D413 1F AA AA EB DB T_W123, 10101010B, 10101010B, 11101011B
D417 1F EA FF FB DB T_W123, 11101010B, 11111111B, 11111011B
D41B 1F AA 54 FB DB T_W123, 10101010B, 01010100B, 11111011B
D41F 1F BF 54 FF DB T_W123, 10111111B, 01010100B, 11111111B
D423 FE DB T_KONEC
;8x vysilac/prijimac sbernice
;74486, 8286 OAAAAAA BBBBBBB BAA
D424 I74486T: ; ZE765432 1234567T XXN010XX
D424 10 7F 01 0C DB T_VV3, 01111111B, 00000001B, 00001100B ;A->B
D428 24 46 DB T_NAP, DIL20
D42A 1F 95 55 F7 DB T_W123, 10010101B, 01010101B, 11110111B
D42E 1F AA AB EB DB T_W123, 10101010B, 10101011B, 11101011B
D432 1F C0 FF F3 DB T_W123, 11000000B, 11111111B, 11110011B
D436 10 40 FF 10 DB T_VV3, 01000000B, 11111111B, 00010000B ;B->A
D43A 1F 95 54 F7 DB T_W123, 10010101B, 01010100B, 11110111B
D43E 1F AA AA EB DB T_W123, 10101010B, 10101010B, 11101011B
D442 1F FF 00 EF DB T_W123, 11111111B, 00000000B, 11101111B
D446 FE DB T_KONEC
;8x invert. vysilac/prijimac sbernice
;74487, 8287 OAAAAAA BBBBBBB BAA
D447 I74487T: ; ZE765432 1234567T XXN010XX
D447 10 7F 01 0C DB T_VV3, 01111111B, 00000001B, 00001100B ;A->B
D44B 24 46 DB T_NAP, DIL20
D44D 1F 95 AB E7 DB T_W123, 10010101B, 10101011B, 11100111B
D451 1F AA 55 FB DB T_W123, 10101010B, 01010101B, 11111011B
PROGRAM IOT MACRO-80 3.44 09-Dec-81 PAGE 1-268
D455 1F FF FF FF DB T_W123, 11111111B, 11111111B, 11111111B
D459 10 40 FF 10 DB T_VV3, 01000000B, 11111111B, 00010000B ;B->A
D45D 1F AA 54 FB DB T_W123, 10101010B, 01010100B, 11111011B
D461 1F 95 AA E7 DB T_W123, 10010101B, 10101010B, 11100111B
D465 1F FF FE FF DB T_W123, 11111111B, 11111110B, 11111111B
D469 FE DB T_KONEC
;8bit. komparator s uvolnenim P
;74518 QPQPQPQ QPQPQPQP =P_
D46A I74518T: ; Z3322110 77665544 XXNQ0GXX
D46A 10 7F FF 0C DB T_VV3, 01111111B, 11111111B, 00001100B
D46E 24 46 DB T_NAP, DIL20
D470 1F AA AA EB DB T_W123, 10101010B, 10101010B, 11101011B
D474 1F D5 55 E3 DB T_W123, 11010101B, 01010101B, 11100011B
D478 1F 99 33 FB DB T_W123, 10011001B, 00110011B, 11111011B
D47C 1F E6 CC F3 DB T_W123, 11100110B, 11001100B, 11110011B
D480 1F 99 33 FF DB T_W123, 10011001B, 00110011B, 11111111B
D484 1F E6 CC F7 DB T_W123, 11100110B, 11001100B, 11110111B
D488 FE DB T_KONEC
;8bit. invert. komparator s uvolnenim _
D489 06 P
;74520, 74521, 74688 QPQPQPQ QPQPQPQP =P_
D48A I74521T: ; Z3322110 77665544 XXNQ0GXX
D48A 10 7F FF 0C DB T_VV3, 01111111B, 11111111B, 00001100B
D48E 24 46 DB T_NAP, DIL20
D490 1F AA AA FB DB T_W123, 10101010B, 10101010B, 11111011B
D494 1F D5 55 F3 DB T_W123, 11010101B, 01010101B, 11110011B
D498 1F 99 33 EB DB T_W123, 10011001B, 00110011B, 11101011B
D49C 1F E6 CC E3 DB T_W123, 11100110B, 11001100B, 11100011B
D4A0 1F 99 33 FF DB T_W123, 10011001B, 00110011B, 11111111B
D4A4 1F E6 CC F7 DB T_W123, 11100110B, 11001100B, 11110111B
D4A8 FE DB T_KONEC
;8bit. invert. transparent. reg. D
; _ __ __ _ __
;74533 3322110 7665544 70O
;I74533T: ; ZQDDQQDD DDQQDDQE XXNQQEXX
; DB T_VV3, 00110011B, 11001101B, 00000100B
; DB T_NAP, DIL20
; DB T_W123, 10101010B, 10101011B, 11101011B ;TRANSPARENTNI
; DB T_W123, 11010101B, 01010101B, 11110011B
; DB T_O2, 01010100B
; DB T_W123, 11101110B, 10111010B, 11101011B
; DB T_W123, 11100110B, 10011001B, 11110011B
; DB T_O2, 10011000B
; DB T_W123, 11010101B, 01010100B, 11110011B
; DB T_W123, 10011001B, 01100111B, 11101011B
; DB T_W123, 10000000B, 00000001B, 11100011B
; DB T_W123, 11001100B, 00110011B, 11111111B
; DB T_KONEC
; DB T_NIC
;8bit. invert. reg. D s hradlovanim
;74534 3322110 7665544 70O
D4A9 I74534T: ; ZQDDQQDD DDQQDDQC XXNQQEXX
PROGRAM IOT MACRO-80 3.44 09-Dec-81 PAGE 1-269
D4A9 10 33 CD 04 DB T_VV3, 00110011B, 11001101B, 00000100B
D4AD 24 46 DB T_NAP, DIL20
D4AF 0F B3 CC E3 DB T_O123, 10110011B, 11001100B, 11100011B
D4B3 1F B3 CD E3 DB T_W123, 10110011B, 11001101B, 11100011B
D4B7 1F FF FF FF DB T_W123, 11111111B, 11111111B, 11111111B
D4BB 1F A2 88 E3 DB T_W123, 10100010B, 10001000B, 11100011B
D4BF 1F AA AB EB DB T_W123, 10101010B, 10101011B, 11101011B
D4C3 1F 99 66 EB DB T_W123, 10011001B, 01100110B, 11101011B
D4C7 1F D5 55 F3 DB T_W123, 11010101B, 01010101B, 11110011B
D4CB FE DB T_KONEC
;8bit. invert. budic sbernice ________ _ _
;74540 AAAAAAA YYYYYYYY GAG
D4CC I74540T: ; Z8765432 12345678 XXN211XX
D4CC 10 7F 00 1C DB T_VV3, 01111111B, 00000000B, 00011100B
D4D0 24 46 DB T_NAP, DIL20
D4D2 1F AA 55 EB DB T_W123, 10101010B, 01010101B, 11101011B
D4D6 1F D5 AA E3 DB T_W123, 11010101B, 10101010B, 11100011B
D4DA 1E FF F7 G74540T:DB T_W23, 11111111B, 11110111B
D4DD 1E FF E7 DB T_W23, 11111111B, 11100111B
D4E0 1E FF F3 DB T_W23, 11111111B, 11110011B
D4E3 1F AA FF FF DB T_W123, 10101010B, 11111111B, 11111111B
D4E7 1E FF EF DB T_W23, 11111111B, 11101111B
D4EA 1E FF FB DB T_W23, 11111111B, 11111011B
D4ED FE DB T_KONEC
;8bit. budic sbernice
;74541
D4EE I74541T: ; Z8765432 12345678 XXN211XX
D4EE 10 7F 00 1C DB T_VV3, 01111111B, 00000000B, 00011100B
D4F2 24 46 DB T_NAP, DIL20
D4F4 1F AA AA EB DB T_W123, 10101010B, 10101010B, 11101011B
D4F8 1F D5 55 E3 DB T_W123, 11010101B, 01010101B, 11100011B
D4FC 20 DB T_GOTO
D4FD D4DA DW G74540T
;8bit. invert. transparent. reg. D _______ _ _
;74563, 74580 AAAAAAA YYYYYYYL YAO
D4FF I74563T: ; Z7654321 1234567E XXN00EXX
D4FF 10 7F 01 0C DB T_VV3, 01111111B, 00000001B, 00001100B
D503 24 46 DB T_NAP, DIL20
D505 1F AA AB EB DB T_W123, 10101010B, 10101011B, 11101011B
D509 1F D5 55 F3 DB T_W123, 11010101B, 01010101B, 11110011B
D50D 1A 54 DB T_W2, 01010100B
D50F 1F AA 54 FB DB T_W123, 10101010B, 01010100B, 11111011B
D513 1E AB EB DB T_W23, 10101011B, 11101011B
D516 1A AA DB T_W2, 10101010B
D518 1F D5 AA E3 DB T_W123, 11010101B, 10101010B, 11100011B
D51C 1E 55 F3 DB T_W23, 01010101B, 11110011B
D51F 1F FF FF FF DB T_W123, 11111111B, 11111111B, 11111111B
D523 1E FE FF DB T_W23, 11111110B, 11111111B
D526 FE DB T_KONEC
;8bit. invert. reg. D s hradlovanim_______ _
;74564, 74576 AAAAAAA YYYYYYYC YAO
D527 I74564T: ; Z7654321 1234567K XXN00EXX
PROGRAM IOT MACRO-80 3.44 09-Dec-81 PAGE 1-270
D527 10 7F 01 0C DB T_VV3, 01111111B, 00000001B, 00001100B
D52B 24 46 DB T_NAP, DIL20
D52D 0F AA AA EB DB T_O123, 10101010B, 10101010B, 11101011B
D531 1E AB EB DB T_W23, 10101011B, 11101011B
D534 1F D5 AA E3 DB T_W123, 11010101B, 10101010B, 11100011B
D538 1E 55 F3 DB T_W23, 01010101B, 11110011B
D53B 1F FF FE F7 DB T_W123, 11111111B, 11111110B, 11110111B
D53F 1E FF F7 DB T_W23, 11111111B, 11110111B
D542 FE DB T_KONEC
;PROM 512x4bity
;74571 2103456 78_1234
D543 I74571T: ; ZAAAAAAA NAASQQQQ
D543 08 7F 70 DB T_VV2, 01111111B, 01110000B
D546 24 45 DB T_NAP, DIL16
D548 1B AA BF DB T_W12, 10101010B, 10111111B
D54B 1B D5 DF DB T_W12, 11010101B, 11011111B
D54E 23 DB T_PROG
D54F D552 DW P74571
D551 FE DB T_KONEC
;POKRACUJE TEST PONOCI PROGAMU VE TROJOVEM KODU
D552 0E 80 P74571: MVI C,10000000B ;STAV NA PORTU2
D554 41 MOV B,C ;POCITALO ADRES NA PORTU1
D555 CD CB1D CALL P74287A
D558 0E C0 MVI C,11000000B ;STAV NA PORTU2
D55A 06 80 MVI B,10000000B ;POCITALO ADRES NA PORTU1
D55C CD CB1D CALL P74287A
D55F 0E A0 MVI C,10100000B ;STAV NA PORTU2
D561 06 80 MVI B,10000000B ;POCITALO ADRES NA PORTU1
D563 CD CB1D CALL P74287A
D566 0E E0 MVI C,11100000B ;STAV NA PORTU2
D568 06 80 MVI B,10000000B ;POCITALO ADRES NA PORTU1
D56A CD CB1D CALL P74287A ;NUTNO KVULI ROVNANI ZASOBNIKU PRI CHYBE
D56D C9 RET
;8bit. transparent. reg. D _
;74573 AAAAAAA YYYYYYYL YAO
D56E I74573T: ; Z7654321 1234567E XXN00EXX
D56E 10 7F 01 0C DB T_VV3, 01111111B, 00000001B, 00001100B
D572 24 46 DB T_NAP, DIL20
D574 1F AA 55 FB DB T_W123, 10101010B, 01010101B, 11111011B
D578 1F D5 AB E3 DB T_W123, 11010101B, 10101011B, 11100011B
D57C 1A AA DB T_W2, 10101010B
D57E 1F AA AA EB DB T_W123, 10101010B, 10101010B, 11101011B
D582 1E 55 FB DB T_W23, 01010101B, 11111011B
D585 1A 54 DB T_W2, 01010100B
D587 1F D5 54 F3 DB T_W123, 11010101B, 01010100B, 11110011B
D58B 1E AB E3 DB T_W23, 10101011B, 11100011B
D58E 1F 80 FF F7 DB T_W123, 10000000B, 11111111B, 11110111B
D592 1E FE F7 DB T_W23, 11111110B, 11110111B
D595 FE DB T_KONEC
;8bit. reg. D s hradlovanim
;74574 AAAAAAA YYYYYYYC YAO
D596 I74574T: ; Z7654321 1234567K XXN00EXX
PROGRAM IOT MACRO-80 3.44 09-Dec-81 PAGE 1-271
D596 10 7F 01 0C DB T_VV3, 01111111B, 00000001B, 00001100B
D59A 24 46 DB T_NAP, DIL20
D59C 0F AA 54 FB DB T_O123, 10101010B, 01010100B, 11111011B
D5A0 1E 55 FB DB T_W23, 01010101B, 11111011B
D5A3 1F D5 54 F3 DB T_W123, 11010101B, 01010100B, 11110011B
D5A7 1E AB E3 DB T_W23, 10101011B, 11100011B
D5AA 1F 80 FE F7 DB T_W123, 10000000B, 11111110B, 11110111B
D5AE 1E FF F7 DB T_W23, 11111111B, 11110111B
D5B1 FE DB T_KONEC
;8bit. posuv. reg. s vystup. stradacem ser. vstup a para. vystup
; _PP_'
;74595, 74596 QQQQQQQ QDOCCRQ
D5B2 I74595T: ; Z7654321 N0SETHM7
D5B2 08 00 3E DB T_VV2, 00000000B, 00111110B
D5B5 24 45 DB T_NAP, DIL16
D5B7 1B FF F4 DB T_W12, 11111111B, 11110100B
D5BA 1A A8 DB T_W2, 10101000B
D5BC 1B 80 A2 DB T_W12, 10000000B, 10100010B
D5BF 1A A6 DB T_W2, 10100110B ;10000000
D5C1 1A 82 DB T_W2, 10000010B
D5C3 1A 86 DB T_W2, 10000110B ;01000000
D5C5 1A A2 DB T_W2, 10100010B
D5C7 1A A6 DB T_W2, 10100110B ;10100000
D5C9 1A 82 DB T_W2, 10000010B
D5CB 1A 86 DB T_W2, 10000110B ;01010000
D5CD 1A A2 DB T_W2, 10100010B
D5CF 1A A6 DB T_W2, 10100110B ;10101000
D5D1 1A 82 DB T_W2, 10000010B
D5D3 1A 86 DB T_W2, 10000110B ;01010100
D5D5 1A A2 DB T_W2, 10100010B
D5D7 1A A6 DB T_W2, 10100110B ;10101010
D5D9 1A 82 DB T_W2, 10000010B
D5DB 1A 87 DB T_W2, 10000111B ;01010101
D5DD 1B 80 A3 DB T_W12, 10000000B, 10100011B
D5E0 1B D5 AB DB T_W12, 11010101B, 10101011B
D5E3 1B FF F6 DB T_W12, 11111111B, 11110110B ;10101010
D5E6 1B AA EA DB T_W12, 10101010B, 11101010B
D5E9 1B AA E7 DB T_W12, 10101010B, 11100111B ;11010101
D5EC 1B D5 CB DB T_W12, 11010101B, 11001011B
D5EF 1B D5 C6 DB T_W12, 11010101B, 11000110B ;01101010
D5F2 1B AB 8A DB T_W12, 10101011B, 10001010B
D5F5 1B FF D7 DB T_W12, 11111111B, 11010111B ;00110101
D5F8 1B D6 AB DB T_W12, 11010110B, 10101011B
D5FB 1B D6 A6 DB T_W12, 11010110B, 10100110B ;10011010
D5FE 1B AC EA DB T_W12, 10101100B, 11101010B
D601 1B AC E7 DB T_W12, 10101100B, 11100111B ;11001101
D604 1B D9 CB DB T_W12, 11011001B, 11001011B
D607 1B D9 C6 DB T_W12, 11011001B, 11000110B ;01100110
D60A 1B B3 8A DB T_W12, 10110011B, 10001010B
D60D 1B B3 87 DB T_W12, 10110011B, 10000111B ;00110011
D610 1B E6 AB DB T_W12, 11100110B, 10101011B
D613 1B E6 A7 DB T_W12, 11100110B, 10100111B ;10011001
D616 1B CC EB DB T_W12, 11001100B, 11101011B
D619 FE DB T_KONEC
PROGRAM IOT MACRO-80 3.44 09-Dec-81 PAGE 1-272
;8bit. invert. vysilac/primac sbrnice
;74640; 74642 8765432 12345678 _1
D61A I74640T: ; ZAAAAAAA BBBBBBBB XXNGADXX
D61A 10 00 FF 14 DB T_VV3, 00000000B, 11111111B, 00010100B ;/B->A
D61E 24 46 DB T_NAP, DIL20
D620 1F 80 FF E3 DB T_W123, 10000000B, 11111111B, 11100011B
D624 1F FF 00 EB DB T_W123, 11111111B, 00000000B, 11101011B
D628 1F FF 55 FB DB T_W123, 11111111B, 01010101B, 11111011B
D62C 1F FF AA FB DB T_W123, 11111111B, 10101010B, 11111011B
D630 1F AA 55 EB DB T_W123, 10101010B, 01010101B, 11101011B
D634 1F D5 AA E3 DB T_W123, 11010101B, 10101010B, 11100011B
D638 1F C0 FE E3 DB T_W123, 11000000B, 11111110B, 11100011B
D63C 1F A0 FD E3 DB T_W123, 10100000B, 11111101B, 11100011B
D640 1F 90 FB E3 DB T_W123, 10010000B, 11111011B, 11100011B
D644 1F 88 F7 E3 DB T_W123, 10001000B, 11110111B, 11100011B
D648 1F 84 EF E3 DB T_W123, 10000100B, 11101111B, 11100011B
D64C 1F 82 DF E3 DB T_W123, 10000010B, 11011111B, 11100011B
D650 1F 81 BF E3 DB T_W123, 10000001B, 10111111B, 11100011B
D654 1F 80 7F EB DB T_W123, 10000000B, 01111111B, 11101011B
D658 21 DB T_GOSUB
D659 D65C DW S74640T
D65B FE DB T_KONEC
;------------------------------------------------------
;spolecna cast pro: 74640; 74642, 74643, 74644
D65C 10 7F 00 1C S74640T:DB T_VV3, 01111111B, 00000000B, 00011100B ;/A->B
D660 1F 80 FF E7 DB T_W123, 10000000B, 11111111B, 11100111B
D664 1F FF 00 EF DB T_W123, 11111111B, 00000000B, 11101111B
D668 1F AA 55 EF DB T_W123, 10101010B, 01010101B, 11101111B
D66C 1F D5 AA E7 DB T_W123, 11010101B, 10101010B, 11100111B
D670 1F AA FF FF DB T_W123, 10101010B, 11111111B, 11111111B
D674 1F D5 FF F7 DB T_W123, 11010101B, 11111111B, 11110111B
D678 1F FF 80 E7 DB T_W123, 11111111B, 10000000B, 11100111B
D67C 1F FE 40 EF DB T_W123, 11111110B, 01000000B, 11101111B
D680 1F FD 20 EF DB T_W123, 11111101B, 00100000B, 11101111B
D684 1F FB 10 EF DB T_W123, 11111011B, 00010000B, 11101111B
D688 1F F7 08 EF DB T_W123, 11110111B, 00001000B, 11101111B
D68C 1F EF 04 EF DB T_W123, 11101111B, 00000100B, 11101111B
D690 1F DF 02 EF DB T_W123, 11011111B, 00000010B, 11101111B
D694 1F BF 01 EF DB T_W123, 10111111B, 00000001B, 11101111B
D698 22 DB T_RET
;8bit. invert./neinvert. vysilac/primac sbrnice
;74643, 74644 8765432 12345678 _1
D699 I74643T: ; ZAAAAAAA BBBBBBBB XXNGADXX
D699 21 DB T_GOSUB
D69A C947 DW S74245T
D69C 21 DB T_GOSUB
D69D D65C DW S74640T
D69F FE DB T_KONEC
;8bit. vysilac s obousmer. reg. CS DSC
;74646, 74647 AAAAAAA BBBBBBBB BB_AIAA
D6A0 I74646T: ; Z8765432 12345678 NAAG1RBB
D6A0 10 00 FF 77 DB T_VV3, 00000000B, 11111111B, 01110111B ;B->A
PROGRAM IOT MACRO-80 3.44 09-Dec-81 PAGE 1-273
D6A4 24 47 DB T_NAP, DIL24
D6A6 1F AA AA CA DB T_W123, 10101010B, 10101010B, 11001010B
D6AA 1F D5 55 C1 DB T_W123, 11010101B, 01010101B, 11000001B
D6AE 1F FF 00 9A DB T_W123, 11111111B, 00000000B, 10011010B ;/G = 1
D6B2 10 7F 00 7F DB T_VV3, 01111111B, 00000000B, 01111111B ;A->B
D6B6 1F AA AA 8C DB T_W123, 10101010B, 10101010B, 10001100B
D6BA 1F D5 55 C4 DB T_W123, 11010101B, 01010101B, 11000100B
D6BE 1F 80 FF 94 DB T_W123, 10000000B, 11111111B, 10010100B ;/G = 1
D6C2 10 7F FF 7F DB T_VV3, 01111111B, 11111111B, 01111111B ;zachyt A,B
D6C6 1F AA 55 BA DB T_W123, 10101010B, 01010101B, 10111010B
D6CA 1C D9 DB T_W3, 11011001B
D6CC 10 00 00 77 DB T_VV3, 00000000B, 00000000B, 01110111B ;precist A,B
D6D0 1F D5 FF A2 DB T_W123, 11010101B, 11111111B, 10100010B ;ctem A z B
D6D4 1F FF AA 8E DB T_W123, 11111111B, 10101010B, 10001110B ;ctem B z A
D6D8 10 7F FF 7F DB T_VV3, 01111111B, 11111111B, 01111111B ;zachyt A,B
D6DC 1F D5 AA B2 DB T_W123, 11010101B, 10101010B, 10110010B
D6E0 1C D1 DB T_W3, 11010001B
D6E2 10 00 00 7F DB T_VV3, 00000000B, 00000000B, 01111111B ;precist A,B
D6E6 1F AA FF AA DB T_W123, 10101010B, 11111111B, 10101010B ;ctem A z B
D6EA 1F FF 55 86 DB T_W123, 11111111B, 01010101B, 10000110B ;ctem B z A
D6EE FE DB T_KONEC
;8bit. invert. vysilac s obousmer. reg. CS DSC
;74648, 74649 AAAAAAA BBBBBBBB BB_AIAA
D6EF I74648T: ; Z8765432 12345678 NAAG1RBB
D6EF 10 00 FF 77 DB T_VV3, 00000000B, 11111111B, 01110111B ;B->A
D6F3 24 47 DB T_NAP, DIL24
D6F5 1F AA 55 CA DB T_W123, 10101010B, 01010101B, 11001010B
D6F9 1F D5 AA C1 DB T_W123, 11010101B, 10101010B, 11000001B
D6FD 1F FF FF 9A DB T_W123, 11111111B, 11111111B, 10011010B ;/G = 1
D701 10 7F 00 7F DB T_VV3, 01111111B, 00000000B, 01111111B ;A->B
D705 1F AA 55 8C DB T_W123, 10101010B, 01010101B, 10001100B
D709 1F D5 AA C4 DB T_W123, 11010101B, 10101010B, 11000100B
D70D 1F FF FF 9C DB T_W123, 11111111B, 11111111B, 10011100B ;/G = 1
D711 10 7F FF 7F DB T_VV3, 01111111B, 11111111B, 01111111B ;zachyt A,B
D715 1F D5 AA B2 DB T_W123, 11010101B, 10101010B, 10110010B
D719 1C D1 DB T_W3, 11010001B
D71B 10 00 00 77 DB T_VV3, 00000000B, 00000000B, 01110111B ;precist A,B
D71F 1F D5 FF A2 DB T_W123, 11010101B, 11111111B, 10100010B ;ctem A z B
D723 1F FF AA 8E DB T_W123, 11111111B, 10101010B, 10001110B ;ctem B z A
D727 10 7F FF 7F DB T_VV3, 01111111B, 11111111B, 01111111B ;zachyt A,B
D72B 1F AA 55 BA DB T_W123, 10101010B, 01010101B, 10111010B
D72F 1C D9 DB T_W3, 11011001B
D731 10 00 00 7F DB T_VV3, 00000000B, 00000000B, 01111111B ;precist A,B
D735 1F AA FF AA DB T_W123, 10101010B, 11111111B, 10101010B ;ctem A z B
D739 1F FF 55 86 DB T_W123, 11111111B, 01010101B, 10000110B ;ctem B z A
D73D FE DB T_KONEC
;8bit. vysilac/primac sbrnice s reg. _
; CSG GSC
;74652, 74654 AAAAAAA BBBBBBBB BBBAAAA
D73E I74652T: ; Z8765432 12345678 NAAA1BBB
D73E 10 00 FF 77 DB T_VV3, 00000000B, 11111111B, 01110111B ;B->A
D742 24 47 DB T_NAP, DIL24
D744 1F AA AA CA DB T_W123, 10101010B, 10101010B, 11001010B
D748 1F D5 55 C2 DB T_W123, 11010101B, 01010101B, 11000010B
PROGRAM IOT MACRO-80 3.44 09-Dec-81 PAGE 1-274
D74C 1F FF 00 9A DB T_W123, 11111111B, 00000000B, 10011010B ;/GBA = 1
D750 10 7F 00 7F DB T_VV3, 01111111B, 00000000B, 01111111B ;A->B
D754 1F AA AA 9C DB T_W123, 10101010B, 10101010B, 10011100B
D758 1F D5 55 94 DB T_W123, 11010101B, 01010101B, 10010100B
D75C 1F 80 FF 90 DB T_W123, 10000000B, 11111111B, 10010000B ;GAB = 0
D760 10 7F FF 7F DB T_VV3, 01111111B, 11111111B, 01111111B ;zachyt A,B
D764 1F AA 55 BA DB T_W123, 10101010B, 01010101B, 10111010B
D768 1C D9 DB T_W3, 11011001B
D76A 10 00 00 77 DB T_VV3, 00000000B, 00000000B, 01110111B ;precist A,B
D76E 1F D5 AA A6 DB T_W123, 11010101B, 10101010B, 10100110B
D772 10 7F FF 7F DB T_VV3, 01111111B, 11111111B, 01111111B ;zachyt A,B
D776 1F D5 AA B2 DB T_W123, 11010101B, 10101010B, 10110010B
D77A 1C D1 DB T_W3, 11010001B
D77C 10 00 00 77 DB T_VV3, 00000000B, 00000000B, 01110111B ;precist A,B
D780 1F AA 55 AE DB T_W123, 10101010B, 01010101B, 10101110B
D784 FE DB T_KONEC
;8bit. invert. vysilac/primac sbrnice s reg. _
; CSG GSC
;74653, 74651 AAAAAAA BBBBBBBB BBBAAAA
D785 I74653T: ; Z8765432 12345678 NAAA1BBB
D785 10 00 FF 77 DB T_VV3, 00000000B, 11111111B, 01110111B ;B->A
D789 24 47 DB T_NAP, DIL24
D78B 1F AA 55 CA DB T_W123, 10101010B, 01010101B, 11001010B
D78F 1F D5 AA C2 DB T_W123, 11010101B, 10101010B, 11000010B
D793 1F FF FF 9A DB T_W123, 11111111B, 11111111B, 10011010B ;/GBA = 1
D797 10 7F 00 7F DB T_VV3, 01111111B, 00000000B, 01111111B ;A->B
D79B 1F AA 55 9C DB T_W123, 10101010B, 01010101B, 10011100B
D79F 1F D5 AA 94 DB T_W123, 11010101B, 10101010B, 10010100B
D7A3 1F FF FF 90 DB T_W123, 11111111B, 11111111B, 10010000B ;GAB = 0
D7A7 10 7F FF 7F DB T_VV3, 01111111B, 11111111B, 01111111B ;zachyt A,B
D7AB 1F AA AA BA DB T_W123, 10101010B, 10101010B, 10111010B
D7AF 1C D9 DB T_W3, 11011001B
D7B1 10 00 00 77 DB T_VV3, 00000000B, 00000000B, 01110111B ;precist A,B
D7B5 1F D5 55 A6 DB T_W123, 11010101B, 01010101B, 10100110B
D7B9 10 7F FF 7F DB T_VV3, 01111111B, 11111111B, 01111111B ;zachyt A,B
D7BD 1F D5 55 B2 DB T_W123, 11010101B, 01010101B, 10110010B
D7C1 1C D1 DB T_W3, 11010001B
D7C3 10 00 00 77 DB T_VV3, 00000000B, 00000000B, 01110111B ;precist A,B
D7C7 1F AA AA AE DB T_W123, 10101010B, 10101010B, 10101110B
D7CB FE DB T_KONEC
;16bit posuvny registr s par vstupem a reg
; S
; E
; R _
; /M RR
; QO YYY YYYT/C_
;74673 YYYYY1D 111YYYYY 111R_LC
D7CC I74673T: ; Z432105E 21098765 N543RWKS
D7CC 00 DB T_NIC
; 111 21111111 2222
; 21098765 09876543 43214321
; DB T_VV3, 00000011B, 00000000B, 00001111B
; DB T_NAP, DIL24
; DB T_W123, 10000010B, 00000000B, 10000001B
PROGRAM IOT MACRO-80 3.44 09-Dec-81 PAGE 1-275
; DB T_W123, 10000010B, 00000000B, 10000000B ;;
; DB T_O3, 10001000B
; DB T_O3, 10001010B ;1-0
;
; DB T_O3, 10001000B
; DB T_W123, 10000111B, 00000000B, 10001000B
;
; DB T_O13, 10000000B, 10001000B
; DB T_O3, 10001010B ;01-1
; DB T_O13, 10000010B, 10001000B
; DB T_O3, 10001010B ;101-2
; DB T_O13, 10000000B, 10001000B
; DB T_O3, 10001010B ;0101-3
; DB T_O13, 10000010B, 10001000B
; DB T_O3, 10001010B ;10101-4
; DB T_O13, 10000000B, 10001000B
; DB T_O3, 10001010B ;010101-5
; DB T_O13, 10000010B, 10001000B
; DB T_O3, 10001010B ;1010101-6
; DB T_O13, 10000000B, 10001000B
; DB T_O3, 10001010B ;01010101-7
; DB T_O13, 10000010B, 10001000B
; DB T_O3, 10001010B ;101010101-8
; DB T_O13, 10000000B, 10001000B
; DB T_O3, 10001010B ;0101010101-9
; DB T_O13, 10000010B, 10001000B
; DB T_O3, 10001010B ;10101010101-10
; DB T_O13, 10000000B, 10001000B
; DB T_O3, 10001010B ;010101010101-11
; DB T_O13, 10000010B, 10001000B
; DB T_O3, 10001010B ;1010101010101-12
; DB T_O13, 10000000B, 10001000B
; DB T_O3, 10001010B ;01010101010101-13
; DB T_O13, 10000010B, 10001000B
; DB T_O3, 10001010B ;101010101010101-14
;
; DB T_W123, 11010101B, 10101010B, 10101000B
; DB T_O13, 10000000B, 10001010B ;0101010101010101-15
; DB T_W123, 10101011B, 01010101B, 11011000B
;
; DB T_KONEC
;16bit posuvny registr s par. vstupem
;74674
D7CD I74674T:
D7CD 00 DB T_NIC
;sync. program. BCD citac s R a mux. vystup. reg
; _ _ _
; R L _ C
; RCE EO C RCC
;74690 CLN ABCDNA_/ CCL
D7CE I74690T: ; ZKRPDCBA QQQQTDGR XXNOKRXX
D7CE 21 DB T_GOSUB
D7CF D82E DW G7469X1
D7D1 21 DB T_GOSUB
PROGRAM IOT MACRO-80 3.44 09-Dec-81 PAGE 1-276
D7D2 D86B DW G7469X3
D7D4 1F B0 9C FF G7469X4:DB T_W123, 10110000B, 10011100B, 11111111B ;9
D7D8 1C F7 DB T_W3, 11110111B
D7DA 1E 0C EF G7469X5:DB T_W23, 00001100B, 11101111B ;0
D7DD 1E 1D E7 DB T_W23, 00011101B, 11100111B ;CR 8
D7E0 1E 08 EF DB T_W23, 00001000B, 11101111B ;0
D7E3 1C E7 DB T_W3, 11100111B
D7E5 1F A0 0C EF DB T_W123, 10100000B, 00001100B, 11101111B ;0
D7E9 1C E7 DB T_W3, 11100111B
D7EB 1E 08 EF DB T_W23, 00001000B, 11101111B ;0
D7EE FE DB T_KONEC
;sync. program. BIN citac s R a mux. vystup. reg.
; _ _ _
; R L _ C
; RCE EO C RCC
;74691 CLN ABCDNA_/ CCL
D7EF I74691T: ; ZKRPDCBA QQQQTDGR XXNOKRXX
D7EF 21 DB T_GOSUB
D7F0 D82E DW G7469X1
D7F2 21 DB T_GOSUB
D7F3 D86B DW G7469X3
D7F5 1F B0 9C EF G7469X6:DB T_W123, 10110000B, 10011100B, 11101111B ;9
D7F9 1C E7 DB T_W3, 11100111B
D7FB 1E 5C EF DB T_W23, 01011100B, 11101111B ;A
D7FE 1C E7 DB T_W3, 11100111B
D800 1E DC EF DB T_W23, 11011100B, 11101111B ;B
D803 1C E7 DB T_W3, 11100111B
D805 1E 3C EF DB T_W23, 00111100B, 11101111B ;C
D808 1C E7 DB T_W3, 11100111B
D80A 1E BC EF DB T_W23, 10111100B, 11101111B ;D
D80D 1C E7 DB T_W3, 11100111B
D80F 1E 7C EF DB T_W23, 01111100B, 11101111B ;E
D812 1C E7 DB T_W3, 11100111B
D814 1E FC FF DB T_W23, 11111100B, 11111111B ;F
D817 1C F7 DB T_W3, 11110111B
D819 20 DB T_GOTO
D81A D7DA DW G7469X5
;sync. program. BCD citac se sinc. R a mux. vystup. reg.
; _ _ _
; R L _ C
; RCE EO C RCC
;74692 CLN ABCDNA_/ CCL
D81C I74692T: ; ZKRPDCBA QQQQTDGR XXNOKRXX
D81C 21 DB T_GOSUB
D81D D84B DW G7469X2
D81F 21 DB T_GOSUB
D820 D86B DW G7469X3
D822 20 DB T_GOTO
D823 D7D4 DW G7469X4
;sync. program. BIN citac se sinc, R a mux. vystup. reg.
; _ _ _
; R L _ C
; RCE EO C RCC
PROGRAM IOT MACRO-80 3.44 09-Dec-81 PAGE 1-277
;74693 CLN ABCDNA_/ CCL
D825 I74693T: ; ZKRPDCBA QQQQTDGR XXNOKRXX
D825 21 DB T_GOSUB
D826 D84B DW G7469X2
D828 21 DB T_GOSUB
D829 D86B DW G7469X3
D82B 20 DB T_GOTO
D82C D7F5 DW G7469X6
;------------------------------------------------------
;spolecna cast pro: 74690, 74691 74692, 74693
D82E 10 7F 0F 0C G7469X1:DB T_VV3, 01111111B, 00001111B, 00001100B
D832 24 46 DB T_NAP, DIL20
D834 0F B5 FA F7 DB T_O123, 10110101B, 11111010B, 11110111B
D838 1E A8 EF DB T_W23, 10101000B, 11101111B ;LOAD
D83B 1F BA FA E7 DB T_W123, 10111010B, 11111010B, 11100111B
D83F 1E 50 EF DB T_W23, 01010000B, 11101111B ;LOAD
D842 1F B5 0C EB DB T_W123, 10110101B, 00001100B, 11101011B ;RESET
D846 1F D5 0D E7 DB T_W123, 11010101B, 00001101B, 11100111B ;RESET REGISTR
D84A 22 DB T_RET
D84B 10 7F 0F 0C G7469X2:DB T_VV3, 01111111B, 00001111B, 00001100B
D84F 24 46 DB T_NAP, DIL20
D851 0F B5 FA F7 DB T_O123, 10110101B, 11111010B, 11110111B
D855 1E A8 EF DB T_W23, 10101000B, 11101111B ;LOAD
D858 1F BA FA E7 DB T_W123, 10111010B, 11111010B, 11100111B
D85C 1E 50 EF DB T_W23, 01010000B, 11101111B ;LOAD
D85F 1E 5C E3 DB T_W23, 01011100B, 11100011B
D862 1F B5 0C EB DB T_W123, 10110101B, 00001100B, 11101011B ;RESET SINC
D866 1F D5 0D E7 DB T_W123, 11010101B, 00001101B, 11100111B ;RESET REGISTR
D86A 22 DB T_RET
D86B 1F B0 8C EF G7469X3:DB T_W123, 10110000B, 10001100B, 11101111B ;1
D86F 1D F0 E7 DB T_W13, 11110000B, 11100111B ;ZR 1
D872 1F B0 4C EF DB T_W123, 10110000B, 01001100B, 11101111B ;2
D876 1E 8D E7 DB T_W23, 10001101B, 11100111B ;CR 1
D879 19 F0 DB T_W1, 11110000B ;ZR 2
D87B 1F B0 CC EF DB T_W123, 10110000B, 11001100B, 11101111B ;3
D87F 1E 4D E7 DB T_W23, 01001101B, 11100111B ;CR 2
D882 1E 2C EF DB T_W23, 00101100B, 11101111B ;4
D885 1D F0 E7 DB T_W13, 11110000B, 11100111B ;ZR 4
D888 1F B0 AC EF DB T_W123, 10110000B, 10101100B, 11101111B ;5
D88C 1C E7 DB T_W3, 11100111B
D88E 1E 6C EF DB T_W23, 01101100B, 11101111B ;6
D891 1C E7 DB T_W3, 11100111B
D893 1E EC EF DB T_W23, 11101100B, 11101111B ;7
D896 1C E7 DB T_W3, 11100111B
D898 1E 1C EF DB T_W23, 00011100B, 11101111B ;8
D89B 1E 2D E7 DB T_W23, 00101101B, 11100111B ;CR 4
D89E 19 F0 DB T_W1, 11110000B ;ZR 8
D8A0 22 DB T_RET
;sync. obousmer. BCD citac program. a mux. vystup. reg.
; _ _
; C_ _L _ _ _
PROGRAM IOT MACRO-80 3.44 09-Dec-81 PAGE 1-278
; RCE EO C RCD
;74696 CLN ABCDNA_/ CC/
D8A1 I74696T: ; ZKRPDCBA QQQQTDGR XXNOKUXX
D8A1 21 DB T_GOSUB
D8A2 D93A DW G7469Y2
D8A4 1D A0 E3 DB T_W13, 10100000B, 11100011B
D8A7 21 DB T_GOSUB
D8A8 D970 DW G7469Y4
D8AA 21 DB T_GOSUB
D8AB D9A9 DW G7469Y7
D8AD 21 DB T_GOSUB
D8AE D9B5 DW G7469Y8
D8B0 1E 94 EF G7469Y1:DB T_W23, 10010100B, 11101111B ;9
D8B3 1C E7 G7469Y0:DB T_W3, 11100111B
D8B5 1E 04 FF DB T_W23, 00000100B, 11111111B ;0
D8B8 1C F7 DB T_W3, 11110111B
D8BA 1C F7 DB T_W3, 11110111B
D8BC 1E 0C FF DB T_W23, 00001100B, 11111111B ;0
D8BF 1C F7 DB T_W3, 11110111B
D8C1 1F B0 0C FF DB T_W123, 10110000B, 00001100B, 11111111B ;0
D8C5 1C F7 DB T_W3, 11110111B
D8C7 1E 04 FF DB T_W23, 00000100B, 11111111B ;0
D8CA 1C E3 DB T_W3, 11100011B
D8CC 1E 0C FB DB T_W23, 00001100B, 11111011B ;0
D8CF 1C F3 DB T_W3, 11110011B
D8D1 1F B0 0C FB DB T_W123, 10110000B, 00001100B, 11111011B ;0
D8D5 1C F3 DB T_W3, 11110011B
D8D7 1E 04 EB DB T_W23, 00000100B, 11101011B ;0
D8DA 1C E3 DB T_W3, 11100011B
D8DC FE DB T_KONEC
;sync. obousmer. BIN citac program. a mux. vystup. reg.
; _ _
; C_ _L _ _ _
; RCE EO C RCD
;74697 CLN ABCDNA_/ CC/
D8DD I74697T: ; ZKRPDCBA QQQQTDGR XXNOKUXX
D8DD 21 DB T_GOSUB
D8DE D93A DW G7469Y2
D8E0 1D A0 E3 DB T_W13, 10100000B, 11100011B
D8E3 21 DB T_GOSUB
D8E4 D9E8 DW G7469Y6
D8E6 21 DB T_GOSUB
D8E7 D970 DW G7469Y4
D8E9 21 DB T_GOSUB
D8EA D9AF DW G7469Y9
D8EC 21 DB T_GOSUB
D8ED D9B5 DW G7469Y8
D8EF 1E 94 FF G7469Y5:DB T_W23, 10010100B, 11111111B ;9
D8F2 1C F7 DB T_W3, 11110111B
D8F4 1E 54 FF DB T_W23, 01010100B, 11111111B ;A
D8F7 1C F7 DB T_W3, 11110111B
D8F9 1E D4 FF DB T_W23, 11010100B, 11111111B ;B
PROGRAM IOT MACRO-80 3.44 09-Dec-81 PAGE 1-279
D8FC 1C F7 DB T_W3, 11110111B
D8FE 1E 34 FF DB T_W23, 00110100B, 11111111B ;C
D901 1C F7 DB T_W3, 11110111B
D903 1E B4 FF DB T_W23, 10110100B, 11111111B ;D
D906 1C F7 DB T_W3, 11110111B
D908 1E 74 FF DB T_W23, 01110100B, 11111111B ;E
D90B 1C F7 DB T_W3, 11110111B
D90D 1E F4 EF DB T_W23, 11110100B, 11101111B ;F
D910 20 DB T_GOTO
D911 D8B3 DW G7469Y0
;sync. obousmer. BCD citac program. se sinc, R a mux. vystup. reg.
; _ _
; C_ _L _ _ _
; RCE EO C RCD
;74698 CLN ABCDNA_/ CC/
D913 I74698T: ; ZKRPDCBA QQQQTDGR XXNOKUXX
D913 21 DB T_GOSUB
D914 D953 DW G7469Y3
D916 1D A0 F3 DB T_W13, 10100000B, 11110011B
D919 21 DB T_GOSUB
D91A D970 DW G7469Y4
D91C 21 DB T_GOSUB
D91D D9A9 DW G7469Y7
D91F 21 DB T_GOSUB
D920 D9B5 DW G7469Y8
D922 20 DB T_GOTO
D923 D8B0 DW G7469Y1
;sync. obousmer. BIN citac program. se sinc, R a mux. vystup. reg.
; _ _
; C_ _L _ _ _
; RCE EO C RCD
;74699 CLN ABCDNA_/ CC/
D925 I74699T: ; ZKRPDCBA QQQQTDGR XXNOKUXX
D925 21 DB T_GOSUB
D926 D953 DW G7469Y3
D928 1D A0 F3 DB T_W13, 10100000B, 11110011B
D92B 21 DB T_GOSUB
D92C D9E8 DW G7469Y6
D92E 21 DB T_GOSUB
D92F D970 DW G7469Y4
D931 21 DB T_GOSUB
D932 D9AF DW G7469Y9
D934 21 DB T_GOSUB
D935 D9B5 DW G7469Y8
D937 20 DB T_GOTO
D938 D8EF DW G7469Y5
;------------------------------------------------------
;spolecna cast pro: 74696, 74697 74698, 74699
D93A 10 7F 0F 0C G7469Y2:DB T_VV3, 01111111B, 00001111B, 00001100B
D93E 24 46 DB T_NAP, DIL20
D940 0F A5 F2 F7 DB T_O123, 10100101B, 11110010B, 11110111B
D944 1E A0 FF DB T_W23, 10100000B, 11111111B ;LOAD
PROGRAM IOT MACRO-80 3.44 09-Dec-81 PAGE 1-280
D947 1F AA F2 F7 DB T_W123, 10101010B, 11110010B, 11110111B
D94B 1E 58 FF DB T_W23, 01011000B, 11111111B ;LOAD
D94E 1F 85 04 FF DB T_W123, 10000101B, 00000100B, 11111111B ;RESET
D952 22 DB T_RET
D953 10 7F 0F 0C G7469Y3:DB T_VV3, 01111111B, 00001111B, 00001100B
D957 24 46 DB T_NAP, DIL20
D959 0F B5 FA F7 DB T_O123, 10110101B, 11111010B, 11110111B
D95D 1E A8 FF DB T_W23, 10101000B, 11111111B ;LOAD
D960 1F BA FA F7 DB T_W123, 10111010B, 11111010B, 11110111B
D964 1E 50 FF DB T_W23, 01010000B, 11111111B ;LOAD
D967 1F 95 5C F7 DB T_W123, 10010101B, 01011100B, 11110111B
D96B 1F 95 0C FF DB T_W123, 10010101B, 00001100B, 11111111B ;RESET SINC
D96F 22 DB T_RET
D970 1E 94 FB G7469Y4:DB T_W23, 10010100B, 11111011B ;9
D973 1C F3 DB T_W3, 11110011B
D975 1E 14 FB DB T_W23, 00010100B, 11111011B ;8
D978 1D E0 F3 DB T_W13, 11100000B, 11110011B ;ZR 8
D97B 1F A0 E4 FB DB T_W123, 10100000B, 11100100B, 11111011B ;7
D97F 1E 15 F3 DB T_W23, 00010101B, 11110011B ;CR 8
D982 1E 64 FB DB T_W23, 01100100B, 11111011B ;6
D985 1C F3 DB T_W3, 11110011B
D987 1E A4 FB DB T_W23, 10100100B, 11111011B ;5
D98A 1C F3 DB T_W3, 11110011B
D98C 1E 24 FB DB T_W23, 00100100B, 11111011B ;4
D98F 1D E0 F3 DB T_W13, 11100000B, 11110011B ;ZR 4
D992 1F A0 C4 FB DB T_W123, 10100000B, 11000100B, 11111011B ;3
D996 1E 25 F3 DB T_W23, 00100101B, 11110011B ;CR 4
D999 1E 44 FB DB T_W23, 01000100B, 11111011B ;2
D99C 1D E0 F3 DB T_W13, 11100000B, 11110011B ;ZR 2
D99F 1E 84 FB DB T_W23, 10000100B, 11111011B ;1
D9A2 1E 45 F3 DB T_W23, 01000101B, 11110011B ;CR 2
D9A5 1E 04 EB DB T_W23, 00000100B, 11101011B ;0
D9A8 22 DB T_RET
D9A9 1C E3 G7469Y7:DB T_W3, 11100011B
D9AB 1E 94 FB DB T_W23, 10010100B, 11111011B ;9
D9AE 22 DB T_RET
D9AF 1C E3 G7469Y9:DB T_W3, 11100011B
D9B1 1E F4 FB DB T_W23, 11110100B, 11111011B ;F
D9B4 22 DB T_RET
D9B5 1C E7 G7469Y8:DB T_W3, 11100111B
D9B7 1E 04 FF DB T_W23, 00000100B, 11111111B ;0
D9BA 1C F7 DB T_W3, 11110111B
D9BC 1E 84 FF DB T_W23, 10000100B, 11111111B ;1
D9BF 1C F7 DB T_W3, 11110111B
D9C1 1E 44 FF DB T_W23, 01000100B, 11111111B ;2
D9C4 1C F7 DB T_W3, 11110111B
D9C6 1E C4 FF DB T_W23, 11000100B, 11111111B ;3
D9C9 1C F7 DB T_W3, 11110111B
D9CB 1E 24 FF DB T_W23, 00100100B, 11111111B ;4
D9CE 1C F7 DB T_W3, 11110111B
D9D0 1F A0 A4 FF DB T_W123, 10100000B, 10100100B, 11111111B ;5
PROGRAM IOT MACRO-80 3.44 09-Dec-81 PAGE 1-281
D9D4 1D E0 F7 DB T_W13, 11100000B, 11110111B ;ZR 5
D9D7 1E 64 FF DB T_W23, 01100100B, 11111111B ;6
D9DA 1C F7 DB T_W3, 11110111B
D9DC 1E E4 FF DB T_W23, 11100100B, 11111111B ;7
D9DF 1C F7 DB T_W3, 11110111B
D9E1 1E 14 FF DB T_W23, 00010100B, 11111111B ;8
D9E4 1E A5 F7 DB T_W23, 10100101B, 11110111B ;CR 5
D9E7 22 DB T_RET
D9E8 1E F4 FB G7469Y6:DB T_W23, 11110100B, 11111011B ;F
D9EB 1C F3 DB T_W3, 11110011B
D9ED 1E 74 FB DB T_W23, 01110100B, 11111011B ;E
D9F0 1C F3 DB T_W3, 11110011B
D9F2 1E B4 FB DB T_W23, 10110100B, 11111011B ;D
D9F5 1C F3 DB T_W3, 11110011B
D9F7 1E 34 FB DB T_W23, 00110100B, 11111011B ;C
D9FA 1C F3 DB T_W3, 11110011B
D9FC 1E D4 FB DB T_W23, 11010100B, 11111011B ;B
D9FF 1C F3 DB T_W3, 11110011B
DA01 1E 54 FB DB T_W23, 01010100B, 11111011B ;A
DA04 1C F3 DB T_W3, 11110011B
DA06 22 DB T_RET
;8bit. reg TP, zpetny budic _
;74794 7654321 1234567C 00O
DA07 I74794T: ; ZDDDDDDD QQQQQQQK XXNQDEXX
DA07 10 7F 01 0C DB T_VV3, 01111111B, 00000001B, 00001100B
DA0B 24 46 DB T_NAP, DIL20
DA0D 0F AA 54 FF DB T_O123, 10101010B, 01010100B, 11111111B
DA11 1F AA 55 FF DB T_W123, 10101010B, 01010101B, 11111111B
DA15 10 00 01 04 DB T_VV3, 00000000B, 00000001B, 00000100B
DA19 1F AA 55 FB DB T_W123, 10101010B, 01010101B, 11111011B
DA1D 10 7F 01 0C DB T_VV3, 01111111B, 00000001B, 00001100B
DA21 1F D5 54 F7 DB T_W123, 11010101B, 01010100B, 11110111B
DA25 1F D5 AB E7 DB T_W123, 11010101B, 10101011B, 11100111B
DA29 10 00 01 04 DB T_VV3, 00000000B, 00000001B, 00000100B
DA2D 1F D5 AB E3 DB T_W123, 11010101B, 10101011B, 11100011B
DA31 FE DB T_KONEC
;10bit. reg. D budic sbernice _
;74821 9876543 3456789C 012210O
DA32 I74821T: ; ZDDDDDDD QQQQQQQP NQQQDDDE
DA32 10 7F 01 0F DB T_VV3, 01111111B, 00000001B, 00001111B
DA36 24 47 DB T_NAP, DIL24
DA38 1F AA FE FB DB T_W123, 10101010B, 11111110B, 11111011B
DA3C 1E 55 DA DB T_W23, 01010101B, 11011010B
DA3F 1F D5 54 D4 DB T_W123, 11010101B, 01010100B, 11010100B
DA43 1E AB A4 DB T_w23, 10101011B, 10100100B
DA46 1E FE F5 DB T_W23, 11111110B, 11110101B
DA49 1F AA 55 A4 DB T_W123, 10101010B, 01010101B, 10100100B
DA4D FE DB T_KONEC
;10bit. budic sbernice _ _
; 2 1
;74827 9876543 3456789O 012210O
DA4E I74827T: ; ZDDDDDDD QQQQQQQE NQQQDDDE
PROGRAM IOT MACRO-80 3.44 09-Dec-81 PAGE 1-282
DA4E 10 7F 01 0F DB T_VV3, 01111111B, 00000001B, 00001111B
DA52 24 47 DB T_NAP, DIL24
DA54 1F 80 FF F1 DB T_W123, 10000000B, 11111111B, 11110001B
DA58 1E FF F0 DB T_W23, 11111111B, 11110000B
DA5B 1E FE F1 DB T_W23, 11111110B, 11110001B
DA5E 1E 00 80 DB T_W23, 00000000B, 10000000B
DA61 1F D5 AA A4 DB T_W123, 11010101B, 10101010B, 10100100B
DA65 1F AA 54 DA DB T_W123, 10101010B, 01010100B, 11011010B
DA69 FE DB T_KONEC
;10bit. budic sbernice _ _
; 2 1
;74828 9876543 3456789O 012210O
DA6A I74828T: ; ZDDDDDDD QQQQQQQE NQQQDDDE
DA6A 10 7F 01 0F DB T_VV3, 01111111B, 00000001B, 00001111B
DA6E 24 47 DB T_NAP, DIL24
DA70 1F FF FF FF DB T_W123, 11111111B, 11111111B, 11111111B
DA74 1E FF FE DB T_W23, 11111111B, 11111110B
DA77 1E FE FF DB T_W23, 11111110B, 11111111B
DA7A 1E 00 8E DB T_W23, 00000000B, 10001110B
DA7D 1F D5 54 AA DB T_W123, 11010101B, 01010100B, 10101010B
DA81 1F AA AA D4 DB T_W123, 10101010B, 10101010B, 11010100B
DA85 FE DB T_KONEC
;10bit. transparent. stradac D _
;74841 9876543 3456789L 012210O
DA86 I74841T: ; ZDDDDDDD QQQQQQQE NQQQDDDE
DA86 10 7F 01 0F DB T_VV3, 01111111B, 00000001B, 00001111B
DA8A 24 47 DB T_NAP, DIL24
DA8C 1F AA FF FB DB T_W123, 10101010B, 11111111B, 11111011B
DA90 1E 55 DA DB T_W23, 01010101B, 11011010B
DA93 0A 54 DB T_O2, 01010100B
DA95 1F D5 54 D4 DB T_W123, 11010101B, 01010100B, 11010100B
DA99 1E AB A4 DB T_W23, 10101011B, 10100100B
DA9C 1E FE F5 DB T_W23, 11111110B, 11110101B
DA9F 1F AA AA AA DB T_W123, 10101010B, 10101010B, 10101010B
DAA3 1E 55 DA DB T_W23, 01010101B, 11011010B
DAA6 1F D5 AB A4 DB T_W123, 11010101B, 10101011B, 10100100B
DAAA 1F AA 55 DA DB T_W123, 10101010B, 01010101B, 11011010B
DAAE FE DB T_KONEC
;2x 4bit. stradac D transparent. a R
; _ _
; _ 2 _1
; 2222211 1122222C 111111C
;74873 ODDDDDD QQQQQQLL LQQDDOL
DAAF I74873T: ; ZE432143 341234ER NE1221ER
DAAF 10 7F 03 4F DB T_VV3, 01111111B, 00000011B, 01001111B
DAB3 24 47 DB T_NAP, DIL24
DAB5 1F BC 02 C1 DB T_W123, 10111100B, 00000010B, 11000001B
DAB9 1F AA 57 D9 DB T_W123, 10101010B, 01010111B, 11011001B
DABD 1F E9 BD E5 DB T_W123, 11101001B, 10111101B, 11100101B
DAC1 1F 95 D5 B7 DB T_W123, 10010101B, 11010101B, 10110111B
DAC5 1F 96 6B D9 DB T_W123, 10010110B, 01101011B, 11011001B
DAC9 1F AB 17 C0 DB T_W123, 10101011B, 00010111B, 11000000B
DACD FE DB T_KONEC
PROGRAM IOT MACRO-80 3.44 09-Dec-81 PAGE 1-283
;2x 4bit. reg. D a reset
; _ _
; _ 22 1 _1
; 2222211 112222CC C11111C
;74874 ODDDDDD QQQQQQLL LQQDDOL
DACE I74874T: ; ZE432143 341234KR NK1221ER
DACE 10 7F 03 4F DB T_VV3, 01111111B, 00000011B, 01001111B
DAD2 24 47 DB T_NAP, DIL24
DAD4 1F BF 00 8C DB T_W123, 10111111B, 00000000B, 10001100B
DAD8 1F D5 FD B7 DB T_W123, 11010101B, 11111101B, 10110111B
DADC 1F 95 AB E5 DB T_W123, 10010101B, 10101011B, 11100101B
DAE0 1F AA A9 A9 DB T_W123, 10101010B, 10101001B, 10101001B
DAE4 1E 57 D9 DB T_W23, 01010111B, 11011001B
DAE7 FE DB T_KONEC
;expander pro rozsireni vstup./vystup.
; _
; PPPPS_P PPPPPPPP PPPPPPP
; 2222TC4 66667777 5554445
DAE8 I8243T: ; Z0123BS3 01233210 N1232100
DAE8 10 7E 00 00 DB T_VV3, 01111110B, 00000000B, 00000000B ;P4 - P7 VYSTUP
DAEC 24 47 DB T_NAP, DIL24
DAEE 09 94 DB T_O1, 10010100B ;P4 ZAPIS
DAF0 09 90 DB T_O1, 10010000B
DAF2 09 D0 DB T_O1, 11010000B ;DATA 1010
DAF4 09 D4 DB T_O1, 11010100B
DAF6 09 D4 DB T_O1, 11010100B ;P5 ZAPIS
DAF8 09 D0 DB T_O1, 11010000B
DAFA 09 A8 DB T_O1, 10101000B ;DATA 0101
DAFC 09 AC DB T_O1, 10101100B
DAFE 09 B4 DB T_O1, 10110100B ;P6 ZAPIS
DB00 09 B0 DB T_O1, 10110000B
DB02 09 D0 DB T_O1, 11010000B ;DATA 1010
DB04 09 D4 DB T_O1, 11010100B
DB06 09 F4 DB T_O1, 11110100B ;P7 ZAPIS
DB08 09 F0 DB T_O1, 11110000B
DB0A 09 A8 DB T_O1, 10101000B ;DATA 0101
DB0C 1F AC AA DA DB T_W123, 10101100B, 10101010B, 11011010B
DB10 09 8C DB T_O1, 10001100B ;P4 ZAPIS - OR
DB12 09 88 DB T_O1, 10001000B
DB14 09 98 DB T_O1, 10011000B ;DATA 0011 - 1011
DB16 09 9C DB T_O1, 10011100B
DB18 09 CC DB T_O1, 11001100B ;P5 ZAPIS - OR
DB1A 09 C8 DB T_O1, 11001000B
DB1C 09 B0 DB T_O1, 10110000B ;DATA 0110 - 0111
DB1E 09 B4 DB T_O1, 10110100B
DB20 09 AC DB T_O1, 10101100B ;P6 ZAPIS - OR
DB22 09 A8 DB T_O1, 10101000B
DB24 09 E0 DB T_O1, 11100000B ;DATA 1100 - 1110
DB26 09 E4 DB T_O1, 11100100B
DB28 09 EC DB T_O1, 11101100B ;P7 ZAPIS - OR
DB2A 09 E8 DB T_O1, 11101000B
DB2C 09 C8 DB T_O1, 11001000B ;DATA 1001 - 1101
DB2E 1F CD EB FA DB T_W123, 11001101B, 11101011B, 11111010B
DB32 09 94 DB T_O1, 10010100B ;P4 ZAPIS
PROGRAM IOT MACRO-80 3.44 09-Dec-81 PAGE 1-284
DB34 09 90 DB T_O1, 10010000B
DB36 09 A8 DB T_O1, 10101000B ;DATA 0101
DB38 09 AC DB T_O1, 10101100B
DB3A 09 D4 DB T_O1, 11010100B ;P5 ZAPIS
DB3C 09 D0 DB T_O1, 11010000B
DB3E 09 D0 DB T_O1, 11010000B ;DATA 1010
DB40 09 D4 DB T_O1, 11010100B
DB42 09 B4 DB T_O1, 10110100B ;P6 ZAPIS
DB44 09 B0 DB T_O1, 10110000B
DB46 09 A8 DB T_O1, 10101000B ;DATA 0101
DB48 09 AC DB T_O1, 10101100B
DB4A 09 F4 DB T_O1, 11110100B ;P7 ZAPIS
DB4C 09 F0 DB T_O1, 11110000B
DB4E 09 D0 DB T_O1, 11010000B ;DATA 1010
DB50 1F D5 55 A5 DB T_W123, 11010101B, 01010101B, 10100101B
DB54 09 9C DB T_O1, 10011100B ;P4 ZAPIS - AND
DB56 09 98 DB T_O1, 10011000B
DB58 09 98 DB T_O1, 10011000B ;DATA 1100 - 0100
DB5A 09 9C DB T_O1, 10011100B
DB5C 09 DC DB T_O1, 11011100B ;P5 ZAPIS - AND
DB5E 09 D8 DB T_O1, 11011000B
DB60 09 B0 DB T_O1, 10110000B ;DATA 1001 - 1000
DB62 09 B4 DB T_O1, 10110100B
DB64 09 BC DB T_O1, 10111100B ;P6 ZAPIS - AND
DB66 09 B8 DB T_O1, 10111000B
DB68 09 E0 DB T_O1, 11100000B ;DATA 0011 - 0001
DB6A 09 E4 DB T_O1, 11100100B
DB6C 09 FC DB T_O1, 11111100B ;P7 ZAPIS - AND
DB6E 09 F8 DB T_O1, 11111000B
DB70 09 C8 DB T_O1, 11001000B ;DATA 0110 - 0010
DB72 1F CD 41 A0 DB T_W123, 11001101B, 01000001B, 10100000B
DB76 09 84 DB T_O1, 10000100B ;P4 PRIPRAVA NA CTENI
DB78 09 80 DB T_O1, 10000000B
DB7A 08 06 00 DB T_VV2, 00000110B, 00000000B
DB7D 01 F9 DB T_I1, 11111001B
DB7F 09 FF DB T_O1, 11111111B
DB81 08 7E 00 DB T_VV2, 01111110B, 00000000B
DB84 09 C4 DB T_O1, 11000100B ;P5 PRIPRAVA NA CTENI
DB86 09 C0 DB T_O1, 11000000B
DB88 08 06 00 DB T_VV2, 00000110B, 00000000B
DB8B 01 F9 DB T_I1, 11111001B
DB8D 09 FF DB T_O1, 11111111B
DB8F 08 7E 00 DB T_VV2, 01111110B, 00000000B
DB92 09 A4 DB T_O1, 10100100B ;P6 PRIPRAVA NA CTENI
DB94 09 A0 DB T_O1, 10100000B
DB96 08 06 00 DB T_VV2, 00000110B, 00000000B
DB99 01 F9 DB T_I1, 11111001B
DB9B 09 FF DB T_O1, 11111111B
DB9D 08 7E 00 DB T_VV2, 01111110B, 00000000B
DBA0 09 E4 DB T_O1, 11100100B ;P7 PRIPRAVA NA CTENI
DBA2 09 E0 DB T_O1, 11100000B
DBA4 08 06 00 DB T_VV2, 00000110B, 00000000B
DBA7 01 F9 DB T_I1, 11111001B
DBA9 09 FF DB T_O1, 11111111B
DBAB 10 7F FF 7F DB T_VV3, 01111111B, 11111111B, 01111111B ;P4 - P7 VSTUP
DBAF 1F 84 55 DA DB T_W123, 10000100B, 01010101B, 11011010B ;P4 CTENI
PROGRAM IOT MACRO-80 3.44 09-Dec-81 PAGE 1-285
DBB3 09 80 DB T_O1, 10000000B
DBB5 08 07 FF DB T_VV2, 00000111B, 11111111B
DBB8 01 D0 DB T_I1, 11010000B ;DATA 1010
DBBA 09 D6 DB T_O1, 11010110B
DBBC 08 7F FF DB T_VV2, 01111111B, 11111111B
DBBF 09 C4 DB T_O1, 11000100B ;P5 CTENI
DBC1 09 C0 DB T_O1, 11000000B
DBC3 08 07 FF DB T_VV2, 00000111B, 11111111B
DBC6 01 A8 DB T_I1, 10101000B ;DATA 0101
DBC8 09 AE DB T_O1, 10101110B
DBCA 08 7F FF DB T_VV2, 01111111B, 11111111B
DBCD 09 A4 DB T_O1, 10100100B ;P6 CTENI
DBCF 09 A0 DB T_O1, 10100000B
DBD1 08 07 FF DB T_VV2, 00000111B, 11111111B
DBD4 01 A8 DB T_I1, 10101000B ;DATA 0101
DBD6 09 AE DB T_O1, 10101110B
DBD8 08 7F FF DB T_VV2, 01111111B, 11111111B
DBDB 09 E4 DB T_O1, 11100100B ;P7 CTENI
DBDD 09 E0 DB T_O1, 11100000B
DBDF 08 07 FF DB T_VV2, 00000111B, 11111111B
DBE2 01 D0 DB T_I1, 11010000B ;DATA 1010
DBE4 09 D6 DB T_O1, 11010110B
DBE6 08 7F FF DB T_VV2, 01111111B, 11111111B
DBE9 1F 85 AA A5 DB T_W123, 10000101B, 10101010B, 10100101B ;P4 CTENI
DBED 09 81 DB T_O1, 10000001B
DBEF 08 07 FF DB T_VV2, 00000111B, 11111111B
DBF2 01 A9 DB T_I1, 10101001B ;DATA 0101
DBF4 09 AF DB T_O1, 10101111B
DBF6 08 7F FF DB T_VV2, 01111111B, 11111111B
DBF9 09 C5 DB T_O1, 11000101B ;P5 CTENI
DBFB 09 C1 DB T_O1, 11000001B
DBFD 08 07 FF DB T_VV2, 00000111B, 11111111B
DC00 01 D1 DB T_I1, 11010001B ;DATA 1010
DC02 09 D7 DB T_O1, 11010111B
DC04 08 7F FF DB T_VV2, 01111111B, 11111111B
DC07 09 A5 DB T_O1, 10100101B ;P6 CTENI
DC09 09 A1 DB T_O1, 10100001B
DC0B 08 07 FF DB T_VV2, 00000111B, 11111111B
DC0E 01 D1 DB T_I1, 11010001B ;DATA 1010
DC10 09 D7 DB T_O1, 11010111B
DC12 08 7F FF DB T_VV2, 01111111B, 11111111B
DC15 09 E5 DB T_O1, 11100101B ;P7 CTENI
DC17 09 E1 DB T_O1, 11100001B
DC19 08 07 FF DB T_VV2, 00000111B, 11111111B
DC1C 01 A9 DB T_I1, 10101001B ;DATA 0101
DC1E 09 AF DB T_O1, 10101111B
DC20 FE DB T_KONEC
;***********************
;* CMOS CMOS CMOS CMOS *
;***********************
;2x 3NOR + invert.
;4000 1111NN 2222_
DC21 I4000T: ; ZYCBACCX XNCBAYXX
DC21 25 07 80 DB T_NZ2, 00000111B, 10000000B
PROGRAM IOT MACRO-80 3.44 09-Dec-81 PAGE 1-286
DC24 08 38 39 DB T_VV2, 00111000B, 00111001B
DC27 24 44 DB T_NAP, DIL14
DC29 1B C7 FA DB T_W12, 11000111B, 11111010B
DC2C 1B A7 D9 DB T_W12, 10100111B, 11011001B
DC2F 1B 97 EA DB T_W12, 10010111B, 11101010B
DC32 1B B7 CA DB T_W12, 10110111B, 11001010B
DC35 1B 8F F1 DB T_W12, 10001111B, 11110001B
DC38 1B AF D1 DB T_W12, 10101111B, 11010001B
DC3B 1B 9F E2 DB T_W12, 10011111B, 11100010B
DC3E 1B BF C5 DB T_W12, 10111111B, 11000101B
DC41 FE DB T_KONEC
;4x 2NOR
;4001 222111 444333
DC42 I4001T: ; ZABYYBAX XNABYYBA
DC42 08 66 33 DB T_VV2, 01100110B, 00110011B
DC45 24 44 DB T_NAP, DIL14
DC47 1B E3 E4 DB T_W12, 11100011B, 11100100B
DC4A 1B A7 D1 DB T_W12, 10100111B, 11010001B
DC4D 1B C9 F2 DB T_W12, 11001001B, 11110010B
DC50 1B 95 CB DB T_W12, 10010101B, 11001011B
DC53 FE DB T_KONEC
;2x 4NOR
;4002
DC54 I4002T: ; ZXDCBAYX XNYABCDX
DC54 25 41 81 DB T_NZ2, 01000001B, 10000001B
DC57 08 3C 1E DB T_VV2, 00111100B, 00011110B
DC5A 24 44 DB T_NAP, DIL14
DC5C 1B FD E1 DB T_W12, 11111101B, 11100001B
DC5F 1B DD D1 DB T_W12, 11011101B, 11010001B
DC62 1B ED C9 DB T_W12, 11101101B, 11001001B
DC65 1B F5 C5 DB T_W12, 11110101B, 11000101B
DC68 1B F9 C3 DB T_W12, 11111001B, 11000011B
DC6B 1B C3 DF DB T_W12, 11000011B, 11011111B
DC6E 1B E1 CF DB T_W12, 11100001B, 11001111B
DC71 1B D1 D7 DB T_W12, 11010001B, 11010111B
DC74 1B C9 DB DB T_W12, 11001001B, 11011011B
DC77 1B C5 DD DB T_W12, 11000101B, 11011101B
DC7A FE DB T_KONEC
;4x 2NAND
;4011, 4093 111222 444333
DC7B I4011T: ; ZABYYBAX XNABYYBA
DC7B 08 66 33 DB T_VV2, 01100110B, 00110011B
DC7E 24 44 DB T_NAP, DIL14
DC80 1B EB EC DB T_W12, 11101011B, 11101100B
DC83 1B B7 DD DB T_W12, 10110111B, 11011101B
DC86 1B D9 F6 DB T_W12, 11011001B, 11110110B
DC89 1B 9D CB DB T_W12, 10011101B, 11001011B
DC8C FE DB T_KONEC
;2x 4NAND
;4012
DC8D I4012T: ; ZXDCBAYX XNYABCDX
DC8D 25 41 81 DB T_NZ2, 01000001B, 10000001B
PROGRAM IOT MACRO-80 3.44 09-Dec-81 PAGE 1-287
DC90 08 3C 1E DB T_VV2, 00111100B, 00011110B
DC93 24 44 DB T_NAP, DIL14
DC95 1B FD E1 DB T_W12, 11111101B, 11100001B
DC98 1B DF F1 DB T_W12, 11011111B, 11110001B
DC9B 1B EF E9 DB T_W12, 11101111B, 11101001B
DC9E 1B F7 E5 DB T_W12, 11110111B, 11100101B
DCA1 1B FB E3 DB T_W12, 11111011B, 11100011B
DCA4 1B C3 DF DB T_W12, 11000011B, 11011111B
DCA7 1B E3 EF DB T_W12, 11100011B, 11101111B
DCAA 1B D3 F7 DB T_W12, 11010011B, 11110111B
DCAD 1B CB FB DB T_W12, 11001011B, 11111011B
DCB0 1B C7 FD DB T_W12, 11000111B, 11111101B
DCB3 FE DB T_KONEC
;2X K.O. D s SR
;4013 C_ _C
DCB4 I4013T: ; ZSDRLQQX XNQQLRDS
DCB4 08 78 0F DB T_VV2, 01111000B, 00001111B
DCB7 24 44 DB T_NAP, DIL14
DCB9 1B B5 F5 DB T_W12, 10110101B, 11110101B
DCBC 1B D7 E1 DB T_W12, 11010111B, 11100001B
DCBF 1B CB DE DB T_W12, 11001011B, 11011110B
DCC2 1B 83 D2 DB T_W12, 10000011B, 11010010B
DCC5 1B 8D EA DB T_W12, 10001101B, 11101010B
DCC8 1B A5 E0 DB T_W12, 10100101B, 11100000B
DCCB 1B AB D8 DB T_W12, 10101011B, 11011000B
DCCE FE DB T_KONEC
;2x 4bit. posuv. reg. s ser. vstupem, par. vystup, R
; AAAABB BBBBAA
;4015 AM0123C BM0123C
DCCF I4015T: ; ZDRQQQQP NDRQQQQP
DCCF 08 61 61 DB T_VV2, 01100001B, 01100001B
DCD2 24 45 DB T_NAP, DIL16
DCD4 1B A0 A0 DB T_W12, 10100000B, 10100000B
DCD7 1B C0 C0 DB T_W12, 11000000B, 11000000B
DCDA 1B D1 D1 DB T_W12, 11010001B, 11010001B
DCDD 1B 90 D0 DB T_W12, 10010000B, 11010000B
DCE0 1B 89 D9 DB T_W12, 10001001B, 11011001B
DCE3 1B C8 98 DB T_W12, 11001000B, 10011000B
DCE6 1B D5 8D DB T_W12, 11010101B, 10001101B
DCE9 1B 94 CC DB T_W12, 10010100B, 11001100B
DCEC 1B 8B D7 DB T_W12, 10001011B, 11010111B
DCEF 1B CA 96 DB T_W12, 11001010B, 10010110B
DCF2 1B D7 89 DB T_W12, 11010111B, 10001001B
DCF5 1B 96 C8 DB T_W12, 10010110B, 11001000B
DCF8 1B 89 D7 DB T_W12, 10001001B, 11010111B
DCFB FE DB T_KONEC
;10stupnovy johonson. citac _
; 01
;4017 3762015 MCC_948
DCFC I4017T: ; ZQQQQQQQ NRPPQQQQ
DCFC 08 00 70 DB T_VV2, 00000000B, 01110000B
DCFF 24 45 DB T_NAP, DIL16
DD01 1B 84 C8 DB T_W12, 10000100B, 11001000B
PROGRAM IOT MACRO-80 3.44 09-Dec-81 PAGE 1-288
DD04 1B 84 88 DB T_W12, 10000100B, 10001000B
DD07 1B 82 A8 DB T_W12, 10000010B, 10101000B
DD0A 1A 88 DB T_w2, 10001000B
DD0C 1B 88 A8 DB T_W12, 10001000B, 10101000B
DD0F 1A 88 DB T_w2, 10001000B
DD11 1B C0 A8 DB T_W12, 11000000B, 10101000B
DD14 1A 88 DB T_w2, 10001000B
DD16 1B 80 AA DB T_W12, 10000000B, 10101010B
DD19 1A 8A DB T_w2, 10001010B
DD1B 1B 81 A0 DB T_W12, 10000001B, 10100000B
DD1E 1A 80 DB T_w2, 10000000B
DD20 1B 90 A0 DB T_W12, 10010000B, 10100000B
DD23 1A 80 DB T_w2, 10000000B
DD25 1B A0 A0 DB T_W12, 10100000B, 10100000B
DD28 1A 80 DB T_w2, 10000000B
DD2A 1B 80 A1 DB T_W12, 10000000B, 10100001B
DD2D 1A 81 DB T_w2, 10000001B
DD2F 1B 80 A4 DB T_W12, 10000000B, 10100100B
DD32 1A B4 DB T_w2, 10110100B
DD34 1B 84 A8 DB T_W12, 10000100B, 10101000B
DD37 1A B8 DB T_w2, 10111000B
DD39 1B 82 A8 DB T_W12, 10000010B, 10101000B
DD3C 1A B8 DB T_w2, 10111000B
DD3E 1B 88 A8 DB T_W12, 10001000B, 10101000B
DD41 1A B8 DB T_w2, 10111000B
DD43 1B C0 A8 DB T_W12, 11000000B, 10101000B
DD46 1A B8 DB T_w2, 10111000B
DD48 1B 80 AA DB T_W12, 10000000B, 10101010B
DD4B 1A BA DB T_w2, 10111010B
DD4D 1B 81 A0 DB T_W12, 10000001B, 10100000B
DD50 1A B0 DB T_w2, 10110000B
DD52 1B 90 A0 DB T_W12, 10010000B, 10100000B
DD55 1A B0 DB T_w2, 10110000B
DD57 1B A0 A0 DB T_W12, 10100000B, 10100000B
DD5A 1A B0 DB T_w2, 10110000B
DD5C 1B 80 A1 DB T_W12, 10000000B, 10100001B
DD5F 1A B1 DB T_w2, 10110001B
DD61 1B 80 A4 DB T_W12, 10000000B, 10100100B
DD64 1A B4 DB T_w2, 10110100B
DD66 1B 84 A8 DB T_W12, 10000100B, 10101000B
DD69 FE DB T_KONEC
;14bit. BIN citac (Q0,Q3-Q13)
; 111 1 _
;4020 3645321 0978MC0
DD6A I4020T: ; ZQQQQQQQ NQQQQRPQ
DD6A 08 00 06 DB T_VV2, 00000000B, 00000110B
DD6D 24 45 DB T_NAP, DIL16
DD6F 1B 80 84 DB T_W12, 10000000B, 10000100B
DD72 1B 80 80 DB T_W12, 10000000B, 10000000B ;0
DD75 1A 82 DB T_W2, 10000010B
DD77 1B 80 81 DB T_W12, 10000000B, 10000001B ;1
DD7A 1A 83 DB T_W2, 10000011B
DD7C 1B 80 80 DB T_W12, 10000000B, 10000000B ;2
DD7F 1A 82 DB T_W2, 10000010B
DD81 1B 80 81 DB T_W12, 10000000B, 10000001B ;3
PROGRAM IOT MACRO-80 3.44 09-Dec-81 PAGE 1-289
DD84 1A 83 DB T_W2, 10000011B
DD86 1B 80 80 DB T_W12, 10000000B, 10000000B ;4
DD89 1A 82 DB T_W2, 10000010B
DD8B 1B 80 81 DB T_W12, 10000000B, 10000001B ;5
DD8E 1A 83 DB T_W2, 10000011B
DD90 1B 80 80 DB T_W12, 10000000B, 10000000B ;6
DD93 1A 82 DB T_W2, 10000010B
DD95 1B 80 81 DB T_W12, 10000000B, 10000001B ;7
DD98 1A 83 DB T_W2, 10000011B
DD9A 1B C0 80 DB T_W12, 11000000B, 10000000B ;8
DD9D 1A 82 DB T_W2, 10000010B
DD9F 21 DB T_GOSUB
DDA0 DE38 DW G4020T
DDA2 03 90 82 DB T_I12, 10010000B, 10000010B ;16
DDA5 21 DB T_GOSUB
DDA6 DE38 DW G4020T
DDA8 03 D0 82 DB T_I12, 11010000B, 10000010B ;24
DDAB 21 DB T_GOSUB
DDAC DE38 DW G4020T
DDAE 03 88 82 DB T_I12, 10001000B, 10000010B ;32
DDB1 21 DB T_GOSUB
DDB2 DE38 DW G4020T
DDB4 03 C8 82 DB T_I12, 11001000B, 10000010B ;40
DDB7 21 DB T_GOSUB
DDB8 DE38 DW G4020T
DDBA 03 98 82 DB T_I12, 10011000B, 10000010B ;48
DDBD 21 DB T_GOSUB
DDBE DE38 DW G4020T
DDC0 03 D8 82 DB T_I12, 11011000B, 10000010B ;56
DDC3 21 DB T_GOSUB
DDC4 DE38 DW G4020T
DDC6 03 A0 82 DB T_I12, 10100000B, 10000010B ;64
DDC9 23 DB T_PROG
DDCA DE6B DW G4020TA
DDCC 03 80 92 DB T_I12, 10000000B, 10010010B ;128
DDCF 23 DB T_PROG
DDD0 DE6B DW G4020TA
DDD2 03 A0 92 DB T_I12, 10100000B, 10010010B ;192
DDD5 23 DB T_PROG
DDD6 DE6B DW G4020TA
DDD8 03 80 8A DB T_I12, 10000000B, 10001010B ;256
DDDB 23 DB T_PROG
DDDC DE6B DW G4020TA
DDDE 03 A0 8A DB T_I12, 10100000B, 10001010B ;320
DDE1 23 DB T_PROG
DDE2 DE6B DW G4020TA
DDE4 03 80 9A DB T_I12, 10000000B, 10011010B ;384
DDE7 23 DB T_PROG
DDE8 DE6B DW G4020TA
DDEA 03 A0 9A DB T_I12, 10100000B, 10011010B ;448
DDED 23 DB T_PROG
DDEE DE6B DW G4020TA
DDF0 03 80 A2 DB T_I12, 10000000B, 10100010B ;512
DDF3 23 DB T_PROG
DDF4 DE65 DW G4020TC
DDF6 03 80 C2 DB T_I12, 10000000B, 11000010B ;1024
PROGRAM IOT MACRO-80 3.44 09-Dec-81 PAGE 1-290
DDF9 23 DB T_PROG
DDFA DE65 DW G4020TC
DDFC 03 80 E2 DB T_I12, 10000000B, 11100010B ;1536
DDFF 23 DB T_PROG
DE00 DE65 DW G4020TC
DE02 03 81 82 DB T_I12, 10000001B, 10000010B ;2048
DE05 23 DB T_PROG
DE06 DE65 DW G4020TC
DE08 03 81 A2 DB T_I12, 10000001B, 10100010B ;2560
DE0B 23 DB T_PROG
DE0C DE65 DW G4020TC
DE0E 03 81 C2 DB T_I12, 10000001B, 11000010B ;3072
DE11 23 DB T_PROG
DE12 DE65 DW G4020TC
DE14 03 81 E2 DB T_I12, 10000001B, 11100010B ;3584
DE17 23 DB T_PROG
DE18 DE65 DW G4020TC
DE1A 03 82 82 DB T_I12, 10000010B, 10000010B ;4096
DE1D 23 DB T_PROG
DE1E DE5F DW G4020TD
DE20 03 84 82 DB T_I12, 10000100B, 10000010B ;8192
DE23 23 DB T_PROG
DE24 DE5F DW G4020TD
DE26 03 86 82 DB T_I12, 10000110B, 10000010B ;12288
DE29 23 DB T_PROG
DE2A DE59 DW G4020TE
DE2C 03 FF FB DB T_I12, 11111111B, 11111011B ;16383
DE2F 1B 80 80 DB T_W12, 10000000B, 10000000B ;0
DE32 1A 82 DB T_w2, 10000010B
DE34 1B 80 81 DB T_W12, 10000000B, 10000001B ;1
DE37 FE DB T_KONEC
;UDELA 8 PULZU
DE38 1A 81 G4020T: DB T_W2, 10000001B ;1
DE3A 1A 83 DB T_W2, 10000011B
DE3C 1A 80 DB T_W2, 10000000B ;2
DE3E 1A 82 DB T_W2, 10000010B
DE40 1A 81 DB T_W2, 10000001B ;3
DE42 1A 83 DB T_W2, 10000011B
DE44 1A 80 DB T_W2, 10000000B ;4
DE46 1A 82 DB T_W2, 10000010B
DE48 1A 81 DB T_W2, 10000001B ;5
DE4A 1A 83 DB T_W2, 10000011B
DE4C 1A 80 DB T_W2, 10000000B ;6
DE4E 1A 82 DB T_W2, 10000010B
DE50 1A 81 DB T_W2, 10000001B ;7
DE52 1A 83 DB T_W2, 10000011B
DE54 0A 80 DB T_O2, 10000000B ;8
DE56 0A 82 DB T_O2, 10000010B
DE58 22 DB T_RET
;POKRACUJE TEST PONOCI PROGAMU VE TROJOVEM KODU
DE59 01 0FFF G4020TE:LXI B,4095 ;POCET PULZU
DE5C C3 DE6E JMP G4020TB
DE5F 01 1000 G4020TD:LXI B,4096 ;POCET PULZU
DE62 C3 DE6E JMP G4020TB
DE65 01 0200 G4020TC:LXI B,512 ;POCET PULZU
PROGRAM IOT MACRO-80 3.44 09-Dec-81 PAGE 1-291
DE68 C3 DE6E JMP G4020TB
DE6B 01 0040 G4020TA:LXI B,64 ;POCET PULZU
DE6E 3E 80 G4020TB:MVI A,10000000B
DE70 D3 39 OUT PORT2 ;CP NA 0
DE72 0B DCX B ;POCITADLO -1
DE73 79 MOV A,C ; DO <A>
DE74 F5 PUSH PSW ;TROCHU NATAHUJEME CAS
DE75 3E 82 MVI A,10000010B
DE77 D3 39 OUT PORT2 ;CP NA 1
DE79 F1 POP PSW ;TROCHU NATAHUJEME CAS
DE7A B0 ORA B
DE7B C2 DE6E JNZ G4020TB ;POKUT NENI 0 TAK DALSI
DE7E C9 RET ;NAVRAT ZE STROJOVEHO KODU
;8bit. posuv. reg. s par. a ser. vstupem, ser. vystup(Q5-7)
;4021 0123757 6546DCP
DE7F I4021T: ; ZPPPPQQP NPPPQSPL
DE7F 08 79 77 DB T_VV2, 01111001B, 01110111B
DE82 24 45 DB T_NAP, DIL16
DE84 1B AA A1 DB T_W12, 10101010B, 10100001B
DE87 1B D5 D9 DB T_W12, 11010101B, 11011001B
DE8A 1B D5 D8 DB T_W12, 11010101B, 11011000B ;10101011
DE8D 1B 86 A2 DB T_W12, 10000110B, 10100010B ;01010101
DE90 1A A0 DB T_W2, 10100000B
DE92 1B 98 DA DB T_W12, 10011000B, 11011010B ;00101010
DE95 1A DC DB T_W2, 11011100B
DE97 1B 86 E6 DB T_W12, 10000110B, 11100110B ;10010101
DE9A 1A E4 DB T_W2, 11100100B
DE9C 1B A0 BE DB T_W12, 10100000B, 10111110B ;11001010
DE9F 1A B8 DB T_W2, 10111000B
DEA1 1B 96 F2 DB T_W12, 10010110B, 11110010B ;01100101
DEA4 1A F4 DB T_W2, 11110100B
DEA6 1B A8 8E DB T_W12, 10101000B, 10001110B ;10110010
DEA9 1A 88 DB T_W2, 10001000B
DEAB 1B C4 C2 DB T_W12, 11000100B, 11000010B ;01011001
DEAE 1A C4 DB T_W2, 11000100B
DEB0 1B 8A A6 DB T_W12, 10001010B, 10100110B ;10101100
DEB3 1A A0 DB T_W2, 10100000B
DEB5 1B A2 9A DB T_W12, 10100010B, 10011010B ;01010110
DEB8 1A 9C DB T_W2, 10011100B
DEBA 1B CC BE DB T_W12, 11001100B, 10111110B ;10101011
DEBD 1A B8 DB T_W2, 10111000B
DEBF 1B B6 E2 DB T_W12, 10110110B, 11100010B ;01010101
DEC2 1A E4 DB T_W2, 11100100B
DEC4 1B F8 8E DB T_W12, 11111000B, 10001110B ;10101010
DEC7 FE DB T_KONEC
;3x 3NAND
;2023 111122 333322
DEC8 I4023T: ; ZYCBABAX XNCBAYYC
DEC8 08 3E 39 DB T_VV2, 00111110B, 00111001B
DECB 24 44 DB T_NAP, DIL14
DECD 1B C7 E5 DB T_W12, 11000111B, 11100101B
DED0 1B E1 EF DB T_W12, 11100001B, 11101111B
DED3 1B D5 F7 DB T_W12, 11010101B, 11110111B
DED6 1B F3 FB DB T_W12, 11110011B, 11111011B
PROGRAM IOT MACRO-80 3.44 09-Dec-81 PAGE 1-292
DED9 1B CF C6 DB T_W12, 11001111B, 11000110B
DEDC 1B E9 CE DB T_W12, 11101001B, 11001110B
DEDF 1B DD D6 DB T_W12, 11011101B, 11010110B
DEE2 1B BB DE DB T_W12, 10111011B, 11011110B
DEE5 FE DB T_KONEC
;7bit. BIN citac _
;4024 3456MC N01N2N
DEE6 I4024T: ; ZQQQQRPX XNCQQCQC
DEE6 25 01 A1 DB T_NZ2, 00000001B, 10100001B
DEE9 08 06 00 DB T_VV2, 00000110B, 00000000B
DEEC 24 44 DB T_NAP, DIL14
DEEE 1B 87 E5 DB T_W12, 10000111B, 11100101B ;RES
DEF1 1B 83 E5 DB T_W12, 10000011B, 11100101B
DEF4 1B 81 F5 DB T_W12, 10000001B, 11110101B ;1
DEF7 19 83 DB T_W1, 10000011B
DEF9 1B 81 ED DB T_W12, 10000001B, 11101101B ;2
DEFC 19 83 DB T_W1, 10000011B
DEFE 1B 81 FD DB T_W12, 10000001B, 11111101B ;3
DF01 19 83 DB T_W1, 10000011B
DF03 1B 81 E7 DB T_W12, 10000001B, 11100111B ;4
DF06 19 83 DB T_W1, 10000011B
DF08 1B 81 F7 DB T_W12, 10000001B, 11110111B ;5
DF0B 19 83 DB T_W1, 10000011B
DF0D 1B 81 EF DB T_W12, 10000001B, 11101111B ;6
DF10 19 83 DB T_W1, 10000011B
DF12 1B 81 FF DB T_W12, 10000001B, 11111111B ;7
DF15 19 83 DB T_W1, 10000011B
DF17 1B C1 E5 DB T_W12, 11000001B, 11100101B ;8
DF1A 19 C3 DB T_W1, 11000011B
DF1C 1B C1 F5 DB T_W12, 11000001B, 11110101B ;9
DF1F 19 C3 DB T_W1, 11000011B
DF21 1B C1 ED DB T_W12, 11000001B, 11101101B ;10
DF24 19 C3 DB T_W1, 11000011B
DF26 1B C1 FD DB T_W12, 11000001B, 11111101B ;11
DF29 19 C3 DB T_W1, 11000011B
DF2B 1B C1 E7 DB T_W12, 11000001B, 11100111B ;12
DF2E 19 C3 DB T_W1, 11000011B
DF30 1B C1 F7 DB T_W12, 11000001B, 11110111B ;13
DF33 19 C3 DB T_W1, 11000011B
DF35 1B C1 EF DB T_W12, 11000001B, 11101111B ;14
DF38 19 C3 DB T_W1, 11000011B
DF3A 1B C1 FF DB T_W12, 11000001B, 11111111B ;15
DF3D 19 C3 DB T_W1, 11000011B
DF3F 1B A1 E5 DB T_W12, 10100001B, 11100101B ;16
DF42 21 DB T_GOSUB
DF43 DF77 DW G4024TA
DF45 1B 91 E5 DB T_W12, 10010001B, 11100101B ;32
DF48 21 DB T_GOSUB
DF49 DF77 DW G4024TA
DF4B 1B B1 E5 DB T_W12, 10110001B, 11100101B ;48
DF4E 21 DB T_GOSUB
DF4F DF77 DW G4024TA
DF51 1B 89 E5 DB T_W12, 10001001B, 11100101B ;64
DF54 21 DB T_GOSUB
DF55 DF77 DW G4024TA
PROGRAM IOT MACRO-80 3.44 09-Dec-81 PAGE 1-293
DF57 1B A9 E5 DB T_W12, 10101001B, 11100101B ;80
DF5A 21 DB T_GOSUB
DF5B DF77 DW G4024TA
DF5D 1B 99 E5 DB T_W12, 10011001B, 11100101B ;96
DF60 21 DB T_GOSUB
DF61 DF77 DW G4024TA
DF63 1B B9 E5 DB T_W12, 10111001B, 11100101B ;112
DF66 21 DB T_GOSUB
DF67 DF7B DW G4024TB
DF69 1B F9 FF DB T_W12, 11111001B, 11111111B ;127
DF6C 19 FB DB T_W1, 11111011B
DF6E 1B 81 E5 DB T_W12, 10000001B, 11100101B ;0
DF71 19 83 DB T_W1, 10000011B
DF73 1B 81 F5 DB T_W12, 10000001B, 11110101B ;1
DF76 FE DB T_KONEC
;UDELA 16 PULZU
DF77 09 83 G4024TA:DB T_O1, 10000011B
DF79 09 81 DB T_O1, 10000001B ;1
DF7B 09 83 G4024TB:DB T_O1, 10000011B
DF7D 09 81 DB T_O1, 10000001B ;2
DF7F 09 83 DB T_O1, 10000011B
DF81 09 81 DB T_O1, 10000001B ;3
DF83 09 83 DB T_O1, 10000011B
DF85 09 81 DB T_O1, 10000001B ;4
DF87 09 83 DB T_O1, 10000011B
DF89 09 81 DB T_O1, 10000001B ;5
DF8B 09 83 DB T_O1, 10000011B
DF8D 09 81 DB T_O1, 10000001B ;6
DF8F 09 83 DB T_O1, 10000011B
DF91 09 81 DB T_O1, 10000001B ;7
DF93 09 83 DB T_O1, 10000011B
DF95 09 81 DB T_O1, 10000001B ;8
DF97 09 83 DB T_O1, 10000011B
DF99 09 81 DB T_O1, 10000001B ;9
DF9B 09 83 DB T_O1, 10000011B
DF9D 09 81 DB T_O1, 10000001B ;10
DF9F 09 83 DB T_O1, 10000011B
DFA1 09 81 DB T_O1, 10000001B ;11
DFA3 09 83 DB T_O1, 10000011B
DFA5 09 81 DB T_O1, 10000001B ;12
DFA7 09 83 DB T_O1, 10000011B
DFA9 09 81 DB T_O1, 10000001B ;13
DFAB 09 83 DB T_O1, 10000011B
DFAD 09 81 DB T_O1, 10000001B ;14
DFAF 09 83 DB T_O1, 10000011B
DFB1 09 81 DB T_O1, 10000001B ;15
DFB3 09 83 DB T_O1, 10000011B
DFB5 09 81 DB T_O1, 10000001B ;16
DFB7 22 DB T_RET
;3x 3NOR
;4025 111122 333322
DFB8 I4025T: ; ZYCBABAX XNCBAYYC
DFB8 08 3E 39 DB T_VV2, 00111110B, 00111001B
DFBB 24 44 DB T_NAP, DIL14
PROGRAM IOT MACRO-80 3.44 09-Dec-81 PAGE 1-294
DFBD 1B C7 E1 DB T_W12, 11000111B, 11100001B
DFC0 1B A1 E9 DB T_W12, 10100001B, 11101001B
DFC3 1B 95 F1 DB T_W12, 10010101B, 11110001B
DFC6 1B B3 F9 DB T_W12, 10110011B, 11111001B
DFC9 1B 8F C4 DB T_W12, 10001111B, 11000100B
DFCC 1B A9 CA DB T_W12, 10101001B, 11001010B
DFCF 1B 9D D0 DB T_W12, 10011101B, 11010000B
DFD2 1B BB D8 DB T_W12, 10111011B, 11011000B
DFD5 FE DB T_KONEC
;2x K.O. J-K s SR
;4027 C_ _P
DFD6 I4027T: ; ZSJKRPQQ NQQCRKJS
DFD6 08 7C 1F DB T_VV2, 01111100B, 00011111B
DFD9 24 45 DB T_NAP, DIL16
DFDB 1B D5 AA DB T_W12, 11010101B, 10101010B
DFDE 1B EB FB DB T_W12, 11101011B, 11111011B
DFE1 1B AA D5 DB T_W12, 10101010B, 11010101B
DFE4 1B 82 C6 DB T_W12, 10000010B, 11000110B
DFE7 1B 86 B6 DB T_W12, 10000110B, 10110110B
DFEA 1B A2 A2 DB T_W12, 10100010B, 10100010B
DFED 1B A5 D2 DB T_W12, 10100101B, 11010010B
DFF0 1B 91 C4 DB T_W12, 10010001B, 11000100B
DFF3 1B 96 B4 DB T_W12, 10010110B, 10110100B
DFF6 1B B2 A0 DB T_W12, 10110010B, 10100000B
DFF9 1B B5 B0 DB T_W12, 10110101B, 10110000B
DFFC FE DB T_KONEC
;4bit dekoder 1 z 10
;4028 6597024 3112308
DFFD I4028T: ; ZQQQQQQQ NQQAAAAQ
DFFD 08 00 1E DB T_VV2, 00000000B, 00011110B
E000 24 45 DB T_NAP, DIL16
E002 1B 84 80 DB T_W12, 10000100B, 10000000B ;0
E005 1B 80 A2 DB T_W12, 10000000B, 10100010B ;1
E008 1B 82 90 DB T_W12, 10000010B, 10010000B ;2
E00B 1B 80 D2 DB T_W12, 10000000B, 11010010B ;3
E00E 1B 81 88 DB T_W12, 10000001B, 10001000B ;4
E011 1B A0 8A DB T_W12, 10100000B, 10001010B ;5
E014 1B C0 98 DB T_W12, 11000000B, 10011000B ;6
E017 1B 88 9A DB T_W12, 10001000B, 10011010B ;7
E01A 1B 80 85 DB T_W12, 10000000B, 10000101B ;8
E01D 1B 90 86 DB T_W12, 10010000B, 10000110B ;9
E020 1B 80 95 DB T_W12, 10000000B, 10010101B ;10
E023 1B 90 96 DB T_W12, 10010000B, 10010110B ;11
E026 1B 80 8D DB T_W12, 10000000B, 10001101B ;12
E029 1B 90 8E DB T_W12, 10010000B, 10001110B ;13
E02C 1B 80 9D DB T_W12, 10000000B, 10011101B ;14
E02F 1B 90 9E DB T_W12, 10010000B, 10011110B ;15
E032 FE DB T_KONEC
;4bit BIN/BCD sync. vrat. citac _
; D
; _E
; DC
PROGRAM IOT MACRO-80 3.44 09-Dec-81 PAGE 1-295
; N/
; _ _ /B
;4029 T0C033P C2211UI
E033 I4029T: ; ZCQEPPQL NPQPPQPN
E033 08 1D 5B DB T_VV2, 00011101B, 01011011B
E036 24 45 DB T_NAP, DIL16
E038 0B D6 B3 DB T_O12, 11010110B, 10110011B
E03B 1B D7 B3 DB T_W12, 11010111B, 10110011B
E03E 1B DA AB DB T_W12, 11011010B, 10101011B
E041 1B F9 8F DB T_W12, 11111001B, 10001111B
E044 1B F0 87 DB T_W12, 11110000B, 10000111B
E047 1B C1 83 DB T_W12, 11000001B, 10000011B ;0
E04A 1A 83 DB T_W2, 10000011B
E04C 1B E0 C3 DB T_W12, 11100000B, 11000011B ;1
E04F 1A 83 DB T_W2, 10000011B
E051 1B C0 C7 DB T_W12, 11000000B, 11000111B ;2
E054 1A 87 DB T_W2, 10000111B
E056 1B E0 C7 DB T_W12, 11100000B, 11000111B ;3
E059 1A 87 DB T_W2, 10000111B
E05B 1B C0 E3 DB T_W12, 11000000B, 11100011B ;4
E05E 1A A3 DB T_W2, 10100011B
E060 1B E0 E3 DB T_W12, 11100000B, 11100011B ;5
E063 1A A3 DB T_W2, 10100011B
E065 1B C0 E7 DB T_W12, 11000000B, 11100111B ;6
E068 1A A7 DB T_W2, 10100111B
E06A 1B E0 E7 DB T_W12, 11100000B, 11100111B ;7
E06D 1A A7 DB T_W2, 10100111B
E06F 1B C2 C3 DB T_W12, 11000010B, 11000011B ;8
E072 1A 83 DB T_W2, 10000011B
E074 1B E2 C3 DB T_W12, 11100010B, 11000011B ;9
E077 1A 83 DB T_W2, 10000011B
E079 1B C2 C7 DB T_W12, 11000010B, 11000111B ;10
E07C 1A 87 DB T_W2, 10000111B
E07E 1B E2 C7 DB T_W12, 11100010B, 11000111B ;11
E081 1A 87 DB T_W2, 10000111B
E083 1B C2 E3 DB T_W12, 11000010B, 11100011B ;12
E086 1A A3 DB T_W2, 10100011B
E088 1B E2 E3 DB T_W12, 11100010B, 11100011B ;13
E08B 1A A3 DB T_W2, 10100011B
E08D 1B C2 E7 DB T_W12, 11000010B, 11100111B ;14
E090 1A A7 DB T_W2, 10100111B
E092 1B A2 E7 DB T_W12, 10100010B, 11100111B ;15
E095 1A A7 DB T_W2, 10100111B
E097 1B C0 C3 DB T_W12, 11000000B, 11000011B ;0
E09A 1A 83 DB T_W2, 10000011B
E09C 1B E0 C3 DB T_W12, 11100000B, 11000011B ;1
E09F 1A 81 DB T_W2, 10000001B
E0A1 1B 80 C1 DB T_W12, 10000000B, 11000001B ;0
E0A4 1A 81 DB T_W2, 10000001B
E0A6 1B E2 E5 DB T_W12, 11100010B, 11100101B ;15
E0A9 1A A5 DB T_W2, 10100101B
E0AB 1B C2 E5 DB T_W12, 11000010B, 11100101B ;14
E0AE 1A A5 DB T_W2, 10100101B
E0B0 1B E2 E1 DB T_W12, 11100010B, 11100001B ;13
E0B3 1A A1 DB T_W2, 10100001B
E0B5 1B C2 E1 DB T_W12, 11000010B, 11100001B ;12
PROGRAM IOT MACRO-80 3.44 09-Dec-81 PAGE 1-296
E0B8 1A A1 DB T_W2, 10100001B
E0BA 1B E2 C5 DB T_W12, 11100010B, 11000101B ;11
E0BD 1A 85 DB T_W2, 10000101B
E0BF 1B C2 C5 DB T_W12, 11000010B, 11000101B ;10
E0C2 1A 85 DB T_W2, 10000101B
E0C4 1B E2 C1 DB T_W12, 11100010B, 11000001B ;9
E0C7 1A 80 DB T_W2, 10000000B
E0C9 1B C2 C0 DB T_W12, 11000010B, 11000000B ;8
E0CC 1A 82 DB T_W2, 10000010B
E0CE 1B A2 C2 DB T_W12, 10100010B, 11000010B ;9
E0D1 1A 82 DB T_W2, 10000010B
E0D3 1B C0 C2 DB T_W12, 11000000B, 11000010B ;0
E0D6 1A 82 DB T_W2, 10000010B
E0D8 1B E0 C2 DB T_W12, 11100000B, 11000010B ;1
E0DB 1A 80 DB T_W2, 10000000B
E0DD 1B 80 C0 DB T_W12, 10000000B, 11000000B ;0
E0E0 0A 80 G4029T: DB T_O2, 10000000B
E0E2 1B E2 C0 DB T_W12, 11100010B, 11000000B ;9
E0E5 1A 80 DB T_W2, 10000000B
E0E7 1B C2 C0 DB T_W12, 11000010B, 11000000B ;8
E0EA 1A 80 DB T_W2, 10000000B
E0EC 1B E0 E4 DB T_W12, 11100000B, 11100100B ;7
E0EF 1A A4 DB T_W2, 10100100B
E0F1 1B C0 E4 DB T_W12, 11000000B, 11100100B ;6
E0F4 1A A4 DB T_W2, 10100100B
E0F6 1B E0 E0 DB T_W12, 11100000B, 11100000B ;5
E0F9 1A A0 DB T_W2, 10100000B
E0FB 1B C0 E0 DB T_W12, 11000000B, 11100000B ;4
E0FE 1A A0 DB T_W2, 10100000B
E100 1B E0 C4 DB T_W12, 11100000B, 11000100B ;3
E103 1A 84 DB T_W2, 10000100B
E105 1B C0 C4 DB T_W12, 11000000B, 11000100B ;2
E108 1A 84 DB T_W2, 10000100B
E10A 1B E0 C0 DB T_W12, 11100000B, 11000000B ;1
E10D 1A 80 DB T_W2, 10000000B
E10F 1B 80 C0 DB T_W12, 10000000B, 11000000B ;0
E112 FE DB T_KONEC
;4x 2EX-OR
;4030, 4070, 4507 222111 444333
E113 I4030T: ; ZABYYBAX XNABYYBA
E113 08 66 33 DB T_VV2, 01100110B, 00110011B
E116 24 44 DB T_NAP, DIL14
E118 1B 8B EB DB T_W12, 10001011B, 11101011B
E11B 1B BD F5 DB T_W12, 10111101B, 11110101B
E11E 1B D7 C6 DB T_W12, 11010111B, 11000110B
E121 1B E1 D8 DB T_W12, 11100001B, 11011000B
E124 FE DB T_KONEC
;3x ser. scitacka 1 2 3
; _ _ _
; I I I
;4032 NCN2CN3 3322111
E125 I4032T: ; ZVRVSPVS NABABBAS
E125 08 76 7E DB T_VV2, 01110110B, 01111110B
E128 24 45 DB T_NAP, DIL16
PROGRAM IOT MACRO-80 3.44 09-Dec-81 PAGE 1-297
E12A 0B A4 80 DB T_O12, 10100100B, 10000000B
E12D 09 A0 DB T_O1, 10100000B
E12F 09 A4 DB T_O1, 10100100B
E131 1B A0 80 DB T_W12, 10100000B, 10000000B
E134 1B 94 88 DB T_W12, 10010100B, 10001000B
E137 1B 90 88 DB T_W12, 10010000B, 10001000B
E13A 1B 9D BB DB T_W12, 10011101B, 10111011B
E13D 1B 99 BB DB T_W12, 10011001B, 10111011B
E140 1B 9D D5 DB T_W12, 10011101B, 11010101B
E143 1B 99 D5 DB T_W12, 10011001B, 11010101B
E146 1B 95 DD DB T_W12, 10010101B, 11011101B
E149 1B 91 DD DB T_W12, 10010001B, 11011101B
E14C 1B 9C EE DB T_W12, 10011100B, 11101110B
E14F 1B 98 EE DB T_W12, 10011000B, 11101110B
E152 1B 95 E7 DB T_W12, 10010101B, 11100111B
E155 1B 91 E7 DB T_W12, 10010001B, 11100111B
E158 1B 9D 99 DB T_W12, 10011101B, 10011001B
E15B 1B 99 99 DB T_W12, 10011001B, 10011001B
E15E 1B 94 98 DB T_W12, 10010100B, 10011000B
E161 1B 90 98 DB T_W12, 10010000B, 10011000B
E164 1B C7 89 DB T_W12, 11000111B, 10001001B
E167 1B C3 89 DB T_W12, 11000011B, 10001001B
E16A 1B CE BA DB T_W12, 11001110B, 10111010B
E16D 1B CA BA DB T_W12, 11001010B, 10111010B
E170 1B C6 D4 DB T_W12, 11000110B, 11010100B
E173 1B C2 D4 DB T_W12, 11000010B, 11010100B
E176 1B CE DC DB T_W12, 11001110B, 11011100B
E179 1B CA DC DB T_W12, 11001010B, 11011100B
E17C 1B C7 EF DB T_W12, 11000111B, 11101111B
E17F 1B C3 EF DB T_W12, 11000011B, 11101111B
E182 1B CE E6 DB T_W12, 11001110B, 11100110B
E185 1B CA E6 DB T_W12, 11001010B, 11100110B
E188 1B C6 98 DB T_W12, 11000110B, 10011000B
E18B 1B C2 98 DB T_W12, 11000010B, 10011000B
E18E 1B CF 99 DB T_W12, 11001111B, 10011001B
E191 1B CB 99 DB T_W12, 11001011B, 10011001B
E194 FE DB T_KONEC
;8bit obosmerny posuv. R se ser. a par. VV
; P AP
;4034 /DP0123 43210C// 7654567
E195 I4034T: ; ZQSEQQQQ PPPPPPSS NPPPQQQQ
E195 10 70 FF 70 DB T_VV3, 01110000B, 11111111B, 01110000B ;Q - VYSTUP, P - VSTUP
E199 24 47 DB T_NAP, DIL24
E19B 1F D5 57 D5 DB T_W123, 11010101B, 01010111B, 11010101B ;PARARELNI ASYNCHRONI P -> Q
E19F 1F C5 57 D5 DB T_W123, 11000101B, 01010111B, 11010101B
E1A3 1F FA AB AA DB T_W123, 11111010B, 10101011B, 10101010B
E1A7 1F EA AB AA DB T_W123, 11101010B, 10101011B, 10101010B
E1AB 0A A9 DB T_O2, 10101001B ;PARARELNI SYNCHRONI P -> Q
E1AD 1F DA 51 DA DB T_W123, 11011010B, 01010001B, 11011010B
E1B1 1F CA 51 DA DB T_W123, 11001010B, 01010001B, 11011010B
E1B5 1F D5 55 D5 DB T_W123, 11010101B, 01010101B, 11010101B
E1B9 1F C5 55 D5 DB T_W123, 11000101B, 01010101B, 11010101B
E1BD 1F F5 A9 A5 DB T_W123, 11110101B, 10101001B, 10100101B
E1C1 1F E5 A9 A5 DB T_W123, 11100101B, 10101001B, 10100101B
E1C5 1F FA AD AA DB T_W123, 11111010B, 10101101B, 10101010B
PROGRAM IOT MACRO-80 3.44 09-Dec-81 PAGE 1-298
E1C9 1F EA AD AA DB T_W123, 11101010B, 10101101B, 10101010B
E1CD 0A A8 DB T_O2, 10101000B ;SERIOVY SYNCHRONI DS -> Q
E1CF 1F FD AC A5 DB T_W123, 11111101B, 10101100B, 10100101B
E1D3 1F CD A8 A5 DB T_W123, 11001101B, 10101000B, 10100101B
E1D7 1F C6 AC AA DB T_W123, 11000110B, 10101100B, 10101010B
E1DB 1F E6 A8 AA DB T_W123, 11100110B, 10101000B, 10101010B
E1DF 1F EB AC A5 DB T_W123, 11101011B, 10101100B, 10100101B
E1E3 1F DB A8 A5 DB T_W123, 11011011B, 10101000B, 10100101B
E1E7 1F C5 AC AA DB T_W123, 11000101B, 10101100B, 10101010B
E1EB 1F E5 A8 AA DB T_W123, 11100101B, 10101000B, 10101010B
E1EF 1F EA AC AD DB T_W123, 11101010B, 10101100B, 10101101B
E1F3 1F CA A8 AD DB T_W123, 11001010B, 10101000B, 10101101B
E1F7 1F D5 AC A6 DB T_W123, 11010101B, 10101100B, 10100110B
E1FB 1F E5 A8 A6 DB T_W123, 11100101B, 10101000B, 10100110B
E1FF 1F EA AC AB DB T_W123, 11101010B, 10101100B, 10101011B
E203 1F CA A8 AB DB T_W123, 11001010B, 10101000B, 10101011B
E207 1F C5 AC A5 DB T_W123, 11000101B, 10101100B, 10100101B
E20B 1F F5 A8 A5 DB T_W123, 11110101B, 10101000B, 10100101B
E20F 10 7F 07 0F DB T_VV3, 01111111B, 00000111B, 00001111B ;P - VYSTUP, Q - VSTUP
E213 1F 95 57 D5 DB T_W123, 10010101B, 01010111B, 11010101B ;PARARELNI ASYNCHRONI Q -> P
E217 1F 85 FF F5 DB T_W123, 10000101B, 11111111B, 11110101B
E21B 1F BA AB AA DB T_W123, 10111010B, 10101011B, 10101010B
E21F 1F AA FB FA DB T_W123, 10101010B, 11111011B, 11111010B
E223 0A A9 DB T_O2, 10101001B ;PARARELNI SYNCHRONI Q -> P
E225 1F 95 A9 A5 DB T_W123, 10010101B, 10101001B, 10100101B
E229 1F 85 FD F5 DB T_W123, 10000101B, 11111101B, 11110101B
E22D 1F 95 55 D5 DB T_W123, 10010101B, 01010101B, 11010101B
E231 0A 51 DB T_O2, 01010001B
E233 1F 9A 51 DA DB T_W123, 10011010B, 01010001B, 11011010B
E237 1F 9A AD AA DB T_W123, 10011010B, 10101101B, 10101010B
E23B 0A A9 DB T_O2, 10101001B
E23D 1F B5 A9 A5 DB T_W123, 10110101B, 10101001B, 10100101B
E241 1F B5 55 D5 DB T_W123, 10110101B, 01010101B, 11010101B
E245 0A 51 DB T_O2, 01010001B
E247 1F BA 51 DA DB T_W123, 10111010B, 01010001B, 11011010B
E24B 1F AA FD FA DB T_W123, 10101010B, 11111101B, 11111010B
E24F 1F BA AD AA DB T_W123, 10111010B, 10101101B, 10101010B
E253 0B 9A A8 DB T_O12, 10011010B, 10101000B ;SERIOVY SYNCHRONI DS -> P
E256 1F 9A A8 AA DB T_W123, 10011010B, 10101000B, 10101010B
E25A 1F 9A 54 DA DB T_W123, 10011010B, 01010100B, 11011010B
E25E 1F 9A 50 DA DB T_W123, 10011010B, 01010000B, 11011010B
E262 1F 8A FC FA DB T_W123, 10001010B, 11111100B, 11111010B
E266 1F BA A0 AA DB T_W123, 10111010B, 10100000B, 10101010B
E26A 1F AA FC FA DB T_W123, 10101010B, 11111100B, 11111010B
E26E 1F 9A 48 DA DB T_W123, 10011010B, 01001000B, 11011010B
E272 1F 9A 94 AA DB T_W123, 10011010B, 10010100B, 10101010B
E276 1F BA 90 AA DB T_W123, 10111010B, 10010000B, 10101010B
E27A 1F BA 2C DA DB T_W123, 10111010B, 00101100B, 11011010B
E27E 1F 8A F8 FA DB T_W123, 10001010B, 11111000B, 11111010B
E282 1F 9A 54 AA DB T_W123, 10011010B, 01010100B, 10101010B
E286 1F AA F8 FA DB T_W123, 10101010B, 11111000B, 11111010B
E28A 1F BA AC CA DB T_W123, 10111010B, 10101100B, 11001010B
E28E 1F 9A A8 CA DB T_W123, 10011010B, 10101000B, 11001010B
E292 1F 9A 54 9A DB T_W123, 10011010B, 01010100B, 10011010B
E296 1F BA 50 9A DB T_W123, 10111010B, 01010000B, 10011010B
E29A 1F BA AC AA DB T_W123, 10111010B, 10101100B, 10101010B
PROGRAM IOT MACRO-80 3.44 09-Dec-81 PAGE 1-299
E29E FE DB T_KONEC
;4bit posuvny R s par. VV
; T
;4035 PCM _/O 1233210
E29F I4035T: ; NEPRJKCQ NQQQPPPP
E29F 08 7E 0F DB T_VV2, 01111110B, 00001111B
E2A2 24 45 DB T_NAP, DIL16
E2A4 1B 9E 8F DB T_W12, 10011110B, 10001111B
E2A7 1B 9D F0 DB T_W12, 10011101B, 11110000B
E2AA 1B CD FA DB T_W12, 11001101B, 11111010B
E2AD 1B ED AA DB T_W12, 11101101B, 10101010B
E2B0 1B CD A5 DB T_W12, 11001101B, 10100101B
E2B3 1B EC D5 DB T_W12, 11101100B, 11010101B
E2B6 19 8F DB T_W1, 10001111B
E2B8 1B AF D2 DB T_W12, 10101111B, 11010010B
E2BB 19 8F DB T_W1, 10001111B
E2BD 1B AF E9 DB T_W12, 10101111B, 11101001B
E2C0 19 83 DB T_W1, 10000011B
E2C2 1B A2 F3 DB T_W12, 10100010B, 11110011B
E2C5 19 82 DB T_W1, 10000010B
E2C7 1B A2 B7 DB T_W12, 10100010B, 10110111B
E2CA 19 8A DB T_W1, 10001010B
E2CC 1B AB 91 DB T_W12, 10101011B, 10010001B
E2CF 19 8B DB T_W1, 10001011B
E2D1 1B A9 B4 DB T_W12, 10101001B, 10110100B
E2D4 19 8A DB T_W1, 10001010B
E2D6 1B AB A1 DB T_W12, 10101011B, 10100001B
E2D9 19 87 DB T_W1, 10000111B
E2DB 1B A7 D7 DB T_W12, 10100111B, 11010111B
E2DE 19 87 DB T_W1, 10000111B
E2E0 1B A4 9D DB T_W12, 10100100B, 10011101B
E2E3 FE DB T_KONEC
;12bit. BIN citac
; 1 1 _
;4040 1236451 0978MC0
E2E4 I4040T: ; ZQQQQQQQ NQQQQRPQ
E2E4 08 00 06 DB T_VV2, 00000000B, 00000110B
E2E7 24 45 DB T_NAP, DIL16
E2E9 1B 80 84 DB T_W12, 10000000B, 10000100B
E2EC 1B 80 80 DB T_W12, 10000000B, 10000000B
E2EF 1B 80 82 DB T_W12, 10000000B, 10000010B ;0
E2F2 1A 82 DB T_W2, 10000010B
E2F4 1B 80 81 DB T_W12, 10000000B, 10000001B ;1
E2F7 1A 83 DB T_W2, 10000011B
E2F9 1B C0 80 DB T_W12, 11000000B, 10000000B ;2
E2FC 1A 82 DB T_W2, 10000010B
E2FE 1B C0 81 DB T_W12, 11000000B, 10000001B ;3
E301 1A 83 DB T_W2, 10000011B
E303 1B A0 80 DB T_W12, 10100000B, 10000000B ;4
E306 1A 82 DB T_W2, 10000010B
E308 1B A0 81 DB T_W12, 10100000B, 10000001B ;5
E30B 1A 83 DB T_W2, 10000011B
E30D 1B E0 80 DB T_W12, 11100000B, 10000000B ;6
E310 1A 82 DB T_W2, 10000010B
PROGRAM IOT MACRO-80 3.44 09-Dec-81 PAGE 1-300
E312 1B E0 81 DB T_W12, 11100000B, 10000001B ;7
E315 1A 83 DB T_W2, 10000011B
E317 1B 90 80 DB T_W12, 10010000B, 10000000B ;8
E31A 1A 82 DB T_W2, 10000010B
E31C 1B 90 81 DB T_W12, 10010000B, 10000001B ;9
E31F 1A 83 DB T_W2, 10000011B
E321 1B D0 80 DB T_W12, 11010000B, 10000000B ;10
E324 1A 82 DB T_W2, 10000010B
E326 1B D0 81 DB T_W12, 11010000B, 10000001B ;11
E329 1A 83 DB T_W2, 10000011B
E32B 1B B0 80 DB T_W12, 10110000B, 10000000B ;12
E32E 1A 82 DB T_W2, 10000010B
E330 1B B0 81 DB T_W12, 10110000B, 10000001B ;13
E333 1A 83 DB T_W2, 10000011B
E335 1B F0 80 DB T_W12, 11110000B, 10000000B ;14
E338 1A 82 DB T_W2, 10000010B
E33A 1B F0 81 DB T_W12, 11110000B, 10000001B ;15
E33D 1A 83 DB T_W2, 10000011B
E33F 1B 84 80 DB T_W12, 10000100B, 10000000B ;16
E342 21 DB T_GOSUB
E343 E403 DW G4040G
E345 1B 82 80 DB T_W12, 10000010B, 10000000B ;32
E348 21 DB T_GOSUB
E349 E403 DW G4040G
E34B 1B 86 80 DB T_W12, 10000110B, 10000000B ;48
E34E 21 DB T_GOSUB
E34F E403 DW G4040G
E351 1B 88 80 DB T_W12, 10001000B, 10000000B ;64
E354 21 DB T_GOSUB
E355 E403 DW G4040G
E357 1B 8C 80 DB T_W12, 10001100B, 10000000B ;80
E35A 21 DB T_GOSUB
E35B E403 DW G4040G
E35D 1B 8A 80 DB T_W12, 10001010B, 10000000B ;96
E360 21 DB T_GOSUB
E361 E403 DW G4040G
E363 1B 8E 80 DB T_W12, 10001110B, 10000000B ;112
E366 21 DB T_GOSUB
E367 E403 DW G4040G
E369 1B 80 90 DB T_W12, 10000000B, 10010000B ;128
E36C 21 DB T_GOSUB
E36D E403 DW G4040G
E36F 1B 84 90 DB T_W12, 10000100B, 10010000B ;144
E372 21 DB T_GOSUB
E373 E403 DW G4040G
E375 1B 82 90 DB T_W12, 10000010B, 10010000B ;160
E378 21 DB T_GOSUB
E379 E403 DW G4040G
E37B 1B 86 90 DB T_W12, 10000110B, 10010000B ;176
E37E 21 DB T_GOSUB
E37F E403 DW G4040G
E381 1B 88 90 DB T_W12, 10001000B, 10010000B ;192
E384 21 DB T_GOSUB
E385 E403 DW G4040G
E387 1B 8C 90 DB T_W12, 10001100B, 10010000B ;208
E38A 21 DB T_GOSUB
PROGRAM IOT MACRO-80 3.44 09-Dec-81 PAGE 1-301
E38B E403 DW G4040G
E38D 1B 8A 90 DB T_W12, 10001010B, 10010000B ;224
E390 21 DB T_GOSUB
E391 E403 DW G4040G
E393 1B 8E 90 DB T_W12, 10001110B, 10010000B ;240
E396 21 DB T_GOSUB
E397 E403 DW G4040G
E399 1B 80 88 DB T_W12, 10000000B, 10001000B ;256
E39C 1A 8A DB T_W2, 10001010B
E39E 23 DB T_PROG
E39F E448 DW G4040TA
E3A1 1B 80 A2 DB T_W12, 10000000B, 10100010B ;512
E3A4 23 DB T_PROG
E3A5 E448 DW G4040TA
E3A7 1B 80 AA DB T_W12, 10000000B, 10101010B ;768
E3AA 23 DB T_PROG
E3AB E448 DW G4040TA
E3AD 1B 80 C2 DB T_W12, 10000000B, 11000010B ;1024
E3B0 23 DB T_PROG
E3B1 E448 DW G4040TA
E3B3 1B 80 CA DB T_W12, 10000000B, 11001010B ;1280
E3B6 23 DB T_PROG
E3B7 E448 DW G4040TA
E3B9 1B 80 E2 DB T_W12, 10000000B, 11100010B ;1536
E3BC 23 DB T_PROG
E3BD E448 DW G4040TA
E3BF 1B 80 EA DB T_W12, 10000000B, 11101010B ;1792
E3C2 23 DB T_PROG
E3C3 E448 DW G4040TA
E3C5 1B 81 82 DB T_W12, 10000001B, 10000010B ;2078
E3C8 23 DB T_PROG
E3C9 E448 DW G4040TA
E3CB 1B 81 8A DB T_W12, 10000001B, 10001010B ;2304
E3CE 23 DB T_PROG
E3CF E448 DW G4040TA
E3D1 1B 81 A2 DB T_W12, 10000001B, 10100010B ;2560
E3D4 23 DB T_PROG
E3D5 E448 DW G4040TA
E3D7 1B 81 AA DB T_W12, 10000001B, 10101010B ;2816
E3DA 23 DB T_PROG
E3DB E448 DW G4040TA
E3DD 1B 81 C2 DB T_W12, 10000001B, 11000010B ;3072
E3E0 23 DB T_PROG
E3E1 E448 DW G4040TA
E3E3 1B 81 CA DB T_W12, 10000001B, 11001010B ;3328
E3E6 23 DB T_PROG
E3E7 E448 DW G4040TA
E3E9 1B 81 E2 DB T_W12, 10000001B, 11100010B ;3584
E3EC 23 DB T_PROG
E3ED E448 DW G4040TA
E3EF 1B 81 EA DB T_W12, 10000001B, 11101010B ;3840
E3F2 23 DB T_PROG
E3F3 E442 DW G4040TB
E3F5 1B FF FB DB T_W12, 11111111B, 11111011B ;4095
E3F8 1A 80 DB T_W2, 10000000B
E3FA 1B 80 82 DB T_W12, 10000000B, 10000010B ;0
PROGRAM IOT MACRO-80 3.44 09-Dec-81 PAGE 1-302
E3FD 1A 81 DB T_W2, 10000001B
E3FF 1B 80 83 DB T_W12, 10000000B, 10000011B ;1
E402 FE DB T_KONEC
E403 0A 82 G4040G: DB T_O2, 10000010B
E405 0A 80 DB T_O2, 10000000B
E407 0A 82 DB T_O2, 10000010B
E409 0A 80 DB T_O2, 10000000B
E40B 0A 82 DB T_O2, 10000010B
E40D 0A 80 DB T_O2, 10000000B
E40F 0A 82 DB T_O2, 10000010B
E411 0A 80 DB T_O2, 10000000B
E413 0A 82 DB T_O2, 10000010B
E415 0A 80 DB T_O2, 10000000B
E417 0A 82 DB T_O2, 10000010B
E419 0A 80 DB T_O2, 10000000B
E41B 0A 82 DB T_O2, 10000010B
E41D 0A 80 DB T_O2, 10000000B
E41F 0A 82 DB T_O2, 10000010B
E421 0A 80 DB T_O2, 10000000B
E423 0A 82 DB T_O2, 10000010B
E425 0A 80 DB T_O2, 10000000B
E427 0A 82 DB T_O2, 10000010B
E429 0A 80 DB T_O2, 10000000B
E42B 0A 82 DB T_O2, 10000010B
E42D 0A 80 DB T_O2, 10000000B
E42F 0A 82 DB T_O2, 10000010B
E431 0A 80 DB T_O2, 10000000B
E433 0A 82 DB T_O2, 10000010B
E435 0A 80 DB T_O2, 10000000B
E437 0A 82 DB T_O2, 10000010B
E439 0A 80 DB T_O2, 10000000B
E43B 0A 82 DB T_O2, 10000010B
E43D 0A 80 DB T_O2, 10000000B
E43F 0A 82 DB T_O2, 10000010B
E441 22 DB T_RET
;POKRACUJE TEST PONOCI PROGAMU VE TROJOVEM KODU
E442 01 00FF G4040TB:LXI B,255 ;POCET PULZU
E445 C3 DE6E JMP G4020TB
E448 01 0100 G4040TA:LXI B,256 ;POCET PULZU
E44B C3 DE6E JMP G4020TB
;4bit. stradc _ _ _ _
;4042 1100003 3322211
E44E I4042T: ; ZDEEDQQQ NQDDQQQQ
E44E 08 78 30 DB T_VV2, 01111000B, 00110000B
E451 24 45 DB T_NAP, DIL16
E453 1B BA D5 DB T_w12, 10111010B, 11010101B
E456 1B AA D5 DB T_w12, 10101010B, 11010101B
E459 1B E2 E5 DB T_w12, 11100010B, 11100101B
E45C 1B C5 AA DB T_w12, 11000101B, 10101010B
E45F 1B D5 AA DB T_w12, 11010101B, 10101010B
E462 1B 9D 9A DB T_w12, 10011101B, 10011010B
E465 1B BA D5 DB T_w12, 10111010B, 11010101B
E468 1B AA D5 DB T_w12, 10101010B, 11010101B
PROGRAM IOT MACRO-80 3.44 09-Dec-81 PAGE 1-303
E46B 1B E2 E5 DB T_w12, 11100010B, 11100101B
E46E FE DB T_KONEC
;4bit. stradac RS TS
;4043 11E0003 33N2221
E46F I4043T: ; ZRSOSRQQ NRSCSRQQ
E46F 25 00 10 DB T_NZ2, 00000000B, 00010000B
E472 08 7C 6C DB T_VV2, 01111100B, 01101100B
E475 24 45 DB T_NAP, DIL16
E477 1B D5 BA DB T_W12, 11010101B, 10111010B
E47A 1B BA D5 DB T_W12, 10111010B, 11010101B
E47D 1B D5 BA DB T_W12, 11010101B, 10111010B
E480 1B C7 BB DB T_W12, 11000111B, 10111011B
E483 1B 83 93 DB T_W12, 10000011B, 10010011B
E486 1B 91 92 DB T_W12, 10010001B, 10010010B
E489 1B BA D5 DB T_W12, 10111010B, 11010101B
E48C 1B AB D7 DB T_W12, 10101011B, 11010111B
E48F 1B 83 93 DB T_W12, 10000011B, 10010011B
E492 1B 92 91 DB T_W12, 10010010B, 10010001B
E495 1B FF FF DB T_W12, 11111111B, 11111111B
E498 FE DB T_KONEC
;8vstup. hradlo s program. funkci
; E
;4048 B D X AC
E499 I4048T: ; ZKEFGHKY NPABCDKK
E499 08 7E 7F DB T_VV2, 01111110B, 01111111B
E49C 24 45 DB T_NAP, DIL16
E49E 1B BE FC DB T_W12, 10111110B, 11111100B ;NOR
E4A1 1B 83 80 DB T_W12, 10000011B, 10000000B
E4A4 19 A2 DB T_W1, 10100010B
E4A6 19 92 DB T_W1, 10010010B
E4A8 19 8A DB T_W1, 10001010B
E4AA 19 86 DB T_W1, 10000110B
E4AC 1B 82 C0 DB T_W12, 10000010B, 11000000B
E4AF 1B 82 A0 DB T_W12, 10000010B, 10100000B
E4B2 1B 82 90 DB T_W12, 10000010B, 10010000B
E4B5 1B 81 90 DB T_W12, 10000001B, 10010000B
E4B8 1B 82 88 DB T_W12, 10000010B, 10001000B
E4BB 1B 82 84 DB T_W12, 10000010B, 10000100B
E4BE 1B BF FD DB T_W12, 10111111B, 11111101B ;OR
E4C1 1B 82 81 DB T_W12, 10000010B, 10000001B
E4C4 19 81 DB T_W1, 10000001B
E4C6 19 A3 DB T_W1, 10100011B
E4C8 19 93 DB T_W1, 10010011B
E4CA 19 8B DB T_W1, 10001011B
E4CC 19 87 DB T_W1, 10000111B
E4CE 1B 83 C1 DB T_W12, 10000011B, 11000001B
E4D1 1B 83 A1 DB T_W12, 10000011B, 10100001B
E4D4 1B 83 91 DB T_W12, 10000011B, 10010001B
E4D7 1B 83 89 DB T_W12, 10000011B, 10001001B
E4DA 1B 83 85 DB T_W12, 10000011B, 10000101B
E4DD 1B FE FC DB T_W12, 11111110B, 11111100B ;OR-AND
E4E0 1B C2 80 DB T_W12, 11000010B, 10000000B
E4E3 1B FF BC DB T_W12, 11111111B, 10111100B
E4E6 1B C2 C0 DB T_W12, 11000010B, 11000000B
PROGRAM IOT MACRO-80 3.44 09-Dec-81 PAGE 1-304
E4E9 1B E3 A0 DB T_W12, 11100011B, 10100000B
E4EC 1B D3 90 DB T_W12, 11010011B, 10010000B
E4EF 1B CB 88 DB T_W12, 11001011B, 10001000B
E4F2 1B C7 84 DB T_W12, 11000111B, 10000100B
E4F5 1B D6 C0 DB T_W12, 11010110B, 11000000B
E4F8 1B EA 80 DB T_W12, 11101010B, 10000000B
E4FB 19 E9 DB T_W1, 11101001B
E4FD 1B C2 D4 DB T_W12, 11000010B, 11010100B
E500 1B C2 A8 DB T_W12, 11000010B, 10101000B
E503 1B FF FD DB T_W12, 11111111B, 11111101B ;OR-NAND
E506 1B C3 81 DB T_W12, 11000011B, 10000001B
E509 1B FE BD DB T_W12, 11111110B, 10111101B
E50C 1B C3 C1 DB T_W12, 11000011B, 11000001B
E50F 1B E2 A1 DB T_W12, 11100010B, 10100001B
E512 1B D2 91 DB T_W12, 11010010B, 10010001B
E515 19 D1 DB T_W1, 11010001B
E517 1B CA 89 DB T_W12, 11001010B, 10001001B
E51A 1B C6 85 DB T_W12, 11000110B, 10000101B
E51D 1B D7 C1 DB T_W12, 11010111B, 11000001B
E520 1B EB 81 DB T_W12, 11101011B, 10000001B
E523 1B C3 D5 DB T_W12, 11000011B, 11010101B
E526 1B C3 A9 DB T_W12, 11000011B, 10101001B
E529 1B 82 82 DB T_W12, 10000010B, 10000010B ;AND
E52C 19 81 DB T_W1, 10000001B
E52E 1B BE FE DB T_W12, 10111110B, 11111110B
E531 1B BF BE DB T_W12, 10111111B, 10111110B
E534 19 9E DB T_W1, 10011110B
E536 19 AE DB T_W1, 10101110B
E538 19 B6 DB T_W1, 10110110B
E53A 19 BA DB T_W1, 10111010B
E53C 1B BE 9E DB T_W12, 10111110B, 10011110B
E53F 1B BE AE DB T_W12, 10111110B, 10101110B
E542 1B BE B6 DB T_W12, 10111110B, 10110110B
E545 1B BE BA DB T_W12, 10111110B, 10111010B
E548 1B 83 83 DB T_W12, 10000011B, 10000011B ;NAND
E54B 1B BF FF DB T_W12, 10111111B, 11111111B
E54E 1B BE BF DB T_W12, 10111110B, 10111111B
E551 19 BD DB T_W1, 10111101B
E553 19 9F DB T_W1, 10011111B
E555 19 AF DB T_W1, 10101111B
E557 19 B7 DB T_W1, 10110111B
E559 19 BB DB T_W1, 10111011B
E55B 1B BF 9F DB T_W12, 10111111B, 10011111B
E55E 1B BF AF DB T_W12, 10111111B, 10101111B
E561 1B BF B7 DB T_W12, 10111111B, 10110111B
E564 1B BF BB DB T_W12, 10111111B, 10111011B
E567 1B C3 82 DB T_W12, 11000011B, 10000010B ;AND-OR
E56A 1B FE FE DB T_W12, 11111110B, 11111110B
E56D 1B C2 BE DB T_W12, 11000010B, 10111110B
E570 1B C2 C2 DB T_W12, 11000010B, 11000010B
E573 1B FE 82 DB T_W12, 11111110B, 10000010B
E576 1B C2 83 DB T_W12, 11000010B, 10000011B ;AND-NOR
E579 1B FF FF DB T_W12, 11111111B, 11111111B
E57C 1B C3 BF DB T_W12, 11000011B, 10111111B
E57F 1B C3 C3 DB T_W12, 11000011B, 11000011B
E582 1B FF 83 DB T_W12, 11111111B, 10000011B
PROGRAM IOT MACRO-80 3.44 09-Dec-81 PAGE 1-305
E585 FE DB T_KONEC
;8NAND
;4068 N _ N
E586 I4068TA: ; ZCDCBAYX XNYHGFEC
E586 08 3C 1E DB T_VV2, 00111100B, 00011110B
E589 24 44 DB T_NAP, DIL14
E58B 1B C3 E1 DB T_W12, 11000011B, 11100001B
E58E 1B FF DF DB T_W12, 11111111B, 11011111B
E591 1B C3 E1 DB T_W12, 11000011B, 11100001B
E594 1B E3 E1 DB T_W12, 11100011B, 11100001B
E597 1B D3 E1 DB T_W12, 11010011B, 11100001B
E59A 1B CB E1 DB T_W12, 11001011B, 11100001B
E59D 1B C7 E1 DB T_W12, 11000111B, 11100001B
E5A0 1B C3 F1 DB T_W12, 11000011B, 11110001B
E5A3 1B C3 E9 DB T_W12, 11000011B, 11101001B
E5A6 1B C3 E5 DB T_W12, 11000011B, 11100101B
E5A9 1B C3 E3 DB T_W12, 11000011B, 11100011B
E5AC FE DB T_KONEC
;8NAND - AND
;4068 N _ N
E5AD I4068T: ; ZCDCBAYX XNYHGFEC
E5AD 25 41 81 DB T_NZ2, 01000001B, 10000001B
E5B0 08 3C 1E DB T_VV2, 00111100B, 00011110B
E5B3 24 44 DB T_NAP, DIL14
E5B5 1B FF DF DB T_W12, 11111111B, 11011111B
E5B8 1B C1 E1 DB T_W12, 11000001B, 11100001B
E5BB 1B E1 E1 DB T_W12, 11100001B, 11100001B
E5BE 1B D1 E1 DB T_W12, 11010001B, 11100001B
E5C1 1B C9 E1 DB T_W12, 11001001B, 11100001B
E5C4 1B C5 E1 DB T_W12, 11000101B, 11100001B
E5C7 1B C1 F1 DB T_W12, 11000001B, 11110001B
E5CA 1B C1 E9 DB T_W12, 11000001B, 11101001B
E5CD 1B C1 E5 DB T_W12, 11000001B, 11100101B
E5D0 1B C1 E3 DB T_W12, 11000001B, 11100011B
E5D3 FE DB T_KONEC
;4x 2OR
;4071 222111 444333
E5D4 I4071T: ; ZABYYBAX XNABYYBA
E5D4 08 66 33 DB T_VV2, 01100110B, 00110011B
E5D7 24 44 DB T_NAP, DIL14
E5D9 1B 8B EF DB T_W12, 10001011B, 11101111B
E5DC 1B BD F8 DB T_W12, 10111101B, 11111000B
E5DF 1B DF C5 DB T_W12, 11011111B, 11000101B
E5E2 1B F1 DE DB T_W12, 11110001B, 11011110B
E5E5 FE DB T_KONEC
;2x 4OR
;4072
E5E6 I4072T: ; ZXDCBAYX XNYABCDX
E5E6 25 41 81 DB T_NZ2, 01000001B, 10000001B
E5E9 08 3C 1E DB T_VV2, 00111100B, 00011110B
E5EC 24 44 DB T_NAP, DIL14
E5EE 1B FF C1 DB T_W12, 11111111B, 11000001B
PROGRAM IOT MACRO-80 3.44 09-Dec-81 PAGE 1-306
E5F1 1B DF F1 DB T_W12, 11011111B, 11110001B
E5F4 1B EF E9 DB T_W12, 11101111B, 11101001B
E5F7 1B F7 E5 DB T_W12, 11110111B, 11100101B
E5FA 1B FB E3 DB T_W12, 11111011B, 11100011B
E5FD 1B C1 FF DB T_W12, 11000001B, 11111111B
E600 1B E3 EF DB T_W12, 11100011B, 11101111B
E603 1B D3 F7 DB T_W12, 11010011B, 11110111B
E606 1B CB FB DB T_W12, 11001011B, 11111011B
E609 1B C7 FD DB T_W12, 11000111B, 11111101B
E60C FE DB T_KONEC
;3x 3AND
;4073 111122 333322
E60D I4073T: ; ZYCBABAX XNCBAYYC
E60D 08 3E 39 DB T_VV2, 00111110B, 00111001B
E610 24 44 DB T_NAP, DIL14
E612 1B 87 E3 DB T_W12, 10000111B, 11100011B
E615 1B A1 E9 DB T_W12, 10100001B, 11101001B
E618 1B 95 F1 DB T_W12, 10010101B, 11110001B
E61B 1B B3 FD DB T_W12, 10110011B, 11111101B
E61E 1B 8F C0 DB T_W12, 10001111B, 11000000B
E621 1B A9 C8 DB T_W12, 10101001B, 11001000B
E624 1B 9D D0 DB T_W12, 10011101B, 11010000B
E627 1B FB D8 DB T_W12, 11111011B, 11011000B
E62A FE DB T_KONEC
;3x 3OR
;4075 111122 333322
E62B I4075T: ; ZYCBABAX XNCBAYYC
E62B 08 3E 39 DB T_VV2, 00111110B, 00111001B
E62E 24 44 DB T_NAP, DIL14
E630 1B 87 E7 DB T_W12, 10000111B, 11100111B
E633 1B E1 EF DB T_W12, 11100001B, 11101111B
E636 1B D5 F7 DB T_W12, 11010101B, 11110111B
E639 1B F3 FF DB T_W12, 11110011B, 11111111B
E63C 1B CF C2 DB T_W12, 11001111B, 11000010B
E63F 1B E9 CC DB T_W12, 11101001B, 11001100B
E642 1B DD D6 DB T_W12, 11011101B, 11010110B
E645 1B FB DE DB T_W12, 11111011B, 11011110B
E648 FE DB T_KONEC
;4x K.O. D, TS __ __
; 10 10
;4076 C3210EE M0123EE
E649 I4076T: ; ZPQQQQQQ NRDDDDDD
E649 08 43 7F DB T_VV2, 01000011B, 01111111B
E64C 24 45 DB T_NAP, DIL16
E64E 1B 80 E8 DB T_W12, 10000000B, 11101000B
E651 1B BD A8 DB T_W12, 10111101B, 10101000B
E654 1B D4 A8 DB T_W12, 11010100B, 10101000B
E657 1B BE 94 DB T_W12, 10111110B, 10010100B
E65A 1B E8 94 DB T_W12, 11101000B, 10010100B
E65D 1B BD 99 DB T_W12, 10111101B, 10011001B
E660 1B E8 99 DB T_W12, 11101000B, 10011001B
E663 1B BF A6 DB T_W12, 10111111B, 10100110B
E666 1B E8 A6 DB T_W12, 11101000B, 10100110B
PROGRAM IOT MACRO-80 3.44 09-Dec-81 PAGE 1-307
E669 1B BF 98 DB T_W12, 10111111B, 10011000B
E66C 1B D8 98 DB T_W12, 11011000B, 10011000B
E66F 1B 98 A7 DB T_W12, 10011000B, 10100111B
E672 1B D8 A7 DB T_W12, 11011000B, 10100111B
E675 FE DB T_KONEC
;4x 2EX-NOR
;4077 222111 444333
E676 I4077T: ; ZABYYBAX XNABYYBA
E676 08 66 33 DB T_VV2, 01100110B, 00110011B
E679 24 44 DB T_NAP, DIL14
E67B 1B 93 E7 DB T_W12, 10010011B, 11100111B
E67E 1B A5 F9 DB T_W12, 10100101B, 11111001B
E681 1B CF CA DB T_W12, 11001111B, 11001010B
E684 1B F9 D4 DB T_W12, 11111001B, 11010100B
E687 FE DB T_KONEC
;8NOR
;4078 N _ N
E688 I4078TA: ; ZCDCBAYX XNYHGFEC
E688 08 3C 1E DB T_VV2, 00111100B, 00011110B
E68B 24 44 DB T_NAP, DIL14
E68D 1B C3 E1 DB T_W12, 11000011B, 11100001B
E690 20 DB T_GOTO
E691 E69E DW G4078T
;8NOR - OR
;4078 N _ N
E693 I4078T: ; ZCDCBAYX XNYHGFEC
E693 25 41 81 DB T_NZ2, 01000001B, 10000001B
E696 08 3C 1E DB T_VV2, 00111100B, 00011110B
E699 24 44 DB T_NAP, DIL14
E69B 1B C1 E1 DB T_W12, 11000001B, 11100001B
E69E 1B E3 C1 G4078T: DB T_W12, 11100011B, 11000001B
E6A1 1B D3 C1 DB T_W12, 11010011B, 11000001B
E6A4 1B CB C1 DB T_W12, 11001011B, 11000001B
E6A7 1B C7 C1 DB T_W12, 11000111B, 11000001B
E6AA 1B C3 D1 DB T_W12, 11000011B, 11010001B
E6AD 1B C3 C9 DB T_W12, 11000011B, 11001001B
E6B0 1B C3 C5 DB T_W12, 11000011B, 11000101B
E6B3 1B C3 C3 DB T_W12, 11000011B, 11000011B
E6B6 1B FF DF DB T_W12, 11111111B, 11011111B
E6B9 FE DB T_KONEC
;4x 2AND
;4081 222111 444333
E6BA I4081T: ; ZABYYBAX XNABYYBA
E6BA 08 66 33 DB T_VV2, 01100110B, 00110011B
E6BD 24 44 DB T_NAP, DIL14
E6BF 1B 83 E7 DB T_W12, 10000011B, 11100111B
E6C2 1B A5 F8 DB T_W12, 10100101B, 11111000B
E6C5 1B CF C1 DB T_W12, 11001111B, 11000001B
E6C8 1B F1 D2 DB T_W12, 11110001B, 11010010B
E6CB FE DB T_KONEC
;2x 4AND
PROGRAM IOT MACRO-80 3.44 09-Dec-81 PAGE 1-308
;4082
E6CC I4082T: ; ZXDCBAYX XNYABCDX
E6CC 25 41 81 DB T_NZ2, 01000001B, 10000001B
E6CF 08 3C 1E DB T_VV2, 00111100B, 00011110B
E6D2 24 44 DB T_NAP, DIL14
E6D4 1B FF C1 DB T_W12, 11111111B, 11000001B
E6D7 1B DD D1 DB T_W12, 11011101B, 11010001B
E6DA 1B ED C9 DB T_W12, 11101101B, 11001001B
E6DD 1B F5 C5 DB T_W12, 11110101B, 11000101B
E6E0 1B F9 C3 DB T_W12, 11111001B, 11000011B
E6E3 1B C1 FF DB T_W12, 11000001B, 11111111B
E6E6 1B E1 CF DB T_W12, 11100001B, 11001111B
E6E9 1B D1 D7 DB T_W12, 11010001B, 11010111B
E6EC 1B C9 DB DB T_W12, 11001001B, 11011011B
E6EF 1B C5 DD DB T_W12, 11000101B, 11011101B
E6F2 FE DB T_KONEC
;8bit. posuv. reg. se stradcem par. vystupem, TS
; S ,
;4094 3210C T O4567SS
E6F3 I4094T: ; ZQQQQPDR NEQQQQQQ
E6F3 08 07 40 DB T_vv2, 00000111B, 01000000B
E6F6 24 45 DB T_NAP, DIL16
E6F8 0B 81 C0 DB T_O12, 10000001B, 11000000B
E6FB 09 85 DB T_O1, 10000101B ;0
E6FD 09 83 DB T_O1, 10000011B
E6FF 09 87 DB T_O1, 10000111B ;10
E701 09 81 DB T_O1, 10000001B
E703 09 85 DB T_O1, 10000101B ;010
E705 09 83 DB T_O1, 10000011B
E707 09 87 DB T_O1, 10000111B ;1010
E709 09 81 DB T_O1, 10000001B
E70B 09 85 DB T_O1, 10000101B ;01010
E70D 09 83 DB T_O1, 10000011B
E70F 09 87 DB T_O1, 10000111B ;101010
E711 09 81 DB T_O1, 10000001B
E713 09 85 DB T_O1, 10000101B ;0101010
E715 09 83 DB T_O1, 10000011B
E717 09 87 DB T_O1, 10000111B ;10101010 NASUNUT DEFINOVANY OBSAH
E719 1B AB E8 DB T_W12, 10101011B, 11101000B
E71C 1B DF D5 DB T_W12, 11011111B, 11010101B ;11010101
E71F 1B D9 D7 DB T_W12, 11011001B, 11010111B
E722 1B B5 EA DB T_W12, 10110101B, 11101010B ;01101010
E725 1B B1 E8 DB T_W12, 10110001B, 11101000B
E728 1B E5 D5 DB T_W12, 11100101B, 11010101B ;00110101
E72B 1B E3 D7 DB T_W12, 11100011B, 11010111B
E72E 1B CF EA DB T_W12, 11001111B, 11101010B ;10011010
E731 1B C9 E8 DB T_W12, 11001001B, 11101000B
E734 1B 95 F5 DB T_W12, 10010101B, 11110101B ;01001101
E737 1B 93 F7 DB T_W12, 10010011B, 11110111B
E73A 1B AF DA DB T_W12, 10101111B, 11011010B ;10100110
E73D 1B A9 D8 DB T_W12, 10101001B, 11011000B
E740 1B D5 CD DB T_W12, 11010101B, 11001101B ;01010011
E743 1B D3 CF DB T_W12, 11010011B, 11001111B
E746 1B AF E7 DB T_W12, 10101111B, 11100111B ;10101001
E749 1B A9 E7 DB T_W12, 10101001B, 11100111B
PROGRAM IOT MACRO-80 3.44 09-Dec-81 PAGE 1-309
E74C 1B D5 D2 DB T_W12, 11010101B, 11010010B ;01010100
E74F 1B D3 D0 DB T_W12, 11010011B, 11010000B
E752 1B AF E8 DB T_W12, 10101111B, 11101000B ;10101010
E755 1B F9 BC DB T_W12, 11111001B, 10111100B
E758 1B FD BD DB T_W12, 11111101B, 10111101B ;01010101
E75B 1B D2 D7 DB T_W12, 11010010B, 11010111B
E75E 1B D6 D6 DB T_W12, 11010110B, 11010110B ;10101010
E761 1B A9 E8 DB T_W12, 10101001B, 11101000B
E764 1B D5 D5 DB T_W12, 11010101B, 11010101B ;01010101
E767 1B D3 D7 DB T_W12, 11010011B, 11010111B
E76A 1B AF EA DB T_W12, 10101111B, 11101010B ;10101010
E76D FE DB T_KONEC
;K.O. J-K s SR
;4095 /321 C213
E76E I4095T: ; ZQJJJRXX XNSPKKKQ
E76E 25 03 80 DB T_NZ2, 00000011B, 10000000B
E771 08 3C 3E DB T_VV2, 00111100B, 00111110B
E774 24 44 DB T_NAP, DIL14
E776 1B C7 C0 DB T_W12, 11000111B, 11000000B ;A-RESET
E779 1B A3 E1 DB T_W12, 10100011B, 11100001B ;A-SET
E77C 1B BB C1 DB T_W12, 10111011B, 11000001B
E77F 1A D1 DB T_W2, 11010001B
E781 1B BB C1 DB T_W12, 10111011B, 11000001B ;S-SET
E784 1B 83 CF DB T_W12, 10000011B, 11001111B
E787 1A DF DB T_W2, 11011111B
E789 1B C3 CE DB T_W12, 11000011B, 11001110B ;S-RESET
E78C 1B FB CE DB T_W12, 11111011B, 11001110B
E78F 1A DE DB T_W2, 11011110B
E791 1B BB CF DB T_W12, 10111011B, 11001111B ;T
E794 1A DF DB T_W2, 11011111B
E796 1B FB CE DB T_W12, 11111011B, 11001110B ;T
E799 1B EB C4 DB T_W12, 11101011B, 11000100B
E79C 1A D4 DB T_W2, 11010100B
E79E 1B EB C4 DB T_W12, 11101011B, 11000100B ;NIC
E7A1 1B D3 CA DB T_W12, 11010011B, 11001010B
E7A4 1A DA DB T_W2, 11011010B
E7A6 1B D3 CA DB T_W12, 11010011B, 11001010B ;NIC
E7A9 FE DB T_KONEC
;K.O. J-K s SR _ _
;4096 _321 C213
E7AA I4096T: ; ZQJJJRXX XNSPKKKQ
E7AA 25 03 80 DB T_NZ2, 00000011B, 10000000B
E7AD 08 3C 3E DB T_VV2, 00111100B, 00111110B
E7B0 24 44 DB T_NAP, DIL14
E7B2 1B E7 C2 DB T_W12, 11100111B, 11000010B ;A-RESET
E7B5 1B 83 E3 DB T_W12, 10000011B, 11100011B ;A-SET
E7B8 1B 9B C3 DB T_W12, 10011011B, 11000011B
E7BB 1A D3 DB T_W2, 11010011B
E7BD 1B 9B C3 DB T_W12, 10011011B, 11000011B ;S-SET
E7C0 1B A3 CD DB T_W12, 10100011B, 11001101B
E7C3 1A DD DB T_W2, 11011101B
E7C5 1B E3 CC DB T_W12, 11100011B, 11001100B ;S-RESET
E7C8 1B DB CC DB T_W12, 11011011B, 11001100B
E7CB 1A DC DB T_W2, 11011100B
PROGRAM IOT MACRO-80 3.44 09-Dec-81 PAGE 1-310
E7CD 1B 9B CD DB T_W12, 10011011B, 11001101B ;T
E7D0 1A DD DB T_W2, 11011101B
E7D2 1B DB CC DB T_W12, 11011011B, 11001100B ;T
E7D5 1B CB C6 DB T_W12, 11001011B, 11000110B
E7D8 1A D6 DB T_W2, 11010110B
E7DA 1B CB C6 DB T_W12, 11001011B, 11000110B ;NIC
E7DD 1B F3 C8 DB T_W12, 11110011B, 11001000B
E7E0 1A D8 DB T_W2, 11011000B
E7E2 1B F3 C8 DB T_W12, 11110011B, 11001000B ;NIC
E7E5 FE DB T_KONEC
;8bit. stradac (adresonatelna pamet)
;4099 210W 7 6543210
E7E6 I4099T: ; ZAAADDRQ NQQQQQQQ
E7E6 08 7E 00 DB T_VV2, 01111110B, 00000000B
E7E9 24 45 DB T_NAP, DIL16
E7EB 1B AE 80 DB T_W12, 10101110B, 10000000B ;RESET
E7EE 1B 86 81 DB T_W12, 10000110B, 10000001B ;DEMULTIPLEXR
E7F1 1B 96 82 DB T_W12, 10010110B, 10000010B
E7F4 1B A6 84 DB T_W12, 10100110B, 10000100B
E7F7 1B B6 88 DB T_W12, 10110110B, 10001000B
E7FA 1B C6 90 DB T_W12, 11000110B, 10010000B
E7FD 1B D6 A0 DB T_W12, 11010110B, 10100000B
E800 1B E6 C0 DB T_W12, 11100110B, 11000000B
E803 1B F7 80 DB T_W12, 11110111B, 10000000B
E806 1B AE 80 DB T_W12, 10101110B, 10000000B ;RESET
E809 1B 84 81 DB T_W12, 10000100B, 10000001B ;ZAPIS 1
E80C 1B 8C 81 DB T_W12, 10001100B, 10000001B
E80F 1B 94 83 DB T_W12, 10010100B, 10000011B
E812 1B 9C 83 DB T_W12, 10011100B, 10000011B
E815 1B A4 87 DB T_W12, 10100100B, 10000111B
E818 1B AC 87 DB T_W12, 10101100B, 10000111B
E81B 1B B4 8F DB T_W12, 10110100B, 10001111B
E81E 1B BC 8F DB T_W12, 10111100B, 10001111B
E821 1B C4 9F DB T_W12, 11000100B, 10011111B
E824 1B CC 9F DB T_W12, 11001100B, 10011111B
E827 1B D4 BF DB T_W12, 11010100B, 10111111B
E82A 1B DC BF DB T_W12, 11011100B, 10111111B
E82D 1B E4 FF DB T_W12, 11100100B, 11111111B
E830 1B EC FF DB T_W12, 11101100B, 11111111B
E833 1B F5 FF DB T_W12, 11110101B, 11111111B
E836 1B FD FF DB T_W12, 11111101B, 11111111B
E839 1B 81 FE DB T_W12, 10000001B, 11111110B ;ZAPIS 0
E83C 1B 89 FE DB T_W12, 10001001B, 11111110B
E83F 1B 91 FC DB T_W12, 10010001B, 11111100B
E842 1B 99 FC DB T_W12, 10011001B, 11111100B
E845 1B A1 F8 DB T_W12, 10100001B, 11111000B
E848 1B A9 F8 DB T_W12, 10101001B, 11111000B
E84B 1B B1 F0 DB T_W12, 10110001B, 11110000B
E84E 1B B9 F0 DB T_W12, 10111001B, 11110000B
E851 1B C1 E0 DB T_W12, 11000001B, 11100000B
E854 1B C9 E0 DB T_W12, 11001001B, 11100000B
E857 1B D1 C0 DB T_W12, 11010001B, 11000000B
E85A 1B D9 C0 DB T_W12, 11011001B, 11000000B
E85D 1B E1 80 DB T_W12, 11100001B, 10000000B
E860 1B E9 80 DB T_W12, 11101001B, 10000000B
PROGRAM IOT MACRO-80 3.44 09-Dec-81 PAGE 1-311
E863 1B F0 80 DB T_W12, 11110000B, 10000000B
E866 1B F8 80 DB T_W12, 11111000B, 10000000B
E869 FE DB T_KONEC
;dek. BIN/7seg. se stradac. ITRON SK
; ___
;4311 03EBL21
E86A I4311T: ; ZAALITAA Nfgabcde
E86A 08 7F 00 DB T_VV2, 01111111B, 00000000B
E86D 24 45 DB T_NAP, DIL16
E86F 1B D5 80 DB T_W12, 11010101B, 10000000B ;ZHASNUTO
E872 1B AA FF DB T_W12, 10101010B, 11111111B ;TEST
E875 1B 8C DF DB T_W12, 10001100B, 11011111B ;0
E878 1B CC 8C DB T_W12, 11001100B, 10001100B ;1
E87B 1B 8D BB DB T_W12, 10001101B, 10111011B ;2
E87E 1B CD BE DB T_W12, 11001101B, 10111110B ;3
E881 1B 8E EC DB T_W12, 10001110B, 11101100B ;4
E884 1B CE F6 DB T_W12, 11001110B, 11110110B ;5
E887 1B 8F F7 DB T_W12, 10001111B, 11110111B ;6
E88A 1B CF 9C DB T_W12, 11001111B, 10011100B ;7
E88D 1B AC FF DB T_W12, 10101100B, 11111111B ;8
E890 1B EC FC DB T_W12, 11101100B, 11111100B ;9
E893 1B AD FD DB T_W12, 10101101B, 11111101B ;10 - A
E896 1B ED E7 DB T_W12, 11101101B, 11100111B ;11 - b
E899 1B AE D3 DB T_W12, 10101110B, 11010011B ;12 - c
E89C 1B EE AF DB T_W12, 11101110B, 10101111B ;13 - d
E89F 1B AF F3 DB T_W12, 10101111B, 11110011B ;14 - E
E8A2 1B EF F1 DB T_W12, 11101111B, 11110001B ;15 - F
E8A5 1B 8F F7 DB T_W12, 10001111B, 11110111B ;6
E8A8 09 9F DB T_O1, 10011111B ;ZACHIT
E8AA 1B FC F7 DB T_W12, 11111100B, 11110111B ;6
E8AD 1B EC FC DB T_W12, 11101100B, 11111100B ;9
E8B0 09 FC DB T_O1, 11111100B ;ZACHIT
E8B2 1B 9F FC DB T_W12, 10011111B, 11111100B ;9
E8B5 FE DB T_KONEC
;6x strob. invert. odelovac TS
; _ _
;4502 110E022 556E433
E8B6 I4502T: ; ZQDQODQD NDQDIQDQ
E8B6 08 2D 5A DB T_VV2, 00101101B, 01011010B
E8B9 24 45 DB T_NAP, DIL16
E8BB 1B A5 A5 DB T_W12, 10100101B, 10100101B
E8BE 1B D2 D2 DB T_W12, 11010010B, 11010010B
E8C1 1B DA A5 DB T_W12, 11011010B, 10100101B
E8C4 1B A5 DA DB T_W12, 10100101B, 11011010B
E8C7 FE DB T_KONEC
;dek. BCD/7 seg. se stradac. ITRON sK
; ___
;4511 03EBL21
E8C8 I4511T: ; ZAALITAA Nfgabcde
E8C8 08 7F 00 DB T_VV2, 01111111B, 00000000B
E8CB 24 45 DB T_NAP, DIL16
E8CD 1B AD 80 DB T_W12, 10101101B, 10000000B ;10
E8D0 1B ED 80 DB T_W12, 11101101B, 10000000B ;11
PROGRAM IOT MACRO-80 3.44 09-Dec-81 PAGE 1-312
E8D3 1B AE 80 DB T_W12, 10101110B, 10000000B ;12
E8D6 1B EE 80 DB T_W12, 11101110B, 10000000B ;13
E8D9 1B AF 80 DB T_W12, 10101111B, 10000000B ;14
E8DC 1B EF 80 DB T_W12, 11101111B, 10000000B ;15
E8DF 1B 8C DF DB T_W12, 10001100B, 11011111B ;0
E8E2 1B CC 8C DB T_W12, 11001100B, 10001100B ;1
E8E5 1B 8D BB DB T_W12, 10001101B, 10111011B ;2
E8E8 1B CD BE DB T_W12, 11001101B, 10111110B ;3
E8EB 1B 8E EC DB T_W12, 10001110B, 11101100B ;4
E8EE 1B CE F6 DB T_W12, 11001110B, 11110110B ;5
E8F1 1B 8F E7 DB T_W12, 10001111B, 11100111B ;6
E8F4 1B CF 9C DB T_W12, 11001111B, 10011100B ;7
E8F7 1B AC FF DB T_W12, 10101100B, 11111111B ;8
E8FA 1B EC FC DB T_W12, 11101100B, 11111100B ;9
E8FD 1B 8A FF DB T_W12, 10001010B, 11111111B ;TEST
E900 1B E4 80 DB T_W12, 11100100B, 10000000B ;ZHASNUTO
E903 1B 8F E7 DB T_W12, 10001111B, 11100111B ;6
E906 19 9F DB T_W1, 10011111B
E908 1B DD E7 DB T_W12, 11011101B, 11100111B ;6 ZACHYT
E90B 1B EC FC DB T_W12, 11101100B, 11111100B ;9
E90E 19 FC DB T_W1, 11111100B
E910 1B BE FC DB T_W12, 10111110B, 11111100B ;9 ZACHYT
E913 FE DB T_KONEC
;vstup. multiplex TS _
;4512 6543210 E 210_7
E914 I4512T: ; ZIIIIIII NOQAAAEI
E914 08 7F 5F DB T_VV2, 01111111B, 01011111B
E917 24 45 DB T_NAP, DIL16
E919 1B AA 81 DB T_W12, 10101010B, 10000001B
E91C 1A A5 DB T_W2, 10100101B
E91E 1A 89 DB T_W2, 10001001B
E920 1A AD DB T_W2, 10101101B
E922 1A 91 DB T_W2, 10010001B
E924 1A B5 DB T_W2, 10110101B
E926 1A 99 DB T_W2, 10011001B
E928 1A BD DB T_W2, 10111101B
E92A 1B D5 A0 DB T_W12, 11010101B, 10100000B
E92D 1A 84 DB T_W2, 10000100B
E92F 1A A8 DB T_W2, 10101000B
E931 1A 8C DB T_W2, 10001100B
E933 1A B0 DB T_W2, 10110000B
E935 1A 94 DB T_W2, 10010100B
E937 1A B8 DB T_W2, 10111000B
E939 1A 9C DB T_W2, 10011100B
E93B 1B FF 97 DB T_W12, 11111111B, 10010111B
E93E 1B 80 F6 DB T_W12, 10000000B, 11110110B
E941 FE DB T_KONEC
;dekoder 1 z 16 se stradacem
; 11 1111
;4515 0213456 01894523 _32710E
E942 I4515T: ; ZQQQQQQQ QQQQQQQQ NEAAQAAL
E942 10 00 00 77 DB T_VV3, 00000000B, 00000000B, 01110111B
E946 24 47 DB T_NAP, DIL24
E948 1F BF FF 89 DB T_W123, 10111111B, 11111111B, 10001001B
PROGRAM IOT MACRO-80 3.44 09-Dec-81 PAGE 1-313
E94C 1F EF FF 8B DB T_W123, 11101111B, 11111111B, 10001011B
E950 1F DF FF 8D DB T_W123, 11011111B, 11111111B, 10001101B
E954 1F F7 FF 8F DB T_W123, 11110111B, 11111111B, 10001111B
E958 1F FB FF 99 DB T_W123, 11111011B, 11111111B, 10011001B
E95C 1F FD FF 9B DB T_W123, 11111101B, 11111111B, 10011011B
E960 1F FE FF 9D DB T_W123, 11111110B, 11111111B, 10011101B
E964 1F FF FF 97 DB T_W123, 11111111B, 11111111B, 10010111B
E968 1F FF DF A9 DB T_W123, 11111111B, 11011111B, 10101001B
E96C 1F FF EF AB DB T_W123, 11111111B, 11101111B, 10101011B
E970 1F FF 7F AD DB T_W123, 11111111B, 01111111B, 10101101B
E974 1F FF BF AF DB T_W123, 11111111B, 10111111B, 10101111B
E978 1F FF FD B9 DB T_W123, 11111111B, 11111101B, 10111001B
E97C 1F FF FE BB DB T_W123, 11111111B, 11111110B, 10111011B
E980 1F FF F7 BD DB T_W123, 11111111B, 11110111B, 10111101B
E984 1F FF FB BF DB T_W123, 11111111B, 11111011B, 10111111B
E988 1F FF FF EB DB T_W123, 11111111B, 11111111B, 11101011B
E98C 1C EA DB T_W3, 11101010B
E98E 1F FF EF 9C DB T_W123, 11111111B, 11101111B, 10011100B
E992 1F FE FF 9D DB T_W123, 11111110B, 11111111B, 10011101B
E996 1C 9C DB T_W3, 10011100B
E998 1F FE FF AA DB T_W123, 11111110B, 11111111B, 10101010B
E99C FE DB T_KONEC
;sync. vratny prog. BIN citac _
; _ _ D
;4516 T0C033P C2211/M
E99D I4516T: ; ZCQEPPQL NPQPPQUR
E99D 08 1D 5B DB T_VV2, 00011101B, 01011011B
E9A0 24 45 DB T_NAP, DIL16
E9A2 1B C1 83 DB T_W12, 11000001B, 10000011B ;RESET
E9A5 1B C4 92 DB T_W12, 11000100B, 10010010B
E9A8 1B D7 B2 DB T_W12, 11010111B, 10110010B
E9AB 1B DA AA DB T_W12, 11011010B, 10101010B
E9AE 1B E9 8E DB T_W12, 11101001B, 10001110B
E9B1 1B E0 86 DB T_W12, 11100000B, 10000110B
E9B4 1B DC 9B DB T_W12, 11011100B, 10011011B ;RESET
E9B7 1B D0 C2 DB T_W12, 11010000B, 11000010B ;0
E9BA 1A 82 DB T_W2, 10000010B
E9BC 1B D0 C2 DB T_W12, 11010000B, 11000010B ;0
E9BF 1A 82 DB T_W2, 10000010B
E9C1 1B D0 C2 DB T_W12, 11010000B, 11000010B ;0
E9C4 1A 82 DB T_W2, 10000010B
E9C6 1B E0 C2 DB T_W12, 11100000B, 11000010B ;1
E9C9 1A 82 DB T_W2, 10000010B
E9CB 1B C0 C6 DB T_W12, 11000000B, 11000110B ;2
E9CE 1A 86 DB T_W2, 10000110B
E9D0 1B E0 C6 DB T_W12, 11100000B, 11000110B ;3
E9D3 1A 86 DB T_W2, 10000110B
E9D5 1B C0 E2 DB T_W12, 11000000B, 11100010B ;4
E9D8 1A A2 DB T_W2, 10100010B
E9DA 1B E0 E2 DB T_W12, 11100000B, 11100010B ;5
E9DD 1A A2 DB T_W2, 10100010B
E9DF 1B C0 E6 DB T_W12, 11000000B, 11100110B ;6
E9E2 1A A6 DB T_W2, 10100110B
E9E4 1B E0 E6 DB T_W12, 11100000B, 11100110B ;7
E9E7 1A A6 DB T_W2, 10100110B
PROGRAM IOT MACRO-80 3.44 09-Dec-81 PAGE 1-314
E9E9 1B C2 C2 DB T_W12, 11000010B, 11000010B ;8
E9EC 1A 82 DB T_W2, 10000010B
E9EE 1B E2 C2 DB T_W12, 11100010B, 11000010B ;9
E9F1 1A 82 DB T_W2, 10000010B
E9F3 1B C2 C6 DB T_W12, 11000010B, 11000110B ;10
E9F6 1A 86 DB T_W2, 10000110B
E9F8 1B E2 C6 DB T_W12, 11100010B, 11000110B ;11
E9FB 1A 86 DB T_W2, 10000110B
E9FD 1B C2 E2 DB T_W12, 11000010B, 11100010B ;12
EA00 1A A2 DB T_W2, 10100010B
EA02 1B E2 E2 DB T_W12, 11100010B, 11100010B ;13
EA05 1A A2 DB T_W2, 10100010B
EA07 1B C2 E6 DB T_W12, 11000010B, 11100110B ;14
EA0A 1A A6 DB T_W2, 10100110B
EA0C 1B A2 E6 DB T_W12, 10100010B, 11100110B ;15
EA0F 1A A6 DB T_W2, 10100110B
EA11 1B C0 C2 DB T_W12, 11000000B, 11000010B ;0
EA14 1A 82 DB T_W2, 10000010B
EA16 1B E0 C2 DB T_W12, 11100000B, 11000010B ;1
EA19 1A 80 DB T_W2, 10000000B
EA1B 1B 80 C0 DB T_W12, 10000000B, 11000000B ;0
EA1E 1A 80 DB T_W2, 10000000B
EA20 1B E2 E4 DB T_W12, 11100010B, 11100100B ;15
EA23 1A A4 DB T_W2, 10100100B
EA25 1B C2 E4 DB T_W12, 11000010B, 11100100B ;14
EA28 1A A4 DB T_W2, 10100100B
EA2A 1B E2 E0 DB T_W12, 11100010B, 11100000B ;13
EA2D 1A A0 DB T_W2, 10100000B
EA2F 1B C2 E0 DB T_W12, 11000010B, 11100000B ;12
EA32 1A A0 DB T_W2, 10100000B
EA34 1B E2 C4 DB T_W12, 11100010B, 11000100B ;11
EA37 1A 84 DB T_W2, 10000100B
EA39 1B C2 C4 DB T_W12, 11000010B, 11000100B ;10
EA3C 20 DB T_GOTO
EA3D E0E0 DW G4029T
;2x BCD citac _ _
;4518 M3210CC M3210CC
EA3F I4518T: ; ZRQQQQPP NRQQQQPP
EA3F 21 DB T_GOSUB
EA40 EA4C DW G4518G
EA42 1B 80 83 G4518T: DB T_W12, 10000000B, 10000011B ;0
EA45 1B 82 82 DB T_W12, 10000010B, 10000010B
EA48 1B 84 87 DB T_W12, 10000100B, 10000111B ;1
EA4B FE DB T_KONEC
;-------------------------------
;SPOLECNA CAST PRO 4518, 4520
EA4C 08 43 43 G4518G: DB T_VV2, 01000011B, 01000011B
EA4F 24 45 DB T_NAP, DIL16
EA51 1B C2 C2 DB T_W12, 11000010B, 11000010B
EA54 1B 82 82 DB T_W12, 10000010B, 10000010B ;0
EA57 1B 87 84 DB T_W12, 10000111B, 10000100B ;1
EA5A 1B 86 86 DB T_W12, 10000110B, 10000110B
EA5D 1B 8B 88 DB T_W12, 10001011B, 10001000B ;2
EA60 1B 8A 8A DB T_W12, 10001010B, 10001010B
EA63 1B 8F 8C DB T_W12, 10001111B, 10001100B ;3
PROGRAM IOT MACRO-80 3.44 09-Dec-81 PAGE 1-315
EA66 1B 8E 8E DB T_W12, 10001110B, 10001110B
EA69 1B 93 90 DB T_W12, 10010011B, 10010000B ;4
EA6C 1B 92 92 DB T_W12, 10010010B, 10010010B
EA6F 1B 97 94 DB T_W12, 10010111B, 10010100B ;5
EA72 1B 96 96 DB T_W12, 10010110B, 10010110B
EA75 1B 9B 98 DB T_W12, 10011011B, 10011000B ;6
EA78 1B 9A 9A DB T_W12, 10011010B, 10011010B
EA7B 1B 9F 9F DB T_W12, 10011111B, 10011111B ;7
EA7E 1B 9E 9E DB T_W12, 10011110B, 10011110B
EA81 1B A0 A3 DB T_W12, 10100000B, 10100011B ;8
EA84 1B A2 A2 DB T_W12, 10100010B, 10100010B
EA87 1B A4 A7 DB T_W12, 10100100B, 10100111B ;9
EA8A 1B A6 A6 DB T_W12, 10100110B, 10100110B
EA8D 22 DB T_RET
;2x BIN citac _ _
;4520 M3210CC M3210CC
EA8E I4520T: ; ZRQQQQPP NRQQQQPP
EA8E 21 DB T_GOSUB
EA8F EA4C DW G4518G
EA91 1B A8 AB DB T_W12, 10101000B, 10101011B ;10
EA94 1B AA AA DB T_W12, 10101010B, 10101010B
EA97 1B AC AF DB T_W12, 10101100B, 10101111B ;11
EA9A 1B AE AE DB T_W12, 10101110B, 10101110B
EA9D 1B B0 B3 DB T_W12, 10110000B, 10110011B ;12
EAA0 1B B2 B2 DB T_W12, 10110010B, 10110010B
EAA3 1B B4 B7 DB T_W12, 10110100B, 10110111B ;13
EAA6 1B B6 B6 DB T_W12, 10110110B, 10110110B
EAA9 1B B8 BB DB T_W12, 10111000B, 10111011B ;14
EAAC 1B BA BA DB T_W12, 10111010B, 10111010B
EAAF 1B BC BF DB T_W12, 10111100B, 10111111B ;15
EAB2 1B BE BE DB T_W12, 10111110B, 10111110B
EAB5 20 DB T_GOTO
EAB6 EA42 DW G4518T
;12bit. rener. parity
; 11
;4531 0123456 78901
EAB8 I4531T: ; ZDDDDDDD NDDDDDWQ
EAB8 08 7F 7E DB T_VV2, 01111111B, 01111110B
EABB 24 45 DB T_NAP, DIL16
EABD 1B 80 80 DB T_W12, 10000000B, 10000000B
EAC0 1B FF FF DB T_W12, 11111111B, 11111111B
EAC3 1B AA AA DB T_W12, 10101010B, 10101010B
EAC6 1B D5 D5 DB T_W12, 11010101B, 11010101B
EAC9 1B E6 98 DB T_W12, 11100110B, 10011000B
EACC 1B 99 E7 DB T_W12, 10011001B, 11100111B
EACF FE DB T_KONEC
;8vstup. prioritni koder
;4532 12E7654 EG32100
EAD0 I4532T: ; ZQQIDDDD NOSDDDDQ
EAD0 08 1F 1E DB T_VV2, 00011111B, 00011110B
EAD3 24 45 DB T_NAP, DIL16
EAD5 1B 8A 94 DB T_W12, 10001010B, 10010100B
EAD8 1B 90 C0 DB T_W12, 10010000B, 11000000B
PROGRAM IOT MACRO-80 3.44 09-Dec-81 PAGE 1-316
EADB 1B FA B5 DB T_W12, 11111010B, 10110101B
EADE 1B F5 AA DB T_W12, 11110101B, 10101010B
EAE1 1B B2 B5 DB T_W12, 10110010B, 10110101B
EAE4 1B B1 AA DB T_W12, 10110001B, 10101010B
EAE7 1B D0 B5 DB T_W12, 11010000B, 10110101B
EAEA 1B D0 AA DB T_W12, 11010000B, 10101010B
EAED 1B 90 A5 DB T_W12, 10010000B, 10100101B
EAF0 1B 90 A2 DB T_W12, 10010000B, 10100010B
EAF3 FE DB T_KONEC
;dek. BCD/7 seg. se stradac. LCD LED SK/A
;4543 BP L
EAF4 I4543T: ; ZIHADBCE Nfgedcba
EAF4 08 7F 00 DB T_VV2, 01111111B, 00000000B
EAF7 24 45 DB T_NAP, DIL16
EAF9 1B 81 DF DB T_W12, 10000001B, 11011111B ;0 SK
EAFC 1B 91 86 DB T_W12, 10010001B, 10000110B ;1
EAFF 1B 85 BB DB T_W12, 10000101B, 10111011B ;2
EB02 1B 95 AF DB T_W12, 10010101B, 10101111B ;3
EB05 1B 83 E6 DB T_W12, 10000011B, 11100110B ;4
EB08 1B 93 ED DB T_W12, 10010011B, 11101101B ;5
EB0B 1B 87 FD DB T_W12, 10000111B, 11111101B ;6
EB0E 1B 97 87 DB T_W12, 10010111B, 10000111B ;7
EB11 1B 89 FF DB T_W12, 10001001B, 11111111B ;8
EB14 1B 99 EF DB T_W12, 10011001B, 11101111B ;9
EB17 1B 8D 80 DB T_W12, 10001101B, 10000000B ;10
EB1A 1B 9D 80 DB T_W12, 10011101B, 10000000B ;11
EB1D 1B 8B 80 DB T_W12, 10001011B, 10000000B ;12
EB20 1B 9B 80 DB T_W12, 10011011B, 10000000B ;13
EB23 1B 8F 80 DB T_W12, 10001111B, 10000000B ;14
EB26 1B 9F 80 DB T_W12, 10011111B, 10000000B ;15
EB29 1B A1 A0 DB T_W12, 10100001B, 10100000B ;0 SA
EB2C 1B B1 F9 DB T_W12, 10110001B, 11111001B ;1
EB2F 1B A5 C4 DB T_W12, 10100101B, 11000100B ;2
EB32 1B B5 D0 DB T_W12, 10110101B, 11010000B ;3
EB35 1B A3 99 DB T_W12, 10100011B, 10011001B ;4
EB38 1B B3 92 DB T_W12, 10110011B, 10010010B ;5
EB3B 1B A7 82 DB T_W12, 10100111B, 10000010B ;6
EB3E 1B B7 F8 DB T_W12, 10110111B, 11111000B ;7
EB41 1B A9 80 DB T_W12, 10101001B, 10000000B ;8
EB44 1B B9 90 DB T_W12, 10111001B, 10010000B ;9
EB47 1B AD FF DB T_W12, 10101101B, 11111111B ;10
EB4A 1B BD FF DB T_W12, 10111101B, 11111111B ;11
EB4D 1B AB FF DB T_W12, 10101011B, 11111111B ;12
EB50 1B BB FF DB T_W12, 10111011B, 11111111B ;13
EB53 1B AF FF DB T_W12, 10101111B, 11111111B ;14
EB56 1B BF FF DB T_W12, 10111111B, 11111111B ;15
EB59 1B D7 80 DB T_W12, 11010111B, 10000000B ;ZHASNUTO
EB5C 1B EB FF DB T_W12, 11101011B, 11111111B
EB5F 1B 87 FD DB T_W12, 10000111B, 11111101B ;6 SK
EB62 09 86 DB T_O1, 10000110B
EB64 1B 98 FD DB T_W12, 10011000B, 11111101B
EB67 1B B9 90 DB T_W12, 10111001B, 10010000B ;9 SA
EB6A 09 B8 DB T_O1, 10111000B
EB6C 1B A6 90 DB T_W12, 10100110B, 10010000B
EB6F FE DB T_KONEC
PROGRAM IOT MACRO-80 3.44 09-Dec-81 PAGE 1-317
;2x dekoder 1 ze 4 H
;4555 321010_ _010123
EB70 I4555T: ; ZQQQQAAE NEAAQQQQ
EB70 08 07 70 DB T_VV2, 00000111B, 01110000B
EB73 24 45 DB T_NAP, DIL16
EB75 1B 88 E0 DB T_W12, 10001000B, 11100000B
EB78 1B 92 88 DB T_W12, 10010010B, 10001000B
EB7B 1B A4 A4 DB T_W12, 10100100B, 10100100B
EB7E 1B C6 92 DB T_W12, 11000110B, 10010010B
EB81 1B 83 B1 DB T_W12, 10000011B, 10110001B
EB84 FE DB T_KONEC
;2x dekoder 1 ze 4 L
;4556 321010_ _010123
EB85 I4556T: ; ZQQQQAAE NEAAQQQQ
EB85 08 07 70 DB T_VV2, 00000111B, 01110000B
EB88 24 45 DB T_NAP, DIL16
EB8A 1B F0 EF DB T_W12, 11110000B, 11101111B
EB8D 1B EA 87 DB T_W12, 11101010B, 10000111B
EB90 1B DC AB DB T_W12, 11011100B, 10101011B
EB93 1B BE 9D DB T_W12, 10111110B, 10011101B
EB96 1B FB BE DB T_W12, 11111011B, 10111110B
EB99 FE DB T_KONEC
;paralerni BCD scitacka
;4560 C332211 000123C
EB9A I4560T: ; ZIBABABA NABSSSSO
EB9A 08 7F 60 DB T_VV2, 01111111B, 01100000B
EB9D 24 45 DB T_NAP, DIL16
EB9F 1B 80 80 DB T_W12, 10000000B, 10000000B ;0+0+0=0
EBA2 1B C0 90 DB T_W12, 11000000B, 10010000B ;0+0+1=1
EBA5 1B 86 BC DB T_W12, 10000110B, 10111100B ;4+3+0=7
EBA8 1B C6 A2 DB T_W12, 11000110B, 10100010B ;4+3+1=8
EBAB 1B 8D D1 DB T_W12, 10001101B, 11010001B ;7+4+0=11
EBAE 1B CD C9 DB T_W12, 11001101B, 11001001B ;7+4+1=12
EBB1 1B 98 B9 DB T_W12, 10011000B, 10111001B ;8+5+0=13
EBB4 1B A5 85 DB T_W12, 10100101B, 10000101B ;6+8+0=14
EBB7 1B F0 F3 DB T_W12, 11110000B, 11110011B ;9+9+1=19
EBBA FE DB T_KONEC
;4bit. komparator
;4585 1=<>=22 33><001 3210 3210 ><= ><=
EBBB I4585T: ; ZAIIIQAB NABQQBAB AAAA BBBB III QQQ
EBBB 08 7B 67 DB T_VV2, 01111011B, 01100111B ; 3210 3210 ><= ><=
EBBE 24 45 DB T_NAP, DIL16 ; AAAA BBBB III QQQ
EBC0 1B AA D5 DB T_W12, 10101010B, 11010101B ;A>B 1100 0011 101 100
EBC3 1B E1 AA DB T_W12, 11100001B, 10101010B ;Ab - A=B 1010 1010 100 100
EBC9 1B A7 86 DB T_W12, 10100111B, 10000110B ;a=b - A=B 0101 0101 001 001
EBCC 1B D3 89 DB T_W12, 11010011B, 10001001B ;ab - A=B 1100 1100 111 011
EBD5 1B DB E9 DB T_W12, 11011011B, 11101001B ;a<>b - A=B 1110 1110 110 010
EBD8 1B C0 87 DB T_W12, 11000000B, 10000111B ;a..b - A=B 0011 0011 000 000
EBDB FE DB T_KONEC
PROGRAM IOT MACRO-80 3.44 09-Dec-81 PAGE 1-318
;***********************
;* OSTATNI IO A 75XXX *
;***********************
;delic kmitoctu pro D355D/E355D
; III II I
;D351D/E351D TTSOOO OSTOTO
EBDC ID351T: ; Z212KIHX XNG14F3E
EBDC 08 70 1A DB T_VV2, 01110000B, 00011010B
EBDF 24 44 DB T_NAP, DIL14
EBE1 1B EF EF DB T_W12, 11101111B, 11101111B ;RESET
EBE4 1B EF FF DB T_W12, 11101111B, 11111111B ;BUDE CITAT JEN S OE,OF A OG
EBE7 1B CF FE DB T_W12, 11001111B, 11111110B
EBEA 1B AF FA DB T_W12, 10101111B, 11111010B
EBED 1B CF FA DB T_W12, 11001111B, 11111010B
EBF0 1B AF D8 DB T_W12, 10101111B, 11011000B
EBF3 1B CF DA DB T_W12, 11001111B, 11011010B
EBF6 1B AF D8 DB T_W12, 10101111B, 11011000B
EBF9 1B CF DA DB T_W12, 11001111B, 11011010B
EBFC 1B AF DC DB T_W12, 10101111B, 11011100B
EBFF 1B CF DE DB T_W12, 11001111B, 11011110B
EC02 1B AF DC DB T_W12, 10101111B, 11011100B
EC05 1B CF DF DB T_W12, 11001111B, 11011111B
EC08 1B AF DD DB T_W12, 10101111B, 11011101B
EC0B 1B CF DF DB T_W12, 11001111B, 11011111B
EC0E 1B AF F9 DB T_W12, 10101111B, 11111001B
EC11 1B CF FB DB T_W12, 11001111B, 11111011B
EC14 1B AF F9 DB T_W12, 10101111B, 11111001B
EC17 1B CF FB DB T_W12, 11001111B, 11111011B
EC1A 1B AF F9 DB T_W12, 10101111B, 11111001B
EC1D 1B CF FB DB T_W12, 11001111B, 11111011B
EC20 1B AF FD DB T_W12, 10101111B, 11111101B
EC23 1B CF FE DB T_W12, 11001111B, 11111110B
EC26 1B AF FC DB T_W12, 10101111B, 11111100B
EC29 1B CF FE DB T_W12, 11001111B, 11111110B
EC2C 1B AF DC DB T_W12, 10101111B, 11011100B
EC2F 1B CF DE DB T_W12, 11001111B, 11011110B
EC32 1B AF D8 DB T_W12, 10101111B, 11011000B
EC35 1B CF DA DB T_W12, 11001111B, 11011010B
EC38 1B EF EF DB T_W12, 11101111B, 11101111B ;RESET
EC3B 1B FF EF DB T_W12, 11111111B, 11101111B ;BUDE CITAT JEN S OH,OI A OK
EC3E 1B F1 E7 DB T_W12, 11110001B, 11100111B
EC41 1B F1 EF DB T_W12, 11110001B, 11101111B
EC44 21 DB T_GOSUB
EC45 ECCC DW GD351T
EC47 1B F1 E7 DB T_W12, 11110001B, 11100111B
EC4A 1B F1 EF DB T_W12, 11110001B, 11101111B
EC4D 1B F3 E7 DB T_W12, 11110011B, 11100111B
EC50 1B F3 EF DB T_W12, 11110011B, 11101111B
EC53 21 DB T_GOSUB
EC54 ECCC DW GD351T
EC56 1B F3 E7 DB T_W12, 11110011B, 11100111B
EC59 1B F3 EF DB T_W12, 11110011B, 11101111B
EC5C 1B F5 E7 DB T_W12, 11110101B, 11100111B
EC5F 1B F5 EF DB T_W12, 11110101B, 11101111B
PROGRAM IOT MACRO-80 3.44 09-Dec-81 PAGE 1-319
EC62 21 DB T_GOSUB
EC63 ECCC DW GD351T
EC65 1B F5 E7 DB T_W12, 11110101B, 11100111B
EC68 1B F5 EF DB T_W12, 11110101B, 11101111B
EC6B 1B F7 E7 DB T_W12, 11110111B, 11100111B
EC6E 1B F7 EF DB T_W12, 11110111B, 11101111B
EC71 21 DB T_GOSUB
EC72 ECCC DW GD351T
EC74 1B F7 E7 DB T_W12, 11110111B, 11100111B
EC77 1B F7 EF DB T_W12, 11110111B, 11101111B
EC7A 1B F9 E7 DB T_W12, 11111001B, 11100111B
EC7D 1B F9 EF DB T_W12, 11111001B, 11101111B
EC80 21 DB T_GOSUB
EC81 ECCC DW GD351T
EC83 1B F9 E7 DB T_W12, 11111001B, 11100111B
EC86 1B F9 EF DB T_W12, 11111001B, 11101111B
EC89 1B FB E7 DB T_W12, 11111011B, 11100111B
EC8C 1B FB EF DB T_W12, 11111011B, 11101111B
EC8F 21 DB T_GOSUB
EC90 ECCC DW GD351T
EC92 1B FB E7 DB T_W12, 11111011B, 11100111B
EC95 1B FB EF DB T_W12, 11111011B, 11101111B
EC98 1B FD E7 DB T_W12, 11111101B, 11100111B
EC9B 1B FD EF DB T_W12, 11111101B, 11101111B
EC9E 21 DB T_GOSUB
EC9F ECCC DW GD351T
ECA1 1B FD E7 DB T_W12, 11111101B, 11100111B
ECA4 1B FD EF DB T_W12, 11111101B, 11101111B
ECA7 1B FF E7 DB T_W12, 11111111B, 11100111B
ECAA 1B FF EF DB T_W12, 11111111B, 11101111B
ECAD 21 DB T_GOSUB
ECAE ECCC DW GD351T
ECB0 1B FF E7 DB T_W12, 11111111B, 11100111B
ECB3 1B FF EF DB T_W12, 11111111B, 11101111B
ECB6 1B F1 E7 DB T_W12, 11110001B, 11100111B
ECB9 1B F1 EF DB T_W12, 11110001B, 11101111B
ECBC 21 DB T_GOSUB
ECBD ECCC DW GD351T
ECBF 1B F1 E7 DB T_W12, 11110001B, 11100111B
ECC2 1B F1 EF DB T_W12, 11110001B, 11101111B
ECC5 1B F3 E7 DB T_W12, 11110011B, 11100111B
ECC8 1B F3 EF DB T_W12, 11110011B, 11101111B
ECCB FE DB T_KONEC
ECCC 0A E7 GD351T: DB T_O2, 11100111B
ECCE 0A EF DB T_O2, 11101111B
ECD0 0A E7 DB T_O2, 11100111B
ECD2 0A EF DB T_O2, 11101111B
ECD4 0A E7 DB T_O2, 11100111B
ECD6 0A EF DB T_O2, 11101111B
ECD8 0A E7 DB T_O2, 11100111B
ECDA 0A EF DB T_O2, 11101111B
ECDC 0A E7 DB T_O2, 11100111B
ECDE 0A EF DB T_O2, 11101111B
ECE0 0A E7 DB T_O2, 11100111B
ECE2 0A EF DB T_O2, 11101111B
PROGRAM IOT MACRO-80 3.44 09-Dec-81 PAGE 1-320
ECE4 0A E7 DB T_O2, 11100111B
ECE6 0A EF DB T_O2, 11101111B
ECE8 0A E7 DB T_O2, 11100111B
ECEA 0A EF DB T_O2, 11101111B
ECEC 0A E7 DB T_O2, 11100111B
ECEE 0A EF DB T_O2, 11101111B
ECF0 0A E7 DB T_O2, 11100111B
ECF2 0A EF DB T_O2, 11101111B
ECF4 22 DB T_RET
;4x vysilac/primac sbrnice (GPIB)
;MH8641 DODBODB BDOBDOD
ECF5 I8641T: ; ZB444333 N111222A
ECF5 08 52 25 DB T_VV2, 01010010B, 00100101B
ECF8 24 45 DB T_NAP, DIL16
ECFA 1B CB CD DB T_W12, 11001011B, 11001101B
ECFD 1B D9 E8 DB T_W12, 11011001B, 11101000B
ED00 1B 8B CD DB T_W12, 10001011B, 11001101B
ED03 1B B1 B8 DB T_W12, 10110001B, 10111000B
ED06 1B 8E C6 DB T_W12, 10001110B, 11000110B
ED09 1B CB CD DB T_W12, 11001011B, 11001101B
ED0C 08 5B 6D DB T_VV2, 01011011B, 01101101B
ED0F 1B B1 E3 DB T_W12, 10110001B, 11100011B
ED12 1B DB B7 DB T_W12, 11011011B, 10110111B
ED15 1B E4 C8 DB T_W12, 11100100B, 11001000B
ED18 1B 8E 9D DB T_W12, 10001110B, 10011101B
ED1B FE DB T_KONEC
;aproximacni registr 8bit.
;MHB1502 _ _
; QQQQCD QQQQQ_C
ED1C I1502T: ; ZD3210C0 N77654SP
ED1C 08 40 03 DB T_VV2, 01000000B, 00000011B
ED1F 24 45 DB T_NAP, DIL16
ED21 0B 82 C2 DB T_O12, 10000010B, 11000010B
ED24 0A C3 DB T_O2, 11000011B
ED26 0A C0 DB T_O2, 11000000B
ED28 1B BE DF DB T_W12, 10111110B, 11011111B ;VYCHOZI STAV
ED2B 1B BE DE DB T_W12, 10111110B, 11011110B
ED2E 1B FF AF DB T_W12, 11111111B, 10101111B
ED31 1B FF AE DB T_W12, 11111111B, 10101110B
ED34 1B BE A7 DB T_W12, 10111110B, 10100111B
ED37 1B BE A6 DB T_W12, 10111110B, 10100110B
ED3A 1B FF AB DB T_W12, 11111111B, 10101011B
ED3D 1B FF AA DB T_W12, 11111111B, 10101010B
ED40 1B 9E AB DB T_W12, 10011110B, 10101011B
ED43 1B 9E AA DB T_W12, 10011110B, 10101010B
ED46 1B EF AB DB T_W12, 11101111B, 10101011B
ED49 1B EF AA DB T_W12, 11101111B, 10101010B
ED4C 1B A6 AB DB T_W12, 10100110B, 10101011B
ED4F 1B A6 AA DB T_W12, 10100110B, 10101010B
ED52 1B EB AB DB T_W12, 11101011B, 10101011B
ED55 1B EB AA DB T_W12, 11101011B, 10101010B
ED58 1B A8 AB DB T_W12, 10101000B, 10101011B
ED5B 1B A8 AA DB T_W12, 10101000B, 10101010B
ED5E 1B E9 AB DB T_W12, 11101001B, 10101011B
PROGRAM IOT MACRO-80 3.44 09-Dec-81 PAGE 1-321
ED61 1B E9 AA DB T_W12, 11101001B, 10101010B
ED64 1B E9 AB DB T_W12, 11101001B, 10101011B
ED67 0B C0 C0 DB T_O12, 11000000B, 11000000B
ED6A 1B FF DF DB T_W12, 11111111B, 11011111B ;VYCHOZI STAV
ED6D 1B FF DE DB T_W12, 11111111B, 11011110B
ED70 1B BE CF DB T_W12, 10111110B, 11001111B
ED73 1B BE CE DB T_W12, 10111110B, 11001110B
ED76 1B FF D7 DB T_W12, 11111111B, 11010111B
ED79 1B FF D6 DB T_W12, 11111111B, 11010110B
ED7C 1B BE D3 DB T_W12, 10111110B, 11010011B
ED7F 1B BE D2 DB T_W12, 10111110B, 11010010B
ED82 1B DF D7 DB T_W12, 11011111B, 11010111B
ED85 1B DF D6 DB T_W12, 11011111B, 11010110B
ED88 1B 8E D7 DB T_W12, 10001110B, 11010111B
ED8B 1B 8E D6 DB T_W12, 10001110B, 11010110B
ED8E 1B D7 D7 DB T_W12, 11010111B, 11010111B
ED91 1B D7 D6 DB T_W12, 11010111B, 11010110B
ED94 1B 92 D7 DB T_W12, 10010010B, 11010111B
ED97 1B 92 D6 DB T_W12, 10010010B, 11010110B
ED9A 1B D5 D7 DB T_W12, 11010101B, 11010111B
ED9D FE DB T_KONEC
;aproximacni registr 12bit. _
;MHB1504 Q Q Q _
; NQQQQQ 1QQQQN_C 1N1QCD_
ED9E I1504T: ; ZDC54321 09876CSP N1C10C0E
ED9E 10 40 03 01 DB T_VV3, 01000000B, 00000011B, 00000001B
EDA2 26 20 04 20 DB T_NZ3, 00100000B, 00000100B, 00100000B
EDA6 24 47 DB T_NAP, DIL24
EDA8 0F A0 C6 A4 DB T_O123, 10100000B, 11000110B, 10100100B
EDAC 0A C7 DB T_O2, 11000111B
EDAE 0A C4 DB T_O2, 11000100B
EDB0 1F BF FF EC DB T_W123, 10111111B, 11111111B, 11101100B ;VYCHOZI STAV
EDB4 1F BF FF BD DB T_W123, 10111111B, 11111111B, 10111101B
EDB8 1F FF FE BD DB T_W123, 11111111B, 11111110B, 10111101B
EDBC 1F FF FF EE DB T_W123, 11111111B, 11111111B, 11101110B
EDC0 1F BF FE EE DB T_W123, 10111111B, 11111110B, 11101110B
EDC4 1F BF 7F EC DB T_W123, 10111111B, 01111111B, 11101100B
EDC8 1F FF 7E EC DB T_W123, 11111111B, 01111110B, 11101100B
EDCC 1F FF BF EE DB T_W123, 11111111B, 10111111B, 11101110B
EDD0 1F BF BE EE DB T_W123, 10111111B, 10111110B, 11101110B
EDD4 1F BF 9F EC DB T_W123, 10111111B, 10011111B, 11101100B
EDD8 1F FF 9E EC DB T_W123, 11111111B, 10011110B, 11101100B
EDDC 1F FF AF EE DB T_W123, 11111111B, 10101111B, 11101110B
EDE0 1F BF AE EE DB T_W123, 10111111B, 10101110B, 11101110B
EDE4 1F BF A7 EC DB T_W123, 10111111B, 10100111B, 11101100B
EDE8 1F FF A6 EC DB T_W123, 11111111B, 10100110B, 11101100B
EDEC 1F EF AF EE DB T_W123, 11101111B, 10101111B, 11101110B
EDF0 1F AF AE EE DB T_W123, 10101111B, 10101110B, 11101110B
EDF4 1F A7 AF EC DB T_W123, 10100111B, 10101111B, 11101100B
EDF8 1F E7 AE EC DB T_W123, 11100111B, 10101110B, 11101100B
EDFC 1F EB AF EE DB T_W123, 11101011B, 10101111B, 11101110B
EE00 1F AB AE EE DB T_W123, 10101011B, 10101110B, 11101110B
EE04 1F A9 AF EC DB T_W123, 10101001B, 10101111B, 11101100B
EE08 1F E9 AE EC DB T_W123, 11101001B, 10101110B, 11101100B
EE0C 1F EA AF EE DB T_W123, 11101010B, 10101111B, 11101110B
PROGRAM IOT MACRO-80 3.44 09-Dec-81 PAGE 1-322
EE10 1F AA AE EE DB T_W123, 10101010B, 10101110B, 11101110B
EE14 1F AA AF E4 DB T_W123, 10101010B, 10101111B, 11100100B
EE18 1F EA AE E4 DB T_W123, 11101010B, 10101110B, 11100100B
EE1C 1F EA AF EA DB T_W123, 11101010B, 10101111B, 11101010B
EE20 1F AA AE EA DB T_W123, 10101010B, 10101110B, 11101010B
EE24 0F A0 C4 A4 DB T_O123, 10100000B, 11000100B, 10100100B
EE28 1F BF FF EC DB T_W123, 10111111B, 11111111B, 11101100B ;VYCHOZI STAV
EE2C 1F BF FF EC DB T_W123, 10111111B, 11111111B, 11101100B
EE30 1F FF FE EC DB T_W123, 11111111B, 11111110B, 11101100B
EE34 1F FF 7F BE DB T_W123, 11111111B, 01111111B, 10111110B
EE38 1F BF 7E BE DB T_W123, 10111111B, 01111110B, 10111110B
EE3C 1F BF 3F BC DB T_W123, 10111111B, 00111111B, 10111100B
EE40 1F FF 3E BC DB T_W123, 11111111B, 00111110B, 10111100B
EE44 1F FF 5F BE DB T_W123, 11111111B, 01011111B, 10111110B
EE48 1F BF 5E BE DB T_W123, 10111111B, 01011110B, 10111110B
EE4C 1F BF 4F BC DB T_W123, 10111111B, 01001111B, 10111100B
EE50 1F FF 4E BC DB T_W123, 11111111B, 01001110B, 10111100B
EE54 1F FF 57 BE DB T_W123, 11111111B, 01010111B, 10111110B
EE58 1F BF 56 BE DB T_W123, 10111111B, 01010110B, 10111110B
EE5C 1F AF 57 BC DB T_W123, 10101111B, 01010111B, 10111100B
EE60 1F EF 56 BC DB T_W123, 11101111B, 01010110B, 10111100B
EE64 1F F7 57 BE DB T_W123, 11110111B, 01010111B, 10111110B
EE68 1F B7 56 BE DB T_W123, 10110111B, 01010110B, 10111110B
EE6C 1F B3 57 BC DB T_W123, 10110011B, 01010111B, 10111100B
EE70 1F F3 56 BC DB T_W123, 11110011B, 01010110B, 10111100B
EE74 1F F5 57 BE DB T_W123, 11110101B, 01010111B, 10111110B
EE78 1F B5 56 BE DB T_W123, 10110101B, 01010110B, 10111110B
EE7C 1F B4 57 BC DB T_W123, 10110100B, 01010111B, 10111100B
EE80 1F F4 56 BC DB T_W123, 11110100B, 01010110B, 10111100B
EE84 1F F5 57 B6 DB T_W123, 11110101B, 01010111B, 10110110B
EE88 1F B5 56 B6 DB T_W123, 10110101B, 01010110B, 10110110B
EE8C 1F B5 57 B0 DB T_W123, 10110101B, 01010111B, 10110000B
EE90 1F F5 56 B0 DB T_W123, 11110101B, 01010110B, 10110000B
EE94 1F F5 57 B2 DB T_W123, 11110101B, 01010111B, 10110010B
EE98 1F B5 56 B2 DB T_W123, 10110101B, 01010110B, 10110010B
EE9C FE DB T_KONEC
;2X vysilac sbrnice (IBM 360/370) s R75123
;8T23, 75123 1111111 2222222
EE9D I8T23T: ; ZYFEDCBA NFEDCBAY
EE9D 08 3F 7E DB T_VV2, 00111111B, 01111110B
EEA0 24 45 DB T_NAP, DIL16
EEA2 1B 80 FF DB T_W12, 10000000B, 11111111B
EEA5 1B F0 80 DB T_W12, 11110000B, 10000000B
EEA8 1B CF A0 DB T_W12, 11001111B, 10100000B
EEAB 1B 87 8E DB T_W12, 10000111B, 10001110B
EEAE 1B 8B 96 DB T_W12, 10001011B, 10010110B
EEB1 1B 8D 9A DB T_W12, 10001101B, 10011010B
EEB4 1B 8E 9C DB T_W12, 10001110B, 10011100B
EEB7 1B 90 E1 DB T_W12, 10010000B, 11100001B
EEBA 1B A0 9F DB T_W12, 10100000B, 10011111B
EEBD FE DB T_KONEC
;3x primac sbrnice (IBM 360/370)
;8T24, 75124 2222211 1113333
EEBE I8T24T: ; ZYBASRBA NSRYASRY
PROGRAM IOT MACRO-80 3.44 09-Dec-81 PAGE 1-323
EEBE 08 3F 6E DB T_VV2, 00111111B, 01101110B
EEC1 24 45 DB T_NAP, DIL16
EEC3 1B C3 E1 DB T_W12, 11000011B, 11100001B
EEC6 1B C7 C8 DB T_W12, 11000111B, 11001000B
EEC9 1B 8B A4 DB T_W12, 10001011B, 10100100B
EECC 1B CF 8C DB T_W12, 11001111B, 10001100B
EECF 1B D2 F3 DB T_W12, 11010010B, 11110011B
EED2 1B D6 CA DB T_W12, 11010110B, 11001010B
EED5 1B 9A B7 DB T_W12, 10011010B, 10110111B
EED8 1B DE 9E DB T_W12, 11011110B, 10011110B
EEDB 1B E1 FE DB T_W12, 11100001B, 11111110B
EEDE 1B E5 C7 DB T_W12, 11100101B, 11000111B
EEE1 1B A9 BA DB T_W12, 10101001B, 10111010B
EEE4 1B ED 93 DB T_W12, 11101101B, 10010011B
EEE7 1B B0 FC DB T_W12, 10110000B, 11111100B
EEEA 1B B4 C4 DB T_W12, 10110100B, 11000100B
EEED 1B B8 B8 DB T_W12, 10111000B, 10111000B
EEF0 1B BC 91 DB T_W12, 10111100B, 10010001B
EEF3 FE DB T_KONEC
;4x vysilac/primac dat. sbrnice (GPIB)
;75160, 75163 BBBBBBB DDDDDDDP DBT
EEF4 I75160T: ; Z8765432 2345678E XXN11EXX
EEF4 10 00 FF 14 DB T_VV3, 00000000B, 11111111B, 00010100B ;D -> B
EEF8 24 46 DB T_NAP, DIL20
EEFA 1F FF FE FF DB T_W123, 11111111B, 11111110B, 11111111B
EEFE 1F FF FF E7 DB T_W123, 11111111B, 11111111B, 11100111B
EF02 1F FE 7F FF DB T_W123, 11111110B, 01111111B, 11111111B
EF06 1B FD BF DB T_W12, 11111101B, 10111111B
EF09 1B FB DF DB T_W12, 11111011B, 11011111B
EF0C 1B F7 EF DB T_W12, 11110111B, 11101111B
EF0F 1B EF F7 DB T_W12, 11101111B, 11110111B
EF12 1B DF FB DB T_W12, 11011111B, 11111011B
EF15 1B BF FD DB T_W12, 10111111B, 11111101B
EF18 1F 80 01 FF DB T_W123, 10000000B, 00000001B, 11111111B
EF1C 1F 81 81 E7 DB T_W123, 10000001B, 10000001B, 11100111B
EF20 1B 82 41 DB T_W12, 10000010B, 01000001B
EF23 1B 84 21 DB T_W12, 10000100B, 00100001B
EF26 1B 88 11 DB T_W12, 10001000B, 00010001B
EF29 1B 90 09 DB T_W12, 10010000B, 00001001B
EF2C 1B A0 05 DB T_W12, 10100000B, 00000101B
EF2F 1B C0 03 DB T_W12, 11000000B, 00000011B
EF32 10 7F 01 0C DB T_VV3, 01111111B, 00000001B, 00001100B ;B -> D
EF36 1F FF FF E3 DB T_W123, 11111111B, 11111111B, 11100011B
EF3A 1F FE 7F FB DB T_W123, 11111110B, 01111111B, 11111011B
EF3E 1B FD BF DB T_W12, 11111101B, 10111111B
EF41 1B FB DF DB T_W12, 11111011B, 11011111B
EF44 1B F7 EF DB T_W12, 11110111B, 11101111B
EF47 1B EF F7 DB T_W12, 11101111B, 11110111B
EF4A 1B DF FB DB T_W12, 11011111B, 11111011B
EF4D 1B BF FD DB T_W12, 10111111B, 11111101B
EF50 1F 80 01 FB DB T_W123, 10000000B, 00000001B, 11111011B
EF54 1F 81 81 E3 DB T_W123, 10000001B, 10000001B, 11100011B
EF58 1B 82 41 DB T_W12, 10000010B, 01000001B
EF5B 1B 84 21 DB T_W12, 10000100B, 00100001B
EF5E 1B 88 11 DB T_W12, 10001000B, 00010001B
PROGRAM IOT MACRO-80 3.44 09-Dec-81 PAGE 1-324
EF61 1B 90 09 DB T_W12, 10010000B, 00001001B
EF64 1B A0 05 DB T_W12, 10100000B, 00000101B
EF67 1B C0 03 DB T_W12, 11000000B, 00000011B
EF6A FE DB T_KONEC
;4x vysilac/primac ridici sbrnice (pristroj GPIB)
; GPIB I/O I/O\/GPIB
; NN NN
; SAEDRDI IDFDEAS RR
;75161 QTOAFAF FARAOTQD EET
EF6B I75161T: ; ZRNIVDCC CCDVINRC XXNNNEXX
EF6B 10 27 1B 0C DB T_VV3, 00100111B, 00011011B, 00001100B
EF6F 24 46 DB T_NAP, DIL20
EF71 1F AA 55 FF DB T_W123, 10101010B, 01010101B, 11111111B
EF75 1F F5 AF E7 DB T_W123, 11110101B, 10101111B, 11100111B
EF79 08 37 13 DB T_VV2, 00110111B, 00010011B
EF7C 1B 8A 51 DB T_W12, 10001010B, 01010001B
EF7F 1B D5 AB DB T_W12, 11010101B, 10101011B
EF82 10 58 E5 14 DB T_VV3, 01011000B, 11100101B, 00010100B
EF86 1F AA 54 FB DB T_W123, 10101010B, 01010100B, 11111011B
EF8A 1F F5 AE E3 DB T_W123, 11110101B, 10101110B, 11100011B
EF8E 08 48 ED DB T_VV2, 01001000B, 11101101B
EF91 1B 8A 50 DB T_W12, 10001010B, 01010000B
EF94 1B D5 AA DB T_W12, 11010101B, 10101010B
EF97 10 39 63 0C DB T_VV3, 00111001B, 01100011B, 00001100B
EF9B 1F 80 01 E3 DB T_W123, 10000000B, 00000001B, 11100011B
EF9F 1B C0 03 DB T_W12, 11000000B, 00000011B
EFA2 1B A0 05 DB T_W12, 10100000B, 00000101B
EFA5 1B 90 09 DB T_W12, 10010000B, 00001001B
EFA8 1B 88 11 DB T_W12, 10001000B, 00010001B
EFAB 1B 84 21 DB T_W12, 10000100B, 00100001B
EFAE 1B 82 41 DB T_W12, 10000010B, 01000001B
EFB1 1B 81 81 DB T_W12, 10000001B, 10000001B
EFB4 1F 80 01 FB DB T_W123, 10000000B, 00000001B, 11111011B
EFB8 10 46 9D 14 DB T_VV3, 01000110B, 10011101B, 00010100B
EFBC 1F FF FE FF DB T_W123, 11111111B, 11111110B, 11111111B
EFC0 1F FF FE E7 DB T_W123, 11111111B, 11111110B, 11100111B
EFC4 1F FE 7E FF DB T_W123, 11111110B, 01111110B, 11111111B
EFC8 1B FD BE DB T_W12, 11111101B, 10111110B
EFCB 1B FB DE DB T_W12, 11111011B, 11011110B
EFCE 1B F7 EE DB T_W12, 11110111B, 11101110B
EFD1 1B EF F6 DB T_W12, 11101111B, 11110110B
EFD4 1B DF FA DB T_W12, 11011111B, 11111010B
EFD7 1B BF FC DB T_W12, 10111111B, 11111100B
EFDA FE DB T_KONEC
;do GPIB
;R=1
;T=0
;H = vysoka zrover, L = nmzka zrover, R = pxmjem, T = vysmlanm, X = irelevantnm
;Smlr pxenosu dat je ze strany terminalu na stranu sblrnice a smlr pxmjmu dat je
; ze strany sblrnice na stranu terminalu.
;Pxenos dat je neinvertujmcm v obou smlrech.
; ATN je normalnm transceiverov} kanal, kter} funguje navmc jako internm ovladanm
; smlru nebo povolenm hovoru pro EOI, kdykoli DC a TE
PROGRAM IOT MACRO-80 3.44 09-Dec-81 PAGE 1-325
;vstupy jsou ve stejnim stavu. Kdy jsou DC a TE v opahn}ch stavech, kanal ATN funguje
; pouze jako nezavisl} transceiver
;4x vysilac/primac ridici sbrnice (radic GPIB)
;75162
EFDB I75162T:
EFDB 00 DB T_NIC
;ZIF28
; D D D D D D D D
; I I I I I I I I
; L L L L L L L L
; 2 2 1 1 1 1 2 2
; 4 0 6 4 ZIF 28 4 6 0 4
; . . . . +--\/--+ . . . .
;( . . . . = 1 28= . . . . P1-7)
;(PR-4 . . . . = 2 27= . . . . P3-7)
; P2-0 1 . . . = 3 26= . . . 24 VCC
; P2-1 2 . . . = 4 25= . . . 23 P2-6
; P2-2 3 1 . . = 5 24= . . 20 22 P2-5/VCC
; P2-3 4 2 . . = 6 23= . . 19 21 P2-4
; P0-O 5 3 1 . = 7 22= . 16 18 20 P1-7/VCC
; P0-1 6 4 2 1 = 8 21= 14 15 17 19 P1-6/VCC
; P0-2 7 5 3 2 = 9 20= 13 14 16 18 P1-5
; P0-3 8 6 4 3 =10 19= 12 13 15 17 P1-4
; P0-4 9 7 5 4 =11 18= 11 12 14 16 P1-3
; P0-5 10 8 6 5 =12 17= 10 11 13 15 P1-2
; P0-6 11 9 7 6 =13 16= 9 10 12 14 P1-1
; GND 12 10 8 7 =14 15= 8 9 11 13 P1-0
; +------+
;nasobicka 4x2 bitu C
; X N Y
; SSSS-XX _KKKKSS+ -YYXXCX
EFDC I25S05T: ; Z3210101 P0123544 N10123N4
EFDC 10 07 F8 7F DB T_VV3, 00000111B, 11111000B, 01111111B
EFE0 24 47 DB T_NAP, DIL24
EFE2 1F 80 00 80 DB T_W123, 10000000B, 00000000B, 10000000B
EFE6 1F FF FF FF DB T_W123, 11111111B, 11111111B, 11111111B
EFEA 1F DA AE 8A DB T_W123, 11011010B, 10101110B, 10001010B
EFEE 1F DA 50 CA DB T_W123, 11011010B, 01010000B, 11001010B
EFF2 1F AA AF AA DB T_W123, 10101010B, 10101111B, 10101010B
EFF6 1F 82 53 EA DB T_W123, 10000010B, 01010011B, 11101010B
EFFA 1F FD AC 95 DB T_W123, 11111101B, 10101100B, 10010101B
EFFE 1F AA A9 9A DB T_W123, 10101010B, 10101001B, 10011010B
F002 1F 82 51 DA DB T_W123, 10000010B, 01010001B, 11011010B
F006 1F 82 A9 BA DB T_W123, 10000010B, 10101001B, 10111010B
F00A 1F AA 51 FA DB T_W123, 10101010B, 01010001B, 11111010B
F00E 1F FD FE 85 DB T_W123, 11111101B, 11111110B, 10000101B
F012 1F CD 7F C5 DB T_W123, 11001101B, 01111111B, 11000101B
F016 1F A5 F9 A5 DB T_W123, 10100101B, 11111001B, 10100101B
F01A 1F A5 7F E5 DB T_W123, 10100101B, 01111111B, 11100101B
F01E 1F A5 FF 95 DB T_W123, 10100101B, 11111111B, 10010101B
F022 1F A5 79 D5 DB T_W123, 10100101B, 01111001B, 11010101B
PROGRAM IOT MACRO-80 3.44 09-Dec-81 PAGE 1-326
F026 1F CD FF B5 DB T_W123, 11001101B, 11111111B, 10110101B
F02A 1F F5 7F F5 DB T_W123, 11110101B, 01111111B, 11110101B
F02E 1F CA CE 89 DB T_W123, 11001010B, 11001110B, 10001001B
F032 1F DA 30 C9 DB T_W123, 11011010B, 00110000B, 11001001B
F036 1F 9A CF A9 DB T_W123, 10011010B, 11001111B, 10101001B
F03A 1F 82 31 E9 DB T_W123, 10000010B, 00110001B, 11101001B
F03E 1F 9A CF 99 DB T_W123, 10011010B, 11001111B, 10011001B
F042 1F 82 31 D9 DB T_W123, 10000010B, 00110001B, 11011001B
F046 1F F2 CE B9 DB T_W123, 11110010B, 11001110B, 10111001B
F04A 1F AA 31 F9 DB T_W123, 10101010B, 00110001B, 11111001B
F04E 1F 8D 80 86 DB T_W123, 10001101B, 10000000B, 10000110B
F052 1F 9D C0 CE DB T_W123, 10011101B, 11000000B, 11001110B
F056 1F CD E0 A6 DB T_W123, 11001101B, 11100000B, 10100110B
F05A 1F 95 F1 E6 DB T_W123, 10010101B, 11110001B, 11100110B
F05E 1F AD F9 96 DB T_W123, 10101101B, 11111001B, 10010110B
F062 1F ED 70 D6 DB T_W123, 11101101B, 01110000B, 11010110B
F066 1F AD 60 BE DB T_W123, 10101101B, 01100000B, 10111110B
F06A 1F 8D 41 F6 DB T_W123, 10001101B, 01000001B, 11110110B
F06E 1F CD 0E 87 DB T_W123, 11001101B, 00001110B, 10000111B
F072 1F DD 1F CF DB T_W123, 11011101B, 00011111B, 11001111B
F076 1F CD 3F A7 DB T_W123, 11001101B, 00111111B, 10100111B
F07A 1F AD 7F E7 DB T_W123, 10101101B, 01111111B, 11100111B
F07E 1F AD FF 97 DB T_W123, 10101101B, 11111111B, 10010111B
F082 1F CD BF D7 DB T_W123, 11001101B, 10111111B, 11010111B
F086 1F DD 9F BF DB T_W123, 11011101B, 10011111B, 10111111B
F08A 1F C5 8F F7 DB T_W123, 11000101B, 10001111B, 11110111B
F08E FE DB T_KONEC
;*****************************
;* TESTY TESTERU IO - DTO-1 *
;*****************************
;Test prevazne BWP-1
F08F ITEST1T: ; 76543210P1 76543210P2 76543210P3
F08F 10 FF FF FF DB T_VV3, 11111111B, 11111111B, 11111111B
F093 24 47 DB T_NAP, DIL24
F095 1F FF FF FF DB T_W123, 11111111B, 11111111B, 11111111B
F099 1F 00 00 00 DB T_W123, 00000000B, 00000000B, 00000000B
F09D 1F 7F F7 FE DB T_W123, 01111111B, 11110111B, 11111110B
F0A1 1F BF FB FD DB T_W123, 10111111B, 11111011B, 11111101B
F0A5 1F DF FD FB DB T_W123, 11011111B, 11111101B, 11111011B
F0A9 1F EF FE F7 DB T_W123, 11101111B, 11111110B, 11110111B
F0AD 1F F7 EF EF DB T_W123, 11110111B, 11101111B, 11101111B
F0B1 1F FB DF DF DB T_W123, 11111011B, 11011111B, 11011111B
F0B5 1F FD BF BF DB T_W123, 11111101B, 10111111B, 10111111B
F0B9 1F FE 7F 7F DB T_W123, 11111110B, 01111111B, 01111111B
F0BD 1F 00 00 00 DB T_W123, 00000000B, 00000000B, 00000000B
F0C1 1F 10 01 80 DB T_W123, 00010000B, 00000001B, 10000000B
F0C5 1F 20 02 40 DB T_W123, 00100000B, 00000010B, 01000000B
F0C9 1F 40 04 20 DB T_W123, 01000000B, 00000100B, 00100000B
F0CD 1F 80 08 10 DB T_W123, 10000000B, 00001000B, 00010000B
F0D1 1F 08 10 08 DB T_W123, 00001000B, 00010000B, 00001000B
F0D5 1F 04 20 04 DB T_W123, 00000100B, 00100000B, 00000100B
F0D9 1F 02 40 02 DB T_W123, 00000010B, 01000000B, 00000010B
F0DD 1F 01 80 01 DB T_W123, 00000001B, 10000000B, 00000001B
F0E1 10 00 00 00 DB T_VV3, 00000000B, 00000000B, 00000000B
F0E5 0F 00 00 00 DB T_O123, 00000000B, 00000000B, 00000000B
PROGRAM IOT MACRO-80 3.44 09-Dec-81 PAGE 1-327
F0E9 07 FF FF FF DB T_I123, 11111111B, 11111111B, 11111111B
F0ED 10 01 80 01 DB T_VV3, 00000001B, 10000000B, 00000001B
F0F1 07 FE 7F FE DB T_I123, 11111110B, 01111111B, 11111110B
F0F5 10 02 40 02 DB T_VV3, 00000010B, 01000000B, 00000010B
F0F9 07 FD BF FD DB T_I123, 11111101B, 10111111B, 11111101B
F0FD 10 04 20 04 DB T_VV3, 00000100B, 00100000B, 00000100B
F101 07 FB DF FB DB T_I123, 11111011B, 11011111B, 11111011B
F105 10 08 10 08 DB T_VV3, 00001000B, 00010000B, 00001000B
F109 07 F7 EF F7 DB T_I123, 11110111B, 11101111B, 11110111B
F10D 10 10 08 80 DB T_VV3, 00010000B, 00001000B, 10000000B
F111 07 EF F7 7F DB T_I123, 11101111B, 11110111B, 01111111B
F115 10 20 04 40 DB T_VV3, 00100000B, 00000100B, 01000000B
F119 07 DF FB BF DB T_I123, 11011111B, 11111011B, 10111111B
F11D 10 40 02 20 DB T_VV3, 01000000B, 00000010B, 00100000B
F121 07 BF FD DF DB T_I123, 10111111B, 11111101B, 11011111B
F125 10 80 01 10 DB T_VV3, 10000000B, 00000001B, 00010000B
F129 07 7F FE EF DB T_I123, 01111111B, 11111110B, 11101111B
F12D FE DB T_KONEC
;Test prevazne DTO-1 ZIF28 s R_TEST1
F12E ITEST2T:
F12E 24 44 DB T_NAP, DIL14
F130 24 45 DB T_NAP, DIL16
F132 24 46 DB T_NAP, DIL20
F134 24 47 DB T_NAP, DIL24
F136 FE DB T_KONEC
;Test prevazne DTO-1 ZIF16 s R_TEST2
F137 ITEST3T:
F137 24 48 DB T_NAP, DIL5_12
F139 24 49 DB T_NAP, DIL4_12
F13B 24 4A DB T_NAP, DIL4_13
F13D 24 4B DB T_NAP, DIL5_13
F13F FE DB T_KONEC
9580 DAT EQU $-SADYIO
F140 DATK EQU $
F140 $KONEC EQU $
F400 @KONEC EQU HIGH $KONEC*100H+100H+200H
IF SYS
ORG @KONEC-5
ELSE
.DEPHASE
.PHASE @KONEC-5
ENDIF
F3FB 4B 4F 4E 45 DB 'KONEC'
F3FF 43
IFF SYS ;MIKOS
.DEPHASE
IF MIKOSD
IF @KONEC GT 0F000H
; IF $KONEC GT 0EFFFH
.PRINTX 'PRO MIKOS/D PROGRAM DELSI NEZ EFFFH'
ENDIF
PROGRAM IOT MACRO-80 3.44 09-Dec-81 PAGE 1-328
ENDIF
ENDIF
END
PROGRAM IOT MACRO-80 3.44 09-Dec-81 PAGE S
Macros:
Symbols:
F140 $KONEC F400 @KONEC 4CF2 ADP
4D00 ADP1 00D0 ADP1D 00D1 ADP1R
00D0 ADP1_1 00E0 ADP1_2 00E0 ADP2D
00E1 ADP2R 599D AGND 5975 AGOSUB
5994 AKNAP 5970 ANAP 599B AVCC
FFEB BLOKO 0015 BLOKP 4B6A CADP1
4B72 CADP1A 4B7A CADP2 4B82 CADP2A
5988 CDAT 4B8A CEKEJ 5980 CHLOG
5981 CHLOG1 5788 CHLOGT 5674 CHPOT
0103 CI 57B5 CMOST 0109 CO
4937 COA 597D CPU 5845 CPUT
000D CR 4899 CRLF 4896 CRLF2
5583 CRLFT 0112 CSTS 00E7 CTENI
48B4 CTIZ 0003 CTRLC 4825 DALSI
483B DALSI1 9580 DAT F140 DATK
4942 DBIN 4953 DBIN1 494A DBIN2
491C DBYT 535C DEC 5367 DEC1
5369 DEC2 598D DEERR 597F DIL
0044 DIL14 0045 DIL16 0046 DIL20
0047 DIL24 0049 DIL4_12 004A DIL4_13
0048 DIL5_12 004B DIL5_13 53B8 DILDEL
4C21 DTO 4CAF DTO1 4C3E DTO2
4C60 DTO3 4C6D DTO4 4CE8 DTO5
4CDE DTO6 4CD0 DTO7 4CA9 DTO8
58CE DTOJT 58BC DTONT 58C5 DTOPT
5866 DTOT 5993 ERR 55F1 ERR1T
55F4 ERR2T 55F7 ERR3T 001B ESC
4A3A FCPU 4A54 FCPU1 47B9 FKONEC
DE38 G4020T DE6B G4020TA DE6E G4020TB
DE65 G4020TC DE5F G4020TD DE59 G4020TE
DF77 G4024TA DF7B G4024TB E0E0 G4029T
E403 G4040G E448 G4040TA E442 G4040TB
E69E G4078T EA4C G4518G EA42 G4518T
BD09 G74138T BE86 G74151T BEF8 G74153T
BF8A G74157T BFB2 G74160T BFD9 G74161T
C171 G74168T BFBD G7416XT C46D G74184T
C572 G74190T C666 G74192T AF2F G7423T
CE50 G74374 D10A G74426T D179 G74442T
D3A7 G74461A D3AF G74461B B189 G7446T
B1DC G7448T B2BE G7450T B379 G7453T
D4DA G74540T B470 G7455T D82E G7469X1
D84B G7469X2 D86B G7469X3 D7D4 G7469X4
D7DA G7469X5 D7F5 G7469X6 D8B3 G7469Y0
D8B0 G7469Y1 D93A G7469Y2 D953 G7469Y3
D970 G7469Y4 D8EF G7469Y5 D9E8 G7469Y6
D9A9 G7469Y7 D9B5 G7469Y8 D9AF G7469Y9
B731 G7489T B289 GD347T ECCC GD351T
4917 HADR 492A HBYTE 536F HDEC
4890 HELP 5401 HELPT 598B HLERR
AB42 I1502P ED1C I1502T AB5E I1504P
ED9E I1504T AC90 I25S05P EFDC I25S05T
73F3 I3200 74C5 I3200K 7558 I4000
PROGRAM IOT MACRO-80 3.44 09-Dec-81 PAGE S-1
78F4 I4000K A610 I4000P DC21 I4000T
A624 I4001P DC42 I4001T A62E I4002P
DC54 I4002T AB0A I40106P A638 I4011P
DC7B I4011T A643 I4012P DC8D I4012T
A64E I4013P DCB4 I4013T A65F I4015P
DCCF I4015T A695 I4017P DCFC I4017T
A6B2 I4020P DD6A I4020T A6D1 I4021P
DE7F I4021T A70F I4023P DEC8 I4023T
A71A I4024P DEE6 I4024T A72C I4025P
DFB8 I4025T A736 I4027P DFD6 I4027T
A749 I4028P DFFD I4028T A75F I4029P
E033 I4029T A780 I4030P E113 I4030T
A78C I4032P E125 I4032T A79F I4034P
E195 I4034T A7CB I4035P E29F I4035T
A7E6 I4040P E2E4 I4040T A7F9 I4042P
E44E I4042T A808 I4043P E46F I4043T
A81E I4048P E499 I4048T A841 I4063P
A854 I4068P A860 I4068PA E5AD I4068T
E586 I4068TA A868 I4069P A874 I4071P
E5D4 I4071T A87D I4072P E5E6 I4072T
A886 I4073P E60D I4073T A890 I4075P
E62B I4075T A899 I4076P E649 I4076T
A8A8 I4077P E676 I4077T A8B5 I4078P
A8BF I4078PA E693 I4078T E688 I4078TA
A8C6 I4081P E6BA I4081T A8D0 I4082P
E6CC I4082T A8DA I4093P A8F3 I4094P
E6F3 I4094T A924 I4095P E76E I4095T
E7AA I4096T A934 I4099P E7E6 I4099T
A95A I4311P E86A I4311T 78F4 I4500
7A6E I4500K A980 I4502P E8B6 I4502T
A9A0 I4511P E8C8 I4511T A9C7 I4512P
E914 I4512T A9DE I4515P E942 I4515T
A9FC I4516P E99D I4516T AA1B I4518P
EA3F I4518T AA2A I4520P EA8E I4520T
AA39 I4531P EAB8 I4531T AA50 I4532P
EAD0 I4532T AA6A I4543P EAF4 I4543T
AA95 I4555P EB70 I4555T AAAB I4556P
EB85 I4556T AAC1 I4560P EB9A I4560T
AADA I4581P AAE6 I4582P EBBB I4585T
7A6E I4XXX 7A98 I4XXXK A50D I71004P
A523 I71005P 5D3A I7400 641E I7400K
8764 I7400P AE3C I7400T 8772 I7401P
AE4E I7401T 8780 I7402P AE60 I7402T
878D I7404P AE72 I7404T 879E I7405P
87AF I7406P 87D1 I7407P AE7E I7407T
87EB I7408P AE8A I7408T 87F8 I7409P
641E I74100 69DC I74100K 8E99 I74100P
B9C9 I74100T 8EBE I74107P B9EA I74107T
8ED3 I74109P BA0D I74109T 8805 I7410P
AE9C I7410T BA43 I74111T BA70 I74112T
8EE9 I74113P BA9D I74113T 8EFE I74114P
BABE I74114T 8F21 I74119P BAE2 I74119T
8813 I7411P AEBA I7411T 8F44 I74121P
BB01 I74121T 8F55 I74123P BB5E I74123T
8F77 I74125P BC22 I74125T BC34 I74126T
8F8E I74128P 8820 I7412P 8FAD I74131P
PROGRAM IOT MACRO-80 3.44 09-Dec-81 PAGE S-2
BC46 I74131T 8FCE I74132P 8FE5 I74133P
BC83 I74133T 8FF7 I74136P 9004 I74137P
BCB6 I74137T 9029 I74138P BCE9 I74138T
9042 I74139P BD1C I74139T 882E I7413P
AED8 I7413T 905C I74140P 907A I74141P
9094 I74143P BD3A I74143T 90B1 I74144P
90D4 I74145P 90F2 I74147P BDC1 I74147T
910C I74148P BDE8 I74148T 8845 I7414P
9126 I74150P BE0C I74150T 913E I74151P
BE7B I74151T 9155 I74152P BEB7 I74152T
916C I74153P BEED I74153T 9186 I74154P
BF11 I74154T 919A I74155P BF64 I74155T
91B1 I74156P 91C8 I74157P BF7F I74157T
91E2 I74158P BF97 I74158T 9204 I74159P
885F I7415P 9218 I74160P BFAF I74160T
9237 I74161P BFD6 I74161T 9256 I74162P
C005 I74162T 927C I74163P C00B I74163T
92A2 I74164P C080 I74164T 92DB I74165P
C0B8 I74165T 9315 I74166P C101 I74166T
9358 I74168P C157 I74168T 937E I74169P
C1BC I74169T 886C I7416P 93A4 I74170P
C25F I74170T 93B6 I74173P C2BD I74173T
93C8 I74174P C2DB I74174T 93D7 I74175P
C2F0 I74175T 93E6 I74176P C305 I74176T
93FE I74177P C312 I74177T 888E I7417P
9416 I74180P C364 I74180T 9442 I74181P
C388 I74181T 9451 I74182P C3CF I74182T
9478 I74184P C408 I74184T 948F I74185P
C474 I74185T 94A6 I74188P C4DC I74188T
94B9 I74189P C548 I74189T 88A8 I7418P
C553 I74190T C5AA I74191T 94CB I74192P
C650 I74192T 94FE I74193P C697 I74193T
9531 I74194P C736 I74194T 9577 I74195P
C784 I74195T 95B3 I74198P C7B5 I74198T
88C6 I7419P 69DC I74200 6C67 I74200K
88E0 I7420P AED8 I7420T 88EE I7421P
AEFF I7421T 88FB I7422P C7F9 I74238T
8909 I7423P AF53 I7423R AF26 I7423T
95F9 I74240P C82C I74240T 961E I74241P
C853 I74241T 963B I74242P C87A I74242T
9668 I74243P C8AD I74243T 968D I74244P
C8E0 I74244T 96A4 I74245P C907 I74245T
96C6 I74247P B1D1 I74248T 96E2 I74249P
892F I7424P 96FF I74251P C986 I74251T
9718 I74253P C994 I74253T 9734 I74256P
C9A2 I74256T 9754 I74257P C9E3 I74257T
976E I74258P 9790 I74259P C9F1 I74259T
8946 I7425P AFC3 I7425T 97B5 I74260P
CA4A I74260T 97C2 I74265P CA65 I74265T
97DD I74266P CA77 I74266T 895F I7426P
97ED I74273P CA89 I74273T 9806 I74276P
CAC6 I74276T 9827 I74279P CB68 I74279T
8971 I7427P B005 I7427T CB7D I74280T
9838 I74283P CB95 I74283T 9852 I74287P
CAFD I74287T 897E I7428P 9866 I74290P
CBB9 I74290T 987C I74293P CBE1 I74293T
PROGRAM IOT MACRO-80 3.44 09-Dec-81 PAGE S-3
9898 I74295P CC1A I74295T 98C4 I74298P
CC48 I74298T 98E7 I74299P CC7F I74299T
6C67 I74300 6E0B I74300K 8992 I7430P
B023 I7430T 899D I7431P B062 I7431T
990B I74322P CCDB I74322T 89B6 I7432P
B074 I7432T 89C2 I7433P 9966 I74348P
CD42 I74348T 89D6 I7434P 9988 I74351P
CD66 I74351T 99AA I74352P CDA6 I74352T
99CC I74353P 89EC I7435P 99EE I74363P
CDCA I74363T 9A13 I74365P CDF5 I74365T
9A2A I74366P CE0A I74366T 9A49 I74367P
CE1F I74367T 9A67 I74368P CE34 I74368T
8A02 I7436P B086 I7436T 9A8D I74373P
9AAC I74374P CE49 I74374T 9ACC I74377P
CE61 I74377T 9AEC I74378P CE7E I74378T
9B0C I74379P CEA8 I74379T 8A0F I7437P
CED2 I74386T 8A24 I7438P 9B42 I74390P
CEE4 I74390T 9B54 I74393P CF14 I74393T
9B66 I74395P CF86 I74395T 9B9E I74399P
CFB5 I74399T 6E0B I74400 6F5B I74400K
8A39 I7440P 9BBF I74412P CFD3 I74412T
9BDF I74414P D012 I74414T 9C00 I74416P
D0DF I74416T 8A4E I7441P B098 I7441T
9C23 I74426P D0F6 I74426T 8A66 I7442P
B0CE I7442T 8A7F I7443P B104 I7443T
9C4E I74440P 9C68 I74441P 9C8A I74442P
D11D I74442T 9CA4 I74443P D1E2 I74443T
9CC6 I74444P D221 I74444T 9CF2 I74448P
8A99 I7444P B13A I7444T 8AB4 I7445P
9D1E I74461P D2AA I74461T 8ACC I7446P
B170 I7446T 8AE8 I7447P 9D3A I74482P
D3E6 I74482T 9D59 I74483P D405 I74483T
D424 I74486T 9D80 I74487P D447 I74487T
8B04 I7448P B1C3 I7448T 8B1C I7449P
B216 I7449T 6F5B I74500 7096 I74500K
8B39 I7450P B2E3 I7450R B2B4 I7450T
9DAA I74518P D46A I74518T 8B6A I7451P
B318 I7451T 9DCC I74520P D48A I74521T
9DF6 I74534P D4A9 I74534T 8B9E I7453P
B3B7 I7453R B36F I7453T 9E1E I74540P
D4CC I74540T 9E40 I74541P D4EE I74541T
8BD0 I7454P B3E9 I7454T 8C04 I7455P
B496 I7455R B467 I7455T 9E5A I74563P
D4FF I74563T D527 I74564T 9E81 I74571P
D543 I74571T D56E I74573T D596 I74574T
8C48 I7458P B4FA I7458T 9E95 I74595P
D5B2 I74595T 9EDA I74596P 7096 I74600
730C I74600K 8C5C I7460P B52A I7460T
9F1F I74638P 9F4C I74639P 9F71 I74640P
D61A I74640T 9F9B I74641P 9FBD I74642P
9FE7 I74643P D699 I74643T A01C I74644P
A050 I74646P D6A0 I74646T A07B I74647P
A0A6 I74648P D6EF I74648T A0D9 I74649P
8C9D I7464P B52B I7464T A10C I74651P
A13D I74652P D73E I74652T A166 I74653P
D785 I74653T A19A I74654P 8CB8 I7465P
PROGRAM IOT MACRO-80 3.44 09-Dec-81 PAGE S-4
A1C6 I74670P A1DE I74673P D7CC I74673T
A20E I74674P D7CD I74674T A238 I74690P
D7CE I74690T A26E I74691P D7EF I74691T
A2A4 I74692P D81C I74692T A2E1 I74693P
D825 I74693T A31E I74696P D8A1 I74696T
A35A I74697P D8DD I74697T A396 I74698P
D913 I74698T A3DD I74699P D925 I74699T
730C I74700 73F3 I74700K 8CD3 I7472P
B55E I7472T 8CE6 I7473P B59A I7473T
8CFB I7474P B5BE I7474T 8D0F I7475P
B5D6 I7475T 8D24 I7476P B5EE I7476T
8D3A I7477P B617 I7477T A424 I74794P
DA07 I74794T 8D50 I7481P B633 I7481T
A444 I74821P DA32 I74821T A466 I74827P
DA4E I74827T A481 I74828P DA6A I74828T
8D61 I7483P B6D2 I7483T A4A4 I74841P
DA86 I74841T 8D7B I7485P B6F6 I7485T
8D91 I7486P B717 I7486T A4C7 I74873P
DAAF I74873T A4F0 I74874P DACE I74874T
8DA0 I7489P B729 I7489T 8DB2 I7490P
B7D5 I7490T 8DC1 I7491P B803 I7491T
8DD8 I7492P B84D I7492T 8DEF I7493P
B884 I7493T 8E04 I7495P B8C7 I7495T
8E3F I7496P B8E6 I7496T 8E7D I7497P
B918 I7497T B33F I74LS51 B434 I74LS54
B4C7 I74LS55 8B83 I74X51P 8BEA I74X54P
8C32 I74X55P ABC9 I75160P EEF4 I75160T
ABF1 I75161P EF6B I75161T AC25 I75162P
AC56 I75162R EFDB I75162T 7A98 I75XXX
7B2B I75XXXK A5E8 I8243P DAE8 I8243T
AB1F I8641P ECF5 I8641T AB7B I8T23P
EE9D I8T23T ABA7 I8T24P EEBE I8T24T
B17E ID146T A53D ID345P B252 ID345T
A559 ID346P A58B ID347P B26F ID347T
A5AE ID348P ACA5 ID351P EBDC ID351T
74C5 IDDR 7558 IDDRK 7BBE IRUS
8431 IRUSK 8431 ITESLA 8725 ITESLAK
8725 ITEST ACC5 ITEST1P F08F ITEST1T
ACDB ITEST2P F12E ITEST2T AD01 ITEST3P
F137 ITEST3T 8764 ITESTK 528C KCHYB
4EAE KNAP 4EDE KNAP1 4F2C KNAP2
4F61 KNAP3 4EF8 KNAP4 4F7B KNAP5
4453 KONEC 5575 KONECT 495B KROK
4975 KROK1 5977 KROKO 5645 KROKT
5968 KTAB 597B KTN 0018 KVVP
4843 KZP 4859 KZP1 492E LBYTE
5373 LDEC 000A LF 597C LOG
4A0A LOGN 4A27 LOGN1 57BB LOGT
4F95 MDTO1 4FE7 MDTO2 4FBD MDTO3
4FF9 MDTO4 4FFF MDTO5 5355 MDTO6
5349 MDTO7 4FD5 MDTO8 572B MEZ10T
5854 MHZ2T 585D MHZ4T 0000 MIKOSD
5979 MNAP 565D MNAPT 4AF7 NADP1
4B0A NADP2 4B28 NADP3 4B33 NADP4
4861 NASTAV 4867 NASTAV2 57D1 NASTAVT
4896 NAVRAT 53C8 NCMOS 598F NCZ
PROGRAM IOT MACRO-80 3.44 09-Dec-81 PAGE S-5
4985 NDIL 499F NDIL1 0139 NEXT
5606 NEZKO 53C0 NTTL 527A ODECTI
7B2B OIO 7BBE OIOK 5964 OPR
CB67 P287DAT BB0D P74121 BB39 P74121A
BB3F P74121B BB56 P74121C BBB3 P74123A
BBB9 P74123B BBBF P74123C BBD3 P74123D
BBFD P74123E BC03 P74123F BC1A P74123G
BBED P74123H BBF3 P74123I BBF9 P74123J
BC14 P74123K BBB3 P74123L BBDA P74123M
BBC6 P74123Q CB0F P74287 CB1D P74287A
CB26 P74287B CB45 P74287C CB4C P74287D
CB50 P74287E D552 P74571 B95D P7497A
B964 P7497B B96B P7497C B972 P7497D
B976 P7497E B99D P7497F B998 P7497G
B9B4 P7497H B97C P7497I B974 P7497J
4BDD PADP1 4BEE PADP2 4BFF PADP3
4C0E PADP4 4C1F PADP5 597A PAKNAP
4B96 PNCA 4BA1 PNCA1 4BBC PNCA2
4BC9 PNCB 559D POKT 599F POLE
F200 POLE2 FFFF POPIS 0038 PORT1
0039 PORT2 003A PORT3 567B PORTT
597E POUT1 00C0 POV_OUT 5971 PP
AD27 PP1 ADE6 PP10 ADFB PP11
AE10 PP12 AD3C PP2 AD51 PP3
AD67 PP4 AD7D PP5 AD92 PP6
ADA7 PP7 ADBC PP8 ADD1 PP9
000A PPK AE26 PPX 5996 PR
489C PRINT 48AC PRINT1 4580 PROHK
455E PROHL 4570 PROHU 4426 PRVVYB
596A PTAB 5736 PZTTNT 003B P_REG
5997 RNAP FFFF RUS C215 S168X1
C331 S176X1 C608 S190X1 C6EC S192X1
C011 S7416X1 C037 S7416X2 C053 S7416X3
C947 S74245T CE6F S7437X D24E S7444X1
D25B S7444X2 D268 S7444X3 D277 S7444X4
D284 S7444X5 D291 S7444X6 D65C S74640T
5BC0 SADYIO 5D3A SADYIOK 596E STAB
5BBF STACK 4400 START 4A64 STAVY
4ADA STAVY1 4AF4 STAVY2 0000 SYS
5378 TABD1 5681 TABT 45A5 TABTST
45C8 TABTT 5697 TADP1 569F TADP1D
56A4 TADP2 56AC TADP2D 56B1 TADP2M
5687 TADPT FFFF TESLA 44AE TEST
44D7 TEST1 450E TEST3 455C TEST4
4559 TEST5 454E TEST6 4530 TEST7
4526 TEST8 450D TESTHS 0011 TEXTP
47DD TGOSUB 4775 TGOTO 4716 TI
46F5 TI1 46FB TI12 470D TI123
4704 TI13 4728 TI1P 46FE TI2
4710 TI23 473B TI2P 4713 TI3
474E TI3P 475E TIXP 4786 TKONEC
479D TKONEC1 47A9 TKONEC2 47C5 TKONEC3
47D1 TKONEC4 55FA TKT 467E TNAP
469B TNAP2 46B3 TNAP3 477D TNIC
5614 TNICT 465A TNZ2 4660 TNZ2A
466B TNZ3 46B9 TO1 46BF TO12
PROGRAM IOT MACRO-80 3.44 09-Dec-81 PAGE S-6
46D1 TO123 46C8 TO13 46DD TO1P
46C2 TO2 46D4 TO23 46E5 TO2P
46D7 TO3 46ED TO3P 47EE TPROG
47F9 TPROGR 47E8 TRET 596C TTAB
57B0 TTLT 51FF TTN 5204 TTN1
5248 TTN2 523D TTN3 5220 TTN4
5257 TTN5 5209 TTN6 526F TTN8
56BB TTPOP 4628 TVV2 4636 TVV2P
464D TVV3 462B TVVN 593B TXGOSUB
5934 TXGOTO 5907 TXI1 58FA TXI12
5900 TXI123 5916 TXI13 590C TXI2
591C TXI23 5911 TXI3 592E TXNAP
5962 TXNDEF 5950 TXNZ2 5956 TXNZ3
58DF TXO1 58D2 TXO12 58D8 TXO123
58EE TXO13 58E4 TXO2 58F4 TXO23
58E9 TXO3 5949 TXPROG 5943 TXRET
5922 TXVV2 5928 TXVV3 595C TXZIF14
5710 TZA1 5717 TZA10 4676 TZIF14
0021 T_GOSUB 0020 T_GOTO 0001 T_I1
0003 T_I12 0007 T_I123 0005 T_I13
0002 T_I2 0006 T_I23 0004 T_I3
00FE T_KONEC 0024 T_NAP 0000 T_NIC
0025 T_NZ2 0026 T_NZ3 0009 T_O1
000B T_O12 000F T_O123 000D T_O13
000A T_O2 000E T_O23 000C T_O3
0023 T_PROG 0022 T_RET 0008 T_VV2
0010 T_VV3 0019 T_W1 001B T_W12
001F T_W123 001D T_W13 001A T_W2
001E T_W23 001C T_W3 0027 T_ZIF14
53D0 UVOD 0038 VADR 5985 VDAT
0020 VELN 0032 VELN1 0030 VELN2
575F VELNT 5972 VVP 5982 VVZ
5586 VYB1T 5594 VYB2T 47FD VYBER
4800 VYBER1 480A VYBER2 4465 VYBIO
4489 VYBIO1 4462 VYBIO2 448F VYBIO3
44A1 VYBIO4 5638 VYPT 48F9 VYSTAV
4584 VYSTV1 459F VYSTV2 4594 VYSTV3
4910 WAIT 4903 WAIT24 5973 WZTAB
4B60 ZA1 4B65 ZA10 55CE ZALOZT
00EF ZAPIS 562B ZAPT 4D05 ZDIL
4D0D ZDIL1 5324 ZDIL10 5333 ZDIL11
5335 ZDIL12 500B ZDIL13 4E84 ZDIL14
4E92 ZDIL15 4F10 ZDIL16 4D1C ZDIL17
4D2B ZDIL2 4D68 ZDIL3 52F7 ZDIL4
52F9 ZDIL4A 5316 ZDIL5 531E ZDIL6
5307 ZDIL7 533B ZDIL8 5343 ZDIL9
52D3 ZDILA 52DE ZDILA1 52EA ZDILB
49AF ZDNAP 49C9 ZDNAP1 49B9 ZDNAP2
5992 ZIF14 5978 ZOBRO 564F ZOBRT
00F7 ZPC 0040 ZSTAV 5966 ZTAB
49E0 ZTN 49FA ZTN1 571C ZTNT
5121 ZTTN1 507D ZTTN10 5082 ZTTN11
50A3 ZTTN12 50D8 ZTTN13 50C7 ZTTN14
50CF ZTTN15 50FC ZTTN16 5109 ZTTN17
50E8 ZTTN18 5137 ZTTN1M 5142 ZTTN2
51AA ZTTN20 515A ZTTN21 5183 ZTTN22
PROGRAM IOT MACRO-80 3.44 09-Dec-81 PAGE S-7
51A7 ZTTN23 519F ZTTN24 5198 ZTTN25
51E7 ZTTN26 5178 ZTTN27 5190 ZTTN28
51B5 ZTTN3 5038 ZTTN4 506A ZTTN5
0020 Z_NAP
No Fatal error(s)
PROGRAM IOT MACRO-80 3.44 09-Dec-81 PAGE 1
TITLE PROGRAM IOT
; TEST IO
; PROGRAM PROVEDE POUZE ZAKLADNI FUNKCNI TEST IO
; C 11.12.2023EC
;%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
;NASTAVENI PARAMETRU PRO PREKLAD
0000 SYS EQU 0 ;-- -1 = CPM
;\- 00 = MIKOS
0000 MIKOSD EQU 0 ;-1 = MIKOS/D
;-------------------------------
;ADRESACE DESEK
0038 VADR EQU 38H ;VYCOZI ADRESA PRO BWP-1
00D0 ADP1_1 EQU 0D0H ;VYCOZI ADRESA PRO PRVNI ADP-1
00E0 ADP1_2 EQU 0E0H ;VYCOZI ADRESA PRO DRUHOU ADP-1
;-------------------------------
;POPIS PROVADENE OPRACE PRI KROKOVANI
FFFF POPIS EQU -1 ;-1 ZAPNUTO
;-------------------------------
;POMOCNE KNIHOVNY IO
FFFF TESLA EQU -1 ;-1 ZAPNUTO
FFFF RUS EQU -1 ;-1 ZAPNUTO
;%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
IF SYS
START EQU 0100H ;CPM
ELSE
4400 START EQU 4400H ;MIKOS
ENDIF
0000' ASEG
IF SYS
BDOS EQU 0005H
NEXT EQU 0 ;PREDANI RIZENI SYSTEMU
ORG START ;CPM
ELSE
IF MIKOSD
DB '<'
DW $KONEC
DW START
DB '>'
SUM EQU LOW $KONEC+HIGH $KONEC+LOW START+HIGH START+'>'
DB LOW SUM
ENDIF
.PHASE START ;MIKOS
0103 CI EQU 0103H ;VSTUP ZNAKU Z CONSOLY
;VYSTUP: A - ASCII KOD ZNAKU
PROGRAM IOT MACRO-80 3.44 09-Dec-81 PAGE 1-1
;RUSI: PSW
0109 CO EQU 0109H ;VYSTUP ZNAKU NA CONSOLY
;vstup: C - ASCII KOD ZNAKU
;RUSI: PSW
0112 CSTS EQU 0112H ;TEST KONSOLY
;VYSTUP: A = 0 NENI ZNAK
; A <> 0 JE ZNAK
;RUSI: PSW
0139 NEXT EQU 0139H ;PREDANI RIZENI MONITORU
4400 C3 4403 JMP START+3
ENDIF
;POLE PRO ZPRACOVANI NAPETI, ZAROVNANO NA XX00
ED00 POLE2 EQU HIGH $KONEC*100H+100H
;===============================
;KONSTANTY
0003 CTRLC EQU 3
000D CR EQU 0DH
000A LF EQU 0AH
001B ESC EQU 27
000A PPK EQU 10 ;POCET PRUCHODU TESTEM
00F7 ZPC EQU 11110111B ;ZAPIS PREHOD NA CTENI
;NASTAVENI ROZHODOVACI UROVNE PRO KONTROLU LOG. ROZDILU
0020 VELN EQU 20H ;MAX ROZDILOVE NAPETI PRO LOG. UROVEN "DESITKOVE" V 0.XXV
0032 VELN1 EQU '2' ;PRVNI PISMENO TEXTU
0030 VELN2 EQU '0' ;DRUHE PISMENO TEXTU
;===============================
;ADRESY PRO TESTER
0038 PORT1 EQU VADR
0039 PORT2 EQU PORT1 + 1
003A PORT3 EQU PORT1 + 2
003B P_REG EQU PORT1 + 3
;-------------------------------
;ADRESACE PRO PREVODNIKY ADP-1
;PRVNI ADP-1
00D0 ADP1D EQU ADP1_1
00D1 ADP1R EQU ADP1_1+1
;DRUHA ADP-1
00E0 ADP2D EQU ADP1_2
00E1 ADP2R EQU ADP1_2+1
;===============================
;KONSTATY PRO POMOCNY REGISTR
;VYBER POVOLOVACICH REGISTRU PRO VYSTUP
00C0 POV_OUT EQU 11000000B
PROGRAM IOT MACRO-80 3.44 09-Dec-81 PAGE 1-2
;ZAKLADNI STAV POMOCNEHO REGISTRU
0040 ZSTAV EQU 01000000B
;PRIPRAVA NA ZAPNUTI NAPAJENI PRO ZIF28
;ROZSVITI ZELENOU SVITIVKU NAD PATICI ZIF28
0044 DIL14 EQU 01000100B
0045 DIL16 EQU 01000101B
0046 DIL20 EQU 01000110B
0047 DIL24 EQU 01000111B
;PRIPRAVA NA ZAPNUTI NAPAJENI PRO ZIF16
;ROZSVITI ZELENOU SVITIVKU NAD PATICI ZIF16
0048 DIL5_12 EQU 01001000B
0049 DIL4_12 EQU 01001001B
004A DIL4_13 EQU 01001010B
004B DIL5_13 EQU 01001011B
;PRO ZAPNUTI NAPAJENI JE POTREBA PRICIST KONSTANTU
0020 Z_NAP EQU 00100000B
;===============================
;STRUKTURA IDENTIFIKATORU PARAMETRU
;NASTAVENI VSTUPU A VYSTUPU
0008 T_VV2 EQU 00001000B ;PORT 1 A 2
0010 T_VV3 EQU 00010000B ;PORT 1, 2 A 3
;PRO ZAPIS S NASLEDNYM CTENIM
0019 T_W1 EQU 00011001B ;PORT 1
001A T_W2 EQU 00011010B ;PORT 2
001B T_W12 EQU 00011011B ;PORT 1 A 2
001C T_W3 EQU 00011100B ;PORT 3
001D T_W13 EQU 00011101B ;PORT 1 A 3
001E T_W23 EQU 00011110B ;PORT 2 A 3
001F T_W123 EQU 00011111B ;PORT 1, 2 A 3
;KONSTANTA V/V PARAMATRU
0018 KVVP EQU 00011000B
;PRO CTENI
0001 T_I1 EQU 00000001B ;PORT 1
0002 T_I2 EQU 00000010B ;PORT 2
0003 T_I12 EQU 00000011B ;PORT 1 A 2
0004 T_I3 EQU 00000100B ;PORT 3
0005 T_I13 EQU 00000101B ;PORT 1 A 3
0006 T_I23 EQU 00000110B ;PORT 2 A 3
0007 T_I123 EQU 00000111B ;PORT 1, 2 A 3
;KONSTANTA PRO UPRAVU NA CTENI (AND)
00E7 CTENI EQU 11100111B
PROGRAM IOT MACRO-80 3.44 09-Dec-81 PAGE 1-3
;PRO ZAPIS
0009 T_O1 EQU 00001001B ;PORT 1
000A T_O2 EQU 00001010B ;PORT 2
000B T_O12 EQU 00001011B ;PORT 1 A 2
000C T_O3 EQU 00001100B ;PORT 3
000D T_O13 EQU 00001101B ;PORT 1 A 3
000E T_O23 EQU 00001110B ;PORT 2 A 3
000F T_O123 EQU 00001111B ;PORT 1, 2 A 3
;KONSTANTA PRO UPRAVU NA ZAPIS (AND)
00EF ZAPIS EQU 11101111B
;SKOKY V RAMCI TESTOVACICH DAT
0020 T_GOTO EQU 00100000B ;PRESKOK (ADRESA)
0021 T_GOSUB EQU 00100001B ;ODSKOK DO "PODPROGRAMU" (ADRESA)
0022 T_RET EQU 00100010B ;NAVRAT Z "PODPROGRAMU"
0023 T_PROG EQU 00100011B ;SKOK DO SROJOVEHO KODU (ADRESA)
;OSTATNI
0024 T_NAP EQU 00100100B ;NAPAJENI
0025 T_NZ2 EQU 00100101B ;NEZAPOJENE VYNODY PORT 1 A 2
0026 T_NZ3 EQU 00100110B ;NEZAPOJENE VYNODY PORT 1, 2 A 3
0027 T_ZIF14 EQU 00100111B ;POZDRO DIL 14 V ZIF 16 (BEZ PARAMETRU)
0000 T_NIC EQU 00000000B ;NEJSOU TESTOVACI DATA
00FE T_KONEC EQU 11111110B ;KONEC TESTOVACI TABULKY
;===============================
FFEB BLOKO EQU 0FFFFH-BLOKP+1 ;KONSTANTA PRO ODECTENI BLOKU
;*******************************
;ZACATEK PROGRAMU
;HLAVNI SMICKA
4403 31 58D2 LXI SP,STACK ;ZALOZ ZASOBNIK
4406 CD 48D8 CALL VYSTAV ;VYCHOZI STAV TESTTERU
4409 AF XRA A
440A 32 568F STA KROKO ;KROKOVANI VYPNUTO
440D 32 5690 STA ZOBRO ;ZOBRAZENI DIL VYPNUTO
4410 32 5691 STA MNAP ;ZOBRAZENI MERENI NAPETI U DIL VYPNUTO
4413 32 5692 STA PAKNAP ;ZRUS PRIZNAK ADRESY PRO ZAPIS DRUHE POLOVINY NAPETI
4416 32 5693 STA KTN ;TRIDENI NAPETI VYPNUTO
4419 32 5694 STA LOG ;KOTROLA TTL LOG UROVNI
441C 21 568F LXI H,KROKO
441F 77 MOV M,A ;KROKO KROKOVANI VYPNUTO
4420 23 INX H
4421 77 MOV M,A ;ZOBRO ZOBRAZENI DIL VYPNUTO
4422 23 INX H
4423 77 MOV M,A ;MNAP ZOBRAZENI MERENI NAPETI U DIL VYPNUTO
4424 23 INX H
4425 77 MOV M,A ;PAKNAP ZRUS PRIZNAK ADRESY PRO ZAPIS DRUHE POLOVINY NAPETI
4426 23 INX H
4427 77 MOV M,A ;KTN TRIDENI NAPETI VYPNUTO
4428 23 INX H
4429 77 MOV M,A ;LOG KOTROLA TTL LOG UROVNI
PROGRAM IOT MACRO-80 3.44 09-Dec-81 PAGE 1-4
442A 11 51D6 LXI D,UVOD
442D CD 487B CALL PRINT ;VYPIS UVOD
4430 21 58D3 LXI H,SADYIO
4433 22 5686 SHLD STAB ;POLOHA V TABULCE SKUPIN IO
4436 31 58D2 PRVVYB: LXI SP,STACK ;OBNOV ZASOBNIK
4439 21 58D3 LXI H,SADYIO
443C 22 567E SHLD ZTAB
443F 11 FFEB LXI D,BLOKO
4442 21 5A4D LXI H,SADYIOK
4445 19 DAD D
4446 22 5680 SHLD KTAB
4449 CD 4875 CALL CRLF2
444C 11 5399 LXI D,VYB1T
444F CD 487B CALL PRINT ;PRVNI VYBER, SADA IO
4452 CD 4875 CALL CRLF2
4455 2A 5686 LHLD STAB ;POLOHO V TABULCE SKUPIN IO
4458 CD 480E CALL VYBER1
445B FE 0D CPI CR
445D 22 5686 SHLD STAB ;SHOV POLOHU V TABULCE SKUPIN IO
4460 CA 4475 JZ VYBIO
4463 CD 48D8 KONEC: CALL VYSTAV ;VYCHOZI STAV TESTTERU
4466 CD 4875 CALL CRLF2
4469 11 5388 LXI D,KONECT ;KONEC PROGRAMU
446C CD 487B CALL PRINT
446F C3 0139 JMP NEXT ;VRACENI RIZENI MONITORU/SYSTEMU
4472 2A 5682 VYBIO2: LHLD PTAB ;OBNOV POZICI V TABULCE
4475 11 0011 VYBIO: LXI D,TEXTP ;DELKA TEXTU
4478 19 DAD D ;PRICTI JI K
4479 5E MOV E,M ;NACTI NIZSI BYTE
447A 23 INX H
447B 56 MOV D,M ;NACTI VYSSI BYTE
447C EB XCHG ;PROHOD A
447D 22 567E SHLD ZTAB ;ULOZ ZACATEK TABULKY
4480 EB XCHG ;PROHOD A
4481 23 INX H
4482 5E MOV E,M ;NACTI NIZSI BYTE
4483 23 INX H
4484 56 MOV D,M ;NACTI VYSSI BYTE
4485 EB XCHG ;PROHOD A
4486 11 FFEB LXI D,BLOKO
4489 19 DAD D
448A 22 5680 SHLD KTAB ;ULOZ KONEC TABULKY
448D CD 4875 CALL CRLF2
4490 11 53A7 LXI D,VYB2T
4493 CD 487B CALL PRINT ;DRUHY VYBER, IO
4496 CD 4875 CALL CRLF2
4499 CD 480B VYBIO1: CALL VYBER
449C C3 44B1 JMP VYBIO4
449F CD 4875 VYBIO3: CALL CRLF2
44A2 11 53A7 LXI D,VYB2T ;OBNOVA VYBERU IO
44A5 CD 487B CALL PRINT ;DRUHY VYBER, IO
44A8 CD 4875 CALL CRLF2
44AB 2A 5682 LHLD PTAB ;OBNOV POZICI V TABULCE
44AE CD 480E CALL VYBER1 ;OBNOV VYBER IO
44B1 FE 1B VYBIO4: CPI ESC
44B3 CA 4436 JZ PRVVYB ;NAVRAT NA VYBER SKUPINY IO
PROGRAM IOT MACRO-80 3.44 09-Dec-81 PAGE 1-5
44B6 FE 0D CPI CR
44B8 CA 44BE JZ TEST ;JDEM TESTOVAT
44BB C3 4499 JMP VYBIO1
;*******************************
;TEST IO
44BE 22 5682 TEST: SHLD PTAB ;ULOZ POLOHU V TABULCE
44C1 CD 4878 CALL CRLF ;ODRADKUJ
44C4 11 0011 LXI D,TEXTP ;DELKA TEXTU
44C7 19 DAD D ;PRICTI JI K
44C8 5E MOV E,M ;NACTI NIZSI BYTE
44C9 23 INX H
44CA 56 MOV D,M ;NACTI VYSSI BYTE
44CB D5 PUSH D ;SCHOV SI ADRESU POLOHY POPISU NAPAJENI IO
44CC 13 INX D
44CD 13 INX D ;POCATEK POPISU IO
44CE CD 487B CALL PRINT ;VYPIS POPIS IO
44D1 CD 4878 CALL CRLF ;ODRADKUJ
44D4 D1 POP D ;OBNOV SI ADRESU POLOHY POPISU NAPAJENI IO
44D5 E5 PUSH H ;SCHOV SI UKAZOVATKO
44D6 EB XCHG ;ADRESU POPISU NAPAJENI IO DO
44D7 5E MOV E,M ;NACTI NIZSI BYTE
44D8 23 INX H
44D9 56 MOV D,M ;NACTI VYSSI BYTE
44DA CD 487B CALL PRINT ;VYPIS POPISU NAPAJENI IO
44DD E1 POP H ;OBNOV UKAZOVATKO
44DE CD 4875 CALL CRLF2
44E1 11 53B0 LXI D,POKT
44E4 CD 487B CALL PRINT ;POKRACOVAT?
44E7 CD 4893 TEST1: CALL CTIZ ;CTI KONZOLI
44EA FE 1B CPI ESC
44EC CA 449F JZ VYBIO3 ;NAVRAT NA VYBER IO
44EF FE 0D CPI CR
44F1 C2 44E7 JNZ TEST1 ;SPUST TEST
;===============================
;VLASTNI TEST
44F4 23 INX H ;ADRESA TEST TABULKY
44F5 5E MOV E,M ;NACTI NIZSI BYTE
44F6 23 INX H
44F7 56 MOV D,M ;NACTI VYSSI BYTE (V ADRESA TEST TABULKY)
44F8 3E 0A MVI A,PPK ;POCET PRUCHODU TESTEM
44FA 32 5689 STA PP ;A ULOZ JE
44FD 21 0000 LXI H,0 ;VYCHOZI STAV NEZAPOJENYCH VIVODU PRO ZOBRAZOVANI
4500 22 56A6 SHLD NCZ
4503 22 56A8 SHLD NCZ+2 ;+ VYCHOZI STAV PRO ZIF16 PRO ZOBRAZOVANI
4506 22 56A9 SHLD NCZ+3 ;+ VYCHOZI STAV PRO ERR PRO ZOBRAZOVANI
4509 2B DCX H
450A 22 569C SHLD VDAT ;VYCHOZI NASTAVENI VYSTUPNICH DAT PRO ZOBRAZENI
450D 22 569D SHLD VDAT+1
IF POPIS
4510 21 567A LXI H,TXNDEF
4513 22 567C SHLD OPR ;VYCHOZI NASTAVENI PRO TEXT PROVEDENE OPERACE
PROGRAM IOT MACRO-80 3.44 09-Dec-81 PAGE 1-6
ENDIF
4516 EB XCHG ;ADRESA TEST TABULKY DO
4517 22 5684 SHLD TTAB ;ULOZ AKTUALNI TEST TABULKU
451A C3 451E JMP TEST3
451D 23 TESTHS: INX H ;DALSI ADRESA V TABULCE
; CALL WAIT24 ;CHVILI POCKEJ MAME KB-01 TJ. 2M KABLU
451E 3A 568F TEST3: LDA KROKO ;NACTI PRIZNAK KROKOVANI
4521 FE 01 CPI 01
4523 C2 4536 JNZ TEST8 ;NENI KROKOVANI
IF POPIS
4526 EB XCHG
4527 2A 567C LHLD OPR ;NACTI ADRESU TEXTU PROVEDENE OPERACE
452A EB XCHG
452B CD 487B CALL PRINT ;VYTISNI TEXT OPERACE
ENDIF
452E E5 PUSH H
452F CD 48EC CALL HADR ;TISK OBSAHU
4532 CD 4893 CALL CTIZ ;CTI ZNAK Z KOZOL
4535 E1 POP H
4536 3A 568A TEST8: LDA VVP ;TEST NA V/V PARAMETR
4539 A7 ANA A
453A CA 4540 JZ TEST7 ;NENI DRUHA FAZE V/V PARAMETR
453D 2A 568B LHLD WZTAB ;OBNOV ADRESU V TEST TABULCE
4540 7E TEST7: MOV A,M ;NACTI PARAMETR PRO TEST
4541 47 MOV B,A ;A ULOZ DO
4542 E6 F8 ANI 11111000B ;JEN HORNICH 5 BITU
4544 FE 18 CPI KVVP ;PARAMETR V/V PARAMETRU
4546 C2 4569 JNZ TEST5 ;NENI V/v PARAMETR - JDEM HLEDAT
4549 3A 568A LDA VVP ;STAV V/V PARAMETR
454C A7 ANA A
454D CA 455E JZ TEST6 ;PRVNI FAZE V/V PARAMETRU
4550 AF XRA A ;DRUHA FAZE V/V PARAMATRU
4551 32 568A STA VVP ;VYCHOZI STAV PRO V/V PARAMETR
4554 78 MOV A,B
4555 E6 E7 ANI CTENI ;VYTVOR CTENI
4557 47 MOV B,A ;VRAT DO
4558 11 45D8 LXI D,TABTT ;PRESKOCI ZAPIS
455B C3 456C JMP TEST4
455E 3C TEST6: INR A
455F 32 568A STA VVP ;ULOZ ZE ZAPISUJEM
4562 22 568B SHLD WZTAB ;ULOZ ADRESU V TEST TABULCE
4565 78 MOV A,B ;
4566 E6 EF ANI ZAPIS ;JEN SPODNI 3 BITY - BUDE ZAPIS
4568 47 MOV B,A ;VRAT DO
;-------------------------------
;PROHLEDA TABULKU A SKOCI NA ADRSU
;V JE CO SE HLEDA
;ZACHOVA
PROGRAM IOT MACRO-80 3.44 09-Dec-81 PAGE 1-7
4569 11 45B5 TEST5: LXI D,TABTST ;ADRESA POCATKU DABULKY
456C E5 TEST4: PUSH H ;SCHOV ADRESU V TEST TABULCE
456D EB XCHG ;ADRESU TABULKY DO
456E 7E PROHL: MOV A,M ;CTI PRIKAZ
456F B8 CMP B
4570 CA 4580 JZ PROHU ;NASEL PRIKAZ
4573 FE FF CPI -1 ;KONEC TABULKY
4575 CA 4590 JZ PROHK
4578 23 INX H ;HL=HL+3 / +5 ->
4579 23 INX H ;DALSI POZICE
457A 23 INX H
IF POPIS
457B 23 INX H
457C 23 INX H
ENDIF
457D C3 456E JMP PROHL ;DALSI PRIKAZ V TABULCE
4580 23 PROHU: INX H ;VYBER ADRESU Z TABULKY
IF POPIS
4581 5E MOV E,M ;DO
4582 23 INX H
4583 56 MOV D,M ;DALSI PULKU DO
4584 EB XCHG
4585 22 567C SHLD OPR ;ULOZ ADRESU TEXTU OPERACE
4588 EB XCHG
4589 23 INX H ;VYBER ADRESU Z TABULKY
ENDIF
458A 5E MOV E,M ;DO
458B 23 INX H
458C 56 MOV D,M ;DALSI PULKU DO
458D EB XCHG ;ADRESU PROGRAMU DO HL
458E E3 XTHL ;OBNOV A ADRESU PROGAMU NA ZASOBNIK
458F C9 RET ;SKOK DO PROGRAMU -> JMP
4590 E1 PROHK: POP H ;OBNOV ADRESU V TEST TABULCE
4591 11 5419 LXI D,NEZKO ;NEZNAMI KOD
4594 CD 487B VYSTV1: CALL PRINT
4597 CD 4878 CALL CRLF
459A CD 48EC CALL HADR ;TISK OBSAHU
459D CD 4878 CALL CRLF
45A0 7E MOV A,M
45A1 CD 48F1 CALL DBYT
45A4 3A 568F VYSTV3: LDA KROKO ;NACTI PRIZNAK KROKOVANI
45A7 FE 01 CPI 01
45A9 C2 45AF JNZ VYSTV2 ;NENI KROKOVANI
45AC CD 4893 CALL CTIZ ;CTI ZNAK Z KOZOLI
45AF CD 48D8 VYSTV2: CALL VYSTAV ;VYCHOZI STAV TESTTERU
45B2 C3 449F JMP VYBIO3 ;NOVY VYBER
PROGRAM IOT MACRO-80 3.44 09-Dec-81 PAGE 1-8
;-------------------------------
;TABULKA PRIKAZU V TESTOVACI TABULCE
IF POPIS
45B5 0B TABTST: DB T_O12
45B6 55EA DW TXO12 ;ADRESA TEXTU OPERACE
45B8 46CD DW TO12 ;VYSTAVENI DAT NA PORT 12
45BA 0F DB T_O123
45BB 55F0 DW TXO123
45BD 46DF DW TO123 ;VYSTAVENI DAT NA PORT 123
45BF 09 DB T_O1
45C0 55F7 DW TXO1
45C2 46C7 DW TO1 ;VYSTAVENI DAT NA PORT 1
45C4 0A DB T_O2
45C5 55FC DW TXO2
45C7 46D0 DW TO2 ;VYSTAVENI DAT NA PORT 2
45C9 0C DB T_O3
45CA 5601 DW TXO3
45CC 46E5 DW TO3 ;VYSTAVENI DAT NA PORT 3
45CE 0D DB T_O13
45CF 5606 DW TXO13
45D1 46D6 DW TO13 ;VYSTAVENI DAT NA PORT 13
45D3 0E DB T_O23
45D4 560C DW TXO23
45D6 46E2 DW TO23 ;VYSTAVENI DAT NA PORT 23
45D8 03 TABTT: DB T_I12
45D9 5612 DW TXI12
45DB 4709 DW TI12 ;POROVNANI DAT Z PORTU 12
45DD 07 DB T_I123
45DE 5618 DW TXI123
45E0 471B DW TI123 ;POROVNANI DAT Z PORTU 123
45E2 01 DB T_I1
45E3 561F DW TXI1
45E5 4703 DW TI1 ;POROVNANI DAT Z PORTU 1
45E7 02 DB T_I2
45E8 5624 DW TXI2
45EA 470C DW TI2 ;POROVNANI DAT Z PORTU 2
45EC 04 DB T_I3
45ED 5629 DW TXI3
45EF 4721 DW TI3 ;POROVNANI DAT Z PORTU 3
45F1 05 DB T_I13
45F2 562E DW TXI13
45F4 4712 DW TI13 ;POROVNANI DAT Z PORTU 13
45F6 06 DB T_I23
45F7 5634 DW TXI23
45F9 471E DW TI23 ;POROVNANI DAT Z PORTU 23
45FB 08 DB T_VV2
45FC 563A DW TXVV2
45FE 4638 DW TVV2 ;NASTAV V/V MAX DIL 16
4600 10 DB T_VV3
4601 5640 DW TXVV3
4603 465D DW TVV3 ;NASTAV V/V MAX DIL 24
4605 24 DB T_NAP
4606 5646 DW TXNAP
4608 468E DW TNAP ;NASTAV, ZAPNI NAPAJENI
PROGRAM IOT MACRO-80 3.44 09-Dec-81 PAGE 1-9
460A 20 DB T_GOTO
460B 564C DW TXGOTO
460D 4783 DW TGOTO ;SKOK V TABULCE
460F 21 DB T_GOSUB
4610 5653 DW TXGOSUB
4612 47EB DW TGOSUB ;PODPROGRAM V DATECH
4614 22 DB T_RET
4615 565B DW TXRET
4617 47F6 DW TRET ;NAVRAT Z DATOVEHO PODPROGRAMU
4619 23 DB T_PROG
461A 5661 DW TXPROG
461C 47FC DW TPROG ;SKOK DO STROJOVEHO KODU
461E 25 DB T_NZ2
461F 5668 DW TXNZ2
4621 466A DW TNZ2 ;NEZAPONENE VYVODY PRO ZOBRAZENI DIL MAX DIL 16
4623 26 DB T_NZ3
4624 566E DW TXNZ3
4626 467B DW TNZ3 ;NEZAPONENE VYVODY PRO ZOBRAZENI DIL MAX DIL 24
4628 27 DB T_ZIF14
4629 5674 DW TXZIF14
462B 4686 DW TZIF14 ;PRIZNAK POUZDRA DIL14 V ZIF16
462D 00 DB T_NIC
462E 567A DW TXNDEF
4630 478B DW TNIC ;NENI TESTOVACI TABULKA
4632 FE DB T_KONEC
4633 567A DW TXNDEF
4635 4794 DW TKONEC ;KONEC TESTU
4637 FF DB -1 ;KONEC TABULKY
ELSE
TABTST: DB T_O12
DW TO12 ;VYSTAVENI DAT NA PORT 12
DB T_O123
DW TO123 ;VYSTAVENI DAT NA PORT 123
DB T_O1
DW TO1 ;VYSTAVENI DAT NA PORT 1
DB T_O2
DW TO2 ;VYSTAVENI DAT NA PORT 2
DB T_O3
DW TO3 ;VYSTAVENI DAT NA PORT 3
DB T_O13
DW TO13 ;VYSTAVENI DAT NA PORT 13
DB T_O23
DW TO23 ;VYSTAVENI DAT NA PORT 23
TABTT: DB T_I12
DW TI12 ;POROVNANI DAT Z PORTU 12
DB T_I123
DW TI123 ;POROVNANI DAT Z PORTU 123
DB T_I1
DW TI1 ;POROVNANI DAT Z PORTU 1
DB T_I2
DW TI2 ;POROVNANI DAT Z PORTU 2
DB T_I3
DW TI3 ;POROVNANI DAT Z PORTU 3
DB T_I13
PROGRAM IOT MACRO-80 3.44 09-Dec-81 PAGE 1-10
DW TI13 ;POROVNANI DAT Z PORTU 13
DB T_I23
DW TI23 ;POROVNANI DAT Z PORTU 23
DB T_VV2
DW TVV2 ;NASTAV V/V MAX DIL 16
DB T_VV3
DW TVV3 ;NASTAV V/V MAX DIL 24
DB T_NAP
DW TNAP ;NASTAV, ZAPNI NAPAJENI
DB T_GOTO
DW TGOTO ;SKOK V TABULCE
DB T_GOSUB
DW TGOSUB ;PODPROGRAM V DATECH
DB T_RET
DW TRET ;NAVRAT Z DATOVEHO PODPROGRAMU
DB T_PROG
DW TPROG ;SKOK DO STROJOVEHO KODU
DB T_NZ2
DW TNZ2 ;NEZAPONENE VYVODY PRO ZOBRAZENI DIL MAX DIL 16
DB T_NZ3
DW TNZ3 ;NEZAPONENE VYVODY PRO ZOBRAZENI DIL MAX DIL 24
DB T_ZIF14
DW TZIF14 ;PRIZNAK POUZDRA DIL14 V ZIF16
DB T_NIC
DW TNIC ;NENI TESTOVACI TABULKA
DB T_KONEC
DW TKONEC ;KONEC TESTU
DB -1 ;KONEC TABULKY
ENDIF
;===============================
;NASTAVENI V/V PRO MAX DIL 16
4638 CD 4646 TVV2: CALL TVV2P
463B 3A 5688 TVVN: LDA ANAP ;STAV NAPAJENI
463E 06 40 MVI B,ZSTAV ;JESTE ZAKLADNI STAV P. REG.
4640 B0 ORA B
4641 D3 3B OUT P_REG ;ZAPIS DO POM. REGISTRU
4643 C3 451D JMP TESTHS ;NAVRAT DO HLAVI SMICKY
;-------------------------------
4646 06 C0 TVV2P: MVI B,POV_OUT ;VYBER POV. REG. PRO VYSTUP
4648 3A 5688 LDA ANAP
464B B0 ORA B ;A PRICI AKTUALNI NAPAJENI
464C D3 3B OUT P_REG ;ZAPIS DO POM. REGISTRU
464E 23 INX H
464F 7E MOV A,M
4650 D3 38 OUT PORT1
4652 32 5699 STA VVZ ;ULOZ PRO ZOBRAZENI PRO DIL CO JE VSTUP A VYSTUP PORT 1
4655 23 INX H
4656 7E MOV A,M
4657 D3 39 OUT PORT2
4659 32 569A STA VVZ+1 ;ULOZ PRO ZOBRAZENI PRO DIL CO JE VSTUP A VYSTUP PORT 2
465C C9 RET
;===============================
;NASTAVENI V/V PRO MAX DIL 24
465D CD 4646 TVV3: CALL TVV2P
PROGRAM IOT MACRO-80 3.44 09-Dec-81 PAGE 1-11
4660 23 INX H
4661 7E MOV A,M
4662 D3 3A OUT PORT3
4664 32 569B STA VVZ+2 ;ULOZ PRO ZOBRAZENI PRO DIL CO JE VSTUP A VYSTUP PORT 3
4667 C3 463B JMP TVVN ;NASTAV AKTUALNI NAPAJENI
;===============================
;NASTAVENI NEZAPOJENYCH VYVODU PRO ZOBRAZENI DIL
466A CD 4670 TNZ2: CALL TNZ2A
466D C3 451D JMP TESTHS ;NAVRAT DO HLAVI SMICKY
4670 23 TNZ2A: INX H
4671 7E MOV A,M
4672 32 56A6 STA NCZ ;ULOZ NEZAPOJENE VYVODY PRO ZOBRAZENI DIL NA PORTU 1
4675 23 INX H
4676 7E MOV A,M
4677 32 56A7 STA NCZ+1 ;ULOZ NEZAPOJENE VYVODY PRO ZOBRAZENI DIL NA PORTU 2
467A C9 RET
;===============================
467B CD 4670 TNZ3: CALL TNZ2A
467E 23 INX H
467F 7E MOV A,M
4680 32 56A8 STA NCZ+2 ;ULOZ NEZAPOJENE VYVODY PRO ZOBRAZENI DIL NA PORTU 3
4683 C3 451D JMP TESTHS ;NAVRAT DO HLAVI SMICKY
;===============================
;NASTAV PRIZNAK POUZDRA DIL14 V ZIF16
4686 3E 01 TZIF14: MVI A,1
4688 32 56A9 STA ZIF14 ;ULOZ PRIZNAK POUZDRA DIL14 V ZIF16
468B C3 451D JMP TESTHS ;NAVRAT DO HLAVI SMICKY
;===============================
;NASTAVENI A ZAPNUTI NAPETI
468E 23 TNAP: INX H
468F 3A 5689 LDA PP ;POCET PRUCHODU
4692 FE 0A CPI PPK ;JE TO PRVNI PRUCHOD
4694 C2 46C1 JNZ TNAP3 ;JINAK POKRACUJEM
4697 7E MOV A,M
4698 32 5688 STA ANAP ;ULOZ PRO POZDEJI
469B 32 5696 STA DIL ;ULOZ PRO ZOBRAZENI DIL NAPAJENI
469E D3 3B OUT P_REG ;ROZNI LED
46A0 CD 4875 CALL CRLF2
46A3 11 53E1 LXI D,ZALOZT
46A6 CD 487B CALL PRINT ;ZALOZ IO
46A9 CD 4893 TNAP2: CALL CTIZ
46AC FE 1B CPI ESC
46AE CA 449F JZ VYBIO3 ;NAVRAT NA VYBER IO
46B1 FE 0D CPI CR
46B3 C2 46A9 JNZ TNAP2 ;CEKAME NA "CR"
46B6 06 20 MVI B,Z_NAP ;PRIZNAK PRO ZAPNUTI NAPAJANI
46B8 3A 5688 LDA ANAP ;JAKE NAPAJENI
46BB B0 ORA B
46BC 32 5688 STA ANAP ;ULOZ STAV NAPAJENI
46BF D3 3B OUT P_REG ;ZAPNI NAPAJENI
46C1 CD 48E2 TNAP3: CALL WAIT24 ;POCKEJ 24mS
46C4 C3 451D JMP TESTHS ;NAVRAT DO HLAVI SMICKY
PROGRAM IOT MACRO-80 3.44 09-Dec-81 PAGE 1-12
;===============================
;BLOK PRO VYSTAVEVANI DAT NA PORT
46C7 CD 46EB TO1: CALL TO1P
46CA C3 451D JMP TESTHS ;NAVRAT DO HLAVI SMICKY
46CD CD 46EB TO12: CALL TO1P
46D0 CD 46F3 TO2: CALL TO2P
46D3 C3 451D JMP TESTHS ;NAVRAT DO HLAVI SMICKY
46D6 CD 46EB TO13: CALL TO1P
46D9 CD 46FB CALL TO3P
46DC C3 451D JMP TESTHS ;NAVRAT DO HLAVI SMICKY
46DF CD 46EB TO123: CALL TO1P
46E2 CD 46F3 TO23: CALL TO2P
46E5 CD 46FB TO3: CALL TO3P
46E8 C3 451D JMP TESTHS ;NAVRAT DO HLAVI SMICKY
46EB 23 TO1P: INX H ;VYSTAVENI DAT NA PORT1
46EC 7E MOV A,M
46ED D3 38 OUT PORT1
46EF 32 569C STA VDAT ;ULOZ PRO ZOBRAZENI DIL Z PORTU 1
46F2 C9 RET
46F3 23 TO2P: INX H ;VYSTAVENI DAT NA PORT2
46F4 7E MOV A,M
46F5 D3 39 OUT PORT2
46F7 32 569D STA VDAT+1 ;ULOZ PRO ZOBRAZENI DIL Z PORTU 2
46FA C9 RET
46FB 23 TO3P: INX H ;VYSTAVENI DAT NA PORT