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

3Beğeni(ler)
  • 1 Post By Lucifer
  • 1 Post By Difuzyon
  • 1 Post By Goemon

Yeni Konu aç Cevapla
 
LinkBack Seçenekler Stil
Alt 14 Temmuz 2012, 21:39   #1
Goemon
Guest
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Yüzdesi:(%)
giriş çıkış kanal diyalog




s.a hayırlı akşamlar arkadaşlar öncelikle herkese başarılar dilerim sizden istiyeceğim bir kod vardı aradım bulamadım.

diyalog şeklinde girilicek kanallar ve girilmiyecek kanalların olması ve eklenip siline bilmesi için nasıl diyalogdan yaparız acaba mümkünmü.

 
Alıntı ile Cevapla

IRCForumlari.NET Reklamlar
sohbet odaları sohbet odaları Benimmekan Mobil Sohbet
Alt 14 Temmuz 2012, 22:39   #2
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: giriş çıkış kanal diyalog




Merhaba.

Elimde olan oper mIRC'lerinden bir tane istediğin gibi addon var. Kendine göre düzenleyebilirsin.

Kod:   Kodu kopyalamak için üzerine çift tıklayın!
dialog otog { title "Grup Giriş Menusu" size -1 -1 132 112 option dbu button "Bulusma", 9, 109 31 22 8 button "Şehirler", 10, 1 31 22 8 button "Yaş", 11, 37 31 22 8 button "iliski", 12, 73 31 22 8 button "Oyun", 13, 2 66 22 8 button "Team", 14, 35 66 22 8 button "Muzik", 15, 72 66 22 8 button "Gundem", 16, 109 66 22 8 button "Odalarım", 17, 35 79 58 12 button "Tamam", 18, 46 94 37 12, ok cancel button "Ayarlar", 19, 105 101 25 8 } on 1:dialog:otog:sclick:*: { if ($did == 9) || ($did == 10) || ($did == 11) || ($did == 12) || ($did == 13) || ($did == 14) || ($did == 15) || ($did == 16) || ($did == 17) { var %temp 1 while %temp <= $ini(gruplar.ini,$did($did),0) { sajoin $readini(gruplar.ini,$did($did),$ini(gruplar.ini,$did($did),%temp)) $me inc %temp } } if ($did == 19) { .dialog -c otog otog | .dialog -m otogirisayar otogirisayar } } dialog otogirisayar { title "Oto Giris Ayar Tablosu" size -1 -1 93 98 option dbu combo 1, 2 8 48 89, size button "Ekle", 2, 57 56 25 12 button "Sil", 3, 57 70 25 12 button "Tamam", 4, 57 84 25 12, cancel combo 5, 50 8 40 48, size text " Opers Script", 6, 2 0 89 8 } on *:dialog:otogirisayar:sclick:*: { if ($did == 3) { if ($did(5) != $null) && ($did(1) != $null) { .did -d otogirisayar 1 $did(otogirisayar,1) | .did -d otogirisayar 1 $did(otogirisayar,1).sel | .remini gruplar.ini $did(5) | düzenle | did -a $dname 6 Silme İşlemi Yapılmıştır! } else { did -a $dname 6 Silinecek Grup/İsim Belirtmediniz } } if ($did == 5) { .otogirislist | did -a $dname 6 Opers Abc Script V1.0 } if ($did == 2) { if ($did(5) != $null) && ($did(1) != $null) { .writeini gruplar.ini $did(5) n $+ $ini(gruplar.ini,$did(5),0) $did(1) | .otogirislist | did -a $dname 6 Kanal Ekleme İşlemi Yapılmıştır! } else { did -a $dname 6 Eklenecek Grup/İsim Belirtmediniz! } } } on *:dialog:otogirisayar:init:*: { did -a $dname 5 Bulusma | did -a $dname 5 Şehirler | did -a $dname 5 Yaş | did -a $dname 5 iliski | did -a $dname 5 Oyun did -a $dname 5 Team | did -a $dname 5 Muzik | did -a $dname 5 Gundem | did -a $dname 5 Odalarım } alias otogirislist { did -r otogirisayar 1 var %temp 1 while %temp <= $ini(gruplar.ini,$did(5),0) { did -a otogirisayar 1 $readini(gruplar.ini,$did(5),$ini(gruplar.ini,$did(5),%temp)) inc %temp } } alias düzenle { var %temp 1, %temps 0 while %temp <= $did(otogirisayar,1).lines { .writeini -n gruplar.ini $did(5) n $+ %temps $did(otogirisayar,1,%temp).text inc %temp | inc %temps } }


__________________
Lucifer dediler bana, kötülüğü anlatmak için. Halbuki, ışık ve güzelliği anlatırdı Lucifer. Ben kötüyüm bu düzen için; ama değilim asla kötülük.
 
Alıntı ile Cevapla

Alt 14 Temmuz 2012, 22:50   #3
Goemon
Guest
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Yüzdesi:(%)
Cevap: giriş çıkış kanal diyalog




valla kod istediğim gibi birşey ama yasaklaı kanalı global kanalı nasıl ayıracam onu anlamadım artı kanal ekledim eklediğim kanala giriş yapamadım?

 
Alıntı ile Cevapla

Alt 17 Temmuz 2012, 21:04   #4
Goemon
Guest
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Yüzdesi:(%)
Cevap: giriş çıkış kanal diyalog




konu halen güncel.

 
Alıntı ile Cevapla

Alt 17 Temmuz 2012, 23:41   #5
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: giriş çıkış kanal diyalog




Sunucuda online iken girmek istemediğiniz kanallara otomatik olarak mı yönlendiriliyorsunuz?Yasaklı kanallar kısmına bir açıklık getirirseniz yazılacak kodun olay esnasında ne yapması gerektiği daha belirgin olur.

 
Alıntı ile Cevapla

Alt 18 Temmuz 2012, 21:18   #6
Goemon
Guest
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Yüzdesi:(%)
Cevap: giriş çıkış kanal diyalog




abi sana msj atdım kusura bakma

 
Alıntı ile Cevapla

Alt 18 Temmuz 2012, 22:19   #7
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: giriş çıkış kanal diyalog




Kod:   Kodu kopyalamak için üzerine çift tıklayın!
on me:*:join:#:$iif($read(kanal.txt,w,$chan),leave #) dialog chanlist { title "Yasak Kanallar" size -1 -1 145 120 option dbu text "Yasak Kanal Listesi", 9, 58 5 101 8 list 10, 49 26 62 89, size vsbar edit "", 11, 48 13 62 12, return autohs autovs button "Ekle", 12, 115 14 25 11 button "Çıkart", 13, 115 30 25 11 box "", 14, 145 1 98 117 } on 1:dialog:chanlist:*:*:{ if ($regex($devent,^init$)) { if ($read(kanal.txt)) { loadbuf -o $dname 10 kanal.txt } } if ($regex($devent,^sclick$)) { if ($regex($did,^12$)) { var %e = $did(11) if (!%e) { $iif($input(kanal girmediniz.,y) == $true,halt,halt) | halt } else { $iif($read(kanal.txt,w,%e),$iif($input(Eklediğiniz kanal mevcut.,y) == $true,halt,halt),write kanal.txt %e) | did -a $dname 10 %e | did -r $dname 11 } } if ($regex($did,^13$)) { var %r = $did($dname,10).sel if (!%r) { $iif($input(Herhangi bir kanal seçmediniz.,y) == $true,halt,halt) | halt } else { var %- = $did($dname,10).seltext | did -d $dname 10 %r | write $+(-ds,%-) kanal.txt } } } } menu * { - Yasak Kanallar:.dialog -m chanlist chanlist - }

İstemediğiniz kanallara giriş halinde çıkmak için gerekli dialog kodlaması yukarıdaki gibidir.
Otomatik giriş yapmak istediğiniz kanallar için ise kod yazmaya gerek görmüyorum çünkü bu konuyla alakalı services komutu var.Daha fazlası için Help Dünyası > Online Yardım bölümünden bilgi alabilirsiniz.

 
Alıntı ile Cevapla

Alt 18 Temmuz 2012, 22:39   #8
Goemon
Guest
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Yüzdesi:(%)
Cevap: giriş çıkış kanal diyalog




allah razı olsun abi sağolasın hakkını helal ed.

 
Alıntı ile Cevapla

Cevapla

Etiketler
çıkış, diyalog, giriş, kanal


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
kanal genelindeki giriş çıkış ban noticeleri kaldırma DenperaS mIRC Scripting Sorunları 5 14 Eylül 2016 16:47
Kanal Giriş / Çıkış Mesaj Sorunu. SDoruk mIRC Scripting Sorunları 1 28 Ağustos 2010 16:39
/pj [<N>] (Çıkış-Giriş) Regex mIRC Scripting Hazır Kodlar 6 07 Ağustos 2009 15:17
kanal giriş çıkış yazıları KnOuCK Servisler 2 16 Eylül 2007 22:15
KanaL Giriş Çıkış Ve İrc Den CıkanLar EVENTLari LauReLL mIRC Scripting Hazır Kodlar 0 16 Mayıs 2007 01:00