*** empty log message ***
This commit is contained in:
31
harbour/ft_helpc.b32
Normal file
31
harbour/ft_helpc.b32
Normal file
@@ -0,0 +1,31 @@
|
||||
.path.c = ngdoc
|
||||
.path.h = include
|
||||
.path.exe = bin
|
||||
.path.lib = lib\b32
|
||||
.path.obj = obj;ngdoc
|
||||
.path.prg = ngdoc
|
||||
PROJECT: ft_helpc.exe
|
||||
|
||||
ft_helpc.obj : ft_helpc.c
|
||||
|
||||
ft_helpc.c : ft_helpc.prg
|
||||
|
||||
.prg.c:
|
||||
bin\harbour $< /n /ongdoc\ /iinclude /p /DNANFOR
|
||||
|
||||
ft_helpc.exe: ft_helpc.obj
|
||||
echo -v -O2 > bld.32
|
||||
echo -engdoc\ft_helpc.exe >> bld.32
|
||||
echo -Iinclude >> bld.32
|
||||
echo ngdoc\ft_helpc.c >> bld.32
|
||||
echo lib\b32\harbour.lib >> bld.32
|
||||
echo lib\b32\terminal.lib >> bld.32
|
||||
echo lib\b32\hbgt.lib >> bld.32
|
||||
echo lib\b32\hbpp.lib >> bld.32
|
||||
echo lib\b32\rdd.lib >> bld.32
|
||||
echo lib\b32\common.lib >> bld.32
|
||||
echo lib\b32\runner.lib >> bld.32
|
||||
bcc32 @bld.32
|
||||
del bld.32
|
||||
|
||||
|
||||
@@ -1,6 +1,6 @@
|
||||
!name: Harbour Build 31 Reference Guide
|
||||
!credits:
|
||||
Release : 01/01/2000
|
||||
Release : 01/18/2000
|
||||
Build By Luiz Rafael Culik
|
||||
Functions Documented by:
|
||||
Victor Szel
|
||||
|
||||
11
harbour/ngdoc/harbour.lnk
Normal file
11
harbour/ngdoc/harbour.lnk
Normal file
@@ -0,0 +1,11 @@
|
||||
!name: Harbour build 31 reference Guide
|
||||
!Credits: HARBOUR(c) http://www.harbour-project.org
|
||||
01/15/2000
|
||||
!menu: Reference
|
||||
Functions A-M Funcam.ngo
|
||||
Functions N-_ Funcn_.ngo
|
||||
Command Comm.ngo
|
||||
!menu: HARBOUR
|
||||
READ ME overview.ngo
|
||||
LICENSE license.ngo
|
||||
|
||||
125
harbour/ngdoc/harbour.rsp
Normal file
125
harbour/ngdoc/harbour.rsp
Normal file
@@ -0,0 +1,125 @@
|
||||
source\rdd\dbcmd.c
|
||||
source\rtl\achoice.prg
|
||||
source\rtl\adir.prg
|
||||
source\rtl\alert.prg
|
||||
source\rtl\arrays.c
|
||||
source\rtl\asort.prg
|
||||
source\rtl\binnum.c
|
||||
source\rtl\break.c
|
||||
source\rtl\browdb.prg
|
||||
source\rtl\browse.prg
|
||||
source\rtl\classes.c
|
||||
source\rtl\codebloc.c
|
||||
source\rtl\console.c
|
||||
source\rtl\copyfile.c
|
||||
source\rtl\dates.c
|
||||
source\rtl\dbedit.prg
|
||||
source\rtl\descend.c
|
||||
source\rtl\devoutp.prg
|
||||
source\rtl\dir.c
|
||||
source\rtl\dircmd.prg
|
||||
source\rtl\do.c
|
||||
source\rtl\dummy.prg
|
||||
source\rtl\empty.c
|
||||
source\rtl\environ.c
|
||||
source\rtl\errorapi.c
|
||||
source\rtl\errorsys.prg
|
||||
source\rtl\extend.c
|
||||
source\rtl\fieldbl.prg
|
||||
source\rtl\filesys.c
|
||||
source\rtl\fm.c
|
||||
source\rtl\gtapi.c
|
||||
source\rtl\gtxxx.c
|
||||
source\rtl\harbinit.prg
|
||||
source\rtl\hardcr.c
|
||||
source\rtl\initexit.c
|
||||
source\rtl\inkey.c
|
||||
source\rtl\input.prg
|
||||
source\rtl\isprint.c
|
||||
source\rtl\itemapi.c
|
||||
source\rtl\langapi.c
|
||||
source\rtl\len.c
|
||||
source\rtl\license.prg
|
||||
source\rtl\math.c
|
||||
source\rtl\memofile.c
|
||||
source\rtl\memoline.c
|
||||
source\rtl\memvarbl.prg
|
||||
source\rtl\memvars.c
|
||||
source\rtl\menuto.prg
|
||||
source\rtl\mlcount.c
|
||||
source\rtl\mouseapi.c
|
||||
source\rtl\mousexxx.c
|
||||
source\rtl\msgxxx.c
|
||||
source\rtl\mtran.c
|
||||
source\rtl\natmsg.c
|
||||
source\rtl\net.c
|
||||
source\rtl\objfunc.prg
|
||||
source\rtl\oemansi.c
|
||||
source\rtl\oldbox.c
|
||||
source\rtl\oldclear.c
|
||||
source\rtl\pcount.c
|
||||
source\rtl\proc.c
|
||||
source\rtl\pvalue.c
|
||||
source\rtl\readkey.prg
|
||||
source\rtl\readme.prg
|
||||
source\rtl\readvar.prg
|
||||
source\rtl\samples.c
|
||||
source\rtl\set.c
|
||||
source\rtl\setcolor.c
|
||||
source\rtl\setfunc.prg
|
||||
source\rtl\setkey.prg
|
||||
source\rtl\setta.prg
|
||||
source\rtl\soundex.c
|
||||
source\rtl\strings.c
|
||||
source\rtl\tbcolumn.prg
|
||||
source\rtl\tbrowse.prg
|
||||
source\rtl\tclass.prg
|
||||
source\rtl\terror.prg
|
||||
source\rtl\text.prg
|
||||
source\rtl\tget.prg
|
||||
source\rtl\tgetlist.prg
|
||||
source\rtl\tone.c
|
||||
source\rtl\trace.c
|
||||
source\rtl\transfrm.c
|
||||
source\rtl\type.c
|
||||
source\rtl\valtype.c
|
||||
source\rtl\wait.prg
|
||||
source\rtl\word.c
|
||||
source\rtl\xhelp.c
|
||||
source\rtl\xsavescr.prg
|
||||
source\tools\asciisum.c
|
||||
source\tools\ascpos.c
|
||||
source\tools\atdiff.c
|
||||
source\tools\chareven.c
|
||||
source\tools\charmix.c
|
||||
source\tools\charodd.c
|
||||
source\tools\chrcount.c
|
||||
source\tools\chrfirst.c
|
||||
source\tools\chrtotal.c
|
||||
source\tools\ctchksum.c
|
||||
source\tools\ctchrmix.c
|
||||
source\tools\ctcrypt.c
|
||||
source\tools\dates2.c
|
||||
source\tools\datesx.c
|
||||
source\tools\fileread.prg
|
||||
source\tools\hb_f.c
|
||||
source\tools\html.prg
|
||||
source\tools\io.c
|
||||
source\tools\mathx.c
|
||||
source\tools\nconvert.prg
|
||||
source\tools\numtxten.prg
|
||||
source\tools\numtxthu.prg
|
||||
source\tools\rtf.prg
|
||||
source\tools\ng.prg
|
||||
source\tools\strasint.c
|
||||
source\tools\strcount.c
|
||||
source\tools\strcspn.c
|
||||
source\tools\strdiff.c
|
||||
source\tools\strexpan.c
|
||||
source\tools\strfmt.c
|
||||
source\tools\stringp.prg
|
||||
source\tools\stringsx.c
|
||||
source\tools\strleft.c
|
||||
source\tools\strpbrk.c
|
||||
source\tools\strright.c
|
||||
|
||||
@@ -1,5 +1,6 @@
|
||||
|
||||
/*
|
||||
=======
|
||||
* $Id$
|
||||
*/
|
||||
|
||||
|
||||
154
harbour/source/tools/ng.prg
Normal file
154
harbour/source/tools/ng.prg
Normal file
@@ -0,0 +1,154 @@
|
||||
|
||||
/*
|
||||
* Harbour Project source code:
|
||||
* Norton Guide Support Code For FT_HELPC
|
||||
*
|
||||
* Copyright 2000 Luiz Rafael Culik Culik@sl.conex.net
|
||||
* www - http://www.harbour-project.org
|
||||
*
|
||||
* This program is free software; you can redistribute it and/or modify
|
||||
* it under the terms of the GNU General Public License as published by
|
||||
* the Free Software Foundation; either version 2 of the License, or
|
||||
* (at your option) any later version, with one exception:
|
||||
*
|
||||
* The exception is that if you link the Harbour Runtime Library (HRL)
|
||||
* and/or the Harbour Virtual Machine (HVM) with other files to produce
|
||||
* an executable, this does not by itself cause the resulting executable
|
||||
* to be covered by the GNU General Public License. Your use of that
|
||||
* executable is in no way restricted on account of linking the HRL
|
||||
* and/or HVM code into it.
|
||||
*
|
||||
* This program is distributed in the hope that it will be useful,
|
||||
* but WITHOUT ANY WARRANTY; without even the implied warranty of
|
||||
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
|
||||
* GNU General Public License for more details.
|
||||
*
|
||||
* You should have received a copy of the GNU General Public License
|
||||
* along with this program; if not, write to the Free Software
|
||||
* Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA (or visit
|
||||
* their web site at http://www.gnu.org/).
|
||||
*
|
||||
*/
|
||||
|
||||
#define CRLF HB_OSNewLine()
|
||||
|
||||
#include 'hbclass.ch'
|
||||
|
||||
*+±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±
|
||||
*+
|
||||
*+ Class TNortonGuide
|
||||
*+
|
||||
*+±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±
|
||||
*+
|
||||
CLASS TNortonGuide
|
||||
|
||||
DATA cFile
|
||||
DATA nHandle
|
||||
METHOD New( cFile )
|
||||
|
||||
METHOD WritePar( cPar )
|
||||
METHOD WriteLink( clink )
|
||||
METHOD CLOSE()
|
||||
METHOD WriteParBold( cPar )
|
||||
METHOD WriteTitle( cTopic , cTitle )
|
||||
ENDCLASS
|
||||
METHOD NEW( cFile ) CLASS TNortonGuide
|
||||
|
||||
IF VALTYPE( cFile ) <> NIL .AND. VALTYPE( cFile ) == "C"
|
||||
Self:cFile := LOWER( cFile )
|
||||
Self:nHandle := FCREATE( Self:cFile )
|
||||
ENDIF
|
||||
|
||||
RETURN Self
|
||||
|
||||
METHOD WritePar( cPar ) CLASS TNortonGuide
|
||||
|
||||
FWRITE( Self:nHandle, ALLTRIM( cPar ) + CRLF )
|
||||
|
||||
RETURN Self
|
||||
|
||||
METHOD WriteParBold( cPar ) CLASS TNortonGuide
|
||||
|
||||
FWRITE( Self:nHandle, '^b' + ALLTRIM( cPar ) + '^b^' + CRLF )
|
||||
|
||||
RETURN Self
|
||||
|
||||
METHOD WriteTitle( cTopic, cTitle ) CLASS TNortonGuide
|
||||
|
||||
LOCAL cTemp
|
||||
LOCAL nPos
|
||||
LOCAL cWrite
|
||||
|
||||
cTopic := ALLTRIM( cTopic )
|
||||
|
||||
FWRITE( Self:nHandle, "!Short: " + cTopic + CRLF )
|
||||
|
||||
Self:WriteParBold(cTitle )
|
||||
|
||||
RETURN Self
|
||||
|
||||
METHOD CLOSE() CLASS TNortonGuide
|
||||
|
||||
FCLOSE( Self:nHandle )
|
||||
|
||||
RETURN Self
|
||||
|
||||
METHOD WriteLink( cLink ) CLASS TNortonGuide
|
||||
|
||||
FWRITE( Self:nHandle, cLink )
|
||||
|
||||
RETURN Self
|
||||
|
||||
*+ EOF: NG.PRG
|
||||
/* $DOC$
|
||||
* $FUNCNAME$
|
||||
* TNortonGuide()
|
||||
* $CATEGORY$
|
||||
* Harbour Tools
|
||||
* $ONELINER$
|
||||
* Norton Guide Class
|
||||
* $SYNTAX$
|
||||
* oNg:=TNortonGuide():New(<cFile>)
|
||||
* $ARGUMENTS$
|
||||
* <cFile> Name of the Ng Source file to create
|
||||
* $RETURNS$
|
||||
* An instance of the TNortonGuide Class
|
||||
* $DESCRIPTION$
|
||||
* TNortonGuide() is a class that create the Norton Guide Source
|
||||
* Code of the same name you pass to the constructor.
|
||||
* The class methods are as follows:
|
||||
* New(<cFile>) Create a new instance of the THtml class.
|
||||
* Close() Close the create file
|
||||
* WriteTitle(<cTopic>,<cTitle>) Write the file title
|
||||
* WritePar(<cPar>) Writes a paragrafer
|
||||
* WriteParBold(<cPar>) Same as WritePar(), but the text is bold style.
|
||||
* WriteLink(<cLink>) Write a link to another topic
|
||||
* $EXAMPLES$
|
||||
* FUNCTION MAIN()
|
||||
*
|
||||
* LOCAL oNg
|
||||
*
|
||||
* oNg := TNortonGuide():New( "ngi\harbour.ngi" )
|
||||
* oNg:WriteTitle( "Harbour Reference Guide" )
|
||||
* oNg:WritePar( "HARBOUR" )
|
||||
* oNg:WriteLink( "OverView" )
|
||||
* oNg:WriteLink( "License" )
|
||||
*
|
||||
* oNg:WritePar( "See the Links Above" )
|
||||
* oNg:Close()
|
||||
* RETURN Nil
|
||||
*
|
||||
* $TESTS$
|
||||
*
|
||||
* $STATUS$
|
||||
* R
|
||||
* $COMPLIANCE$
|
||||
* This is a new Harbour Tools class
|
||||
* $PLATFORMS$
|
||||
* ALL
|
||||
* $FILES$
|
||||
*
|
||||
* $SEEALSO$
|
||||
* TCLASS()
|
||||
* $END$
|
||||
*/
|
||||
@@ -1,7 +1,6 @@
|
||||
|
||||
/*
|
||||
* $Id$
|
||||
*/
|
||||
* $Id$
|
||||
*/
|
||||
|
||||
/*
|
||||
* Harbour Project source code:
|
||||
|
||||
137
harbour/source/tools/troff.prg
Normal file
137
harbour/source/tools/troff.prg
Normal file
@@ -0,0 +1,137 @@
|
||||
|
||||
/*
|
||||
* Harbour Project source code:
|
||||
* TROFF Support Code For FT_HELPC
|
||||
*
|
||||
* Copyright 2000 Luiz Rafael Culik Culik@sl.conex.net
|
||||
* www - http://www.harbour-project.org
|
||||
*
|
||||
* This program is free software; you can redistribute it and/or modify
|
||||
* it under the terms of the GNU General Public License as published by
|
||||
* the Free Software Foundation; either version 2 of the License, or
|
||||
* (at your option) any later version, with one exception:
|
||||
*
|
||||
* The exception is that if you link the Harbour Runtime Library (HRL)
|
||||
* and/or the Harbour Virtual Machine (HVM) with other files to produce
|
||||
* an executable, this does not by itself cause the resulting executable
|
||||
* to be covered by the GNU General Public License. Your use of that
|
||||
* executable is in no way restricted on account of linking the HRL
|
||||
* and/or HVM code into it.
|
||||
*
|
||||
* This program is distributed in the hope that it will be useful,
|
||||
* but WITHOUT ANY WARRANTY; without even the implied warranty of
|
||||
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
|
||||
* GNU General Public License for more details.
|
||||
*
|
||||
* You should have received a copy of the GNU General Public License
|
||||
* along with this program; if not, write to the Free Software
|
||||
* Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA (or visit
|
||||
* their web site at http://www.gnu.org/).
|
||||
*
|
||||
*/
|
||||
|
||||
#define CRLF HB_OSNewLine()
|
||||
|
||||
#include 'hbclass.ch'
|
||||
|
||||
*+±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±
|
||||
*+
|
||||
*+ Class TTROFF
|
||||
*+
|
||||
*+±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±
|
||||
*+
|
||||
CLASS TTROFF
|
||||
|
||||
DATA cFile
|
||||
DATA nHandle
|
||||
METHOD New( cFile )
|
||||
|
||||
METHOD WritePar( cPar )
|
||||
METHOD WriteLink( clink )
|
||||
METHOD CLOSE()
|
||||
METHOD WriteParBold( cPar )
|
||||
METHOD WriteTitle( cTitle, cTopic )
|
||||
METHOD WriteText( cText )
|
||||
ENDCLASS
|
||||
METHOD NEW( cFile ) CLASS TTROFF
|
||||
|
||||
IF VALTYPE( cFile ) <> NIL .AND. VALTYPE( cFile ) == "C"
|
||||
Self:cFile := LOWER( cFile )
|
||||
Self:nHandle := FCREATE( Self:cFile )
|
||||
ENDIF
|
||||
RETURN Self
|
||||
METHOD WriteTitle( cTopic, cTitle ) CLASS TTROFF
|
||||
|
||||
LOCAL cWriteTitle := '.br' + CRLF + ;
|
||||
'.ta' + CRLF + ;
|
||||
'.in 0.08i' + CRLF + ;
|
||||
'.ps -3' + CRLF + ;
|
||||
'.vs -3' + CRLF + ;
|
||||
'.sp 2' + CRLF + ;
|
||||
'\fB' + cTitle + CRLF
|
||||
LOCAL cWriteTopic := '.de }n' + CRLF + ;
|
||||
'.bp' + CRLF + ;
|
||||
'.sp .5i' + CRLF + ;
|
||||
'..' + CRLF + ;
|
||||
'.wh -.8i }n' + CRLF + ;
|
||||
'.sp .5i' + CRLF + ;
|
||||
'.po -.4i' + CRLF + ;
|
||||
'.ll 7.5i' + CRLF + ;
|
||||
'.ps 9' + CRLF + ;
|
||||
'.vs 9' + CRLF + ;
|
||||
'.in 0i' + CRLF + ;
|
||||
'.ta 1.63265i' + CRLF + ;
|
||||
'.sp 2' + CRLF + ;
|
||||
'.ne 20' + CRLF + ;
|
||||
'.ps +3' + CRLF + ;
|
||||
'.vs +3' + CRLF + ;
|
||||
cTopic + CRLF
|
||||
LOCAL cTemp
|
||||
LOCAL Npos
|
||||
LOCAL cWriteTemp
|
||||
nPos := AT( "()", cTopic )
|
||||
IF nPos > 0
|
||||
cTemp := SUBSTR( cTopic, nPos + 1 )
|
||||
ELSE
|
||||
cTemp := SUBSTR( cTopic, 21 )
|
||||
ENDIF
|
||||
cWriteTemp := cTemp + CRLF + ;
|
||||
'.in 0i' + CRLF + ;
|
||||
'.br' + CRLF + ;
|
||||
'\l 6.24i ' + CRLF + ;
|
||||
'.br' + CRLF
|
||||
FWRITE( Self:nHandle, cWriteTopic )
|
||||
FWRITE( Self:nHandle, cWriteTitle )
|
||||
FWRITE( Self:nHandle, cWriteTemp )
|
||||
RETURN Self
|
||||
|
||||
METHOD WriteText( cText ) CLASS TTROFF
|
||||
|
||||
FWRITE( Self:nHandle, cText + CRLF )
|
||||
RETURN Self
|
||||
METHOD WritePar( cPar ) CLASS TTROFF
|
||||
|
||||
FWRITE( Self:nHandle, ALLTRIM( STRTRAN( cPar, ".", "\." ) ) + CRLF )
|
||||
RETURN Self
|
||||
METHOD WriteParBold( cPar ) CLASS TTROFF
|
||||
|
||||
LOCAL cWriteBold := '.sp' + CRLF + ;
|
||||
'.in 0.08i' + CRLF + ;
|
||||
'\fB' + cPar + CRLF + ;
|
||||
'.sp' + CRLF + ;
|
||||
'.in 0.4i' + CRLF
|
||||
FWRITE( Self:nHandle, cWriteBold )
|
||||
RETURN Self
|
||||
|
||||
METHOD CLOSE() CLASS TTROFF
|
||||
|
||||
FCLOSE( Self:nHandle )
|
||||
RETURN Self
|
||||
|
||||
METHOD WriteLink( cLink ) CLASS TTROFF
|
||||
|
||||
FWRITE( Self:nHandle, ALLTRIM( cLink ) +CRLF)
|
||||
|
||||
RETURN Self
|
||||
|
||||
*+ EOF: TROFF.PRG
|
||||
Reference in New Issue
Block a user