Hallo Marlo,

Hier das erste Programm
Da ich Bascom Programmiere habe ich die HEX mitgesendet.
Für Marlo
' Auf Tastensensordruck LED einschalten
'Hardware: Taster an PD5, LED an PD6
'----------------------------------------------------------
$regfile = "m32def.dat" 'ATmega32-Deklarationen
$crystal = 16000000 'Quarz: 16000000 MHz
'
Ddrd = &B01000000 'Pin PD6 Ausgang, Rest Eingang
Portd = &B0010000 'PullUp von Pin PD5 aktivieren
'
Do
If Pind.5 = 0 Then 'Wenn Taster (Pin PD5) gedrückt(Kontakt geöffnet am Tastsensor)
Portd.6 = 1 ' LED (Pin PD6) an
Else 'Wenn Taster nicht gedrückt (Kontakt geschlossen am Tastsensor)
Portd.6 = 0 ' LED aus
End If
If Pind.3 = 0 Then
Portd.4 = 1
Else
Portd.4 = 0
End If
Loop
End
'
Hexfile

: 100000000c942a001895000018950000189500001f
: 10001000189500001895000018950000189500002c
: 10002000189500001895000018950000189500001c
: 10003000189500001895000018950000189500000c
: 1000400018950000189500001895000018950000fc
: 10005000189500008fe58dbfc0e4e8e34e2e88e0e0
: 100060008ebfd8e0f8e05f2eeeeff7e0a0e6b0e05c
: 1000700088278d933197e9f7662480e481bb80e17e
: 1000800082bb0027a0e3b0e08c9185fb0ef401e079
: 1000900040e0041711f00c945000969a0c94510013
: 1000a00096980027a0e3b0e08c9183fb0ef401e06a
: 1000b00040e0041711f00c946000949a0c946100d5
: 1000c00094980c944100f894ffcf3197f1f708957c
: 0c00d000689462f80895e89462f80895be
: 00000001ff

brauchst Du nur in Pony zu kopieren.
Du musst nur noch auf dem RN den DIP Schalter 1 auf 1 schalten.
Von den Steckplätzen um den Atmege 32 herum brauchen wir nur die mit JP5 gekennzeichneten Buchsenreihe und davon vom Quarz aus gesehen die Buchsen 6 also Pin6 des Portd und Pin 5 des Portd.
Pin 6 ist Ausgang
Pin 5 ist Eingang
da der Atmega eigene PullUp Widerstände hat wurde dieser an Pin 5 des Portd aktiviert.

Nun verbind Pin 5 mit Kontakt am Tastsensor( geschlossen )
und Pin 6 mit
der Buchse am DiP Schalter 1. Plus von dem RN an den Mittelkontakt des Tastsensor.
Tastsensor drücken LED 1 leuchtet.

viel Spaß.


Gruß Panzer4000