25 

    25 

    26 {$INCLUDE "config.inc"}

    26 {$INCLUDE "config.inc"}

    27 

    27 

    28 const

    28 const

    29     sfMax = 1000;

    29     sfMax = 1000;

    30     cDefaultParamNum = 17;

    31     cDefaultParamNum = 17;

    31 

    36 

    32     // message constants

    37     // message constants

    33     errmsgCreateSurface   = 'Error creating SDL surface';

    38     errmsgCreateSurface   = 'Error creating SDL surface';

    34     errmsgTransparentSet  = 'Error setting transparent color';

    39     errmsgTransparentSet  = 'Error setting transparent color';

    35     errmsgUnknownCommand  = 'Unknown command';

    40     errmsgUnknownCommand  = 'Unknown command';