Address storage

basically what am i missing to get something like this to work.

Local Y
Local intYAddress[1]
Local Yp:Int Ptr 

Y = 2
intYAddress[0] = Int(Varptr(Y))


yp = intYAddress[0]

yp[0] = 3

Print Y

i want to get the address of a variable. Store it in a int array. Have the address put into a pointer. Then manipulate the value.

I think this should work...

Local Y
Local intYAddress[1]
Local Yp:Int Ptr 

Y = 2
intYAddress[0] = Int(Varptr(Y))


Yp = Int Ptr(intYAddress[0])

Yp[0] = 3

Print Y