Zur Übersicht - INFO - Neueste 50 Beiträge - Neuer Beitrag - Suchen - Zum C-Control-I-Forum - Zum C-Control-II-Forum

Re: Fehlermeldung Kategorie: Programmierung Basic (von Hapf - 29.07.2016 12:12)
Als Antwort auf Re: Fehlermeldung von Tobias - 29.07.2016 11:58
Ich nutze:
C-Control Pro Mega128
> > Hallo,
> > bei diesem einfachen Programm bekomme ich Fehlermeldungen.
> > Kann mir jemand sagen warum.
> > Ich bitte um eine Antwort.
> >
> > ' SOS Blinker Mega128
> >
> > #define LED1    47 //Pin F7
> >
> > Sub main()
> >
> >     Dim i As Integer
> >
> >     For i = 1 To 5
> >        Flashing(3,200)
> >        AbsDelay(200)
> >        Flashing(3,600)
> >        AbsDelay(200)
> >        Flashing(3,200)
> >        AbsDelay(1000)
> >     Next
> >
> > End Sub
> >
> > Sub Flashing(val As Integer, time As Integer)
> >
> >     Dim cnt As Integer
> >
> >     Port_DataDirBit(LED1,1)     ' Pin = Ausgang  +++++++Fehlermeldung 1
> >     Port_WriteBit(LED1,0)       ' Pin = low +++++++Fehlermeldung 2
> >
> >     For cnt = 1 To val
> >         Port_WriteBit(LED1,1)   ' Pin = high +++++++Fehlermeldung 3
> >         AbsDelay(time)
> >         Port_WriteBit(LED1,0)   ' Pin = low +++++++Fehlermeldung 4
> >         AbsDelay(time)
> >     Next
> >
> > End Sub
> >
> > Fehlermeldungen:
> > SOS-Blinker.cbas(24,25);Syntax Fehler-unerwartetes Symbol:â??/â??
> > SOS-Blinker.cbas(25,23);Syntax Fehler-unerwartetes Symbol:â??/â??
> > SOS-Blinker.cbas(28,27);Syntax Fehler-unerwartetes Symbol:â??/â??
> > SOS-Blinker.cbas(30,27);Syntax Fehler-unerwartetes Symbol:â??/â??
>
>
> Hallo Hapf,
>
> wenn Du in Basic programmierst werden Kommentare über Hochkomma eingeleitet.
> Du hast aber bei "#define LED1    47 //Pin F7" die Compact-C-Variante mit "//" verwendet.
> Da Basic das nicht kennt wurde Deiner LED1 nicht nur "47" zugewiesen, sondern "47 //Pin F7".
>
> Wenn Du schreibst: "#define LED1    47 'Pin F7" funktioniert es!
>
> Grü�e,
> Tobias

Vielen Dank Tobias


    Antwort schreiben


Antworten: