Kod: Zaznacz cały
LJMP START
ORG 100H
START:
MOV R7,#00000001B ; CZYSZCZENIE
LCALL LCD_INSTRUKCJA
MOV R7,#00001100B ; WYSWIETL WLACZ
LCALL LCD_INSTRUKCJA
MOV R7,#01000000B ; SET CG_RAM
LCALL LCD_INSTRUKCJA
MOV DPTR,#ZNAKI
LCALL LCD_DANE
MOV R7,#10000000B ; SET DD_RAM
LCALL LCD_INSTRUKCJA
MOV DPTR,#NAPIS1
LCALL LCD_DANE
MOV R7,#10101000B ; SET DD_RAM
LCALL LCD_INSTRUKCJA
MOV DPTR,#NAPIS2
LCALL LCD_DANE
LJMP $
LCD_DANE:
MOV R0,#81H ; ZAPIS DANYCH
MOV R1,#82H ; ODCZYT STANU
MOV R2,#0
BUSSY1:
MOVX A,@R1
JB ACC.7,BUSSY1
MOV A,R2
MOVC A,@A+DPTR
MOVX @R0,A
MOV A,R2
INC A
MOV R2,A
MOVC A,@A+DPTR
JNZ BUSSY1
RET
LCD_INSTRUKCJA:
MOV R0,#80H ; ZAPIS INSTRUKCJI
MOV R1,#82H ; ODCZYT STANU
BUSSY4:
MOVX A,@R1
JB ACC.7,BUSSY4
MOV A,R7
MOVX @R0,A
RET
NAPIS1:
DB 'za',1,162,4,'ci',3,' g',6,7,'l',5,0
NAPIS2:
DB 'ja',8,2,0
ZNAKI:
;L_ZI:
DB 10000001B
DB 10000010B
DB 10011111B
DB 10000010B
DB 10000100B
DB 10001000B
DB 10011111B
DB 10000000B
;L_ZY:
DB 10000000B
DB 10000000B
DB 10011111B
DB 10000010B
DB 10011111B
DB 10001000B
DB 10011111B
DB 10000000B
;L_N:
DB 10000001B
DB 10000010B
DB 10010110B
DB 10011001B
DB 10010001B
DB 10010001B
DB 10010001B
DB 10000000B
;L_C:
DB 10000001B
DB 10000010B
DB 10001110B
DB 10010000B
DB 10010000B
DB 10010001B
DB 10001110B
DB 10000000B
;L_L:
DB 10001100B
DB 10000100B
DB 10000110B
DB 10001100B
DB 10000100B
DB 10000100B
DB 10001110B
DB 10000000B
;L_A:
DB 10000000B
DB 10000000B
DB 10001110B
DB 10000001B
DB 10001111B
DB 10010001B
DB 10001111B
DB 10000010B
;L_E:
DB 10000000B
DB 10000000B
DB 10001110B
DB 10010001B
DB 10011111B
DB 10010000B
DB 10001110B
DB 10000010B
;L_S:
DB 10000001B
DB 10000010B
DB 10001110B
DB 10010000B
DB 10001110B
DB 10000001B
DB 10011110B
DB 10000000B
DB 0 Edit: Do umieszczania listingow (i tylko do tego) prosze uzywac znacznika
Kod: Zaznacz cały
[/color]
[color=red]Edit by radzio : Proszę nie popełniać błędów w temacie postu! Kilka sekund na sprawdzenie poprawnej kolejności liter w zdaniu nie jest zbyt wielkim poświęceniem[/color]