%%HP: T(1)A(R)F(.);
 CLEAR CLLCD -56
CF
"    Random Sound!"
4 DISP RAND 2000 *
 A
   A .1 BEEP
   E50

