bob@acornrc.UUCP (Bob Weissman) (05/08/88)
Does anyone have software to park the drive head on a Seagate ST-238R disk drive? -- Bob Weissman Internet: bob@acornrc.uucp UUCP: ...!{ ames | decwrl | oliveb | pyramid }!acornrc!bob Arpanet: bob%acornrc.uucp@ames.arc.nasa.gov
bill@ssbn.WLK.COM (Bill Kennedy) (05/11/88)
In article <775@acornrc.UUCP> bob@acornrc.UUCP (Bob Weissman) writes: >Does anyone have software to park the drive head on a Seagate ST-238R >disk drive? This one will park anything. It asks the controller for the number of drives, then for each drive, the maximum cylinder, and seeks one beyond that. Not trying to make it pretty, but to be brief, type it in with debug and save it. mov ah,08 mov dl,80h int 13h ;Get # of drives jb error ;Couldn't do it, exit gracefully cmp dl,0 ;Maybe no drives? jz error mov count,dl ;Choose your own address mov drive,80h ;ditto, 80h is zero park: mov ah,8 mov dl,drive int 13 ;Get max cylinder for this drive xchg cl,ch and ch,0c0h rol ch,1 rol ch,1 inc cx xchg cl,ch ror cl,1 ror cl,1 add cl,1 mov ah,0c mov dl,drive mov dh,0 int 13 inc drive dec count jnz park cli ;Disable interrupts jmp $ ;Replace $ with IP You should probably set up a stack, and you should provide some graceful exit if there aren't any drives or the controller can't talk. This was intended more as an example rather than a recipe. The best part is that it makes no assumptions about your drive(s) other than what the controller already knows, so you don't need a special park for different ones. -- Bill Kennedy usenet {rutgers,ihnp4!killer,cbosgd}!ssbn!bill internet bill@ssbn.WLK.COM
patrick@crcmar.crc.uucp (Andrew Patrick) (05/13/88)
In article <775@acornrc.UUCP>, bob@acornrc.UUCP (Bob Weissman) writes: > Does anyone have software to park the drive head on a Seagate ST-238R > disk drive? I have posted 2 utilities to comp.binaries.ibm.pc. PARKIT will park the disk head just before you turn the machine off. This is useful if you will be moving it around. TIMEPARK will park the disk-head if it has been idle for some (user specified) period of time. Both of these work fine on my AT but I don't know how they will do on an XT. ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ Andrew Patrick, Ph.D. Communications Research Center, Ottawa, CANADA (613) 990-4675 SMARTMAIL: patrick@crcmar.uucp UUCP: ...utzoo!dciem!nrcaer!crcmar!patrick BITNET: patrick%crcmar@UTORGPU ARPA: dgbt@ncs-dre.arpa "...of all the gin joints in all the world..." ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
Henry_A_Schade@cup.portal.com (05/16/88)
Timepark will work on XT's...
charlie@hpldola.HP.COM (Charlie Duke) (05/23/88)
> I have posted 2 utilities to comp.binaries.ibm.pc. PARKIT will park > the disk head just before you turn the machine off. This is useful if > you will be moving it around. TIMEPARK will park the disk-head if it > has been idle for some (user specified) period of time. > > Both of these work fine on my AT but I don't know how they will do on > an XT. Unless I've had a cerebral seizure, those postings never made it to our system. Could you be so kind as to repost? Thanks in advance. Charlie.
patrick@crcmar.crc.uucp (Andrew Patrick) (06/03/88)
In article <11250025@hpldola.HP.COM>, charlie@hpldola.HP.COM (Charlie Duke) writes: >> I have posted 2 utilities to comp.binaries.ibm.pc. PARKIT will park >> the disk head just before you turn the machine off. This is useful if >> you will be moving it around. TIMEPARK will park the disk-head if it >> has been idle for some (user specified) period of time. >> >> Both of these work fine on my AT but I don't know how they will do on >> an XT. > > Unless I've had a cerebral seizure, those postings never made it to our > system. Could you be so kind as to repost? Thanks in advance. These binaries were posted in comp.binaries.ibm.pc on May 23rd <3176@bsu-cs.UUCP>. I have e-mailed them to charlie@hpldola.HP.COM, and others who missed them can contact me by e-mail. ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ Andrew Patrick, Ph.D. Communications Research Center, Ottawa, CANADA (613) 990-4675 SMARTMAIL: patrick@crcmar.uucp UUCP: ...utzoo!dciem!nrcaer!crcmar!patrick BITNET: patrick%crcmar@UTORGPU ARPA: dgbt@ncs-dre.arpa "Home of the world's first microwave airplane!" ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~