IBM 5170 Technical Reference page 232

I
I
RESERVED --PRESENT STATE
000: 360K IN DRIVE UNESTA8LISHED
DOl: 360K IN DRIVE UNESTABLISHED
002: 1.2M IN DRIVE UNESTABLISH[O
003: 360K IN
DRIVE ESTABLISHED
004: 360K IN DRIVE ESTABLISHED
005: 1.2M IN DRIVE ESTABLISHED
------>
MED lA/DR I VE ESTABL I SHED
-------------->
DOUl3LE STEPPING REQUIRED (360K IN 1.2M
DR IVE)
---------------------------->
DATA TRANSFER RATE FOR THIS DRIVE:
00:
01 :
10:
11:
STATE OPERATION STARTED - ABSOLUTE ADDRESS 110:92
&
93
(DRIVE 0 - 92, DRIVE 1 - 93)
PRESENT CYLINDER NUMBER - ABSOLUTE ADDRESS 110:94 & 95
(DRIVE 0 - 911, DRIVE 1 - 95)
ASSUME CS: CODE, OS: DATA, ES: DATA
PUBLIC DISKETTE 101
0000
0000 FB
DISKETTE 10 1
5TI­
·PROC
FAR
; »>
ENTRY PO I NT FOR ORG OEC59H
I NTERRUPTS BACK ON
0001
53
PUSH
ox
SAVE ADDRESS
0002
51 PUSH
ex
0003 1E PUSH
os
SAVE SEGMENT REG I STER VALUE
00011
56
PUSH
SI SAVE ALL REGISTERS DURING OPERATION
0005 57 PUSH
01
0006
55
PUSH
OP
0007 52 PUSH
ox
0008 88 EC NOV
BP, SP
SET UP PO I NTER TO HEAD PARM
OOOA BE
---­ R
MOV S I, DATA
0000 8E DE MOV OS, SI SET DATA REGION
OOOF 80 FG 01
eMP AH,1
CHECK FOR RESET AND STATUS OPERATIONS
0012 76 OF JBE
R4
BYPASS DRIVE CHECK IF YES
0014
80 FA 01
eMP DL,l CHECK DR I VE NUMBER FOR VAL I 0 I TY
0017
76 OA
JBE R4 IF VALID CONTINUE
0019 c6 06 0041 R 01 R5: MOV TERMI NATE
001E BE 0000 MOV SETUP
0021 El3 49
JMP
0023 50
~4
: PUSH SAVE OR I G I NAL OPERA T I ON FOR RETRY LA TE-R ON
0024
E8 010C R CALL CALL THE REST TO ENSURE OS RESTORED
0027 5E POP RESTORE OlllCINAL OPERATION FOR RETRY
0028
8[3 06
MOY GET ORICINAL OPERATION FOR TESTING
002A 80 FE 01
CMP
SEE IF IT IS A RESET OR STATUS OPERATION
0020 76 3D JBE BYPASS STATE UPDATE
002F F6 06 008F R 01 TEST HF _CNTRL, DUAL GO DETERM I NE TYPE
or
CONTROLLER CARD
0034 74 36 JZ OK
DISKETTE ATTACH CARD
0036 80 FE 15 eMP DH,15H READ DISK CHANGE STATUS OR. DISK TYPE COMMAND
0039
73 31 JAE
OK
I F YES, BYPASS STATE PROCESS I NG
0038 88 56 00 May
ox,
[8P
1
RESTORE DR IVE PARAMETER
003E 32 FF XOR !.lH,BH SETUP ADDRESS TO MEDIA STATE FOR THIS DRIVE
OOtiD 8A OA
MOY l3L,DL ;
00112
8A 26 0041 R MOV AH,DISKETTE STATUS ; GET STATUS OF OPERATION
0046 OA Ei t OR AH, AH - ; SEE I F ANY ERRORS
0048 75 4C JNZ RETRY ; JUMP TO CHECK FOR MEDIA CHANGE
OOIIA
8A A7 0090 R NOV All, DSK_STATE[BX] ; GeT MEDIA STATE OF DRIVE
OOIIE F6 Gil 10
TEST AH,DETERMINED SEE IF MEDIA STATE SET ALREADY
0051 75 14 IN/ OK2 I F SET, DDNT CHANGE STATE
0053 8A MOV CL,AH GET PRESENT STATE
0055 BO AND CL, STATE MSK I SOLATE STATE NUMBER
OO5e
80 ADD
CL,3 - ELEVATE STATE TO SET ALREADY
005e BO AND AH, REV STATE CLEAR OUT STATE NUM!.lER
005E OA OR
AH,CL - SET NEW STATE NUMBER
0060 80 OR AH,DETERMINED ; MAKE MEDIA STATE SET
0063
88
R MOV DSK STATEIBXj,AH; SAVE IN DRIVE STATE INDICATOR
0067 e6 R 00 OK2;
MOV
DSK:=STATEIBX+2j,O; CLEAR ORIGINAL STATE OPERATION STARTED IN
006C
8B
OK: MOV BX,4 GET THE MOTOR WAIT PARAMETER
006F
BO
MOV DX,SI GET ORIGINAL OP AGAIN
0071 50 PUSH AX SAVE RETURN VALUE
0072 E8 0382 R CALL GET PARM
0075
0079
88 26 0040
R
58
MOY
POP
NOTOR COUNT, AH
AX -
SET THE TIMER COUNT FOR THE MOTOR
RESTORE RETURN VALUE
007A 80 FE 15 CMP DH,015H
SEE I FREAD DASO OPERAT
I
ON
0070 75 05 JNE R20
I F NOT BYPASS
007F 86 EO AH,AL PUT RESULT IN AH
0081 F8 SET SUCCESSFUL OPERATION
0082 EB 08 SHORT R19
GO LEAVE
008
1 \
8A 26 0041 R
~20
: MOV
OPERAT ION
0088 80 FC 01 eMP
I NO ICATE
008B F5
CI~C
OOBC 5A R19:
por ox
0080 50
por
BP
008E 5F
POI'
01
008F
5E
POP
SI
0090
F POP
OS
0091 59 POP
ex
0092 50 POP BX ; RECOVER ADDRESS
0093
CA 0002 RET
2
; THROW AWAY SAVED FLACS
0096
80 3E 0041 R 06 RETRY: CMP DISKETTE_STATUS,MEDIA_CHANCE ; CHECK FOR DISK CHANGE ERROR
0098 74 54 JE OKl ; TRUE ERROR DONT RETI1.Y
0090 8A A7 0090 R
MOV AH,DSK STATE[BX] i GET MEDIA STATE OF DRIVE
OOA1 80 E4 07
AND AH,STATCMSK ; ISOLATE STATE
OOA4 80 FC 03 CMP AH,3 ; SEE IF IN STATE 3
OOA7 73 BE.
JAE OK2 ; IF fSTABL I SHED STATE THEN TRUE ERROR
; -----­ HANDLE STATES 0, 1 & 2
OOA9 FE C4 INC
OOA8 80 FC 03
CMP STATES
OOAE 75 02 JNE
()0130 BII 00 MOV
0082
8A Af 0092 R R2: MOV
00B6 80 E5 07
AND
OOB9 3A EC eMP
5-90 Diskette