for i=0to 11input""s$:?s$,mid$(" boo eat",-or(i,-5),4)next