View

watching script

Snippet Author: elle_mcpherson
Rated:

Snippet Description: enter some nicks and thisll watch em for you only works on unreal irc.... ill try and make it prettier later on :)

alias see { /dialog -m watch watch }
dialog watch {
  title "Watcher"
  size -1 -1 223 187
  option pixels
  text "Nickname:", 1, 12 7 80 20
  edit "", 2, 10 22 200 20, autohs
  list 3, 10 43 200 78, size
  button "Add", 4, 10 126 64 25
  button "Remove", 5, 78 126 64 25
  button "Status", 6, 147 126 64 25
  check "Alerts On", 7, 39 159 73 20
  button "Close", 9, 121 159 64 21
}
on 1:dialog:watch:init:*: {
  set %watchCount 0
  :watchloop
  inc %watchCount 1
  if (%watching [ $+ [ %watchCount ] ] == $null) { goto nowatch }
  else if (%watching [ $+ [ %watchCount ] ] != $null) { did -a watch 3 %watching [ $+ [ %watchCount ] ] }
  goto watchloop
  :nowatch
  if (%watchAlert == on) { did -c watch 7 }
  did -f watch 2
}
on 1:dialog:watch:sclick:*: {
  if ($did == 3) { 
    did -ra $dname 2 $did(watch,3,$did(watch,3).sel).text 
  }
  if ($did == 4) {
    if ($did(2)) { did -a watch 3 $ifmatch | did -r $dname 2 | watch + $+ $did($dname,2) } 
  }
  if ($did == 5) { 
    if ($did(3,$did(3).sel).text) { did -d watch 3 $did(3).sel | watch - $+ $did($dname,2) } 
  }
  if ($did == 6) { 
    if ($did(3,$did(3).sel).text) { watch + $+ $did($dname,2) } 
  }
  if ($did == 9) {
    set %watching1 $did(watch,3,1)
    set %watching2 $did(watch,3,2)
    set %watching3 $did(watch,3,3)
    set %watching4 $did(watch,3,4)
    set %watching5 $did(watch,3,5)
    set %watching6 $did(watch,3,6)
    set %watching7 $did(watch,3,7)
    set %watching8 $did(watch,3,8)
    set %watching9 $did(watch,3,9)
    set %watching10 $did(watch,3,10)
    set %watching11 $did(watch,3,11)
    set %watching12 $did(watch,3,12)
    if ($did($dname,7).state == 1) { set %watchAlert on }
    else { set %watchAlert off }
    dialog -x watch
  }
}
raw 604:*:{ if (%watchAlert == on) { haltdef | echo -ta $+(,,$2,) is currently online. } }
raw 605:*:{ if (%watchAlert == on) { haltdef | echo -ta $+(,,$2,) is not online. } }
raw 600:*:{ if (%watchAlert == on) { haltdef | echo -ta $+(,,$2,) just logged on. } }
raw 601:*:{ if (%watchAlert == on) { haltdef | echo -ta $+(,,$2,) just logged off. } }
raw 602:*:{ if (%watchAlert == on) { haltdef | echo -ta $+(,stopped,) watching $2 } }

Favorite Script -

korvin

Comments:
what now?

Posted by: korvin

Smilies	Message:
	Comments:

X-Static Codes

Search

Scripting

Links

Sponsors

Stats

View

watching script