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

Spamfilter Dialog

25 Mart 2019 • 00:44 OxiGeN Hazır Kodlar

menu channel,status,menubar,query {
  $iif(o !isincs $usermode,$style(2)) Spamfilter Dialog:spamfilterdialog
}
alias -l spamfilterdialog { dialog $iif($dialog(spam_dia),-v,-m spam_dia) spam_dia }
dialog spam_dia {
  title "Spamfilter Dialog"
  size -1 -1 266 309
  option dbu
  list 1, 2 2 262 119, size extsel hsbar vsbar
  button "Yenile", 2, 144 123 37 12
  button "Seçileni Sil", 3, 79 123 37 12
  button "Tümünü Sil", 4, 3 123 37 12
  text "Toplam Spamfilters:", 5, 186 125 50 8
  text "", 6, 239 125 12 8
  box "Tip:", 7, 2 137 262 50
  check "c = Channel Msg", 8, 11 145 50 10
  check "p = Private Msg", 9, 109 145 50 10
  check "n = Private Notice", 10, 200 145 54 10
  check "N = Channel Notice", 11, 11 158 57 10
  check "P = Part Msg", 12, 109 158 50 10
  check "q = Quit Msg", 13, 200 158 50 10
  check "d = DCC", 14, 109 171 50 10
  box "İşlem:", 15, 2 190 262 50
  check "Kill", 16, 11 199 50 10
  check "Shun", 17, 11 212 50 10
  check "Kline", 18, 109 199 50 10
  check "Gline", 19, 109 212 50 10
  check "Zline", 20, 200 199 50 10
  check "GZline", 21, 200 212 50 10
  check "TempShun (Only shun's current session)", 22, 11 225 106 10
  box "Options:", 23, 2 243 262 50
  text "Regex (Text to catch on):", 24, 6 252 63 8
  edit "", 25, 71 251 189 10
  text "Sebep (Bosluk Kullanmayın _ Kullanın):", 26, 6 265 94 8
  edit "", 27, 103 264 157 10
  text "TKL Time (The - is for BLOCK and KILL):", 28, 6 278 94 8
  combo 29, 103 277 157 50, size drop
  button "Tamam", 30, 114 295 37 12, ok
  button "Vazgeç", 31, 168 295 37 12, cancel
  button "Ekle", 32, 60 295 37 12
  check "Block", 33, 200 225 50 10
  menu "File", 34
  menu "Options", 35, 34
  item "Clear Spamfilter", 36, 35
  item "Exit", 37, 34
}

on *:DIALOG:spam_dia:init:*: {
  didtok $dname 29 124 -|15m|30m|45m|1h|3h|5h|1d|3d|5d|30d|60d
  var %a = G
  Spamfilterlist
  .timerspamlist 1 5 loadbuf -o spam_dia 1 spamlist.txt
}
on *:dialog:spam_dia:menu:35,36: {
  if ($did == 35) {
    did -r $dname 1,6,25,27
    did -u $dname 8-14,16-22
  }
  if (did == 36) {
    dialog -x $dname
  }
}
on *:DIALOG:spam_dia:sclick:2-4,8-14,16-22,32: {
  if ($did == 2) {
    did -r $dname 1,6
    write -c spamlist.txt
    Spamfilterlist
    .timerspamlist 1 5 loadbuf -o spam_dia 1 spamlist.txt
    .timerhsbar 1 6 did -z spam_dia 1
  }
  if ($did == 3) {
    if ($did($dname,1,0).sel == 1) {
      spamfilter del $gettok($did(spam_dia,1).seltext,2,32) $gettok($did(spam_dia,1).seltext,3,32) $gettok($did(spam_dia,1).seltext,6,32) $gettok($did(spam_dia,1).seltext,7,32) $gettok($did(spam_dia,1).seltext,9-,32)
    }
    else {
      var %a = 1
      while (%a <= $did(spam_dia,1,0).sel) {
        spamfilter del $gettok($did(spam_dia,1,$did(spam_dia,1,%a).sel).text,2,32) $gettok($did(spam_dia,1,$did(spam_dia,1,%a).sel).text,3,32) $gettok($did(spam_dia,1,$did(spam_dia,1,%a).sel).text,6,32) $gettok($did(spam_dia,1,$did(spam_dia,1,%a).sel).text,7,32) $gettok($did(spam_dia,1,$did(spam_dia,1,%a).sel).text,9-,32)
        inc %a
      }
    }
  }
  if ($did == 4) {
    var %a = 1
    while (%a <= $did($dname,1).lines) {
      spamfilter del $gettok($did($dname,1,%a),2,32) $gettok($did($dname,1,%a),3,32) $gettok($did($dname,1,%a),6,32) $gettok($did($dname,1,%a),7,32) $gettok($did($dname,1,%a),9-,32)
      inc %a
    }
  }
  if ($did == 32) {
    if ($did(25) == $null) || ($did(27) == $null) || ($did(29) == $null) { noop $input(Please fill in ALL required fields.,o) | HALT }
    else {
      if ($did(8).state == 1) { set -u10 %type %type $+ c }
      if ($did(9).state == 1) { set -u10 %type %type $+ p }
      if ($did(10).state == 1) { set -u10 %type %type $+ n }
      if ($did(11).state == 1) { set -u10 %type %type $+ N }
      if ($did(12).state == 1) { set -u10 %type %type $+ P }
      if ($did(13).state == 1) { set -u10 %type %type $+ q }
      if ($did(14).state == 1) { set -u10 %type %type $+ d }
      if ($did(33).state == 1) { set -u10 %action block }
      if ($did(16).state == 1) { set -u10 %action kill }
      if ($did(17).state == 1) { set -u10 %action shun }
      if ($did(18).state == 1) { set -u10 %action kline }
      if ($did(19).state == 1) { set -u10 %action gline }
      if ($did(20).state == 1) { set -u10 %action zline }
      if ($did(21).state == 1) { set -u10 %action gzline }
      if ($did(22).state == 1) { set -u10 %action tempshun }
      spamfilter add %type %action $did(29).text $did(27).text $did(25).text
      noop $input(Desired spamfilter has been added.,o)
    }
  }
}
on *:dialog:spam_dia:close:*:{ 
  write -c spamlist.txt
}
alias Spamfilterlist {
  .enable #spamlist 
  .stats f
} 

#spamlist off
raw 229:*:{ 
  write spamlist.txt $2- 
  haltdef 
  did -ra spam_dia 6 $lines(spamlist.txt)
} 
raw 219:*:{ 
  .disable #spamlist 
  haltdef 
}
#spamlist end

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

menu channel,status,menubar,query {

$iif(o !isincs $usermode,$style(2)) Spamfilter Dialog:spamfilterdialog

}

alias -l spamfilterdialog { dialog $iif($dialog(spam_dia),-v,-m spam_dia) spam_dia }

dialog spam_dia {

title "Spamfilter Dialog"

size -1 -1 266 309

option dbu

list 1, 2 2 262 119, size extsel hsbar vsbar

button "Yenile", 2, 144 123 37 12

button "Seçileni Sil", 3, 79 123 37 12

button "Tümünü Sil", 4, 3 123 37 12

text "Toplam Spamfilters:", 5, 186 125 50 8

text "", 6, 239 125 12 8

box "Tip:", 7, 2 137 262 50

check "c = Channel Msg", 8, 11 145 50 10

check "p = Private Msg", 9, 109 145 50 10

check "n = Private Notice", 10, 200 145 54 10

check "N = Channel Notice", 11, 11 158 57 10

check "P = Part Msg", 12, 109 158 50 10

check "q = Quit Msg", 13, 200 158 50 10

check "d = DCC", 14, 109 171 50 10

box "İşlem:", 15, 2 190 262 50

check "Kill", 16, 11 199 50 10

check "Shun", 17, 11 212 50 10

check "Kline", 18, 109 199 50 10

check "Gline", 19, 109 212 50 10

check "Zline", 20, 200 199 50 10

check "GZline", 21, 200 212 50 10

check "TempShun (Only shun's current session)", 22, 11 225 106 10

box "Options:", 23, 2 243 262 50

text "Regex (Text to catch on):", 24, 6 252 63 8

edit "", 25, 71 251 189 10

text "Sebep (Bosluk Kullanmayın _ Kullanın):", 26, 6 265 94 8

edit "", 27, 103 264 157 10

text "TKL Time (The - is for BLOCK and KILL):", 28, 6 278 94 8

combo 29, 103 277 157 50, size drop

button "Tamam", 30, 114 295 37 12, ok

button "Vazgeç", 31, 168 295 37 12, cancel

button "Ekle", 32, 60 295 37 12

check "Block", 33, 200 225 50 10

menu "File", 34

menu "Options", 35, 34

item "Clear Spamfilter", 36, 35

item "Exit", 37, 34

}

on *:DIALOG:spam_dia:init:*: {

didtok $dname 29 124 -|15m|30m|45m|1h|3h|5h|1d|3d|5d|30d|60d

var %a = G

Spamfilterlist

.timerspamlist 1 5 loadbuf -o spam_dia 1 spamlist.txt

}

on *:dialog:spam_dia:menu:35,36: {

if ($did == 35) {

did -r $dname 1,6,25,27

did -u $dname 8-14,16-22

}

if (did == 36) {

dialog -x $dname

}

on *:DIALOG:spam_dia:sclick:2-4,8-14,16-22,32: {

if ($did == 2) {

did -r $dname 1,6

write -c spamlist.txt

Spamfilterlist

.timerspamlist 1 5 loadbuf -o spam_dia 1 spamlist.txt

.timerhsbar 1 6 did -z spam_dia 1

}

if ($did == 3) {

if ($did($dname,1,0).sel == 1) {

spamfilter del $gettok($did(spam_dia,1).seltext,2,32) $gettok($did(spam_dia,1).seltext,3,32) $gettok($did(spam_dia,1).seltext,6,32) $gettok($did(spam_dia,1).seltext,7,32) $gettok($did(spam_dia,1).seltext,9-,32)

}

else {

var %a = 1

while (%a <= $did(spam_dia,1,0).sel) {

spamfilter del $gettok($did(spam_dia,1,$did(spam_dia,1,%a).sel).text,2,32) $gettok($did(spam_dia,1,$did(spam_dia,1,%a).sel).text,3,32) $gettok($did(spam_dia,1,$did(spam_dia,1,%a).sel).text,6,32) $gettok($did(spam_dia,1,$did(spam_dia,1,%a).sel).text,7,32) $gettok($did(spam_dia,1,$did(spam_dia,1,%a).sel).text,9-,32)

inc %a

}

if ($did == 4) {

var %a = 1

while (%a <= $did($dname,1).lines) {

spamfilter del $gettok($did($dname,1,%a),2,32) $gettok($did($dname,1,%a),3,32) $gettok($did($dname,1,%a),6,32) $gettok($did($dname,1,%a),7,32) $gettok($did($dname,1,%a),9-,32)

inc %a

}

if ($did == 32) {

if ($did(25) == $null) || ($did(27) == $null) || ($did(29) == $null) { noop $input(Please fill in ALL required fields.,o) | HALT }

else {

if ($did(8).state == 1) { set -u10 %type %type $+ c }

if ($did(9).state == 1) { set -u10 %type %type $+ p }

if ($did(10).state == 1) { set -u10 %type %type $+ n }

if ($did(11).state == 1) { set -u10 %type %type $+ N }

if ($did(12).state == 1) { set -u10 %type %type $+ P }

if ($did(13).state == 1) { set -u10 %type %type $+ q }

if ($did(14).state == 1) { set -u10 %type %type $+ d }

if ($did(33).state == 1) { set -u10 %action block }

if ($did(16).state == 1) { set -u10 %action kill }

if ($did(17).state == 1) { set -u10 %action shun }

if ($did(18).state == 1) { set -u10 %action kline }

if ($did(19).state == 1) { set -u10 %action gline }

if ($did(20).state == 1) { set -u10 %action zline }

if ($did(21).state == 1) { set -u10 %action gzline }

if ($did(22).state == 1) { set -u10 %action tempshun }

spamfilter add %type %action $did(29).text $did(27).text $did(25).text

noop $input(Desired spamfilter has been added.,o)

}

on *:dialog:spam_dia:close:*:{

write -c spamlist.txt

}

alias Spamfilterlist {

.enable #spamlist

.stats f

}

#spamlist off

raw 229:*:{

write spamlist.txt $2-

haltdef

did -ra spam_dia 6 $lines(spamlist.txt)

}

raw 219:*:{

.disable #spamlist

haltdef

}

#spamlist end

» Devamını Oku

mIRC Hızlı Memo Gönderimi (Multi Mesaj)

12 Kasım 2015 • 12:23 OxiGeN Addonlar, Hazır Kodlar, Türkçe mIRC

alias MultiMesaj { dialog -m MultiMesaj MultiMesaj } dialog MultiMesaj { size -1 -1 280 220 title KELEBEK Admin MultiMesaj Sistemi box “Nickler Listesi:”,1, 5 5 150 148 button “Tamam”,2, 159 100 110 50,ok list 3, 15 20 130 140 button “Ekle”,4, 170 60 50 20 edit “”,5, 170 35 90 20 text “Nick:”,6, 170 20 45 15 button “Sil”,7, […]

» Devamını Oku

Yorum yaz dialog, hazır kodlar, memo, MemoServ, mirc, scripting, turkce mırc

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 Dialog Baslik Efekti

07 Kasım 2015 • 03:33 OxiGeN Addonlar, Hazır Kodlar, mirc indir, Türkçe mIRC

mIRC Addonlariza bir efekt veren bir kod. Addonlardaki dialog isimlerine efekt veriyor bu kod ile. Kullanımı: /efekt dialog ad? Örnek: /efekt mircarge Kod; alias -l efekt.tit { if ($dialog($1)) { set %klen $calc(%klen + 1) if (%pos == sol) { dialog -t $1 $left(%baslik,%klen) } if (%pos == sag) { dialog -t $1 $right(%baslik,%klen) } if (%klen == %kbaslik) { […]

» Devamını Oku

Yorum yaz alias, dialog, efekt, Mirc indir, turkce mırc

mIRC Nick Karşılama Paneli

30 Ekim 2015 • 13:55 OxiGeN Addonlar, Hazır Kodlar, Türkçe mIRC

Kod hakkında bilgi: Bu ufak kod yardımıyla, kendi belirleyeceğimiz 12 nicke kadar karşılama mesajı ayarlayabiliriz. Bu nicklerden herhangi biri kanala girdikten 2 saniye sonra, onun için belirlediğimiz mesajla karşılama yapar. Kod sahibini bilmiyorum; yabancı bir siteden alıp Türkçe’ye çevirdim. button “Nick 1 Karşılama”, 1, 10 23 50 15 button “Nick 2 Karşılama”, 2, 10 40 50 15 ….. kısımlarında Nick […]

» Devamını Oku

Yorum yaz dialog, hazır kodlar, karsilama, mirc, Nick, scripting, turkce mırc

mIRC Op – Voice Teşekkür (Dialog)

16 Ekim 2015 • 13:44 OxiGeN Addonlar, Hazır Kodlar, Türkçe mIRC

alias optes { if (%opvote == off) { dialog -m opvotes opvotes 180 200 280 180 | dialog -t opvotes Op-Voice Teşekkür Modu Kapalı. | did -b opvotes 9 | did -b opvotes 10 | did -b opvotes 11 | did -b opvotes 12 } if (%opvote == on) { dialog -m opvotes opvotes 180 200 280 180 | dialog […]

» Devamını Oku

Yorum yaz dialog, hazır kodlar, mirc, op, scripting, tesekkur, turkce mırc, voice

mIRC Spamfilter Dialog | Ekleme – Silme – Düzenleme |

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

Spamfilter bir çok kişinin girişmeye tereddüt ettiği bir konudur aslında. O tereddütü kaldırmak ve direk olarak /spamfilter add …. komutu uygulanırkenki karşılaşılan hataları önlemek amacıyla bu diyalogu yazdım. Kullanımı gayet basit; sağ klik menüsünde sadece +o flagınız olduğunda aktif olacak şekilde ayarladım. Çeşitli uyarı ya da bilgilendirmeler ile diyalogun o an işleminizi neden yapmadığını, yaptıysa da sonucu ile gösterir. Çıkış […]

» Devamını Oku

Yorum yaz addon, dialog, hazır kodlar, mirc, Mirc indir, scripting, SpamfiLter, turkce mırc