IBM PC CONVERTIBLE

0039
0039
C6 06 0041
003E
EB 26 90
0041
0041
80 EB OC
0044
0044
80 FC 01
0047 76 05
R 01
DIO_INLCMD:
MOV DISKETTE_STATUS,BAD_CMD ; INDICATE INVALID COMMAND
JMP DIO_2 GET STATUS AND EXIT
DIO_O:
SUB
DIO_l :
CMP
JBE
BL,12
CORRECT FUNCTION CODE FOR 15,16
RESET COMMAND OR STATUS COMMAND?
JUMP AROUND DRIVE RANGE CHECK IF SO
RANGE CHECK DRIVE NUMBER
0049 80 FA 03
CMP
JA
DL ,3
DIO_INLCMD
004C n EB
JUMP IF INVALID
004E
DIO_11:
004E Dl E3
SHL BX,l
; DOUBLE LINK TABLE OFFSET
0050 80 26 003F R 7F
AND
MOTOR_STATUS, NOT WRITE_OP ; RESET WRITE OPERATION
FLAG
0055 2E: FF 97 0000 R
CALL DSKLTABLE[8X]
CALL PROPER ROUTINE
005A 91
XCHG CX,AX SAVE AX
005B BB 0004
MOV BX,4
GET THE MOTOR WAIT PARAMETER
005E E8 0259 R
CALL GELPARM
0061 88 26 0040
MOV
MOTOR_COUNT, AH
SET THE TIMER COUNT FOR TH E MOTOR
0065 91
XCHG AX,CX RESTORE AL
0066 DIO_2 :
0066 8A 26 0041 MOV AH, DI SKETTE_STATUS
GET STATUS OF OPERATION
006A 88 66 OF MOV AHSAVE [BP] ,AH
SAVE RETURN CODE ON STACK
006D 80 FC 01 CMP AH,l
SET THE CARRY FLAG FOR FAILURE
0070 F5 CMC
0071 DIO_3:
0071 5A POP
DX RESTORE ALL REGISTERS
0072 5D POP
BP
0073 5F POP DI
0074 5E POP
SI
0075
IF POP DS
0076 59 POP
CX
oon 5B POP BX
RECOVER ADDRESS
0078 58 POP
AX RESTORE AX REGISTER
0079 CA 0002 RET
2 THROW AWAY SAVED 'flAGS
007C DSKLIO ENDP
******************************
INVALID COMMAND RECEIVED
******************************
007C DSKLINLCMD PROC NEAR
007C C6 06 0041 R 01
MOV DISKETTCSTATUS, BAD_CMD SV STAT & ST CRY FOR ERR
0081 C3 RET
0082
DSKLI NLCMD ENDP
. ***********************************************************
~----- RESET THE DISKETTE SYSTEM
; ***********************************************************
0082 DISK_RESET
PROC
NEAR
0082 BA 03 F2
MOV
DX, DRIVE_CNTL
ADAPTER CONTROL PORT
0085
FA
CLI NO INTERRUPTS
0086 C6 06 0040 R FF MOV MOTOR_COUNT ,OFFH
SET LONG MOTOR ON TIME
008B AO 003F R MOV
AL,MOTOILSTATUS WHICH MOTOR IS ON
008E Bl 04 MOV
CL,4 SHI FT COUNT
0090 D2 EO
SAL AL, CL MOVE MOTOR VALUE TO HIGH NYBBLE
0092 A8 20
TEST AL, 20H SELECT CORRESPONDING DRIVE
0094 75 OC
JNZ J5
JUMP I F MOTOR ONE IS ON
0096 A8 40
TEST AL, 40H
0098 75 06
JNZ J4 JUMP I F MOTOR TWO IS ON
009A A8 80
TEST AL, 80H
009C 74 06
JZ J6 JUMP I F MOTOR ZERO IS ON
009E FE CO INC AL
OOAO J4:
OOAO FE CO INC AL
00A2 J5:
00A2 FE CO
INC AL
2-124 ROM BIOS