addr0*(addr0)addr = AddressOf(var) ' put address of var into addr
var = *(addr) ' get byte value at address
var = *(-addr) ' decrement address by one byte, then get byte value
var = *(+addr) ' increment address by one byte, then get byte value
var = *(addr-) ' get byte value, then decrement address by one byte
var = *(addr+) ' get byte value, then increment address by one bytewaddr = AddressOf(var) ' put address of var into waddr
var = *(waddr) ' get word value at address
var = *(-waddr) ' decrement address by two bytes, then get word value
var = *(+waddr) ' increment address by two bytes, then get word value
var = *(waddr-) ' get word value, then decrement address by two bytes
var = *(waddr+) ' get word value, then increment address by two bytesdim count as byte = 0
dim myArray(5) as byte = {1,2,3,4,5}
Sub Main()
dim myArrayData as ushort = nothing
addr1 = addressof(myArray)
Do
myArrayData = *(addr1+)
Console.Write("myArrayData = ",str(myArrayData),13,10)
count += 1
loop until count = 5
End Subdim count as byte = 0
dim myArray(5) as byte = {1,2,3,4,5}
dim myNewArray(5) as byte = {0,0,0,0,0}
Sub Main()
addr0 = addressof(myArray)
addr1 = addressof(myNewArray)
Do
*(addr1+) = *(addr0+)
count += 1
loop until count = 5
for i as byte = 0 to 4
Console.Write("myNewArray = ",str(myNewArray(i)),13,10)
next
End SubUsers browsing this forum: No registered users and 5 guests