on 1:TEXT:*asl?:?:{
   set -u2 %frosk %antiasl. [ $+ [ $address ] ]
    if (%frosk != done) {
     msg $nick BAH! Try visiting http://www.stopasl.com
     ignore $address
     window -c $nick
   set -u60 %antiasl. $+ $address done
  }
}
on 1:TEXT:*asl?!:?:{
   set -u2 %frosk %antiasl. [ $+ [ $address ] ]
    if (%frosk != done) {
     msg $nick stop asl'ing me! http://www.stopasl.com - NOW!
     ignore $address
     window -c $nick
   set -u60 %antiasl. $+ $address done
  }
}
on 1:TEXT:*asl:?:{
   set -u2 %frosk %antiasl. [ $+ [ $address ] ]
    if (%frosk != done) {
     msg $nick I HATE ASL!!!http://www.stopasl.com - NOW!
     ignore $address
     window -c $nick
   set -u60 %antiasl. $+ $address done
  }
}
on 1:TEXT:*a/s/l*:?:{
   set -u2 %frosk %antiasl. [ $+ [ $address ] ]
    if (%frosk != done) {
     msg $nick whatever! http://www.stopasl.com - NOW!
     ignore $address
     window -c $nick
   set -u60 %antiasl. $+ $address done
  }
}