STRUCT name(dims), member1 AS type, member2 AS type....
name(index).member.struct = value PRINT name(index).member.struct
open "Structure array" for graphics as #w #w "trapclose [quit]" hw = hwnd(#w) calldll #user32, "GetDC", hw as ulong, hdc as ulong npoints = 3 struct points(npoints-1), x as long, y as long for i = 0 to npoints-1 points(i).x.struct = 120 + 120 * cos(2*i) points(i).y.struct = 150 + 120 * sin(2*i) next calldll #gdi32, "Polygon", hdc as ulong, _ points() as struct, npoints as long, r as long wait [quit] close #w end