53 S1=S1+C1:S2=S2+C2:PRINT"Your points :";C1:PRINT"My points:";C2:IFC2<C1THENPRINT"You have won":N1=N1+1:GOTO55
54 IFC1<C2THENPRINT"I have won"ELSEPRINT"Round over"
55 PRINT:N3=N3+1:KEY2,"":KEY3,"YES"+CHR$(13):KEY4,"NO"+CHR$(13):INPUT"Play again(YES or NO)";RP$:IFINSTR("Y",RP$)THEN40
56 CALL16964:PRINT:PRINT"In ";N3;" rounds you have won ";N1;".":PRINT"Your total points are ";S1;" mine are ";S2:CALL23164,0,23366:CALL27795:SCREEN0,0:CLEAR:END:CALL17001:PRINT"Press <spacebar> to continue";:CALL17005:CALL24367:RETURN
61 PRINT@80,STRING$(160,32):PRINT@80,"You have in hand: ";:FORI=1TOJO:PRINTJO$(I);" ";:NEXT:PRINT:IFD<1THENKEY4,"NO"+CHR$(13):INPUT"Can you play ";RP$:GOTO63
83 IFD>1THEN84ELSEPRINT"I cannot play a card. I am blocked":D=0:GOSUB59:GOSUB60:RETURN
84 MO=MO+1:I=MO:GOSUB57:MO$(MO)=X$:GOTO79
85 B=1:C$=MO$(I):MO$(I)="":FORJ=ITOMO+1:MO$(J)=MO$(J+1):NEXT:MO=MO-1:CLS:PRINT"I have ";MO+1;" cards";:IF(LEFT$(C$,1)<>"8")THENPRINT" and I play :";C$:KEY1," "+C$+STRING$(4,8)ELSE87