INFO - FAQ - CC2-Forum - CCPro-Forum |
Hallo Reinhard, Ich weiß nicht mehr genau und hab auch gerade meine Unit nicht zum Testen da, aber ungefähr so: define data byte[1] 'zur Aufnahme der SS-Daten define dataw word[1] ' weil der print# Befehl nur Words speichert define inBytes byte [4] 'Zähler, wieviele Bytes gelesen wurden inBytes = 0 baud r4800 open# for write #loop if not rxd then goto weiter 'hier Daten abholen und auf der Unit speichern get data print# dataw inBytes = inBytes + 1 'genug Bytes eingesammelt? if inBytes > 31 then goto auswerten #weiter goto loop #auswerten close# open# for read '... usw ########################################################### Daß Du die 2.0 erhältst ist klar, aber welche OS-Version? (2.01 oder 2.02) / siehe auch C.Control-Seite / Problemlösungen. Du kannst es ganz leicht herausfinden, indem Du das untenstehende Programm testest (wenn die Anzeige sauber von 0 bis 600 durchläuft hast Du die 2.02, bei wirren Zahlen die 2.01) DEFINE DatenBus BYTEPORT[1] DEFINE AdrBus BYTEPORT[2] define i word[2] define j word[3] 'Initialisierungen und Text auf dem LCD ausgeben print"#ON_LCD#";:print"#INIT#";:print"#L101#";:print"Testprogramm";:print"#OFF#"; 'Anfang signalisieren und Tastenwiederholung vermeiden BEEP 11,2,1:pause 50:BEEP 15,2,1 'Testschleife i=0:j=0 for i = 0 to 600 for j = 0 to 9 AdrBus = AdrBus OR &B00000001 gosub Anz next j next i 'fertig signalisieren print"#ON_LCD#";:print"#INIT#";:print"#L201#";:print"FERTIG!"; BEEP 11,2,1:BEEP 13,2,1:BEEP 11,2,1:BEEP 13,2,1:BEEP 11,2,1 goto Ende #anz print"#ON_LCD#";:print"#INIT#";:print"#L101#";:print i:print"#L108#";:print j;:print"#OFF#"; RETURN #Ende END > Hallo ! > Habe jetzt das neue Teil in Händen. Betriebssystem ist immer noch 2.0. > Nur: An meine Daten bin ich noch nicht gekommen. Wie hast du den Ser-port genau ausgelesen ? > Werde es mal mit der Bug-fix routine probieren. > > Reinhard > > > > |
Antwort schreiben |