Admin: 1 revision

2013-02-15T19:14:25Z

1 revision

Admin: Created page with "= Action = Turns the ECHO on or off while asking for serial INPUT.
2013-02-09T14:09:48Z

Created page with "= Action = Turns the ECHO on or off while asking for serial INPUT. Action =

Turns the ECHO on or off while asking for serial INPUT.

 

 

= Syntax =

ECHO value

 

 

= Remarks =
<div style="padding: 0px; margin: 0px 0px 0px 4px;">
{| width="631" 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="15%" style="width: 100px; border: 1px solid rgb(0, 0, 0);" |
Value

| valign="top" width="76%" style="width: 522px; border: 1px solid rgb(0, 0, 0);" |
ON to enable ECHO and OFF to disable ECHO.

|}
</div>
 

When you use INPUT to retrieve values for variables, all info you type can be echoed back. In this case you will see each character you enter. When ECHO is OFF, you will not see the characters you enter.

 

In versions 1.11.6.2 and earlier the ECHO options were controlled by an additional parameter on the INPUT statement line like : INPUT "Hello " , var NOECHO

 

This would suppress the ECHO of the typed data. The new syntax works by setting ECHO ON and OFF. For backwards compatibility, using NOECHO on the INPUT statement line will also work. In effect it will turn echo off and on automatic.

 

By default, ECHO is always ON.

 

 

= See also =

[[INPUT]]

 

 

= ASM =

The called routines from mcs.lib are _ECHO_ON and _ECHO_OFF

 

 

The following ASM is generated when you turn ECHO OFF.

Rcall Echo_Off

This will set bit 3 in R6 that holds the ECHO state.

 

 

When you turn the echo ON the following code will be generated

Rcall Echo_On

 

 

= Example =

 <source lang="bascomavr">
'-----------------------------------------------------------------------------------------
'name : input.bas
'copyright : (c) 1995-2005, MCS Electronics
'purpose : demo: INPUT, INPUTHEX
'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 V As Byte , B1 As Byte
Dim C As Integer , D As Byte
Dim S As String * 15

Input "Use this to ask a question " , V
Input B1 'leave out for no question

Input "Enter integer " , C
Print C

Inputhex "Enter hex number (4 bytes) " , C
Print C
Inputhex "Enter hex byte (2 bytes) " , D
Print D

Input "More variables " , C , D
Print C ; " " ; D

Input C Noecho 'supress echo

Input "Enter your name " , S
Print "Hello " ; S

Input S Noecho 'without echo
Print S
End
</source> {{Languages}}

[[Category:BASCOM Language Reference/de]]