mIRc Operator Bar Toolbar gibi... - IRCForumları - IRC ve mIRC Kullanıcılarının Buluşma Noktası

LauReLL · 31 Temmuz 2007, 03:49

Sag Tarafta Resimdede Göreceğiniz gibi Operatorlerin Kullanması için böyle Bir Bar Yaptım Umarım Hoşunuza Gider...

Kod: Kodu kopyalamak için üzerine çift tıklayın!

on *:connect: { dialog -m opsop opsop }
alias _opsop {
  if $dialog(opsop) {
    dialog -c opsop opsop
  }
  else {
    dialog -m opsop opsop
  }
}
dialog opsop {
  title "LauReLL"
  option dbu
  size -1 -1 35 51400
  button "+o", 1, 2 0 30 25
  button "-o", 7, 2 26 30 25
  button "+v", 2, 2 52 30 25
  button "-v", 8, 2 78 30 26
  button "kick", 3, 2 104 30 25
  button "ban", 4, 2 131 30 25
  button "K-B", 10, 2 156 30 25
  button "whois", 5, 2 182 30 25
  button "ping", 6, 2 209 30 25
  button "+MRc", 11, 2 236 30 25
  button "+m", 12, 2 262 30 25
  button "-m", 13, 2 289 30 25
  button "+c", 14, 2 315 30 25
  button "-c", 15, 2 342 30 25
  button "+R", 16, 2 369 30 25
  button "-R", 17, 2 396 30 25
  ;button "+m", 18, 2 423 30 25
  ;button "-m", 19, 2 450 30 25
}
on *:dialog:opsop:init:0: {
  mdx MarkDialog $dname
  mdx SetDialog $dname style 
  mdxdll SetDialog [ $dname ] bgcolor [ $rgb(191,216,156) ] 
  rebar Dock $dialog(opsop).hwnd > left
}
on *:DIALOG:opsop:sclick:17:{
  if ($me isop $active) {
    mode $active -R
  }
}
on *:DIALOG:opsop:sclick:16:{
  if ($me isop $active) {
    mode $active +R
  }
}
on *:DIALOG:opsop:sclick:15:{
  if ($me isop $active) {
    mode $active -c
  }
}
on *:DIALOG:opsop:sclick:14:{
  if ($me isop $active) {
    mode $active +c
  }
}
on *:DIALOG:opsop:sclick:13:{
  if ($me isop $active) {
    mode $active -m
  }
}
on *:DIALOG:opsop:sclick:12:{
  if ($me isop $active) {
    mode $active +m
  }
}
on *:DIALOG:opsop:sclick:11:{
  if ($me isop $active) {
    mode $active +MRc
  }
}
on *:DIALOG:opsop:sclick:10:{
  if ($me isop $active) {
    ban $active $snick($active,1)10 | kick $active $snick($active,1)
  }
}
on *:DIALOG:opsop:sclick:1:{
  if ($me isop $active) {
    mode $active +o $snick($active,1)
  }
}
on *:DIALOG:opsop:sclick:7:{
  if ($me isop $active) {
    mode $active -o $snick($active,1)
  }
}
on *:DIALOG:opsop:sclick:2:{
  if ($me isop $active) {
    mode $active +v $snick($active,1)
  }
}
on *:DIALOG:opsop:sclick:8:{
  if ($me isop $active) {
    mode $active -v $snick($active,1) 
  }
}
on *:DIALOG:opsop:sclick:3:{
  if ($me isop $active) {
    kick $active $snick($active,1) 
  } 
}
on *:DIALOG:opsop:sclick:4:{
  if ($me isop $active) {
    ban $active $snick($active,1) 10 
  } 
}
on *:DIALOG:opsop:sclick:5:{
  whois $snick($active,1) 
}
on *:DIALOG:opsop:sclick:6:{
  ctcp $snick($active,1) ping 
}
alias mdx { dll dll\mdx.dll $1- }
alias rebar { dll $shortfn(dll\rebar.dll) $$1- }
alias mdxdll { return $dll(DLL\mdx.dll,$1,$2-) }

Görüntüsü

[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]
Shot at 2007-07-30

LauReLL · 31 Temmuz 2007, 03:50

mdx MarkDialog $dname
mdx SetDialog $dname style
mdxdll SetDialog [ $dname ] bgcolor [ $rgb(191,216,156) ]
rebar Dock $dialog(opsop).hwnd > left

Sadece bu kodlar sayesınde küçük dialog'u bu sekle soktum dll klasoru içersine bu dll leri atınız...
örnek C:\mIRc\dll\mdx.dll gib vs vs...

oSeNLuRDa_YaKa · 31 Temmuz 2007, 09:02

LauReLL ; arkadaşım yine güzeL bir çaLışma çıkarmışsın ortaya tbr. güzeL bir çaLışma eLine sağLık....

Mc_AyALa · 31 Temmuz 2007, 09:37

LauReL çok güzelde demsem yalan olar.
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.

Muhteşem ... Muteeşemm ....
Bir teşekkür'ü Katıpın
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.

Kan · 31 Temmuz 2007, 11:08

Guzel calismaya benziyor eline saglik.

LauReLL · 31 Temmuz 2007, 13:31

Saolun ArkadaşLar aslında incelticektim ama dialog studio programım farklı...

Mc_AyALa · 31 Temmuz 2007, 14:04

LauReLL Pki Onu Sağ Tarafa Nick Listin Yanına Koyamazmısın ?

Kan · 31 Temmuz 2007, 15:27

Kod: Kodu kopyalamak için üzerine çift tıklayın!

 
on *:dialog:opsop:init:0: {
  mdx MarkDialog $dname
  mdx SetDialog $dname style 
  mdxdll SetDialog [ $dname ] bgcolor [ $rgb(191,216,156) ] 
  rebar Dock $dialog(opsop).hwnd > left
}

Surda left yazan yeri right olarak ayarlarsan olur herhalde emin degilim tam

fener1907 · 22 Aralık 2009, 05:43

bu ekranın tam ortasında duruyo neden acaba?

muratcelik · 16 Şubat 2010, 10:04

on *:connect: { dialog -m opsop opsop }
alias _opsop {
if $dialog(opsop) {
dialog -c opsop opsop
}
else {
dialog -m opsop opsop
}
}
dialog opsop {
title "LauReLL"
size -1 -1 16 259
option dbu
button "+o", 1, 2 0 15 15
button "-o", 7, 2 16 15 15
button "+v", 2, 2 32 15 15
button "-v", 8, 2 48 15 15
button "kick", 3, 2 64 15 15
button "ban", 4, 2 80 15 15
button "K-B", 10, 2 96 15 15
button "whois", 5, 2 112 15 15
button "ping", 6, 2 128 15 15
button "+MRc", 11, 2 144 15 15
button "+m", 12, 2 160 15 15
button "-m", 13, 2 176 15 15
button "+c", 14, 2 192 15 15
button "-c", 15, 2 208 15 15
button "+R", 16, 2 224 15 15
button "-R", 17, 2 240 15 15
}
on *:dialog:opsop:init:0: {
mdx MarkDialog $dname
mdx SetDialog $dname style
mdxdll SetDialog [ $dname ] bgcolor [ $rgb(191,216,156) ]
rebar Dock $dialog(opsop).hwnd > right
}
on *
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
IALOG:opsop:sclick:17:{
if ($me isop $active) {
mode $active -R
}
}
on *
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
IALOG:opsop:sclick:16:{
if ($me isop $active) {
mode $active +R
}
}
on *
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
IALOG:opsop:sclick:15:{
if ($me isop $active) {
mode $active -c
}
}
on *
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
IALOG:opsop:sclick:14:{
if ($me isop $active) {
mode $active +c
}
}
on *
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
IALOG:opsop:sclick:13:{
if ($me isop $active) {
mode $active -m
}
}
on *
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
IALOG:opsop:sclick:12:{
if ($me isop $active) {
mode $active +m
}
}
on *
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
IALOG:opsop:sclick:11:{
if ($me isop $active) {
mode $active +MRc
}
}
on *
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
IALOG:opsop:sclick:10:{
if ($me isop $active) {
ban $active $snick($active,1)10 | kick $active $snick($active,1)
}
}
on *
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
IALOG:opsop:sclick:1:{
if ($me isop $active) {
mode $active +o $snick($active,1)
}
}
on *
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
IALOG:opsop:sclick:7:{
if ($me isop $active) {
mode $active -o $snick($active,1)
}
}
on *
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
IALOG:opsop:sclick:2:{
if ($me isop $active) {
mode $active +v $snick($active,1)
}
}
on *
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
IALOG:opsop:sclick:8:{
if ($me isop $active) {
mode $active -v $snick($active,1)
}
}
on *
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
IALOG:opsop:sclick:3:{
if ($me isop $active) {
kick $active $snick($active,1)
}
}
on *
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
IALOG:opsop:sclick:4:{
if ($me isop $active) {
ban $active $snick($active,1) 10
}
}
on *
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
IALOG:opsop:sclick:5:{
whois $snick($active,1)
}
on *
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
IALOG:opsop:sclick:6:{
ctcp $snick($active,1) ping
}
alias mdx { dll dll\mdx.dll $1- }
alias rebar { dll $shortfn(dll\rebar.dll) $$1- }
alias mdxdll { return $dll(DLL\mdx.dll,$1,$2-) }

bazı kodları değiştirerek incelttim..

LaureLL teşekkürler.. Emeğine sağlık

Benzer Konular
Konu	Konuyu Başlatan	Forum	Cevaplar	Son Mesaj
Geveze.ORG Global Operator/Super Operator Eğitimi Simülasyon Logu	Unknown	Eğitim Dünyası	1	24 Ağustos 2022 12:45
Red mIRC Toolbar	Rohit	mIRC Scripting Hazır Kodlar	7	15 Şubat 2013 16:50
mIRC Orjinal Toolbarını Düzenleme (mIRC Toolbar Komutunun Kullanımı)	McKruGer	mIRC Scripting Dersleri	22	17 Kasım 2011 20:21
Operator Toolbar Menü	StanteaR	mIRC Scripting Sorunları	18	30 Eylül 2009 16:54
mIRC ToolBar	SeRDaR406	mIRC Scripting Hazır Kodlar	13	10 Haziran 2007 23:32

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.