CLS
LINE (25,20)-(275,70),2,bf:LINE (325,20)-(575,70),2,bf
CIRCLE (87,45),4,1:PAINT (87,45),1,1 '1
CIRCLE (212,45),4,1:PAINT (212,45),1,1 '1
CIRCLE (340,25),4,1:PAINT (340,25),1,1 '2
CIRCLE (435,65),4,1:PAINT (435,65),1,1 '2
CIRCLE (465,25),4,1:PAINT (465,25),1,1 '2
CIRCLE (560,65),4,1:PAINT (560,65),1,1 '2
COLOR 3
LOCATE 12,30:PRINT "...D O M I N O S...":COLOR 1
LOCATE 23,30:INPUT "Press enter to continue";ht$:CLS:PRINT
PRINT " The game can only be played with one player and the computer."
PRINT " The game rules are based on the standard game of dominos"
PRINT " as defined by the book 'According TO Hoyle', by"
PRINT " Richard L. Frey and published by Ballantine Books."
PRINT
PRINT " Each player starts the game with seven dominos. The"
PRINT " player with the highest doublet starts the game. The"
PRINT " opponent plays by selecting a domino which matches the"
PRINT " previously played domino. The player and computer alternate"
PRINT " turns until one's dominos are exhausted or until neither"
PRINT " player can move."
PRINT
PRINT " If unable to play in turn, dominos are drawn automatically"
PRINT " from the boneyard until able to play. If the boneyard"
PRINT " is exhausted and still unable to play, the turn passes.
PRINT:PRINT :PRINT :PRINT
INPUT " Press enter to continue";a2$:CLS:PRINT
PRINT " The first to play all his dominos wins the game. Sometimes"
PRINT " neither player can play and the boneyard is empty, the game"
PRINT " ends in a block. The game is then won by having the"
PRINT " most points (highest score). The score is determined by"
PRINT " totalling the number of domino dots in the opponents hand."
PRINT
PRINT " The game gives the human player the option of cheating"
PRINT " (peeking in the opponents hand and what's in the boneyard)."
PRINT " It would be disgraceful if someone would use this option to"
PRINT " beat a dumb machine like the Amiga at such a simple game."
PRINT " But as luck will have it, Murphy's Law enters the picture:"
PRINT " If something can go wrong, it probably will."
PRINT:PRINT :PRINT :PRINT:PRINT :PRINT
INPUT " Press enter to continue";a2$:CLS
PRINT
PRINT " ...........Credits.............."
PRINT
PRINT " This hea game of dominos was witten for public domain use"
PRINT " and distribution by a Damn Yankee (me): Russell Mason"
PRINT
PRINT " The game version is 1.0, June 1, 1991
PRINT
PRINT " You can get in touch with me about buggs, impuvments, new"
PRINT " ideers, spelln, or jiust jaw awhale (I luvv supwases) at:"
PRINT
PRINT " Russell Mason"
PRINT " 5225 Old Hixson A107"
PRINT " Hixson, Tn., 37343"
PRINT
PRINT " Thanx for using my pwogwam, adios till next time. My next novelity"
PRINT " will be done on a A3000 (which I can't afford) so I won't have"
PRINT " to fuss with this clunki ol compiler.":PRINT :PRINT :PRINT
INPUT " Press enter to end";dr$
END
