ruud.baltissen_at_abp.nl
Date: 2008-01-09 08:36:05
Hallo allemaal,
Just an update.
I think I have the train on the rails. At least I can create an entry
and I think I found out how to update the allocated sector. On itself it
is quite simple: use the same job commands I used to transfer data from
the HD to the floppy and vica versa! IMHO I only have to find a free
buffer, to fill the according job variables with the track and sector,
and to fill the queue allocation with $90 for writing.
That I'm able to create a valid entry does not mean that the job is
done. Here is the actual code:
============>
SubDirectory
jsr GetDrvNum ; get drive number
[C312]
lda DRVNUM ; drive number OK?
bpl SubDir010 ; yes, ->
jmp Error33 ; 33, 'syntax error'
SubDir010
jsr LedOn ; turn LED on
sec
lda CMDSIZ
sbc FILTBL
cmp #1 ; check size of file name > 0
bcs SubDir020 ; yes, ->
jmp Error34
SubDir020
ldx FILTBL
lda #16 ; max. 16 characters
jsr Get_Length_Name ;
[C6A6]
rts
CmdC
jsr SubDirectory
rts
;** Create directory @@20
CmdM
jsr SubDirectory
lda #1
sta MODE ; write [1]
jsr Srch_File_Dir ; search for file in directory
[C44F]
lda #$85 ; DIR
sta TYPE
lda #$12 ; 18
sta SA ; secondary address [1][2]
jsr AllocNewSec ; allocate new block
[DCDA]
jsr CreDirEntry ; enter file in directory
[D6E4]
; set length of subdirectory to 1
jsr SrchDirEntry ;
[C49D]
bpl CmdM060 ; found, ->
jmp Error31
CmdM060
ldy #1
lda (DIRBUF),Y
pha ; store track
iny
lda (DIRBUF),Y
pha ; store sector
ldy #29 ; HB lengt of file
lda #0
sta (DIRBUF),Y
dey ; LB lengt of file
lda #1
jsr UpdateDirEntry ; save and close entry
;** Prepare first sector of this subdirectory
<=============
The meeaning of the [x] remarks:
[1] = needed?
[2] = have I to save the old SA and restore it after the updated?
Filling SA with 18 I got from the COPY command. I still have to test if
I need it or can do without it.
--
___
/ __|__
/ / |_/ Groetjes, Ruud
\ \__|_\
\___| URL: Ruud.C64.org
De informatie in dit e-mailbericht is vertrouwelijk en uitsluitend bestemd voor de geadresseerde. Wanneer u dit bericht per abuis ontvangt, verzoeken wij u contact op te nemen met de afzender per kerende e-mail. Verder verzoeken wij u in dat geval dit e-mailbericht te vernietigen en de inhoud ervan aan niemand openbaar te maken. Wij aanvaarden geen aansprakelijkheid voor onjuiste, onvolledige dan wel ontijdige overbrenging van de inhoud van een verzonden e-mailbericht, noch voor daarbij overgebrachte virussen.
Stichting Pensioenfonds ABP is gevestigd te Heerlen en ingeschreven bij de Kamer van Koophandel Zuid Limburg onder nummer: 41074000
The information contained in this e-mail is confidential and may be privileged. It may be read, copied and used only by the intended recipient. If you have received it in error, please contact the sender immediately by return e-mail; please delete in this case the e-mail and do not disclose its contents to any person. We don't accept liability for any errors, omissions, delays of receipt or viruses in the contents of this message which arise as a result of e-mail transmission.
Stichting Pensioenfonds ABP, having its registered office at Heerlen, is registered in the Traderegister of the Chamber of Commerce Zuid Limburg (Maastricht), the Netherlands, registration number: 41074000
Message was sent through the cbm-hackers mailing list
Archive generated by hypermail pre-2.1.8.