for i=0to 10?"AA";
for j=-i to-1?65-j*5," = ",chr$(i+j+65);next
?65next