Habe mich heute etwas mit meinem Vater an den Programmcode gesetzt. Leider spuckt Bascom beim compilieren noch Fehler aus, die aber immer die gleichen sind.
Error 230 You can not write to a PIN register
Error 105 StoreBit error (immer in der selben Zeile wie Error 230)
Error 31 Invalid datatype
Und ganz zum Schluss:
Error 124 (Line 0) LOOP expected
Ebenfalls sagt mir Bascom, dass Debounce bei $tiny nicht unterstützt wird.
Der Code zu den Fehlern:
Code:
$regfile = "at15def.dat"
$tiny
$initmicro
Pinb.6 = 255 * 0.6
'Initialisierung
_init_micro:
Config Pinb.1 = Output 'PortB.1 als Ausgang
Ausgang Alias Pinb.6
Config Pinb.2 = Input 'Pin (PB4) als Eingang
Tasterhoch Alias Pinb.2
Config Pinb.3 = Input 'Pin (PB5) als Eingang
Tasterrunter Alias Pinb.3
Config Pinb.4 = Input 'Pin (PB6) als Eingang
Tastervoll Alias Pinb.4
Portb.1 = 1 'Pullup Widerstand ein
Return
'Ausführungsprogramm
Pr:
Do
If Tasterhoch = 0 Then 'Spannungserhöhung
If Ausgang > 245 Then
Ausgang = 255
Else
Ausgang = Ausgang + 10
End If
Else
nop
End If
If Tasterrunter = 0 Then 'Spannungsverminderung
If Ausgang < 10 Then
Ausgang = 0
Else
Ausgang = Ausgang - 10
End If
Else
nop
End If
If Tastervoll = 0 Then
If Ausgang = 255 Then 'Volle 12V
Ausgang = 0
Else
Ausgang = 255
End If
Else
nop
End If
End
Lesezeichen