hallo michael,

danke für die infos.
ich habe jetzt statt waitus 13.89 waitus 14 eingegeben, und es funzt!

ich habe jetzt nur noch ein (für dich/euch) vielleicht leichtes problem:

ich benutzte im moment zwei atmega32, der eine sendet mit folgendem code:

$regfile = "m32def.dat"
$crystal = 16000000

Config Portd.0 = Output

Ou Alias Portd.0

Do
Ou = 1
Waitus 14
Ou = 0
Waitus 14
Ou = 1
Waitus 14
Ou = 0
Waitus 14
Ou = 1
Waitus 14
Ou = 0
Waitus 14
Ou = 1
Waitus 14
Ou = 0
Waitus 14
Ou = 1
Waitus 14
Ou = 0
Waitus 14
Ou = 1
Waitus 14
Ou = 0
Waitus 14
Ou = 1
Waitus 14
Ou = 0
Waitus 14
Waitms 20
Loop



und der andere empfängt dies und steuert die motoren (einer links, einer rechts) mit folgendem code:

$regfile = "m32def.dat"
$crystal = 16000000

Config Porta.0 = Input
Config Portd.1 = Output
Config Porta.1 = Output
Config Porta.2 = Output
Config Portc.6 = Output
Config Portc.7 = Output
Config Portb.0 = Output
Config Portb.1 = Output
Config Portd.0 = Output
Config Adc = Single , Prescaler = Auto

Config Portc.0 = Output
Config Portc.1 = Output

Ml1 Alias Portc.6
Ml2 Alias Portc.7
Mr1 Alias Portb.0
Mr2 Alias Portb.1
Vs Alias Porta.1
Gnd Alias Porta.2
Ine Alias Porta.0
Ou Alias Portd.0
Ou2 Alias Portd.1

Vs = 1
Gnd = 0
Ou2 = 0

Enable Interrupts

Dim X As Word

Do
Start Adc
X = Getadc(0)
If X > 500 Then
Ml1 = 1
Ml2 = 0
Mr1 = 1
Mr2 = 0
Elseif X < 500 Then
Ml1 = 0
Ml2 = 1
Mr1 = 0
Mr2 = 0
Waitms 500
End If
Loop


diese beiden codes sollte man doch auf einen atmega laden können, aber ich bin zu blöd dafür?!!!!!!
vielleicht könnte mir ja jemand tipps geben/helfen?!!!!

mfg
chris