S$"":R$"23456789TJQKA":D(0)1024:D(1)D(0)52:H(0)D(1)52:X13:H(X)H(X1)13::T1H(3)13:P$"":CU$" ":CT$" ":SP$" ":BL$" " R(X)((TIX)52) X(X):X50,1:0,1:"THIS IS AN 80 COLUMN GAME. PRESS [ESC] AND FLIP YOUR MONITOR SWITCH.":56A$:A$(27)4S5:(27)"R":6,2:%\110e 58n 65 H012:SB0:PC14:78:PT26:Ս13 PTPT1:PT3PT0 :80:78:103 :86:8 P0:M$"L/R ARROW KEYS, SPACE":9293:X$"X$""94:PP1:P12P0BX$""94:PP1:P0P12RX$" "14(H(0)P)0M$"PLEASE CHOOSE A CARD....":92:108:14PC1S((H(0)P)240)16:103:25((H(0)P)240)16S25SB25:QQ0:A012:W(H(0)A):W023(W240)16SQQ1,:QQ0SB1:25`M$"PLAY A CARD IN THE SAME SUIT!":109:92:14W(H(0)P):95:96:94:CP(PT)W:H(0)P,0:M$"PLAYER"(PT1)"'S TURN":92:PC28,41,49,50A12:103W(H(PT)A):W031" X(W240)16:X99:E31:XW15:X8405 AA1:A129> A12W !W(H(PT)A):W035n "X(W240)16:X40 #AA1:A133 $A12 %W(H(PT)A):W039 &40 'AA1:A137 (S(W240)16:57 )A12 *W(H(PT)A):W044!+X(W240)16:XS57!!,AA1:A142@!-SB1:SB(PT)SB(PT)2S:A0Y!.W(H(PT)A):W048a!/57t!0AA1:A1346|!141!2(S0)(SB0)52!341!4A0!5W(H(PT)A):W055!6X(W240)16:XS57!7AA1:A1353!845"9H(PT)A,0:CP(PT)W:96:106:":""24)" HEARTS 128 BY JOHN ZIELINSKY Ӓ":""";66)"ݕYOUR ":66)"ݕHAND ":66)"ݕ_ ":66)""[#<"":" SCORES ":""#=" YOU ":"":"PLAYER 2 ":"":"PLAYER 3 ":"":"PLAYER 4 "k$>"":X13:13)" ":$?13)"ҽ"$@%AM$"SETTING UP DECK....":92:108:S03:R214:D(0)S13R2,S16R:::M$"SHUFFLING....":92:109$%BX051D%CPR(P):W(D(0)P):W067%DD(1)X,W:D(0)P,0::M$"DEALING..":92:A03:C012:H(A)C,(D(1)CA13):73:::M$"SORTING...":92%EA03:X012:T1X,0::X012:W(H(A)X):Y012:W(T1Y)71&FT(T1Y):T1Y,W:WT@&G::X012:H(A)X,(T1X):CX:73::U&HX03:SB(X)0:f&IA0107:&JCXC51:W(H(0)C):S(W240)16:RW15:1,CX,2,CT$:W$SP$""(R$,R1,1):S1W$W$"":W$W$""'KW$W$(S$,S1,1)""SP$:1,CX,3,W$:1,CX,4,CT$'L106'MY'N"":A03:M$(S(A)T(A)):1,8,9A2," ":1,8,9A2,M$:_'O'PTC0:T0:A03:(CP(A)240)16SCP(A)TCTCCP(A):TA1'Q:T0M$"YOU WON THAT HAND":M$"PLAYER"(T)" WON THAT HAND"(R92:PTT1:A03:(CP(A)240)0T(PT)T(PT)13(SCP(A)28T(PT)T(PT)139(TD(U104:f(VA03:T(A)26TA:A7::88(WS(A)S(A)T(A):T(A)0::90(XA03:AT:90(YS(A)S(A)27:(ZA03:S(A)100M$"GAME OVER. PRESS ANY KEY.":92:105:A$:1([:-)\14,17,59,19:"":23((M$)2))M$;"":G)]XCP52:1,XC,5,P$:g)^XCP52:1,XC,5,BL$:106:)_CXP51:1,CX,2,CU$:1,CX,3,CU$:1,CX,4,CU$:*`XPC710:1,X,8," ":XS(W240)16:XRW15:W$" "(R$,XR1,1)" ":1,X,9,W$:W$" ":XS1W$W$"":W$W$""~*aW$W$(S$,XS1,1)" ":1,X,10,W$:W$" "(R$,XR1,1)" ":1,X,11,W$:1,X,12," ":*b:*cPDPT:E0:Z13*dPDPD1:PD4PD0*eNSB(PD)2X:NE1*f:*g17,8,67,12:"": +h:2,13000,14,2,2500,334:C+i"V1O3CV2O3FV3O3GV1O4EV2O4GV3O5CV1O3CV2O3FV3O4C":Y+j:1,3000,1,,,,3:m+k3,3000,1,,,0:+l:1,20000,30,2,4000,12500,0:+m2,24000,30,0,4000,2500,0:+n""(142)35)"HEARTS-128":31)": OHN IELINSKY"(142)",oW$"O YOU ANT NSTRUCTIONS ?"(142):Q1G,p""30)"HIS ROGRAM IS REE",q""19)"PLOADED AND POSTED  ON NIE",r""28)"() 1990 OHN IELINSKY",s""12)"NY COMMENTS OR QUESTIONS: RITE .IELINSKY1 ON NIE.")-t1,27,11,W$:5,Q:QQ1:Q2QQ1:ՋQ17Q1O-uX$:X$"N""";::ՋX$"Y"119X-v116-w"EARTS-128 NSTRUCTIONS.......... "(27)"T"I.x"EARTS IS A SIMPLE GAME IN WHICH OUR PLAYERS OMPETE.":"LAYERS ARE EACH DEALT 13 CARDS FROM THE DECK, AND CARDS ARE REDISTRIBUTED"w.y"HEN ALL PLAYER'S CARDS ARE EXHAUSTED.".z"HE INITIAL PLAYER LAYS DOWN A CARD, AND THE NEXT PLAYER MUST PLAY A CARD N HE OF THE INITIAL CARD."E/{"X: LAYER 1 PLAYS THE ING OF IAMONDS. LAYER 2 MUST PLAY A IAMOND"/|"F YOU HAVE NO CARDS OF THE SAME SUIT AS THE EAD CARD, YOU HAVE , AND YOU MAY PLAY .""0}"NCE SUIT IS BROKEN IN A TRICK, LL FOLLOWING PLAYERS MAY PLAY ANY CARD THEY CHOOSE."0~"HE PLAYER WHO PLAYED THE HIGHEST CARD IN THE TRICK , AND ALSO PLAYS FIRST ON THE NEXT TRICK."0"HE OBJECT OF THE GAME IS TO COLLECT EARTS, BUT AVOID WINNING THEM."O1" ACH HEART CARD EQUALS ONE POINT. INNING THE UEEN OF PADES IS WORTH 13 POINTS."1135:"F ANY PLAYER WINS ALL 13 HEART CARDS THE UEEN OF PADES, THEN HE HAS"2(34)"UN THE AMBIT"(34)" AND PLAYERS GET 27 POINTS WHILE THE UCKY LAYER GETS NONE."w2"LAY CONTINUES UNTIL ONE PLAYER REACHES 100 POINTS. HE PLAYER WITH THE LOWEST SCORE WINS."2"E AREFUL, HE COMPUTER'S PRETTY GOOD! ND IT PLAYS !"]3"OTE: OME VERSIONS OF HEARTS ALLOW PLAYERS TO TRADE 3 CARDS AFTER EACH DEAL. HAVE OMITTED SUCH TRADING AS IT IS UNECESSARY SHUFFLING OF THE3" ARDS.":135:"";:3Q135,Q:QQ1:Q1QQ1:ՋQ17Q131,0,23,"RESS ANY EY TO CONTINUE"(142)3A$:A$""1363