hallo zusammen
ich möchte auf device #9 (nicht acht)
speichern in die datei: "1.SEQ"
in basic wäre das:
open 2,9,4,"1,seq,w"
print #2, "text"
close 2
in asm kommt auf dem (sonst funktionieren) device #9 nichts an - warum nicht?
bin gerade total betriebsblind und deshalb echt dankbar für jede hilfe/korrektur!
wahrscheinliche fehlerquellen:
1. ab zeile #19 beim setzen des filenames
2. und/oder: in zeile #6 stimmt der filename selber / die syntax stimmt dort noch nicht ganz um damit ein SEQ-file anlegen zu können
DANKE!
Code
- ; ausgabe in "1".seq auf disk# 9
- *= $c000 ; sys 49152
- ;==========================VARS
- fname
- .null "1,seq,w"
- ;==================1v3 open SEQ
- ;basic: open 2,9,4,"1,seq,w"
- lda #$02 ; #15
- ldx #$09 ; #8
- ldy #$04 ; #15
- jsr $ffba ;Parameter setzen
- ;jsr $ffc0 ;Open
- setfile
- lda #8
- ldx #<fname
- ldy #>fname
- jsr $ffbd
- jsr $ffc0 ;Open
- ; file oeffnen
- ;====================2v3 print#
- ;basic: print #2, "text"
- ldx #2 ;LOGISCHE FILENUMMER
- jsr $ffc9 ;"chkout" ausgabe
- ; auf file !
- lda #73 ; " i "
- jsr $ffd2 ;print
- jsr $ffcc ;clrch
- ;====================3v3 close
- ;basic: close 2
- close
- lda #$02 ; filenumber 2
- jsr $ffc3 ; call CLOSE
- rts