Tabla hivas - PIC

[hajdu jozsef]

Hello!

Hogy lehet kikerülni, hogy ne egy 256 bájtos laphatárra
essen egy táblázat?
(részlet a list fájlból)



010A   3001           00318              movlw   HIGH Table
       ;load PCLATH with hi
                      00319                                
     ; address
010B   008A           00320              movwf   PCLATH    
       ; /
010C   3000           00321              movlw   0         
     ;Table address of start of message
010D                  00322 dispmsg 
010D   00C7           00323              movwf   TEMP1     
     ;TEMP1 holds start of message address
010E   21EE           00324              call    Table
010F   39FF           00325              andlw   0FFh      
     ;Check if at end of message (zero
0110   1903           00326              btfsc   STATUS,Z  
     ;returned at end)
0111   2916           00327              goto    out       
     
0112   21B1           00328              call    SEND_CHAR 
     ;Display character
0113   0847           00329              movf    TEMP1,w   
     ;Point to next character
0114   3E01           00330              addlw   1
0115   290D           00331              goto    dispmsg
0116                  00332 out
.
.
.
.
.

01EE                  00582 Table
01EE   0782           00583              addwf   PCL, F    
     ;Jump to char pointed to in W reg
01EF   344E           00584              retlw   'N'
01F0   3461           00585              retlw   'a'
01F1   3420           00586              retlw   ' '
01F2   346D           00587              retlw   'm'
01F3   3469           00588              retlw   'i'
01F4   3420           00589              retlw   ' '
01F5   3461           00590              retlw   'a'
01F6   3420           00591              retlw   ' '
01F7   3468           00592              retlw   'h'
01F8   3465           00593              retlw   'e'
01F9   346C           00594              retlw   'l'
01FA   3479           00595              retlw   'y'
01FB   347A           00596              retlw   'z'
01FC   3465           00597              retlw   'e'
01FD   3474           00598              retlw   't'
01FE   343F           00599              retlw   '?'
01FF   3420           00600              retlw   ' '
0200   3448           00601              retlw   'H'
0201   3445           00602              retlw   'E'
0202   344C           00603              retlw   'L'
0203   344C           00604              retlw   'L'
0204   344F           00605              retlw   'O'
0205                  00606 Table_End
0205   3400           00607              retlw   0 



_____________________________________________________________________________________________
Beír, talál, OKÉ! OK.hu az [origo]-tól: tucatnyi magyar kereső egyben, hogy még többet láss!
http://www.ok.hu