'02:01 15/10/2022

uses "oxygen"
 
'SHARED VARIABLES
'================
 
dim as single v(4,4)
'
'OXYGENBASIC SECTION
'===================

o2_run "              'combined o2_basic and o2_exec
#minormajor           'thinBasic and Powerbasic mode
indexbase 1           'lbound
overlay single v(4,4) 'map for the array 
@v=#v                 'link to host variable v location
dim as long w,x,y
for y=1 to 4
  for x=1 to 4
    w++
    v(x,y)=w 'fill 1 to 16
  next
next
"

'MAIN THINBASIC SECTION
'======================
 
'array Order: 1, 2, 3, 4
msgbox 0,"Order: "+v(1,1)+", "+v(2,1)+", "+v(3,1)+", "+v(4,1)
