CPEEKH/de
Contents |
= (**COPIED FROM ENGLISH PAGE**) === Action
Returns a byte stored in upper page of code memory of micro with more then 64KB such as M103, M128.
Syntax
var = CPEEKH( address [,page] )
Remarks
Var |
Numeric variable that is assigned with the content of the program memory at address |
address |
Numeric variable or constant with the address location |
page |
A numeric variable or constant with the page address. Each page is 64 KB. |
CpeekH(0) will return the first byte of the upper 64KB.
Since the M103 has 64K words of code space the LPM instruction can not access the 64 upper Kbytes.
The CpeekH() function peeks in the upper 64 KB.
This function should be used with the M103 or M128 only.
CpeekH(address,0) will work on the first page (first 64 KB)
CpeekH(addres,1) will work on the second page (second 64 KB)
See also
Example
'----------------------------------------------------------------------------------------- 'name : peek.bas 'copyright : (c) 1995-2005, MCS Electronics 'purpose : demonstrates PEEk, POKE, CPEEK, INP and OUT '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 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
Languages | English • Deutsch |
---|