anchor.diff:  
   create, banner$
   	C", STS/K2 V1"
  +
  +create, ErrorMsg
  +	C", Error: "
  +
  +create, rsnTab
  +	C", SZINNFNMEFVV"
   
   :, prompt
   	prompt$ 1 #, +, 1 +fp!,
  
positive.code: :, run
  	cmdbuf 1 +fp!,
  	n @, 2 +fp!,
  	PrintStr CR
  ;,
  
  :, try
  	CR
  	skipws copy2ws run
  ;,
  
  :, banner
  
negative.code: int, psch
  int, pdch
  int, n
  int, rsn
  
  
  :, stop
  