IRC ve mIRC Kullanıcılarının Buluşma Noktası
  Reklam Ver


Forum tutkunlarının tek adresi Türkiye Sohbet Odaları Sohbetteyiz herkes burda

ayna chat muhabbetbayilik veren firmalar

Şeker Shell  Sohbet


mIRC Scripting Hazır Kodlar

mIRC Scriptinglerinizde kullanabileceğiniz hazır kodlara bu başlık altından ulaşabilirsiniz.



2Beğeni(ler)
  • 1 Post By KiLLed
  • 1 Post By KiLLed

Yeni Konu aç Cevapla
 
LinkBack Seçenekler Stil
Alt 12 Ocak 2013, 11:45   #1
Çevrimdışı
Ame amsg Muaf Kanal kodu


-- Sponsor Baglantı --


Bu Kodun Kime ait olduğunu bilmiyorum.

ancak görünce hoşuma gitti Düzenlemesini yapıp sizlerle paylaşıyorum.

PHP- Kodu:   Kodu kopyalamak için üzerine çift tıklayın!
menu channel {
  -
  
» Ame-Amsg-Muaf:/amele
  
-
}
dialog amele {
  
title "KiLLed Ame-Amsg Muaf Menu"
  
size --1 240 126
  option dbu
  edit 
"" 1110 26 60 10
  
list 310 36 60 70
  button 
"Ekle"478 28 32 12
  button 
"Sil"578 48 33 12
  edit 
"" 12130 26 60 10
  
list 6130 36 60 70
  button 
"Ekle"7196 28 33 12
  button 
"Sil"8196 48 33 12tab 2
  box 
"Muaf Ame ekleyiniz"95 14 110 90
  box 
"Muaf Amsg ekleyiniz"19125 14 110 90
  button 
"Tamam"105 110 230 10ok
}
alias amele { .dialog -m amele amele }
alias ame haltdef | var %i 0 | var %t $chan(0) | while %< %inc %| if $istok(%muafame,$chan(%i),32) != $true describe $chan(%i) $1- } } }
alias amsg haltdef | var %i 0 | var %t $chan(0) | while %< %inc %| if $istok(%muafamsg,$chan(%i),32) != $true msg $chan(%i) $1- } } }
on *:dialog:amele:init:*:{
  if (%
muafame) .didtok $dname 3 32 $ifmatch
  
if (%muafamsg) .didtok $dname 6 32 $ifmatch
}
on *:dialog:amele:sclick:*: {
  ;
ame için muafiyet
  
if ($did == 4) { if ($did(11) != $null) { set -%sk $did(11) | if (%sk) && (!$istok(%muafame,%sk,32)) { .set %muafame $addtok(%muafame,%sk,32) | did -a $dname 3 %sk did -r $dname 11 } } }
  if (
$did == 5) { if ($did(3).sel 0) { .set %muafame $remtok(%muafame,$did(3).seltext,1,32) | did -d $dname 3 $did(3).sel did -c $dname 3 1 } }
  ;
amsg için muafiyet
  
if ($did == 7) { if ($did(12) != $null) { set -%sk $did(12) | if (%sk) && (!$istok(%muafamsg,%sk,32)) { .set %muafamsg $addtok(%muafamsg,%sk,32) | did -a $dname 6 %sk did -r $dname 12 } } }
  if (
$did == 8) { if ($did(6).sel 0) { .set %muafamsg $remtok(%muafamsg,$did(6).seltext,1,32) | did -d $dname 6 $did(6).sel did -c $dname 6 1 } }


Bu Kodun Kime ait olduğunu bilmiyorum.

ancak görünce hoşuma gitti Düzenlemesini yapıp sizlerle paylaşıyorum.

PHP- Kodu:   Kodu kopyalamak için üzerine çift tıklayın!
menu channel {
  -
  
» Ame-Amsg-Muaf:/amele
  
-
}
dialog amele {
  
title "KiLLed Ame-Amsg Muaf Menu"
  
size --1 240 126
  option dbu
  edit 
"" 1110 26 60 10
  
list 310 36 60 70
  button 
"Ekle"478 28 32 12
  button 
"Sil"578 48 33 12
  edit 
"" 12130 26 60 10
  
list 6130 36 60 70
  button 
"Ekle"7196 28 33 12
  button 
"Sil"8196 48 33 12tab 2
  box 
"Muaf Ame ekleyiniz"95 14 110 90
  box 
"Muaf Amsg ekleyiniz"19125 14 110 90
  button 
"Tamam"105 110 230 10ok
}
alias amele { .dialog -m amele amele }
alias ame haltdef | var %i 0 | var %t $chan(0) | while %< %inc %| if $istok(%muafame,$chan(%i),32) != $true describe $chan(%i) $1- } } }
alias amsg haltdef | var %i 0 | var %t $chan(0) | while %< %inc %| if $istok(%muafamsg,$chan(%i),32) != $true msg $chan(%i) $1- } } }
on *:dialog:amele:init:*:{
  if (%
muafame) .didtok $dname 3 32 $ifmatch
  
if (%muafamsg) .didtok $dname 6 32 $ifmatch
}
on *:dialog:amele:sclick:*: {
  ;
ame için muafiyet
  
if ($did == 4) { if ($did(11) != $null) { set -%sk $did(11) | if (%sk) && (!$istok(%muafame,%sk,32)) { .set %muafame $addtok(%muafame,%sk,32) | did -a $dname 3 %sk did -r $dname 11 } } }
  if (
$did == 5) { if ($did(3).sel 0) { .set %muafame $remtok(%muafame,$did(3).seltext,1,32) | did -d $dname 3 $did(3).sel did -c $dname 3 1 } }
  ;
amsg için muafiyet
  
if ($did == 7) { if ($did(12) != $null) { set -%sk $did(12) | if (%sk) && (!$istok(%muafamsg,%sk,32)) { .set %muafamsg $addtok(%muafamsg,%sk,32) | did -a $dname 6 %sk did -r $dname 12 } } }
  if (
$did == 8) { if ($did(6).sel 0) { .set %muafamsg $remtok(%muafamsg,$did(6).seltext,1,32) | did -d $dname 6 $did(6).sel did -c $dname 6 1 } }


  Alıntı ile Cevapla

IRCForumlari.NET Reklamlar
Alt 14 Ocak 2013, 18:57   #2
Çevrimiçi
Cevap: Ame amsg Muaf Kanal kodu




[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]

Biraz dialog da değişiklik yapmışsın ama bence ilk hali daha hoş görünüyor
Bu forumdaki linkleri ve resimleri görebilmek için en az 20 mesajınız olması gerekir.

__________________

Kullanıcı imzalarındaki bağlantı ve resimleri görebilmek için en az 20 mesaja sahip olmanız gerekir ya da üye girişi yapmanız gerekir.
  Alıntı ile Cevapla

Alt 14 Ocak 2013, 20:00   #3
Çevrimdışı
Cevap: Ame amsg Muaf Kanal kodu




ilk hali tab şeklindeydi tab olarak değilde bir bütün olarak daha sade gösterir
bir ikinci sorun olarakta eklenen kanal editten silinmiyordu çunki combo olarak yazılmıştı onu edit ve list haline çevirdim
tabi görüşler farkli olabilir ama her iki haldede işe yaraması önemli

ondan bağımsız olarak kullanacak kişilere şu öneride bulunayım eğer ame amsg aliası aliasınıza ekli ise kod çalışmaz aliasınızdaki ame amsg kodunu silip bu kod öyle yüklemenizi tavsiye ederim.

  Alıntı ile Cevapla

Cevapla

Etiketler
ame, amsg, kanal, kodu, muaf

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 Açık
Pingbacks are Açık
Refbacks are Açık


Benzer Konular
Konu Konuyu Başlatan Forum Cevaplar Son Mesaj
join #kanal ident nick muaf yardim badword mIRC Scripting Sorunları 0 15 Eylül 2012 23:03
Muaf kanal ekleme Cpu mIRC Scripting Sorunları 1 23 Mart 2012 14:08
Clone Korumasina Muaf Kanal ve Host Ekleme.. Coldman mIRC Scripting Sorunları 5 25 Ekim 2011 13:49
Muaf Kanal rasinti mIRC Scripting Sorunları 7 13 Mayıs 2011 09:52
Muaf kanal ve host ekleme aldanis mIRC Scripting Sorunları 1 25 Eylül 2010 18:06