User Tools

Site Tools


lookup.asm

Differences

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

Link to this comparison view

Both sides previous revisionPrevious revision
lookup.asm [2025/12/11 11:43] – fool-duplexlookup.asm [2025/12/29 18:22] (current) – fool-duplex
Line 38: Line 38:
        LEAY   B,Y             ; Y pointe à la fin de la table        LEAY   B,Y             ; Y pointe à la fin de la table
                                                              
-LKLOOP:                        +LKLOOP BSR    MTCHKW          ; Vérifie le mot clé courant        
-       BSR    MTCHKW          ; Vérifie le mot clé courant        +
        BEQ    LKFND           ; On a une correspondance        BEQ    LKFND           ; On a une correspondance
                
Line 48: Line 47:
        BRA    LKEND           ; On n'a pas trouvé        BRA    LKEND           ; On n'a pas trouvé
                                                              
-LKFND:                         +LKFND  LDY    1,S             ; On récupère l'offset correspondant     
-       LDY    1,S             ; On récupère l'offset correspondant     +
        LDB    -1,Y                   LDB    -1,Y           
        SUBB   ,S                     SUBB   ,S             
Line 58: Line 56:
        ORCC   #4                     ORCC   #4             
                                                              
-LKEND:                         +LKEND  LEAS   3,S            
-       LEAS   3,S            +
        RTS                            RTS                    
                                                              
Line 70: Line 67:
        LDA    #8              ; Seuls les 8 premiers caractères comptent        LDA    #8              ; Seuls les 8 premiers caractères comptent
                                                              
-MKLOOP:                        +MKLOOP TSTA                   
-       TSTA                   +
        BEQ    MKSKIP                 BEQ    MKSKIP         
                
Line 90: Line 86:
        BNE    MKEND2                 BNE    MKEND2         
                                                              
-MKEND1:                       +MKEND1 PULS   PC,X           
-       PULS   PC,X           +
                                                              
-MKSKIP:                        +MKSKIP LDB    ,Y+             ; Ce n'est pas le bon mot-clé
-       LDB    ,Y+             ; Ce n'est pas le bon mot-clé+
        BPL    MKSKIP          ; On saute le reste des caractères        BPL    MKSKIP          ; On saute le reste des caractères
                                                              
-MKEND2:                        +MKEND2 PULS   PC,X           
-       PULS   PC,X           +
 </code> </code>
 [[code_source_de_nrdos.mo5_version_3.5|Retourner à la liste des fichiers]] [[code_source_de_nrdos.mo5_version_3.5|Retourner à la liste des fichiers]]
lookup.asm.1765449804.txt.gz · Last modified: by fool-duplex

Donate Powered by PHP Valid HTML5 Valid CSS Driven by DokuWiki