* bin/commit.hb
* config/detect.mk
* config/detfun.mk
* config/detplat.mk
* config/dir.mk
* config/dirsh.mk
* config/global.mk
* config/globsh.mk
* config/instsh.mk
* config/lang.hb
* config/lang2po.hb
* config/po2lang.hb
* config/postinst.hb
* contrib/hbexpat/tests/tohash.prg
* contrib/hbformat/utils/hbformat.ini
* contrib/hbmisc/hbedit.prg
* contrib/hbmxml/tests/testmxml.prg
* contrib/hbnetio/utils/hbnetio/_console.prg
* contrib/hbnetio/utils/hbnetio/_winsvc.prg
* contrib/hbnetio/utils/hbnetio/hbnetio.prg
* contrib/hbnetio/utils/hbnetio/netiomgm.hb
* contrib/hbwin/tests/ole.prg
* contrib/hbwin/tests/oletst2.js
* contrib/hbwin/tests/oletst2.vbs
* contrib/hbxpp/doc/en/binnumx.txt
* contrib/hbxpp/doc/en/dbcmdx.txt
* contrib/xhb/htmutil.prg
* contrib/xhb/tfile.prg
* contrib/xhb/tframe.prg
* contrib/xhb/thtm.prg
* ChangeLog.txt
* debian/copyright
* doc/class_tp.txt
* doc/hdr_tpl.txt
* doc/xhb-diff.txt
* LICENSE.txt
* package/harbour-wce.spec.in
* package/harbour-win.spec.in
* package/harbour.spec
* package/mpkg_rpm_wce.sh
* package/mpkg_rpm_win.sh
* package/mpkg_rpm.sh
* package/mpkg_src.sh
* package/mpkg_ver.sh
* src/rtl/achoice.prg
* src/rtl/getsys53.prg
* src/rtl/tgetlist.prg
* src/rtl/tlabel.prg
* src/rtl/tmenusys.prg
* tests/hbdoc.prg
* tests/langmsg.prg
* tests/rto_get.prg
* tests/rto_tb.prg
+ doc/en/ati.txt
+ doc/en/dirdrive.txt
+ doc/en/hashfunc.txt
+ doc/en/hbtoken.txt
+ doc/en/left.txt
+ doc/en/proc.txt
+ doc/en/strtran.txt
+ doc/en/transfrm.txt
+ doc/en/typefile.txt
* doc/en/*
* more partial sync with 3.4 fork
322 lines
7.0 KiB
Plaintext
322 lines
7.0 KiB
Plaintext
/* $DOC$
|
|
$TEMPLATE$
|
|
Function
|
|
$NAME$
|
|
OS()
|
|
$CATEGORY$
|
|
API
|
|
$SUBCATEGORY$
|
|
Environment
|
|
$ONELINER$
|
|
Return the current operating system.
|
|
$SYNTAX$
|
|
OS() --> cOperatingSystem
|
|
$RETURNS$
|
|
<cOperatinSystem> The current operating system.
|
|
$DESCRIPTION$
|
|
This function will return the current operating system.
|
|
$EXAMPLES$
|
|
? OS()
|
|
$STATUS$
|
|
R
|
|
$COMPLIANCE$
|
|
C
|
|
$PLATFORMS$
|
|
All
|
|
$END$
|
|
*/
|
|
|
|
/* $DOC$
|
|
$TEMPLATE$
|
|
Function
|
|
$NAME$
|
|
Version()
|
|
$CATEGORY$
|
|
API
|
|
$SUBCATEGORY$
|
|
Environment
|
|
$ONELINER$
|
|
Returns the version of Harbour compiler
|
|
$SYNTAX$
|
|
Version() --> cReturn
|
|
$ARGUMENTS$
|
|
None
|
|
$RETURNS$
|
|
<cReturn> String containing the Harbour version
|
|
$DESCRIPTION$
|
|
This function returns the current Harbour version.
|
|
$EXAMPLES$
|
|
? Version()
|
|
$STATUS$
|
|
S
|
|
$COMPLIANCE$
|
|
C
|
|
$PLATFORMS$
|
|
All
|
|
$FILES$
|
|
Library is core
|
|
$SEEALSO$
|
|
OS()
|
|
$END$
|
|
*/
|
|
|
|
/* $DOC$
|
|
$TEMPLATE$
|
|
Function
|
|
$NAME$
|
|
GetEnv()
|
|
$CATEGORY$
|
|
API
|
|
$SUBCATEGORY$
|
|
Environment
|
|
$ONELINER$
|
|
Obtains a system environmental setting.
|
|
$SYNTAX$
|
|
GetEnv( <cEnviroment> ) --> cReturn
|
|
$ARGUMENTS$
|
|
<cEnviroment> Environmental variable to obtain.
|
|
$RETURNS$
|
|
<cReturn> Value of the Environment Variable.
|
|
$DESCRIPTION$
|
|
This function yields a string that is the value of the
|
|
environment variable <cEnviroment>, which is stored at the
|
|
system-level.
|
|
|
|
If no environment variable
|
|
is found, an empty string is returned.
|
|
$EXAMPLES$
|
|
? GetEnv( "PATH" )
|
|
? GetEnv( "CONFIG" )
|
|
? GetEnv( "HARBOURCMD", "-n -l -es2" )
|
|
$STATUS$
|
|
R
|
|
$COMPLIANCE$
|
|
C
|
|
$PLATFORMS$
|
|
All
|
|
$FILES$
|
|
Library is core
|
|
$SEEALSO$
|
|
GetE()
|
|
$END$
|
|
*/
|
|
|
|
/* $DOC$
|
|
$TEMPLATE$
|
|
Function
|
|
$NAME$
|
|
GetE()
|
|
$CATEGORY$
|
|
API
|
|
$SUBCATEGORY$
|
|
Environment
|
|
$ONELINER$
|
|
Obtains a system environmental setting.
|
|
$SYNTAX$
|
|
GetE( <cEnviroment> ) --> cReturn
|
|
$ARGUMENTS$
|
|
<cEnviroment> Environmental variable to obtain.
|
|
$RETURNS$
|
|
<cReturn> Value of the Environment Variable.
|
|
$DESCRIPTION$
|
|
This function yields a string that is the value of the
|
|
environment variable <cEnviroment>, which is stored at the
|
|
system-level.
|
|
|
|
If no environment variable
|
|
is found, an empty string is returned.
|
|
$EXAMPLES$
|
|
? GetE( "PATH" )
|
|
? GetE( "CONFIG" )
|
|
$STATUS$
|
|
R
|
|
$COMPLIANCE$
|
|
C
|
|
$PLATFORMS$
|
|
All
|
|
$FILES$
|
|
Library is core
|
|
$SEEALSO$
|
|
GetEnv()
|
|
$END$
|
|
*/
|
|
|
|
/* $DOC$
|
|
$TEMPLATE$
|
|
Function
|
|
$NAME$
|
|
hb_GetEnv()
|
|
$CATEGORY$
|
|
API
|
|
$SUBCATEGORY$
|
|
Environment
|
|
$ONELINER$
|
|
Obtains a system environmental setting.
|
|
$SYNTAX$
|
|
hb_GetEnv( <cEnviroment>, [<cDefaultValue>] ) --> cReturn
|
|
$ARGUMENTS$
|
|
<cEnviroment> Environmental variable to obtain.
|
|
|
|
<cDefaultValue> Optional value to return if <cEnvironment> is not found.
|
|
$RETURNS$
|
|
<cReturn> Value of the environment variable or <cDefaultValue> or an empty string.
|
|
$DESCRIPTION$
|
|
This function yields a string that is the value of the
|
|
environment variable <cEnviroment>, which is stored at the
|
|
system-level.
|
|
|
|
If no environment variable
|
|
can be found, the value of the function will be <cDefaultValue>
|
|
if it is passed, else an empty string.
|
|
$EXAMPLES$
|
|
? hb_GetEnv( "PATH" )
|
|
? hb_GetEnv( "CONFIG" )
|
|
? hb_GetEnv( "HARBOURCMD", "-n -l -es2" )
|
|
$STATUS$
|
|
R
|
|
$COMPLIANCE$
|
|
H
|
|
$PLATFORMS$
|
|
All
|
|
$FILES$
|
|
Library is core
|
|
$SEEALSO$
|
|
GetEnv(), GetE()
|
|
$END$
|
|
*/
|
|
|
|
/* $DOC$
|
|
$TEMPLATE$
|
|
Procedure
|
|
$NAME$
|
|
__Run()
|
|
$CATEGORY$
|
|
API
|
|
$SUBCATEGORY$
|
|
Environment
|
|
$ONELINER$
|
|
Run an external program.
|
|
$SYNTAX$
|
|
__Run( <cCommand> )
|
|
$ARGUMENTS$
|
|
<cCommand> Command to execute.
|
|
$DESCRIPTION$
|
|
This command runs an external program. Ensure that
|
|
you have enough free memory to be able to run the external
|
|
program. Do not use it to run 'Terminate and Stay Resident' programs
|
|
(in case of MS-DOS) since that causes several problems.
|
|
|
|
Note: This function is what the RUN command preprocesses into.
|
|
It is considered bad form to use this function directly.
|
|
Use the RUN command instead.
|
|
$EXAMPLES$
|
|
__Run( "edit " + cMyTextFile ) // Runs an external editor
|
|
__Run( "command" ) // Gives a OS shell
|
|
$STATUS$
|
|
R
|
|
$COMPLIANCE$
|
|
C
|
|
$PLATFORMS$
|
|
All
|
|
$FILES$
|
|
Library is core
|
|
$SEEALSO$
|
|
RUN, hb_run()
|
|
$END$
|
|
*/
|
|
|
|
/* $DOC$
|
|
$AUTHOR$
|
|
Copyright 2000 Chen Kedem <niki@actcom.co.il>
|
|
$TEMPLATE$
|
|
Function
|
|
$NAME$
|
|
Tone()
|
|
$CATEGORY$
|
|
API
|
|
$SUBCATEGORY$
|
|
Environment
|
|
$ONELINER$
|
|
Sound a tone with a specified frequency and duration.
|
|
$SYNTAX$
|
|
Tone( <nFrequency>, <nDuration> ) --> NIL
|
|
$ARGUMENTS$
|
|
<nFrequency> A non-negative numeric value that specifies the
|
|
frequency of the tone in hertz.
|
|
|
|
<nDuration> A positive numeric value which specifies the duration
|
|
of the tone in 1/18 of a second units.
|
|
$RETURNS$
|
|
Tone() always returns NIL.
|
|
$DESCRIPTION$
|
|
Tone() is a sound function that could be used to irritate the end
|
|
user, his or her dog, and the surrounding neighborhood. The frequency
|
|
is limited to the range 0 to 32767 Hz.
|
|
$EXAMPLES$
|
|
// Good sound
|
|
Tone( 500, 1 )
|
|
Tone( 4000, 1 )
|
|
Tone( 2500, 1 )
|
|
|
|
// Bad sound
|
|
Tone( 300, 1 )
|
|
Tone( 499, 5 )
|
|
Tone( 700, 5 )
|
|
|
|
Tone( 800, 1 ) // same as hb_BChar( 7 )
|
|
Tone( 32000, 200 ) // any dogs around yet?
|
|
Tone( 130.80, 1 ) // musical note - C
|
|
Tone( 400, 0 ) // short beep
|
|
Tone( 700 ) // short beep
|
|
Tone( 10, 18.2 ) // 1 second delay
|
|
Tone( -1 ) // 1/18.2 second delay
|
|
Tone() // 1/18.2 second delay
|
|
$STATUS$
|
|
S
|
|
$COMPLIANCE$
|
|
C
|
|
$PLATFORMS$
|
|
All
|
|
$FILES$
|
|
Library is core
|
|
$SEEALSO$
|
|
Chr(), SET BELL
|
|
$END$
|
|
*/
|
|
|
|
/* $DOC$
|
|
$TEMPLATE$
|
|
Command
|
|
$NAME$
|
|
RUN
|
|
$CATEGORY$
|
|
API
|
|
$SUBCATEGORY$
|
|
Environment
|
|
$ONELINER$
|
|
Run an external program.
|
|
$SYNTAX$
|
|
RUN <cCommand>
|
|
$ARGUMENTS$
|
|
<cCommand> Command to execute.
|
|
$DESCRIPTION$
|
|
This command runs an external program. Please make sure that you have
|
|
enough free memory to be able to run the external program.
|
|
Do not use it to run Terminate and Stay Resident programs
|
|
(in case of DOS) since that causes several problems.
|
|
$EXAMPLES$
|
|
RUN ( "edit " + cMyTextFile ) // Runs an external editor
|
|
RUN command // Gives a OS shell
|
|
$STATUS$
|
|
R
|
|
$COMPLIANCE$
|
|
C
|
|
$PLATFORMS$
|
|
All
|
|
$FILES$
|
|
Library is core
|
|
$SEEALSO$
|
|
RUN
|
|
$END$
|
|
*/
|