Programm läuft so,aber so nicht...

[MagicWSmoke]

Ich fand halt "Pumper" lustig, andererseits hattest Du den ja auch mal richtig geschrieben.
Allerdings tät's Dich auch weiterbringen, wenn Du auf Hinweise reagierst, wie der Hinweis des Schreibens auf Eingangsregister.
In Deinem jetzt gezeigten Code hast Du das gleich dreimal drin. Mit welchem Sinn denn ?
Dann sind Aliase zu sehen, die auf Sensoren zeigen, allerdings sind dort die Ausgänge ver-aliast, hier würde man eher Aliase auf Eingänge erwarten, mal ganz abgesehen davon ich nicht wüsste, wie ein Alias auf zwei Bezeichner korrekt compilieren sollte. Ich würde mich an Deiner Stelle mit den Grundlagen befassen, sonst gibt's da noch mehr freigesetzten magischen weissen Rauch...

[klaro1971]

Du hast recht,ich sitze auch schon ziemlich lange daran.Ich sollte mal ne Auszeit nehmen.Ich spiele mir mein alten Code wieder drauf den damit läuft er ja(nur halt zu schnell) und fange nochmal von vorne an
Ja der Pumper,früher als meine Oma noch lebte hatten wir unsere eigene Sprache, der Staubsauger war der Feuerbesen,der Fohn die Laiserkanone....
Ich danke Dir für dein Tip.
Gruß Klaro

[klaro1971]

Hallo,ich komme nochimmer nicht weiter,wiso reagiert
Code:
If Pina.7 = 1 Then
Portc.0 = 1
Wait 1
nicht im Code?Gibt es eine andere Möglichkeit den Code zu unterbrechen für eine Minute so das es dann weiter läuft?

Code:
$regfile = "m32def.dat"
$framesize = 32
$swstack = 32
$hwstack = 32
$crystal = 16000000 'Quarzfrequenz
$baud = 9600

Config Pind.5 = Output
Motor1_pwm Alias Portd.5
Config Pinc.6 = Output
Motor1_in1 Alias Portc.6
Config Pinc.7 = Output
Motor1_in2 Alias Portc.7

Config Pind.4 = Output
Motor2_pwm Alias Portd.4
Config Pinb.0 = Output
Motor2_in1 Alias Portb.0
Config Pinb.1 = Output
Motor2_in2 Alias Portb.1

Config Pina.7 = Input
Pina.7 = 1

Tccr1a = &B10100010 '9 Bit PWM Voller Takt
Tccr1b = &B10000011 'Teiler = 8 PWM = 1951Hz bei 9 Bit
Dim I As Word
Sound Portd.7 , 400 , 450 'BEEP
Sound Portd.7 , 400 , 250 'BEEP
Sound Portd.7 , 400 , 450 'BEEP
Wait 3
'''''''''''''''''''''''''''''''''''''''''''''''''' ''''''''''''''''''''''''''''''
Do
Print " Richtung1"
Motor1_in1 = 1 'Drehrichtung Motor 1
Motor1_in2 = 0 'Drehrichtung Motor 1
Motor2_in1 = 1 'Drehrichtung Motor 2
Motor2_in2 = 0 'Drehrichtung Motor 2
For I = 0 To 250 'max.511
Pwm1a = I
Pwm1b = I
Waitms 1
Next I

'Bremsen
Pwm1a = 0
Pwm1b = 0
Wait 20
Motor1_in1 = 0 'Drehrichtung Motor 1
Motor1_in2 = 0 'Drehrichtung Motor 1
Motor2_in1 = 0 'Drehrichtung Motor 2

[5Volt-Junkie]

@klaro1971: Bitte benutze den Code-Button um die Quelltexte hier rein zu posten. Das hast du in Deinem ersten Beitrag vorblidlich angefangen
Das macht das ganze etwas übersichtlicher

[klaro1971]

Sorry, mein Fehler.Habe nurnoch ein Knoten im Kopf da ich mit den Code nicht weiterkomme.Ich dachte das bei soviel Spezialisten die die tollsten Dinge bauen mal einer dabei ist der mir weiterhelfen kann aber scheinbar wissen die auchnicht weiter.

[MagicWSmoke]

... aber scheinbar wissen die auchnicht weiter.

Das liegt eher daran, dass es keinen Spass macht gegen eine Wand zu reden.

Config Pina.7 = Input
Pina.7 = 1

[klaro1971]

Da ich noch Anfänger bin,habe ich halt noch Propleme mit Code schreiben.Natürlich kann und beschäftige ich mich auch mit den Grundlagen doch ich bin halt ein Praktiker.Technisches ist kein Proplem,als ich zu Testzwecken mir ein Lockpick gebaut habe,bin ich auch nach ein Tag damit klar gekommen,meine Arbeitskollegen brauchten 7-14Tage dazu.Will sagen mit der richtigen Hilfe kann es jeder schaffen.
Aber ich danke Dir,so habe ich wieder einen Tip bekommen und das ist ja letztendlich das was ich möchte.
Danke