| LeadeR | 30 Kasım 2005 21:39 |
MDX Kullanılarak Yapılan hali..
$mircdir yani mIRC 'ın bulunduğu klasor'un icine bir tane mdx.dll atacaksınız ve status'de sağ tıklayıp karsınıza cıkana tıklayacaksınız..
Kodlar ; PHP- Kodu:
dialog nick {
title "Nickserv islemleri [ Coded By LeadeR ]
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
style="color: #0000BB">size -1 -1 253 150
option dbu
box "", 1, 6 7 240 130
box "", 2, 1 2 251 140
button "Hakkinda", 3, 11 142 37 8
button "Kapat", 4, 205 142 37 8, ok
edit "", 5, 10 102 231 32, return autohs autovs read
button "Info", 6, 63 21 25 9, flat
button "Sifrele", 7, 63 32 25 9, flat
button "Dropla", 8, 63 43 25 9, flat
button "Relase", 9, 63 54 25 9, flat
button "Listchans", 10, 63 65 25 9, flat
button "Watch", 11, 63 76 25 9, flat
button "Buddy", 12, 63 87 25 9, flat
box "", 13, 56 15 39 84
edit " Nick Islemleri", 14, 9 52 44 10, return autohs autovs read
button "Sifre Değiştirme", 15, 117 21 43 9, flat
button "URL Değiştirme", 16, 117 32 43 9, flat
button "Mail Değiştirme", 17, 117 43 43 9, flat
button "Set Noops", 18, 117 54 43 9, flat
button "Showemail", 19, 117 65 43 9, flat
button "Protect", 20, 117 76 43 9, flat
button "Secure", 21, 117 87 43 9, flat
button "Kill On Off", 22, 168 21 43 9, flat
button "Set Memo", 23, 168 32 43 9, flat
button "M Forward", 24, 168 43 43 9, flat
button "M Receipts", 25, 168 54 43 9, flat
button "Field", 26, 168 65 43 9, flat
button "Authorize", 27, 168 76 43 9, flat
button "Auth Chanlist", 28, 168 87 43 9, flat
box "", 29, 101 15 127 84
}
alias nck { dialog -m nick nick }
on *:dialog:nick:sclick:*: {
if ($did == 6) { did -ra $dname 5 Nick Hakkindaki bilgileri görmenizi sağlar Komut : /ns info nick }
if ($did == 7) { did -ra $dname 5 Nick'inizi sifreleme ( Kayıt ) etmenizi sağlar Komut : /ns register sifreniz e-mailadresiniz }
if ($did == 8) { did -ra $dname 5 Nick'iniz hakkindaki tüm kayıtları silmenizi sağlar Komut : /ns drop nick , Not : önce identify etmelisiniz }
if ($did == 9) { did -ra $dname 5 Nickiniz "enforcer" tarafindan tutuldugunda kullanacağınız islem Komut : /ns relase nick şifre }
if ($did == 10) { did -ra $dname 5 Nick hakkindaki access leri öğrenmek Komut : /ns listchans nick }
if ($did == 11) { did -ra $dname 5 Watch listenizi yani arkadaş listenizi düzenlemeniz icin kullanılan Komut : /ns watch add nick }
if ($did == 12) { did -ra $dname 5 BUDDY listenizi yani notify listenizi düzenlemeniz icin kullanılan Komut : /ns BUDDY add nick }
if ($did == 15) { did -ra $dname 5 Nickinizin şifresini değiştirmek istiyosanız Komut : /ns set passwd yenişifre }
if ($did == 16) { did -ra $dname 5 Nickinizin url'sini değiştirmek istiyorsanız Komut : /ns set url yeniurl }
if ($did == 17) { did -ra $dname 5 Nickinizin E-mail 'ini değiştirmek istiyrsanız Komut : /ns set e-mail yenie-mail }
if ($did == 18) { did -ra $dname 5 Access'inizin olduğu kanalda direkt op olmak istemiyorsanız : /ns set noop on }
if ($did == 19) { did -ra $dname 5 E-mail adresinizin infonuzda gözükmesini isterseniz : /ns set email on }
if ($did == 20) { did -ra $dname 5 Nick'inizi guest korumasına almak isterseniz : /ns set protect on }
if ($did == 21) { did -ra $dname 5 Açik oldugunda Nickserv access listesi görmezden gelinir : /ns set secure on/off }
if ($did == 22) { did -ra $dname 5 Nick'inizin baskası tarafından kullanılmasını engeller ve acar : /ns set kill on/off }
if ($did == 23) { did -ra $dname 5 Nick'inize memo gelmesini istemiyorsanız : /ns set nomemo on }
if ($did == 24) { did -ra $dname 5 Size gelen memolari baskasina yönlendirilir. Kapatmak için : /ns set mforward on/off nick }
if ($did == 25) { did -ra $dname 5 Gönderdiğiniz memonun okunduğunda size bilgi gelsin isterseniz : /ns set mreceipts on/off }
if ($did == 26) { did -ra $dname 5 Info alan bilgileri degistirmenize/eklemenize yarar, Komut : /ns set field }
if ($did == 27) { did -ra $dname 5 Biri sizi watch/buddy listesine eklerken sizin onayinizi almaya zorlar. : /ns set authorize buddy <on|off> }
if ($did == 28) { did -ra $dname 5 Bu komutu on yaparsaniz , sizi uop/aop/sop/vop eklemeleri için sizden izin almalari gerekir : /ns set authorize chanlists on/off }
if ($did == 3) { did -ra $dname 5 Nickserv hakkındaki bilgileri dialog icerisinden öğrenmenizi sağlar }
}
on *:dialog:nick:*:*:{
dll mdx.dll SetMircVersion $version | dll mdx.dll MarkDialog $dname
dll mdx.dll SetFont 5,6,7,8,9,10,11,12,13,15,16,17,18,19,20,21,22,23,24,25,26,27,28 12 700 tahoma
dll mdx.dll SetFont 5,14 12 700 tahoma
dll mdx.dll SetColor $dname 5,14 text $rgb(255,255,255)
dll mdx.dll SetColor $dname 5,14 background $rgb(99,99,156)
dll mdx.dll SetColor $dname 5,14 textbg $rgb(99,99,156)
}
dialog chan {
title "Chanserv islemleri [ Coded By LeadeR ]
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
style="color: #0000BB">size -1 -1 253 150
option dbu
box "", 1, 6 7 240 130
box "", 2, 1 2 251 140
button "Hakkinda", 3, 11 142 37 8
button "Kapat", 4, 205 142 37 8, ok
edit "", 5, 11 102 231 32, return autohs autovs read
button "Info", 6, 63 21 25 9, flat
button "Sifrele", 7, 63 32 25 9, flat
button "Dropla", 8, 63 43 25 9, flat
button "Opguard", 9, 63 54 25 9, flat
button "Restrict", 10, 63 65 25 9, flat
button "Leave", 11, 63 76 25 9, flat
button "Private", 12, 63 87 25 9, flat
box "", 13, 56 15 39 84
edit " Kanal Islemleri", 14, 9 52 44 10, read
button "Sifre Değiştirme", 15, 117 21 43 9, flat
button "URL Değiştirme", 16, 117 32 43 9, flat
button "Invite", 17, 117 43 43 9, flat
button "Set Founder", 18, 117 54 43 9, flat
button "Description", 19, 117 65 43 9, flat
button "Ident", 20, 117 76 43 9, flat
button "Topic", 21, 117 87 43 9, flat
button "Topiclock", 22, 168 21 43 9, flat
button "Mlock", 23, 168 32 43 9, flat
button "Mkick", 24, 168 43 43 9, flat
button "Mdeop", 25, 168 54 43 9, flat
button "Unban", 26, 168 65 43 9, flat
button "Akick", 27, 168 76 43 9, flat
button "Why", 28, 168 87 43 9, flat
box "", 29, 101 15 127 84
}
alias chan { dialog -m chan chan }
on *:dialog:chan:sclick:*: {
if ($did == 6) { did -ra $dname 5 Kanal bilgilerini görmenizi sağlar Komut : /cs info #kanal }
if ($did == 7) { did -ra $dname 5 Kanal sifrelemenizi sağlar Komut : /cs register sifreniz acıklama }
if ($did == 8) { did -ra $dname 5 Kanal'ın tüm kayıtlarını silmenizi sağlar Komut : /cs drop #kanal , Not : kanalı identify etmelisiniz }
if ($did == 9) { did -ra $dname 5 Kanalda Aop ve Sop lardan başkasının op olmaması için Komut : /cs set #kanal opguard ON/OFF }
if ($did == 10) { did -ra $dname 5 Kanala Aop veya Sopların dışında başkasının girmemesi için Komut : /cs set #kanal restrict ON/OFF }
if ($did == 11) { did -ra $dname 5 Chanserv pasif durumda kaldığı zaman op ların chanserv tarafından deop edilememesini saglar Komut : /cs set #kanal leaveops ON/OFF }
if ($did == 12) { did -ra $dname 5 Kanal mode larından olan +p yani özel kanal devamlı set edilmiş durumda kalacaktır, bu sayede sadece kanalı bilenler girebilir. Komut : /cs set #kanal private ON/OFF }
if ($did == 15) { did -ra $dname 5 Kanal sifresini değiştirmesini sağlar Komut : /cs set #kanal passwd yenisifre }
if ($did == 16) { did -ra $dname 5 Kanal URL'sini değiştirmesini sağlar Komut : /cs set #kanal url yeniurl }
if ($did == 17) { did -ra $dname 5 Chanserv tarafından kanala kendi kendinizi : yetkiniz varsa : davet ettirirsiniz: /cs invite #kanal nickiniz }
if ($did == 18) { did -ra $dname 5 Kanal Founder'ini değiştirmenizi sağlar Komut : /cs set #kanal founder yenifounder , Not : Kanal'ı identify etmelisiniz }
if ($did == 19) { did -ra $dname 5 Kanalın Description (infosunu) değiştirmek için: /cs set #kanal description kanal yeniacıklama }
if ($did == 20) { did -ra $dname 5 Kanala gelenlerin nick lerini ident etmeden op olamaması için: /cs set #kanal ident on }
if ($did == 21) { did -ra $dname 5 Kanal'a topic atmanızı sağlar komut : /topic #kanal Topicmesajınız }
if ($did == 22) { did -ra $dname 5 Kanal'ın topic'ini kitlemenizi sağlar : /cs set #kanal topiclock on/off }
if ($did == 23) { did -ra $dname 5 Kanal modlarını kitlemenizi sağlar : /cs set #kanal mlock + komutlar }
if ($did == 24) { did -ra $dname 5 Kanaldaki bütün kullanıcılara kick komutu uygulanır. : yetkiniz varsa : /cs mkick #kanal }
if ($did == 25) { did -ra $dname 5 Kanaldaki o anda OP olan bütün kullanıcılara deop komutu yollanır. Deop olacak kişiler access seviyenize göre belirlenir.: /cs mdeop #kanal }
if ($did == 26) { did -ra $dname 5 Chanserv tarafından yetkinizin olduğu kanaldaki ban ınızı açabilirsiniz: /cs unban #kanal nickiniz }
if ($did == 27) { did -ra $dname 5 Chanserv tarafından Sop veya Founder iseniz bir kişiye kanalda sürekli ban koyabilirsiniz: /cs akick #kanal add nick/mask }
if ($did == 28) { did -ra $dname 5 Kanalda op duran bir kisinin hangi nicki identify ettigi ve hangi levelda oldugunu gosterir. : /cs why #kanal nick }
if ($did == 3) { did -ra $dname 5 Chanserv hakkındaki bilgileri dialog icerisinden öğrenmenizi sağlar }
}
on *:dialog:chan:*:*:{
dll mdx.dll SetMircVersion $version | dll mdx.dll MarkDialog $dname
dll mdx.dll SetFont 5,6,7,8,9,10,11,12,13,15,16,17,18,19,20,21,22,23,24,25,26,27,28 12 700 tahoma
dll mdx.dll SetFont 5,14 12 700 tahoma
dll mdx.dll SetColor $dname 5,14 text $rgb(255,255,255)
dll mdx.dll SetColor $dname 5,14 background $rgb(99,99,156)
dll mdx.dll SetColor $dname 5,14 textbg $rgb(99,99,156)
}
dialog memo {
title "Memoserv [ Coded By LeadeR ]
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
style="color: #0000BB">size -1 -1 176 150
option dbu
box "", 1, 8 11 160 124
box "", 2, 1 5 174 136
button "Hakkinda", 3, 8 141 37 9
button "Kapat", 4, 131 141 37 9, ok
edit "", 5, 10 95 156 37, return autohs autovs read
button "Send", 6, 97 17 44 10, flat
button "Sops", 7, 97 28 44 10, flat
button "List", 8, 97 39 44 10, flat
button "Read", 9, 97 50 44 10, flat
button "Del", 10, 97 61 44 10, flat
button "Undel", 11, 97 72 44 10, flat
button "Expunge", 12, 97 83 44 10, flat
edit " Memo Islemleri", 13, 26 48 50 10, read
}
alias memo { dialog -m memo memo }
on *:dialog:memo:sclick:*: {
if ($did == 6) { did -ra $dname 5 Birine veya kanala memo ( not bırakmak ) atmak için: /ms send nick veya #kanal }
if ($did == 7) { did -ra $dname 5 Komut sadece kanalin soplarına not bırakmak içindir.: /ms sendsop #kanal }
if ($did == 8) { did -ra $dname 5 Size gönderilen memo mesajlarının listesini görmek için kullanılır.: /ms list }
if ($did == 9) { did -ra $dname 5 Size gelen memolar number yerine listedeki numarasini yazarak okuyabilirsiniz.: /ms read numara }
if ($did == 10) { did -ra $dname 5 Okuduğunuz memoları silmek için kullanılır.: /ms del numara veya hepsini silmek için /ms del all }
if ($did == 11) { did -ra $dname 5 Yanlışlıkla sildiğiniz bir memoyü yeri almak için kullanılır; ancak üzerine başka memo gelmiş ise sildiğiniz memoyu geri alamazsınız.: /ms undel numara }
if ($did == 12) { did -ra $dname 5 Silinen memolar klasor'e gecer , klasor'deki bütün mesajları silmenize yarar : /ms expunge all }
if ($did == 3) { did -ra $dname 5 Memoserv Hakkindaki bilgileri dialog icerisinden öğrenmenizi sağlar }
}
on *:dialog:memo:*:*:{
dll mdx.dll SetMircVersion $version | dll mdx.dll MarkDialog $dname
dll mdx.dll SetFont 6,7,8,9,10,11,12, 12 700 tahoma
dll mdx.dll SetFont 5,14 12 700 tahoma
dll mdx.dll SetColor $dname 5,13 text $rgb(255,255,255)
dll mdx.dll SetColor $dname 5,13 background $rgb(99,99,156)
dll mdx.dll SetColor $dname 5,13 textbg $rgb(99,99,156)
}
alias ac { dialog -m ac ac }
dialog ac {
title "Servisler [ Coded By LeadeR ]"
size -1 -1 124 79
option dbu
box "", 1, 7 12 110 50
box "", 2, 2 5 120 64
button "Kapat", 3, 42 69 37 9, ok
button "Nickserv İslemleri icin Tıkla", 4, 26 19 74 10, flat
button "Chanserv İslemleri icin Tıkla", 5, 26 32 74 10, flat
button "Memoserv İslemleri icin Tıkla", 6, 26 45 74 10, flat
}
on *:dialog:ac:sclick:*: {
if ($did == 4) { .nck }
if ($did == 5) { .chan }
if ($did == 6) { .memo }
}
menu status,channel,menubar {
Services:.ac
}
Görüntü ; [Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]
Yukarı'ya ilk attığım amator görünüm.. bu ise prof. görünüm |
