Botserv dialog/panel.

[WeiLSiDe]

Botserv komutları biraz karışık olduğu için en sık kullanılanları bi tabloda toplayım dedim.
Umarım işinize yarar..

.....................................................................................................................

Botserv Panel by WeiLSiDe
.....................................................................................................................

alias bots { dialog -m botss botss }
dialog botss {
  title "Botserv"
  size -1 -1 151 82
  option dbu
  box "Açıklama", 1, 86 0 64 63
  button "TaMaM", 3, 90 68 57 9, cancel
  box "", 6, 88 63 61 17
  edit "", 10, 9936 30 23 12, disable
  box "BotSerV", 12, 2 0 82 80
  box "", 2, 5 4 36 15
  button "assign", 7, 6 8 33 9
  box "", 8, 44 4 36 15
  button "unassign", 9, 45 8 33 9, default
  box "", 13, 44 17 36 15
  box "", 14, 5 17 36 15
  button "listele", 15, 6 21 33 9, default
  button "speak", 16, 45 21 33 9
  box "", 17, 44 30 36 15
  box "", 18, 5 30 36 15
  button "action", 21, 6 34 33 9, default
  button "Symbiosis", 22, 45 34 33 9, default
  box "", 23, 5 56 36 15
  box "", 24, 44 56 36 15
  button "Delete", 25, 6 60 33 9, default
  button "part", 26, 45 60 33 9, default
  text " -Botserv Komutlarını Kullanabilmek için Oper veya Admin seviyesinde yetkinizin bulunması gerekmektedir. Gerekmedikçe kullanılmamasını tavsiye ederim.", 4, 89 7 59 53
  box "", 5, 44 43 36 15
  box "", 11, 5 43 36 15
  button "join", 19, 45 47 33 9, default
  button "Fantasy", 20, 6 47 33 9, default
}
on *:dialog:botss:sclick:15: msg botserv botlist
on *:dialog:botss:sclick:7: msg botserv assign $chan($active) $$?="Botun gireceği #kanal:"
on *:dialog:botss:sclick:9: msg botserv unassign $chan($active) $$?="Botun cıkacağı #kanal:"
on *:dialog:botss:sclick:16: msg botserv say $chan($active) $$?="Kelime gir:"
on *:dialog:botss:sclick:21: msg botserv act $chan($active) $$?="kelime gir:"
on *:dialog:botss:sclick:22: msg botserv set $chan($active) symbiosis $$?="Açmak için "on" Kapamak için "off" yazın:"
on *:dialog:botss:sclick:20: msg botserv set $chan($active) fantasy $$?="Açmak için "on" Kapamak için "off" yazın:"
on *:dialog:botss:sclick:26: msg operserv raw :$$?="botun nicki" part $$?="Botun cıkacağı #kanal:"
on *:dialog:botss:sclick:19: msg operserv raw :$$?="botun nicki" join $$?="Botun gireceği #kanal:"
on *:dialog:botss:sclick:25: msg botserv bot del $$?="silinecek botun nicki"

Kullanımı /bots
Kolay gelsin...

[absolut]

Kanala bot girmiyordu ve cıkmıyordu. Böyle şimdi düzeldi. Botserv olmadigi için denemedim hepsini. Birde birşey merak ettim. Neden kendi yazdıgın şey ingilizce.

.....................................................................................................................

Botserv Panel by WeiLSiDe
.....................................................................................................................

alias bots { dialog -m botss botss }
dialog botss {
  title "Botserv"
  size -1 -1 151 82
  option dbu
  box "Açıklama", 1, 86 0 64 63
  button "TaMaM", 3, 90 68 57 9, cancel
  box "", 6, 88 63 61 17
  edit "", 10, 9936 30 23 12, disable
  box "BotSerV", 12, 2 0 82 80
  box "", 2, 5 4 36 15
  button "assign", 7, 6 8 33 9
  box "", 8, 44 4 36 15
  button "unassign", 9, 45 8 33 9, default
  box "", 13, 44 17 36 15
  box "", 14, 5 17 36 15
  button "listele", 15, 6 21 33 9, default
  button "speak", 16, 45 21 33 9
  box "", 17, 44 30 36 15
  box "", 18, 5 30 36 15
  button "action", 21, 6 34 33 9, default
  button "Symbiosis", 22, 45 34 33 9, default
  box "", 23, 5 56 36 15
  box "", 24, 44 56 36 15
  button "Delete", 25, 6 60 33 9, default
  button "part", 26, 45 60 33 9, default
  text " -Botserv Komutlarını Kullanabilmek için Oper veya Admin seviyesinde yetkinizin bulunması gerekmektedir. Gerekmedikçe kullanılmamasını tavsiye ederim.", 4, 89 7 59 53
  box "", 5, 44 43 36 15
  box "", 11, 5 43 36 15
  button "join", 19, 45 47 33 9, default
  button "Fantasy", 20, 6 47 33 9, default
}
on *:dialog:botss:sclick:15: msg botserv botlist
on *:dialog:botss:sclick:7: msg botserv assign $chan($active) $$?="Botun gireceği #kanal:"
on *:dialog:botss:sclick:9: msg botserv unassign $chan($active) $$?="Botun cıkacağı #kanal:"
on *:dialog:botss:sclick:16: msg botserv say $chan($active) $$?="Kelime gir:"
on *:dialog:botss:sclick:21: msg botserv act $chan($active) $$?="kelime gir:"
on *:dialog:botss:sclick:22: msg botserv set $chan($active) symbiosis $$?="Açmak için "on" Kapamak için "off" yazın:"
on *:dialog:botss:sclick:20: msg botserv set $chan($active) fantasy $$?="Açmak için "on" Kapamak için "off" yazın:"
on *:dialog:botss:sclick:26: msg operserv raw : $+ $$?="botun nicki" part $$?="Botun cıkacağı #kanal:"
on *:dialog:botss:sclick:19: msg operserv raw : $+ $$?="botun nicki" join $$?="Botun gireceği #kanal:"
on *:dialog:botss:sclick:25: msg botserv bot del $$?="silinecek botun nicki"

[WeiLSiDe]

Profesyönel değilim hatalarım olabilir kabulumdur. Ancak denedim sorun cıkmamıştı. Yinede düzelttiğiniz için tşk ederim.
Ayrıca demişsin ki neden ingilizce. Çünki ben assign komutunu assign olarak biliyorum türkçe bile olsa anlayan böyle anlıyor. Kendimden bildiğim için bu şekilde. Ancak kasdettiğin başka bi yerde çaldın felan gibi bişey kasdediyorsan bu kesinlikle söz konusu değildir. Şu var bazı komutları ezbere bilmiyorum bi kaç yerden faydalandım. Umarım anlatabilmişimdir.

[absolut]

Yok est. çaldi falan demek istemedim düşünmedim bile. DELETE falan yazılari için demiştim ben.

iyi çalişmalar.