Differences

This shows you the differences between two versions of the page.

--- cmdp3.asm [2026/01/03 18:14] – fool-duplex
+++ cmdp3.asm [2026/01/05 18:57] (current) – fool-duplex
@@ Line 161: / Line 161: @@
        STY    14,U
        LDD    9,U
-       LEAX   13,X
+       LEAX   D,X
        LDB    ,X             ; Un octet
        ORCC   #4
@@ Line 362: / Line 362: @@
 CYRTS  RTS
-CYFLN  RMB    11,0         ; Nom de fichier pour COPY
+CYFLN  RMB    12,0         ; Nom de fichier pour COPY
 CYCDIR RMB    65,0         ; Répertoire courant pour COPY
 CYDDIR RMB    65,0         ; Répertoire de destination pour COPY
@@ Line 478: / Line 478: @@
 PRMEST FCS    /Erreur de parametre(s)./
 DNEST  FCB    'R, ACC, 'B
-       FCS    /'epertoire inexistant./
+       FCS    /epertoire inexistant./
 ************************************************************************************************************
@@ Line 654: / Line 654: @@
 ************************************************************************************************************
 CLOSE  SET    *
-       JSR    BCNSGN          ; Prépare la consigne
+       JSR    BCFPT1          ; Prépare la consigne
        LDA    #FERFI
        STA    CSGNTA,PCR
@@ Line 769: / Line 769: @@
        STA    CSGNTA,PCR
        LDD    #0
-       STD    CNSGN+12,PCR
+       STD    CSGNFN,PCR
-       CLR    CNSGN+14,PCR
+       CLR    CSGSZ0,PCR
 DPLOOP LEAX   CNSGN,PCR
@@ Line 783: / Line 783: @@
        BRA    DPCLOS
-DPOK3  LDY    CRXT1,PCR
+DPOK3  LDY    CRXT0,PCR
        BEQ    DPCLOS
@@ Line 963: / Line 963: @@
 ************************************************************************************************************
 TEMP   SET    *
-       JSR    BCNSGN
+       JSR    BCFPT1
        BSR    PONOFF           ; Récupère le paramètre ON ou OFF
        LBLS   PRMERR           ; Ni ON ni OFF, erreur de paramètre
@@ Line 1083: / Line 1083: @@
        LBCS   PRMERR
-       STY    B2WRTL,PCR
+       STY    B2WRT,PCR
        LBSR   XCNSGN          ; Crée le fichier
        LBNE   SVRTS
@@ Line 1129: / Line 1129: @@
 ************************************************************************************************************
 UNKRT1 SET    *
-       LDY    F1BSZ2,PC      ; N'a pas de sens (à cheval sur deux variables)
+       LDY    F1BFSZ,PCR     ; N'a pas de sens (à cheval sur deux variables)
        BEQ    UK1RTS
@@ Line 1190: / Line 1190: @@
        RTS
-B2WRT  FCB    0
+B2WRT  FDB    0
-B2WRTL FCB    0
 UNKVR1 FDB    0
 INT16  FDB    0
@@ Line 1241: / Line 1240: @@
 DRMORE LDX    F1BFPT,PCR
-       LDY    CRXT1,PCR
+       LDY    CRXT0,PCR
        LBEQ   DRRST
@@ Line 1363: / Line 1362: @@
 CSGNAP RMB    1,0           ; Application
 CSGNDK FCB    1,0           ; Disque par défaut : A:
-CSGNFN FCC    /DEPART  NRD/ ; Fichier par défaut : DEPART.NRD
+CSGSZ0 EQU    *+2           ;
+CSGNFN FCC    /DEPART  /
+CSGNFE FCC    /NRD/         ; Fichier par défaut : DEPART.NRD
 CSGND2 RMB    1,0           ; Deuxième disque
 CSGNF2 RMB    11,0          ; Deuxième fichier