#!/usr/bin/perl -w

#############################################################################
# CoW::Dromed::Constants - a classes defining and exporting all the constants
# you might need in a dromed world
#
# Copyright (C) 1999-2000 by Tels. All rights reserved.
#############################################################################

package CoW::Dromed::Constants;
use vars qw($VERSION);
$VERSION = 1.00;    # Current version of this package
require  5.005;     # requires this Perl version or later

use base Exporter;
@EXPORT	= qw();
@EXPORT_OK	= qw(
		CUBE WEDGE PYRAMID CYLINDER CONE 
		SOLID AIR WATER FLOOD EVAPORATE
		);
use strict;
use vars qw($AUTOLOAD);

#############################################################################
# constants 

# brush shape

use constant CUBE => 0;
use constant WEDGE => 1;
use constant CYLINDER => 2;
use constant PYRAMID => 3;
use constant CONE => 4;

# brush kind

use constant SOLID => 0;
use constant AIR => 1;
use constant FLOOD => 2;
use constant WATER => 3;
use constant EVAPORATE => 4;
use constant WATER_2_SOLID => 5;
use constant AIR_2_SOLID => 6;

# cell kind

use constant EMPTY => -1;
                                 
1; 

__END__

#############################################################################

=pod

=head1 NAME

Cow::Dromed::Constants - define important constants.

=head1 SYNOPSIS

	use CoW::Dromed::Constants qw( AIR CUBE); # etc

	print "AIR is ",AIR,"\n";

=head1 REQUIRES

perl5.005, Exporter

=head1 EXPORTS

Exports nothing on default.

=head1 DESCRIPTION

This package defines and exports on request all the
important constants for DromEd, the Looking Glass editor for Thief, Thief II
and System Shock II. 

=head1 BUGS

None known yet.

=head1 AUTHOR

Tels http://bloodgate.com in 1999-2000.

=cut

