bebop
21.12.2010, 20:17
Hallo zusammen,
ich sitze vor einem Problem. Bei mir haperts bei der Übersetzung eines programmes für einen Mega 8 auf einen Attiny 13, eigentlich sollte es ja nicht so schwer sein dachte ich aber da haben mich die 8 Pins vom Attiny 13 aus geschmiert ](*,) Dank oZe habe ich das programm an den Mega anpassen können aber jetzt da es auf den Attiny 13 soll habe ich probleme
$regfile = "m8def.dat"
$crystal = 12000000
$hwstack = 100
$swstack = 100
$framesize = 100
Config Portb.0 = Output
Config Portb.1 = Output
Config Portb.2 = Output
Config Pinb.3 = Input
Dim State As Byte
State = 1
Do
Debounce Pinb.3 , 0 , Unterfunkt , Sub
Loop
End
Unterfunkt:
If State = 1 Then
Portb.0 = 0
Waitms 20
State = 2
Elseif State = 2 Then
Portb.0 = 1
Portb.1 = 0
Waitms 20
State = 3
Elseif State = 3 Then
Portb.1 = 1
Portb.2 = 0
Waitms 20
State = 4
Elseif State = 4 Then
Portb.2 = 1
Waitms 20
State = 1
End If
Return
Kann mir da einer weiter helfen wie ich das anstelle das es der Attiny frisst und er mit 128 kHz int. oszilator läuft(folglich muss die zeile *$crystal = 12000000* raus oder?).
Danke schon mal die die sich meiner Probleme erbarmen.
ich sitze vor einem Problem. Bei mir haperts bei der Übersetzung eines programmes für einen Mega 8 auf einen Attiny 13, eigentlich sollte es ja nicht so schwer sein dachte ich aber da haben mich die 8 Pins vom Attiny 13 aus geschmiert ](*,) Dank oZe habe ich das programm an den Mega anpassen können aber jetzt da es auf den Attiny 13 soll habe ich probleme
$regfile = "m8def.dat"
$crystal = 12000000
$hwstack = 100
$swstack = 100
$framesize = 100
Config Portb.0 = Output
Config Portb.1 = Output
Config Portb.2 = Output
Config Pinb.3 = Input
Dim State As Byte
State = 1
Do
Debounce Pinb.3 , 0 , Unterfunkt , Sub
Loop
End
Unterfunkt:
If State = 1 Then
Portb.0 = 0
Waitms 20
State = 2
Elseif State = 2 Then
Portb.0 = 1
Portb.1 = 0
Waitms 20
State = 3
Elseif State = 3 Then
Portb.1 = 1
Portb.2 = 0
Waitms 20
State = 4
Elseif State = 4 Then
Portb.2 = 1
Waitms 20
State = 1
End If
Return
Kann mir da einer weiter helfen wie ich das anstelle das es der Attiny frisst und er mit 128 kHz int. oszilator läuft(folglich muss die zeile *$crystal = 12000000* raus oder?).
Danke schon mal die die sich meiner Probleme erbarmen.