INKEY/de - Revision history

Stefanhamburg: /* Beispiel */

2013-02-21T21:42:50Z

Beispiel

Stefanhamburg: /* Example */

2013-02-21T21:40:39Z

Example

Stefanhamburg: /* See also */

2013-02-21T21:38:21Z

Stefanhamburg: /* Remarks */

2013-02-21T21:37:43Z

Remarks

Stefanhamburg: /* (COPIED FROM ENGLISH PAGE) = */

2013-02-21T21:29:30Z

(**COPIED FROM ENGLISH PAGE**) =

Admin: 1 revision

2013-02-15T19:14:57Z

1 revision

Admin: Created page with "= Action = Returns the ASCII value of the first character in the serial input buffer.
2013-02-11T19:20:07Z

Created page with "= Action = Returns the ASCII value of the first character in the serial input buffer. Action =

Returns the ASCII value of the first character in the serial input buffer.

 

 

= Syntax =

var = INKEY()

var = INKEY(#channel)

 

 

= Remarks =
<div style="padding: 0px; margin: 0px 0px 0px 4px;">
{| width="488" cellspacing="0" cellpadding="1" border="1" style="border: 2px solid rgb(0, 0, 0); border-spacing: 0px; border-collapse: collapse;"
|- style="vertical-align: top;"
| valign="top" width="18%" style="width: 84px; border: 1px solid rgb(0, 0, 0);" |
Var

| valign="top" width="100%" style="width: 395px; border: 1px solid rgb(0, 0, 0);" |
Byte, Integer, Word, Long or String variable.

|- style="vertical-align: top;"
| valign="top" width="18%" style="width: 84px; border: 1px solid rgb(0, 0, 0);" |
Channel

| valign="top" width="100%" style="width: 395px; border: 1px solid rgb(0, 0, 0);" |
A constant number that identifies the opened channel if software UART mode

|}
</div>
 

If there is no character waiting, a zero will be returned.

Use the IsCharWaiting() function to check if there is a byte waiting.

 

The INKEY routine can be used when you have a RS-232 interface on your uP.

The RS-232 interface can be connected to a comport of your computer.

 

As zero(0) will be returned when no character is waiting, the usage is limited when the value of 0 is used in the serial transmission. You can not make a difference between a byte with the value 0 and the case where no data is available.

In that case you can use IsCharwaiting to deterimine if there is a byte waiting.

 

 

= See also =

[[WAITKEY]] , [[ISCHARWAITING]]

 

 

= Example =

 <source lang="bascomavr">
'-----------------------------------------------------------------------------------------
'name : inkey.bas
'copyright : (c) 1995-2005, MCS Electronics
'purpose : demo: INKEY , WAITKEY
'micro : Mega48
'suited for demo : yes
'commercial addon needed : no
'-----------------------------------------------------------------------------------------

$regfile = "m48def.dat" ' specify the used micro
$crystal = 4000000 ' used crystal frequency
$baud = 19200 ' use baud rate
$hwstack = 32 ' default use 32 for the hardware stack
$swstack = 10 ' default use 10 for the SW stack
$framesize = 40 ' default use 40 for the frame space

Dim A As Byte , S As String * 2
Do
A = Inkey() 'get ascii value from serial port
's = Inkey()
If A > 0 Then 'we got something
Print "ASCII code " ; A ; " from serial"
End If
Loop Until A = 27 'until ESC is pressed

A = Waitkey() 'wait for a key
's = waitkey()
Print Chr(a)

'wait until ESC is pressed
Do
Loop Until Inkey() = 27

'When you need to receive binary data and the bibary value 0 ,
'you can use the IScharwaiting() function.
'This will return 1 when there is a char waiting and 0 if there is no char waiting.
'You can get the char with inkey or waitkey then.
End
</source> {{Languages}}

[[Category:BASCOM Language Reference/de]]

@@ Line 79: / Line 79: @@
 $regfile = "m48def.dat" ' specify the used micro
-$crystal = 4000000 ' Taktfrequenz
+$crystal = 4000000 ' Taktrate
 $baud = 19200 ' Baudrate
 $hwstack = 32 ' default use 32 for the hardware stack
@@ Line 87: / Line 87: @@
 Dim A As Byte , S As String * 2
 Do
-  A = Inkey() 'ASCII-Zeichen von der seriellen Schnittstelle empfangen
+  A = Inkey() 'ASCII-Zeichen von serieller Schnittstelle empfangen
 's = Inkey()
 If A > 0 Then 'es wurde etwas empfangen
@@ Line 94: / Line 94: @@
 Loop Until A = 27 'bis ESC gedrückt wird
-A = Waitkey() 'auf ein Zeichen warten
+A = Waitkey() 'Auf ein Zeichen warten
 's = waitkey()
 Print Chr(a)
-'Warten bis ESC gedrückt wird
+'warten bis ESC gedrückt wird
 Do
 Loop Until Inkey() = 27
-'When you need to receive binary data and the bibary value 0 ,
+'Wenn binäre Daten und der binäre Wert 0 empfangen werden sollen
-'you can use the IScharwaiting() function.
+'kann man die  IScharwaiting() Funktion benutzen.
-'This will return 1 when there is a char waiting and 0 if there is no char waiting.
+'IScharwaiting() gibt 1 zurück wenn ein Zeichen empfangen wurde und 0 wenn kein Zeichen empfangen wurde.
-'You can get the char with inkey or waitkey then.
+'Man kann das Zeichen dann mit inkey oder waitkey einlesen.
 End
 </source><br/>{{Languages}}
 [[Category:BASCOM Language Reference/de]]

@@ Line 58: / Line 58: @@
 <span style="font-family: Arial;">&nbsp;</span>
-= <span class="f_Header">See also</span> =
+= <span class="f_Header">Siehe auch</span> =
 [[WAITKEY]]&nbsp;,&nbsp;[[ISCHARWAITING]]

@@ Line 17: / Line 17: @@
 <span style="font-family: Arial;">&nbsp;</span>
-= <span class="f_Header">Remarks</span> =
+= <span class="f_Header">Anmerkungen</span> =
 <div style="padding: 0px; margin: 0px 0px 0px 4px;">
 {| width="488" cellspacing="0" cellpadding="1" border="1" style="border: 2px solid rgb(0, 0, 0); border-spacing: 0px; border-collapse: collapse;"
@@ Line 25: / Line 25: @@
 | valign="top" width="100%" style="width: 395px; border: 1px solid rgb(0, 0, 0);" |
-Byte, Integer, Word, Long or String variable.
+Byte-, Integer-, Word-, Long- oder String-Variable.
 |- style="vertical-align: top;"
@@ Line 32: / Line 32: @@
 | valign="top" width="100%" style="width: 395px; border: 1px solid rgb(0, 0, 0);" |
-A constant number that identifies the opened channel if software UART mode
+Konstante Nummer des Software-UART-Kanals.
 |}
@@ Line 38: / Line 38: @@
 <span style="font-family: Arial;">&nbsp;</span>
-If there is no character waiting, a zero will be returned.
+Wenn kein Zeichen ansteht dann wird Null zurückgegeben.
-Use the IsCharWaiting() function to check if there is a byte waiting.
+Benutzen Sie IsCharWaiting() um zu prüfen ob ein Zeichen ansteht.
 <span style="font-family: Arial;">&nbsp;</span>
-The INKEY routine can be used when you have a RS-232 interface on your uP.
+Die INKEY-Funktion kann benutzt werden wenn eine serielle Schnittstelle benutzt wird.
-The RS-232 interface can be connected to a comport of your computer.
+Die serielle Schnittstelle kann mit einem Com-Port eines PCs verglichen werden.
 <span style="font-family: Arial;">&nbsp;</span>
-As zero(0) will be returned when no character is waiting, the usage is limited when the value of 0 is used in the serial transmission. You can not make a difference between a byte with the value 0 and the case where no data is available.
+Eine Null (0) wird zurückgegeben wenn kein Zeichen ansteht. Die Funktion eignet sich daher nur bedingt wenn auch Nullen empfangen werden sollen. Man kann nicht unterscheiden zwischen einer empfangenen Null und dem Fall dass kein Zeichen ansteht.
-In that case you can use IsCharwaiting to deterimine if there is a byte waiting.
+In so einem Fall kann man IsCharwaiting  benutzen um herauszufinden ob ein Zeichen ansteht.
 <span style="font-family: Arial;">&nbsp;</span>

@@ Line 1: / Line 1: @@
-== (**COPIED FROM ENGLISH PAGE**) === <span class="f_Header">Action</span> =
+= <span class="f_Header">Funktion</span> =
-Returns the ASCII value of the first character in the serial input buffer.
+Gibt den ASCII-Wert des ersten Zeichens aus dem seriellen Buffer zurück.
 <span style="font-family: Arial;">&nbsp;</span>

INKEY/de - Revision history

Stefanhamburg: /* Beispiel */

Stefanhamburg: /* Example */

Stefanhamburg: /* See also */

Stefanhamburg: /* Remarks */

Stefanhamburg: /* (**COPIED FROM ENGLISH PAGE**) = */

Admin: 1 revision

Stefanhamburg: /* (COPIED FROM ENGLISH PAGE) = */