//     /d/standard/booth.c
//     from the Nightmare mudlib
//     a nice, simple polling booth
//     created by Gregon@Nightmare Jan 1994

#include <daemons.h>
#define BOOTH_VOTES "/domains/Praxis/data/booth_votes"
#define BOOTH_QUESTION "/domains/Praxis/data/booth_question"
inherit "/lib/std/room";

int a,b;
mapping vote;

void create() {
    ::create();
    SetShort("Nightmare referendum room");
    SetProperty("light", 2);
    SetProperty("indoors", 1);
    SetLong(
      "This is the referendum room of Nightmare.  Players come here to vote "+
      "on issues that the wizards desire input on.  The current voting "+
      "question is posted on the wall <read question> will display it."
    );

    SetExits( (["down" : "/domains/Praxis/adv_main"]) );
    vote=([]);
    restore_object(BOOTH_VOTES);
}

void init() {
    ::init();
    add_action("vote", "vote");
    add_action("read", "read");
    if(archp(this_player())) add_action("check", "check");

}

int vote(string str) {
    string me;

    me=(string)this_player()->query_name();
    if(str!="a" && str!="b") {
	notify_fail("You may only vote for a or b.\n");
	return 0;
    }
    if(PLAYERS_D->non_voter(me)) {
	write("You are listed as a second character.  You may not vote.");
	return 1;
    }
    if(vote[me]) {
	write("You have already voted.");
	return 1;
    }
    if(str=="a") {
	vote[me]="a";
	a++;
	write("Vote counted.  Thank you.");
	save_object(BOOTH_VOTES);
	return 1;
    }
    if(str=="b") {
	vote[me]="b";
	b++;
	write("Vote counted.  Thank you.");
	save_object(BOOTH_VOTES);
	return 1;
    }

}

int read(string str) {
    if(!str || str != "question") return 0;
    write("The current voting question is this:\n");
    this_player()->more(BOOTH_QUESTION); 
    return 1;
}

int check(){
    write("A: "+a+"\nB: "+b);
    return 1;
}