Türkçe Mirc CD-Rom Ac/Kapat
Bu kod ile CD-Rom u açip kapatabilirsiniz.
Cd-rom takmak için : /cdrom tak
Cd-Rom c?karmak için : /cdrom cikar
Kod;
|
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 |
alias cdrom { if ($istok(tak.cikar,$1,46)) { var %sjn $+(cd,$ticks) .comopen %sjn WMPlayer.OCX.7 noop $com(%sjn,cdromCollection,3,dispatch* $+(%sjn,s)) noop $com($+(%sjn,s),Item,1,i1,0,dispatch* $+(%sjn,j)) noop $com($+(%sjn,j),Eject,3) .comclose $+(%sjn,j) if ($1 == tak) { noop $com($+(%sjn,s),Item,1,i1,0,dispatch* $+(%sjn,j)) noop $com($+(%sjn,j),Eject,3) } if ($comerr) { echo -a hata } .comclose $+(%sjn,s) .comclose %sjn } else { echo $color(info) * /cdrom yetersiz veya eksik parametre } } |