home *** CD-ROM | disk | FTP | other *** search
- Path: sparky!uunet!stanford.edu!rutgers!spcvxb!terry
- From: terry@spcvxb.spc.edu (Terry Kennedy, Operations Mgr.)
- Newsgroups: vmsnet.pdp-11
- Subject: Re: Emulex doc's
- Message-ID: <1993Jan23.080351.4981@spcvxb.spc.edu>
- Date: 23 Jan 93 13:03:51 GMT
- References: <727656541.150000.WILSON@ULLA.FORNAX.COM> <22JAN199317355431@rover.uchicago.edu>
- Organization: St. Peter's College, US
- Lines: 45
-
- In article <22JAN199317355431@rover.uchicago.edu>, frank@rover.uchicago.edu (Frank - Hardware Hacker - Borger) writes:
- > You also need some kind of exerciser, (mainly to select the head
- > you have to align,) an adapter to bring out the test signal, and you
- > also need a special tool to adjust the heads.
-
- It's not that bad. You can substitute a simple program for the exerciser
- (see the sample in BASIC-Plus for RSTS/E after my sig), hook the scope up
- directly to the read preamps up in the shroud, and use a regular Allen wrench
- to loosen/tighten the head bolt. You can wiggle the head back and forth with
- the Allen wrench in the head bolt socket.
-
- I've been able to achieve factory-level tolerances this way in RM05's.
-
- CAUTION: Be sure to put the head alignment lock pin in the alignment pos-
- ition. Crashing an alignment pack is _much_ better than losing a finger in
- the drive.
-
- > Then, (at least in my case,) you do it so infrequently that it takes
- > a day or two of diddling to remember just how to do it.
-
- That's true 8-)
-
- > All in all, a >lot< more expensive than doing it for an RK05.
-
- Ever change a head in an RA60? You just throw 'em in. Each surface has its
- own servo. Of course, to reduce head switch time, you can align 'em.
-
- Terry Kennedy Operations Manager, Academic Computing
- terry@spcvxa.bitnet St. Peter's College, Jersey City, NJ USA
- terry@spcvxa.spc.edu +1 201 915 9381
-
- 10 rem align.bas - quick and dirty head alignment program for RM05's.
- 20 open "dr3:" as file #1%, recordsize 4096% &
- \ field #1%, 4096% as a$
- 30 input "Head: ",h%
- 35 input "Cylinder: ",cyl%
- 40 h=h%*4% &
- \ on error goto 90
- 50 b=cyl%*76.
- 60 get #1%, block b+h
- 70 input "Next?",a$ &
- \ goto 30
- 90 print err,erl,h%,b+h &
- \ resume 70
- 32767 end
-