IBM PC CONVERTIBLE

010F
010F
Oll2
Oll4
Oll6
Oll9
OllB
OllF
0121
0121
E8 050B R
72 00
BO 42
E8 02Fl
72 06
; ***********************************************************
DISICVERF
CALL
JC
MOV
CALL
JC
PROC NEAR
DSKLCHANGE CHECK FOR MEDIA CHANGE
DSKLERR
AL, DMILVERI FY VERI FY COMMAND FOR DMA
DMA_SETUP SET UP THE DMA
DSKLERR
C6 46 OF E6
E8
2F
MOV
JMP
AHSAVE[BP] ,READ_CMND ; RD COMMAND (AH SAVE)
SHORT RW_OPN ; GO DO THE OPERATION
DISK_VERF
ENDP
; ***********************************************************
; DISKETTE ERROR OCCURRED
; ***********************************************************
DSKLERR:
0121 C3 RET
; RETURN TO MAIN ROUTINE
0122
0122
0125
0127
012C
0l2E
0131
0133
0137
0139
0139
0139
Ol3C
Ol3E
0143
0145
0148
014A
014E
0150
0150
0150
0153
0156
0159
0150
E8 0508 R
72 FA
; ***********************************************************
; ----- DISKETTE FORMAT
; ***********************************************************
DISKJORMAT PROC NEAR
CALL DSKLCHANGE CHECK FOR MEDIA CHANGE
JC DSKT _ERR
80 OE 003F R 80
BO 4A
OR MOTOR_STATUS, WRITE_OP
MOV AL, DMA_WRlTE
; INDICATE WRITE OPERATION
WILL WRITE TO THE DISKETTE
SET UP THE DMA E8 02F1 R
72 EE
C6 46 OF 40
EB 17
CALL DMILSETUP
JC DSKLERR
MOV AHSAVE [BP] ,FORMALCMND ; FORMAT COMMAND (AH SAVE)
JMP SHORT RW_OPN ; DO THE OPERATION
DISICFORMAT ENDP
; ***********************************************************
E8 050B R
72 E3
;----- DISKETTE WRITE ROUTINE
; ***********************************************************
DISICWRITE
CALL
JC
PROC NEAR
DSKLCHANGE CHECK FOR MEDIA CHANGE
DSKLERR
80 OE 003F R 80
BO 4A
OR
MOV
CALL
MOTOILSTATUS,WRlTE_OP ; INDICATE WRITE OPERATION
AL,DMILWRITE DMA WRITE COMMAND
E8 02F1 R
72 07
JC
DMA_SETUP
DSKLERR
C6 46 OF C5
EB 00
MOV
JMP
AHSAVE[BP] ,WRITE_CMND WRITE COMMAND (AH SAVE)
SHORT RW_OPN
E8 041B R
88 4E OA
E8 0268 R
DISICWRITE ENDP
; ****************************************************************
; RW_OPN
THIS ROUTINE PERFORMS THE READ/WRITE/VERIFY
AND FORMAT OPERATIONS
; ****************************************************************
RW_OPN
PROC NEAR
CALL MOTOILSTARTUP
CHECK MOTOR STATE AND WAIT
FOR STARTUP I F NECESSARY
DO THE SEEK OPERATION
MOV CX,CXSAVE[BP] GET TRACK/ SECTOR PARMS
CALL SEEK MOVE TO CORRECT TRACK
C6 46 OE 00 MOV
ALSAVE[BP] ,0 SET NO SECTORS READ IN CASE OF ERROR
IN AL SAVE AREA
72 79 JC J17 I F ERROR, THEN EXIT AFTER MOTOR OFF
NECOUTPUT WILL POP RETURN ADDRESS AND RETURN TO THE 1ST LEVEL CALLER
015F B8 0221 R MOV
PUSH
AX,OFFSET J20
AX
DUMMY RETURN ON STACK FOR NECOUTPUT
SO THAT IT WILL EXIT ROUTINE IF
ERROR
0162 50
0163 8A 66 OF
0166 E8 022C R
0169
8A 66 01
SEND OUT THE PARAMETERS TO THE CONTROLLER
MOV
CALL
MOV
AH ,AHSAVE [BP]
NECOUTPUT
AH, DHSAVE [BP]
GET NEC COMMAND (AH SAVE)
OUTPUT THE OPERATION COMMAND
GET THE CURRENT HEAD NUMBER
2-126 ROM BIOS