Für dieses Forum muß Javascript im Browser aktiviert werden!
Kommentar: Einfügen von HTML im Kommentar: Link einfügen: <a href="LINKURL" target="_blank">LINKTITEL</a> Bild einfügen: <img src="BILDURL"> Text formatieren: <b>fetter Text</b> <i>kursiver Text</i> <u>unterstrichener Text</u> Kombinationen sind auch möglich z.B.: <b><i>fetter & kursiver Text</i></b> C2 Quellcode formatieren: <code>Quellcode</code> ASM Quellcode formatieren: <asm>Quellcode</asm> (Innerhalb eines Quellcodeabschnitts ist kein html möglich.) Wichtig: Bitte mache Zeilenumbrüche, bevor Du am rechten Rand des Eingabefeldes ankommst ! > Hi, > > also ich habe mittlerweile eine Assembler-Rountine für > die Initialisierung des ext. Displays geschrieben. Hier > der Quellcode: > > <asm> > init_display PROC near > MOV R2,#30h ;8-Bit > CALL write_nibble > MOV R2,#08h ;2-zeilig > CALL write_nibble > MOV R2,#20h ;4-Bit, 1-zeilig, 5x8 Punkte > CALL write_nibble > MOV R2,#04h ;Entry-Mode > CALL write_cmd > MOV R2,#01h ;Display loeschen > CALL write_cmd > MOV R2,#0Ch ;Cursor aus > CALL write_cmd > RET ;Ruecksprung > init_display ENDP > ;--------------------------------------------------- > ;Prozedur zum Uebertragen eines Kommandos an das LCD > ;--------------------------------------------------- > write_cmd PROC near ;Daten in R2 > BCLR P1L.0 ;Funktionsmodus > BCLR P1L.1 ;Schreibmodus > CALL write ;Daten schreiben > RET > write_cmd ENDP > > ;--------------------------------------------------- > ;Prozedur zum Uebertragen eines Zeichens in das LCD > ;--------------------------------------------------- > write_data PROC near > BSET P1L.0 ;Datenmodus > BCLR P1L.1 ;Schreibmodus > CALL write ;Daten schreiben > RET > write_data ENDP > ;------------------------------------------------- > ;Prozedur zum Uebertragen von Daten im 4-Bit-Modus > ;------------------------------------------------- > write PROC near > MOV R3,R2 > MOV R1,P1L ;P1L auslesen > AND R1,#0Fh ;Highnibble auf 0 setzen > AND R2,#0F0h ;Lownibble auf 0 setzen > OR R1,R2 ;Highnibble schreiben > MOV P1L,R1 > CALL pulse > > MOV R2,R3 > MOV R1,P1L ;P1L auslesen > AND R1,#0Fh ;Highbyte auf 0 setzen > SHL R2,#4 ;Datenbits Low->High > OR R1,R2 ;Lownibble schreiben > MOV P1L,R1 > CALL pulse > RET ;Ruecksprung > write ENDP > ;------------------------------------------------- > ;Prozedur zum Uebertragen von Daten im 8-Bit-Modus > ;------------------------------------------------- > write_nibble PROC near > BCLR P1L.0 ;Funktionsmodus > BCLR P1L.1 ;Schreibmodus > MOV R3,R2 > MOV R1,P1L ;P1L auslesen > AND R1,#0Fh ;Highnibble auf 0 setzen > AND R2,#0F0h ;Lownibble auf 0 setzen > OR R1,R2 ;Highnibble schreiben > MOV P1L,R1 > CALL pulse > RET > write_nibble ENDP > ;-------------------------------------------------------- > ;Prozedur zum Einleiten des internen Lese/Schreibvorgangs > ;-------------------------------------------------------- > pulse PROC near > ;Lesen/Schreiben (abhaengig von P1L.1) einleiten > BSET P1L.2 ;E auf High-Pegel > BCLR P1L.2 ;E auf Low-Pegel > MOV R15, #2 > CALL sleep ;Sleep 2 > RET > pulse ENDP > > </asm> > > Hoffe das hilft dem ein oder anderen... > > Gruß > > Thomas