\ click

: click  ( -- )    
    7 >byte SndPlaySystemSound ;
