mIRC Scripting - veri kontrolu

mIRC Scripting (https://www.mircscripting.net/)

- Help - Yardım (https://www.mircscripting.net/help-yardym/)

- - veri kontrolu (https://www.mircscripting.net/help-yardym/692-veri-kontrolu.html)

merhabalar bir kode ile txtye proxy cektiriyorum ve daha sonra oluşan txt'yi play ile kanala yansıtıyorum. yardım almak istediğim konu şu. cek komutu verdiğimde elimize bir proxy.txt oluştu. play komutu verdik içindeki ipleri kanala yansıttık işimiz bitti. tekrar cek komutu verdiğimde tektar cekti(AMA) her nekadar en başta .remote proxy.txt dese de sitede güncel olmayan eski proxyler yine txt ye yazıldı play komutu verdiğimde ben daha once yazılan ipleri tekrar kanala yazilmamasini istiyorum. örnek vericek olursak

ben bi data.txt olsun istiyorum boş her proxy cektirdiğimde (ilk cektiğimde diyelimki icinde 5bin proxy oluştu) 2. kez cek dediğimde proxy.txt oluşturcak ve daha.txt ile karşılaştırcak aynı ipler varsa eklemicek farklı ipler varsa new.txt'ye yazıcak sonra play komutu verdiğimde new.txt kanala yansıyacak yansıma işlemi bittikten sonra new.txt içindeki veriler data.txt ye aktarılcak ve proxy.txt silincek. bunu nasil yapabiliriz ?

veya daha basit bir yolu varmıdır? herşeye acığım her proxy cektiğimde daha once cektiğim ipleri yansıtmak istemiyorum hepsi bu olayın.

(ve ben bunu mirc botun üstüne entegre edicem )

Sana kısaca bir örnek vereyim. Altta örnek verdiğim kodu Toprak yazmıştı eski bir kod, sadece mantığı anlaman için örnek gösteriyorum. (Kod içinde yeni eklenen kısımları koyu belirtiyorum.)

Kod:



alias ipal { .remove data.txt | sockclose ipal | sockopen ipal slyhold.com 80 | inc %a_ }

on *:sockopen:ipal:{ var %:ipal sockwrite -n $sockname | %:ipal GET /proxy_any_any.txt HTTP/1.1 | %:ipal Host: slyhold.com | %:ipal $crlf }

on *:sockread:ipal:{ var %ipal | sockread %ipal | .tokenize 32 %ipal | if $regex(ip1,%ipal,/^((\d+\.\d+\.\d+\.\d+)[\72]\d+$)/i) { if !$read(proxy.txt,w,$+(*,$regml(ip1,2),*)) { $iif(%a_ > 1, write data.txt $regml(ip1,2), write proxy.txt $regml(ip1,2)) } } }

on *:sockclose:ipal:{ sockclose ipal1 | sockopen ipal1 dan.me.uk 80 }

on *:sockopen:ipal1:{ var %:ipal1 sockwrite -n $sockname | %:ipal1 GET /torlist HTTP/1.1 | %:ipal1 Host: dan.me.uk | %:ipal1 $crlf }

on *:sockread:ipal1:{ var %ipal1 | sockread %ipal1 | .tokenize 32 %ipal1 | if $regex(ip2,%ipal1,/^((\d+\.\d+\.\d+\.\d+)[\72]\d+$)/i) { if !$read(proxy.txt,w,$+(*,$regml(ip2,2),*)) { $iif(%a_ > 1, write data.txt $regml(ip2,2), write proxy.txt $regml(ip2,2)) } } }

on *:sockclose:ipal1:{ sockclose ipal2 | sockopen ipal2 multiproxy.org 80 }

on *:sockopen:ipal2:{ var %:ipal2 sockwrite -n $sockname | %:ipal2 GET /txt_all/proxy.txt HTTP/1.1 | %:ipal2 Host: multiproxy.org | %:ipal2 $crlf }

on *:sockread:ipal2:{ var %ipal2 | sockread %ipal2 | .tokenize 32 %ipal2 | if $regex(ip3,%ipal2,/^((\d+\.\d+\.\d+\.\d+)[\72]\d+$)/i) { if !$read(proxy.txt,w,$+(*,$regml(ip3,2),*)) { $iif(%a_ > 1, write data.txt $regml(ip3,2), write proxy.txt $regml(ip3,2)) } } }

on *:sockclose:ipal2:{ sockclose ipal3 | sockopen ipal3 tubeincreaser.com 80 }

on *:sockopen:ipal3:{ var %:ipal3 sockwrite -n $sockname | %:ipal3 GET /proxylist.txt HTTP/1.1 | %:ipal3 Host: tubeincreaser.com | %:ipal3 $crlf }

on *:sockread:ipal3:{ var %ipal3 | sockread %ipal3 | .tokenize 32 %ipal3 | if $regex(ip4,%ipal3,/^((\d+\.\d+\.\d+\.\d+)[\72]\d+$)/i) { if !$read(proxy.txt,w,$+(*,$regml(ip4,2),*)) { $iif(%a_ > 1, write data.txt $regml(ip4,2), write proxy.txt $regml(ip4,2)) } } }

on *:sockclose:ipal3:{ echo -a Proxy list güncellendi4 $lines(proxy.txt) ip mevcut. $iif($isfile(data.txt),:- Data da ise $lines(data.txt) IP var.) }

1-)
Proxy IP'leri kaçıncı defa çektirdiğini belirlemek için, proxy ip alımını başlatan alias'a inc ekleyip saydırıp belirleyebilirsin. Alttaki gibi;

Kod:

alias ipal { .remove data.txt | sockclose ipal | sockopen ipal slyhold.com 80 | inc %a_ }

2-)
Proxy.txt i sildirme sabit kalsın, kıyaslama için. Data.txt'i, alias ı başlattığında kaldırmalısın. Çünkü proxy.txt ile karşılaştırıp varsa yeni ipleri eklemesi için. Alttaki gibi;

Kod:

alias ipal { .remove data.txt | sockclose ipal | sockopen

3-)
Eğer ip çekme komutunu 1 kereden fazla uygulamışsan; sabit olan proxy.txt içerisinde bulunan ip adreslerinin dışında ip varsa, silinip yeniden oluşturulan data.txt içine yazdır, koşulu oluşturmalısın. Alttaki gibi;

Kod:

 if !$read(proxy.txt,w,$+(*,$regml(ip1,2),*)) { $iif(%a_ > 1, write data.txt $regml(ip1,2), write proxy.txt $regml(ip1,2)) } } }

4-)
data.txt içerisine kaç yeni proxy ip eklendi görmek içinde son bölüme şunu ekleyebilirsin.

Kod:

on *:sockclose:ipal3:{ echo -a Proxy list güncellendi4 $lines(proxy.txt) ip mevcut. $iif($isfile(data.txt),:- Data da ise $lines(data.txt) IP var.) }

Not:Elinde bulunan koda bu veya buna benzer bir mantıkla entegrasyon yapabilirsin. Mantığı dilediğin gibi geliştirebilirsin. Farklı fikirleri olan arkadaşlarda konu altına fikirlerini belirtirlerse senin için daha faydalı olacağına inanıyorum.

Not2: Play komutuna bağlı işlem yaptırmak istersen(okuma bitiminde dosya sildirme veya herhangi başka bir tetikleme/işlem yaptırmakla ilgili..) playend event'ını incelemeni öneririm. Bknz: /help on playend

Şahsi fikrim: Proxy ip'leri çok sık değişen/güncellenen bir sistem. Bana sorarsan Proxy.txt dosyasını belirli günlerde(çok uzun süre olmamak şartıyla) sildirip yeniden ip aktarımı yapmandır. Tabi bunu yaparken inc ile saydırdığın değişkenide(%a_) temizlemen lazım. Script kapandığında oto temizlensin istersen inc -e %a_ yapabilirsin veya manuel olarak unset %a_ gibi.. Umarım fikirler güzel bir mantık üretmene yardımcı olur.
İyi forumlar.

yani bu mantığıa göre 2 kez mi ipal komutu vericem ? arka arkaya 1 proxy.txt oluşturcak sonra bidaha cek dediğimde cekerken karşılaştırıp yeni varsa data.txt oluşturcak?

Kodu yukarıda anlattığım şekilde eklediğinde ve /ipal komutunu uyguladığında 1. defa da proxy.txt oluşturur ve ipleri içine ekler. Daha sonra 2. defa ve sonrasında /ipal yaptığında ise, yeni çektiği IP'lerden proxy.txt içinde olmayanları data.txt içine kaydeder.

Bunun için zaman vermek yanlış olur. Çünkü proxy IP çektiğiniz sitelerin, hangi zamanlarda siteye yeni IP'ler eklediğini bilmiyorum. Art arda çekerseniz, büyük ihtimalle yeni ip çekmez ve data.txt oluşturmaz. Kendiniz bir zamanlama oluşturup deneyin.(Örnek: Günde 1 defa.)

Not: Yukarıda verdiğim kod örnektir. Kod biraz eski ve IP çektiği siteler ne kadar güncel bilmiyorum. Sadece üzerinde göstereceğim bir örnek kod olması açısından onu belirttim.

doğrumu anladım şimdi /ipal dediğimde sitelerden proxy cekicek ok. bir sonraki gün siteler güncellenmiş yeni proxy'ler eklenmiş ise /ipal dediğimde yeni proxyleri data.txt içine yazıcak ? eğer buraya kadar tamam ise doğru anlamışsam sorum şu: farklı proxylerden data.txt oluştuğunda ben farklı bir remote ile data.txt yi bir kanala ya timer yada play ile okutuyorum. okuma işlemi bittikten sonra data.txt içindeki yeni proxyler proxy.txt aktarılsın ve data.txt silinsinki 3. gün tekrar /ipal dediğimde 2. günün proxylerini de kontrol etmiş olsun

++ mIRCScripting.net hakkında kısaca:

mS; "Gayri resmi mIRC" kullanıcı ve tasarımcı topluluğudur.
2009 yılında kurulan mS; tasarımcı ve geliştiricileri bir araya getiren etkileşim ve iletişim sağlayan bir platformdur.
mS; tasarım, programlama, geliştirme, düzenleme vb. pek çok konu etrafında bir araya gelmiş "mIRC" meraklısı bir çok insan tarafından yaratılan içeriğiyle; kullanıcı dostu, özgün elit, nitelikli kişi ve konularla hizmet sunan mIRC Scripting platformudur.

Özgün içerikten onay almaksızın içeriği yaratan kullanıcılarımız tamamen yada kısmen sorumludur, aynı zamanda söz konusu içerik mS yetkilileri izni olmaksızın, kaynak gösterilse dahi(!) kopyalanamaz ve/ya paylaşılamaz. Site/içerik hakkında görüş, öneri ve şikayetleriniz için sikayet[at]mircscripting[dot]net e-posta ve ya İletişim adresinden bizlere ulaştırabilirsiniz.

FLINK: mIRC Offical - Hasan AYDENİZ - Koli - KARMA - Karma Aydınlatma

mIRC mIRC Orjinal mIRC İndir mIRC Download mIRC Tutorials mIRC Socket mIRC Commands mIRC Komutlar mIRC Yükle mIRC Dersler mIRC Hazır Kodlar mIRC Classentifier mIRC DLL mIRC Dialog mIRC IRC mIRC FTP mIRC Telnet mIRC Help
mIRC Yardım mIRC Iconlar mIRC Com Object mIRC Binary Files mIRC Picture Windows mIRC Unicode mIRC Forum mIRC Hazır Kodlar mIRC Kod mIRC Script mIRC File Handling mIRC Scripting Language mIRC Scripting Dili mIRC Scripting Info
mIRC Scripting Tutorials