You can create a variable byref then give it whatever address you choose.

dim byref a
&a= ...



[code=thinbasic]
uses "oxygen"

'-----------------------
'DIM BYREF
'=======================

'and assigning an address to a byref variable


dim src as string

src = "
#o2h
#indexbase 0
'
dim d(1000)
d(10)=42
'
'-----
'BYREF
'=====
'
dim byref a
&a=&d + 10 * sizeof d
print str a
'
'----------
'POINTERING
'==========
'
dim pb
dim b at pb
pb=&d + 10 * sizeof d
print str b

"



o2_basic src
if len(o2_error) then msgbox 0, o2_error() : stop
o2_exec
[/code]