The smart kids will get this.

[grampa_dos]

CLS
x$ = "Hey you kids, get off my terminal!"
t = 0
DO
t = t + 1
PRINT MID$(x$, t, 1);
SOUND 440, 2
LOOP WHILE MID$(x$, t, 1) <> "!"