Ich mache gerade Versuche mit einer seriellen 4-stelligen 7-Segment-Anzeige von Sparkfun an einem MyAVR-Experimentierboard unter Bascom. Während die Ausgabe eines Zählercodes per "Print"-Befehl über den TX-Anschluss des Boardes problemlos funktioniert (Programmcode sollte also weitgehend in Ordnung sein), bewirkt der Befehl "Serout" rein garnichts. Der Pin B.0 ist frei verfügbar und funtionabel, habe ich vorher mittels LED-Blinkausgabe getestet. Warum geht das nicht? ---------------------------- $regfile = "m8def.dat" $crystal = 3686400 $baud = 9600 $hwstack = 40 $swstack = 32 $framesize = 60 Config Portb = Output Dim Cnt As Integer Dim Myb As Integer Dim Blk As String * 1 Dim Rst As String * 1 Dim Res As String * 5 Blk = Chr(120) 'code for blank digit Rst = Chr(118) 'code for reset display Myb = 2400 Do Cnt = Cnt + 1 If Cnt > 9999 Then Cnt = 0 Res = Blk + Blk + Blk + Str(cnt) Res = Rst + Right(res , 4) Rem Print Res; Serout Res , 0 , B , 0 , Myb , 0 , 8 , 1 Portb.1 = 0 Waitms 50 Portb.1 = 1 Waitms 50 Loop End
Bitte melde dich an um einen Beitrag zu schreiben. Anmeldung ist kostenlos und dauert nur eine Minute.
Bestehender Account
Schon ein Account bei Google/GoogleMail? Keine Anmeldung erforderlich!
Mit Google-Account einloggen
Mit Google-Account einloggen
Noch kein Account? Hier anmelden.