inherit "room/room";
#include "../harbour.h"
#define SHIP_PRAES 2

#ifndef WAYS
#define WAYS ({ }) 
#endif
#ifndef LONG_DESC
#define LONG_DESC ""
#endif
#ifndef SPEC_DESC
#define SPEC_DESC ""
#endif
#ifndef CLONE
#define CLONE ;
#endif


reset (int arg)
{ ::reset(arg);
  if(arg) return 0;

  set_light(1);
  short_desc="Local town habour.",
  long_desc="Local town harbour.\n"+
 	"You are standing on a long wooden pier. Small waves are\n" +
	"rolling towards the coast. The wind is very strong today\n" +
	"and you see some boats upside down. Many ships and boats can\n"+
	"land here and perhaps you should wait for one.\n" + SPEC_DESC;

  items=({
	"pier", "It's a large wooden pier",
	"wave","They are really small ones",
	"waves","They are really small ones",
	"wind","HUI ! What a strong boe",
	"boats","You see some people sitting on the bottom and waving"
         });

   smell="The air is a bit salty in here";

  if(random(SHIP_PRAES)==0)
  CO("ship");
   dest_dir=WAYS;

  CLONE;
}
