home *** CD-ROM | disk | FTP | other *** search
/ Amiga Plus Special 6 / Sonderheft_6-96.iso / pd / disktools / softrack / source / getunitid.s next >
Text File  |  1996-11-03  |  624b  |  28 lines

  1.  
  2. ; GetUnitID.s 
  3. ; informs the main program of the presence of disk drives.
  4. ; To be Assembled with SAS/C 6.50 Assembler and linked with
  5. ; slink to produce SofTrack: 1> asm GetUnitID.s
  6. ; Written by Kamran Karimi.
  7.  
  8. DR_GetUnitID equ -30
  9.  
  10.  XREF _DiskBase ; should be opened befor calling this routine
  11.  
  12.  SECTION uid,CODE
  13.  XDEF _GetUnitID
  14.  
  15. _GetUnitID:
  16.  
  17. ; amiga subroutines should only use d0, d1, a0 and a1 as 
  18. ; scratch, so save a6 
  19.  
  20.  move.l  a6,-(a7) 
  21.  move.l  8(a7),d0 ; get at the parameter on the stack
  22.  move.l  _DiskBase,a6
  23.  jsr     DR_GetUnitID(a6) ; call the disk.resource routine
  24.  move.l  (a7)+,a6 ; restore a6
  25.  rts
  26.  
  27.  END
  28.