Nanoreseau.net

User Tools

Site Tools

Trace: • extcmd.asm • utils.asm
cmdp3.asm

Differences

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

Link to this comparison view

Both sides previous revisionPrevious revision
Next revision		Previous revision
cmdp3.asm [2026/01/03 16:31] – fool-duplexcmdp3.asm [2026/01/05 18:57] (current) – fool-duplex
Line 134: Line 134:
        CLR    0,U            ; Etat courant à zéro (pas d'erreur)        CLR    0,U            ; Etat courant à zéro (pas d'erreur)
        LDA    #6             ; 6 octets à copier        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        LEAX   $0001,PCR      ; Bug : LEAX 1,U est probablement l'instruction correcte
        LBSR   MEMCPY        LBSR   MEMCPY
Line 161: Line 161:
        STY    14,U        STY    14,U
        LDD    9,U        LDD    9,U
-       LEAX   13,X+       LEAX   D,X
        LDB    ,X             ; Un octet        LDB    ,X             ; Un octet
        ORCC   #4        ORCC   #4
Line 213: Line 213:
        BNE    FLWRIT       ; Nombre d'octets restant à écrire        BNE    FLWRIT       ; Nombre d'octets restant à écrire
  
-       LDX    CRFH,U+       LDX    CRXT0,U
        STX    16,U         ; Nombre d'octets lus        STX    16,U         ; Nombre d'octets lus
-       LDD    CRFH,U+       LDD    CRXT0,U
        BRA    FLUPDT        BRA    FLUPDT
  
Line 282: Line 282:
        LEAX   CMDBUF,X        LEAX   CMDBUF,X
        LDA    #8        LDA    #8
-       LDY    #CYCDSK      ; Buffer de chemin courant+       LDY    #CYFLN       ; Buffer de chemin courant
        LBSR   PRSPTH       ; Décode un chemin        LBSR   PRSPTH       ; Décode un chemin
-       LDA    CYCDSK+       LDA    CYFLN
        STA    CSGNDK        STA    CSGNDK
        LDX    #CYCDIR        LDX    #CYCDIR
Line 362: Line 362:
 CYRTS  RTS 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)./ PRMEST FCS    /Erreur de parametre(s)./
 DNEST  FCB    'R, ACC, 'B DNEST  FCB    'R, ACC, 'B
-       FCS    /'epertoire inexistant./+       FCS    /epertoire inexistant./
  
 ************************************************************************************************************ ************************************************************************************************************
Line 654: Line 654:
 ************************************************************************************************************ ************************************************************************************************************
 CLOSE  SET    * CLOSE  SET    *
-       JSR    BCNSGN          ; Prépare la consigne+       JSR    BCFPT1          ; Prépare la consigne
        LDA    #FERFI        LDA    #FERFI
        STA    CSGNTA,PCR        STA    CSGNTA,PCR
Line 713: Line 713:
        LEAX   OPNSST,PCR      ; Affichage        LEAX   OPNSST,PCR      ; Affichage
        LBSR   DSPSTR        LBSR   DSPSTR
-       LDB    CRFH,PCR+       LDB    CRXT0,PCR
        LBSR   DINT            ; Numéro de handle        LBSR   DINT            ; Numéro de handle
  
Line 764: Line 764:
        LBNE   DPRST        LBNE   DPRST
  
-       LDA    CRBUFF+2,PCR+       LDA    CRXT0,PCR
        STA    CSGNDK,PCR        STA    CSGNDK,PCR
        LDA    #LIRFI        LDA    #LIRFI
        STA    CSGNTA,PCR        STA    CSGNTA,PCR
        LDD    #0        LDD    #0
-       STD    CNSGN+12,PCR +       STD    CSGNFN,PCR 
-       CLR    CNSGN+14,PCR+       CLR    CSGSZ0,PCR
  
 DPLOOP LEAX   CNSGN,PCR DPLOOP LEAX   CNSGN,PCR
Line 783: Line 783:
        BRA    DPCLOS        BRA    DPCLOS
  
-DPOK3  LDY    CRFH1,PCR+DPOK3  LDY    CRXT0,PCR
        BEQ    DPCLOS        BEQ    DPCLOS
  
Line 832: Line 832:
  
        LDD    CSGNFN+1,PCR        LDD    CSGNFN+1,PCR
-       ADDD   CRFH,PCR+       ADDD   CRXT0,PCR
        STD    CSGNFN+1,PCR        STD    CSGNFN+1,PCR
        BCC    DPLOOP        BCC    DPLOOP
Line 847: Line 847:
 DPRTS  RTS 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    * TEMP   SET    *
-       JSR    BCNSGN+       JSR    BCFPT1
        BSR    PONOFF           ; Récupère le paramètre ON ou OFF        BSR    PONOFF           ; Récupère le paramètre ON ou OFF
        LBLS   PRMERR           ; Ni ON ni OFF, erreur de paramètre        LBLS   PRMERR           ; Ni ON ni OFF, erreur de paramètre
Line 1012: Line 1012:
  
 ************************************************************************************************************ ************************************************************************************************************
-* DSKF+* CDSKF
 * Exécute la commande DSKF. * Exécute la commande DSKF.
 ************************************************************************************************************ ************************************************************************************************************
-DSKF   SET    *+CDSKF  SET    *
        JSR    SETCTX           ; Récupère le contexte        JSR    SETCTX           ; Récupère le contexte
        LDB    #DSKF        LDB    #DSKF
Line 1024: Line 1024:
        LDX    #RESTST          ; Affiche le résultat        LDX    #RESTST          ; Affiche le résultat
        JSR    DSPSTR        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        LDX    #LIBRST
        JSR    DSPSTR        JSR    DSPSTR
Line 1083: Line 1083:
        LBCS   PRMERR        LBCS   PRMERR
  
-       STY    B2WRTL,PCR+       STY    B2WRT,PCR
        LBSR   XCNSGN          ; Crée le fichier        LBSR   XCNSGN          ; Crée le fichier
        LBNE   SVRTS        LBNE   SVRTS
  
-       LDB    CRFH,PCR+       LDB    CRXT0,PCR
        STB    CSGNDK,PCR        STB    CSGNDK,PCR
        LDA    #ECRFI        LDA    #ECRFI
Line 1129: Line 1129:
 ************************************************************************************************************ ************************************************************************************************************
 UNKRT1 SET    * 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        BEQ    UK1RTS
  
Line 1190: Line 1190:
        RTS        RTS
  
-B2WRT  FCB    0 +B2WRT  FDB    0
-B2WRTL FCB    0+
 UNKVR1 FDB    0 UNKVR1 FDB    0
 INT16  FDB    0 INT16  FDB    0
Line 1241: Line 1240:
  
 DRMORE LDX    F1BFPT,PCR DRMORE LDX    F1BFPT,PCR
-       LDY    CRFH1,PCR+       LDY    CRXT0,PCR
        LBEQ   DRRST        LBEQ   DRRST
  
Line 1258: Line 1257:
  
 DRISFL LBSR   DISPFN          ; Affiche le nom de fichier 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        BEQ    DRKEYP
  
Line 1315: Line 1314:
        LBRA   DCRLF        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 UNKCS1 FCB    12, 0, SYSFIC, SETDIR
        FDB    64, 0, 0, 1        FDB    64, 0, 0, 1
-       RMB    53 +       RMB    53,0 
 +       
 ************************************************************************************************************ ************************************************************************************************************
 * DISPFN * DISPFN
Line 1355: Line 1354:
 CNSGN  FCB    60            ; Taille par défaut : 60 octets CNSGN  FCB    60            ; Taille par défaut : 60 octets
 CSGDST FCB    CENTRL        ; Destinataire par défaut : central 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 * SETCTX
cmdp3.asm.1767454307.txt.gz · Last modified: by fool-duplex
Donate Powered by PHP Valid HTML5 Valid CSS Driven by DokuWiki