16 lines
332 B
Plaintext
16 lines
332 B
Plaintext
//
|
|
// $Id$
|
|
//
|
|
|
|
function main()
|
|
local cNewLine := chr (13)+chr (10)
|
|
OutStd( cMonth( date() ) + cNewLine )
|
|
OutStd( cMonth( date() + 31 ) + cNewLine )
|
|
OutStd( cMonth( date() + 60 ) + cNewLine )
|
|
|
|
OutStd( cDow( date() ) + cNewLine )
|
|
OutStd( cDow( date() + 6 ) + cNewLine )
|
|
OutStd( cDow( date() + 7 ) + cNewLine )
|
|
|
|
return nil
|