on *:start:.cal [Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]
alias cal {
if ($1 != Dur) { 
set %caldir $+(sjn.,$ticks)
.comopen %caldir wmplayer.ocx
var %z $com(%caldir,Url,4,bstr,$1-)
%z = $com(%caldir,Controls,3,dispatch* $+(%caldir,wmp))
%z = $com($+(%caldir,wmp),Play,3) 
}
if ($1 == Dur) && ($com(%caldir)) {
%z = $com($+(%caldir,wmp),Stop,3)
unset %z
}
}
;Coded by SJN