RosettaCodeData/Task/Address-of-a-variable/FutureBasic/address-of-a-variable.basic

window 1

short i = 575
ptr j

j = @i

printf @"Address of i = %ld",j
print @"Value of i = ";peek word(j)

HandleEvents