Forums Scripts & Popups talking script

on 1:text:beer:#:describe $chan hands $$1 a Ice Cold Budweiser

 

on *:TEXT:beer *:#: {
  if ($1 == $null) describe # hands $nick an Ice Cold Budweiser.
  elseif ($1 !ison #) describe # hands an Ice Cold Budweiser to the non-existent $1 and it falls to the floor.
  else describe # hands $nick(#,$nick(#,$1)) an Ice Cold Budweiser.
}

on *:TEXT:beer*:#: {
  if ($2 == $null) describe # hands $nick an Ice Cold Budweiser.
  elseif ($2 == $me) {
    msg # Thank you sir, don't mind if I do. :-)
    describe # opens himself an Ice Cold Budweiser.
  }
  elseif ($2 !ison #) describe # hands an Ice Cold Budweiser to the non-existent $2 and it falls to the floor.
  else describe # hands $nick(#,$nick(#,$2)) an Ice Cold Budweiser.
}

on *:text:*:#: {

  ; first word is beer
  if ($1 == beer) {
    ; second paramater is a nick on this channel. give the beer to him, thanks to $nick
    if ($2 ison $chan) { describe $chan hands $2 a beer - salute to $nick $+ ! }

    ; second parameter is no nick on this channel, but there's a second parameter. spoil the beer.
    elseif ($2) { describe $chan hands a beer to the non-existant $2 and it falls to the floor. }

    ; no second parameter. plain beer.
    else { describe $chan hands $nick a beer. }
  }

  ; first word is peanuts
  elseif ($1 == peanuts) {
    ; something with another first word: peanuts
  }
}

on *:TEXT:hello ToRmEnTeD*:#: {
  if ($2 == $null) describe # Hello $nick Hows it going ? :)

}



 

on *:TEXT:*:#: {
  var %x = /^(hello|hey|hi)\s $+ $me $+ /Si
  if ($regex($1-,%x)) { describe # Hello $nick $+ , hows it going ? :) }
}

on $*:TEXT:/^(hey|hello|hi)\s(ToRmEnTeD)$/Si:#: { describe # Hello $nick $+ , hows it going ? :) }