home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
PC Press 1997 July
/
Sezamfile97_1.iso
/
msdos
/
clipper
/
c50xp300.a01
/
EXPAND.CH
next >
Wrap
Text File
|
1992-10-01
|
1KB
|
44 lines
* ------------------------------------------------------------------------
* File........: EXPAND.CH
* Author......: Pepijn Smits
* Copyright...: (c)1992, by Softwarebureau Pepijn Smits
* Date........: August 1992.
* Compiler....: Clipper 5.01
* Notes.......: Expand Library standard Header file.
* ------------------------------------------------------------------------
* Default values for Parameters
#command DEFAULT <Param> [TO] <Value> ;
=> ;
<Param> := If( <Param> = NIL , <Value> , <Param> )
* Adapt Statics when parameters have been supplied
#command ADAPT <Value> [TO] <Param> ;
=> ;
<Value> := If( <Param> = NIL , <Value> , <Param> )
* Alleviate a big frustration for us Dutch..
#command SET DATE [TO] DUTCH ;
=> ;
SET DATE FORMAT TO "DD-MM-YYYY"
* Date Format to the setting from DOS
#command SET DATE [TO] DOS [COUNTRY] ;
=> ;
SET DATE FORMAT TO XPdateFormat()
#define K_SPACE 32 // Missing in inkey.ch
#define CPS30 0 // Chars/Second for XPkeySpeed()
#define CPS24 2
#define CPS20 4
#define CPS15 8
#define CPS10 12
#define CPS8 15
#define CPS6 18
#define CPS5 20
#define CPS4 23
#define CPS3 26
#define CPS2 31