73              Timer: LongWord;

    73              Timer: LongWord;

    74              AmmoType: TAmmoType;

    74              AmmoType: TAmmoType;

    75              end;

    75              end;

    76 

    76 

    77 

    77 

    79       errmsgCreateSurface   = 'Error creating SDL surface';

    79       errmsgCreateSurface   = 'Error creating SDL surface';

    80       errmsgTransparentSet  = 'Error setting transparent color';

    80       errmsgTransparentSet  = 'Error setting transparent color';

    81       errmsgUnknownCommand  = 'Unknown command';

    81       errmsgUnknownCommand  = 'Unknown command';

    82       errmsgUnknownVariable = 'Unknown variable';

    82       errmsgUnknownVariable = 'Unknown variable';

    83       errmsgIncorrectUse    = 'Incorrect use';

    83       errmsgIncorrectUse    = 'Incorrect use';