25.03.2015 Views

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)

SHOW MORE
SHOW LESS

Create successful ePaper yourself

Turn your PDF publications into a flip-book with our unique Google optimized e-Paper software.

lOC OBJ lJNE SOURCE<br />

E585 6501<br />

ES87 88163EOO<br />

ESBB EBF30S<br />

ES8E n07<br />

E590 8522<br />

E592 f8Ee08<br />

E595 7309<br />

E597<br />

E597 BEAEElt<br />

E59A 890300<br />

E590 fB2AOt<br />

E5AO<br />

[SAO BoDe<br />

E5A2 BAF20J<br />

E5A5 EE<br />

ESAO<br />

E5A6 C7061A001EOO<br />

ESAC C7061C001£00<br />

E582 8081E4<br />

E585 BEOOOO<br />

E588<br />

E588 2E885600<br />

E58C BOAA<br />

ESSE EE<br />

ESBF 2ACO<br />

E5Cl EC<br />

E5C2 leAA<br />

ESC4 7506<br />

E5e6 89940800<br />

ESCA 46<br />

EseB 46<br />

ESCC<br />

Esec 45<br />

EseD 45<br />

EseE BIFDB7E4<br />

E502 75E4<br />

E504 BBOOOO<br />

E507 BAFA03<br />

E50A EC<br />

E50B ABFa<br />

E50D 7508<br />

ESDF C7870000FS03<br />

E5E5 43<br />

E5E6 43<br />

ESE7 SAfAD2<br />

ESEA EC<br />

ESEB ABfa<br />

ESED 7506<br />

E5EF C7870000f802<br />

ESF5 43<br />

ESF6 43<br />

ESF7<br />

ESF7 8BC6<br />

ESF9 6103<br />

ESFB 02G8<br />

E5FO OAe3<br />

ESFF A21100<br />

~E602BAOI02<br />

f605 EC<br />

f606 AaOF<br />

E608 7505<br />

f60A 800E110010<br />

E60F<br />

E60F B080 <br />

E611 E6AO <br />

1122 HOV 01,1 ; Sf lEeT TRACK 1<br />

1123 HOV SEEK_STATUS,OL<br />

112:4 CALL SEEK ;R"ECAlIBRATE DISKETTE<br />

112:5 JC F13 IGO TO EPA' SUBROUTINE IF ERR<br />

1126 HOV CH.34 I SELECT TRACK 34<br />

1127 CALL SEEK ,SEEK TO TRACK 34<br />

1128 JHC F14 10K. TURH HOTOR OFF<br />

112:9 F13: ; DSK_ERR!<br />

1130 MOV SI.OFFSET F3 IGET ADOR OF HSG<br />

1131 HOV CX.F3L IGET I1SG BYTE COUNT<br />

1132: CALL P _HSG IGO PRINT ERROR HSG<br />

1133<br />

1134 TURN DRIVE 0 MOTOR OFF<br />

1135<br />

1136 F14:<br />

1137 MOV AL,OCH ; TURN DRIVE 0 MOTOR OFF<br />

1138 MOV OX,03FZH ; FOC ClL ADDRESS<br />

1139 OUT DX,AL<br />

1140<br />

1141 SETUP PRINTER ANO RSZ3Z BASE ADDRESSES IF DEVICE ATTACHED<br />

114,<br />

1143 F15:<br />

1144 MOV SUFFER_HEAD, OFFSET KB_BUFFER ISETUP KEYBOARD PARAI1ETERS<br />

1145 MOV BUFFER_TAIL.OFFSET KB_BUFFER<br />

1146 MOV BP.OFFSET F4<br />

1147 MOV SI.O<br />

1148 Fl6:<br />

1149 MOV OX,CS: [BP] i6ET PRINTER BASE ADDR<br />

1150 MOV AL,OAAH iWRITE DATA TO PORT A<br />

1151 OUT DX,AL<br />

1152: SUB AL.AL<br />

1153 IN AL,DX ;READ PORT A<br />

1154 CMP AL,OAAH iDATA PATTERN SAME<br />

1155 JNE Fl7 iNO - CHECK NEXT PRT CD<br />

1156 MOV PRINTER_BASEL SI J,OX iYES - STORE PRT BASE ADDR<br />

1157 INC SI ; INCREMENT TO NEXT WORO<br />

1158 INC 51<br />

U59 F17:<br />

1160 INC BP I POINT TO NEXT BASE ADDR<br />

1161 It~C BP<br />

116, CMP BP.OFFSET F4E IALL POSSIBLE AOORS CHECKED?<br />

1163 Jt1E FI6<br />

1264 HOV ex.o ;POINTER TO RS2:32: TABLE<br />

1265 HOV OX.3FAH ;CHECK IF RS2:32 co 1 ATTCH?<br />

1166 IN AL,OX iREAQ INTR 10 REG<br />

1167 TEST AL,OF8H<br />

1168 JNZ Fl8<br />

1169 MOV RS232_BASE[ BX 1, 3F6H iSETUP RS2:32 CD II ADOR<br />

1170 INC BX<br />

1171 WC BX<br />

1172 FIB: MOV DX,2FAH ;CHECK IF RSl32 CD 2: ATTCH<br />

1113 IN AL.OX ;READ INTERRUPT 10 REG<br />

1174 TEST AL.OF8H<br />

1175 JtlZ FI9<br />

1176 ; SETUP RS232 CD 12<br />

1177 INC BX<br />

1178 INC BX<br />

1179<br />

1180 j------ SET UP EQUIP FLJ.G TO INDICATE NUMBER OF PRINTERS AND RS2:32: CARDS<br />

1181<br />

Jl8,<br />

Fl9:<br />

1163 MOV AX,SI ; 51 HAS 2* N1.JM8E'R Of RS232<br />

1184 MOV Cl,3 ; SHIFT COlMT<br />

118S ROR Al,Cl ; ROTATE RIGHT 3 POSITIONS<br />

1186 OR AL,BL ; OR IN THE PRINTER COUNT<br />

1187 MOV BYTE PTR EQUIP_FLAG+l.Al ; STURE AS SECOND BYTE<br />

1188 HOV DX.20IH<br />

1189­ IN AL,DX<br />

1190 TEST Al,OFH<br />

1191 JNZ f20 ; HO_GAME_CARD<br />

1192 OR BYTE PTR EQUIPJLAG+l,16<br />

1193 F20:<br />

1194<br />

1195 EHABLF NMI INTERRUPTS<br />

1196<br />

1197 MOV AL,80H ;ENABlE HMI nrrERRUPTS<br />

1198 OUT OAOH,AL<br />

A-I7

Hooray! Your file is uploaded and ready to be published.

Saved successfully!

Ooh no, something went wrong!