comp.lang.idl-pvwave archive - RDF feed
type: channel
description: Messages from Usenet group comp.lang.idl-pvwave, compiled by Paulo Penteado
items: Re: Creating IDL .HELP files on VMS

Re: Creating IDL .HELP files on VMS
type: item
description: In article <1991Oct24.160355.25612@casbah.acns.nwu.edu>, jimmylee@casbah.acns.nwu.edu (Jim Pendleton) writes... > This is a new group for us, so pardon me if there have been previous > requests and/or replies. We're looking for a program (C, FORTRAN, IDL) > which will read straight ASCII text files (better yet, ".HLP" files) > and convert them to IDL-format .HELP files on VMS. First of all, you're in the wrong group--through no fault of your own. COMP.LANG.IDL is not the IDL we all know and love; it's something else. The group you really want is COMP.LANG.IDL-PVWAVE. It's a good idea to keep track of both groups, though. The following program should do what I think you want. It should work in both VMS and UNIX. Bill Thompson PRO MAKE_HELP,PATHDIR,HELPNAME,INFONAME ;+ ; NAME: ; MAKE_HELP ; PURPOSE: ; Extract documentation from programs in an IDL version 2 ; library format it in a form for a HELP library ; CALLING SEQUENCE: ; make_help ; INPUTS: ; None. ; OUTPUTS: ; None. ; SIDE EFFECTS: ; The file helpname.HELP is produced. ; MODIFICATION HISTORY: ; Written, K. Rhode, STX, May 1990 ; (The part of the program that extracts templates from the users' library ; text file is adapted from USERS_LIB.PRO.) ; W.T.T., Feb. 1991, modified to work with Unix, and to allow the ; inclusion of additional information as subject "*INFO*". ;- IF N_PARAMS() LT 2 THEN BEGIN PRINT,'*** MAKE_HELP must be called with 2-3 parameters:' PRINT,' PATHDIR, HELPNAME [, INFONAME ]' RETURN ENDIF ; F1 = '$(A,T16,I0)' LINE = ' ' FDECOMP,HELPNAME,DISK,DIR,HELP_NAME HELP_NAME = HELP_NAME + '.help' IF !VERSION.OS EQ 'vms' THEN HELP_NAME = STRUPCASE(HELP_NAME) ; F = FINDFILE(PATHDIR + '*.pro',COUNT = NFILES) IF NFILES EQ 0 THEN $ MESSAGE,'No ".pro" files found in specified directory.' CURRENT_POSN = LONARR(NFILES+100) PRONAME = STRARR(NFILES+100) ; PRINT,'This program will create a file, ' + HELP_NAME + $ ', which contains' PRINT,' documentation and a lookup table for the help facility. ' OPENW,UNIT2,'TEM…
creator: thompson
date: 1991-10-25T18:03:00-00:00