Das Open-Control-Projekt - Die Alternative zur C-Control-I


Das Forum zur C-Control-1
Welche C-Control-Varianten existieren?
Übersicht - Suchen - Neueste 50 Beiträge - Neuer Beitrag - Login - Registrieren
INFO - FAQ - CC2-Forum - CCPro-Forum 

 Re: Input M-unit1 zu M-unit-2 anderes Verhalten Kategorie: C-Control I V1.2/2.0 (von DIE HARD - 10.09.2004 18:36)
 Als Antwort auf Input M-unit1 zu M-unit-2 anderes Verhalten von Armin - 9.09.2004 20:05

Hallo.....
Du hast recht, die UNIT 2.0 hat hier einen Fehler, obwohl ich die INPUT
Funktion ursprünglich getestet habe.
Ich habe einen workaround geschrieben.
Der Ersatz für INPUT ist ein Unterprogramm.
Ich hoffe das hilft.
--------------------------------------------------------------------------------------------------------
Define wert word[1]
define inbyte byte[4]



Wert=0
#loop
'input wert
gosub INPUTEMULATION
pause 50
Print "Ausgabewert"
Print wert
Goto loop


#INPUTEMULATION
wert=1
#INLOOP
get INBYTE
if INBYTE=&H2D then wert=-1
if INBYTE=&H2D then goto INLOOP
WERT=(INBYTE and &H0F)*WERT
#INLOOP2
get INBYTE:if INBYTE= &H0D then return
INBYTE=INBYTE and &H0F
if WERT<0 then WERT=WERT*10-INBYTE else WERT=WERT*10+INBYTE
goto INLOOP2

 Antwort schreiben

Bisherige Antworten:

Re: Input M-unit1 zu M-unit-2 anderes Verhalten (von Armin - 10.09.2004 21:43)