mikrocontroller.net

Forum: Mikrocontroller und Digitale Elektronik elseIf bedingung


Autor: Florian Menne (Gast)
Datum:

Bewertung
0 lesenswert
nicht lesenswert
ich bekomme die else bedingung nicht hin!! hier der code:
$regfile = "2313def.dat"
$crystal = 8000000
$baud = 9600

Config Portb = Output
sbi portb, 0
sbi portb, 1
Dim Passwort As Integer
Dim Passwort2 As Integer
Do
First:
Passwort = 0
Passwort2 = 1515
Input "Enter passwort : " , Passwort
If Passwort = Passwort2 Then Print "access granted"
Elseif Then Print "access denied" ;hier irgendwo fehler ohne else if
  ;gehts!
rjmp first
Cbi Portb , 0
Wait 1
sbi portb, 0
Loop

Autor: Markus K. (markus-)
Datum:

Bewertung
0 lesenswert
nicht lesenswert
Du hast else und elseif verwechselt.

Autor: Florian Menne (Gast)
Datum:

Bewertung
0 lesenswert
nicht lesenswert
sorry aber versteh ich nicht ganz ich hab schon versucht nur else oder
else if (also wegen leerzeichen)

Autor: Madget (Gast)
Datum:

Bewertung
0 lesenswert
nicht lesenswert
versuchs mal so

                      $regfile = "2313def.dat"
$crystal = 8000000
$baud = 9600

Config Portb = Output
sbi portb, 0
sbi portb, 1
Dim Passwort As Integer
Dim Passwort2 As Integer
Do
First:
Passwort = 0
Passwort2 = 1515
Input "Enter passwort : "
If Passwort = Passwort2 Then Print "access granted" else Print
"access denied"

rjmp first
Cbi Portb , 0
Wait 1
sbi portb, 0
Loop

Autor: Madget (Gast)
Datum:

Bewertung
0 lesenswert
nicht lesenswert
If Passwort = Passwort2 Then Print.... "access denied"

das muss in einer zeile stehen. at hier nicht reingepasst. oder so:

If Passwort = Passwort2 Then
Print "access granted"
Else
Print "access denied"
End If

Autor: Florian Menne (Gast)
Datum:

Bewertung
0 lesenswert
nicht lesenswert
ich habs jetzt so ist zwar umständlich aber geht denn ich muss ja zwei
befehle mit einer bedingung ausführen!!
$regfile = "2313def.dat"
$crystal = 8000000
$baud = 9600

Config Portb = Output
sbi portb, 0
sbi portb, 1
Dim Passwort As Integer
Dim Passwort2 As Integer
Do
First:
Passwort = 0
Passwort2 = 1515
Input "Enter passwort : " , Passwort
If Passwort = Passwort2 Then Print "access granted" Else Print
"access denied"
If Passwort = Passwort2 Then Rjmp Nex Else Rjmp First
Nex:
Cbi Portb , 0
Wait 1
sbi portb, 0
Loop

Autor: Madget (Gast)
Datum:

Bewertung
0 lesenswert
nicht lesenswert
ach so wolltest du das das geht ach in einer anweisung:

$regfile = "2313def.dat"
$crystal = 8000000
$baud = 9600

Config Portb = Output
sbi portb, 0
sbi portb, 1
Dim Passwort As Integer
Dim Passwort2 As Integer
Do
First:
Passwort = 0
Passwort2 = 1515

Input "Enter passwort : "  , Passwort

If Passwort = Passwort2 Then

Print "access granted"
Cbi Portb , 0
Wait 1
sbi portb, 0

Else

Print "access denied"
Rjmp First

End If

Loop

Autor: Florian Menne (Gast)
Datum:

Bewertung
0 lesenswert
nicht lesenswert
Ja Danke so wollte ich das denn ich wollte mir vielleicht ein
garagentoröfner mit uart bauen weil es ja zu unsicher währe die
Leitungen direkt vom motorblock nach draußen zu legen da man ja dann
einfach kabel durchschneidet und dann kurz schließt mit uart will ich
dann nur das passwort an den chip senden der dann den impuls gibt

Antwort schreiben

Die Angabe einer E-Mail-Adresse ist freiwillig. Wenn Sie automatisch per E-Mail über Antworten auf Ihren Beitrag informiert werden möchten, melden Sie sich bitte an.

Wichtige Regeln - erst lesen, dann posten!

  • Groß- und Kleinschreibung verwenden
  • Längeren Sourcecode nicht im Text einfügen, sondern als Dateianhang

Formatierung (mehr Informationen...)

  • [c]C-Code[/c]
  • [avrasm]AVR-Assembler-Code[/avrasm]
  • [code]Code in anderen Sprachen, ASCII-Zeichnungen[/code]
  • [math]Formel in LaTeX-Syntax[/math]
  • [[Titel]] - Link zu Artikel
  • Verweis auf anderen Beitrag einfügen: Rechtsklick auf Beitragstitel,
    "Adresse kopieren", und in den Text einfügen




Bild automatisch verkleinern, falls nötig
Bitte das JPG-Format nur für Fotos und Scans verwenden!
Zeichnungen und Screenshots im PNG- oder
GIF-Format hochladen. Siehe Bildformate.
Hinweis: der ursprüngliche Beitrag ist mehr als 6 Monate alt.
Bitte hier nur auf die ursprüngliche Frage antworten,
für neue Fragen einen neuen Beitrag erstellen.

Mit dem Abschicken bestätigst du, die Nutzungsbedingungen anzuerkennen.