Whois Düzenleme Dialogu - IRCForumları - IRC ve mIRC Kullanıcılarının Buluşma Noktası

bLaсk · 23 Aralık 2009, 13:16

Tekrar Merhaba Arkadaşlar Daha Öncede Söylediğim Gibi Dialog Çalışmalarında Yeniyim ve Kendimi Geliştirmek İçin ve Daha iyiye Gidebilmek İçin Çalışmalar yapmaktayım. Şimdide Whois Düzenleme Dialogu Çizdim Birtane Genelde Ben Cr Sunucuda Görev Aldığım İçin Cr Kapsamlı Çalışmalar Sunuyorum. Kısaca özetlemek gerekirse Bir Userin Sizden Whoisime Şu Anlamlı Sözü Eklemek İstiyorum Dediğinde Bu dialog Sayesinde Kolaylıkla Whoise Güzel Veya Anlamlı Sözler Ekleyebilirsiniz.Amacı Budur ve Kolaylık Bakımından Gayet Kullanışlıdır.

Scripte Dosyanızı Yüklemeniz İçin ; Size Vereceğim Linkteki Dosyamızı İndiriyoruz Ve İçindeki Dosyaları Mircimizin Ana Klasörüne Atıyoruz . Sadece İçinden Resmimizi Alıp İmages Dosyamıza Atıyoruz. Ana Klasore dosyaları Attıktan Sonra Mircimıza /load -rs whxs Yazarak Kodumuzu Yukluyoruz. Dialogumuzu Çalıştırmak İçinde /dialog -m whxs whxs şeklinde Yazıyoruz ve dialog Scriptinizde karşınıza Çıkacaktır.

Önce Görünümünü Sunayım Buyrun ;

Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.

İndirmek İsteyenler İçinde Linkimiz;

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

İyi Forumlar ...

StanteaR · 24 Aralık 2009, 01:11

Merhaba Evet çok Güzel Bir Düşünce Emegine Saglık Güzel Olmus Kullanıslı Her Eve Lazım
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.

Heavenly · 24 Aralık 2009, 12:39

Whois düzenleme'de bi kolaylık . Kod yazmaya yeni başlıyan birine göre güzel bi sonuç vermiş . Teşekkür ederim paylaşım için , başarıların devamını dilerim ..

bLaсk · 24 Aralık 2009, 12:57

Teşekkürler Faydalı Birşey Yapabilmişsem Ne Mutlu Bana, Kendimi Zamanla Geliştiricem İnşallah .

İyi Forumlar...

Erva · 24 Aralık 2009, 15:58

Bi Oper bilir ama yine de mirce eklemek için /load -rs whxs.txt şeklinde olmalı dimi
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
Gerçi ben kullanamıyorum nasılsa. Ama gayet basite indirmiş whois düzenleme işini, eline sağlık...

bLaсk · 24 Aralık 2009, 21:37

Evet Haklısınız /load -rs whxs.txt olmalıydı özür dilerim gözümden kaçmış uyardığınız için teşekkürler.

iyi forumlar..

dhan · 25 Aralık 2009, 01:09

Helal Olsun diyorum.
Nede Olsa benim ogrencilerimin hepsi kaliteli Coder olucaktir.
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.

bLaсk · 25 Aralık 2009, 20:10

Merhaba Arkadaşlar Yapmış Olduğum Whois Düzenleme Dialogunda Hata Oldugunun Farkına vardım yanlız duzenleyemedım bır turlu BEnde yenısını Cızdım Ve duzenledım Eksıksız ve gayet iyi bir şekilde Çalışıyor . herkesten Özür Diliyorum . Tek Farkı Dırek Addonu Yukluyorsunuz Ve mırcınızda Çalısıyor Buyrun ;

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!

alias whs1 dialog -m whsx whsx 
dialog whsx { 
  title "Whois Düzenleyici « bLack ® » " 
  size -1 -1 242 210 
  option dbu 
  box "Nicki Girin", 1, 4 3 119 23 
  edit "", 2, 8 11 108 12, autohs 
  box "", 3, 4 30 236 176 
  text "Diyorki", 4, 10 40 47 8 
  edit "", 5, 70 40 106 10, autohs 
  text "İnadına", 6, 10 55 47 8 
  edit "", 7, 70 55 106 10, autohs 
  text "Bir", 8, 10 70 47 8 
  edit "", 9, 70 70 106 10, autohs 
  text "Web", 10, 10 85 47 8 
  edit "", 11, 70 85 106 10, autohs 
  text "E-Mail", 12, 10 100 47 8 
  edit "", 13, 70 100 106 10, autohs 
  text "Site", 14, 10 115 47 8 
  edit "", 15, 70 115 106 10, autohs 
  text "Takim", 16, 10 130 47 8 
  edit "", 17, 70 130 106 10, autohs 
  text "Dili", 18, 10 145 47 8 
  edit "", 19, 70 145 106 10, autohs 
  text "Yardim", 20, 10 160 47 8 
  edit "", 21, 70 160 106 10, autohs 
  text "Ulke", 22, 10 175 47 8 
  edit "", 23, 70 175 106 10, autohs 
  text "Den Tavsiyeler", 24, 10 190 47 8 
  edit "", 25, 70 190 106 10, autohs 
  button "Ekle", 28, 185 40 48 10 
  button "Ekle", 29, 185 55 48 10 
  button "Ekle", 30, 185 70 48 10 
  button "Ekle", 31, 185 85 48 10 
  button "Ekle", 32, 185 100 48 10 
  button "Ekle", 33, 185 115 48 10 
  button "Ekle", 34, 185 130 48 10 
  button "Ekle", 35, 185 145 48 10 
  button "Ekle", 36, 185 160 48 10 
  button "Ekle", 37, 185 175 48 10 
  button "Ekle", 38, 185 190 48 10 
  box "", 40, 186 3 53 23 
  button "Tümünü Ekle", 41, 133 10 45 12 
  box "", 42, 130 3 52 23 
  button "Tamam/Kapat", 43, 190 10 45 12, ok 
} 

on *:dialog:whsx:init:*: {
  mdx SetMircVersion $version 
  mdx MarkDialog $dname
  mdx SetColor $dname 3,4,6,8,10,12,14,16,18,20,22,24,26,27,28,29,30,31,32,33,34,35,36,37,38,39,40 text $rgb(0,0,0)
  mdx SetColor $dname ,16,18 text $rgb(005,080,120)
  mdx SetColor $dname 3,4,6,8,10,12,14,16,18,20,22,24,26,27,28,29,30,31,32,33,34,35,36,37,38,39,40 background $rgb(225,225,225)
  mdx SetColor $dname 20,22 textbg $rgb(225,225,225)
  mdx SetDialog [ $dname ] bgcolor $rgb(225,225,225)
  mdx SetFont $dname  3,4,6,8,10,12,14,16,18,20,22,24,26,27,28,29,30,31,32,33,34,35,36,37,38,39,40 Turkish 14 800 Cyrillic
  mdx SetFont $dname 3,4,6,8,10,12,14,16,18,20,22,24,26,27,28,29,30,31,32,33,34,35,36,37,38,39,40 14 700 Tahoma
  mdx SetDialog  $dname  bgcolor  $rgb(225,225,225)
  mdx SetColor $dname 26 textbg $rgb(225,225,225)
  mdx SetColor $dname 26 background $rgb(225,225,225)
  mdx SetFont 3,4,6,8,10,12,14,16,18,20,22,24,26,27,28,29,30,31,32,33,34,35,36,37,38,39,40,41,42,43,44,45,46,47,48,49,50,51,52,53,54,55,56,57,58,59,60,61,62,63,64,65,66,67,68,69,70,71,72,73,74,75,76,77,78,79,80,81,82,83 12 700 tahoma
  mdx SetBorderStyle 3,4,6,8,10,12,14,16,18,20,22,24,26,27,28,29,30,31,32,33,34,35,36,37,38,39,40 staticedge 

}

on *:dialog:whsx:Sclick:*: { 
  if ($did == 28) { raw set $did(2) diyorki $did(5) | echo -a 5 $did(2) 4diyorki : $did(5) } 
  if ($did == 29) { raw set $did(2) inadına $did(7) | echo -a 5 $did(2) 4inadına : $did(7) } 
  if ($did == 30) { raw set $did(2) bir $did(9) | echo -a 5 $did(2) 4bir : $did(9) } 
  if ($did == 31) { raw set $did(2) web $did(11) | echo -a 5 $did(2) 4web : $did(11) } 
  if ($did == 32) { raw set $did(2) e-mail $did(13) | echo -a 5 $did(2) 4e-mail : $did(13) } 
  if ($did == 33) { raw set $did(2) site $did(15) | echo -a 5 $did(2) 4site : $did(15) } 
  if ($did == 34) { raw set $did(2) takim $did(17) | echo -a 5 $did(2) 4takim : $did(17) } 
  if ($did == 35) { raw set $did(2) dili $did(19) | echo -a 5 $did(2) 4dili : $did(19) } 
  if ($did == 36) { raw set $did(2) yardim $did(21) | echo -a 5 $did(2) 4yardim :$ did(21) } 
  if ($did == 37) { raw set $did(2) ulke $did(23) | echo -a 5 $did(2) 4ulke : $did(23) } 
  if ($did == 38) { raw set $did(2) den $did(25) | echo -a 5 $did(2) 4den : $did(25) } 
  if ($did == 41) { 
    .echo -a 5 Ekleme İşlemi İçin 4 15 Saniye 5Beklemelisiniz! 
    .timer 1 0 raw set $did(2) diyorki $did(5) 
    .timer 1 1 raw set $did(2) inadına $did(7) 
    .timer 1 2 raw set $did(2) bir $did(9) 
    .timer 1 3 raw set $did(2) web $did(11) 
    .timer 1 4 raw set $did(2) e-mail $did(13) 
    .timer 1 5 raw set $did(2) site $did(15) 
    .timer 1 6 raw set $did(2) takim $did(17) 
    .timer 1 7 raw set $did(2) dili $did(19) 
    .timer 1 8 raw set $did(2) yardim $did(21) 
    .timer 1 9 raw set $did(2) ulke $did(23) 
    .timer 1 11 raw set $did(2) den $did(25) 
    .timer 1 12 echo -a 5Ekleme İşlemi Bitmiştir. 
  } 
} 

menu channel,query,status { 
  Whois Düzenleyici:/whs1

İyi Forumlar...

DeathStyLe · 25 Aralık 2009, 20:16

Güzel bi paylaşım olmuş . Başarıların devamını dilerim ..

Status · 30 Aralık 2009, 14:00

bLack GüzeL Olmus [Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] Demi süper oLmus Status(Fatih)

Benzer Konular
Konu	Konuyu Başlatan	Forum	Cevaplar	Son Mesaj
Whois düzenleme	Kimimben	mIRC Scripting Sorunları	6	13 Temmuz 2013 23:41
Giriş Çıkış Yapana Whois ( @Whois Penceresinde )	LauReLL	mIRC Scripting Hazır Kodlar	12	06 Temmuz 2009 09:30
whois çekene uyarı beraber Sajoin ve 2 kere whois kill olmasını istiyorum nasıldı ?	Rekor37	mIRC Scripting Sorunları	1	06 Haziran 2009 15:34
whois düzenleme	aRiF	mIRC Scripting Sorunları	4	19 Nisan 2009 12:42
Root Admin Whois Düzenleme	kup{a}pazl	Unreal IRCd	4	22 Haziran 2008 23:54

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

Etiketlenen Kullanıcılar
Etiketlemek istediğiniz kullanıcılar arasına virgül koyunuz. Örnek: nokta,sukunet,NucLear

5846 sayılı Fikir ve Sanat Eserleri Kanunu gereğince sitemizde telif hakkı bulunan mp3,video v.b. eserlerin paylaşımı yasaktır. Yasal işlem olması halinde paylaşan kişi yada kişilerin bilgileri gerekli kuruma verilecektir.