Kod: Kodu kopyalamak için üzerine çift tıklayın!
alias m_adres {
set %txtkontrol $input(Macadres eklemek için EVET Macadres silmek için HAYIR Ekli Macadres'leri görmek için İPTAL seçin,vn,Metin Belgesi Ekleme\Silme paneli)
if %txtkontrol == $yes {
if $input(TXT satır eklemek için veri giriniz,e,Metin girme paneli) != $null { write aziz\okufur.txt $! | echo -a 06" $! " eklendi. | goto zıpzıp }
else { goto zıpzıp }
}
if %txtkontrol == $no {
if $input(TXT satır silmek için veri giriniz,e,Metin silme paneli) != $null {
if $read(aziz\okufur.txt,w,$+(*,$!,*)) { echo -a 06" $read(aziz\okufur.txt,$readn) " silindi. | write $+(-dl,$readn) aziz\okufur.txt | goto zıpzıp }
else { echo -a Böyle bir satır bulunamadı }
}
else { goto zıpzıp }
}
if %txtkontrol == $cancel {
$iif($window(@Macadres),clear @Macadres,window -n @Macadres)
titlebar @Macadres aziz\okufur.txt içeriği
loadbuf @Macadres aziz\okufur.txt
}
:zıpzıp
unset %txtkontrol
}
alias noticer {
$iif(!$window(@Macadresi),window -ng2 @Macadresi,)
aline @Macadresi $timestamp $+(4«1,$nick,4») $+(4«1,$1-,4»)
}
on ^*:NOTICE:*Gırıss*:*:{
if (%noticer == on) { noticer $1- }
if (%logtxt == on) { /write notice.txt $nick Macadresi ile sunucuya giedi : $timestamp : $1- }
}
on *:connect:{ if $nick == $me { .notice MuraTT Gırıss 4 $nick 3Nicki 4 $macadres 3Macadresiyle sunucuya girdi }
}
alias macadres {
var %pm = Okunamadı
.comopen Win WbemScripting.SWbemLocator
if (!$comerr) && ($com(Win,ConnectServer,3,dispatch* Info)) && ($com(Info)) {
if ($com(Info,InstancesOf,3,string,Win32_NetworkAdapter,dispatch* More)) && ($com(More)) {
if ($com(More,Count,3)) {
%pm = $comval(More,1,MACAddress)
}
}
}
.comclose More | .comclose Info | .comclose Win
return %pm
}
menu * {
Macadres
.$iif(%noticer == on,KAPAT,AÇ) : //set %noticer $iif(%noticer == on,off,on)
.log-Macadres
..$iif($exists(notice.txt),Giriş kaydı) : /run notice.txt
..$iif(%logtxt == on,KAPAT,AÇ) : //set %logtxt $iif(%logtxt == on,off,on)
.Macadres koruma:m_adres
}
on *:notice:*:*:{ if $read(aziz\okufur.txt,w,$1-) { .kill $nick yasak } }