Admin Türkçe mIRC indir - Resmi mIRC indirme Sitesi

Oper/Admin Paneli

03 Nisan 2019 • 01:19 OxiGeN Hazır Kodlar

####################
menu menubar { 
  Admin Paneli:/Adminmenu
} 
####################
## Admin Paneli:Adminmenu
alias Adminmenu { dialog -m Adminmenu Adminmenu }
dialog Adminmenu {
  title "Admin Paneli"
  size -1 -1 247 223
  option dbu
  button "« « KAPAT » »", 10, 3 208 242 13, flat ok
  list 1, 2 10 71 139, size
  text "Nickin üstünü Tıklayın ve işlem yapın", 8, 5 153 122 8, center
  button "Gline", 2, 2 164 64 13, flat
  button "Shun", 4, 69 164 63 13, flat
  button "Kill", 3, 135 164 58 13, flat
  button "Tüm Kanaldan Çıkar", 5, 2 180 64 12, flat
  button "Tüm Kanallara Al", 6, 69 180 63 12, flat
  button "Ban (+b)", 7, 194 180 51 12, flat
  text "Tüm Nickler", 11, 3 2 69 8, center
  list 12, 73 10 56 139, size
  text "Ident", 13, 73 2 56 8, center
  list 14, 129 10 65 139, size
  text " ip", 15, 130 2 65 8, center
  text "", 16, 137 153 53 7, center
  box "", 17, 2 148 129 14
  box "", 18, 135 148 58 14
  button "Değiştir", 20, 135 195 58 12, flat
  edit "", 19, 69 195 63 10, multi autohs
  text "User Nicki değistir :", 21, 4 196 55 8, center
  box "", 22, 3 192 61 14
  text " Global Odalar", 23, 194 2 50 8, center
  list 24, 194 10 51 66, size
  text " Yönetici odaları", 25, 194 76 53 8, center
  list 26, 194 84 51 40, size
  button " Sajoin", 27, 194 151 51 12, flat
  button "Sapart", 28, 194 165 51 12, flat
  button "Bütün +b Kaldır", 29, 135 180 58 12, flat
  button "Alban (+b)", 30, 194 195 51 12, flat
  list 31, 194 125 51 24, size
  box "", 9, 392 89 0 88
}


;alias sonuc { noop $tip(b, %kn_, Kanalından4 $iif(%k-nick,%k-nick, $iif(%bnick, %bnick, Kullanıcı)) Ban Yedi,9999999999999) }
;alias knk { .timerbnb 1 2 sonuc } 
on *:ban:#:{ unset %k-nick | set -e %bnick $bnick | set -e %kn_ # } 
on *:kick:#:{ set -e %k-nick $knick }
on *:dialog:Adminmenu:sclick:26:{
  if $did(Adminmenu,26).sel { did -u Adminmenu 24 | did -u Adminmenu 31 }
}
on *:dialog:Adminmenu:sclick:24:{ 
  if $did(Adminmenu,24).sel { did -u Adminmenu 26 | did -u Adminmenu 31  }
}
on *:dialog:Adminmenu:sclick:31:{ 
  if $did(Adminmenu,31).sel { did -u Adminmenu 26 | did -u Adminmenu 24 }
}
on *:dialog:Adminmenu:sclick:30:{ albans $did(1).seltext  }
alias albans {
  var %l_ 1, %l- $did(Adminmenu,24).lines
  while %l_ &lt;= %l- { samode $did(Adminmenu,24,%l_).text +b $1 | inc %l_ }
}
alias -l ksec { 
  if $did(24).sel { return $did(24).seltext }
  elseif $did(26).sel { return $did(26).seltext }
  elseif $did(31).sel { return $did(31).seltext }
}
on *:dialog:Adminmenu:sclick:29:{ .bn #Radyo #Kelime #isLam #Test #Bilgi #Yarisma #SaNCaK #Admin #Services #Kontrol #Help #Opers #Dj }
alias bn {
  var %a 1 ,%b $numtok($1-,32)
  while %a &lt;= %b { 
    var %c 1
    while %c &lt;= $ibl($gettok($1-,%a,32),0)  {
    samode $gettok($1-,%a,32) -b $ibl($gettok($1-,%a,32),%c) | inc %c } 
    inc %a 
  } 
}
on *:dialog:Adminmenu:sclick:27:{ 
  if $did(1).sel &amp;&amp; $did(24).sel || $did(26).sel || $did(31).sel { sajoin $did(1).seltext $ksec }  
}
on *:dialog:Adminmenu:sclick:28:{
  if $did(1).sel &amp;&amp; $did(24).sel || $did(26).sel || $did(31).sel { sapart $did(1).seltext $ksec }  
}
on *:dialog:Adminmenu:sclick:1: { did -c $dname 1 $did(1).sel | did -c $dname 12 $did(1).sel | did -c $dname 14 $did(1).sel }
on *:dialog:Adminmenu:dclick:1: { !query $$did(1).seltext }
on *:dialog:Adminmenu:dclick:24: { join $$did(24).seltext }
on *:dialog:Adminmenu:dclick:26: { join $$did(26).seltext }
on *:dialog:Adminmenu:dclick:31: { join $$did(31).seltext }
on *:dialog:Adminmenu:sclick:12: { did -c $dname 12 $did(12).sel | did -c $dname 14 $did(12).sel | did -c $dname 1 $did(12).sel }
on *:dialog:Adminmenu:sclick:14: { did -c $dname 1 $did(14).sel | did -c $dname 14 $did(14).sel | did -c $dname 12 $did(14).sel }

on *:dialog:Adminmenu:*:*: {
  if $devent == init { 
    set %Adminmenu on | who +I 
    mdx MarkDialog $dname
    mdx SetDialog $dname bgcolor $rgb(237,241,219)
    mdx SetFont $dname 1,2,3,4,5,6,7,8,10,11,12,13,14,15,16,17,18,19,20,21,22,23,24,25,26,27,28,29,30,31,32,33,33,34 +b Turkish 15 950 Tahoma
    mdx SetColor $dname 1,2,3,4,5,6,7,8,10,11,12,13,14,15,16,17,18,20,21,22,23,24,25,26,27,28,29,30,31,32,33,33,34 textbg $rgb(237,241,219)
    mdx SetColor $dname 1,2,3,4,5,6,7,8,10,11,12,13,14,15,16,17,18,20,21,22,23,24,25,26,27,28,29,30,31,32,33,33,34 background $rgb(237,241,219)
    mdx SetColor $dname 1,2,3,4,5,6,7,8,10,11,12,13,14,15,16,17,18,19,20,21 text $rgb(0,0,0)
    mdx SetColor $dname 11,13,15,16,8,21,23,25l text $rgb(199,92,2)
    did -a $dname 24 #Radyo
    did -a $dname 24 #Sohbet
    did -a $dname 24 #Chat
    did -a $dname 24 #Felsefe
    did -a $dname 24 #İzmir
    did -a $dname 24 #İstanbul
    did -a $dname 24 #SaNCaK
    did -a $dname 26 #Master
    did -a $dname 26 #Xline
    did -a $dname 26 #Admin
    did -a $dname 26 #OperSohbet
    did -a $dname 31 #Operhelp
    did -a $dname 31 #Help
  }
  if $devent == sclick &amp;&amp; $status == connected {
    if $did == 2 { gzline $did(1).seltext 8,115Sunucumuzda 4Reklam15/ 4Kufur15/ 4Saldiri 15Tespit Edilmistir4.15 Kosullara Gore gerekli Mudahalelerde Bulunma Uyeyi Odadan Men etme Kanali veya Rumuzu Kapatma Yasaklama ve Uyelik iptali Haklarina ve Yetkilerine Sahiptir. 4Lutfen 15Sohbet kurallarina Uyunuz. } 
    if $did == 3 { kill $did(1).seltext Kill }
    if $did == 20 { /operserv badnick $did(1).seltext } 
    if $did == 30 { cs unban $did(24).seltext,$did(26).seltext$did(31).seltext all  }
    if  $did == 4 { shun $did(1).seltext 8,115Sunucumuzda 4Reklam15/ 4Kufur15/ 4Saldiri 15Tespit Edilmistir4.15 Kosullara Gore gerekli Mudahalelerde Bulunma Uyeyi Odadan Men etme Kanali veya Rumuzu Kapatma Yasaklama ve Uyelik iptali Haklarina ve Yetkilerine Sahiptir. 4Lutfen 15Sohbet kurallarina Uyunuz. } 
    if $did == 5 { 
      set %offlan $did(Adminmenu,1).seltext
      kapats
    }
    if $did == 6 { 
      set %offlan $did(Adminmenu,1).seltext
      yetergir
    }
    if $did == 7 { 
      if $did(24).sel { ksecb $did(Adminmenu,24).seltext } 
      elseif $did(26).sel { ksecb $did(Adminmenu,26).seltext }
      elseif $did(31).sel { ksecb $did(Adminmenu,31).seltext }
      else { ksecb $active }
    }
  }
  if $devent == close { 
    write -c wholist.txt 
    unset %Adminmenu
  }
}

alias ksecb { os mode $1 +b $did(Adminmenu,1).seltext }


raw 352:*: { 
  if (%Adminmenu == on) {
    if ($8 == 1) { halt }
    if ($6 == S-Bot) { halt }
    if ($3 == SekerShell) { halt }
    if (*B* iswm $7) { halt }
    write wholist.txt $6
    did -a Adminmenu 16 Toplam = $lines(wholist.txt) Kişi
    did -a Adminmenu 1 $6
    did -a Adminmenu 12 $3
    did -a Adminmenu 14 $4  
    .timer 1 2 unset %Adminmenu
    /halt
  }
}
raw 315:*: { /halt }

alias yetergir {
  set %veri4 1
  set %veri5 $chan(0)
  while %veri4 &lt;= %veri5 {
    if $regex($chan(%veri4),/operhelp|opers|log|services|x|dj|op|admin|help|kontrol/i) { halt }
    sajoin %offlan $chan(%veri4) 
    inc %veri4 
  }
}
alias kapats {
  set %kapats1 1
  set %kapats2 $chan(0)
  while %kapats1 &lt;= %kapats2 {
    sapart %offlan $chan(%kapats1) 
    inc %kapats1 
  }
}

100

101

102

103

104

105

106

107

108

109

110

111

112

113

114

115

116

117

118

119

120

121

122

123

124

125

126

127

128

129

130

131

132

133

134

135

136

137

138

139

140

141

142

143

144

145

146

147

148

149

150

151

152

153

154

155

156

157

158

159

160

161

162

163

164

165

166

167

168

169

170

171

172

173

174

175

176

177

178

179

180

####################

menu menubar {

Admin Paneli:/Adminmenu

}

####################

## Admin Paneli:Adminmenu

alias Adminmenu { dialog -m Adminmenu Adminmenu }

dialog Adminmenu {

title "Admin Paneli"

size -1 -1 247 223

option dbu

button "« « KAPAT » »", 10, 3 208 242 13, flat ok

list 1, 2 10 71 139, size

text "Nickin üstünü Tıklayın ve işlem yapın", 8, 5 153 122 8, center

button "Gline", 2, 2 164 64 13, flat

button "Shun", 4, 69 164 63 13, flat

button "Kill", 3, 135 164 58 13, flat

button "Tüm Kanaldan Çıkar", 5, 2 180 64 12, flat

button "Tüm Kanallara Al", 6, 69 180 63 12, flat

button "Ban (+b)", 7, 194 180 51 12, flat

text "Tüm Nickler", 11, 3 2 69 8, center

list 12, 73 10 56 139, size

text "Ident", 13, 73 2 56 8, center

list 14, 129 10 65 139, size

text " ip", 15, 130 2 65 8, center

text "", 16, 137 153 53 7, center

box "", 17, 2 148 129 14

box "", 18, 135 148 58 14

button "Değiştir", 20, 135 195 58 12, flat

edit "", 19, 69 195 63 10, multi autohs

text "User Nicki değistir :", 21, 4 196 55 8, center

box "", 22, 3 192 61 14

text " Global Odalar", 23, 194 2 50 8, center

list 24, 194 10 51 66, size

text " Yönetici odaları", 25, 194 76 53 8, center

list 26, 194 84 51 40, size

button " Sajoin", 27, 194 151 51 12, flat

button "Sapart", 28, 194 165 51 12, flat

button "Bütün +b Kaldır", 29, 135 180 58 12, flat

button "Alban (+b)", 30, 194 195 51 12, flat

list 31, 194 125 51 24, size

box "", 9, 392 89 0 88

}

;alias sonuc { noop $tip(b, %kn_, Kanalından4 $iif(%k-nick,%k-nick, $iif(%bnick, %bnick, Kullanıcı)) Ban Yedi,9999999999999) }

;alias knk { .timerbnb 1 2 sonuc }

on *:ban:#:{ unset %k-nick | set -e %bnick $bnick | set -e %kn_ # }

on *:kick:#:{ set -e %k-nick $knick }

on *:dialog:Adminmenu:sclick:26:{

if $did(Adminmenu,26).sel { did -u Adminmenu 24 | did -u Adminmenu 31 }

}

on *:dialog:Adminmenu:sclick:24:{

if $did(Adminmenu,24).sel { did -u Adminmenu 26 | did -u Adminmenu 31 }

}

on *:dialog:Adminmenu:sclick:31:{

if $did(Adminmenu,31).sel { did -u Adminmenu 26 | did -u Adminmenu 24 }

}

on *:dialog:Adminmenu:sclick:30:{ albans $did(1).seltext }

alias albans {

var %l_ 1, %l- $did(Adminmenu,24).lines

while %l_ <= %l- { samode $did(Adminmenu,24,%l_).text +b $1 | inc %l_ }

}

alias -l ksec {

if $did(24).sel { return $did(24).seltext }

elseif $did(26).sel { return $did(26).seltext }

elseif $did(31).sel { return $did(31).seltext }

}

on *:dialog:Adminmenu:sclick:29:{ .bn #Radyo #Kelime #isLam #Test #Bilgi #Yarisma #SaNCaK #Admin #Services #Kontrol #Help #Opers #Dj }

alias bn {

var %a 1 ,%b $numtok($1-,32)

while %a <= %b {

var %c 1

while %c <= $ibl($gettok($1-,%a,32),0) {

samode $gettok($1-,%a,32) -b $ibl($gettok($1-,%a,32),%c) | inc %c }

inc %a

}

on *:dialog:Adminmenu:sclick:27:{

if $did(1).sel && $did(24).sel || $did(26).sel || $did(31).sel { sajoin $did(1).seltext $ksec }

}

on *:dialog:Adminmenu:sclick:28:{

if $did(1).sel && $did(24).sel || $did(26).sel || $did(31).sel { sapart $did(1).seltext $ksec }

}

on *:dialog:Adminmenu:sclick:1: { did -c $dname 1 $did(1).sel | did -c $dname 12 $did(1).sel | did -c $dname 14 $did(1).sel }

on *:dialog:Adminmenu:dclick:1: { !query $$did(1).seltext }

on *:dialog:Adminmenu:dclick:24: { join $$did(24).seltext }

on *:dialog:Adminmenu:dclick:26: { join $$did(26).seltext }

on *:dialog:Adminmenu:dclick:31: { join $$did(31).seltext }

on *:dialog:Adminmenu:sclick:12: { did -c $dname 12 $did(12).sel | did -c $dname 14 $did(12).sel | did -c $dname 1 $did(12).sel }

on *:dialog:Adminmenu:sclick:14: { did -c $dname 1 $did(14).sel | did -c $dname 14 $did(14).sel | did -c $dname 12 $did(14).sel }

on *:dialog:Adminmenu:*:*: {

if $devent == init {

set %Adminmenu on | who +I

mdx MarkDialog $dname

mdx SetDialog $dname bgcolor $rgb(237,241,219)

mdx SetFont $dname 1,2,3,4,5,6,7,8,10,11,12,13,14,15,16,17,18,19,20,21,22,23,24,25,26,27,28,29,30,31,32,33,33,34 +b Turkish 15 950 Tahoma

mdx SetColor $dname 1,2,3,4,5,6,7,8,10,11,12,13,14,15,16,17,18,20,21,22,23,24,25,26,27,28,29,30,31,32,33,33,34 textbg $rgb(237,241,219)

mdx SetColor $dname 1,2,3,4,5,6,7,8,10,11,12,13,14,15,16,17,18,20,21,22,23,24,25,26,27,28,29,30,31,32,33,33,34 background $rgb(237,241,219)

mdx SetColor $dname 1,2,3,4,5,6,7,8,10,11,12,13,14,15,16,17,18,19,20,21 text $rgb(0,0,0)

mdx SetColor $dname 11,13,15,16,8,21,23,25l text $rgb(199,92,2)

did -a $dname 24 #Radyo

did -a $dname 24 #Sohbet

did -a $dname 24 #Chat

did -a $dname 24 #Felsefe

did -a $dname 24 #İzmir

did -a $dname 24 #İstanbul

did -a $dname 24 #SaNCaK

did -a $dname 26 #Master

did -a $dname 26 #Xline

did -a $dname 26 #Admin

did -a $dname 26 #OperSohbet

did -a $dname 31 #Operhelp

did -a $dname 31 #Help

}

if $devent == sclick && $status == connected {

if $did == 2 { gzline $did(1).seltext 8,115Sunucumuzda 4Reklam15/ 4Kufur15/ 4Saldiri 15Tespit Edilmistir4.15 Kosullara Gore gerekli Mudahalelerde Bulunma Uyeyi Odadan Men etme Kanali veya Rumuzu Kapatma Yasaklama ve Uyelik iptali Haklarina ve Yetkilerine Sahiptir. 4Lutfen 15Sohbet kurallarina Uyunuz. }

if $did == 3 { kill $did(1).seltext Kill }

if $did == 20 { /operserv badnick $did(1).seltext }

if $did == 30 { cs unban $did(24).seltext,$did(26).seltext$did(31).seltext all }

if $did == 4 { shun $did(1).seltext 8,115Sunucumuzda 4Reklam15/ 4Kufur15/ 4Saldiri 15Tespit Edilmistir4.15 Kosullara Gore gerekli Mudahalelerde Bulunma Uyeyi Odadan Men etme Kanali veya Rumuzu Kapatma Yasaklama ve Uyelik iptali Haklarina ve Yetkilerine Sahiptir. 4Lutfen 15Sohbet kurallarina Uyunuz. }

if $did == 5 {

set %offlan $did(Adminmenu,1).seltext

kapats

}

if $did == 6 {

set %offlan $did(Adminmenu,1).seltext

yetergir

}

if $did == 7 {

if $did(24).sel { ksecb $did(Adminmenu,24).seltext }

elseif $did(26).sel { ksecb $did(Adminmenu,26).seltext }

elseif $did(31).sel { ksecb $did(Adminmenu,31).seltext }

else { ksecb $active }

}

if $devent == close {

write -c wholist.txt

unset %Adminmenu

}

alias ksecb { os mode $1 +b $did(Adminmenu,1).seltext }

raw 352:*: {

if (%Adminmenu == on) {

if ($8 == 1) { halt }

if ($6 == S-Bot) { halt }

if ($3 == SekerShell) { halt }

if (*B* iswm $7) { halt }

write wholist.txt $6

did -a Adminmenu 16 Toplam = $lines(wholist.txt) Kişi

did -a Adminmenu 1 $6

did -a Adminmenu 12 $3

did -a Adminmenu 14 $4

.timer 1 2 unset %Adminmenu

/halt

}

raw 315:*: { /halt }

alias yetergir {

set %veri4 1

set %veri5 $chan(0)

while %veri4 <= %veri5 {

if $regex($chan(%veri4),/operhelp|opers|log|services|x|dj|op|admin|help|kontrol/i) { halt }

sajoin %offlan $chan(%veri4)

inc %veri4

}

alias kapats {

set %kapats1 1

set %kapats2 $chan(0)

while %kapats1 <= %kapats2 {

sapart %offlan $chan(%kapats1)

inc %kapats1

}

» Devamını Oku

mIRC Oper/admin ekleme dialog

09 Kasım 2015 • 11:00 OxiGeN Addonlar, Hazır Kodlar, Türkçe mIRC

;Yapımcı: L4roXyL dialog oa { title “Oper ekleme.” size -1 -1 240 129 option dbu text “Yapımcı: L4roXyL”, 1, 65 4 107 8, center text “Oper nick:”, 3, 5 47 31 8 edit “”, 4, 39 46 46 10, autohs text “Oper pass:”, 5, 5 59 31 8 edit “”, 6, 39 58 46 10, autohs text “Swhois:”, 7, 5 […]

» Devamını Oku

Yorum yaz Admin, dialog, ekleme, hazır kodlar, mirc, oper, scripting, turkce mırc

mIRC Oper/Admin Addon

08 Ekim 2015 • 15:24 OxiGeN Addonlar, Hazır Kodlar, Türkçe mIRC

Kodun KULLANIMI: sadece /equ yazmak yeterlidir. alias equ { /dialog -m start start } dialog start { title “equaL system :)” size -1 -1 467 274 option pixels box “”, 11, 19 13 430 256 text “mIRCTR Oper KORUMA / Güvenlik”, 1, 136 3 167 20 edit “”, 3, 125 37 186 20, center button “Nick zline liste ekle”, 8, […]

» Devamını Oku

Yorum yaz addon, Admin, hazır kodlar, mirc, oper, scripting, turkce mırc

Helper,Oper,Admin Ve +Whz Flagları Acık olan Her Kullanıcıya Özel Whois Sistemi

29 Eylül 2015 • 13:08 OxiGeN Hazır Kodlar

on *:snotice:*whois*on*you*: {
var %> = $+(%,op:,$2)
inc -eu60 $(%>,1)
if ($(%>,2) == 1) {
msg $2 7ismi1:12
msg $2 7Yası1:12
msg $2 7Sehri1:12
msg $2 7Burcu1:12
msg $2 7Özellikleri1:12
msg $2 7Görevleri:1#12
msg $2 7Çalıstığı Sunucu ve Portu1:12 $server & 5 $port
.msg $gettok(%>,2,58) 7Hos Sohbetler Dilerim Sevgili; 4 $2 | .inc %whoissayac | .msg $gettok(%>,2,58) 7Bana Whois Çeken 5 %whoissayac 7Kişisiniz.
halt 
}
}

on *:snotice:*whois*on*you*: {

var %> = $+(%,op:,$2)

inc -eu60 $(%>,1)

if ($(%>,2) == 1) {

msg $2 7ismi1:12

msg $2 7Yası1:12

msg $2 7Sehri1:12

msg $2 7Burcu1:12

msg $2 7Özellikleri1:12

msg $2 7Görevleri:1#12

msg $2 7Çalıstığı Sunucu ve Portu1:12 $server & 5 $port

.msg $gettok(%>,2,58) 7Hos Sohbetler Dilerim Sevgili; 4 $2 | .inc %whoissayac | .msg $gettok(%>,2,58) 7Bana Whois Çeken 5 %whoissayac 7Kişisiniz.

halt

}

» Devamını Oku

Yorum yaz Admin, hazır kodlar, helper, mirc, mircindir, oper, scripting, sistem, whois

mIRC Oper – Admin Diyalog

28 Eylül 2015 • 13:43 OxiGeN Addonlar, Hazır Kodlar, Türkçe mIRC

Tüm OS komutları (flag erişimlerine göre kısıtlamalı), yüksek öncelikli NS – CS komutları (forbid, suspend vb.) ve client komutları vardır. Ayrıca ban/yasaklama kaldırma seçenekleri de mevcuttur. Sağ klik menüsünde eğer ki en az +o flagınız varsa aktif olan seçenek ile erişim yapabilirsiniz. menu status,query,channel { Oper/Admin Dailog:dialog $iif($dialog(oa_dia),-v,-m) oa_dia oa_dia } dialog oa_dia { title “Oper – Admin İşlemleri” size […]

» Devamını Oku

Yorum yaz Admin, Diyalog, hazır kodlar, mirc, mircindir, oper, scripting, türkcemirc

Admin Menü Diyaloğu

07 Nisan 2013 • 17:02 dELi Hazır Kodlar, IRC Komutları

menu status,menubar,channel {
.• Admin Menü:/dialog -m HelpOper HelpOper
}
dialog HelpOper {
title “HelpOper Admin Menü”
size -1 -1 160 290
option dbu
box "Admin Mod",101, 5 7 146 33
box "NickServ", 102, 5 44 146 33
box "GetPass", 103, 5 81 50 33
box "List", 104,60 81 91 33
box "Block",105,5 117 146 33
box "SqLine", 106, 5 154 47 47
box "AkiLL", 107, 60 154 47 47
box "X-Line",108, 115 154 36 47
box "X-Line Ban Aç",109,5 203 146 20
box "GeneL",110, 5 225 146 45
button "Oper Gir", 2, 11 15 37 10
button "Operden Çık", 3,11 27 37 10
button "Oper Ekle", 4,55 15 37 10
button "Oper Sil", 5,55 27 37 10
button "Admin ekle", 6,99 15 43 10
button "Admin Sil", 7,99 27 43 10
button "Forbid", 8, 11 52 37 10
button "Drop", 9, 11 64 37 10
button "Suspend", 10, 55 52 37 10
button "UnSuspend", 11,55 64 37 10
button "NoExpire", 12,99 52 37 10
button "UnNoExpire", 13,99 64 37 10
button "Getpass Nick",14,11 89 40 10
button "Getpass Kanal",15,11 100 40 10
button "Admin",16,63 89 35 10
button "Oper",17,63 100 35 10
button "Kanal",18,101 89 35 10
button "Nick",19,101 100 35 10
button "Spam Ekle",20,11 125 35 10
button "Spam Sil",21,11 136 35 10
button "Block Ekle",22,55 125 35 10
button "Block Sil",23,55 136 35 10
button "SpamList",24,99 125 35 10
button "Restart",25,99 136 35 10
button "SqLine Ekle",26,11 162 35 10
button "SqLine Sil",27,11 174 35 10
button "SqLine List",28,11 186 35 10
button "Akill Ekle",29,65 162 35 10
button "Akill Sil",30,65 174 35 10
button "Akill List",31,65 186 35 10
button "Z-Line",32,119 162 28 10
button "G-Line",33,119 174 28 10
button "K-Line",34,119 186 28 10
button "IP Adresindeki Bütün X-LINE Leri kaLdır",35,11 209 138 11
button "Global At",36,11 233 38 10
button "AllSend",37,11 245 38 10
button "Sajoin",38,11 257 38 10
button "Samode",39,58 233 38 10
button "Getauth",40,58 245 38 10
button "AkiLLChan",41,58 257 38 10
button "Kanal Suspend",42,100 233 44 10
button "Knl Unsuspend",43,100 245 44 10
button "Bilgi / Stats ",44,100 257 44 10
button "Kapat",45,11 275 44 10,ok
}

on *:dialog:heLpOper:*:*: {
if ($devent == sclick) {
if ($did == 2) { OperServ $$?=" Nickiniz " $$?*="Oper Şifreniz ?" }
if ($did == 3) { mode $me -o }
if ($did == 4) { OperServ Oper Add $$?=" Nick " }
if ($did == 5) { OperServ Oper Del $$?=" Nick " }
if ($did == 6) { OperServ admin add $$?=" Nick " }
if ($did == 7) { OperServ admin Del $$?=" Nick " }
if ($did == 8) { NickServ Forbid $$?=" Nick " }
if ($did == 9) { NickServ dropnick $$?=" Nick " }
if ($did == 10) { NickServ Suspend +15d $$?=" Nick " $$?=" Sebep" }
if ($did == 11) { NickServ UnSuspend $$?=" Nick " }
if ($did == 12) { NickServ Set $$?=" Nick " Noexpire on }
if ($did == 13) { NickServ set $$?=" Nick " Noexpire off }
if ($did == 14) { NickServ Getpass $$?=" Nick " }
if ($did == 15) { Chanserv Getpass #$$?=" Kanal ismini işaret koymadan yazın " }
if ($did == 16) { OperServ admin List }
if ($did == 17) { OperServ Oper List }
if ($did == 18) { List }
if ($did == 19) { NickServ List * }
if ($did == 20) { spamfilter add cpNn gzline +15d $$?="Sebep ?" ^ $+ $$?="Eklenecek SpamFilter ?" $+ $ }
if ($did == 11) { spamfilter del cpNn gzline $$?="Silinecek SpamFilter ?" }
if ($did == 22) { spamfilter add cpNn block +15d $$?="Sebep ?" ^ $+ $$?="Block Eklenecek Kelime ?" $+ $ }
if ($did == 23) { spamfilter del cpNn block $$?="Block SAilinecek Kelime ?" }
if ($did == 24) { operserv spamfilter }
if ($did == 25) { operserv restart }
if ($did == 26) { operserv sqLine add $$?=" Nick " }
if ($did == 27) { operserv sqLine deL $$?=" Nick " }
if ($did == 28) { operserv sqLine List }
if ($did == 29) { operserv akill add 15d $$?="@IP Adresi veya nick ?" $$?="Sebep ?" }
if ($did == 30) { operserv akiLL del $$?="@IP Adresi veya nick ?" }
if ($did == 31) { operserv akiLL List }
if ($did == 32) { zLine $$?="@IP Adresi veya Nick ?" $$?="Sebep ?" }
if ($did == 33) { gLine $$?="@IP Adresi veya Nick ?" $$?="Sebep ?" }
if ($did == 34) { kLine $$?="@IP Adresi veya nick ?" $$?="Sebep ?" }
if ($did == 35) { ac }
if ($did == 36) { os gLobaL $$?="mesajınız ?" }
if ($did == 37) { allsend users private global $$?="Bir Nick Seçin" $$?="Mesajınız" }
if ($did == 38) { sajoin $$?="Bir Nick Seçin" #$$?="Girmesini istediğiniz kanal" }
if ($did == 39) { samode #$$?="Kanal ismi" $$?="Mod +/- q a o h v b i e I " $$?="Nick" }
if ($did == 40) { ns getauth $$?=" Nick " }
if ($did == 41) { os akillchan +1d #$$?="Kanal (# Koymadan)" $$?="Sebep ?" }
if ($did == 42) { cs suspend +15d #$$?="Kanal (# Koymadan)" $$?="Sebep ?" }
if ($did == 43) { cs unsuspend #$$?="Kanal (# Koymadan)" }
if ($did == 44) { Stats $$?="Bilgi? c,n,o,k,m vs vs" }

}
}

100

101

102

103

104

105

106

107

108

109

110

111

menu status,menubar,channel {

.• Admin Menü:/dialog -m HelpOper HelpOper

}

dialog HelpOper {

title “HelpOper Admin Menü”

size -1 -1 160 290

option dbu

box "Admin Mod",101, 5 7 146 33

box "NickServ", 102, 5 44 146 33

box "GetPass", 103, 5 81 50 33

box "List", 104,60 81 91 33

box "Block",105,5 117 146 33

box "SqLine", 106, 5 154 47 47

box "AkiLL", 107, 60 154 47 47

box "X-Line",108, 115 154 36 47

box "X-Line Ban Aç",109,5 203 146 20

box "GeneL",110, 5 225 146 45

button "Oper Gir", 2, 11 15 37 10

button "Operden Çık", 3,11 27 37 10

button "Oper Ekle", 4,55 15 37 10

button "Oper Sil", 5,55 27 37 10

button "Admin ekle", 6,99 15 43 10

button "Admin Sil", 7,99 27 43 10

button "Forbid", 8, 11 52 37 10

button "Drop", 9, 11 64 37 10

button "Suspend", 10, 55 52 37 10

button "UnSuspend", 11,55 64 37 10

button "NoExpire", 12,99 52 37 10

button "UnNoExpire", 13,99 64 37 10

button "Getpass Nick",14,11 89 40 10

button "Getpass Kanal",15,11 100 40 10

button "Admin",16,63 89 35 10

button "Oper",17,63 100 35 10

button "Kanal",18,101 89 35 10

button "Nick",19,101 100 35 10

button "Spam Ekle",20,11 125 35 10

button "Spam Sil",21,11 136 35 10

button "Block Ekle",22,55 125 35 10

button "Block Sil",23,55 136 35 10

button "SpamList",24,99 125 35 10

button "Restart",25,99 136 35 10

button "SqLine Ekle",26,11 162 35 10

button "SqLine Sil",27,11 174 35 10

button "SqLine List",28,11 186 35 10

button "Akill Ekle",29,65 162 35 10

button "Akill Sil",30,65 174 35 10

button "Akill List",31,65 186 35 10

button "Z-Line",32,119 162 28 10

button "G-Line",33,119 174 28 10

button "K-Line",34,119 186 28 10

button "IP Adresindeki Bütün X-LINE Leri kaLdır",35,11 209 138 11

button "Global At",36,11 233 38 10

button "AllSend",37,11 245 38 10

button "Sajoin",38,11 257 38 10

button "Samode",39,58 233 38 10

button "Getauth",40,58 245 38 10

button "AkiLLChan",41,58 257 38 10

button "Kanal Suspend",42,100 233 44 10

button "Knl Unsuspend",43,100 245 44 10

button "Bilgi / Stats ",44,100 257 44 10

button "Kapat",45,11 275 44 10,ok

}

on *:dialog:heLpOper:*:*: {

if ($devent == sclick) {

if ($did == 2) { OperServ $$?=" Nickiniz " $$?*="Oper Şifreniz ?" }

if ($did == 3) { mode $me -o }

if ($did == 4) { OperServ Oper Add $$?=" Nick " }

if ($did == 5) { OperServ Oper Del $$?=" Nick " }

if ($did == 6) { OperServ admin add $$?=" Nick " }

if ($did == 7) { OperServ admin Del $$?=" Nick " }

if ($did == 8) { NickServ Forbid $$?=" Nick " }

if ($did == 9) { NickServ dropnick $$?=" Nick " }

if ($did == 10) { NickServ Suspend +15d $$?=" Nick " $$?=" Sebep" }

if ($did == 11) { NickServ UnSuspend $$?=" Nick " }

if ($did == 12) { NickServ Set $$?=" Nick " Noexpire on }

if ($did == 13) { NickServ set $$?=" Nick " Noexpire off }

if ($did == 14) { NickServ Getpass $$?=" Nick " }

if ($did == 15) { Chanserv Getpass #$$?=" Kanal ismini işaret koymadan yazın " }

if ($did == 16) { OperServ admin List }

if ($did == 17) { OperServ Oper List }

if ($did == 18) { List }

if ($did == 19) { NickServ List * }

if ($did == 20) { spamfilter add cpNn gzline +15d $$?="Sebep ?" ^ $+ $$?="Eklenecek SpamFilter ?" $+ $ }

if ($did == 11) { spamfilter del cpNn gzline $$?="Silinecek SpamFilter ?" }

if ($did == 22) { spamfilter add cpNn block +15d $$?="Sebep ?" ^ $+ $$?="Block Eklenecek Kelime ?" $+ $ }

if ($did == 23) { spamfilter del cpNn block $$?="Block SAilinecek Kelime ?" }

if ($did == 24) { operserv spamfilter }

if ($did == 25) { operserv restart }

if ($did == 26) { operserv sqLine add $$?=" Nick " }

if ($did == 27) { operserv sqLine deL $$?=" Nick " }

if ($did == 28) { operserv sqLine List }

if ($did == 29) { operserv akill add 15d $$?="@IP Adresi veya nick ?" $$?="Sebep ?" }

if ($did == 30) { operserv akiLL del $$?="@IP Adresi veya nick ?" }

if ($did == 31) { operserv akiLL List }

if ($did == 32) { zLine $$?="@IP Adresi veya Nick ?" $$?="Sebep ?" }

if ($did == 33) { gLine $$?="@IP Adresi veya Nick ?" $$?="Sebep ?" }

if ($did == 34) { kLine $$?="@IP Adresi veya nick ?" $$?="Sebep ?" }

if ($did == 35) { ac }

if ($did == 36) { os gLobaL $$?="mesajınız ?" }

if ($did == 37) { allsend users private global $$?="Bir Nick Seçin" $$?="Mesajınız" }

if ($did == 38) { sajoin $$?="Bir Nick Seçin" #$$?="Girmesini istediğiniz kanal" }

if ($did == 39) { samode #$$?="Kanal ismi" $$?="Mod +/- q a o h v b i e I " $$?="Nick" }

if ($did == 40) { ns getauth $$?=" Nick " }

if ($did == 41) { os akillchan +1d #$$?="Kanal (# Koymadan)" $$?="Sebep ?" }

if ($did == 42) { cs suspend +15d #$$?="Kanal (# Koymadan)" $$?="Sebep ?" }

if ($did == 43) { cs unsuspend #$$?="Kanal (# Koymadan)" }

if ($did == 44) { Stats $$?="Bilgi? c,n,o,k,m vs vs" }

}

» Devamını Oku

Yorum yaz Addon ekle, Admin, Admin Menü diyaloğu, Diyaloğu, Menü, Oper Menu diyaloğu, Türk mirc, türkçe mirc