FOR I=0 TO 2 BEEP 1 LOCATE I ?MID$("Hi!",I,1); WAIT 1 NEXT