Differences

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

--- cmdp2.asm [2025/12/11 12:35] – fool-duplex
+++ cmdp2.asm [2026/01/05 12:28] (current) – fool-duplex
@@ Line 6: / Line 6: @@
 ************************************************************************************************************
 * DRV
-* Change le disque courant
+* Change le disque courant (commande x: ou x est le disque)
 ************************************************************************************************************
 DRV    SET    *
@@ Line 41: / Line 41: @@
 ************************************************************************************************************
-* ID
+* IDC
-* Fixe l'identifiant du poste
+* Exécute la commande ID (fixe l'identifiant du poste)
 ************************************************************************************************************
-ID     SET    *
+IDC    SET    *
        LEAY   FNMBF2,PCR
        LDX    CLPTR,PCR
@@ Line 57: / Line 57: @@
        LBSR   MEMCPY
        LDA    #0
-       STA    CSGNOP,PCR
+       STA    CSGDST,PCR
        LDA    #ID             ; Consigne ID
        STA    CSGNTA,PCR
@@ Line 66: / Line 66: @@
 ************************************************************************************************************
-* DATE
+* TIME
-* Affiche la date et l'heure
+* Exécute la commande TIME (affiche la date et l'heure)
 ************************************************************************************************************
-DATE   SET    *
+TIME   SET    *
        LDA    #0
-       STA    CSGNOP,PCR
+       STA    CSGDST,PCR
        LDA    #DATE           ; Consigne DATE
        STA    CSGNTA,PCR
@@ Line 77: / Line 77: @@
        STA    CSGNTR,PCR
        LBSR   XCNSGN          ; On exécute la consigne
-       BNE    DATEND
+       BNE    TIMEND
-       LEAX   DATEST,PCR
+       LEAX   DATEST,PCR      ; On affiche
-       LBSR   DSPSTR          ; On affiche
+       LBSR   DSPSTR
-       LEAX   CRBUFF+2,PC
+       LEAX   CRXT0,PCR
        BSR    D3NBS           ; Les trois nombres qui composent la date
        LEAX   TIMEST,PCR
        LBSR   DSPSTR
-       LEAX   CRBUFF+5,PC
+       LEAX   CRXT3,PCR
        BSR    D3NBS           ; Les trois nombres qui composent l'heure
-DATEND RTS
+TIMEND RTS
 ************************************************************************************************************
@@ Line 97: / Line 97: @@
        PSHS   B
-D3LOOP:
+D3LOOP LDB    ,X+             ; Le nombre sur 8 bits est pointé par X
-       LDB    ,X+             ; Le nombre sur 8 bits est pointé par X
        PSHS   X
        LBSR   DINT            ; Conversion décimale et affichage
@@ Line 108: / Line 107: @@
        PULS   PC,B
-DATEST FCS    /DATE  : /      ; Chaînes de caractères pour l'affichage
+DATEST FCS    /Date  : /      ; Chaînes de caractères pour l'affichage
-TIMEST FCS    / - HEURE : /   ; de la date et de l'heure
+TIMEST FCS    / - Heure : /   ; de la date et de l'heure
+************************************************************************************************************
+* ERA
+* Exécute la commande ERA ou DEL (effacement de fichier)
+************************************************************************************************************
+ERA    SET    *
+       LBSR   SETCTX          ; Prépare le contexte (paramètres de la commande, changement de répertoire)
+       LDB    #$FF
+       CMPB   CDSUCS          ; Le chemin est-il valide ?
+       BNE    ERAOK
+       LBSR   PRMERR          ; Erreur de paramètre
+       BRA    ERAEND
+ERAOK  LDA    #SUPFI          ; Consigne SUPFI
+       STA    CSGNTA,PCR
+       LBSR   XCNSGN          ; On exécute la consigne
+ERAEND LBSR   RSTDIR          ; et on rétablit le répertoire courant
+       RTS
 </code>
 [[code_source_de_nrdos.mo5_version_3.5|Retourner à la liste des fichiers]]