1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
|
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
; ;
; Copyright 2001 Sanchez Computer Associates, Inc. ;
; ;
; This source code contains the intellectual property ;
; of its copyright holder(s), and is made available ;
; under a license. If you do not know the terms of ;
; the license, please stop and do not read further. ;
; ;
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
help: ;implement the verb: HELP
HELP
n helpline
s helpline=$e(comline,cp-$l(ntoken),999)
u io:ctrap=$c(3,25)
zh helpline:helpfile
u @useio
q
|
