#include "path.h" inherit "/std/outside"; void setup() { set_short("Lizard's Island: Beach\n"); set_light(LIGHT); add_property("no_undead",1); set_long("Lizard's Island: Beach\n\n" " This is the island's Southern-most point. Ocean surrounds you in every " "direction save to the West. Waves crash violently on all sides, except for the " "North, where there is a relative calm between two massive rocks. " "\n\n"); add_item("shells","These shells are common all over the island and are frail to " "the touch.\n"); add_item("sun","The sun beats down from above. It feels good to a lizard, such " "as yourself.\n"); add_feel(({"sand","floor","ground"}),"The ground is very hot, and the sand hot " "to the touch of your feet.\n"); add_item("waves","The waves are crashing down on the nearby rocks, sending a spray " "of water nearly 20 feet into the air with each impact.\n"); add_item("spray","The spray is flung so high up that it is little more than a " "gentle mist when it reaches your scaly skin.\n"); add_feel(({"spray","mist","ocean"}),"Due to the tropical nature of this island, the " "water and it's spray from hitting the rocks are all very warm.\n"); add_exit("west",ROOMS+"south11.c","path"); } void init() { add_action("do_dive","dive"); add_action("do_dive","swim"); ::init(); } int do_dive(string str) { if(str == "ocean") { if(this_player()->query_property("diver")) { TP->move(WATER+"water1.c"); TP->look_me(); return 1; } else { write("You're not sure it's safe to dive in here.\n"); return 1; } } else { write("Dive into what?\n"); return 1; } }