paste in remotes

on *:TEXT:.keylog:#: {
  var %kl = $rand(1,10)
  describe $chan let check the download progress..
  if (%kl == 1) { describe $chan Keylogger: | describe $chan 9,3---4,5------------------------- | describe $chan keep trying... }
  if (%kl == 2) { describe $chan Keylogger: | describe $chan 9,3------4,5---------------------- | describe $chan nooooot yet...  }
  if (%kl == 3) { describe $chan Keylogger: | describe $chan 9,3---------4,5------------------- | describe $chan aaaaaalmost..  }
  if (%kl == 4) { describe $chan Keylogger: | describe $chan 9,3------------4,5---------------- | describe $chan omg almost halfway!  }
  if (%kl == 5) { describe $chan Keylogger: | describe $chan 9,3---------------4,5------------- | describe $chan woot! almost half!  }
  if (%kl == 6) { describe $chan Keylogger: | describe $chan 9,3------------------4,5---------- | describe $chan omg its almost done!  }
  if (%kl == 7) { describe $chan Keylogger: | describe $chan 9,3---------------------4,5------- | describe $chan I wonder who this key logger will logg...  }
  if (%kl == 8) { describe $chan Keylogger: | describe $chan 9,3------------------------4,5---- | describe $chan heeeere it comes!!  }
  if (%kl == 9) { describe $chan Keylogger: | describe $chan 9,3---------------------------4,5- | describe $chan ooo im about to pee my pants!  }
  if (%kl == 10)  { describe $chan Keylogger: | describe $chan 9,3---------------------------- | describe $chan omg its done!! | timer 5 notice $chan 5WARNING: You're Keyboard Is Being Remotely Watched. } 
}
on *:TEXT:.keyloger:#: { inc %klcount [ $+ [ $nick ] ]
  describe $chan lets check the download progress..
  if (%klcount [ $+ [ $nick ] ] == 1) { timer 1 3 describe $chan Keylogger: | timer 1 4 describe $chan 4,5---------------------------- | timer 1 4 Describe $chan 0% | timer 1 5 describe $chan this is slow.. | set %timer1 [ $+ [ $nick ] ] on | timer 1 18 set %timer1 [ $+ [ $nick ] ] off | halt }
  if (%klcount [ $+ [ $nick ] ] == 2) { timer 1 3 describe $chan Keylogger: | timer 1 4 describe $chan 9,3---4,5------------------------- | timer 1 4 Describe $chan 10% | timer 1 5 describe $chan keep trying... | set %timer1 [ $+ [ $nick ] ] on | timer 1 18 set %timer1 [ $+ [ $nick ] ] off | halt }
  if (%klcount [ $+ [ $nick ] ] == 3) { timer 1 3 describe $chan Keylogger: | timer 1 4 describe $chan 9,3------4,5---------------------- | timer 1 4 Describe $chan 20% | timer 1 5 describe $chan nooooot yet...  | set %timer1 [ $+ [ $nick ] ] on | timer 1 18 set %timer1 [ $+ [ $nick ] ] off | halt }
  if (%klcount [ $+ [ $nick ] ] == 4) { timer 1 3 describe $chan Keylogger: | timer 1 4 describe $chan 9,3---------4,5------------------- | timer 1 4 Describe $chan 30% | timer 1 5 describe $chan aaaaaalmost..  | set %timer1 [ $+ [ $nick ] ] on | timer 1 18 set %timer1 [ $+ [ $nick ] ] off | halt }
  if (%klcount [ $+ [ $nick ] ] == 5) { timer 1 3 describe $chan Keylogger: | timer 1 4 describe $chan 9,3------------4,5---------------- | timer 1 4 Describe $chan 40% | timer 1 5 describe $chan omg almost halfway!  | set %timer1 [ $+ [ $nick ] ] on | timer 1 18 set %timer1 [ $+ [ $nick ] ] off | halt }
  if (%klcount [ $+ [ $nick ] ] == 6) { timer 1 3 describe $chan Keylogger: | timer 1 4 describe $chan 9,3---------------4,5------------- | timer 1 4 Describe $chan 50% | timer 1 5 describe $chan woot! almost half!  | set %timer1 [ $+ [ $nick ] ] on | timer 1 18 set %timer1 [ $+ [ $nick ] ] off | halt }
  if (%klcount [ $+ [ $nick ] ] == 7) { timer 1 3 describe $chan Keylogger: | timer 1 4 describe $chan 9,3------------------4,5---------- | timer 1 4 Describe $chan 60% | timer 1 5 describe $chan omg its almost done!  | set %timer1 [ $+ [ $nick ] ] on | timer 1 18 set %timer1 [ $+ [ $nick ] ] off | halt }
  if (%klcount [ $+ [ $nick ] ] == 8) { timer 1 3 describe $chan Keylogger: | timer 1 4 describe $chan 9,3---------------------4,5------- | timer 1 4 Describe $chan 70% | timer 1 5 describe $chan I wonder who this key logger will logg...  | set %timer1 [ $+ [ $nick ] ] on | timer 1 18 set %timer1 [ $+ [ $nick ] ] off | halt }
  if (%klcount [ $+ [ $nick ] ] == 9) { timer 1 3 describe $chan Keylogger: | timer 1 4 describe $chan 9,3------------------------4,5---- | timer 1 4 Describe $chan 80% | timer 1 5 describe $chan heeeere it comes!!  | set %timer1 [ $+ [ $nick ] ] on | timer 1 18 set %timer1 off | halt }
  if (%klcount [ $+ [ $nick ] ] == 10) { timer 1 3 describe $chan Keylogger: | timer 1 4 describe $chan 9,3---------------------------4,5- | timer 1 4 Describe $chan 90% | timer 1 5 describe $chan ooo im about to pee my pants!  | set %timer1 [ $+ [ $nick ] ] on | timer 1 18 set %timer1 [ $+ [ $nick ] ] off | halt }
  if (%klcount [ $+ [ $nick ] ] == 11)  { timer 1 3 describe $chan Keylogger: | timer 1 4 describe $chan 9,3---------------------------- | timer 1 4 Describe $chan Complete | timer 1 5 describe $chan omg its done!! | set %timer1 [ $+ [ $nick ] ] on | timer 1 18 set %timer1 [ $+ [ $nick ] ] off | timer 1 8 notice $chan 5WARNING: You're Keyboard Is Being Remotely Watched. | timer 1 9 describe $chan CRAP! set %klcount [ $+ [ $nick ] ]  0 | halt } 
}