User Tools

Site Tools


codes_de_retour_d_erreur

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
codes_de_retour_d_erreur [2022/09/14 18:18] fool-duplexcodes_de_retour_d_erreur [2022/09/14 18:55] (current) fool-duplex
Line 3: Line 3:
  
 <code>         RESEAU EQU    $A025 <code>         RESEAU EQU    $A025
 +         PUTCH  EQU    $02
 +         KTSTH  EQU    $0A
  
                 ORG    $3000                 ORG    $3000
  
-3000 10CE2200   LDS    #$2200              +         ; Ca commence ici  
-3004 308D0021   LEAX   MESG,PCR           + 
-3008 170015     LBSR   DISPLAY               +3000 10CE2200   LDS    #$2200                                   Pile initialisée en $2200            
-300B 8D0E       BSR    WAITKEY              +3004 308D0021   LEAX   MESG,PCR            
 +3008 170015     LBSR   DISPL                                    Affiche le message d'erreur 
 +300B 8D0E       BSR    WAITK                                    Attends la pression d'une touche
 300D 308D0005   LEAX   CONSIG,PCR           300D 308D0005   LEAX   CONSIG,PCR          
-3011 BDA025     JSR    RESEAU +3011 BDA025     JSR    RESEAU                                   Exécute la consigne SYSTEM
-3014 20FE       BRA    $3014              +
  
-         CONSIG EQU    * +         INFINI EQU    * 
-3016            FCB    $0C, $00, $09, $32, $00               9/50 = SYSTEM+3014 20FE       BRA    INFINI                                   Attend que le central prenne la main  
  
-WAITKEY EQU * +         ; Buffer de consigne pour SYSTEM 
-301B 3F         SWI     +         CONSIG EQU    
-301C 0A         FCB    $0A       +3016 0C         FCB    $0C                                      Taille totale = 12 
-301D 27FC       BEQ    WAITKEY+3017 00         FCB    $00                                      Destinataire = 0 (central) 
 +3018 0932       FCB    $09, $32                                 9/50 = SYSFIC/SYSTEM 
 +301A 00         FCB    $00                                      Taille des extras = 0  
 +          
 +         ; Routine pour attendre la pression d'une touche  
 +         WAITK  EQU    * 
 +301B 3F0A       CALL   KTSTH                                    Lit le clavier 
 +301D 27FC       BEQ    WAITK
 301F 39         RTS        301F 39         RTS       
                                  
-                DISPLAY EQU * +         ; Routine d'affichage d'une chaîne terminée par 0        
-3020 E680       LDB    ,X+                 +         DISPL  EQU    
-3022 2601       BNE    $3025              +3020 E680       LDB    ,X+                                      Caractère suivant        
 +3022 2601       BNE    CONT                                     Pas un zéro ? On continue
 3024 39         RTS                        3024 39         RTS                       
  
-3025 3F02       SWI     +         CONT   EQU    * 
-3026 02         FCB    $02                +3025 3F02       CALL   PUTCH                                    Affiche un caractère 
-3027 20F7       BRA    $3020              +3027 20F7       BRA    DISPL              
  
-             MESG EQU * +         ; Message à afficher 
-3029 1F20       FCB    $1F, $20, $20, $1F, $12, $14 +         MESG   EQU    
-302F 1B441B561B66   $1B, $44, $1B, $56$1B, $66 +3029 1F2020     FCB    $1F, $20, $20                            CONSOLE 0,24 
-                  FCB $0C, $11, $1F, $40, $48 +302C 1F1214     FCB    $1F, $12, $14 
-                  FCC /Erreur au chargement de / +302F 1B44       FCB    $1B, $44                                 SCREEN 4,6,6 
-                  FCB $1F, $4C, $4F +3031 1B56       FCB    $1B, $56 
-                  FCC /a:12345678.123/ +3033 1B66       FCB    $1B, $66 
-                  FCB $1F, $58, $41 +3035 0C11       FCB    $0C, $11                                 CLScurseur clignotant 
-                  FCC /Appuyer sur une touche pour continuer./ +3036 1F4048     FCB    $1F, $40, $48                            LOCATE 7,0 
-                  FCB $00+3039            FCC    /Erreur au chargement de / 
 +3051 1F4C4F     FCB    $1F, $4C, $4F                            LOCATE 14,12 
 +3054            FCC    /a:12345678.123/                         Disque et nom du fichier, modifié selon besoin 
 +3062 1F5841     FCB    $1F, $58, $41                            LOCATE 0,24 
 +3065            FCC    /Appuyer sur une touche pour continuer./ 
 +308B 00         FCB    $00                                      Fin de message
                                      
 </code> </code>
codes_de_retour_d_erreur.1663172330.txt.gz · Last modified: 2022/09/14 18:18 by fool-duplex

Donate Powered by PHP Valid HTML5 Valid CSS Driven by DokuWiki