on *:JOIN:#: {
  if ($readini(greetings.ini,greetings,$chan) != $null) {
    notice $nick $readini(greetings.ini,greetings,$chan)
  }
  else {
    <Put the greeting you want, for channels not in the ini file.>
  }
}

on *:TEXT:*greeting*:#spxhost: {
  if ($1 == %trig $+ greeting) {
    if ($ulevel >= 4) {
      if ($2 == add) {
        /writeini greetings.ini greetings $3 $4-
      } 
    }
    else {
      notice $nick Error >> You do not have enough access to use this command. 
    }
  }
}



on 4:TEXT:.join *:#: { /join $2 | notice $nick The bot has succesfully joined $2 to make it leave type .part #channel }
on 4:TEXT:.part *:#: { /part $2 | notice $nick The bot has succesfully part $2 }
on 4:TEXT:.nick *:#: { /nick $2 | notice $nick My name has been changed to $2 }
on 4:TEXT:.add *:#: { /auser $2 $3 | notice $nick The user $3 has been added to the bot with $2 access. }
on 4:TEXT:.addpeon *:#: { /msg chanserv #delt adduser $2 100 | notice $nick The user $2 has been voiced in #delt type .resync }
on 4:TEXT:.resync *:#: { /msg chanserv #delt resync }
on 4:TEXT:.addop *:#: { /msg chanserv #delt adduser $2 199 | notice $nick The user $2 has been voiced in #delt type .resync }
on 4:TEXT:.deluser *:#: { /msg chanserv #delt deluser $2 | notice $nick The user $2 has been voiced in #delt type .resync }

on *:TEXT:*:#spxhost: {
  if ($hget(binds) == $null) { hmake binds }
  if ($exists(binds.db) == $true) { hload binds binds.db }
  if ($mid($1-,1,$len(%trig)) == %trig) {
    tokenize 32 $mid($1-,$calc($len(%trig) + 1) $+ -)
  }
  else { halt }
  if ($hget(binds,$1) != $null) {
    notice $nick 4,1(0 $remove($1,%trig) 4)0 4(0 $v1 4)0
  }
  if ($ulevel >= 4) {
    if ($1 == bind) {
      if ($3 == $null) { notice $nick Please use the correct syntax.  %trig $+ bind <command> <text> }
      else {
        hadd binds $2 $3-
        notice $nick Command $2 successfully bound to: $3-
        hsave binds binds.db
      }
    }
  }
  if ($ulevel >= 4) {
    if ($1 == unbind) {
      if ($2 == $null) { notice $nick Please use the correct syntax.  %trig $+ unbind <command>
      }
      else {
        if ($hget(binds,$2) == $null) { notice $nick Command doesnt exist. }
        else {
          hdel binds $2
          notice $nick Successfully unbound command: $2
          hsave binds binds.db
        }
      }
    }
  }
} 


on *:OPEN:?:{
  set %pm.n $nick
  set %pm.m $strip($1-,burcm)
  inc %pm.c
  msg $nick Hello $nick , I am only a bot. Please pm an other operator of the channel ! Thank you