# Commands for Gccg to bring cards from out-of-play to various zones.
#
# Copyright (C) 2005 Neil Moore <neil@s-z.org>.  Distributed with NO WARRANTY
# under the terms of the GPL, version 2 (only).

if(msg.box != NULL) {
	Msg("Loading {gold}Toplay.command");
}

def BringCardTo
{
	push(c);
	c = RecognizeCard(ARG[0]);
	if(c == NULL) {
		Msg("{red}No such card: {gold}" + ARG[0] + "{red}.");
	} else {
		Send("Transfer", (1, ("out.of.play", c), tail(ARG)));
		
	}
	c = pop();
}

def PlayCommandToplay
{
	BringCardTo(join(ARG, " "), "play", 0);
}

def PlayCommandTohand
{
	BringCardTo(join(ARG, " "), "hand", me);
}

def PlayCommandSetaside
{
	BringCardTo(join(ARG, " "), "active", me);
}

HELP{"play"}{"toplay"}=("card","bring a card to play",NULL,
"Bring a card named {yellow}<card>{white} to play from out-of-play.");

HELP{"play"}{"tohand"}=("card","bring a card to hand",NULL,
"Bring a card named {yellow}<card>{white} to hand from out-of-play.");

HELP{"play"}{"setaside"}=("card","bring a card to set-aside area",NULL,
"Bring a card named {yellow}<card>{white} to the set-aside area from out-of-play.");