IBM AT 5170 Technical Reference page 254

Table of Contents

Advertisement

IBM Persona! Computer MACRO Asse",bler
Version 2.00
1-2
TEST4 ---- 06/10/85
POST AND BIOS UTILITY ROUTINES
06-10 85
".
PAGE
I 15
0034
DDS
PROC
NEAR
LOAD
(OS)
TO DATA AREA
!! 6
0034 2E: 8E
IE 003A R
MOV
DS,CS:DDSDATA
PUT SEGMENT VALUE OF DATA AREA
INTO OS
I 17
0039 C3
RET
RETURN TO USER WITH
(DS)= DATA
"B
119
003A ---- R
DDSDATA OW
DATA
SEGMENT SELECTOR VALUE FOR DATA AREA
120
121
003C
DDS
ENDP
"3
1---
E MSG -- P MSG ---
-------------- -------------------------- ­
124
-
THIS SUBROUTINE WILL PRINT A MESSAGE ON THE DISPLAY
'"
,'5
ENTRY REQU I REMENTS,
1'_
51
= OFFSET(ADDRESS)
OF MESSAGE 8UFFER
"B
CX
=
MESSAGE 8YTE COUNT
"7
MAXIMUM MESSAGE LENGTH IS 36 CHARACTERS
130
8P = 81T 0=E161/E162, BIT I=CONFIG BAD, 2-15= FIRST MSG OFFSET
,'9
131
-
-
-
----------------
----------
~
------------
- - --- - -------­
132
! 33
003C
E_MSG
PROC
NEAR
134
003C F1 C5 3FFF
TEST
BP ,03FFFH
CHECK FOR NOT FIRST ERROR MESSAGE
135
0040 15 08
~NZ
E_MSGI
SKIP IF NOT FIRST ERROR MESSAGE
13_
137
0042 56
PUSH
51
SAVE MESSAGE POINTER
138
0043 81
E6 3FFF
AND
SI,03FFFH
USE LOW 14 BITS OF MESSAGE OFFSET
139
0047 OB EE
DR
BP,SI
AS FIRST ERROR MESSAGE FLAG
140
0049 5E
POF
51
(BIT 0
=
E161/E162, BIT
1
=
BAD_CONFIG
141
004A
142
004A E8 0063 R
CALL
P MSG
PR I NT MESSAGE
143
0040 IE
PUSH
OS
SAVE CALLERS
(OS)
144
004E E8 0034 R
CALL
DDS
;
POINT TO POST/BIOS DATA SEGMENT
145
0051
F6 06 0010 R 01
TEST
BYTE PTR "EQU I P FLAG, 0 I H;
LOOP IHAL T ON ERROR SW ITCH ON ?
146
0056 74 02
JZ
MFG_HAL T
-
YES -
THEN GO TO MANUF ACTUR I NG HALT
147
148
0058 IF
FOP
OS
RESTORE CALLERS
(OS)
149
0059 C3
RET
150
151
005A
MFG HALTI
MANUF ACTUR I NG LOOP MODE ERROR TRAP
152
005A FA
-
CLI
OJ SABLE
INTERRUPTS
153
005B AO 0015 R
MOV
AL,I/IMFG ERR FLAG
RECOVER ERROR
1NO I CA TOR
154
005E E6 80
OUT
MFG PORT ,AL-
SET
INTO MANUFACTURING PORT
155
0060 F4
HLT
HAL T SYSTEM
156
0061 E8 F7
~MP
MFG_HAL T
HOT NMI
TRAP
157
158
0063
E_MSG
ENDP
159
' _ 0
161
0063
P _MSG
PROC
NEAR
DISPLAY STRING FROM
ICS:)
162
0063 2E: 8A 04
MOV
AL,CS:
[51]
PUT CHARACTER IN (All
163
0066 46
INC
SI
PO I NT TO NEXT CHARACTER
164
0061 50
PUSH
AX
SAVE PRlNT CHARACTER
165
0068 E8 0128 R
CALL
PRT HEX
CALL VIDEO
10
166
0068 58
POP
AX -
RECOVER PRINT CHARACTER
167
006C 3C OA
CMP
AL,LF
WAS
IT LINE FEED?
168
006E 15 F3
~NE
P _MSG
NO, KEEP PRINTING STRING
169
0070 C3
RET
170
17 I
0071
P _MSG
ENDP
172
173
; --
ERR BEEP ----------------------------------------------------------­
174
;
THIS PROCEDURE WILL
ISSUE LONG TONES
(1-3/4 SECONDS)
AND ONE OR
175
MORE SHORT TONES
(9/32 SECOND)
TO INDICATE A FAILURE ON THE
17_
PLANAR BOARD, A BAD MEMORY MODULE, OR A PROBLEM WITH THE CRT.
177
ENTRY PARAMETERS:
17B
DH
=
NUMBER OF LONG TONES TO 8EEP.
179
;
DL = NUMBER OF SHORT TONES TO BEEP.
1BO
1-------- - - - - --------- ----- - - - ----------- ---------------- -- - - ------ ­
IBI
IB'
007 I
ERR_BEEP
PROC
NEAR
I B3
0071
ge
PUSHF
SAVE FLAGS
1B4
0012 FA
eLI
DISABLE SYSTEM INTERRUPTS
IB5
0073 OA Fb
OR
DH,OH
ANY LONG ONES TO BEEP
1B_
0075 7. IE
~Z
03
NO, DO THE SHORT ONES
I B7
0017
GI:
LONG BEEPS
IBB
0017 83 7.
MOV
8L,! 12
COUNTER FOR LONG BEEPS
(1-3/4 SECONDS)
I
B9
0079 B9 0500
MOV
CX,1280
o I V I SOR FOR 932 HZ
190
007C E8 OOAF R
CALL
BEEP
DO THE BEEP
191
007F B9 C233
MOV
CX,49115
2/3 SECOND DELAY AFTER LONG BEEP
192
0082 E8 00F5 R
CALL
WAITF
DELAY BETWEEN BEEPS
193
0085 FE CE
DEC
DH
ANY MORE LONG BEEPS TO DO
19.
0087 75 EE
~NZ
01
LOOP TILL
~ONE
195
19_
0089
IE
PUSH
OS
SAVE OS REGISTER CONTENTS
197
008A E8 0034 R
CALL
DDS
19B
0080 80 3E 0012 R 01
eMP
"MFG TST,OIH
MANUF ACTUR I NG TEST MODE7
199
0092
IF
POP
OS
-
RESTORE ORIGINAL CONTENTS OF (OS)
'00
0093 7. C5
~E
MFG_HALT
YES -
STOP BL I NK I NG LED
20
I
'02
0095
G3:
SHORT BEEPS
'03
0095 83
12
MOV
BL,I8
COUNTER FOR A SHORT BEEP
(9 132)
'04
0097 89 0488
MOV
CX,I208
DIVISOR FOR 987 HZ
205
009A E8 OOAF R
CALL
BEEP
DO THE SOUND
20_
0090 B9 8118
MOV
CX,33144
1/2 SECOND DELAY AFTER SHORT BEEP
207
OOAO E8 00F5 R
CALL
WAITF
oELA Y BETWEEN BEEPS
20B
00A3 FE CA
DEC
DL
DONE WITH SHORT BEEPS COUNT
209
00A5 75 EE
~NZ
G3
LOOP TILL DONE
210
211
00A7 89 8118
MOV
CX,33144
1/2 SECOND DELAY AFTER LAST 8EEP
21 ,
OOAA E8 00F5 R
CALL
WAITF
MAKE
I T ONE SECOND DELAY BEFORE RETURN
213
OOAD '10
POPF
RESTORE FLAGS TO ORIGINAL SETTINGS
214
OOAE C3
RET
RETURN TO CALLER
"S
21_
OOAF
ERR_BEEP
ENDP
5-82
TEST4

Advertisement

Table of Contents
loading

Table of Contents