kann mir jemand sagen warum die For Next Schleife nicht funktioniert.
$regfile = "m88def.dat"
$crystal = 8000000
Dim A As Byte
Dim X As Byte
X = 3
For A = 1 To 100 Step X
Print A ; " " ; X
Waitms 50
Next
End
kann mir jemand sagen warum die For Next Schleife nicht funktioniert.
$regfile = "m88def.dat"
$crystal = 8000000
Dim A As Byte
Dim X As Byte
X = 3
For A = 1 To 100 Step X
Print A ; " " ; X
Waitms 50
Next
End
Hallo und willkommen,
was genau funktioniert den da nicht? Gibt der Compiler ein Fehler aus?
Edit:
Ich hab das Programm gerade mal im Bascom Simulator getestet und da funktioniert es einwandfrei.
Geändert von Kampi (03.03.2012 um 19:17 Uhr)
Schaut ruhig mal auf meiner Homepage vorbei:
http://kampis-elektroecke.de
Oder folge mir auf Google+:
Daniel Kampert
Es gibt 10 Arten von Menschen. Die einen können Binär, die anderen nicht.
Gruß
Daniel
Im Simulator springt das Programm nach Waitms 50 sofort zum Ende.
Fehler wird keiner ausgegeben.
Gebe ich bei Step irgendeine Zahl ein so funktioniert es einwandfrei.
Also wie gesagt ich hab dein Programm, welches du oben gepostet hast, im Simulator (Bascomversion 2.0.7.1) getestet und da lief das Programm bis 60 durch. Dann hab ich es abgebrochen.
Wenn du das Programm im Simulator testest hast du auch:
$sim
am Anfang des Programms geschrieben?
Schaut ruhig mal auf meiner Homepage vorbei
http://kampis-elektroecke.de
Oder folge mir auf Google+:
Daniel Kampert
Es gibt 10 Arten von Menschen. Die einen können Binär, die anderen nicht.
Gruß
Daniel
vielen Dank für Deine schnellen Antworten;
habe im Programm jetzt Deinen Vorschlag eingegeben aber selbes Ergebnis.
Gruß
Helmut
Hallo!
Mit 2.0.7.4 läufts auch einwandfrei.
Welche Bascomversion verwendest Du?
MfG
Mmh dann weiß ich auch nicht mehr weiter
Schaut ruhig mal auf meiner Homepage vorbei
http://kampis-elektroecke.de
Oder folge mir auf Google+:
Daniel Kampert
Es gibt 10 Arten von Menschen. Die einen können Binär, die anderen nicht.
Gruß
Daniel
Berechtigungen
Zitieren
Lesezeichen