IBM 5150 PC Technical Reference (6025005, August, 1981) (PDF)
IBM 5150 PC Technical Reference (6025005, August, 1981) (PDF)
IBM 5150 PC Technical Reference (6025005, August, 1981) (PDF)
Create successful ePaper yourself
Turn your PDF publications into a flip-book with our unique Google optimized e-Paper software.
lOC OBJ LINE SOURCE<br />
ESIE 884000<br />
E521 8E08<br />
f523 B04t1<br />
£525 E661<br />
E527 BOFF<br />
E529 £621<br />
f5za B086<br />
£520 £643<br />
ESZ' 860304<br />
£532 (642<br />
!534 8AC4<br />
£536 £642<br />
E538 £462<br />
f53A 2410<br />
f5X 1.26800<br />
E53F E83E14<br />
ESifZ £83814<br />
ES45 E30C<br />
£547 81F84005<br />
E54B 7306<br />
£540 61F81004<br />
E551 7309<br />
E553<br />
E553 BEABE4<br />
E556 B90300<br />
£559 £86EOI<br />
ESSC<br />
ESSC 80Ft<br />
ESSE £621<br />
E560 1.01000<br />
E563 1.801<br />
E565 7503<br />
E567 E98900<br />
£56A<br />
E56A Boee<br />
E56C £621<br />
E56£ 8400<br />
£570 CDn<br />
f572 F6C4FF<br />
f575 7520<br />
£577 BAF201<br />
£57. eOIC<br />
f57C EE<br />
ES7D 28C9<br />
E57F<br />
E51F E2FE<br />
E581<br />
E581 ElFE<br />
E583 3302<br />
1045 J-------------------------------------------<br />
1046 ;TEST.Il<br />
1047 CASSETTE DATA WRAP TEST<br />
1048 .DESCRIPTION<br />
1049 , TURN CASSETTE MOTOR OFF. WRITE A BIT OUT TO THE CASSETTE DATA BUS.<br />
1050 VERIFY THAT CASSETTE DATA READ IS WITHIN A VALID RANGE.<br />
1051 ; -------------------------------------------<br />
1052<br />
1053 TURN THE CASSETTE HOTOR OFf<br />
1054<br />
1055 NOV AX,DATA ;POINT OS REG TO DATA SEG<br />
1056 HOV OS,AX<br />
1057 HOV AL,04DH ; SET TIMER 2: SPK OUT, AND CASST<br />
1058 OUT PORT_B.U jOur BITS ON. CASSETTE MOT OFf<br />
1059<br />
lObO<br />
1061<br />
WRITE A BIT<br />
1062 I10V AL.OffH ;DISABLE TIHER INTERRUPTS<br />
1063 OUT nlTMI,AL<br />
1064 NOV AL.OB6H iSEL TIM 2, LSB, t1S8, l1D 3<br />
106S OUT TltIER+3,AL jWRlTE 8253 CMD/MODE REG<br />
1066 NOV AX, 1235 ;5ET TIMER 2 CNT fOR 1000 USEC<br />
1067 OUT TIMEFh2.Al ;WRITE TIMER 2 COUHTER REG<br />
106a HOV AL,AH ;WRITE HSB<br />
1069 OUT TIMER+2,AL<br />
1070<br />
1071 READ CASSETTE INPUT<br />
1072<br />
1073 IN AL,PORT_C ;READ VAWE OF CASS IN BIT<br />
1074 AND AL~ I OH ; ISOLATE FRctI OTHER BITS<br />
107$ NOV LAST_VAl,AL<br />
1076 CALL READ_HALF_BIT<br />
1077 CALL READ_HALF_BIT<br />
1078 JCXZ fa ; CAS_ERR<br />
1079 CN" BX.MAX_PERIOD<br />
1080 JNC fa i CAS_ERR<br />
1081 CHP BX,MIN_PERIOD<br />
1082 JNC f9 ;GO TO NEXT TEST IF OK<br />
1083 Fa: ) CAS_ERR:<br />
I ... HOV SI.OfFSET F2 iCASSETTE WRAP FAIlED<br />
lOSS NOV CX,f2L<br />
1086 CALL P_MSG ;GO PRINT ERROR MSG<br />
1087 ; -------------------------------------------<br />
1088 iTEST.14<br />
1089 DISKEnE ATTACHMENT TEST<br />
1090 lDESCRIPTION<br />
1091 CHECK IF IPL DISKETTE DRIVE IS ATTACHED TO SYSTEM. IF ATTACHED.<br />
1092 VERIFY STATUS OF NEC FDC AFTER A RESET. ISSUE A RECAL AHD SEEK<br />
1093 CHO TO FDC AND CHECK STATUS. COI1PLETE SYSTEI1 INITIALIZATION THEN<br />
1094 PASS CONTROL TO THE BOOT LOADER PROGRAJ1.<br />
1095 l-------------------------------------------<br />
1096 F9:<br />
1097 MOV AL.OFCH ;ENABLE TIMeR AND KeD INTS<br />
1098 OUT INTAOI,Al<br />
1099 MOV AL.BYTE PTR EQUIPJLAG ;GET SENSE SWS INFO<br />
1100 TEST AL.OIH ;IPL DISKETTE DRI .... E AHCH?<br />
1101 JNZ fl. ;YES - TEST DISKETTE CONTR<br />
1102 JNP ,..<br />
.NO - SKIP THIS TEST<br />
1103 FlO: ; DISK_TEST:<br />
1104 MeV AL,OSCH ; ENABLE DISKETTE I KEYBOARD,<br />
1105 OUT INTAOt,AL ; AND TINER INTERRUPTS<br />
1106 HOV AH ,0 ;RESET flEC FOC<br />
1107 INT BH iVERIfY STATUS AFTER RESET<br />
1108 TEST AH.OFFH ;STATUS OK?<br />
1109 JNZ fl'<br />
iNa - FDC FAILED<br />
1110<br />
1111 TURN DRIVE 0 MOTOR ON<br />
1112<br />
1113 NOV OX.OlF2H ; GET AODR OF FOC CARD<br />
1114 HOV AL.ICH ;TURN MOTOR ON, EN DHA/IHT<br />
1115 OUT DX,AL il,JRITE FOC CONTROL REG<br />
1116 sua CX,CX<br />
1117 F11: ; NOTOR_WAIT:<br />
1118 LOOP fll ;WAIT FOR 1 SECOND<br />
1119 F12: I HOTOICWAITl:<br />
1120 lOOP fl2<br />
1121 XOR DX,OX ;SELECT DRIVE 0<br />
A-16
Change language