input in bascom

[pebisoft]

dim test as string * 12
input test
weiter...

ich möchte das in bascom nicht unendlich auf die eingabe gewartet wird, sondern möchte, das dieses input nach festgelegter zeit verlassen wird und das programm weiter läuft. wer kann ein beispielcode liefern. danke.
mfg pebisoft

[harryup]

hoi,
du kannst den input in einer schleife laufen lassen.

dim test... : dim zaehler as byte
test = "" : zaehler = 0
while test ="" or zaehler < 100
input test ' lesen
incr zaehler ' um 1 erhöhen
waitms 10 ' warten
wend

die simpelste form einer zeitschleife für ca. 1 sekunde
wenn test sich ändert oder der zaehler 100 erreicht hat wird ausgestiegen

gruss, harry

[pebisoft]

für die mühe vielen dank, aber bei input macht bascom auch in der schleife halt, bis eine eingabe kommt dann geht er erst weiter.
es muss irgentwie anders gehen, aber wie?
mfg pebisoft

[Mr. Burns]

Hallo,

versuch mal den Befehl inkey().
Hier wird immer ein einzelnes Zeichen eingelesen, oder 0 zurück gegeben, wenn nichts im Puffer liegt. Den String mußt du dir dann aus den einzelnen Zeichen zusammensetzen.

Markus

[zwerg1]

Hallo

wisst ihr wo ich Bascom herkrieg?

[pebisoft]

geh mit dem google "bascom" und "deutsch", dann findest du händler.
kostet ca 90 euro.
mfg pebisoft

[Daveler]

http://www.mcselec.com/commerce/product_info.php?products_id=33

mfg

[RCO]

Mal was ganz anderes, wäre das Problem hierbei nicht, dass "test" immer wieder mit dem neu ankommenden Zeichen überschrieben würde? Und da der Puffer, so habe ich mal gehört, nur ein Zeichen groß ist dann nur das letzte gesendete Zeichen einer Zeichenfolge drinstehen würde?


dim test... : dim zaehler as byte
test = "" : zaehler = 0
while test ="" or zaehler < 100
input test ' lesen
incr zaehler ' um 1 erhöhen
waitms 10 ' warten
wend

Außerdem, könnte mir jemand sagen, wie man den ASCII-Code in zeichen um und umgekehrt umwandelt?

Danke im voraus,

MFG Moritz