* make_deb.sh
* Removed wrong comment recently added.
(we will need to fix hbfimage compilation anyway)
* harbour-ce-spec
* harbour-w32-spec
* harbour.spec
* debian/control
* include/vm.api
* include/extend.api
* include/button.ch
* include/hbstack.h
* include/item.api
* include/rdd.api
* include/gt.api
* include/dbinfo.ch
* include/error.api
* include/filesys.api
* include/hbapigt.h
* include/clipdefs.h
* include/assert.ch
* include/fm.api
* include/extend.h
* source/compiler/genhrb.c
* config/os2/install.cf
* tests/db_brows.prg
* tests/debugtst.prg
* tests/ac_test.prg
* tests/testhtml.prg
* tests/tstcolor.prg
* doc/hdr_tpl.txt
* doc/man/harbour.1
* doc/dirstruc.txt
* doc/howtobld.txt
* doc/en/diskspac.txt
* doc/en/string.txt
* doc/en/rddord.txt
* doc/en/math.txt
* doc/en/error.txt
* doc/en/treport.txt
* doc/en/memvar2.txt
* doc/en/terminal.txt
* doc/en/dir.txt
* doc/en/rddmisc.txt
* doc/en/var.txt
* doc/en/nation.txt
* doc/en/dbstrux.txt
* doc/en/datetime.txt
* doc/en/memo.txt
* doc/en/tgetlist.txt
* doc/en/tlabel.txt
* doc/en/hb_compa.txt
* doc/en/array.txt
* doc/en/rdddb.txt
* doc/en/dbsdf.txt
* doc/en/tbrowse.txt
* doc/en/hvm.txt
* doc/en/input.txt
* doc/en/dbdelim.txt
* doc/en/browse.txt
* doc/en/menu.txt
* doc/en/file.txt
* doc/en/binnum.txt
* doc/en/tclass.txt
* doc/en/set.txt
* doc/en/misc.txt
* doc/en/sayget.txt
* doc/en/readme.txt
* doc/es/diskspac.txt
* doc/es/tlabel.txt
* doc/es/array.txt
* doc/es/dbsdf.txt
* doc/es/tbrowse.txt
* doc/es/math.txt
* doc/es/hvm.txt
* doc/es/treport.txt
* doc/es/input.txt
* doc/es/dbdelim.txt
* doc/es/browse.txt
* doc/es/memvar2.txt
* doc/es/command.txt
* doc/es/dir.txt
* doc/es/file.txt
* doc/es/eval.txt
* doc/es/binnum.txt
* doc/es/nation.txt
* doc/es/var.txt
* doc/es/tclass.txt
* doc/es/dbstrux.txt
* doc/es/misc.txt
* doc/es/datetime.txt
* doc/es/sayget.txt
* doc/es/memo.txt
* doc/es/readme.txt
* doc/es/tgetlist.txt
* doc/readme.txt
* contrib/hbct/ctnet.c
* contrib/hbct/video.c
* contrib/hbct/dattime3.c
* contrib/hbct/color.c
* contrib/hbnf/acctyear.prg
* contrib/hbnf/byteneg.prg
* contrib/hbnf/isshare.prg
* contrib/hbnf/sinkey.prg
* contrib/hbnf/dhkey.h
* contrib/hbnf/kspeed.c
* contrib/hbnf/prtscr.c
* contrib/hbnf/descendn.c
* contrib/hbnf/peek.c
* contrib/hbnf/scancode.prg
* contrib/hbnf/vidmode.prg
* contrib/hbnf/nwsem.prg
* contrib/hbnf/acctadj.prg
* contrib/hbnf/week.prg
* contrib/hbnf/vidcur.prg
* contrib/hbnf/iamidle.c
* contrib/hbnf/prtesc.prg
* contrib/hbnf/miltime.prg
* contrib/hbnf/proper.c
* contrib/hbnf/acctmnth.prg
* contrib/hbnf/savearr.prg
* contrib/hbnf/rand1.prg
* contrib/hbnf/madd.prg
* contrib/hbnf/dispmsg.prg
* contrib/hbnf/settime.prg
* contrib/hbnf/restsets.prg
* contrib/hbnf/page.prg
* contrib/hbnf/byt2bit.prg
* contrib/hbnf/setkeys.c
* contrib/hbnf/month.prg
* contrib/hbnf/byt2hex.prg
* contrib/hbnf/findith.prg
* contrib/hbnf/at2.prg
* contrib/hbnf/acctweek.prg
* contrib/hbnf/dispc.c
* contrib/hbnf/gcd.prg
* contrib/hbnf/pegs.prg
* contrib/hbnf/min2dhm.prg
* contrib/hbnf/acctqtr.prg
* contrib/hbnf/numlock.c
* contrib/hbnf/dosver.prg
* contrib/hbnf/nooccur.prg
* contrib/hbnf/dayofyr.prg
* contrib/hbnf/metaph.prg
* contrib/hbnf/ontick.c
* contrib/hbnf/menu1.prg
* contrib/hbnf/byteand.prg
* contrib/hbnf/sqzn.prg
* contrib/hbnf/bytexor.prg
* contrib/hbnf/ftidle.c
* contrib/hbnf/workdays.prg
* contrib/hbnf/byteor.prg
* contrib/hbnf/asum.prg
* contrib/hbnf/shift.c
* contrib/hbnf/sleep.prg
* contrib/hbnf/wda.prg
* contrib/hbnf/aavg.prg
* contrib/hbnf/woy.prg
* contrib/hbnf/origin.c
* contrib/hbnf/any2any.prg
* contrib/hbnf/chdir.c
* contrib/hbnf/adessort.prg
* contrib/hbnf/setdate.prg
* contrib/hbnf/netpv.prg
* contrib/hbnf/amedian.prg
* contrib/hbnf/blink.prg
* contrib/hbnf/stod.c
* contrib/hbnf/vertmenu.prg
* contrib/hbnf/qtr.prg
* contrib/hbnf/linked.prg
* contrib/hbnf/n2color.c
* contrib/hbnf/aredit.prg
* contrib/hbnf/alt.c
* contrib/hbnf/xbox.prg
* contrib/hbnf/ftround.prg
* contrib/hbnf/hex2dec.prg
* contrib/hbnf/nwuid.prg
* contrib/hbnf/dectobin.prg
* contrib/hbnf/bitset.prg
* contrib/hbnf/aemaxlen.prg
* contrib/hbnf/nwlstat.prg
* contrib/hbnf/invclr.prg
* contrib/hbnf/ctrl.c
* contrib/hbnf/lastday.prg
* contrib/hbnf/tempfile.prg
* contrib/hbnf/diskfunc.prg
* contrib/hbnf/scregion.prg
* contrib/hbnf/mouse2.prg
* contrib/hbnf/d2e.prg
* contrib/hbnf/ftisprn.c
* contrib/hbnf/pickday.prg
* contrib/hbnf/firstday.prg
* contrib/hbnf/daytobow.prg
* contrib/hbnf/anomatch.prg
* contrib/hbnf/pvid.prg
* contrib/hbnf/isbiton.prg
* contrib/hbnf/color2n.c
* contrib/hbnf/isbit.prg
* contrib/hbnf/putkey.c
* contrib/hbnf/cntryset.prg
* contrib/hbnf/datecnfg.prg
* contrib/hbnf/getenvrn.c
* contrib/hbnf/easter.prg
* contrib/hbnf/bytenot.prg
* contrib/hbnf/ntow.prg
* contrib/hbnf/poke.c
* contrib/hbnf/aeminlen.prg
* contrib/hbnf/floptst.prg
* contrib/hbnf/pchr.prg
* contrib/hbnf/savesets.prg
* contrib/hbnf/mkdir.c
* contrib/hbnf/year.prg
* contrib/hbnf/caplock.c
* contrib/hbnf/rmdir.c
* contrib/hbnf/calendar.prg
* contrib/hbnf/e2d.prg
* contrib/hbnf/elapsed.prg
* contrib/hbnf/sysmem.prg
* contrib/hbnf/bitclr.prg
* contrib/hbnf/eltime.prg
* contrib/hbnf/aading.prg
* contrib/hbnf/dfile.prg
* contrib/hbnf/elapmil.prg
* contrib/hbnf/setlastk.c
* contrib/hbnf/pending.prg
* contrib/hbnf/clrsel.prg
* contrib/rddads/doc/en/adsfuncs.txt
* contrib/rddads/doc/en/readme.txt
* contrib/hbclip/hbclip.ch
* contrib/hbclip/readme.txt
* contrib/hbmisc/doc/en/ht_dbf.txt
* utils/hbdoc/rtf.prg
* utils/hbdoc/fclass1.prg
* utils/hbdoc/genos2.prg
* utils/hbdoc/genng.prg
* utils/hbdoc/genasc.prg
* utils/hbdoc/genchm.prg
* utils/hbdoc/os2.prg
* utils/hbdoc/ng.prg
* utils/hbdoc/genhpc.prg
* utils/hbdoc/html.prg
* utils/hbdoc/ffile1.prg
* utils/hbdoc/ft_funcs.prg
* utils/hbdoc/hbdoc.prg
* utils/hbdoc/troff.prg
* utils/hbdoc/genhtm.prg
* utils/hbdoc/genpdf1.prg
* utils/hbdoc/gentrf.prg
* utils/hbdoc/genrtf.prg
* utils/hbmake/fclass1.prg
* utils/hbmake/prb_stak.prg
* utils/hbmake/ffile1.prg
* utils/hbmake/ft_funcs.prg
* utils/hbmake/pickfile.prg
* utils/hbmake/hbmutils.prg
* More cleanups, formatting (filename casing, CA-Cl*pper, etc).
258 lines
7.2 KiB
Plaintext
258 lines
7.2 KiB
Plaintext
/*
|
||
* $Id$
|
||
*/
|
||
|
||
/*
|
||
* Las siguientes partes son derechos adquiridos de sus autores individuales.
|
||
* www - http://www.harbour-project.org
|
||
*
|
||
* Copyright 2003 Alejandro de G rate <alex_degarate@hotmail.com>
|
||
* Documentaci½n en Espa¤ol de:
|
||
* OS(), VERSION(), GETENV(), __RUN(), TONE(), RUN
|
||
*
|
||
* Copyright 2000 Chen Kedem <niki@actcom.co.il>
|
||
* Documentaci¢n en Ingl‚s de: TONE()
|
||
*
|
||
* Vea doc/license.txt por los t‚rminos de la licencia.
|
||
*
|
||
*/
|
||
|
||
/* $DOC$
|
||
* $FUNCNAME$
|
||
* OS()
|
||
* $ONELINER$
|
||
* Retorna el sistema operativo subyacente.
|
||
* $SYNTAX$
|
||
* OS() --> <cSistemaOperativo>
|
||
* $CATEGORY$
|
||
* DOS
|
||
* $RETURNS$
|
||
* <cSistemaOperativo> el actual sistema operativo
|
||
* $DESCRIPTION$
|
||
* Esta funci¢n devuelve el actual sistema operativo como una cadena
|
||
* de caracteres.
|
||
* $EXAMPLES$
|
||
* ? OS()
|
||
* $TESTS$
|
||
* $STATUS$
|
||
* R
|
||
* $COMPLIANCE$
|
||
* Esta es una funci¢n compatible con CA-Cl*pper.
|
||
* $PLATFORMS$
|
||
* Todas
|
||
* $FILES$
|
||
* El c¢digo fuente esta en ../source/rtl/version.c
|
||
* La librer¡a es rtl
|
||
* $END$
|
||
*/
|
||
|
||
/* $DOC$
|
||
* $FUNCNAME$
|
||
* VERSION()
|
||
* $CATEGORY$
|
||
* Entorno
|
||
* $ONELINER$
|
||
* Retorna la Versi¢n de HARBOUR
|
||
* $SYNTAX$
|
||
* VERSION() --> <HbVersion>
|
||
* $ARGUMENTS$
|
||
* Ninguno
|
||
* $RETURNS$
|
||
* <HbVersion> Cadena conteniendo la versi¢n de Harbour
|
||
* $DESCRIPTION$
|
||
* Esta funci¢n devuelve la actual versi¢n de Harbour.
|
||
* $EXAMPLES$
|
||
* // Visualiza algo similar a: Harbour Alpha build 40.0 Intl. (Flex)
|
||
* ? QOUT( VERSION() )
|
||
* $TESTS$
|
||
* $STATUS$
|
||
* S
|
||
* $COMPLIANCE$
|
||
* Esta es una funci¢n compatible con CA-Cl*pper.
|
||
* $PLATFORMS$
|
||
* Todas
|
||
* $FILES$
|
||
* El c¢digo fuente esta en ../source/rtl/version.c
|
||
* La librer¡a es rtl
|
||
* $SEEALSO$
|
||
* OS()
|
||
* $END$
|
||
*/
|
||
|
||
/* $DOC$
|
||
* $FUNCNAME$
|
||
* GETENV()
|
||
* $CATEGORY$
|
||
* Entorno
|
||
* $ONELINER$
|
||
* Obtiene datos de las Variables de Entorno del Sistema Operativo
|
||
* $SYNTAX$
|
||
* GETENV(<cEntorno>, <cValorxDefecto> ) --> <cResultado>
|
||
* $ARGUMENTS$
|
||
* <cEntorno> Variable de Entorno a obtener
|
||
*
|
||
* <cValorxDefecto> Valor opcional a retornar si la variable <cEntorno>
|
||
* no es encontrada.
|
||
* $RETURNS$
|
||
* <cResultado> Valor de la variable de Entorno
|
||
* $DESCRIPTION$
|
||
* Esta funci¢n produce una cadena que es el valor de la variable de
|
||
* Entorno <cEntorno>, la cual es almacenada a nivel del sistema
|
||
* operativo con el comando SET del mismo.
|
||
* Si ninguna variable de Entorno puede ser encontrada, el valor que
|
||
* retorne la funci¢n ser <cValorxDefecto> si ‚ste es pasado, ¢ de lo
|
||
* contrario una cadena vac¡a.
|
||
* $EXAMPLES$
|
||
* QOUT( GETENV('PATH'))
|
||
* QOUT( GETENV('CONFIG'))
|
||
* QOUT( GETENV('HARBOURCMD', '-n -l -es2'))
|
||
* </fixed>
|
||
* $TESTS$
|
||
* $STATUS$
|
||
* R
|
||
* $COMPLIANCE$
|
||
* Esta es una funci¢n compatible con CA-Cl*pper.
|
||
* El par metro <cValorxDefecto> es una extensi¢n de Harbour.
|
||
* $PLATFORMS$
|
||
* Todas
|
||
* $FILES$
|
||
* El c¢digo fuente esta en ../source/rtl/gete.c
|
||
* La librer¡a es rtl
|
||
* $END$
|
||
*/
|
||
|
||
/* $DOC$
|
||
* $FUNCNAME$
|
||
* __RUN()
|
||
* $CATEGORY$
|
||
* DOS
|
||
* $ONELINER$
|
||
* Corre/Ejecuta un programa externo.
|
||
* $SYNTAX$
|
||
* __RUN( <cComando> )
|
||
* $ARGUMENTS$
|
||
* <cComando> Comando a ejecutar
|
||
* $DESCRIPTION$
|
||
* Este Comando ejecuta un programa externo. Por favor aseg£rese que
|
||
* Ud. tiene sufuciente memoria libre para poder ejecutar el programa
|
||
* externo.
|
||
* No lo use para correr programas que permanecen residentes (en el
|
||
* caso del sistema operativo DOS) porque puede causar muchos problemas
|
||
*
|
||
* Nota: El comando RUN es preprocesado en esta funci¢n.
|
||
* Se considera una mala pr ctica usar esta funci¢n directamente
|
||
* Use el comando RUN en su lugar.
|
||
* $EXAMPLES$
|
||
* __Run( "edit " + cMyTextFile ) // Corre un Editor externo
|
||
* __Run( "command" ) // Da el prompt del DOS (s¢lo DOS)
|
||
* </fixed>
|
||
* $TESTS$
|
||
* $STATUS$
|
||
* R
|
||
* $COMPLIANCE$
|
||
* Esta es una funci¢n compatible con CA-Cl*pper.
|
||
* $PLATFORMS$
|
||
* Todas
|
||
* $FILES$
|
||
* El c¢digo fuente esta en ../source/rtl/run.c
|
||
* La librer¡a es rtl
|
||
* $SEEALSO$
|
||
* RUN
|
||
* $END$
|
||
*/
|
||
|
||
/* $DOC$
|
||
* $FUNCNAME$
|
||
* TONE()
|
||
* $CATEGORY$
|
||
* Miscelanea
|
||
* $ONELINER$
|
||
* Suena un tono con una frecuencia y duraci¢n especificada.
|
||
* $SYNTAX$
|
||
* TONE( <nFrecuencia>, <nDuracion> ) --> NIL
|
||
* $ARGUMENTS$
|
||
* <nFrecuencia> Un valor num‚rico no negativo que especifica la
|
||
* frecuencia del tono en Hertzios (ciclos por segundo)
|
||
*
|
||
* <nDuracion> Un valor num‚rico positivo que especifica la duraci¢n
|
||
* del tono en unidades de 1/18 avo de segundo.
|
||
* $RETURNS$
|
||
* TONE() siempre devuelve NIL.
|
||
* $DESCRIPTION$
|
||
* TONE() es una funci¢n de sonido que podr¡a ser usada para irritar
|
||
* al usuario final, a su perro y al vecindario que lo rodea.
|
||
* La frecuencia est limitada al rango 0 to 32767 Hz. Las frecuencias
|
||
* por debajo de 20 Hz son inaudibles.
|
||
* Si hay decimales en los argumentos estos se truncan.
|
||
* $EXAMPLES$
|
||
* IF lOk // Suena bien
|
||
* TONE( 500, 1 )
|
||
* TONE( 4000, 1 )
|
||
* TONE( 2500, 1 )
|
||
* ELSE // Suena mal
|
||
* TONE( 300, 1 )
|
||
* TONE( 499, 5 )
|
||
* TONE( 700, 5 )
|
||
* ENDIF
|
||
* </fixed>
|
||
* $TESTS$
|
||
* TONE( 800, 1 ) // igual que ? CHR(7)
|
||
* TONE( 32000, 200 ) // algun perro alrededor ?
|
||
* TONE( 261, 1 ) // nota musical - C (DO medio)
|
||
* TONE( 400, 0 ) // pitido corto
|
||
* TONE( 700 ) //
|
||
* TONE( 10, 18.2 ) // demora de 1 segundo
|
||
* TONE( -1 ) // demora de 1/18.2 segundo
|
||
* TONE( ) // demora de 1/18.2 segundo
|
||
* </fixed>
|
||
* $TESTS$
|
||
* $STATUS$
|
||
* S
|
||
* $COMPLIANCE$
|
||
* Esta es una funci¢n compatible con CA-Cl*pper.
|
||
* $PLATFORMS$
|
||
* Todas
|
||
* $FILES$
|
||
* La librer¡a es rtl
|
||
* $SEEALSO$
|
||
* CHR(),SET BELL
|
||
* $END$
|
||
*/
|
||
|
||
/* $DOC$
|
||
* $FUNCNAME$
|
||
* RUN
|
||
* $CATEGORY$
|
||
* Comando
|
||
* $ONELINER$
|
||
* Corre/Ejecuta un programa externo.
|
||
* $SYNTAX$
|
||
* RUN <cComando>
|
||
* $ARGUMENTS$
|
||
* <cComando> Comando a ejecutar
|
||
* $DESCRIPTION$
|
||
* Este Comando ejecuta un programa externo. Por favor aseg£rese que
|
||
* Ud. tiene sufuciente memoria libre para poder ejecutar el programa
|
||
* externo.
|
||
* No lo use para correr programas que permanecen residentes (en el
|
||
* caso del sistema operativo DOS) porque puede causar muchos problemas.
|
||
* $EXAMPLES$
|
||
* RUN "edit " + cMyTextFile // Corre un Editor externo
|
||
* RUN "command" // Da el prompt del DOS (s¢lo DOS)
|
||
* $TESTS$
|
||
* $STATUS$
|
||
* R
|
||
* $COMPLIANCE$
|
||
* Este es un Comando compatible con CA-Cl*pper.
|
||
* $PLATFORMS$
|
||
* Todas
|
||
* $FILES$
|
||
* El c¢digo fuente esta en ../source/rtl/run.c
|
||
* La librer¡a es rtl
|
||
* $SEEALSO$
|
||
* RUN
|
||
* $END$
|
||
*/
|
||
|
||
|