Public paste
Undefined
By: Arie | Date: Aug 31 2007 19:08 | Format: None | Expires: never | Size: 617 B | Hits: 1236

  1. /* TRIVIA HAXX BY ARIE */
  2.  
  3. on *:TEXT:*:#: {
  4.   if ($nick = TriviaSlet) {
  5.     unset %topep
  6.     var %a = * $+ $strip($replace($2-,$chr(44),*)) $+ *
  7.     var %x = $read(hoax.txt, w, %a)
  8.     if (%x) {
  9.       var %i = 1
  10.       echo -a %x
  11.       while (%i <= $len(%x)) {
  12.         var %q = $mid(%x,%i,1)
  13.         if (%q == $chr(42)) {
  14.           var %pep = on
  15.         }
  16.         if (%pep == on) {
  17.           if (%q == $chr(32)) {
  18.             %topep = %topep $+ $chr(32)
  19.           }
  20.           else %topep = %topep $+ %q
  21.         }
  22.         inc %i
  23.       }
  24.       if (%topep) msg # $remove(%topep, *)
  25.     }
  26.   }
  27. }
  28.