SOLITAIRE ACCESSORY
This simple desk accessory allows you to play solitaire when
you get bored doing word processing or whatever. The game board
is divided into 3 areas; the game area (left half) shows the
seven stacks of cards used initially, the discard area (right
center) shows the four discard stacks, the draw stack (lower
right) shows the stack of cards from which you draw.
Standard solitaire rules apply, the draw stack displays every
third card, cards are discarded in ascending order (aces first),
only kings may be moved to an empty column, etc. You win if you
can put all of the cards onto their appropriate discard piles in
ascending order. To move cards, move the pointing finger to the
card(s) you wish to move and click the left mouse button. The
pointer turns to a flat hand. Move the flat hand to the
destination and click the left button again. The program will
understand what should be done: moving from one game column to
another game column results in the entire card stack (facing up)
being appended to the destination column; whereas, moving from a
game column to a discard stack results in moving only the top card
to the discard stack.
The button at the top left of the window is the QUIT button.
The button at the top right of the window is the RESTART button;
this will erase the current game, reshuffle, and start a new game.
The button at the bottom right of the window is the NEXT button;
pressing this displays the next available card in the draw pile.
At the top of the window is the game status, stating how many
games have been played and how many you have won. The line below
this is a message board; it states the last card transferred,
winning messages, or when you have not used any of the available
cards in the draw pile.
The program was written entirely in OSS Personal Pascal, and
was my first attempt at writing desk accessories. If you have any
comments, suggestions, or donations (always welcome!), please send
them to:
Thomas A. Elkins
967 W. La Alameda Ave.
San Pedro, CA 90731
If you would like the PPascal source code, please send a disk and
$5.00 to the above address. Thank you.