Files
harbour-core/harbour/tests/working/hardcr.prg

17 lines
296 B
Plaintext

//
// $Id$
//
function main()
OutStd( HardCR( "[HARBOUR]" + chr(141)+chr(10) + ;
"[POWER]" + chr(141)+chr(10) + ;
"[MAGIC]" ) )
OutStd( "[HARBOUR]" + chr(141)+chr(10) + ;
"[POWER]" + chr(141)+chr(10) + ;
"[MAGIC]" )
return nil