the10thwiz/cc65
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

Moved some code from scratch.s into a new subroutine named writefndiskcmd in

Browse Source 
the diskcmd.s module.


git-svn-id: svn://svn.cc65.org/cc65/trunk@3939 b7a2c559-68d2-44c3-8de9-860c34a00d81
This commit is contained in:
uz
2009-02-22 14:02:52 +00:00
parent 770d230178
commit 30237d3c36
2 changed files with 27 additions and 17 deletions
Download Patch File Download Diff File Expand all files Collapse all files

19
libsrc/cbm/scratch.s
View File

@@ -1,13 +1,12 @@
;
; Ullrich von Bassewitz, 16.11.2002
; Ullrich von Bassewitz, 2002-11-16, 2009-02-22
;
; Scratch a file on disk
;
.export scratch
.import opencmdchannel, closecmdchannel, writediskcmd
.import fnunit, fnlen, fncmd
.importzp ptr1
.import opencmdchannel, closecmdchannel, writefndiskcmd
.import fnunit, fncmd
.include "cbm.inc"
@@ -25,17 +24,7 @@
lda #'s' ; Scratch command
sta fncmd
lda #<fncmd
sta ptr1
lda #>fncmd
sta ptr1+1
ldx fnlen
inx ; Account for "S"
txa ; Length of name into A
ldx fnunit ; Unit
jsr writediskcmd
jsr writefndiskcmd
pha
ldx fnunit