inherit "std/room"; void init() { ::init(); add_action("go_north", "north"); } void create() { ::create(); set_property("light", 2); set_property("indoors", 1); set_short( "Horace's Adventurer's Supply Shop"); set_long( "Welcome to Horace's Adventurer's Supply Shop!\n" "Horace buys and sells goods created for and found " "by adventurer's when he is in. The store opens out " "onto Boc La Road south. There is a passage to the " "north guarded by a magic field."); set_items( (["shop" : "You can buy and sell things here.", "passage" : "Horace keeps the things he has for sale back there.", "road" : "Boc La Road."]) ); set_exits( (["south" : "/domains/Praxis/e_boc_la2"]) ); set_property("no castle", 1); } void reset() { ::reset(); if(!present("horace")) new("/domains/Praxis/obj/mon/horace")->move(this_object()); } int go_north() { if((string)this_player()->query_position() == "player" || (string)this_player()->query_position() == "high mortal") { write("The magic of Horace stops you."); say(this_player()->query_cap_name()+" is stopped by the magic of Horace.", this_player()); return 1; } write("You cannot be stopped by Horace's magic."); say(this_player()->query_cap_name()+" cannot be stopped by Horace's "+ "magic.", this_player()); this_player()->move_player("/domains/Praxis/storage", "north"); return 1; }