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/)
-   -   kodlar ne ise yariyor.. (https://www.ircforumlari.net/mirc-scripting-sorunlari/56109-kodlar-ne-ise-yariyor.html)

sondemdeyim 30 Nisan 2008 10:21

kodlar ne ise yariyor..
 
scriptimi modifiye ederken onceden yukledigim birkac addonun calistigini fark ettim.ne zaman yukledigimi hatirlamiyorum ama bi kac ne ise yaradigini bilmedigim kod buldum.bunlarin ne ise yaradigini cozumleyen kardeslerden simdiden ALLAH razi olsun insaALLAH...
*:NICK:{ if ($me isop $chan) && ($nick isop $chan) { mode $chan -ao $nick $nick }}
--------------------------------------------------------------------
raw 307:*: { .msg $2 mesajin }
on *:join:#kanal: { .whois $nick }
on ^*:OPEN:?:*: {
;Renk
if ($count($1-,) > 2) { $Kapat($nick,$1-) }
var %sep $1- | %sep = $strip($remove(%sep,-,_)) | tokenize 32 %sep
if (*.tr* iswm $1-) { $Kapat($nick,$1-) }
if (*
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
iswm $1-) { $Kapat($nick,$1-) }
if (?i*r*c? iswm $1-) { $Kapat($nick,$1-) }
if (*.com* iswm $1-) { $Kapat($nick,$1-) }
if (*da.ru* iswm $1-) { $Kapat($nick,$1-) }
if (*#* iswm $1-) { $Kapat($nick,$1-) }
if (*tikla* iswm $1-) { $Kapat($nick,$1-) }
if (*[K5E++]* iswm $1-) { $Kapat($nick,$1-) }
if (**Auto* iswm $1-) { $Kapat($nick,$1-) }
if (**Oto Mesaj* iswm $1-) { $Kapat($nick,$1-) }
if (*wwvv* iswm $1-) { $Kapat($nick,$1-) }
if (*shopland* iswm $1-) { $Kapat($nick,$1-) }
if (*w w w* iswm $1-) { $Kapat($nick,$1-) }
if (*Davetlisiniz* iswm $1-) { $Kapat($nick,$1-) }
if (******* iswm $1-) { $Kapat($nick,$1-) }
if (*gen.ms* iswm $1-) { $Kapat($nick,$1-) }
if (*-*k*l*a*v*y*e* iswm $1-) { $Kapat($nick,$1-) }
if (*S*é*r*v*é*R* iswm $1-) { $Kapat($nick,$1-) }
if (*c0m* iswm $1-) { $Kapat($nick,$1-) }
if (*kanalina* iswm $1-) { $Kapat($nick,$1-) }
if (*.nêt* iswm $1-) { $Kapat($nick,$1-) }
if (*.net* iswm $1-) { $Kapat($nick,$1-) }
if (*gulben* iswm $1-) { $Kapat($nick,$1-) }
if (*vvv* iswm $1-) { $Kapat($nick,$1-) }
if (*guIben* iswm $1-) { $Kapat($nick,$1-) }
if (*wvvw* iswm $1-) { $Kapat($nick,$1-) }
}
alias -l Kapa_kick {
var %i 1
while (%i <= $comchan($1,0)) {
if ($comchan($1,%i).op == $true) {
if ($1 !isop $comchan($1,%i)) {
mode $comchan($1,%i) +b $1
kick $comchan($1,%i) $1 7,1 KuraL ihLaLi Ettiniz 6[14 $comchan($1,%i) 6] 7KanaLindan AtiLdiniz4!14 Tarih :6[7 $date 6]14 Saat :6[7 $time 6]
}
}
inc %i 1
}
}

sondemdeyim 30 Nisan 2008 10:25

Cevap: kodlar ne ise yariyor..
 
YINE BASKA NE ISE YARADIGINI BULAMADIGIM BIR KOD.

on !@*:join:#kanal:{ mode #kanal +v $nick }

--------------------------------------------------
os mode $gettok(%£Chan,%£^,32) +v $$1


inC %£^ } | eLse { os mode $gettok(%£Chan,%£^,32) +v $$1 | inC %£^
on *:notice:*:?: {
if (hasan== NickServ) {
if (Bu nick kayitli bir nicktir, siz bu nicki kullanamazsiniz isin $1-) { msg NickServ ghost %nick sifre | msg NickServ release %nick sifre | timer 2 5 nick %nick | timer 2 10 msg NickServ IDENTIFY sifre }
}
}

raw 474:*:{
echo -a *** $2 Kanalinda Banlisin!!! | msg chanserv unban $2 | msg chanserv invite $2
halt
}

on *:disconnect:{
if $server == IRC.bilmemne.NET {

bu ikinci kod ne ise yariyor ve tek kod mu yoksa birden fazla kod mu var orda sanki iki kod birbirine girmis gibi geldi bana..

Dependent 30 Nisan 2008 11:23

Cevap: kodlar ne ise yariyor..
 
Ne işe yaradığını bilmediğin ve kullanınca da yararını görmediğin kodların scriptinde işi olmaması gerekir:

1. *:NICK:{ if ($me isop $chan) && ($nick isop $chan) { mode $chan -ao $nick $nick }}
burada nick değişince sen ve nick değişen kişi kanalda op idi ise onun modunu değiştirmesi gerek ammaa nick değişince $nick eski nick olacağından zaten kanalda op olarak gözükmez $newnick olması gerekti bu çalışmaz sil :)

2.on ^*:OPEN:?:*: {
;Renk
ile başlayan kısımlar reklam koruma işine yaramıyorsa direk sil

3. on !@*:join:#kanal:{ mode #kanal +v $nick }
#kanal kanalında op isen senden başka join yapanları voice yapar

4. os mode $gettok(%£Chan,%£^,32) +v $$1
bu bir aliasin parçası bu halde işe yaramaz tam aliasi olması gerek, ama burada verilen değerlerde tokenda boşluğa göre zannedersem sırası ile alıp os den voice verdiriyor.

5. raw 474:*:{
bu rawdan gelen bir mesajda o kanala otomatik invite çekiyorsun, yeni unrealircd lerde biraz gereksiz

6. on *:disconnect:{
sil, disconnect olunca server irc.bilmemne.net ise işlem uyguluyor, bu kodun düzgün birşey olması beklenemez, dediğim gibi sil


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

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