Choose
 "<PinIt$Dir>.WimpLib.Poll"
 "<PinIt$Dir>.WimpLib.Windows"
 "<PinIt$Dir>.WimpLib.Icons"
 "<PinIt$Dir>.WimpLib.Templates"
startup("PinIt",2)
startup_windows(1)
load_templates("<PinIt$Dir>.Templates",4096)
respond%(3)=
respond%(6)=
poll(1)
respond_close
quit%=
user_load
create_template("Choices",1,block%)
openwindow(x%)
respond_click
 ihandle% 
 "<PinIt$Dir>.Stripes.One"
 "<PinIt$Dir>.Stripes.Two"
 "<PinIt$Dir>.Stripes.Three"
 "<PinIt$Dir>.Stripes.Four"
 "<PinIt$Dir>.Stripes.Five"
 "<PinIt$Dir>.Stripes.Six"
 "<PinIt$Dir>.Stripes.Seven"
 "<PinIt$Dir>.Corners.One"
 "<PinIt$Dir>.Corners.Two"
 "<PinIt$Dir>.Corners.Three"
 "<PinIt$Dir>.Corners.Four"
 "<PinIt$Dir>.Corners.Five"
 "<PinIt$Dir>.Corners.Six"
 "<PinIt$Dir>.Corners.Seven"
 "<PinIt$Dir>.Slant.One"
 "<PinIt$Dir>.Slant.Two"
 "<PinIt$Dir>.Slant.Three"
 "<PinIt$Dir>.Slant.Four"
 "<PinIt$Dir>.Slant.Five"
 "<PinIt$Dir>.Slant.Six"
 "<PinIt$Dir>.Slant.Seven"
 "<PinIt$Dir>.Chains.One"
 "<PinIt$Dir>.Chains.Two"
 "<PinIt$Dir>.Chains.Three"
 "<PinIt$Dir>.Chains.Four"
 "<PinIt$Dir>.Chains.Five"
 "<PinIt$Dir>.Chains.Six"
 "<PinIt$Dir>.Chains.Seven"