IRCForumları - IRC ve mIRC Kullanıcılarının Buluşma Noktası

IRCForumları - IRC ve mIRC Kullanıcılarının Buluşma Noktası (https://www.ircforumlari.net/)
-   mIRC Scripting Sorunları (https://www.ircforumlari.net/mirc-scripting-sorunlari/)
-   -   Fullname Koruması? (https://www.ircforumlari.net/mirc-scripting-sorunlari/28386-fullname-korumasi.html)

lacremel 04 Mart 2007 22:16

Fullname Koruması?
 
Öncelikle Kolay gelsin Arkadaslar

alias fn {
if (** iswm $2-) { return }
if ($read(reklam.txt,w,$2-) iswm $strip($2-)) {
var %' = $comchan($1,0)
while %' {
chanserv akick $comchan($1,%') add $+($1,!*@*) 2Trojan Fullname tespit edildi  4/setname e-kolay  2komutunu kullandıktan sonra giriş yapabilirsiniz | chanserv akick $comchan($1,%') enforce |
chanserv akick $comchan($1,%') del $+($1,!*@*)
dec %'
}
}
}
on @!*:join:#Kelebek:{ who $nick }
raw 352:*:{ fn $6 $9- | halt }

Elimde ßöle ßir Fullname KorumasI var. gayet qüsel ßir Sekilde calısıor Reklam.txt DosyasIna ekLediklerimi atıor. Örnk: reklam.txt Dosyasına forum yazısını Ekledim. Fullnamede Forum yazanları atıoır ama ircforum yazanlari atmıor. ßuna ne yapmamız lazım.

тєαм 04 Mart 2007 22:37

Cevap: Fullname Koruması?
 
Tam bilmiyorum ama iswm isin farkı olması lazım. ama emin değilim dene derim. Codende ki iswm leri isin yap dene

AsiL 05 Mart 2007 01:11

Yanıt: Fullname Koruması?
 
Alıntı:

lacremel Nickli Üyeden Alıntı
Öncelikle Kolay gelsin Arkadaslar

alias fn {
if (** iswm $2-) { return }
if ($read(reklam.txt,w,$2-) iswm $strip($2-)) {
var %' = $comchan($1,0)
while %' {
chanserv akick $comchan($1,%') add $+($1,!*@*) 2Trojan Fullname tespit edildi  4/setname e-kolay  2komutunu kullandıktan sonra giriş yapabilirsiniz | chanserv akick $comchan($1,%') enforce |
chanserv akick $comchan($1,%') del $+($1,!*@*)
dec %'
}
}
}
on @!*:join:#Kelebek:{ who $nick }
raw 352:*:{ fn $6 $9- | halt }

Elimde ßöle ßir Fullname KorumasI var. gayet qüsel ßir Sekilde calısıor Reklam.txt DosyasIna ekLediklerimi atıor. Örnk: reklam.txt Dosyasına forum yazısını Ekledim. Fullnamede Forum yazanları atıoır ama ircforum yazanlari atmıor. ßuna ne yapmamız lazım.

*forum* olarak ekle ozaman ircforum yazanıda atar umarım işine yarar kolay gelsin.

lacremel 05 Mart 2007 09:09

Cevap: Fullname Koruması?
 
Evet o Sekilde denedim *forum* die ekledim. OLmadı Fullname'De *forum* olanları atıor ßu sefer sadece forum atmıyor. ne eklersen öyle atıor

lacremel 05 Mart 2007 11:04

Cevap: Fullname Koruması?
 
[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] vbmenu_register("postmenu_193872", true); . Senin dediqin gibide yaptım Olmadi Aynısını yapior gene hic ßir değişiklik yok . :(

lacremel 05 Mart 2007 12:37

Cevap: Fullname Koruması?
 
Arkadaslar ßu konu Hakkında bilgi Alamıcammı Lütfen yardim edermisiniz ??

bLaCkdeviL 05 Mart 2007 13:09

Cevap: Fullname Koruması?
 
Sende Söle Dene
Kod:

forum
*forum*

Atar kaçar o kovalar ;)

lacremel 05 Mart 2007 13:16

Cevap: Fullname Koruması?
 
:D ßenim istediqim Fullname'in icinde Forum gecenler atılsın. ßuda Olmuyor iste ;>

bLaCkdeviL 05 Mart 2007 13:17

Cevap: Fullname Koruması?
 
o zaman senin kodunda var bir sorun dediğim gibi eklediysen her türlü atar
forum - forum olanları atar
*forum* içinde forum geçenleri atar....

lacremel 05 Mart 2007 13:22

Cevap: Fullname Koruması?
 
evet öylede Ekledim *forum* diyerek reklam.txt Dosyasına ekledim. atmıor ama setnameyi *Forum* yapiorum atıor. yani icinde gecenleri atmıOR ne yasarsan Onu atıor

lacremel 05 Mart 2007 14:01

Cevap: Fullname Koruması?
 
Nasil Edicik Simdi

lacremel 05 Mart 2007 14:23

Cevap: Fullname Koruması?
 
Yardim pLs. Cok onmeli?

ByFly 16 Mart 2007 00:55

Cevap: Fullname Koruması?
 
arkada$im .txt olayini kafandan atarsan $unu kullan.

Kod:

alias fn {
  if (** iswm $2-) { return }
  var %' = $comchan($1,0)
  while %' {   
    if (*tikla* iswm $2-) || (*indir* iswm $2-) || (*download* iswm $2-)  || (*bilmemne* iswm $2-) { cs akick $comchan($1,%') add $address($1,2) Bad fullname | cs akick  $comchan($1,%')  enforce | cs akick $comchan($1,%') del $address($1,2)  }
    dec %'
  }
}
on @!*:join:#kelebek:{ who $nick }
raw 352:*:{ fn $6 $9- | halt }

ornegin *tikla* var. f.name icinde mutlaka tiklamalisin yaziyorsa kanaldan atiyor demektir.

ByCapkin 16 Mart 2007 01:43

Cevap: Fullname Koruması?
 
alias fn {
var %< $lines(reklam.txt)
while (0 < %<) {
if ($read(reklam.txt,%<) iswm $strip($2-)) {
.gzline $1 1w Fullname Bilgilerinizi Değiştiriniz. (Clone/Kufur/Reklam) Yasaktir!
}
dec %<
}
}
on *:snotice:*client connect*: { .who $9 }
raw 352:*:{ fn $6 $9- | halt }
alias sp { if (!$dialog(spam)) { dialog -m spam spam } }
dialog spam {
title "Fullname reklam takip"
size -1 -1 113 41
option dbu
button "Çıkar", 1, 6 14 37 12, flat
button "Ekle", 2, 6 1 37 12, flat
combo 3, 51 1 60 39, size sort
button "KAPAT", 4, 6 27 37 12, flat ok
}
on *:dialog:spam:init:0: {
loadbuf -o $dname 3 reklam.txt }
on *:dialog:spam:sclick:2: {
if (!$did(spam,3).text) {
echo 2 -a Eklenecek reklamı yazmalısınız. | halt }
elseif $read(reklam.txt,w,$did(3).text) {
echo 2 -a $did(spam,3).text Listede zaten var. }
else {
write reklam.txt $did(spam,3).text
did -a $dname 3 $did(spam,3).text }
}
on *:dialog:spam:sclick:1: {
if (!$did(spam,3).text) {
echo 2 -a Silinecek reklamı seçmelisiniz. | halt }
elseif !$read(reklam.txt,w,$did(3).text) {
echo 2 -a $did(3).text Reklam listesinde zaten yok. }
else { write $+(-dw,",$did(3).text,") reklam.txt
did -d $dname 3 $did(3).sel }
}
menu * {
Fullname reklam:sp
}



Böyle Bir Dialog Var Iişini Görücektir. Beyadır Kullanıyorum işe Yarıyor

lacremel 16 Mart 2007 13:20

Cevap: Fullname Koruması?
 
Byfly , ByCapkin Cok tskler... kafadan atmak lazım qalißæ ßu txt. Olayını

ByCapkin Addon icin tskler Ama calıstıramadim ... F.name ^^ yapiorum ekLiorum atmıyor :S yardımcı Olurmusun oLmassa ByfLy'in Vrdiqi addonu Kullanacaqim

ByCapkin 16 Mart 2007 15:43

Cevap: Fullname Koruması?
 
Kod Bende Calışıyor Sadece Fullname de Renkli Olanları Atmıyor (Oper deqiLsen Atmaz)

lacremel 16 Mart 2007 19:33

Cevap: Fullname Koruması?
 
:D Oper değilim... Kanal Operatoruyüm sadece :S


Tüm Zamanlar GMT +3 Olarak Ayarlanmış. Şuanki Zaman: 20:10.

Powered by vBulletin® Version 3.8.11
Copyright ©2000 - 2025, vBulletin Solutions, Inc.
Search Engine Friendly URLs by vBSEO
Copyright ©2004 - 2025 IRCForumlari.Net Sparhawk