  INFO - FAQ - CC2-Forum - CCPro-Forum |
|
||
|
Hallo und guten Morgen, so, den Einstieg in die OM habe ich erstmal geschafft. Die ersten Tests liefen erfolgreich sodaß ich jetzt "größenwahnsinnig" geworden bin. ich wollte die 16-Bit Erweiterung nutzen. Das scheint jedoch nur teilweise? zu funktionieren. Hier mal der Quellcode. '************************************************************* include "OM.DEF" OPTION openbasic INCLUDE "16biterw.iia" '16-Bit-Erweiterung einbinden define Zaehler byte define Zaehler1 byte define x byte define Eingang Port[4] #main URTok=ON '16-Bit-Erweiterung aktivieren Clockdis = on #Loop x=0 #Loop1 x=x+1 Zaehler = Timer gosub Counter print 3000/Zaehler1;" ";Zaehler1;" ";Timer;" ";Zaehler put 59+x if x > 180 then goto Loop2 goto Loop1 #Loop2 x=x-1 Zaehler = Timer gosub Counter URTok=ON '16-Bit-Erweiterung aktivieren print 3000/Zaehler1;" ";Zaehler1;" ";Timer;" ";Zaehler URTok=OFF '16-Bit-Erweiterung deaktivieren put 59+x if x = 2 then goto Loop goto Loop2 #Counter Zaehler1 =(Timer-Zaehler ) if Zaehler1 >= 60 then return goto Counter es tritt ff. Effekt auf: 1. bei define Zaehler word alles noch ok 2. bei define Zaehler1 word Ausgabe stoppt nach x=3, Schleife wird nur 3mal durchlaufen. Ausgabe im Terminal 50 60 60 0 <50 60 121 61 =50 60 182 122 >50 60 243 183 ? Warum? wenn die Variablen als Byte definiert sind scheint die Ausgabe richtig zu sein (3000/Zaehler1) das Testprogramm TESTSUIT.EXE läuft nicht, bzw. bricht nach Fehlermeldung sofort ab. |
| Antwort schreiben |
Re: OM 16-Bit (von Dietmar - 14.04.2010 21:14)