Also das ist jetzt mein aktueller code:
PHP-Code:
$regfile "m168def.dat"
$crystal = 8000000
Config Pinc.0 = Input
Config Pinc.1 = Input
Config Pinc.2 = Input
Config Pinc.3 = Input
Config Pinc.4 = Input
Config Pinc.5 = Input
Config Pind.2 = Input
Config Pinb.1 = Output
Config Pinb.2 = Output
Config Pind.5 = Output
Config Pind.6 = Output
Motor1 Alias Portb.1
Motor2 Alias Portb.2
Motor3 Alias Portd.5
Motor4 Alias Portd.6
Freischalten Alias Portd.7
Pind.2 = 1
Enable Interrupts
Enable Pcint1
On Pcint1 Pwm1
Pcmsk1 = &B11111111
Config Timer1 = Pwm , Pwm = 8 , Compare A Pwm = Clear Up , Compare B Pwm = Clear Up , Prescale = 8
'Config Timer0 = Pwm , Prescale = 1 , Compare A Pwm = Clear Up , Compare B Pwm = Clear Up
$eeprom 'EEprom beschreiben
Label1:
Data 128 , 192 , 64
$data
Dim M As Byte
Dim N As Byte
Dim X As Byte
Dim Y As Byte
Dim A As Byte
Dim B As Byte
Dim C As Byte
Dim D As Byte
Dim E As Byte
M = 0
N = 0
X = 0
Y = 0
E = 0
Do
Readeeprom A , M 'Auslesen der Daten aus dem EEprom und anschließende Ausgabe
Compare1b = A
Freischalten = 1
Loop
Pwm1:
If E = 1 Then
Return
End If
If Pinc.0 = 0 Then
M = 2
N = 2
E = 1
End If
If Pinc.1 = 0 Then
M = 1
N = 1
E = 1
End If
If Pinc.2 = 0 Then
X = 2
Y = 1
E = 1
End If
If Pinc.3 = 0 Then
M = 2
N = 1
E = 1
End If
If Pinc.4 = 0 Then
M = 1
N = 2
E = 1
End If
If Pinc.5 = 0 Then
X = 1
Y = 2
E = 1
End If
Return
End
Da habe ich jetzt den INT0 rausgenommen um mich erstmal darum zu kömmern das das andere funzt
Mit behält meine ich das der zum tasterpassende wert nur solange beibehalten wird wie ich den Taster drücke sobald ich ihn loslasse springt er wieder ins Normalprogramm.
Lesezeichen