Çevrimdışı

@

Öncelikle kusura bakmayın. KOD'u paylaşmadan yapmak istediğim şeyi anlatmak mümkün olmayacak. Sil baştan anlatacak olursam. Yukarı vermiş olduğum KOD da proxyleri /Pr ekle *@198.52.* şeklinde ekliyorum bu proxyleri mIRC de pr.x ismin de txt dosyaya ekliyor. Manuel eklemek çok zaman alıyor. Benim istediğim belirtmiş olduğum txt dosyasın da ki proxyleri tek bir komut ile toplu şekilde pr.x dosyasına *@198.25.* şeklinde eklemesini istiyorum.
Mesela belirttiğim proxy.txt dosyasın da 100 adet proxy var şu şekilde;
188.59.186.124:44550
185.169.181.12:4145
185.169.181.24:4145
212.154.83.60:45272
Ben bunları tek bir komut ile mIRC'im de bulunan pr.x dosyasına
*@196.25.* şeklinde eklemesini istiyorum. Yukarıda kullandığım KOD da proxyleri /pr ekle *@96.148.* şeklinde ekliyorum.
Umarım daha iyi anlatabilmişimdir.
Şimdiden teşekkürler.

--IRCForumlari.NET ; Flood Engellendi -->-> Yeni yazılan mesaj 00:29 -->-> Daha önceki mesaj 00:28 --

Dipnot Mesajı:

on *:join:#:{
if ($count($nick($chan,$me).pnick,@,&,~,%) != 0) && %Proxy.koruma == On {
var %ip $gettok($address,2,$asc(@))
if $hfind(p,%ip,1,W).item { if $hfind(m,$nick,1,W).item { echo 3 -ae 11****5 Muaf nick girişi:4 $nick 5Atılmadı. | return }
kick $chan $nick 0,1BLACKLiST! | mode $chan +b $+(*!*@,$hfind(p,%ip,1,W).item) }
}
}
on *:Start:{
if !$file(pr.x) { write -c pr.x } | hmake p | hload p pr.x
if !$file(m.x) { write -c m.x } | hmake m | hload m m.x
}
alias pr {
if !$hget(p) { if !$file(pr.x) { write -c pr.x } | hmake p | hload p pr.x }
if !$hget(m) { if !$file(m.x) { write -c m.x } | hmake m | hload m m.x }
if $1 == Aç { set %proxy.koruma ON | echo 3 -ae *** 12Proxy Koruması açılmıştır. } | if $1 == Kapat { set %proxy.koruma Off | echo 3 -ae *** 4Proxy Koruması kapatılmıştır.. }
if $1 == ekle {
if !$2 { echo 3 -ae 11***7 Lütfen ip adresi yaz, $me $+ . | return }
if $hfind(p,$2,1,W).item { echo 3 -ae 11***7 Bu ip listede mecvuttur. | return }
hadd -m p $2 Proxy | hsave p pr.x
echo 3 -ae 11*** $2 12Listeye eklenmiştir.
}
if $1 == sil {
if !$2 { echo 3 -ae 11***7 Lütfen ip adresi yaz, $me $+ . | return }
if $hfind(p,$2,1,W).item {
hdel p $ifmatch | hsave p pr.x
echo 3 -ae 11*** $ifmatch 4Listeden silinmiştir.
}
else { echo 3 -ae 11***10 Listeden bulunamamıştır. }
}
if $1 == liste {
var %s 1, %f $hget(p,0).item
if $hget(p,0).item == 0 { echo 3 -ae 11***7 Liste boş durumda. | return }
while %s <= %f {
echo 3 -ae 11***4 Proxy IP listesi: $hget(p,%s).item
inc %s
}
}
if $1 == muaf {
if $2 == ekle {
if $hfind(m,$3,1,W).item { echo 3 -ae 11***7 Bu nick listede mecvuttur. | return }
hadd -m m $3 Proxy | hsave m m.x
echo 3 -ae 11*** $3 12Muaf nick listeye eklenmiştir.
}
if $2 == sil {
if $hfind(m,$3,1,W).item {
hdel m $ifmatch | hsave m m.x
}
else { echo 3 -ae 11***5 Listeden bulunamamıştır. }
}
if $3 == liste {
var %s 1, %f $hget(m,0).item
if $hget(m,0).item == 0 { echo 3 -ae 11***4 Liste boş durumda. | return }
while %s <= %f {
echo 3 -ae 11***12 Proxy muaf Nick Listesi: $hget(m,%s).item
inc %s
}
}
}
}
on *:join:#:{
if ($count($nick($chan,$me).pnick,@,&,~,%) != 0) && %Proxy.koruma == On {
var %ip $gettok($address,2,$asc(@))
if $hfind(p,%ip,1,W).item { if $hfind(m,$nick,1,W).item { echo 3 -ae 11****5 Muaf nick girişi:4 $nick 5Atılmadı. | return }
kick $chan $nick 0,1BLACKLiST! | mode $chan +b $+(*!*@,$hfind(p,%ip,1,W).item) }
}
}

--------------
/Pr Aç
/Pr Kapat
/Pr ekle *@198.16.*
/Pr sil *@198.16.*

--IRCForumlari.NET ; Flood Engellendi -->-> Yeni yazılan mesaj 00:52 -->-> Daha önceki mesaj 00:29 --

@[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...], Kusura bakma üstad eksik bilgilendirme yaptım yukarıda kodu paylaştım ve izah ettim