var first, addr = integer
based second = integer

first = 12345
location var addr = first
base second at addr

print "Value of first variable   ="; first
print "Address of first variable = "; hex$(addr)
print "Value of second variable  ="; second

end