IBM 5150 PC Technical Reference (6025005, August, 1981) (PDF)

LOC OBJ LINE SOURCE
~:~~::
82.4 ; -------------------------------------------­
82.5 ;TE5T.10
826 CRT INTERFACE lINES TEST
827 ;DESCRIPTION
62:8 SENSE ON/OFF TRANSITION OF THE VIDEO ENABLE AtIJ HORIZONTAL
829 ; SYNC LINES.
830 1-------------------------------------------­
8"
pop AX ; GET VIDEO SENSE SW INFO
8"
PUSH AX
i5AVE IT
E3C2 80FC30 8ll CHP AH.30H iB/w CARD ATTACHED?
E3C5 BABADl 81. MaV DX.038AH iSETUP AODR OF BW STATUS PORT
nee 7403 815 JE Ell ;YES - GO TEST LINES
f3eA BADA03 81. I10V DX,03DAH jCOLOR CARD IS ATTACHED
1!!3CD 817 Ell: i LIHf_TST:
nco 8408 818 MOV AH.8
EXF 8.. EI2.:
BeF 28C9 8.0 SUB CX,CX
BOI EC 8.1 E13: IH AL,DX ;READ CRT STATUS PORT
8.,
£302 22C4 AND AL,AH ;CHECK VIDEO/ttORZ LINE
8.,
E3D8 [ell 8'5 JMP SHORT 'El7 I GO PRINT ERROR MSG
nOA 28t9 8" El4: SUB CX,CX
flOC EC 8.7 ElS: IN AL,DX ;READ CRT STATUS PORT
ElOO 22:C4 8.8 AND AL,AH ;CHECK VIDEO/HORZ LINE
8" JZ
El'
-£304 7504 8., JNZ EI4 ; ITS ON - CHECK IF IT GOES OfF
ElOtt E2F9 LOOP EU ; LOOP TILL ON OR TIMEOUT
nOF 7404- ; ITS ON - CHECK NEXT LINE
ElEl £2F9 850 LOOP ElS ; LOOP IF OFF TILl: IT GOES ON
E3E] EBO-S 851 JMP SHORT E17
E3£5 8S> E16: I NXT_LINE:
E3ES BI03 851 MOV CL,3 ; GET NEXT BIT TO CHECK
E3E7 D2EC 85. SHO AH.CL
ElE9 75£4 855 JHZ ElO ;GO CHECK HORIZONTAL LINE
ElEB £B06 85. JMP SHORT El8 ;DISPLAY CURSOR ON SCREEN
ElEO 857 E17: ; CRT_ERR:
E3ED BADlOI 85. HOV DX.I02H
£3FO E83D02 85. CALL ERR_BEEP ;GO BEEP SPEAKER
~:~:~ 58 8.1 POP AX IGET VIOEO SENSE SWS UH)
ElF4 8400 MOV AH.O iSET HOOE AND DISPLAY CURSOR
8"
'E3F6 COlO 8.. mT 10H ;CALL VIDEO liD PROCEDURE
8'0 E18: ; DISPLAY_CURSOR:
864 J-------- - ------- ----------- -------- --------­
865 ;TEST. 11
866 ADDITIONAL READ/WRITE STORAGE TEST
867 ;DESCRIPTION
868 WRITE/READ DATA PATTERNS TO ANY READ/WRITE STORAGE AFTER ntE BASIC
869 16K. STORAGE ADDRESSABILITY IS CHECKED.
870 ; --- ------ - ----------------------------- ----­
871 ASSUME OS:DATA
ElF8 870 £19:
BF8 884000 8n MOV
E3FB 8E08 87. MOV
875
87. DETERMINE RAM SIZE ON PLA~iAR BOARD
877
BFD 8A261000 8i8 MOV AH.BYTE PTR EQUIP_FLAG ; GET SENSE SIoIS INFO
E401 80E40C 87. AND AH.OCH ; ISOLATE RAM SIZE SWS
£404 8004 8.. MOV AL~4
£406 F6E4 881 MUL AH
£408 0410 8S;! ADO AL,I6 ;AOD BASIC 16K
£40A 8BOO 881 MOV OX.AX ;SAVE PLANAR RAM SIZE IN ox
E40C 8B08 88' MOV eX.AX ; AND IN ex
M'
8••
DETERMINE 10 CHAHNEL RAM SIZE
U7
E40£ £462 8U IN AL,PCRT_C ;READ 10 CH RAM SIZE SWS
£410 240F 88. ANO AL.OFH I ISOLATE FROI1 OntER BITS
~E412 842:0- 8.0 MOV AH,32
£414 F6£4 891 M\JL AH
£416 A31500 8.,
MOV IO_RAM_SIZE .AX ;SAVE 10 CHANNEL RAM SIZE
£419 83F840 8" CMP 8X.40H ; P LAHAR RAM SIZE ::: 64K?
E41C 7402: 8" JE EaO ;YES - ADD 10 CHN RAM SIZE
E41E lacO 895 SUB AX,AX ;NO - 000 T ADD ANY 10 RAM
8"
£420 E20: ; ADD_IO_SIZE:
£42:0 OX3 897 ADD Ax.ex ;SUM TOTAL RAM SIZE
£422 A31300 898 MOV MEtfORY_SIZE,AX ;SETUP MEMORY SIZE PARM
E425 813E72003412 8'9 CMP RESETJLAG.l2.34N ; POD INITIATED BY KBD RESET?
A-13