home *** CD-ROM | disk | FTP | other *** search
- s: move.l $4.w,a6
- lea dosnam(pc),a1
- jsr -408(a6)
- move.l d0,a6
- beq.s fini
- move.l #path,d1
- move.l #1006,d2
- jsr -30(a6)
- move.l d0,d7
- beq.s error
- move.l d0,d1
- move.l #$40000,d2
- moveq #$10,d3
- jsr -42(a6)
- move.l d7,d1
- jsr -36(a6)
- error: move.l a6,a1
- move.l $4.w,a6
- jsr -414(a6)
- fini: rts
-
- dosnam: dc.b 'dos.library',0
- path: dc.b 'test',0
- even