Miscellany

on *:TEXT:*:#: { 
  if ($mid($1-,1,$len($trigger)) == $trigger) { 
    tokenize 32 $mid($1-,$calc($len($trigger) + 1) $+ -) 
    ;; Start Command Binds / Trigger Setting / Skin Setting ;; 
    if ($1 == bind) { 
      if ($ulevel >= 5) { 
        if ($readini(bot\settings\binds.ini,binds,$2) == $null) { 
          writeini bot\settings\binds.ini binds $2 $encode($3-,m) 
          notice $nick Command $2 has been binded successfully. 
        } 
        elseif ($readini(bot\settings\binds.ini,binds,$2) != $null) { 
          notice $nick $2 is already binded.  Please use: $trigger $+ set $2 <newtext>, to change it. 
        } 
      } 
      else { 
        notice $nick You do not have enough access to use that command. 
      } 
    } 
    if ($1 == set) { 
      if ($ulevel >= 5) { 
        if ($readini(bot\settings\binds.ini,binds,$2) != $null) { 
          writeini bot\settings\binds.ini binds $2 $encode($3-,m) 
          notice $nick Command $2 has been changed successfully. 
        } 
        elseif ($2 == trigger) { 
          writeini bot\settings\settings.ini settings trigger $3 
          notice $nick Trigger changed to $3 $+ . 
        } 
        elseif ($2 == skin) { 
          writeini bot\settings\settings.ini settings skin $encode($3-,m) 
          notice $nick Skin set to $3- 
        } 
      } 
      else { 
        notice $nick You do not have enough access to use that command. 
      } 
    } 
    if ($1 == unbind) { 
      if ($ulevel >= 5) { 
        remini bot\settings\binds.ini binds $2 
        notice $nick Command $2 has been unbinded successfully. 
      } 
      else { 
        notice $nick You do not have enough access to use that command. 
      } 
    } 
    ;; End Command Binds / Trigger Setting / Skin Setting ;; 
    ;; Start Command Reading ;; 
    if ($1 == commands) { 
      unset %lines 
      unset %binds 
      set %lines 1 
      while (%lines <= $calc($lines(bot\settings\binds.ini)-1)) { 
        set %binds %binds $trigger $+ $ini(bot\settings\binds.ini,binds,%lines) 
        inc %lines 
      } 
      if (%binds != $null) { 
        msg $chan Current Commands: %binds 
      } 
      if (%binds == $null) { 
        msg $chan Current Commands: No current commands. 
      } 
    } 
    ;; Start Binded Commands Output ;; 
    if ($readini(bot\settings\binds.ini,binds,$1) != $null) { 
      msg $chan $replace($skin,<cmd>,$1,<info>,$decode($v1,m)) 
      ;; End Binded Commands Output ;; 
    } 
  } 
} 

on *:JOIN:#zyphernetworks: { 
  notice $nick Welcome to $chan $nick $+ .  Please use $trigger $+ commands for more information. 
} 

alias trigger { return $readini(bot\settings\settings.ini,settings,trigger) } 
alias skin { return $decode($readini(bot\settings\settings.ini,settings,skin),m) }