home *** CD-ROM | disk | FTP | other *** search
/ Club Amiga de Montreal - CAM / CAM_CD_1.iso / files / 540.lha / Dominos / Dominos.docs.bas < prev    next >
Encoding:
BASIC Source File  |  1991-08-10  |  3.2 KB  |  67 lines
  1. CLS
  2. LINE (25,20)-(275,70),2,bf:LINE (325,20)-(575,70),2,bf
  3. CIRCLE (87,45),4,1:PAINT (87,45),1,1       '1
  4. CIRCLE (212,45),4,1:PAINT (212,45),1,1     '1
  5.  
  6. CIRCLE (340,25),4,1:PAINT (340,25),1,1     '2
  7. CIRCLE (435,65),4,1:PAINT (435,65),1,1     '2
  8. CIRCLE (465,25),4,1:PAINT (465,25),1,1     '2
  9. CIRCLE (560,65),4,1:PAINT (560,65),1,1     '2
  10.  
  11. COLOR 3
  12. LOCATE 12,30:PRINT "...D O M I N O S...":COLOR 1
  13. LOCATE 23,30:INPUT "Press enter to continue";ht$:CLS:PRINT 
  14. PRINT "        The game can only be played with one player and the computer."
  15. PRINT "        The game rules are based on the standard game of dominos"
  16. PRINT "        as defined by the book 'According TO Hoyle', by"
  17. PRINT "        Richard L. Frey and published by Ballantine Books."
  18. PRINT 
  19. PRINT "        Each player starts the game with seven dominos.  The"
  20. PRINT "        player with the highest doublet starts the game.  The"
  21. PRINT "        opponent plays by selecting a domino which matches the"
  22. PRINT "        previously played domino.  The player and computer alternate"
  23. PRINT "        turns until one's dominos are exhausted or until neither"
  24. PRINT "        player can move."
  25. PRINT 
  26. PRINT "        If unable to play in turn, dominos are drawn automatically"
  27. PRINT "        from the boneyard until able to play.  If the boneyard"
  28. PRINT "        is exhausted and still unable to play, the turn passes.
  29. PRINT:PRINT :PRINT :PRINT 
  30. INPUT "                         Press enter to continue";a2$:CLS:PRINT 
  31. PRINT "        The first to play all his dominos wins the game.  Sometimes"
  32. PRINT "        neither player can play and the boneyard is empty, the game"
  33. PRINT "        ends in a block.  The game is then won by having the"
  34. PRINT "        most points (highest score).  The score is determined by"
  35. PRINT "        totalling the number of domino dots in the opponents hand."
  36. PRINT
  37. PRINT "        The game gives the human player the option of cheating"
  38. PRINT "        (peeking in the opponents hand and what's in the boneyard)."
  39. PRINT "        It would be disgraceful if someone would use this option to"
  40. PRINT "        beat a dumb machine like the Amiga at such a simple game."
  41. PRINT "        But as luck will have it, Murphy's Law enters the picture:"
  42. PRINT "        If something can go wrong, it probably will."
  43. PRINT:PRINT :PRINT :PRINT:PRINT :PRINT 
  44. INPUT "                         Press enter to continue";a2$:CLS
  45.  
  46. PRINT 
  47. PRINT "                   ...........Credits.............."
  48. PRINT
  49. PRINT "        This hea game of dominos was witten for public domain use"
  50. PRINT "        and distribution by a Damn Yankee (me): Russell Mason"
  51. PRINT
  52. PRINT "        The game version is 1.0, June 1, 1991
  53. PRINT   
  54. PRINT "        You can get in touch with me about buggs, impuvments, new"
  55. PRINT "        ideers, spelln, or jiust jaw awhale (I luvv supwases) at:"
  56. PRINT 
  57. PRINT "                          Russell Mason"
  58. PRINT "                          5225 Old Hixson A107"
  59. PRINT "                          Hixson, Tn., 37343"
  60. PRINT 
  61. PRINT "        Thanx for using my pwogwam, adios till next time.  My next novelity"
  62. PRINT "        will be done on a A3000 (which I can't afford) so I won't have"
  63. PRINT "        to fuss with this clunki ol compiler.":PRINT :PRINT :PRINT 
  64. INPUT "                           Press enter to end";dr$
  65. END
  66.  
  67.