Compucolor.org – Virtual Media

Listing of file='RUMMY.BAS;01' on disk='vmedia/chip_12-sector.ccvf'

100 CLEAR 100
110 PLOT 6,2,12,27,24,14
120 PLOT 6,6,3,27,1
130 PRINT "R U M M Y"
140 PLOT 15,6,3
150 PLOT 3,0,4
160 PRINT " RUMMY IS THE MOST POPULAR FAMILY OF CARD GAMES IN THE UNITED"
170 PLOT 6,1,3,1,4:PRINT "RUMMY":PLOT 6,3
180 PRINT " STATES.  'BASIC RUMMY'  IS ONE OF THE MOST POPULAR GAMES FOR"
190 PRINT " TWO PLAYERS.  IN THIS COMPUCOLOR II VERSION, YOU PLAY "
200 PRINT " AGAINST THE COMPUTER.  A DECK OF 52 CARDS IS USED.  TEN"
210 PRINT " CARDS ARE DEALT TO EACH PLAYER.  THE NEXT CARD BEGINS THE"
220 PRINT " 'DISCARD' PILE AND THE REMAINING CARDS BECOME THE 'STOCK'."
230 PLOT 6,7
240 PRINT " THE OBJECT OF PLAY IS TO FORM SETS, EITHER THREE OR FOUR"
250 PRINT " CARDS OF THE SAME RANK, OR THREE OR MORE OF THE SAME"
260 PRINT " SEQUENCE, ON THE PLAYING BOARD.  THE FIRST PLAYER TO GET"
270 PRINT " RID OF ALL OF HIS CARDS WINS THE GAME.  DURING YOUR TURN,"
280 PRINT " YOU MUST PICK UP ONE CARD, EITHER THE TOP 'DISCARD' OR"
290 PRINT " THE TOP 'STOCK'.  ONLY ONE PLAY CAN BE MADE AFTER EACH DRAW."
300 PLOT 6,2
310 PRINT " IF YOU CAN, PLAY THREE CARDS (OF THE SAME RANK, OR IN"
320 PRINT " SEQUENCE IN SUIT)  OR  ONE CARD (TO ADD CARD TO MAKE FOUR"
330 PRINT " OF THE SAME RANK, OR EXTEND SEQUENCE, ALREADY ON THE"
340 PRINT " BOARD).  IF ADDING JUST ONE CARD TO THE CARDS ALREADY ON"
350 PRINT " THE BOARD, YOU CAN PLAY TO SETS ORIGINALLY PLAYED BY EITHER"
360 PRINT " YOU OR THE COMPUTER.  AFTER PLAYING THREE, ONE OR NO CARDS"
370 PRINT " YOU MUST THEN DISCARD ONE CARD.  INDICATE CARD(S) TO PLAY"
380 PRINT " BY ENTERING LETTER UNDERNEATH CARD IN YOUR HAND."
390 PLOT 6,5
400 PRINT " TO PICK UP CARD FROM STOCK, JUST HIT RETURN.  TO DISCARD"
410 PRINT " CARD LOCATED IN 'PICK UP' (LETTER K), JUST HIT RETURN."
420 PLOT 6,4,14
430 PLOT 2,0,20,242,0,115,127,115,127,20,0,20,255
440 PLOT 14,6,1,3,22,31
450 INPUT "HIT RETURN TO BEGIN";Q$
460 LOAD "RUMMY2":RUN
470 END