solgame.cpp File Reference

#include "solitaire.h"

Include dependency graph for solgame.cpp:

Go to the source code of this file.

Macros
#define	TRACE(s)

Functions
void	NewGame (void)
bool CARDLIBPROC	RowStackDragProc (CardRegion &stackobj, int iNumDragCards)
bool CARDLIBPROC	RowStackDropProc (CardRegion &stackobj, CardStack &dragcards)
bool	CanDrop (CardRegion &stackobj, Card card)
bool CARDLIBPROC	SuitStackDropProc (CardRegion &stackobj, CardStack &dragcards)
void CARDLIBPROC	SuitStackClickProc (CardRegion &stackobj, int iNumClicked)
void CARDLIBPROC	RowStackClickProc (CardRegion &stackobj, int iNumClicked)
CardRegion *	FindSuitStackFromCard (Card card)
void CARDLIBPROC	SuitStackAddProc (CardRegion &stackobj, const CardStack &added)
void CARDLIBPROC	RowStackDblClickProc (CardRegion &stackobj, int iNumClicked)
void CARDLIBPROC	PileClickProc (CardRegion &stackobj, int iNumClicked)
void CARDLIBPROC	PileDblClickProc (CardRegion &stackobj, int iNumClicked)
void	FixIfOneCardLeft (void)
void CARDLIBPROC	PileRemoveProc (CardRegion &stackobj, int iItems)
void CARDLIBPROC	DeckClickProc (CardRegion &stackobj, int iNumClicked)

Variables
TCHAR	MsgWin [128]
TCHAR	MsgDeal [128]
CardStack	activepile
int	VisiblePileCards
int	LastId
bool	fGameStarted = false
bool	bAutoroute = false

Macro Definition Documentation

TRACE

#define TRACE

(

s

)

Definition at line 4 of file solgame.cpp.

Function Documentation

CanDrop()

bool CanDrop	(	CardRegion &	stackobj,
		Card	card
	)

Definition at line 197 of file solgame.cpp.

{
    TRACE("ENTER CanDrop()\n");
    int topval;
 
    const CardStack &cardstack = stackobj.GetCardStack();
 
    SetPlayTimer();
 
    if(cardstack.NumCards() > 0)
    {
        if(card.Suit() != cardstack[0].Suit())
        {
            TRACE("EXIT CanDrop()\n");
            return false;
        }
 
        topval = cardstack[0].LoVal();
    }
    else
    {
        topval = 0;
    }
 
    //make sure 1 higher
    if(card.LoVal() != (topval + 1))
    {
        TRACE("EXIT CanDrop()\n");
        return false;
    }
 
    TRACE("EXIT CanDrop()\n");
    return true;
}

Referenced by FindSuitStackFromCard(), and SuitStackDropProc().

DeckClickProc()

void CARDLIBPROC DeckClickProc	(	CardRegion &	stackobj,
		int	iNumClicked
	)

Definition at line 504 of file solgame.cpp.

{
    TRACE("ENTER DeckClickProc()\n");
 
    SetPlayTimer();
 
    CardStack cardstack = stackobj.GetCardStack();
    CardStack pile      = pPile->GetCardStack();
 
    fGameStarted = true;
    SetPlayTimer();
 
    //reset the face-up pile to represent 3 cards
    if(dwOptions & OPTION_THREE_CARDS)
        pPile->SetOffsets(CS_DEFXOFF, 1);
 
    if(cardstack.NumCards() == 0)
    {
        if (GetScoreMode() == SCORE_VEGAS)
        {
            if (dwWasteCount < dwWasteTreshold)
            {
                pile.Clear();
 
                activepile.Reverse();
                cardstack.Push(activepile);
                activepile.Clear();
                SetUndo(PILE_ID, DECK_ID, cardstack.NumCards(), lScore, VisiblePileCards);
                VisiblePileCards = 0;
            }
        }
        else if (GetScoreMode() == SCORE_STD)
        {
            SetUndo(PILE_ID, DECK_ID, activepile.NumCards(), lScore, VisiblePileCards);
            if ((dwWasteCount >= dwWasteTreshold) && (activepile.NumCards() != 0))
            {
                if (dwOptions & OPTION_THREE_CARDS)
                    lScore = lScore >= 20 ? lScore - 20 : 0;
                else
                    lScore = lScore >= 100 ? lScore - 100 : 0;
            }
 
            pile.Clear();
 
            activepile.Reverse();
            cardstack.Push(activepile);
            activepile.Clear();
            VisiblePileCards = 0;
 
            UpdateStatusBar();
        }
        else
        {
            pile.Clear();
 
            activepile.Reverse();
            cardstack.Push(activepile);
            activepile.Clear();
            SetUndo(PILE_ID, DECK_ID, cardstack.NumCards(), lScore, VisiblePileCards);
            VisiblePileCards = 0;
        }
 
        dwWasteCount++;
    }
    else
    {
        int numcards = min((dwOptions & OPTION_THREE_CARDS) ? 3 : 1, cardstack.NumCards());
 
        SetUndo(DECK_ID, PILE_ID, numcards, lScore, VisiblePileCards);
 
        //make a "visible" copy of these cards
        CardStack temp;
        temp = cardstack.Pop(numcards);
        temp.Reverse();
 
        if(dwOptions & OPTION_THREE_CARDS)
            pile.Clear();
 
        pile.Push(temp);
 
        //remove the top 3 from deck
        activepile.Push(temp);
 
        VisiblePileCards = numcards;
    }
 
    activepile.Print();
 
    pDeck->SetCardStack(cardstack);
    pPile->SetCardStack(pile);
 
    FixIfOneCardLeft();
 
    SolWnd.Redraw();
    TRACE("EXIT DeckClickProc()\n");
}

Referenced by CreateSol().

FindSuitStackFromCard()

CardRegion * FindSuitStackFromCard

(

Card

card

)

Definition at line 323 of file solgame.cpp.

{
    TRACE("ENTER FindSuitStackFromCard()\n");
 
    for(int i = 0; i < 4; i++)
    {
        if(CanDrop(*pSuitStack[i], card))
        {
            TRACE("EXIT FindSuitStackFromCard()\n");
            return pSuitStack[i];
        }
    }
 
    TRACE("EXIT FindSuitStackFromCard()\n");
    return 0;
}

Referenced by RowStackDblClickProc().

FixIfOneCardLeft()

void FixIfOneCardLeft

(

void

)

Definition at line 465 of file solgame.cpp.

{
    // If there is just 1 card left, then modify the
    // stack to contain ALL the face-up cards. The effect
    // will be, the next time a card is dragged, all the
    // previous card-triplets will be available underneath.
    if ((dwOptions & OPTION_THREE_CARDS) && pPile->NumCards() == 1)
    {
        pPile->SetOffsets(0, 0);
        pPile->SetCardStack(activepile);
    }
}

Referenced by DeckClickProc(), and PileRemoveProc().

NewGame()

void NewGame

(

void

)

Definition at line 18 of file solgame.cpp.

{
    TRACE("ENTER NewGame()\n");
    int i, j;
 
    if (GetScoreMode() == SCORE_VEGAS)
    {
        if ((dwOptions & OPTION_KEEP_SCORE) && (dwPrevMode == SCORE_VEGAS))
            lScore = lScore - 52;
        else
            lScore = -52;
 
        if (dwOptions & OPTION_THREE_CARDS)
            dwWasteTreshold = 2;
        else
            dwWasteTreshold = 0;
 
    }
    else
    {
        if (dwOptions & OPTION_THREE_CARDS)
            dwWasteTreshold = 3;
        else
            dwWasteTreshold = 0;
 
        lScore = 0;
    }
 
    dwTime = 0;
    dwWasteCount = 0;
    LastId = 0;
 
    SolWnd.EmptyStacks();
 
    //create a new card-stack
    CardStack deck;
    deck.NewDeck();
    deck.Shuffle();
    activepile.Clear();
    VisiblePileCards = 0;
 
    //deal to each row stack..
    for(i = 0; i < NUM_ROW_STACKS; i++)
    {
        CardStack temp;
        temp.Clear();
 
        pRowStack[i]->SetFaceDirection(CS_FACE_DOWNUP, i);
 
        for(j = 0; j <= i; j++)
        {
            temp.Push(deck.Pop());
        }
 
        pRowStack[i]->SetCardStack(temp);
    }
 
    //put the other cards onto the deck
    pDeck->SetCardStack(deck);
    pDeck->Update();
 
    // For the 1-card-mode, all cards need to be completely overlapped
    if(!(dwOptions & OPTION_THREE_CARDS))
        pPile->SetOffsets(0, 0);
 
    SolWnd.Redraw();
 
    fGameStarted = false;
 
    dwPrevMode = GetScoreMode();
 
    UpdateStatusBar();
    ClearUndo();
 
    TRACE("EXIT NewGame()\n");
 
}

Referenced by DifficultyDlgProc(), ShowGameOptionsDlg(), SuitStackAddProc(), and WndProc().

PileClickProc()

void CARDLIBPROC PileClickProc	(	CardRegion &	stackobj,
		int	iNumClicked
	)

Definition at line 438 of file solgame.cpp.

{
    TRACE("ENTER SuitStackClickProc()\n");
 
    fGameStarted = true;
 
    LastId = stackobj.Id();
 
    TRACE("EXIT SuitStackClickProc()\n");
}

Referenced by CreateSol().

PileDblClickProc()

void CARDLIBPROC PileDblClickProc	(	CardRegion &	stackobj,
		int	iNumClicked
	)

Definition at line 452 of file solgame.cpp.

{
    TRACE("ENTER PileDblClickProc()\n");
 
    SetPlayTimer();
 
    RowStackDblClickProc(stackobj, iNumClicked);
    TRACE("EXIT PileDblClickProc()\n");
}

Referenced by CreateSol().

PileRemoveProc()

void CARDLIBPROC PileRemoveProc	(	CardRegion &	stackobj,
		int	iItems
	)

Definition at line 481 of file solgame.cpp.

{
    TRACE("ENTER PileRemoveProc()\n");
 
    SetPlayTimer();
 
    //modify our "virtual" pile by removing the same card
    //that was removed from the physical card stack
    activepile.Pop(iItems);
    if ((dwOptions & OPTION_THREE_CARDS) && (VisiblePileCards > 1))
    {
        --VisiblePileCards;
    }
 
    FixIfOneCardLeft();
 
    TRACE("EXIT PileRemoveProc()\n");
}

Referenced by CreateSol().

RowStackClickProc()

void CARDLIBPROC RowStackClickProc	(	CardRegion &	stackobj,
		int	iNumClicked
	)

Definition at line 291 of file solgame.cpp.

{
    TRACE("ENTER RowStackClickProc()\n");
    int numfacedown;
 
    stackobj.GetFaceDirection(&numfacedown);
 
    //if all face-down, then make top card face-up
    if(stackobj.NumCards() == numfacedown)
    {
        if(numfacedown > 0) numfacedown--;
        stackobj.SetFaceDirection(CS_FACE_DOWNUP, numfacedown);
        stackobj.Redraw();
 
        if (GetScoreMode() == SCORE_STD)
        {
            lScore = lScore + 5;
            UpdateStatusBar();
        }
        ClearUndo();
    }
 
    LastId = stackobj.Id();
 
    fGameStarted = true;
 
    TRACE("EXIT RowStackClickProc()\n");
}

Referenced by CreateSol().

RowStackDblClickProc()

void CARDLIBPROC RowStackDblClickProc	(	CardRegion &	stackobj,
		int	iNumClicked
	)

Definition at line 403 of file solgame.cpp.

{
    TRACE("ENTER RowStackDblClickProc()\n");
 
    SetPlayTimer();
 
    //can only move 1 card at a time
    if(iNumClicked != 1)
    {
        TRACE("EXIT RowStackDblClickProc()\n");
        return;
    }
 
    //find a suit-stack to move the card to...
    const CardStack &cardstack = stackobj.GetCardStack();
    CardRegion *pDest = FindSuitStackFromCard(cardstack[0]);
 
    if(pDest != 0)
    {
        fGameStarted = true;
        SetPlayTimer();
 
        //stackobj.MoveCards(pDest, 1, true);
        //use the SimulateDrag function, because we get the
        //AddProc callbacks called for us on the destination stacks...
        bAutoroute = true;
        stackobj.SimulateDrag(pDest, 1, true);
        bAutoroute = false;
    }
    TRACE("EXIT RowStackDblClickProc()\n");
}

Referenced by CreateSol(), and PileDblClickProc().

RowStackDragProc()

bool CARDLIBPROC RowStackDragProc	(	CardRegion &	stackobj,
		int	iNumDragCards
	)

Definition at line 104 of file solgame.cpp.

{
    TRACE("ENTER RowStackDragProc()\n");
    int numfacedown;
    int numcards;
 
    SetPlayTimer();
 
    stackobj.GetFaceDirection(&numfacedown);
 
    numcards = stackobj.NumCards();
 
    TRACE("EXIT RowStackDragProc()\n");
    if(iNumDragCards <= numcards-numfacedown)
        return true;
    else
        return false;
 
}

Referenced by CreateSol().

RowStackDropProc()

bool CARDLIBPROC RowStackDropProc	(	CardRegion &	stackobj,
		CardStack &	dragcards
	)

Definition at line 128 of file solgame.cpp.

{
    TRACE("ENTER RowStackDropProc()\n");
    Card dragcard = dragcards[dragcards.NumCards() - 1];
 
    SetPlayTimer();
 
    //if we are empty, can only drop a stack with a King at bottom
    if(stackobj.NumCards() == 0)
    {
        if(dragcard.LoVal() != 13)
        {
            TRACE("EXIT RowStackDropProc(false)\n");
            return false;
        }
    }
    else
    {
        const CardStack &mystack = stackobj.GetCardStack();
 
        //can only drop if card is 1 less
        if(mystack[0].LoVal() != dragcard.LoVal() + 1)
        {
            TRACE("EXIT RowStackDropProc(false)\n");
            return false;
        }
 
        //can only drop if card is different colour
        if( (mystack[0].IsBlack() && !dragcard.IsRed()) ||
           (!mystack[0].IsBlack() &&  dragcard.IsRed()) )
        {
            TRACE("EXIT RowStackDropProc(false)\n");
            return false;
        }
    }
 
    fGameStarted = true;
 
    SetUndo(LastId, stackobj.Id(), dragcards.NumCards(), lScore, VisiblePileCards);
 
    if (LastId == PILE_ID)
    {
        if (GetScoreMode() == SCORE_STD)
        {
            lScore = lScore + 5;
        }
    }
    else if ((LastId >= SUIT_ID) && (LastId <= SUIT_ID + 3))
    {
        if (GetScoreMode() == SCORE_STD)
        {
            lScore = lScore >= 15 ? lScore - 15 : 0;
        }
        else if (GetScoreMode() == SCORE_VEGAS)
        {
            lScore = lScore >= -47 ? lScore - 5 : -52;
        }
    }
 
    UpdateStatusBar();
 
    TRACE("EXIT RowStackDropProc(true)\n");
    return true;
}

Referenced by CreateSol().

SuitStackAddProc()

void CARDLIBPROC SuitStackAddProc	(	CardRegion &	stackobj,
		const CardStack &	added
	)

Definition at line 346 of file solgame.cpp.

{
    TRACE("ENTER SuitStackAddProc()\n");
    bool fGameOver = true;
 
    SetPlayTimer();
 
    for(int i = 0; i < 4; i++)
    {
        if(pSuitStack[i]->NumCards() != 13)
        {
            fGameOver = false;
 
            break;
        }
    }
 
    if(fGameOver)
    {
        KillTimer(hwndMain, IDT_PLAYTIMER);
        PlayTimer = 0;
 
        if ((dwOptions & OPTION_SHOW_TIME) && (GetScoreMode() == SCORE_STD))
        {
            lScore = lScore + (700000 / dwTime);
        }
 
        UpdateStatusBar();
        ClearUndo();
 
        MessageBox(SolWnd, MsgWin, szAppName, MB_OK | MB_ICONINFORMATION);
 
        for(int i = 0; i < 4; i++)
        {
            pSuitStack[i]->Flash(11, 100);
        }
 
        if( IDYES == MessageBox(SolWnd, MsgDeal, szAppName, MB_YESNO | MB_ICONQUESTION) )
        {
            NewGame();
        }
        else
        {
            SolWnd.EmptyStacks();
 
            fGameStarted = false;
        }
    }
 
    TRACE("EXIT SuitStackAddProc()\n");
}

Referenced by CreateSol().

SuitStackClickProc()

void CARDLIBPROC SuitStackClickProc	(	CardRegion &	stackobj,
		int	iNumClicked
	)

Definition at line 276 of file solgame.cpp.

{
    TRACE("ENTER SuitStackClickProc()\n");
 
    fGameStarted = true;
 
    LastId = stackobj.Id();
 
    TRACE("EXIT SuitStackClickProc()\n");
}

Referenced by CreateSol().

SuitStackDropProc()

bool CARDLIBPROC SuitStackDropProc	(	CardRegion &	stackobj,
		CardStack &	dragcards
	)

Definition at line 235 of file solgame.cpp.

{
    TRACE("ENTER SuitStackDropProc()\n");
 
    SetPlayTimer();
 
    //only drop 1 card at a time
    if (!bAutoroute && dragcards.NumCards() != 1)
    {
        TRACE("EXIT SuitStackDropProc()\n");
        return false;
    }
 
    bool b = CanDrop(stackobj, dragcards[0]);
    TRACE("EXIT SuitStackDropProc()\n");
 
    if (b)
    {
        SetUndo(LastId, stackobj.Id(), 1, lScore, VisiblePileCards);
 
        if ((LastId == PILE_ID) || (LastId >= ROW_ID))
        {
            if (GetScoreMode() == SCORE_VEGAS)
            {
                lScore = lScore + 5;
            }
            else if (GetScoreMode() == SCORE_STD)
            {
                lScore = lScore + 10;
            }
 
            UpdateStatusBar();
        }
    }
 
    return b;
}

Referenced by CreateSol().

Variable Documentation

activepile

CardStack activepile

Definition at line 12 of file solgame.cpp.

Referenced by CreateSol(), DeckClickProc(), FixIfOneCardLeft(), NewGame(), PileRemoveProc(), and Undo().

bAutoroute

bool bAutoroute = false

Definition at line 16 of file solgame.cpp.

Referenced by RowStackDblClickProc(), and SuitStackDropProc().

fGameStarted

bool fGameStarted = false

Definition at line 15 of file solgame.cpp.

Referenced by DeckClickProc(), NewGame(), PileClickProc(), RowStackClickProc(), RowStackDblClickProc(), RowStackDropProc(), SuitStackAddProc(), SuitStackClickProc(), and WndProc().

LastId

int LastId

Definition at line 14 of file solgame.cpp.

Referenced by NewGame(), PileClickProc(), RowStackClickProc(), RowStackDropProc(), SuitStackClickProc(), and SuitStackDropProc().

MsgDeal

TCHAR MsgDeal[128]

extern

Definition at line 24 of file solitaire.cpp.

Referenced by SuitStackAddProc().

MsgWin

TCHAR MsgWin[128]

extern

Definition at line 23 of file solitaire.cpp.

Referenced by SuitStackAddProc().

VisiblePileCards

int VisiblePileCards

Definition at line 13 of file solgame.cpp.

Referenced by DeckClickProc(), NewGame(), PileRemoveProc(), RowStackDropProc(), SuitStackDropProc(), and Undo().