IBM AT 5170 Technical Reference page 216

Table of Contents

Advertisement

IBM p.,.sonal Compute,. MACRO Aa.emble,.
Ve,.sion 2.00
1-17
TESTI
---- 06/10/85
POWER ON SELF TEST
(POST)
06-10-85
1655 045A 33 FF
Z_31
XOR
01,01
SET UP PO I NTER FOR REGEN
1656 045C 88 8000
NOV
AX,08000H
SET UP ES TO V IOEO REGEN
1657 045F 8E CO
NOV
ES,AX
1658
1659 0461
89 0800
NOV
CX,2048
NUMBER OF WORDS I N MONOCHROME CARD
1660 0464 88 0720
NOV
AX, •
'+7-H
FILL CHARACTER FOR ALPHA + ATTR 18UTE
1661
0467 F3/ A8
REP
STOSW
FILL THE REGEN BUFFER WITH 8LANKS
1662
1663 0469 33 FF
XOR
01,01
CLEAR COLOR V IDEO BUFFER !EMORY
1664 0468 88 8800
NOV
BX,08600H
SET
UP
ES TO COLOR V
I
OEO MEMORY
1665 046E 8E C3
MOV
ES,8X
1666 0470 89 2000
MOV
CX,8192
1667 0473 F31 AB
REP
STOSW
;
FILL WITH BLANKS
1668
1669
ENA8LE V
I
DEO AND CORRECT PORT SETTI NG
1670
1671 0475 BA 03Ba
MOV
OX,388H
1672
0478
BO 29
MOV
AL,29H
1673 047A EE
OUT
OX,AL
;
SET V IDEO ENABLE PORT
1674
1675
SET UP OVERSCAN REGI STER
1676
1677
0-478
42
INC
OX
SET OVERSCAN PORT TO A DEF AUL T
1678 047C 80 30
MOV
AL,30H
VALUE 30H FOR ALL MODES EXCEPT 640X200
1679 047E EE
OUT
oX,AL
OUTPUT THE CORRECT VALUE TO 309 PORT
1680
1681
ENABLE COLOR V IDEO AND CORRECT PORT SETT I NG
1682
1683 047F 8A 0308
MOV
OX,3D6H
IbM
0482 80 28
NOV
AL,28H
1685 0484 EE
OUT
OX,AL
SET V IDEO ENABLE PORT
1686
1687
;
-----
SET UP OVERSCAN REG I STER
16068
16069 0485 42
INC
ox
SET OVERSCAN PORT TO A oEF AUL T
1690 0486 80 30
NOV
AL,30H
VALUE 30H FOR ALL NODES EXCEPT 640X200
1691 0488 EE
OUT
DX,AL
OUTPUT THE CORRECT VALUE TO 309 PORT
1692
1693
DISPLAY FAILING CHECKPOINT AND
1694
1695 0489 8C
ce
NOV
AX,CS
SET STACK SEGMENT TO CODE SEGMENT
1696 0488 8E DO
NOV
SS,AX
1697
.
1698 0480 8B 8000
NOV
aX,08000H
1699 0490 8E 08
NOV
OS,8X
SET OS TO 8/W DISPLAY 8UFFER
1700
1701 04928030
NOV
AL,
'0'
DISPLAY BANK 000000
1702 0494 89 0006
NOV
CX,6
1703 0497 28 FF
SUB
01,01
START AT 0
\704 0499 88 05
MOV
(01)
,AL
WRITE TO DISPLAY REGEN 8UFFER
1705 0498 47
INC
01
PO I NT TO NEXT POS I TI ON
1706 049C 47
INC
01
1707 0490 E2 FA
LOOP
2
1708
1709 049F 80 FF B8
CMP
8H,086H
CHECK THAT COLOR 8UFFER WR I TTEN
1710 04A2 74 OC
JZ
2 I
171 I 04A4 28 FF
SUB
oT,ol
PO I NT TO START OF BUFFER
1712
1713 04A6 87 80
MOV
8H,080H
1714 04A8 8E C3
MOV
ES,8X
ES
=
MONOCHROME
1715 04AA 87 86
MOV
8H,088H
SET SEGMENT TO COLOR
1716 04AC 8E
DB
MOV
OS,8X
OS = COLOR
17 I 7 04AE E8 E2
JMP
Z_O
1718
1719
1-----
PRINT FAILING BIT PATTERN
1720
1721 0480 80 20
MOV
AL,'
,
I
DISPLAY A BLANK
1722 0482 88 05
MOV
(DI] ,AL
;
WR I TE TO COLOR 8UFFER
1723 0484 26: 66 05
NOV
ES: [01] ,AL
;
WR
I
TE TO MONOCHROME REGEN BUFFER
1724048747
INC
01
;- POINT TO NEXT POSITION
1725048847
INC
01
17260489 E4 61
IN
AL,MFG PORT+l
; GET THE HIGH BYTE OF FAILING PATTERN
1727 0488 81
04
NOV
CL,4
-
;
SHIFT COUNT
1728 0480 02 E6
SHR
AL,CL
; NIB8LE SWAP
1729 04BF 8C 057A R
NOV
SP,OFFSET ZI
a
1730 04C2 E8 IB
JNP
SHORT PR
­
1731
1732 04C4 E4 81
21,
IN
AL,NFG PORT+ I
1733 04C6 24 OF
ANa
AL,OFH-
ISOLATE TO LOW N fBBLE
1734 04C6 BC 057C R
NOV
SP. OFFSET Z2 0
1735 04C8 E8 12
JNP
SHORT PR
­
1736 04CO E4 82
Z2:
IN
AL,MFG PORT+2
GET THE HIGH BYTE OF FAILING PATTERN
1737 04CF al
04
NOV
CL,4
-
SHIFT COUNT
1738 0401 02 E8
SHR
AL,CL
NI8BLE SWAP
1739 0403 8C 057E R
NOV
SP,OFFSET Z3 0
1740 0406 E8 07
JNP
SHORT PR
­
1741 0406 E4 82
Z31
IN
AL. NFG PORT +2
1742 040A 24 OF
ANa
AL,OFH­
I
SOLATE TO LOW NIBBLE
1743 040C 8C 0560 R
MOV
SP,OFFSET Z4_0
RETURN TO
Z4:
1744
1145
CONVERT AND PR I NT
1746
CONVERT OO-OF TO ASC I I CHARACTER
1747 040F 04 90
PR:
ADO
AL,090H
ADD FIRST CONVERS I ON FACTOR
1746 04El
27
DAA
AO.JUST FOR NUMER I C AND ALPHA RANGE
1749 04E2
14 40
AOC
AL,040H
ADD CONVERSION AND AD.JUST LOW NI88LE
1750 04E4 27
OAA
ADJUST HIGH NIB8LE TO ASCII RANGE
1751
1752 04E5 88 05
MOV
[DI] ,AL
WR I TE TO COLOR BUFFER
1753 04E7 26: 66 05
MOV
ES: [01] ,AL
WR I TE TO MONOCHROME BUFFER
1754 04EA 47
INC
01
POINT TO NEXT POSITION
1755 04E8 47
INC
01
1756 04EC C3
RET
1757
1758
DISPLAY 201 ERROR
1759
1160 04EO 80 20
Z4;
NOV
AL,'
,
01 SPLA Y A BLANK
1761 04EF 88 05
NOV
(DI] ,AL
WR I TE TO 0 I SPLA Y REGEN BUFFER
1762 04FI
26: 88 05
MOV
ES: [01] ,AL
WR I TE TO MONOCHROME BUFFER
1763 04F4 41
INC
01
POINT TO NEXT POSITION
1764 04F5 47
INC
01
1765 04F6 80 32
NOV
AL,
'2'
DISPLAY 201 ERROR
1766 04F8 88 05
NOV
[01] ,AL
WR
I
TE TO
0
I SPLAY REGEN BUFFER
1767 04FA 26: 88 05
NOV
ES: [01] ,AL
WR f TE TO MONOCHROME BUFFER
1768 04Fo 47
INC
DI
POINT TO NEXT POSITION
5-44
TEST1

Advertisement

Table of Contents
loading

Table of Contents