Program HSCExample;

Uses Crt,ADVHSC,DOS;

var song:string;

Begin
STOPSONG;
CLEARMEM;
End.