Differences

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

--- cmdp3.asm [2026/01/03 16:02] – fool-duplex
+++ cmdp3.asm [2026/01/05 18:57] (current) – fool-duplex
@@ Line 134: / Line 134: @@
        CLR    0,U            ; Etat courant à zéro (pas d'erreur)
        LDA    #6             ; 6 octets à copier
-       LEAY   CRFH,PCR       ; Copie des infos de compte-rendu : handle (1), type (1), mode (1), longueur (3)
+       LEAY   CRXT0,PCR      ; Copie des infos de compte-rendu : handle (1), type (1), mode (1), longueur (3)
        LEAX   $0001,PCR      ; Bug : LEAX 1,U est probablement l'instruction correcte
        LBSR   MEMCPY
@@ Line 161: / Line 161: @@
        STY    14,U
        LDD    9,U
-       LEAX   13,X
+       LEAX   D,X
        LDB    ,X             ; Un octet
        ORCC   #4
@@ Line 213: / Line 213: @@
        BNE    FLWRIT       ; Nombre d'octets restant à écrire
-       LDX    CRFH,U
+       LDX    CRXT0,U
        STX    16,U         ; Nombre d'octets lus
-       LDD    CRFH,U
+       LDD    CRXT0,U
        BRA    FLUPDT
@@ Line 282: / Line 282: @@
        LEAX   CMDBUF,X
        LDA    #8
-       LDY    #CYCDSK      ; Buffer de chemin courant
+       LDY    #CYFLN       ; Buffer de chemin courant
        LBSR   PRSPTH       ; Décode un chemin
-       LDA    CYCDSK
+       LDA    CYFLN
        STA    CSGNDK
        LDX    #CYCDIR
@@ Line 362: / Line 362: @@
 CYRTS  RTS
-CYFLN  RMB    11           ; Nom de fichier pour COPY
+CYFLN  RMB    12,0         ; Nom de fichier pour COPY
-CYCDIR RMB    65           ; Répertoire courant pour COPY
+CYCDIR RMB    65,0         ; Répertoire courant pour COPY
-CYDDIR RMB    65           ; Répertoire de destination 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 713: / Line 713: @@
        LEAX   OPNSST,PCR      ; Affichage
        LBSR   DSPSTR
-       LDB    CRFH,PCR
+       LDB    CRXT0,PCR
        LBSR   DINT            ; Numéro de handle
@@ Line 764: / Line 764: @@
        LBNE   DPRST
-       LDA    CRBUFF+2,PCR
+       LDA    CRXT0,PCR
        STA    CSGNDK,PCR
        LDA    #LIRFI
        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    CRFH1,PCR
+DPOK3  LDY    CRXT0,PCR
        BEQ    DPCLOS
@@ Line 832: / Line 832: @@
        LDD    CSGNFN+1,PCR
-       ADDD   CRFH,PCR
+       ADDD   CRXT0,PCR
        STD    CSGNFN+1,PCR
        BCC    DPLOOP
@@ Line 847: / Line 847: @@
 DPRTS  RTS
-DPMODE RMB    1               ; Mode d'affichage DUMP/TYPE/TYPE2
+DPMODE RMB    1,0             ; Mode d'affichage DUMP/TYPE/TYPE2
-DPFOFS RMB    3               ; Addresse courante dans le fichier (24 bits)
+DPFOFS RMB    3,0             ; Addresse courante dans le fichier (24 bits)
 ************************************************************************************************************
@@ 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 1012: / Line 1012: @@
 ************************************************************************************************************
-* DSKF
+* CDSKF
 * Exécute la commande DSKF.
 ************************************************************************************************************
-DSKF   SET    *
+CDSKF  SET    *
        JSR    SETCTX           ; Récupère le contexte
        LDB    #DSKF
@@ Line 1024: / Line 1024: @@
        LDX    #RESTST          ; Affiche le résultat
        JSR    DSPSTR
-       LDD    CRFH
+       LDD    CRXT0
-       JSR    DISPDEC          ; Affiche en décimal la place restante (en Ko)
+       JSR    DSPDC2           ; Affiche en décimal la place restante (en Ko)
        LDX    #LIBRST
        JSR    DSPSTR
@@ Line 1083: / Line 1083: @@
        LBCS   PRMERR
-       STY    B2WRTL,PCR
+       STY    B2WRT,PCR
        LBSR   XCNSGN          ; Crée le fichier
        LBNE   SVRTS
-       LDB    CRFH,PCR
+       LDB    CRXT0,PCR
        STB    CSGNDK,PCR
        LDA    #ECRFI
@@ 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
-UNKVR  FCB    '1,'2,'3,'4,'5,'6,'7,'8
+UNKVR2 FCB    '1,'2,'3,'4,'5,'6,'7,'8
        FCB    '1,'2,'3
        FCB    RIGHT, SPACE
@@ Line 1241: / Line 1240: @@
 DRMORE LDX    F1BFPT,PCR
-       LDY    CRFH1,PCR
+       LDY    CRXT0,PCR
        LBEQ   DRRST
@@ Line 1258: / Line 1257: @@
 DRISFL LBSR   DISPFN          ; Affiche le nom de fichier
-       LDB    CRFH2,PCR       ; Type de format de catalogue
+       LDB    CRXT2,PCR       ; Type de format de catalogue
        BEQ    DRKEYP
@@ Line 1315: / Line 1314: @@
        LBRA   DCRLF
-UNKBF1 RMB    65             ; Ce buffer et ce qui suit est inutilisé
+UNKBF1 RMB    65,0           ; Ce buffer et ce qui suit est inutilisé
 UNKCS1 FCB    12, 0, SYSFIC, SETDIR
        FDB    64, 0, 0, 1
-       RMB    53
+       RMB    53,0
 ************************************************************************************************************
 * DISPFN
@@ Line 1355: / Line 1354: @@
 CNSGN  FCB    60            ; Taille par défaut : 60 octets
 CSGDST FCB    CENTRL        ; Destinataire par défaut : central
-CSGNTR RMB    1             ; Code tâche réseau
+CSGNTR RMB    1,0           ; Code tâche réseau
-CSGNTA RMB    1             ; Code tâche application
+CSGNTA RMB    1,0           ; Code tâche application
-CSGNSZ RMB    2             ; Nombre d'octets (16 bits)
+CSGNSZ RMB    2,0           ; Nombre d'octets (16 bits)
-CSGNPG RMB    1             ; Page
+CSGNPG RMB    1,0           ; Page
-CSGNAD RMB    2             ; Adresse (16 bits)
+CSGNAD RMB    2,0           ; Adresse (16 bits)
-CSGNCP RMB    1             ; Ordinateur
+CSGNCP RMB    1,0           ; Ordinateur
-CSGNAP RMB    1             ; Application
+CSGNAP RMB    1,0           ; Application
-CSGNDK FCB    1             ; Disque par défaut : A:
+CSGNDK FCB    1,0           ; Disque par défaut : A:
-CSGNFN FCC    /DEPART  NRD/ ; Fichier par défaut : DEPART.NRD
+CSGSZ0 EQU    *+2           ;
-CSGND2 RMB    1             ; Deuxième disque
+CSGNFN FCC    /DEPART  /
-CSGNF2 RMB    11            ; Deuxième fichier
+CSGNFE FCC    /NRD/         ; Fichier par défaut : DEPART.NRD
-       RMB    30
+CSGND2 RMB    1,0           ; Deuxième disque
+CSGNF2 RMB    11,0          ; Deuxième fichier
+       RMB    30,0
 ************************************************************************************************************
 * SETCTX