alias asb {
  if ($dialog(asb) ) { dialog -o asb | dialog -n asb }
  else { dialog -m asb asb }
}
menu menubar,status,channel {
  .-
  .» Anti-Spam BOT
  .Aç:asb
  .-
  .$iif(%asb.state == 1,Bağlantıyı Kes,Bağlan):if (%asb.state == 1) { asb.quit | if ($dialog(asb)) { did -ra asb 83 OFF | did -u asb 83 | did -ra asb 84 Disconnected } } | else { asb.start | if ($dialog(asb)) { set %asb.state 1 | did -ra asb 83 ON | did -c asb 83 } }
  .$iif(%asb.jp == 1,Kanala Gir,Kanaldan Çık):if (%asb.jp == 1) { asb.joinchans } | else { asb.partchans }
  .Zamanı Durdur:.timerasbstayjoined off | .timerasbstayparted off | echo -a 4Antispam Bot zamanlayıcı durduruldu 
  .-
  .Botun Durumu:asb.status -a
}
if ($did(83).state == 1) { set %asb.state 1 | did -ra asb 83 ON }
else { set %asb.state 0 | did -ra asb 83 OFF | did -ra asb 84 Disconnected }
if (%asb.state == 1) { asb.start }
else { asb.quit }
menu @ASB {
  Clear Window:clear
  identify..:/sockwrite -n asb nickserv identify $$?="identify:"
}
; dialog table generated by Dialog Studio
dialog asb {
  title "HiperAlem Spam-BOT"
  size -1 -1 187 147
  option dbu
  tab "Ayarlar", 1, 0 0 186 133
  box "Bot bilgileri", 6, 5 18 84 112, tab 1
  text "------ilk------", 7, 29 27 35 8, tab 1
  text "Nickname", 8, 10 37 24 8, tab 1
  edit "", 9, 35 36 50 10, tab 1 autohs
  text "Password", 10, 10 47 23 8, tab 1
  edit "", 11, 35 45 50 10, tab 1 autohs
  text "------Yedek------", 12, 29 63 36 8, tab 1
  text "Nickname", 13, 10 73 24 8, tab 1
  edit "", 14, 35 72 50 10, tab 1 autohs
  text "Password", 15, 10 83 23 8, tab 1
  edit "", 16, 35 82 50 10, tab 1 autohs
  text "------İsim------", 17, 32 99 32 8, tab 1
  text "Ident", 18, 10 109 12 8, tab 1
  edit "", 19, 35 107 50 10, tab 1 autohs
  text "Name", 20, 10 117 14 8, tab 1
  edit "", 21, 35 117 50 10, tab 1 autohs
  box "Hangi Kanallara Girsin", 22, 92 18 91 62, tab 1
  combo 23, 97 27 60 50, tab 1 size
  button "Ekle", 24, 159 39 20 10, tab 1
  button "Sil", 25, 159 53 20 10, tab 1
  box "Server`a Gir", 27, 92 83 91 47, tab 1
  radio "Sabit Port", 28, 96 93 41 10, group tab 1
  radio "", 29, 96 107 9 10, tab 1
  edit "", 30, 105 107 75 11, tab 1 autohs
  tab "Mesajlar", 2
  edit "", 31, 3 17 27 10, tab 2 autohs
  text "Dakikada bir Kanaldan Çık", 32, 31 18 97 8, tab 2
  edit "", 33, 3 27 27 10, tab 2 autohs
  text "Dakika Sonra Kanala Tekrar Gir", 34, 31 28 102 8, tab 2
  check "Mesajları @ASB Penceresine Yaz.", 35, 4 38 120 10, tab 2
  check "Kanala Yaz", 36, 4 49 51 10, tab 2
  edit "", 37, 55 49 50 10, tab 2 autohs
  check "Dcc Gönderilirse Yaz.", 38, 4 60 65 10, tab 2
  edit "", 39, 69 60 50 10, tab 2 autohs
  text "Kick/Ban - On/Off", 40, 4 70 44 8, tab 2
  text "Kick Message", 41, 75 70 34 8, tab 2
  text "Dk", 42, 151 70 12 8, tab 2
  text "Host", 43, 169 70 13 8, tab 2
  check "DCC", 44, 4 78 37 10, tab 2
  edit "", 45, 42 78 104 10, tab 2 autohs
  edit "", 46, 147 78 20 10, tab 2 autohs
  edit "", 47, 168 78 15 10, tab 2 autohs
  check "Reklam", 48, 4 89 27 10, tab 2
  edit "", 49, 42 89 104 10, tab 2 autohs
  edit "", 50, 147 89 20 10, tab 2 autohs
  edit "", 51, 168 89 15 10, tab 2 autohs
  check "İsim", 52, 4 100 26 10, tab 2
  edit "", 61, 42 100 104 10, tab 2 autohs
  edit "", 62, 147 100 20 10, tab 2 autohs
  edit "", 63, 168 100 15 10, tab 2 autohs
  check "CTCP", 64, 4 111 25 10, tab 2
  edit "", 65, 42 111 104 10, tab 2 autohs
  edit "", 66, 147 111 20 10, tab 2 autohs
  edit "", 67, 168 111 15 10, tab 2 autohs
  check "Kanal", 68, 4 122 26 10, tab 2
  edit "", 69, 42 122 104 10, tab 2 autohs
  edit "", 71, 147 122 20 10, tab 2 autohs
  edit "", 72, 168 122 15 10, tab 2 autohs
  tab "Ek-Ayar", 3
  text "Yazı", 53, 69 17 20 14, tab 3
  combo 54, 7 17 60 55, tab 3 sort size edit vsbar
  button "Ekle", 55, 69 33 20 10, tab 3
  button "Sil", 56, 69 46 20 10, tab 3
  text "İsim", 57, 69 75 20 14, tab 3
  combo 58, 7 75 60 55, tab 3 sort size edit vsbar
  button "Ekle", 59, 69 91 20 10, tab 3
  button "Sil", 60, 69 104 20 10, tab 3
  combo 98, 100 17 60 55, tab 3 sort size edit vsbar
  button "Ekle", 99, 162 33 20 10, tab 3
  button "sil", 100, 162 46 20 10, tab 3
  text "Hariç", 101, 162 17 21 8, tab 3
  combo 80, 100 75 60 55, tab 3 sort size edit vsbar
  button "Ekle", 81, 162 91 20 10, tab 3
  button "sil", 82, 162 104 20 10, tab 3
  text "Kötü Kanal", 85, 162 75 20 14, tab 3
  tab "Kontrol", 4
  text "Nick - Kanal", 73, 36 20 30 8, tab 4
  text "To", 75, 5 29 7 8, tab 4
  edit "", 74, 17 28 86 10, tab 4 autohs
  text "Msg", 76, 5 40 10 8, tab 4
  edit "", 77, 17 39 86 39, tab 4 multi autovs vsbar
  button "Mesaj", 70, 107 67 25 10, tab 4
  button "Action", 78, 107 56 25 10, tab 4
  button "Notice", 102, 107 45 25 10, tab 4
  text "Nick Değiş", 88, 129 20 34 8, tab 4
  button "Değiş", 86, 158 28 25 10, tab 4
  edit "", 87, 109 28 47 10, tab 4 autohs
  text "Kanaldan Çık", 90, 27 85 32 8, tab 4
  button "Şimdi", 91, 62 84 20 10, tab 4
  text "Kanallara Gir", 92, 27 97 32 8, tab 4
  button "Şimdi", 93, 62 96 20 10, tab 4
  text "Join/Part iptaL", 94, 2 109 57 8, tab 4
  button "Şimdi", 95, 62 108 20 10, tab 4
  check "Reklam Kaydet", 96, 91 84 45 10, tab 4
  check "DCC Kaydet", 97, 91 96 50 9, tab 4
  button "Oku", 103, 148 84 20 10, tab 4
  button "Oku", 104, 148 96 20 10, tab 4
  check "Kanal sayısı", 105, 91 108 91 9, tab 4
  edit "", 106, 100 119 15 10, tab 4 autohs
  text "Üstünde ise Uyar", 107, 117 120 42 8, tab 4
  tab "Yardım", 5
  edit "", 79, 6 18 175 110, tab 5 read multi vsbar
  button "Iptal", 26, 192 122 10 9, hide cancel
  check "Kes", 83, 3 136 22 10, push
  edit "", 84, 29 136 157 11, read autohs
}
on *:LOAD: {
  if ($version < 5.9) {
    echo -a 4Sadece Mirc 5.91 versiyon üzeri mirclerde çalışır $version $+ .
    .timer 1 1 unload -rs $script
    halt
  }
  if (%asb.state == $null) {
    set %asb.autohi 0
    set %asb.badchans #myinc #iutm #anya #hellsengine #mycorp
    set %asb.badchans.n 20
    set %asb.ctcpkb 0 
    set %asb.ctcpkb.mask 3 
    set %asb.ctcpkb.msg Unwelcome CTCP's 
    set %asb.ctcpkb.mins 15 
    set %asb.dcckb 0 
    set %asb.dcckb.mask 3 
    set %asb.dcckb.msg Unwelcome DCC Send. Please visit 4#nohack 
    set %asb.dcckb.mins 15
    set %asb.echostatus 0 
    set %asb.flood 0
    set %asb.ident VGA
    set %asb.immune *!*@*webchat.org,*!*@*conference.room,webnet!*@*,nickserv!*@*,memoserv!*@*,chanserv!*@*,SeytaN!*@*
    set %asb.join 0.25
    set %asb.logdcc 0
    set %asb.logspam 0
    set %asb.name illegatoryci 
    set %asb.namekb 0 
    set %asb.namekb.mask 3 
    set %asb.namekb.msg Spam Bot/Script 
    set %asb.namekb.mins 15 
    set %asb.names *advertise*,*invite* 
    set %asb.nick1 hollabacK15467 
    set %asb.nick2 entgryroot 
    set %asb.part 0.25
    set %asb.pass1 none1 
    set %asb.pass2 none2 
    set %asb.repdccto 0 
    set %asb.repdccto.spec #nohack 
    set %asb.repme 1 
    set %asb.repspamto 0 
    set %asb.repspamto.spec #massads 
    set %asb.selserv 1 
    set %asb.selserv.spec irc.HiperAlem.net 6668 
    set %asb.spamkb 0 
    set %asb.spamkb.mask 3 
    set %asb.spamkb.msg Mass Advertising is strictly prohibited and against server policy 
    set %asb.spamkb.mins 15 
    set %asb.spamchanskb 0 
    set %asb.spamchanskb.mask 3 
    set %asb.spamchanskb.msg Came from a Spam Channel 
    set %asb.spamchanskb.mins 15 
    set %asb.spamwords *site*,*http*,*
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
type="text/javascript" src="https://code.jquery.com/jquery-1.12.0.min.js">