Nanoreseau.net

This is an old revision of the document!

Codes de retour d'erreur

Les codes de retour d'erreur sont de petites séquences de code exécutable envoyées aux postes en cas d'erreur durant un chargement applicatif.

         RESEAU EQU    $A025
         PUTCH  EQU    $02
         KTSTH  EQU    $0A

                ORG    $3000

3000 10CE2200   LDS    #$2200             
3004 308D0021   LEAX   MESG,PCR          
3008 170015     LBSR   DISPL              
300B 8D0E       BSR    WAITK              
300D 308D0005   LEAX   CONSIG,PCR          
3011 BDA025     JSR    RESEAU
3014 20FE       BRA    $3014              

         CONSIG EQU    *
3016            FCB    $0C, $00, $09, $32, $00               9/50 = SYSTEM

         WAITK  EQU *
301B 3F0A       CALL   KTSTH 
301D 27FC       BEQ    WAITK
301F 39         RTS       
                
         DISPL  EQU    *
3020 E680       LDB    ,X+                
3022 2601       BNE    CONT              
3024 39         RTS                       

         CONT   EQU    *
3025 3F02       CALL   PUTCH 
3027 20F7       BRA    DISPL              

         MESG   EQU    *
3029 1F20       FCB    $1F, $20, $20, $1F, $12, $14
302F 1B441B561B66   $1B, $44, $1B, $56, $1B, $66
                  FCB $0C, $11, $1F, $40, $48
                  FCC /Erreur au chargement de /
                  FCB $1F, $4C, $4F
                  FCC /a:12345678.123/
                  FCB $1F, $58, $41
                  FCC /Appuyer sur une touche pour continuer./
                  FCB $00