All pastes #173473 Raw Edit

Mine

public text v1 · immutable
·published 2006-09-16 23:32 UTC
rendered paste body
on *:text:!alch *:#: { 
  $readn = $msg(alch.txt,w,$+(*,$2-,*)) 
  %readalch = $readn 
  if %readalch != 0 goto one 
  else goto two 
  :one 
  set %alch $read(alch.txt,w,$+(*,$2-,*)) 
  msg $chan [Burton's Alch Guide]: %alch 
  halt    
  :two 
  msg $chan [Burton's Alch Guide]: Unable To Find Match For " $+ $2- $+ ". 
  halt    
}