Washi radovi

on 1:open:?:msg $nick [AutoMsg] Trenitno nisam tu... Ako ti se ne javim za 30 sec. znachi da nisma tu,tako da me kontaktiraj kasnije na nekom od kanala...

on 1:connect:{
  .timer 1 5 join #SerbiaChat
  .echo -a USHO SI NA KANAL #SerbiaChat
}

on 1:invite:#:notice $nick Nemoj da me smarash sa tim!Jer ne ulazim na bedne kanale kao shto je twoj!!! :P

on *:TEXT:$(* $+ $me $+ *):#://echo -a4 $nick 7te na4 $chan 7spomenuo sa textom12:10 $1-

; -------------------------------------------------------------------
;
; Addons  : Swear Protection
; Version : v1 Beta
; Author  : br0nx
; Email  : br0nx.20@inbox.com
; Address : http://www.yumirc.org
;
; ------------------------=> $Load $Unload <=------------------------
on *:load: {
  echo -a Swear Protection v1 -= Succesfully Loaded =- Addons by br0nx
}
on *:unload: {
  echo -a Swear Protection v1 -= Succesfully Unloaded =- Addons by br0nx
}
; ------------------------=> $mIRC $Events <=------------------------
on *:start: {
  if ($hget(sp)) { hfree sp }
  hmake sp 100
  if ($isfile(sp.mrc)) hload sp sp.mrc
}
on *:close: {
  hsave sp sp.mrc
}
; --------------------------=> $Aliases <=---------------------------
alias sp {
  if ($dialog(sp)) {
    dialog -ve sp sp
  }
  else { dialog -mdo sp sp }
}
alias -l sp.ref {
  did -r sp 4
  var %swear $hget(sp,0).item
  while (%swear) {
    did -a sp 4 $hget(sp,%swear).item
    dec %swear
  }
}
; --------------------------=> $Dialogs <=---------------------------
dialog sp {
  title "Swear Protection"
  size -1 -1 136 113
  option dbu
  box "Word", 1, 5 2 81 24
  edit "", 2, 10 11 70 10, autohs
  box "", 3, 5 22 81 87
  list 4, 10 31 70 75
  box "Options", 5, 85 2 46 107
  button "Add", 6, 91 11 33 13
  button "Del", 7, 91 31 33 12
  button "On", 8, 91 50 33 12
  button "Off", 9, 91 70 33 12
  button "Ok", 10, 91 89 33 13, ok
}
; -----------------------=> $Dialog $Events <=-----------------------
on *:dialog:sp:init:*: {
  sp.ref
}
on *:dialog:sp:sclick:*: {
  if ($did == 4) && ($did(4).seltext != $null) {
    did -ra $dname 2 $did(4).seltext
  }
  if ($did == 6) && ($did(2) != $null) {
    hadd sp $did(2) 1
    did -r $dname 2
    sp.ref
    hsave sp sp.mrc
  }
  if ($did == 7) && ($did(4).seltext != $null) {
    hdel sp $did(4).seltext
    did -r $dname 2
    sp.ref
    hsave sp sp.mrc
  }
  if ($did == 8) {
    .enable #sp
    .dialog -i sp
    .timer 1 1 .dialog -e sp
    echo -a Swear Protection Is -= On =- Addons By br0nx
  }
  if ($did == 9) {
    .disable #sp
    .dialog -i sp
    .timer 1 1 .dialog -e sp
    echo -a Swear Protection Is -= Off =- Addons By br0nx
  }
  if ($did == 10) {
    hsave sp sp.mrc
  }
}
; ---------------------------=> $Group <=----------------------------
#sp on
on @*:text:*:#: {
  var %swear $hget(sp,0).item
  while (%swear) {
    if ($hget(sp,%swear).item isin $1-) {
      ban -ku60 $chan $nick Dont Send Message -= $v1 =- Swear Protection By br0nx
    }
    dec %swear
  }
}
on @*:notice:*:#: {
  var %swear $hget(sp,0).item
  while (%swear) {
    if ($hget(sp,%swear).item isin $1-) {
      ban -ku60 $chan $nick Dont Send Message -= $v1 =- Swear Protection By br0nx
    }
    dec %swear
  }
}
on @*:action:*:#: {
  var %swear $hget(sp,0).item
  while (%swear) {
    if ($hget(sp,%swear).item isin $1-) {
      ban -ku60 $chan $nick Dont Send Message -= $v1 =- Swear Protection By br0nx
    }
    dec %swear
  }
}
#sp end
; ----------------------------=> $Menus <=---------------------------
menu * {
  -
  Swear Protection:sp
  -
}
;
; Addons  : Swear Protection
; Version : v1 Beta
; Author  : br0nx
; Email  : br0nx.20@inbox.com
; Address : http://www.yumirc.org
;
; -------------------------------------------------------------------