input"A"a$
if"A"=a$?"
AA
B
B
BB
A":end
?"AB
BAAB
A"