| Re: Einsteiger braucht Hilfe Kategorie: CC-Pro Unit & Appl.Board (von PeterS - 14.06.2009 23:01) | ||
| Als Antwort auf Re: Einsteiger braucht Hilfe von Jan - 14.06.2009 16:00 | ||
| ||
|
Ja nu, sag doch, was geht denn nicht? Leuchtet die LED nicht für 2 Sekunden, wenn Du den Schalter drückst? Hast Du denn nach dem �bertragen auch das Programm gestartet? Das hattest Du nicht geschrieben. Gruss Peter > Also es geht dabei um das erste Programm in diesem Buch. Dabei soll die LED1 nach Betätigen des Schalters > SW1 für zwei Sekunden aufleuchten. Kompilieren und �bertragen funktioniert soweit ich das beurteilen kann. > Hier mal noch der Quellcode: > > Main.cbas > > > Dim delval As Integer > Dim schalter1 As Byte > > Sub main() > delval=2000 > Port_DataDirBit(PORT_LED1,PORT_OUT) > Port_DataDirBit(PORT_SW1,PORT_IN) > Port_WriteBit(PORT_LED1,PORT_OFF) > Do While True > SW1() > If schalter1=0 Then > LED1_On(delval) > End If > End While > End Sub > > > > Ausgabe.cbas > > > Sub LED1_On(delay_val As Integer) > > Port_WriteBit(PORT_LED1,PORT_ON) > AbsDelay(delay_val) > > Port_WriteBit(PORT_LED1,PORT_OFF) > > End Sub > > > Eingabe.cbas > > > Sub SW1() > schalter1=Port_ReadBit(PORT_SW1) > End Sub > > > Gru� Jan > | ||
Antwort schreiben Antworten:  Re: Einsteiger braucht Hilfe (von Jan - 15.06.2009 8:20)Re: Einsteiger braucht Hilfe (von michl - 27.08.2009 17:48) | ||
Zur Übersicht - INFO - Neueste 50 Beiträge - Neuer Beitrag - Suchen - Zum C-Control-I-Forum - Zum C-Control-II-Forum