Search
 
 

Display results as :
 


Rechercher Advanced Search

Web Applications
install Joomla Wordpress Phpbb Drupal FluxBB PunBB osCommerce simple-machines MYBB moodle vBulletin Dolphin-v.7.1.1 PHPNUKE XOOPS
Services
install BorkNet Services X3 Services Anope Atheme Services Srvx IRC Srervices
IRCD
install Snircd IRCU INSPIRCD UNREAL Nefarious Bircd Bahamut Asuka Charybdis
TCL SCRIPT
TCL SCRIPT FOR EGGDROP Allprotection4.7 Antiproxy
Bots
Bots install FishBot bobot++ Eggdrop janus Omega Security Services Botnix Bopm
Keywords

Latest topics
September 2017
MonTueWedThuFriSatSun
    123
45678910
11121314151617
18192021222324
252627282930 

Calendar Calendar

Affiliates
free forum

Affiliates
free forum


protection flood Long Text

View previous topic View next topic Go down

protection flood Long Text

Post  Admin on Mon Apr 09, 2012 10:36 pm

Code:

dialog longp {
  title "Long Text"
  size -1 -1 300 340
  box "Configuration", 1, 6 6 288 328
  box "Option", 2, 160 30 100 133
  box "Status", 3, 42 30 81 85
  radio "On", 4, 54 52 60 23, push group
  radio "Off", 5, 54 82 60 23, push
  radio "Warning", 6, 175 55 60 13, group
  edit "", 7, 170 180 60 20 
  radio "Kick", 8, 175 80 64 13
  radio "Kick+Ban", 9, 175 105 64 13
  radio "By X", 10, 175 130 64 13
  box "Duration", 11, 42 120 81 42
  edit "", 12, 52 135 60 20
  box "Level", 13, 42 165 81 42
  edit "", 14, 52 180 60 20
  box "Warning Msg", 15, 25 210 252 43
  edit "", 16, 30 225 242 20
  box "Kick Msg", 17, 25 255 252 43
  edit "", 18, 30 270 242 20
  button "Done", 19, 120 305 60 23, ok
  box "", 20, 117 297 66 33
  box "Count", 21, 160 165 81 42
  text "lallouSs Edition", 22, 200 310 80 33
}
on *:dialog:longp:*:*: {
  if $devent = init {
    did -a longp 7 %long.count
    did -a longp 12 %long.duration
    did -a longp 14 %long.level
    did -a longp 16 %long.warning
    did -a longp 18 %long.kick
    if (%long.status == on) { did -c longp 4 }
    elseif (%long.status == off) { did -c longp 5 }
    if (%long.reason = k) { did -c longp 8 }
    if (%long.reason = kb) { did -c longp 9 }
    if (%long.reason = warning) { did -c longp 6 }
    if (%long.reason = byx) { did -c longp 10 }
  }
  if $devent = sclick {
    if $did = 4 { .set %long.status on | .enable #longp | echo -a Long Text Protection is now "ON" [lallouSs Edition] }
    if $did = 5 { .set %long.status off | .disable #longp | echo -a Long Text Protection is now "OFF" [lallouSs Edition] }
 
    if $did = 8 { .set %long.reason k | echo -a Action turned to Kick [lallouSs Edition] }
    if $did = 9 { .set %long.reason kb | echo -a Action turned to Kick-Ban [lallouSs Edition]  }
    if $did = 10 { .set %long.reason byx | echo -a Action turned to Ban-By-X [lallouSs Edition]  }
    if $did = 6 { .set %long.reason warning | echo -a Action turned to Warning [lallouSs Edition] }
 
  }
  if $devent = edit {
    if $did = 7 { .set %long.count $did(7) }
    if $did = 12 { .set %long.duration $did(12) }
    if $did = 14 { .set %long.level $did(14) }
    if $did = 16 { .set %long.warning $did(16) }
    if $did = 18 { .set %long.kick $did(18) }
  }
}
#longp on
on @*:TEXT:*:#:{
  if ($nick !isop $chan) {
    if ($len($strip($1-)) >= %long.count ) {
      if (%long.reason == warning) { .msg $nick %long.warning }
      if (%long.reason == k) { kick $chan $nick %long.kick }
      if (%long.reason == kb) { mode $chan +b $nick | kick $chan $nick %long.kick }
      if (%long.reason == byx) { .msg x ban $chan $nick %long.duration %long.level %long.kick }
    }
  }
}
#longp end
menu menubar {
  -
  Long Text Pro:/dialog -m longp longp
  -
}
avatar
Admin
Admin

מספר הודעות : 285
Join date : 2009-09-12
Age : 37
מיקום : mIRCX IRC Network

View user profile http://mircx.forumotion.net

Back to top Go down

View previous topic View next topic Back to top

- Similar topics

 
Permissions in this forum:
You cannot reply to topics in this forum