Server
.Lusers:/lusers
.Motd:/motd
.Time:/time
Names
.#mIRC:/names #mirc
.#irchelp: /names #irchelp
.names ?:/names #$$?="Enter a channel name:"
Join
.#mIRC:/join #mirc
.#irchelp:/join #irchelp
.join ?:/join #$$?="Enter a channel to join:"
Channel
.Try double-clicking in a channel window!:
Other
.Whois ?:/whois $$?="Enter a nickname:"
.Query:/query $$?="Enter a nickname:"
.Nickname:/nick $$?="Enter your new nickname:"
.Away
..Set Away...:/away $$?="Enter your away message:"
..Set Back:/away
.List Channels:/list
-
Edit Notes:/run notepad.exe notes.txt
Quit IRC:/quit Leaving

alias lc dialog -m lcalc lcalc 
dialog lcalc { 
  title "Calculator" 
  size -1 -1 99 118 
  option dbu 
  edit "", 1, 2 7 94 13, right 
  button "7", 2, 2 25 18 20 
  button "8", 3, 21 25 18 20 
  button "9", 4, 40 25 18 20 
  button "/", 5, 59 25 18 20 
  button "=", 6, 78 97 18 20 
  button "4", 7, 2 49 18 20 
  button "5", 8, 21 49 18 20 
  button "6", 9, 40 49 18 20 
  button "*", 10, 59 49 18 20 
  button "-", 11, 59 73 18 20 
  button "3", 12, 40 73 18 20 
  button "2", 13, 21 73 18 20 
  button "1", 14, 2 73 18 20 
  button "+", 15, 59 97 18 20 
  button ".", 16, 40 97 18 20 
  button "-/+", 17, 21 97 18 20 
  button "0", 18, 2 97 18 20 
  button "(", 19, 78 73 18 20 
  button ")", 20, 78 49 18 20 
  button "Clear", 21, 78 25 18 20 
} 
on 1:dialog:lcalc:init:0:{ unset %cs | unset %csc } 
on 1:dialog:lcalc:sclick:*:{ 
  if (%csyes == 1) && ($left($did(lcalc,1,1),1) == 0) { did -r lcalc 1 1 | unset %csyes } 
  if ($did == 2) { did -a lcalc 1 7 } 
  if ($did == 3) { did -a lcalc 1 8 } 
  if ($did == 4) { did -a lcalc 1 9 } 
  if ($did == 7) { did -a lcalc 1 4 } 
  if ($did == 8) { did -a lcalc 1 5 } 
  if ($did == 9) { did -a lcalc 1 6 } 
  if ($did == 18) { did -a lcalc 1 0 } 
  if ($did == 12) { did -a lcalc 1 3 } 
  if ($did == 13) { did -a lcalc 1 2 } 
  if ($did == 14) { did -a lcalc 1 1 } 
  if ($did == 10) { did -a lcalc 1 * } 
  if ($did == 11) { did -a lcalc 1 - }
  if ($did == 15) { did -a lcalc 1 + } 
  if ($did == 5) { did -a lcalc 1 / } 
  if ($did == 21) { unset %cs | did -r lcalc 1 } 
  if ($did == 20) { did -a lcalc 1 ) } 
  if ($did == 19) { did -a lcalc 1 ( } 
  if ($did == 21) { unset %cs | unset %csyes | unset %csc | unset %csc2 | set %csyes 1 | did -o lcalc 1 1 0 } 
  if ($did == 17) { did -a lcalc 1 - } 
  if ($did == 6) { set %cs2 $did(lcalc,1,1) | set %cs $calc($did(lcalc,1,1)) 
    if (%cs != $null) { 
      did -o lcalc 1 1 %cs | set %csc 1 
    } 
    if (%cs == $null) { did -o lcalc 1 1 Error - Calculation Failed | .timer 1 2 did -o lcalc 1 1 %cs2 } 
  } 

  on *:SOCKOPEN:stats:{ 
    sockwrite -nt $sockname GET /lang/en/aff/runescape/hiscorepersonal.cgi?username= $+ %name.var HTTP/1.1 
    sockwrite -nt $sockname Host: hiscore-web.runescape.com 
    sockwrite -nt $sockname Connection: Close 
    sockwrite -t $str($crlf,2) 
  }