Table of Contents
Advertisement
IBM P.,.'sonal Comput.r MACRO A•••mel.r
Version 2.00
1-'
810S1
---- 06/10/85
INTERRUPT
ISH 810S ROUTINES
06-10-85
340
0126 83 F9 00
e"p
CX,O
341
0129 59
pop
ex
;
ORIGINAL COUNT
342
012A 75 04
JNZ
SHORT TEST CORD 2
343
012C 28 C9
SUB
CX,CX
-
-
;
SET 0 COUNT FOR RETURN
344
012E E8 28
J"P
SHORT TEST_CORD_3
; EXIT WITH COUNT
=
0
345
0130
TEST CORD 2;
346
0130 80 00
-
M~V
AL,O
SET UP TO LATCH TIMER 0
341
0132 E6 43
OUT
TIMER+3,AL
346
0134 E8 00
JMP
"2
34.
0136 E4 40
IN
AL,TIMER
~
READ LOW BYTE OF T
r
MER 0
350
0138 8A EO
MOV
AH,AL
351
013A EB 00
JMP
352
013C E4 40
IN
AL,TIMER
READ HIGH 8YTE OF TIMER
0
"2
353
013E 86 EO
XCHG
AH.AL
REARRANGE TO HIGH.LOW
354
355
0140 3B C8
CMP
CX,AX
CHECK FOR COUNTER WRAP
356
0142
13
OB
JAE
TEST CORD
4
GO
IF NO
351
0144 52
PUSH
DX
-
356
0145 8A FFFF
MOV
DX,-I
35.
360
0148 2B DO
SUB
OX,AX
;
ADJUST FOR WRAP
361
014A 03 CA
ADD
CX,DX
362
014C SA
POP
ox
363
0140 E8 02
JMP
SHORT TEST_CORD_5
364
36S
014F
TEST CORD 4:
366
014F 2B C8
-
508
CX,AX
361
0151
TEST CORD
5:
366
0151 81 EI
IFFO
-
AND
CX,IFFOH
ADJUST
30'
0155
CI E9
04
S"R
CX,4
310
311
0158
TEST CORD
3:
312
0158 F8
-
Si'l
I
NTERRUPTS BACK ON
313
0159 8A 0201
MOV
DX,20lH
FLUSH OTHER
IIIF'UTS
314
015C 51
PUSH
cx
315
015D 50
PUSH
AX
316
o
15E 89 04FF
MOV
CX,4FFH
;
COUNT
311
0161
TEST CORD 6:
316
0161
EC
-
IR
AL.OX
31'
0162 A8 OF
TEST
AL,OFH
360
0164 EO FB
LOOPNZ
TEST_CORD_6
361
362
0166 58
POP
AX
363
0167 59
POP
CX
364
0168 SA
POP
OX
I
SET COUNT
385
386
0169 C3
RET
;
RETURN
361
366
o
16A
TEST CORD
ENOP
36'
016A
JOY_STICK
ENDP
3.0
3.,
016A
WAIT
PROC
NEAR
3'2
016A IE
PUSH
OS
SAVE
3'3
0168 E8 0000 E
CALL
DDS
3'4
016E F6 06 OOAO R 01
TEST
ORTC WAIT FLAG,OI
TEST FOR FUNCTION ACTIVE
3'S
01731405
JZ
WAIT-'
3'0
0175 IF
POP
OS
3"
0176 F9
STe
SET ERROR
3.6
0171 E9 0057 R
JMP
RETURN
3"
017A
400
017A FA
eLI
NO
I NTERRUPTS ALLOWED
401
0178 E4 AI
IN
AL,INTBO'
ENSURE
INTERRUPT UNMASKED
402
0170 E8 00
J"P
'.2
403
o
17F 24 FE
AND
AL,OFEH
404
0181
E6 Al
OUT
INTBOI,AL
405
01838C
IE 009A R
MOV
400
0187 C7 06 0098 R OOAO R
MOV
:~~~~-~~:~7~~~s~~
(lRTC
wll
~E~L~6
TRANSFER TABLE
401
0180 89 OE 009E R
MOV
406
0191
89
16 009C R
MOV
:~+g-~b~~DiX
-
"4
40.
0195 C6 06 OOAO R 01
NOV
ORTC-WAIT FLAG,OI
I
SET ON FUNCTION ACTIVE SWITCH
410
o
19A 50
PUSH
AX
-
-
;
SAVE (AHI
411
019888 0808
NOV
AX,X·CMOS REG B
;
ENA8LE PIE
412
o
19E E8 0000 E
CALL
CMOS REAO-
-
;
READ ALARM 8YTE
413
01AI
24 7F
AND
AL,OTFH
I CLEAR SIT BIT
01A3 OC 40
OR
AL.040H
; ENABLE PIE BIT
415
01 AS 86 EO
XCHG
AH,AL
;
DATA TO WORK REGISTER
416
01 A 7 E8 0000 E
CALL
CMOS WR
I
TE
;
WR I TE NEW ALARM BYTE
411
OIAA 58
POP
AX
-
;
RESTORE
{AHI
416
41'
I·-~--
WAIT TILL RTC TIMEOUT POSTED
(WITH ERROR TIMEOUT)
420
421
01A8 F8
511
;
ENABLE
INTERRUPTS
...
01AC 51
PUSH
CX
423
01 AD 52
PUSH
ox
SAVE CALLERS PARAMETERS
424
01AE 87 Dl
XCHG
OX,CX
SWAP COUNT WORK REG I STERS
425
OIBO
WAIT_2:
420
0180 F6 06 OOAO R 80
TEST
CHECK FOR ENO OF WA I T -
CLEAR CARRY
:~~~_~A
IT_FLAG, 080H
421
0lB5 EI
F9
LOOPZ
DECREMENT TIMEOUT DELAY TILL WAIT END
426
0187 75 05
JNZ
WA IT-9
EXIT IF RTC TIMER WAIT ENDED FLAG SET
...
0189
83
EA 01
SUB
DX,I-
DECREMENT ERROR TIMEOUT COUNTER
430
018C
13
F2
JNC
WAIT_2
LOOP TILL COUNTERS TIMEOUT
431
018E
432
01BE C6 06 OOAO R 00
MOV
ORTC WAIT FLAG,O
SET FUNCT 1 ON I NACT I VE
433
0lC3 SA
POP
ox -
'34
o
IC4 59
POP
cx
RESTORE CALLERS PARAMETERS
'35
0lC5 IF
POP
OS
'30
o
IC6 F8
CLC
CLEAR CARRY FLAG
431
0lC7 E9 0057 R
JMP
436
OICA
ENDP
'3'
5-166
BIOS1
Advertisement
Chapters
Table of Contents
