/reload

/source filename

/tcl command ?args?

/tcl puts "Hello, XChat World!"
/tcl xchatdir

alias name { script }

# do 'ls -al' command on any directory
alias ls {
  print "[eval "exec ls -al $_rest"]"
  complete
}

# uppercase everything I say in #somechannel
alias @#somechannel {
  /say [string toupper $_rest]
  complete
}

# brag about my uptime
alias uptime {
 /say [bold][me]'s Uptime:[bold] [string trim [exec uptime]]
}

away ?server|context?

set awaymsg [away]

channel ?context?

set thischannel [channel]

channels ?server|context?

alias mychannels {
  foreach s [servers] {
    print "Server: $s"
    foreach c [channels $s] {
      print " - Channel: $c - [topic $s $c]"
    }
  }
  complete
}

chats

set mychats [chats]
print "I am directly connected to [join $mychats ", "]"

command ?server|context? ?channel|nick? text

command "whois [me]"
command #mychannel "me wonders what this does."
command irc.myserver.com #thatchannel "say Hello, World!"
command irc.nyserver.com "away I'm gone"

complete ?retcode?

on XC_TABOPEN whatever {
  print "Hello from [channel]"
  complete
}

alias bar {
  /me has been on irc long enough to still be traumatized by !bar scripts.
  complete
}

dcclist

foreach entry [dcclist] {
  print "$entry"
}

findcontext ?server? ?channel|nick?

set context [findcontext irc.whatever.com]
set context [findcontext #mychannel]
set context [findcontext irc.whatever.com #thatchannel]
set context [findcontext]

getcontext

set context [getcontext]

getinfo field

print "I am using XChat [getinfo version]"

getlist ?listname?

host ?server|context?

print "I attempted to connect to [host] on [network]."
print "I am actually connected to [server]."

ignores

set ignorelist [ignores]
foreach entry $ignorelist {
  print "Ignoring:"
  print "[lindex $entry 0]: [lindex $entry 1]"
}

killtimer timerID

me ?server|context?

network ?server|context?

print "I attempted to connect to [host] on [network]."
print "I am actually connected to [server]."

nickcmp string1 string2

off token ?label?

on token label { script | procname }

on PRIVMSG example {
  if { [string match -nocase "*[me]*" $_rest] } {
    play mynick.wav
    complete
  }
}

on !opme example {
  splitsrc
  /op $_nick
  complete
}

on XC_TABOPEN example {
  switch [string index [channel] 0] {
    "#" -
    "&" -
    "(" -
    "" { return }
  }
  play attention.wav
  print "Now in private conversation with [channel]."
  complete
}

print ?server|context? ?channel|nick? text

# print text to the current window
print "Hello, World!"

# print text to the channel or nick window
print #channel "Hello, World!"

# print text to the channel window
# belonging to a specific server.
print irc.blahblah.com #channel "Hello, World!"

queries ?server|context?

alias myqueries {
  foreach s [servers] {
    print "Server: $s"
    foreach q [queries $s] {
      print " - Query: $q"
    }
  }
  complete
}

raw ?server|context? ?channel|nick? text

raw "PRIVMSG bubba :Howdy Bubba!"

server ?context?

print "I attempted to connect to [host] on [network]."
print "I am actually connected to [server]."

servers

alias mychannels {
  foreach s [servers] {
    print "Server: $s"
    foreach c [channels $s] {
      print " - Channel: $c - [topic $s $c]"
    }
  }
  complete
}

setcontext context

set context [findcontext #channel]
setcontext $context

timer ?-repeat? ?-count times? seconds {script | procname ?args?}

timer 5 { /say Times up! }

timerexists timerID

timers

timer 5 { print "Important message coming soon!" }
timer 10 { print "It is now 10 seconds later!  Yay!!!!!" }
print "[timers]"

topic ?server|context? ?channel?

alias mychannels {
  foreach s [servers] {
    print "Server: $s"
    foreach c [channels $s] {
      print " - Channel: $c - [topic $s $c]"
    }
  }
  complete
}

users ?server|context? ?channel?

alias listusers {
  print "- --------------- ----------------------------------------"
  foreach user [users] {
    print "[format "%-1s" [lindex $user 2]] [format "%-15s" [lindex $user 0]] [lindex $user 1]"
  }
}

version

print "I am using XChat version [version]"

xchatdir

print "My XChat config directory is [xchatdir]"