Listing of file='BCKINS.BAS;01' on disk='vmedia/backgammon-sideA-sector.ccvf'
10 PLOT 6,32,12,27,24 90 PLOT 3,127,6,5,0:PRINT " " 100 PLOT 3,127,6,6,7:PRINT " neeu teeu teeu a ~ teeu teeu p q p q teeu a b " 110 PLOT 3,127,6,7,7:PRINT " a b a b a a ~ a a b a|~b a|~b a b p b " 120 PLOT 3,127,6,8,7:PRINT " lw lm a a~ a lm a b a b a b a| b " 130 PLOT 3,127,6,9,7:PRINT " a u a b a r| a u a b a b a b a b a |b " 140 PLOT 3,127,6,10,7:PRINT " a b a b a a | a b a b a b a b a b a s " 150 PLOT 3,127,6,11,7:PRINT " lw a b vw a | vw a b a b a b vw a b " 160 PLOT 3,127,6,12,0:PRINT " " 170 FOR I= 21TO 23 180 PLOT 3,127,14,I,0:PRINT " " 190 NEXT I 200 PLOT 3,127,15,22,1:INPUT "DO YOU WISH INSTRUCTIONS? Y/N ";A$ 210 IF A$= "N"GOTO 1000 220 PLOT 6,0,12 240 GOSUB 2000 250 PLOT 3,127,0,4,7:PRINT "1. BACKGAMMON IS PLAYED ON A GAME BOARD, A SMALL VERSION OF" 260 PLOT 3,127,0,5,7:PRINT " WHICH IS SHOWN IN THE LOWER LEFT OF THE SCREEN." 270 PLOT 3,127,0,7,7:PRINT "2. YOU HAVE 15 RED PIECES, AND THE COMPUTER HAS 15 WHITE." 280 PLOT 3,127,0,9,7:PRINT "3. YOUR HOME BOARD IS IN THE LOWER RIGHT PORTION OF THE GAME" 290 PLOT 3,127,0,10,7:PRINT " BOARD, THE COMPUTER'S HOME BOARD IS IN THE UPPER RIGHT." 300 PLOT 3,127,0,12,7:PRINT "4. YOUR PIECES MOVE FROM RIGHT TO LEFT ON THE UPPER BOARD, AND" 310 PLOT 3,127,0,13,7:PRINT " FROM LEFT TO RIGHT ON THE LOWER BOArd. THE COMPUTER MOVES" 320 PLOT 3,127,0,14,7:PRINT " IN THE OPPOSITE DIRECTION." 330 PLOT 3,127,0,16,7:PRINT "5. THE OBJECT OF THE GAME IS TO MOVE YOUR PIECES TO THE HOME" 340 PLOT 3,127,0,17,7:PRINT " BOARD, AND THEN OFF THE BOARD. DICE ARE USED TO DECIDE" 350 PLOT 3,127,0,18,7:PRINT " THE NUMBER OR COMBINATION OF NUMBERS THAT YOU MAY MOVE." 360 PLOT 3,127,16,20,7:PRINT "6. THE FIRST ROLL OF THE GAME DETERMINES IF" 370 PLOT 3,127,16,21,7:PRINT " YOU OR THE COMPUTER HAVE THE FIRST MOVE." 380 PLOT 3,127,16,23,7:PRINT "7. IF THE DIE ON THE LEFT IS THE LARGER NUMBER," 390 PLOT 3,127,16,24,7:PRINT " THEN THE COMPUTER WINS THE FIRST MOVE." 400 PLOT 3,127,16,26,7:PRINT "8. IF BOTH DICE COME UP THE SAME VALUE ON THE" 410 PLOT 3,127,16,27,7:PRINT " FIRST ROLL, THEY MUST BE ROLLED AGAIN TO" 420 PLOT 3,127,16,28,7:PRINT " DECIDE WHO GOES FIRST." 430 PLOT 3,127,16,30,1:INPUT " HIT RETURN TO CONTINUE";A$ 440 PLOT 6,0,12 450 GOSUB 2000 460 PLOT 3,127,0,4,7:PRINT "9. IF THE COMPUTER WINS IT WILL THEN ANALIZE THE BEST MOVES" 470 PLOT 3,127,0,5,7:PRINT " WHICH ARE POSSIBLE WITH THE VALUES SHOWN ON THE DICE." 480 PLOT 3,127,0,7,7:PRINT "10. THE COMPUTER TAKES ABOUT TWO MINUTES TO ANALIZE THE MOVES," 490 PLOT 3,127,0,8,7:PRINT " SO PLEASE BE PATIENT." 500 PLOT 3,127,0,10,7:PRINT "11. IF YOU WIN THE ROLL, THEN YOU MAY MOVE ONE DIE AT A TIME" 510 PLOT 3,127,0,11,7:PRINT " THE VALUE SHOWN ON ONE OF THE DICE. WHEN YOU HAVE FINISHED" 520 PLOT 3,127,0,12,7:PRINT " YOUR LAST MOVE ENTRY THE DISPLAY WILL BE UPDATED." 530 PLOT 3,127,0,14,7:PRINT "12. YOU CANNOT MOVE TO A POSITION THAT IS OCCUPIED BY TWO OR" 540 PLOT 3,127,0,15,7:PRINT " MORE OF THE COMPUTERS PIECES. THE POSITION IS OPEN IF" 550 PLOT 3,127,0,16,7:PRINT " ONE OR NO PIECE IS ON IT." 560 PLOT 3,127,0,18,7:PRINT "13. IF YOU MOVE TO AN OPEN POSITION OCCUPIED BY ONE OF THE" 570 PLOT 3,127,16,19,7:PRINT "COMPUTER'S PIECES, THEN THAT PIECE IS BUMPED TO" 580 PLOT 3,127,16,20,7:PRINT "THE BAR LINE AND MUST RE-ENTER THE BOARD BEFORE" 590 PLOT 3,127,16,21,7:PRINT "THE OPPONENT CAN MOVE ANY OTHER PIECE." 600 PLOT 3,127,16,23,7:PRINT "14. TO RE-ENTER FROM THE BAR THE VALUE ROLLED" 610 PLOT 3,127,16,24,7:PRINT " ON A DIE MUST BE EQUAL TO AN OPEN POSITION" 620 PLOT 3,127,16,25,7:PRINT " ON YOUR OPPONENT'S HOME BOARD." 630 PLOT 3,127,16,27,7:PRINT "15. IF A PIECE ON THE BAR CANNOT BE RE-ENTERED," 640 PLOT 3,127,16,28,7:PRINT " THEN THE COMPUTER WILL GO TO THE NEXT TURN." 650 PLOT 3,127,16,30,1:INPUT " HIT RETURN TO CONTINUE";A$ 660 PLOT 6,0,12 670 GOSUB 2000 680 PLOT 3,127,0,4,7:PRINT "16. YOU MAY PUT MORE THAN 5 PIECES ON EACH POSITION. THE TOTAL" 690 PLOT 3,127,0,5,7:PRINT " PIECES ARE SHOWN BY THE NUMBER ON THAT POSITION." 700 PLOT 3,127,0,7,7:PRINT "17. WHEN ALL OF YOUR PIECES HAVE BEEN MOVED TO YOUR HOME BOARD," 710 PLOT 3,127,0,8,7:PRINT " THEN, AND ONLY THEN, MAY YOU MOVED PIECES OFF THE BOARD." 720 PLOT 3,127,0,10,7:PRINT "18. YOU MAY MOVE A PIECE OFF THE BOARD, IF THE VALUE ON THE" 730 PLOT 3,127,0,11,7:PRINT " DIE IS EQUAL TO OR GREATER THAN THE VALUE OF THE PIECE'S" 740 PLOT 3,127,0,12,7:PRINT " POSITION." 750 PLOT 3,0,14:PRINT " 19. CAUTION: IF THE COMPUTER ROLLS A DOUBLE, THE CALCULATIONS" 760 PLOT 3,0,15:PRINT " TAKE AS MUCH AS 10 MINUTES BEFORE A MOVE IS MADE." 770 PLOT 3,128,28,23,5:PRINT "GOOD LUCK!!!!" 780 PLOT 3,127,16,30,1:INPUT " HIT RETURN TO CONTINUE";A$ 1000 PLOT 27,4:PRINT "RUN BCKGMN" 1010 END 2000 PLOT 3,128,20,1,6:PRINT "BACKGAMMON INSTRUCTIONS" 2005 PLOT 3,1,20:PRINT " d d d d " 2010 PLOT 3,1,21:PRINT " d d d d " 2020 PLOT 3,1,22:PRINT " d d d " 2030 PLOT 3,1,23:PRINT " d d " 2040 PLOT 3,1,24:PRINT " d B d " 2050 PLOT 3,1,25:PRINT " A " 2060 PLOT 3,1,26:PRINT " d R d " 2070 PLOT 3,1,27:PRINT " d d " 2080 PLOT 3,1,28:PRINT " d d d " 2090 PLOT 3,1,29:PRINT " d d d d " 2100 PLOT 3,1,30:PRINT " d d d d " 2105 PLOT 6,5 2110 PLOT 2,1,3,242,28,3,28,48,1,48,1,4,255 2120 RETURN