<HTML> <HEAD> <TITLE>169</TITLE> <SCRIPT LANGUAGE="VBScript"> Sub Sound_onMouseOver Snd.run End Sub Sub Sound_onMouseOut Snd.stop End Sub Sub Sound2_onMouseOver Snd2.run End Sub Sub Sound2_onMouseOut Snd2.stop End Sub Sub Sound3_onMouseOver Snd3.run End Sub Sub Sound3_onMouseOut Snd3.stop End Sub </SCRIPT> </HEAD> <BODY> <DIV ALIGN="center" STYLE="font-size:14pt;color:red;font-weight:bold;">MouseOver→play/MouseOut→stop<BR><BR> <INPUT TYPE="button" VALUE="ロマンス" ID="Sound"> <INPUT TYPE="button" VALUE="素敵な貴方" ID="Sound2"> <INPUT TYPE="button" VALUE="オルフェ" ID="Sound3"></DIV> <OBJECT ID="Snd" STYLE="visibility:hidden" CLASSID="CLSID:05589FA1-C356-11CE-BF01-00AA0055595A"> <PARAM NAME="FileName" VALUE="romance.mid"> </OBJECT> <OBJECT ID="Snd2" STYLE="visibility:hidden" CLASSID="CLSID:05589FA1-C356-11CE-BF01-00AA0055595A"> <PARAM NAME="FileName" VALUE="sutekina.mid"> </OBJECT> <OBJECT ID="Snd3" STYLE="visibility:hidden" CLASSID="CLSID:05589FA1-C356-11CE-BF01-00AA0055595A"> <PARAM NAME="FileName" VALUE="orfeo.mid"> </OBJECT> </BODY> </HTML>