also so würde ich es machen.
Ich habe gerade Mittagspause und kein Bascom zur Verfügung.
vorher den Pin c0 oder einen anderen auf Eingang setzen.
do

Debounce Pinc.0 'Taster an Pin c0
if portc.0 = 1 then
Gosub Unterprogramm
end if

loop
end

Unterprogramm:
machirgendwas
return

Jetzt hast du einen entprellten Schalter, der beim loslassen einmal das Unterprogramm ausführt und danach im Hauptprogramm weitermacht.

Benutze einen Widerstand an diesem Port, um ein eindeutiges signal zu bekommen (Pull down), so das der Taster auf 5 V zieht und beim loslassen über den Widerstand auf 0V.



Benutze die Hilfe von Bascom. Ich war selber immer der Meinung, das mir so ne Standarthilfe nichts bringt.
Dokumentier jede Programmierzeile im Programm. Mit ' kannst du dir die erklärungen im Programm hinter jerder Zeile schreiben ohne das Bascom meckert.

So wenn ich was wichtiges vergessen oder falsch habe, bitte berichtigen.
Bin auch noch ein Anfänger!!!

Kauf dir ein Buch von z.B. http://www.rowalt.de/
Es erklärt den Mega 8 und hat alles mit Bascom Beispielen erklärt.
Hat mir auch den Einstieg möglich gemacht.