Tresor-Steuerung

Weitere Magazine

Empfehlungen

Info

$Arbeitstechniken im Rahmen des \Lernens\ - Berufliche Schule ...$

2.2.4 Quelltext ;<strong>Tresor</strong>steuerung (G07) Matthias Stahl & Florian Meyer .include "m48def.inc" ;Einbinden der Register-namen usw. .def TW = R17 ;devieniere Tastatur-Wert #define E2 PORTB,1 ;devieniere Enable 1 #define E1 PORTB,0 ;devieniere Enable 2 #define RS PORTB,7 ;devieniere Read/Steuer #define RW PORTB,6 ;devieniere Read/Write .org 0x0000 ;Der nächste Befehl steht an Adresse 0x0000 INIT: ;INIT-Label INITLCD: ldi R16 , 0b11100011 ;Das Bitmuster 0xff in R16 laden out DDRB, R16 ;und in das Data Direction Register B schreiben ldi R16, 0b11111111 ;Das Bitmuster 0xf0 in R16 laden out DDRC, R16 ;und in das Data Direction Register C schreiben ldi R16, 0b11111111 ;Das Bitmuster 0xff in R16 laden out DDRD, R16 ;und in das Data Direction Register D schreiben rcall WARTEN_10m ;40ms Pause rcall WARTEN_10m rcall WARTEN_10m rcall WARTEN_10m cbi RS ;LCD soll Steuerbefehl erhalten cbi RW ;LCD soll lesen ldi R16, 0x39 rcall ILC1 ;Enable LCD1 rcall WARTEN_10u rcall ILC1 rcall WARTEN_1m rcall WARTEN_1m rcall WARTEN_1m rcall WARTEN_1m rcall WARTEN_1m rcall ILC1 rcall WARTEN_10u ldi R16, 0x14 ;8-Bit-Interface, 2-zeilig, 5*7-Font rcall ILC1 rcall WARTEN_10u ;100us Pause Seite 15
call WARTEN_10u ;100us Pause rcall WARTEN_10u ;100us Pause ldi R16, 0x78 ;Display ein, Cursor ein, blinken rcall ILC1 rcall WARTEN_10u ;100us Pause rcall WARTEN_10u ;100us Pause rcall WARTEN_10u ;100us Pause ldi R16, 0x55 ;Display löschen, Cursor auf Home-Position rcall ILC1 rcall WARTEN_10u ;100us Pause rcall WARTEN_10u ;100us Pause rcall WARTEN_10u ;100us Pause ldi R16, 0x6d ;Cursor Auto-Increment rcall ILC1 rcall WARTEN_10u ;100us Pause rcall WARTEN_10u ;100us Pause rcall WARTEN_10u ;100us Pause ldi R16, 0x0f ;8-Bit-Interface, 2-zeilig, 5*7-Font rcall ILC1 rcall WARTEN_10u ;100us Pause rcall WARTEN_10u ;100us Pause rcall WARTEN_10u ;100us Pause ldi R16, 0x01 ;Display ein, Cursor ein, blinken rcall ILC1 rcall WARTEN_10u ;100us Pause rcall WARTEN_10u ;100us Pause rcall WARTEN_10u ;100us Pause ldi R16, 0x06 ;Display löschen, Cursor auf Home-Position rcall ILC1 ldi R16, 0x39 ;Reset rcall ILC2 rcall WARTEN_10u rcall ILC2 rcall WARTEN_1m rcall WARTEN_1m rcall WARTEN_1m rcall WARTEN_1m rcall WARTEN_1m rcall ILC2 rcall WARTEN_10u ldi R16, 0x14 ;8-Bit-Interface, 2-zeilig, 5*7-Font rcall ILC2 rcall WARTEN_10u ;100us Pause rcall WARTEN_10u ;100us Pause rcall WARTEN_10u ;100us Pause Seite 16
Seite 1: Tresor-Steuerung mit Tastatur, Anze
Seite 4 und 5: 1 Information und Planung 1.1 Laste
Seite 6 und 7: 1.3 Lösungsansatz 1.3.1 Beschreibu
Seite 8 und 9: 1.5 Kostenplanung 1.5.1 Entwicklung
Seite 10 und 11: 2.1.2 Schaltplan Seite 7
Seite 12 und 13: 2.1.4 Platinenlayout für Serienfer
Seite 14 und 15: Main Tresor schließen LCD Ausgabe
Seite 16 und 17: Falsch Tastatur R16 = * JA LCD lös
Seite 20 und 21: ldi R16, 0x78 ;Display ein, Cursor
Seite 22 und 23: call LC2 ldi R16, ' ' rcall LC2 ldi
Seite 24 und 25: Richtig: ldi R16, ' ' rcall LC1 rca
Seite 26 und 27: Tast: LC1: ILC1: rcall LC1 ldi R16,
Seite 28 und 29: cbi PORTC,4 ;grüne LED aus ret ;Tr
Seite 30 und 31: call LC1 ldi R16, ' ' rcall LC1 ldi
Seite 32 und 33: call LC1 ldi R16, 'r' rcall LC1 ldi
Seite 34 und 35: ldi R16, 'u' rcall LC1 ldi R16, 'm'
Seite 36 und 37: ldi R16, 'm' rcall LC2 ldi R16, 'i'
Seite 38 und 39: et //Rücksprung hinter den Aufrufb
Seite 40: 3.1.2 Bestückungsseite der Platine

Tresor-Steuerung

Erfolgreiche ePaper selbst erstellen

Template löschen?

Als Template speichern?