اتمنى المساعدة في ايقاف تشغل البرنامج الصوت بعد فترة معينة من تشغيلة

وهذا هو كود للتوضيح

if :num =1 then

host('c:\Program Files\Windows Media Player\wmplayer.exe c:\bassem.wma');


elsif
:num =2 then
host('c:\Program Files\Windows Media Player\wmplayer.exe c:\a4.wav');
end if;

مافي احد يقدر يساعدني
او صعب الى هذه الدرجة