G HORSE RACE GAME, WRITTEN FOR THE COMMODORE 64 BY ROBERT NEWHART{""::::::" HORSE RACE GAME":" BY ROBERT NEWHART":CASH500( A1 1000: A2"":" HORSE RACE GAME": <" THIS GAME WAS ORIGINALLY DEVELOPED"D F"AS DOG RACE, BUT BECAUSE OF THE WAY"p P"THAT RACING DOGS, SPECIFICALLY GREY-" Z"HOUNDS, ARE SO BADLY ABUSED, I REWROTE" d"THIS PROGRAM, TO TAKE AWAY THE ATTEN-" n"TION FROM THE RACING OF GREYHOUNDS."% x"RETIRED GREYHOUNDS MAKE EXCELLENT PETS,"O "BUT USUALLY WHEN THEY START LOSING"{ "RACES, THEY WILL BE PUT TO SLEEP, OR" "BEATEN OR STARVED TO DEATH. IF YOU ARE" "INTERESTED IN ADOPTING ONE OF THESE" "RETIRED GREYHOUNDS, CONTACT:"$ "NATIONAL GREYHOUND ADOPTION PROGRAM"Q "8301 TORRESDALE AVENUE, PHILADELPHIA,"w "PA 19136, PHONE (215) 331-7918" " ** OR ** REGAP OF CONNECTICUT" "PO BOX 76, BETHANY, CT 06525" "OR ANY OF THE OTHER GREYHOUND ADOPTION" "AGENCIES AROUND THE COUNTRY."7 :"PRESS ANY KEY TO CONTINUE";@  A$T  A$"" 260 "":::" HORSE RACE GAME":::  CASH0 1100 ""WHICH HORSE ARE YOU BETTING ON?" ,"ENTER A NUMBER FROM 1 TO 5";WWW+ 6 WWW1 WWW5 "";: 300 F @:"YOU HAVE $";CASH:l J"HOW MUCH ARE YOU BETTING $";BET T BETCASH "";: 330 ^J(1)122:ODDS(J) h"THE ODDS OF #";WWW;" WINNING ARE ";ODDS;" TO 1."::: r::::"PRESS ANY KEY TO CONTINUE";| A$' A$"" 380W" HORSE RACE GAME FINISH"v A1304 1343: A,64: A A1464 1503: A,64: A A1624 1663: A,64: A A1784 1823: A,64: A A1944 1983: A,64: A A1183 1983 40: A,101: A4B10:B20:B30:B40:B50SC1106:C2120:C3116:C498 1224,C1: 1225,C2: 1226,C3: 1186,C4 1384,C1: 1385,C2: 1386,C3: 1346,C4 1544,C1: 1545,C2: 1546,C3: 1506,C4 1704,C1: 1705,C2: 1706,C3: 1666,C4/ 1864,C1: 1865,C2: 1866,C3: 1826,C4?X((1)6)W& X1 X5 540v0 X 600,700,800,900,1000X B136 B236 B336 B436 B536 620b B136 B236 B336 B436 B536 640lB1B11:1223B1,32:1224B1,C1:1225B1,C2:1226B1,C3=v1185B1,32:1186B1,C4: 540S"NUMBER 1 WINS!" WWW1 CASHCASH(BETODDS):"YOU WON $";BETODDS WWW1 CASHCASHBET:"YOU LOST $";BET"ANOTHER GAME ?" A$ A$"" 680 A$"Y" 280 ? B136 B236 B336 B436 B536 720v B136 B236 B336 B436 B536 740B2B21:1383B2,32:1384B2,C1:1385B2,C2:1386B2,C31345B2,32:1346B2,C4: 540"NUMBER 2 WINS!"# WWW2 CASHCASH(BETODDS):"YOU WON $";BETODDSR WWW2 CASHCASHBET:"YOU LOST $";BETn"ANOTHER GAME ?"w  A$ A$"" 780 A$"Y" 280  B136 B236 B336 B436 B536 820 * B136 B236 B336 B436 B536 840I4B3B31:1543B3,32:1544B3,C1:1545B3,C2:1546B3,C3j>1505B3,32:1506B3,C4:540H"NUMBER 3 WINS!"R WWW3 CASHCASH(BETODDS):"YOU WON $";BETODDS\ WWW3 CASHCASHBET:"YOU LOST $";BETf"ANOTHER GAME ?" p A$!u A$"" 8804z A$"Y" 280:l B136 B236 B336 B436 B536 920 B136 B236 B336 B436 B536 940B4B41:1703B4,32:1704B4,C1:1705B4,C2:1706B4,C31665B4,32:1666B4,C4:540"NUMBER 4 WINS!"O WWW4 CASHCASH(BETODDS):"YOU WON $";BETODDS~ WWW4 CASHCASHBET:"YOU LOST $";BET"ANOTHER GAME ?" A$ A$"" 980 A$"Y" 280 B136 B236 B336 B436 B536 1020; B136 B236 B336 B436 B536 1040wB5B51:1863B5,32:1864B5,C1:1865B5,C2:1866B5,C31825B5,32:1826B5,C4: 540"NUMBER 5 WINS!" WWW5 CASHCASH(BETODDS):"YOU WON$";BETODDS$ WWW5 CASHCASHBET:"YOU LOST $";BET3."ANOTHER GAME ?"<8 A$Q= A$"" 1080dB A$"Y" 280jGL:" YOU HAVE LOST ALL OF YOUR MONEY."V"DO YOU WANT TO START OVER? ?";S$` S$"Y" CASH500: 280j S$"N" t