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

Yeni Konu aç Cevapla
 
LinkBack Seçenekler Stil
Alt 22 Ocak 2005, 12:33   #21
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.



Evil'e atfen.

Alıntı:
eheh onu Denemisdim AntalyaTeam. calismior o bazi yerlerde yanlislik yapmisdi $iif yazmisdi mesela onlari felanda duzenledim ama olmadi.eXtreme'den almayi denicem. zamaninda az kullanmamisdim

Evil AntalyaTeam'in sana verdiği adreste benim yazdığım kod var.
Ben, AntalyaTeam, ve o scripti isteyen kişi için o kod çalışıyor, senin için neden çalışmadığını anlamadım. Kestirip atmak yerine çalışmaması üzerine somut sebebler söylersen daha mantıklı olmaz mı? $iif yazmıştı mesela onları felanda düzenledim demişsin $iif'de ne gibi bi yanlışlık var anlamadım?
mIRC'de $iif diye bir parametre var, kullanımı ise şöyle
Örneğin
//echo $iif($me isop #el33t,#el33t kanalında opsun,#el33t kanalında op değilsin)
$iif(a,1,2)
a daki durum doğruysa 1'deki durumu alıyor, doğru değilse 2'de durumu alıyor.

Umarım anlamışsındır.

 
Alıntı ile Cevapla

IRCForumlari.NET Reklamlar
sohbet odaları sohbet odaları Sohbet
Alt 22 Ocak 2005, 13:53   #22
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.



* zuhaha Kullanıcı listesine eklendi
*** eviL mode değiştirdi:+b zuhaha!*
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.

*** zuhaha eviL Tarafından Kanaldan Atıldı (Shit listemdesin.)

*** Tekrar Girilmeye Çalışılıyor...
*** Kanala Tekrar Giriliyor #abc
*** Topic '.'
*** eviL Tarafından Tue Nov 02 14:07:09 tarihinde yazılmış
*** ChanServ mode değiştirdi:+oq eviL eviL

*** Ayrıldı: zuhaha (
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
) (Cycle )
*** Giriş: zuhaha (
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
)

*** Ayrıldı: eviL (
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
) (Cycle )
*** Giriş: eviL (
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
)
*** ChanServ mode değiştirdi:+oq eviL eviL

*** eviL mode değiştirdi:-b zuhaha!*
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.

*** Giriş: zuhaha (
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
)

Sadece Kanalda Ekleme yaptigim zaman atiyor.. Somut birseyler istemisdin al sana somut veri.Calisan birseye calismiyo diyecek kadar kafayi siyirmadim.

 
Alıntı ile Cevapla

Alt 22 Ocak 2005, 17:41   #23
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.



Aşağıdaki kod ben ve diğer 3 arkadaşımda nedense "sorunsuz çalıştı"
Sende sorun nedir bilemiyorum ama olabilecek tek sorun senin lagda olmandır. Çünkü bir kanala girdiğinde op olma süren önemli. Ben 5 saniyeye ayarladım ve bende hatasız çalıştı. [ON NICK'de ekledim. Böylece biri nick değiştirdiğinde de eğer ShitListendeyse o da atılır]
İşte kod:

Kod:   Kodu kopyalamak için üzerine çift tıklayın!
dialog shitlist { title "ShitList" size -1 -1 64 109 option dbu list 1, 3 4 58 80, size edit "", 2, 3 85 34 10, autohs button "Ekle", 3, 38 85 23 10, check "Kapalı", 4, 3 96 29 10, push button "Kapat", 5, 32 96 29 10, cancel box "", 6, 1 0 62 108 } on *:dialog:shitlist:init:*:if ($group(#shitlist) = on) { did -c $dname 4 0 | did -a $dname 4 Açık } | var %x = $lines(shitlist.txt) | while %x { did -a $dname 1 $read(shitlist.txt,%x) | dec %x } on *:dialog:shitlist:sclick:4:{ if ($did(4).state = 1) { .enable #shitlist | did -a $dname 4 Açık } | elseif ($did(4).state = 0) { .disable #shitlist | did -a $dname 4 Kapalı } } on *:dialog:shitlist:sclick:1:did -ra $dname 2 $did(1).seltext | did -ra $dname 3 Çıkar on *:dialog:shitlist:sclick:3:{ if ($did(3).text = Çıkar) { if ($read(shitlist.txt, w, $did(1).seltext)) { write -dl %4$s $readn shitlist.txt | did -d $dname 1 $did(1).sel | did -r $dname 2 } } if ($did(3).text = Ekle) && ($did(2).text) { write shitlist.txt $did(2).text | did -a $dname 1 $did(2).text | kickcomchan $did(2).text Shit listemdesin. } } on *:dialog:shitlist:edit:2:did -ra $dname 3 Ekle #shitlist on on @*:join:#:if ($read(shitlist.txt, w, $nick)) ban -k # $nick Shit listemdesin. raw 353:*:var %x = $numtok($4-,32) | while %x { if ($read(shitlist.txt, w, $gettok($4-,%x,32))) { .timer 1 5 kickcomchan $gettok($4-,%x,32) Shit listemdesin. } | dec %x } on *:nick:{ if ($read(shitlist.txt, w, $newnick)) { kickcomchan $newnick Shit listemdesin } } #shitlist end alias kickcomchan { if ($1) { var %x = $comchan($1,0) | while %x { $iif($me isop $comchan($1,%x),ban -k $comchan($1,%x) $1 $2-) | dec %x } } } menu channel,status,menubar { Shitlist:dialog -ma shitlist shitlist } alias shitlist { if ($dialog(shitlist)) { dialog -x shitlist } | dialog -ma shitlist shitlist }

Umarım işine yarar..

 
Alıntı ile Cevapla

Alt 30 Haziran 2005, 11:26   #24
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.



arkadaşlar yardım edermisiniz kickcomchan $newnick Shit listemdesin bu ban şeklini yani burdaki ban şekillerini ben
cs akick $comchan($4-,%x,32) $address($4-,2) shit listemdesin
Yani cs den ban atacak şekilde düzenlemek istiyorum ama bir türlü olmuyo nerde yanlış yapıyorum acaba?

 
Alıntı ile Cevapla

Alt 30 Haziran 2005, 17:38   #25
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.



$comchan da Tek bir Nick Belirmelisin.$address tede öyle.
Sen orda $4- demişsin.$4- 'ün anlamı : 4. Kelime ve Sonrasındaki Kelimeler.
Yani Kullandığın yerde 4. kelimeden Sonra daha kelime varsa Kod çalışmaz.
Sadece $4 dene.

 
Alıntı ile Cevapla

Alt 30 Haziran 2005, 17:46   #26
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.



16-01-2005, 12:11 ufff bayağı olmus
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.

 
Alıntı ile Cevapla

Alt 30 Haziran 2005, 23:56   #27
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.



alias kickcomchan { if ($1) { var %x = $comchan($1,0) | while %x { $iif($me isop $comchan($1,%x),ban -k $comchan($1,%x) $1 $2-) | dec %x } } }
bu bir kısa yol herhalde anladığım kadarıyla arkadaş kickcomchan yazınca direkt komut buraya geliyo
raw 353:*:var %x = $numtok($4-,32) | while %x { if ($read(shitlist.txt, w, $gettok($4-,%x,32))) { .timer 1 5 kickcomchan $gettok($4-,%x,32) Shit listemdesin. } | dec %x }
işte burda kullanmış sanırım bu ikinci koda ellemeden ilk verdiğim alias kickcomchan başlayan kodu değiştirmem gerekiyor öyle dimi

alias kickcomchan { if ($1) { var %x = $comchan($1,0) | while %x { $iif($me isop $comchan($1,%x),cs akick $comchan($1,%x) add $address($1,2) | dec %x } } }
şeklinde yaptım ama malesef akick komutu ile ilgili yardım almama gerektiğini söyleyen bi yazı ile karşılaştım.
Acaba raw 353 le başlayan kodda da bi değişiklik yapmam mı gerekiyor?

ayrıca
raw 353:*:var %x = $numtok($4-,32) | while %x { if ($read(shitlist.txt, w, $gettok($4-,%x,32))) { .timer 1 5 cs akick $comchan($4,%x,32) $address($4,2) shit listemdesin Shit listemdesin. } | dec %x }
Too many parameters: $comchan bu hatayı verdi ama bu yöntemde op olmasamda adam banlamaya çalışcak o nedenle arkadaşın yazdığı kısayol çok güzel olmuş bende o kısa yolu kulllanmak istiyorum yani kısa yolu değiştiricem cs den ban atacak ama o zaman raw

de değişecekmi değişecekse ne yazıcam ve kısa yola cs akick $comchan add $address($1,2) mi yazcam ki bunuda denedim yine sunuç alamadım
bu şekildede * Invalid format: $iif (line 25, script2.ini)
-bu hatayı veriyo


Konu erdem55 tarafından (01 Temmuz 2005 Saat 00:12 ) değiştirilmiştir.
 
Alıntı ile Cevapla

Alt 01 Temmuz 2005, 10:33   #28
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.



alias badnicktara {
if $me isop $1 {
set %:bulunan 0
var %s 1
while %s <= $nick($1,0) {
%:gnick = $nick($1,%s)
if %:gnick isreg $1 && $level(%:gnick $+ !*@*) == 666 {
inc %:bulunan 1
mode $1 +b $ulist(%:gnick,666,1)
kick $1 %:gnick Badnick kullandiginiz tespit edildi!
}
inc %s
}
echo -a 2 Badnickler tarandi: $1 - %:bulunan badnick bulundu.
}
else {
echo -a 2 $1 kanalinda OP olmaniz gerekmektedir.
}
}

raw 366:*: {
var %i 1
while %i <= $comchan($1,0) {
if $1 !isop $comchan($1,%i) { timer 1 3 .badnicktara $comchan($1,%i) }
inc %i
}
}


on *:join:#: {
if $level($nick $+ !*@*) == 666 {
mode # +b $ulist($nick,666,1)
kick # $nick Badnick kullandiginiz tespit edildi!
}
}

on *:nick: {
if $level($newnick $+ !*@*) == 666 {
banall $newnick $ulist($newnick,666,1)
kickall $newnick Badnick kullandiginiz tespit edildi!
}
}

alias banall {
var %i 1
while %i <= $comchan($1,0) {
if $1 !isop $comchan($1,%i) { mode $comchan($1,%i) +b $2- }
inc %i
}
}

alias kickall {
var %i 1
while %i <= $comchan($1,0) {
if $1 !isop $comchan($1,%i) { kick $comchan($1,%i) $1 $2- }
inc %i
}
}


mesela alternatif olarak bunu buldum yine forumda üzerinde biraz değişiklik yaptım. Şuanda çalışıyor.
Ama bunada cs den ban attıramıyorum.
raw 366:*: {
var %i 1
while %i <= $comchan($1,0) {
if $1 !isop $comchan($1,%i) { timer 1 3 .badnicktara $comchan($1,%i) }
inc %i
}
}
bu kıesmı ben değiştirdim. Valla bişiler yaptım doğrumu yaptım bilmiyorum ama çalışmayan kod çalıştı
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
aslı şöyleydi
raw 366:*: {
badnicktara $1
}
ama böyle olunca çalışmıyordu
2 manyaq kanalinda OP olmaniz gerekmektedir.
böyle diyordu yani badnicktara #kanal yapacana benim nicki tarıyordu
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
Böyle yaptım şimdi gayet iyi çöalışıyor İstediğim sadece ban kısmını cs akick # $address($1,2) blacklistesin gibisindne bişi olması yani cs den ip e ban atmasını istiyorum. Yardım pls

 
Alıntı ile Cevapla

Alt 01 Temmuz 2005, 12:30   #29
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.



mode $1 +b $ulist(%:gnick,666,1)
kick $1 %:gnick Badnick kullandiginiz tespit edildi!
;anlamadığım ban komutunda nick $ulist(%:gnick,666,1) iken kick komutunda %:gnick.Eğer aynı anlama geliyorsa aşağıdaki kodu koyarsan calısır
cs akick $1 add $+(%:gnick,!*@*) Badnick. | cs akick $1 enforce | cs akick $1 del $+(%:gnick,!*@*)

 
Alıntı ile Cevapla

Alt 01 Temmuz 2005, 16:48   #30
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.



$address(%:gnick,2) dene...

 
Alıntı ile Cevapla

Cevapla

Etiketler
10, atmak, kisiyi, kişiyi, mirc, mirc download, mirc indir, seçtiğim, sectigim


Konuyu Toplam 1 Üye okuyor. (0 Kayıtlı üye ve 1 Misafir)
 
Seçenekler
Stil

Yetkileriniz
Konu Acma Yetkiniz Yok
Cevap Yazma Yetkiniz Yok
Eklenti Yükleme Yetkiniz Yok
Mesajınızı Değiştirme Yetkiniz Yok

BB code is Açık
Smileler Açık
[IMG] Kodları Açık
HTML-Kodu Kapalı
Trackbacks are Kapalı
Pingbacks are Açık
Refbacks are Açık


Benzer Konular
Konu Konuyu Başlatan Forum Cevaplar Son Mesaj
sectiğim nicklere online olunca oto selam ZenqerDenq mIRC Scripting Sorunları 3 05 Haziran 2013 15:38
Tek Yöne Seçtiğim Tüm Yollar YapraK Resimli Şiirler 0 20 Haziran 2012 16:41
Uyuşturucu aldı, 1 kişiyi öldürdü, 1 kişiyi yaraladı Cemalizim Haber Arşivi 0 12 Ağustos 2008 00:51
Seçtiğim Kişilere Mesaj Atmak... Alper mIRC Scripting Sorunları 9 23 Temmuz 2005 18:00