10 DEFINTB-S:OPEN"GRP:"AS#1:X2=10:Y2=-10:T=.8:G=15:C=0:B$=CHR$(&B00010000):C$=CH