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

 Kayıt ol  Topluluk
5Beğeni(ler)
  • 1 Post By cinaryigit
  • 1 Post By cinaryigit
  • 1 Post By diEfoRyoU
  • 2 Post By cinaryigit

Yeni Konu aç Cevapla
 
LinkBack Seçenekler Stil
Alt 12 Ekim 2020, 15:17   #1
Çevrimiçi
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Yardıma Kanalına Giriş Uyarısı




Selam Arkadaşlar.

Kod şu işe yarıyor;
Belirlediğiniz bir kanala giriş olduğu takdirde ekranınızda ufak bir kutucuk açılır.
Ben #Chanserv kanalı için kullanıyorum
Not: Diğer kodlara bakarak hazırladım. Aslında "memoserv" iletisiydi. Kodun orijinal hali bu.Hak geçmesin
dialog ms {
title "MemoServ Bilgi Kutusu"
size -1 -1 220 85
text "Yeni bir notunuz var.",2,10 10 220 200
text "Okumak için tamam butonuna basınız.",3,10 30 220 200
button "Tamam",4,70 50 85 25,ok
}
on ^*:notice:*yeni bir notunuz*:*:{
if ($nick == MemoServ) {
dialog -ma ms ms
halt
}
}
on 1:ACTIVE:*:{
if ($dialog(idrqm)) { dialog -v ms }
}
on 1:dialog:ms:sclick:4:/ms read last
}


menu status,menubar, {
.-
.• Chanserv Uyarı
..• Açık !:.enable #xchan | .echo -a 0,4 Giriş Uyarı AÇıldı
..• Kapalı !:.disable #xchan | .echo -a 0,4 Uyarı Kapatıldı
.-
}

#xchan on
on ^*:join:#kanaladı: { notice $me 10( $+ $time $+ )  $chan  4Kanalına Giriş Yapan 10 : $nick ( $+ $address $+ ) | dialog -ma chanserv chanserv  | halt }
Oper/Admin host muaf.
if $regex($site,/(Root|Admin|Network|Services|Help|IRCOP|Oper|Local )/i) { return }
Nick Muaf.
elseif $regex($nick,/(Muaf|Muaf2|Muaf3/i) { return }
dialog chanserv {
title "Chanserv Yardım Uyarı"
size -1 -1 220 85
text "Lütfen #Chanserv Kanalına Bakınız",2,10 10 220 200
text "Tamam Tuşuna Basarak Yardım Edebilirsiniz",3,10 30 220 200
button "Tamam",4,70 50 85 25,ok
}

on 1:ACTIVE:*:{
if ($dialog(idrqm)) { dialog -v chanserv }
}
on 1:dialog:chanserv:sclick:4:/join #kanaldı
}
#xchan end


Alt+R yaparak remote içine kopyalayın, tamam deyiniz.
İyi IF'ler

 
Alıntı ile Cevapla

IRCForumlari.NET Reklamlar
sohbet odaları reklam ver Benimmekan Mobil Sohbet
Alt 16 Ekim 2020, 21:36   #2
Çevrimiçi
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: Yardıma Kanalına Giriş Uyarısı




cinaryigit Nickli Üyeden Alıntı
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
Selam Arkadaşlar.

Kod şu işe yarıyor;
Belirlediğiniz bir kanala giriş olduğu takdirde ekranınızda ufak bir kutucuk açılır.
Ben #Chanserv kanalı için kullanıyorum
Not: Diğer kodlara bakarak hazırladım. Aslında "memoserv" iletisiydi. Kodun orijinal hali bu.Hak geçmesin
Kod:   Kodu kopyalamak için üzerine çift tıklayın!
dialog ms { title "MemoServ Bilgi Kutusu" size -1 -1 220 85 text "Yeni bir notunuz var.",2,10 10 220 200 text "Okumak için tamam butonuna basınız.",3,10 30 220 200 button "Tamam",4,70 50 85 25,ok } on ^*:notice:*yeni bir notunuz*:*:{ if ($nick == MemoServ) { dialog -ma ms ms halt } } on 1:ACTIVE:*:{ if ($dialog(idrqm)) { dialog -v ms } } on 1:dialog:ms:sclick:4:/ms read last }

Kod:   Kodu kopyalamak için üzerine çift tıklayın!
menu status,menubar, { .- .• Chanserv Uyarı ..• Açık !:.enable #xchan | .echo -a 0,4 Giriş Uyarı AÇıldı ..• Kapalı !:.disable #xchan | .echo -a 0,4 Uyarı Kapatıldı .- } #xchan on on ^*:join:#kanaladı: { notice $me 10( $+ $time $+ )  $chan  4Kanalına Giriş Yapan 10 : $nick ( $+ $address $+ ) | dialog -ma chanserv chanserv  | halt } Oper/Admin host muaf. if $regex($site,/(Root|Admin|Network|Services|Help|IRCOP|Oper|Local)/i) { return } Nick Muaf. elseif $regex($nick,/(Muaf|Muaf2|Muaf3/i) { return } dialog chanserv { title "Chanserv Yardım Uyarı" size -1 -1 220 85 text "Lütfen #Chanserv Kanalına Bakınız",2,10 10 220 200 text "Tamam Tuşuna Basarak Yardım Edebilirsiniz",3,10 30 220 200 button "Tamam",4,70 50 85 25,ok } on 1:ACTIVE:*:{ if ($dialog(idrqm)) { dialog -v chanserv } } on 1:dialog:chanserv:sclick:4:/join #kanaldı } #xchan end

Alt+R yaparak remote içine kopyalayın, tamam deyiniz.
İyi IF'ler

Arkadaşlar muaflar çalışmıyor. Düzeltemedim de açıkçası @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] ve diğer coder arkadaşlardan ricam muafları yaparlarsa çok sevinirim. Şimdiden teşekkür ederim.

 
Alıntı ile Cevapla

Alt 17 Ekim 2020, 15:07   #3
Çevrimiçi
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: Yardıma Kanalına Giriş Uyarısı




Kod:   Kodu kopyalamak için üzerine çift tıklayın!
on !*:join:#KANAL:{ ;- Oper/Admin host muaf. if $regex($site,/(Root|Admin|Network|Services|Help|IRCOP|Oper|Local)/i) { return } ;- Nick Muaf. elseif $regex($nick,/(NİCK1|NİCK2|/i) { return } else { .enable #acc | cs status # $nick } } #acc off on *:notice:*Status*:?:{ if ($nick == ChanServ) && ($4 == 0) { timer 1 5 dialog -ma chanserv chanserv .disable #acc } } #acc end dialog chanserv { title "Chanserv Yardım Uyarı" size -1 -1 220 85 text "Lütfen #X Kanalına Bakınız!",2,10 10 220 200 text "Tamam Tuşuna Basarak Yardım Edebilirsiniz",3,10 30 220 200 button "Tamam",4,70 50 85 25,ok } on 1:ACTIVE:*:{ if ($dialog(idrqm)) { dialog -v chanserv } } on 1:dialog:chanserv:sclick:4:/join #KANAL }

Bu da muaf host ve nick eklenmiş hali arkadaşlar.

 
Alıntı ile Cevapla

Alt 17 Ekim 2020, 16:10   #4
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: Yardıma Kanalına Giriş Uyarısı




Kod:   Kodu kopyalamak için üzerine çift tıklayın!
on !*:join:#KANAL:{ timernickbak $+ $nick 1 3 Isprefx $nick $gettok($address($nick,1),2,64) # } alias Isprefx { if $regex($2,/Root|Admin|Network|Services|Help|IRCOP|Oper|Local/i) { return } if $regex($1,/NİCK1|NİCK2/i) { return } if $1 isreg $3 { echo -a 10( $+ $time $+ )  $chan  4Kanalına Giriş Yapan 10 : $nick ( $+ $address $+ ) | dialog -ma chanserv chanserv  dialog -ma chanserv chanserv } } dialog chanserv { title "Chanserv Yardım Uyarı" size -1 -1 220 85 text "Lütfen #X Kanalına Bakınız!",2,10 10 220 200 text "Tamam Tuşuna Basarak Yardım Edebilirsiniz",3,10 30 220 200 button "Tamam",4,70 50 85 25,ok } on 1:ACTIVE:*:{ if ($dialog(idrqm)) { dialog -v chanserv } } on 1:dialog:chanserv:sclick:4: { /join #KANAL }


Umarım işine yarar.

__________________
TurkSohbet.NET | #XPass
 
Alıntı ile Cevapla

Alt 18 Ekim 2020, 00:16   #5
Çevrimiçi
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: Yardıma Kanalına Giriş Uyarısı




diEfoRyoU Nickli Üyeden Alıntı
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
Kod:   Kodu kopyalamak için üzerine çift tıklayın!
on !*:join:#KANAL:{ timernickbak $+ $nick 1 3 Isprefx $nick $gettok($address($nick,1),2,64) # } alias Isprefx { if $regex($2,/Root|Admin|Network|Services|Help|IRCOP|Oper|Local/i) { return } if $regex($1,/NİCK1|NİCK2/i) { return } if $1 isreg $3 { echo -a 10( $+ $time $+ )  $chan  4Kanalına Giriş Yapan 10 : $nick ( $+ $address $+ ) | dialog -ma chanserv chanserv  dialog -ma chanserv chanserv } } dialog chanserv { title "Chanserv Yardım Uyarı" size -1 -1 220 85 text "Lütfen #X Kanalına Bakınız!",2,10 10 220 200 text "Tamam Tuşuna Basarak Yardım Edebilirsiniz",3,10 30 220 200 button "Tamam",4,70 50 85 25,ok } on 1:ACTIVE:*:{ if ($dialog(idrqm)) { dialog -v chanserv } } on 1:dialog:chanserv:sclick:4: { /join #KANAL }


Umarım işine yarar.

@[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] eline, emeğine sağlık teşekkür ederim.

 
Alıntı ile Cevapla

Alt 18 Ekim 2020, 16:19   #6
Çevrimiçi
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: Yardıma Kanalına Giriş Uyarısı




diEfoRyoU Nickli Üyeden Alıntı
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
Kod:   Kodu kopyalamak için üzerine çift tıklayın!
on !*:join:#KANAL:{ timernickbak $+ $nick 1 3 Isprefx $nick $gettok($address($nick,1),2,64) # } alias Isprefx { if $regex($2,/Root|Admin|Network|Services|Help|IRCOP|Oper|Local/i) { return } if $regex($1,/NİCK1|NİCK2/i) { return } if $1 isreg $3 { echo -a 10( $+ $time $+ )  $chan  4Kanalına Giriş Yapan 10 : $nick ( $+ $address $+ ) | dialog -ma chanserv chanserv  dialog -ma chanserv chanserv } } dialog chanserv { title "Chanserv Yardım Uyarı" size -1 -1 220 85 text "Lütfen #X Kanalına Bakınız!",2,10 10 220 200 text "Tamam Tuşuna Basarak Yardım Edebilirsiniz",3,10 30 220 200 button "Tamam",4,70 50 85 25,ok } on 1:ACTIVE:*:{ if ($dialog(idrqm)) { dialog -v chanserv } } on 1:dialog:chanserv:sclick:4: { /join #KANAL }


Umarım işine yarar.

$nick $chan çalışmıyor nedense echo kısmında da ya da başka bir yere koysan da. Bakabilir misin sana zahmet.
Ben şöyle düzelttim $nick yerine $1 $chan yerine $3 öyle.
Kod:   Kodu kopyalamak için üzerine çift tıklayın!
on !*:join:#KANAL:{ timernickbak $+ $nick 1 3 Isprefx $nick $gettok($address($nick,1),2,64) # } alias Isprefx { if $regex($2,/Root|Admin|Network|Services|Help|IRCOP|Oper|Local/i) { return } if $regex($1,/NoMercy|Geveze/i) { return } if $1 isreg $3 { noop $tip(x, Giriş Uyarısı, $1 $3 Kanalına Girdi!, 15) }

isteyen bunu da kullanabilir @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] notify için baloncuk isteyen birisi için yazmıştı oradan devşirme oldu biraz
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.


Konu cinaryigit tarafından (18 Ekim 2020 Saat 16:31 ) değiştirilmiştir.
 
Alıntı ile Cevapla

Cevapla

Etiketler
chanserv, giriŞ, uyarı, yardım


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

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
23-24 Ocak AÖF Sınav Giriş Yerleri belirlendi - 2016 AÖF giriş yeri sorgula NarÇiçeği AÖF 0 18 Ocak 2016 19:12
Proxy Giriş Yapanları #proxy Kanalına Almak ! diyorumki mIRC Scripting Sorunları 30 04 Nisan 2013 15:14
2010 YGS Giriş Belgesini Kaybedenler Veya Giriş Belgesi Gelmeyenler İçin Pentagram YGS ve LYS'ye Hazırlık 0 05 Nisan 2010 13:48
Help ve OperHelp Giriş Uyarısı FLu mIRC Scripting Sorunları 10 12 Mayıs 2009 19:14
op kanalına girene ident ve setname uyarısı SaintCty mIRC Scripting Sorunları 10 12 Haziran 2007 12:35