🚀 go-pugleaf

I am in need of any help on how I can initialize (format) single-sided and
double-sided disks using the Package Manager. Inside Mac 2 describes the
_Pack2 trap call which can be used to initialize disks but it is very vague
on specifics and gives no examples. Inside Mac 4 makes mention of initializing
disks but again gives no examples. Actually, I have been using the following
68000 assembly language code to format single-sided disks successfully with
Finder 4.1 on a standard 512K Mac but the same code does nothing but return
an error code on a Mac+ with Finder 5.3:

           InitDisk    CLR.W   -(SP)
                       MOVE.W  #2,-(SP)     ;drive number (external)
                       MOVE.W  #6,-(SP)     ;routine selector# (DIformat)
                       _Pack2
                       MOVE.W  (SP)+,D0     ;result code
                       RTS

Before I actually call the above procedure I first call another procedure that
actually loads the Disk Initialization Package:

           LoadInit    MOVE.W  #2,-(SP)     ;routine selector# (DIload)
                       _Pack2
                       RTS

Again, the above InitDisk procedure will initialize single-sided disks with 
Finder 4.1 on a 512K Mac but only returns an error code on a Mac+ using 
Finder 5.3. I am interested in an assembly language procedure that will
initialize single-sided disks on both a 512K Mac and Mac+ with Finder 5.3.
I would appreciate any help or suggestions on the proper way of initializing
disks (single-sided and double-sided) with Finder 5.3 using the Package Manager
or any other method. One last note, I tried using the above InitDisk 
procedure on a Mac+ with Finder 4.1 but this didn't help any, it only seems
to work on a 512K Mac.

Thank you,
David Lee
dlee@miro.Berkeley.EDU