m�
�=5Dc@s9dZd
k
Z
d
kZdkTdklZlZlZlZ
def
d��YZdZ	dZ
dZe	d	eZe
d
eZ
dZdZd
ZdZdZdZdZdZhZxeefD]Zeee<q�WxeefD]Zeee<q�Wei�Zee�
ZdZdZdZdZe dd�Z!ee!�
Z"ddge#e$e d	d��dddgZ%dZ&dfd��YZ'd fd!��YZ(d"e(f
d#��YZ)d$�Z*d%e(f
d&��YZ+d'e+f
d(��YZ,d)e+f
d*��YZ-d+fd,��YZ.d-�Z/e0d.jo
e/�
n

d
S(/s�
Solitaire game, much like the one that comes with MS Windows.

Limitations:

- No cute graphical images for the playing cards faces or backs.
- No scoring or timer.
- No undo.
- No option to turn 3 cards at a time.
- No keyboard shortcuts.
- Less fancy animation when you win.
- The determination of which stack you drag to is more relaxed.

Apology:

I'm not much of a card player, so my terminology in these comments may
at times be a little unusual.  If you have suggestions, please let me
know!

N(
t
*(s	Rectangles
CanvasTextsGroupsWindowtGroupcBstZ
ddd
�ZRS(NcCs|i
i|i|
|�S(
N(tselftcanvasttag_bindtidtsequencetcommand(RRR((t2/usr/lib/python2.4/Demo/tkinter/guido/solitaire.pytbind%s
(t__name__t
__module__tNoneR	(((RR
$s
idi�i
iiis#070tHearttDiamondtClubtSpadetredtblacki
iii
itt
At
Jt
Qt
KitCardc
BsMtZ
dZd
�Zd�Zd�Zd�Zd�Zd�Zd�Z	RS(s�A playing card.

    A card doesn't record to which stack it belongs; only the stack
    records this (it turns out that we always know this from the
    context, and this saves a ``double update'' with potential for
    inconsistencies).

    Public methods:

    moveto(x, y) -- move the card to an absolute position
    moveby(dx, dy) -- move the card by a relative offset
    tkraise() -- raise the card to the top of its stack
    showface(), showback() -- turn the card face up or down & raise it

    Public read-only instance variables:

    suit, value, color -- the card's suit, value and color
    face_shown -- true when the card is shown face up, else false

    Semi-public read-only instance variables (XXX should be made
    private):

    group -- the Canvas.Group representing the card
    x, y -- the position of the card's top left corner

    Private instance variables:

    __back, __rect, __text -- the canvas items making up the card

    (To show the card face up, the text item is placed in front of
    rect and the back is placed behind it.  To show it face down, this
    is reversed.  The card is created face down.)

    c
Cs
|
|_||_t|
|_d
|_d
|_|_t|�
|_
dt||
f}t
|tdd
dtd|id|�|_|i
i|i�

t|d
d
ttdddd	�|_|i
i|i�

t|ttttttdddd
�|_|i
i|i�

dS(s

Card constructor.

        Arguments are the card's suit and value, and the canvas widget.

        The card is created at position (0, 0), with its face down
        (adding it to a stack will position it according to that
        stack's rules).

        is%s  %sitanchortfillttexttoutlineRtwhitetblueN(tsuitRtvaluetCOLORtcolort
face_shownt
xt
yR
RtgrouptVALNAMESRt
CanvasTextt	CARDWIDTHt
Nt_Card__texttaddtag_withtagt	Rectanglet
CARDHEIGHTt_Card__recttMARGINt_Card__back(RRR RR((Rt__init__�s$	
	
	


	








c

Csd
|i
|ifS(s+Return a string for debug print statements.sCard(%r, %r)N(RRR (
R((Rt__repr__�s

cCs"|i
|
|i||i�
d
S(s*Move the card to absolute position (x, y).N(RtmovebyR$R%(RR$R%((Rtmoveto�s

cCs7|i
|
|_
|i||_|ii|
|�
d
S(sMove the card by (dx, dy).N(RR$tdxR%tdyR&tmove(RR6R7((RR4�s



c


Cs|i
i�
d
S(s5Raise the card above all other objects in its canvas.N(RR&ttkraise(
R((RR9�s

c

Cs1|i
�
|ii
�
|ii
�
d
|_dS(sTurn the card's face up.i
N(RR9R/R+R#(
R((Rtshowface�s








c

Cs1|i
�
|ii
�
|ii
�
d
|_dS(sTurn the card's face down.iN(RR9R/R1R#(
R((Rtshowback�s








(
R
Rt__doc__R2R3R5R4R9R:R;(((RRss#	 					tStackcBs�tZ
dZed
�
Zd�Zd�Zd�Zd�Zd�Z	d�Z
d�Zd	�Zd
�Z
d�Zd�Zd
�Zd�Zd�ZeZd�Zd�Zd�ZRS(s�A generic stack of cards.

    This is used as a base class for all other stacks (e.g. the deck,
    the suit stacks, and the row stacks).

    Public methods:

    add(card) -- add a card to the stack
    delete(card) -- delete a card from the stack
    showtop() -- show the top card (if any) face up
    deal() -- delete and return the top card, or None if empty

    Method that subclasses may override:

    position(card) -- move the card to its proper (x, y) position

        The default position() method places all cards at the stack's
        own (x, y) position.

    userclickhandler(), userdoubleclickhandler() -- called to do
    subclass specific things on single and double clicks

        The default user (single) click handler shows the top card
        face up.  The default user double click handler calls the user
        single click handler.

    usermovehandler(cards) -- called to complete a subpile move

        The default user move handler moves all moved cards back to
        their original position (by calling the position() method).

    Private methods:

    clickhandler(event), doubleclickhandler(event),
    motionhandler(event), releasehandler(event) -- event handlers

        The default event handlers turn the top card of the stack with
        its face up on a (single or double) click, and also support
        moving a subpile around.

    startmoving(event) -- begin a move operation
    finishmoving() -- finish a move operation

    cCs�|
|_||_||_g|_t|ii�
|_|iid
|i	�
|iid|i
�
|iid|i�
|iid|i�
|i
�
dS(s
Stack constructor.

        Arguments are the stack's nominal x and y position (the top
        left corner of the first card placed in the stack), and the
        game object (which is used to get the canvas; subclasses use
        the game object to find other stacks).

        s<1>s
<Double-1>s<B1-Motion>s<ButtonRelease-1>N(R$RR%tgametcardsR
RR&R	tclickhandlertdoubleclickhandlert
motionhandlertreleasehandlert
makebottom(RR$R%R>((RR2
s
	
	
	
	





c


CsdS(
N((
R((RRD
s
c

Csd
|i
i|i|ifS(s+Return a string for debug print statements.s
%s(%d, %d)N(Rt	__class__R
R$R%(
R((RR3
s

cCs>|i
i|
�

|
i�
|i|
�

|ii|
i�

dS(
N(RR?tappendtcardR9tpositionR&R,(RRG((Rtadd%
s





cCs'|i
i|
�

|
ii|i�

dS(
N(RR?tremoveRGR&tdtag(RRG((Rtdelete+
s

c

Cs#|i
o
|i
d
i�
n

dS(Ni����(RR?R:(
R((Rtshowtop/
s


c
Cs0|i
p
dSn

|i
d
}
|i|
�

|
S(Ni����(RR?RRGRL(RRG((Rtdeal3
s








cCs|
i
|i|i�
dS(
N(RGR5RR$R%(RRG((RRH<
s
c


Cs|i
�
dS(
N(RRM(
R((Rtuserclickhandler?
s
c


Cs|i
�
dS(
N(RRO(
R((RtuserdoubleclickhandlerB
s
cCs"x|
D]}|i|�

qWdS(
N(R?RGRRH(RR?RG((RtusermovehandlerE
s

cCs%|i
�
|i�
|i|
�

dS(
N(RtfinishmovingROtstartmovingtevent(RRT((RR@K
s




cCs|i
|
�

dS(
N(Rt
keepmovingRT(RRT((RRBP
s
cCs|i
|
�

|i�
dS(
N(RRURTRR(RRT((RRCS
s


cCs%|i
�
|i�
|i|
�

dS(
N(RRRRPRSRT(RRT((RRAW
s




cCs�d|_|iiid
�
}xFtt|i	�
�
D]+}|i	|}|ii
|jo
Pq4
q4WdS|ip
dSn

|i	||_|
i|_|
i|_x|iD]}|i�
q�WdS(Ntcurrent(RRtmovingR>RtgettagsttagstrangetlenR?t
iRGR&ttagR#RTR$tlastxR%tlastyR9(RRTRYR\RG((RRS`
s 
	





	








cCs�|i
p
dSn

|
i|i}|
i|i}|
i|_|
i|_|p
|o(
x%|i
D]}|i
||�
qbWn

dS(
N(RRWRTR$R^R6R%R_R7RGR4(RRTRGR6R7((RRUq
s










c
Cs.|i
}
d|_
|
o
|i|
�

n

dS(
N(RRWR?RRQ(RR?((RRR|
s
	
	

(R
RR<RR2RDR3RIRLRMRNRHRORPRQR@RBRCRARWRSRURR(((RR=�s(-																	tDeckc
Bs2tZ
dZd
�Zd�Zd�Zd�ZRS(s7
The deck is a stack with support for shuffling.

    New methods:

    fill() -- create the playing cards
    shuffle() -- shuffle the playing cards

    A single click moves the top card to the game's open deck and
    moves it face up; if we're out of cards, it moves the open deck
    back to the deck.

    c

CsRt|ii|i|i|it|itd
ddt�}
|i
i|
�

dS(NRRR(R-RR>RR$R%R)R.t
BACKGROUNDtbottomR&R,(RRb((RRD�
s





c
CsEx>tD]6}x-tD]%}
|it||
|ii��

qWqWdS(
N(	tALLSUITSRt	ALLVALUESR RRIRR>R(RR R((RR�
s



c
CsMt|i�
}g}x(t|�
D]}
|i|i|
�

q"W||_dS(
N(R[RR?t
ntnewcardstrandpermR\RF(RR\ReRf((Rtshuffle�
s





c
Cs{|i
i}
|i�}|p;
xU|
i�}|p
Pn

|i|�

|i�
q"
Wn
|i
ii|�

|i�
dS(Ni
(RR>topendeckRNRGRIR;R:(RRiRG((RRO�
s










(R
RR<RDRRhRO(((RR`�
s

			c
CsNt|�
}g}x5|o-
ti|�
}
|i|
�

|i|
�

q
W|S(s4Function returning a random permutation of range(n).N(	RZRet
rR$trandomtchoiceR\RFRJ(ReR\RjR$((RRg�
s








t	OpenStackc
Bs#tZ
d
�Zd�Zd�ZRS(Nc
Csd
S(Ni((RR?((Rt
acceptable�
s
cCs�|
d
}|ii|�
}|p
||jp
|i|
�
o
ti||
�
n9
x(|
D] }|i	|�

|i
|�

q]W|ii�
dS(Ni(R?RGRR>tcloseststacktstackRnR=RQRLRItwincheck(RR?RpRG((RRQ�
s



&




c
Cs�|i
p
dSn

|i
d
}|ip
|i�
dSn

xS|iiD]E}
|
i|g
�
o,
|i	|�

|
i
|�

|ii�
PqH
qHWdS(Ni����(RR?RGR#ROR>tsuitst
sRnRLRIRq(RRsRG((RRP�
s



















(R
RRnRQRP(((RRm�
s		t	SuitStackc
Bs,tZ
d
�Zd�Zd�Zd�ZRS(Nc

CsBt|ii|i|i|it|itd
ddd�}
dS(NRRRR(	R-RR>RR$R%R)R.Rb(RRb((RRD�
s



c


CsdS(
N((
R((RRO�
s
c


CsdS(
N((
R((RRP�
s
cCstt|
�
d
jo
dSn

|
d}|i
p
|itjSn

|i
d}|i|ijo
|i|id
jS(Ni
ii����(R[R?RGRR tACEttopcardR(RR?RvRG((RRn�
s









(R
RRDRORPRn(((RRt�
s			tRowStackc
BstZ
d
�Zd�ZRS(NcCsk|
d
}|ip
|itjSn

|id}|ip
d
Sn

|i|ijo
|i|idjS(Nii����i
(R?RGRR tKINGRvR#R"(RR?RvRG((RRn�
s










cCsl|i
}xI|iD]>}||
jo
Pn

|io
|d
t}q
|t}qW|
i|i	|�
dS(Ni(
RR%R?t
cRGR#R0tOFFSETR5R$(RRGRyR%((RRH
s
	








(R
RRnRH(((RRw�
s		t	Solitairec
BsGtZ
d
�Zd�Zd�Zd�Zd�Zd�Zd�ZRS(NcCs�
|
|_t|id
tdddttddtdt�
|_|ii	dt
d	t�
t|id
dddd
tdd
d|i
�
|_t|itdtdd|idt�
t}t}t|||�|_|t}t|||�|_|t}g|_x:tt�
D],}|t}|iit|||��

q
Wt}|t}g|_x:tt�
D],}|iit|||��

|t}qo
W|ig
|i|i|_|ii �
|i
�
dS(Nt
backgroundthighlightthicknessitwidththeightiiRtexpandRtDealtactivebackgroundtgreenRtwindowR(!tmasterRtCanvasRatNROWStXSPACINGtYSPACINGR0RtpacktBOTHtTRUEtButtonRNt
dealbuttontWindowtSWR$R%R`tdeckRmRiRrRZtNSUITSR\RFRttrowsRwt
openstacksR(RR�R%R\R$((RR2sH
		





	











	




 

	





c
CsJx/|i
D]$}
t|
i�
tjo
dSq

q
W|i�
|i�
dS(
N(RRrRsR[R?tNVALUEStwinRN(RRs((RRq=s






c
Csig}
x|iD]}|
|i}
qWx;|
o3
ti|
�
}|
i|�

|i||i	�
q*
Wd
S(sStupid animation when you win.N(
R?RR�RsRkRlRGRJtanimatedmovetoR�(RR?RsRG((RR�Ds









cCsgx`td
dd�D]L}|i|
i||i|
i|}}|
i||�
|i
i�
qWdS(Ni
ii����(RZR\tdestR$RGR%R6R7R4RR�tupdate_idletasks(RRGR�R\R6R7((RR�Ns


)

cCsgd}d
}xT|iD]I}|i|
id|i|
id}||jo
|}|}q
qW|S(Ni�ɚ;i(
RtclosesttcdistRR�RpR$RGR%tdist(RRGR�R�R�Rp((RRoTs



&




c
Cs�|i
�
|ii�
xHtt�
D]:}
x1|i|
D]"}|ii	�}|i|�

q8Wq$Wx|iD]}|i�
qlWdS(
N(
RtresetR�RhRZR�R\R�RjRNRGRIRM(RR\RjRG((RRN`s











c
CsRxK|i
D]@}
x7|
i�}|p
Pn

|ii|�

|i�
q
Wq
WdS(Ni
(RR�RpRNRGR�RIR;(RRpRG((RR�js







(	R
RR2RqR�R�RoRNR�(((RR{
s	.		
			
cCs6t�}
t|
�
}|
id
|
i�
|
i�
dS(NtWM_DELETE_WINDOW(tTktrootR{R>tprotocoltquittmainloop(R>R�((Rtmainvs
	


t__main__(1R<tmathRktTkinterR�R-R(R
R�R)R.R0R�R�RzRatHEARTStDIAMONDStCLUBStSPADEStREDtBLACKR!RstkeysRcR[R�RutJACKtQUEENRxRZRdR�tmaptstrR'R�RR=R`RgRmRtRwR{R�R
((R
RuRkR�R�RaR�RdR�RmR�RxR�R�R�R�R-R'R�R�R.R�R(RcRgR)R�RzR�R`R�RwR=R!RsRR�RtR0R{((Rt
?s\	
	






















/f�1	i