Admin: 1 revision

2013-02-15T19:14:58Z

1 revision

Admin: Created page with "= Action = Returns a byte read from a hardware port or any internal or external memory location.
2013-02-11T19:22:25Z

Created page with "= Action = Returns a byte read from a hardware port or any internal or external memory location. </span..."

New page
== (COPIED FROM ENGLISH PAGE) === Action =

Returns a byte read from a hardware port or any internal or external memory location.

 

 

= Syntax =

var = INP(address)

 

 

= Remarks =
<div style="padding: 0px; margin: 0px 0px 0px 4px;">
{| width="576" 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="17%" style="width: 94px; border: 1px solid rgb(0, 0, 0);" |
var

| valign="top" width="100%" style="width: 473px; border: 1px solid rgb(0, 0, 0);" |
Numeric variable that receives the value.

|- style="vertical-align: top;"
| valign="top" width="17%" style="width: 94px; border: 1px solid rgb(0, 0, 0);" |
address

| valign="top" width="100%" style="width: 473px; border: 1px solid rgb(0, 0, 0);" |
The address where to read the value from. (0- &HFFFF)

For Xmega which supports huge memory, the address is in range from 0-&HFFFFFF.

|}
</div>
 

The PEEK() function will read only the lowest 32 memory locations (registers).

The INP() function can read from any memory location since the AVR has a linear memory model.

 

When you want to read from XRAM memory you must enable external memory access in the [[Options Compiler Chip|Compiler Chip Options]].

 

 

= See also =

[[OUT]] , [[PEEK]] , [[POKE]], [[SETREG]], [[GETREG]]

 

 

= Example =

 <source lang="bascomavr">
'-----------------------------------------------------------------------------------------
'name : peek.bas
'copyright : (c) 1995-2005, MCS Electronics
'purpose : demonstrates PEEk, POKE, CPEEK, INP and OUT
'micro : Mega162
'suited for demo : yes
'commercial addon needed : no
'-----------------------------------------------------------------------------------------

$regfile = "m162def.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 I As Integer , B1 As Byte
'dump internal memory
For I = 0 To 31 'only 32 registers in AVR
B1 = Peek(i) 'get byte from internal memory
Print Hex(b1) ; " ";
'Poke I , 1 'write a value into memory
Next
Print 'new line
'be careful when writing into internal memory !!

'now dump a part ofthe code-memory(program)
For I = 0 To 255
B1 = Cpeek(i) 'get byte from internal memory
Print Hex(b1) ; " ";
Next
'note that you can not write into codememory!!

Out &H8000 , 1 'write 1 into XRAM at address 8000
B1 = Inp(&H8000) 'return value from XRAM
Print B1
End
</source> {{Languages}}

[[Category:BASCOM Language Reference/de]]