**TI82** Program file dated 10/08/96, 22:46OO¼¨OK <POKER<:v>u?—>ê?~ ?0c >94c ?0c >62c ?…>á?ÓX+1+39?“15+X+*POKER*?“15+Xq1+*)*?“22+84qX+*BY*?Ô?“29+21+*DOUG)ZUCKERMAN*?“36+41+*1996*?Ø?Ö3?æ*)POKER)*+*CONTINUE)LAST*+4+*NEW)GAME*+5+*INSTRUCTIONS*+6+*QUIT*+7+*BLACKJACK*+8+*RED)DOG*+9?Ö5?1000F?Ö4?ÎFj0>Ï?á?à4+4+*OUTTA)CASH-*?Ø?×3?Ô?Ö0?á?Þ*YOU)HAVE*+F+*DOLLARS:*+*HOW)MUCH)WOULD*+*YOU)LIKE*?Ü*TO)BET¯*+H?ÎHm0×0?…?ú]+]+]+]+]+]?6µ]?22µ]?3µ]?6µ]?ÓX+2+14?X]Xq1?Ô?ÓX+2+14?X]Xp12?Ô?ÓX+2+14?X]Xp25?Ô?ÓX+2+14?X]Xp38?Ô?0O?0Y?2R>15W?ÓX+1+76+15?œX+40+X+34?Ô?¦41?¦33?¦1?¦9?œ0+1+0+9?œ94+1+94+9?Ÿ0+41?Ÿ0+33?œ94+40+94+34?œ77+51+77+61?œ78+51+78+61?œ83+60+83+52?œ84+53+84+59?œ86+61+94+61?œ86+51+93+51?œ85+51+94+61?œ86+51+93+61?œ79+51+82+51?œ79+61+82+61?œ87+52+94+52?œ85+60+93+60?ÓL+1+5?“22+Yp8+L?Ö2?±«‚52p1Z?Z]Lp13?Î]Zj0?×2?Î]Zj14?“2+Yp4+*A)*?Î]Zj11?“2+Yp4+*J)*?Î]Zj12?“2+Yp4+*Q)*?Î]Zj13?“2+Yp4+*K)*?Î]Zl1]Zk11?“2+Yp4+]Z?ÎZl0Zk14?Ï?œYp9+47+Yp9+48?œYp10+46+Yp10+49?œYp11+45+Yp11+48?œYp12+46+Yp12+49?œYp13+47+Yp13+48>Ô?ÎZl13Zk27?Ï?œYp9+47+Yp13+47?œYp11+45+Yp11+49?œYp10+46+Yp10+48?œYp12+46+Yp12+48>Ô?ÎZl26Zk40?Ï?œYp11+45+Yp11+49?œYp10+48+Yp12+48?œYp9+47+Yp13+47?œYp9+46+Yp13+46>Ô?ÎZl39Zk53?Ï?œYp9+46+Yp9+47?œYp10+46+Yp10+49?œYp11+45+Yp11+49?œYp12+46+Yp12+49?œYp13+46+Yp13+47>Ô?œR+43+R+61?œW+43+W+61?œR+43+W+43?œR+43+W+61?œR+61+W+61?15pRR>15pWW?Yp15Y?]Z]L?0]Z?Î]1j1<]2j1<]3j1<]4j1<]5j1>Ï?×P?Ô?Ô?Î]6j1>×Q?ÖG?­G?ÎGj105>Ï>1]6>×P>Ô?ζ]j3>Ï?1]6>×P?Ô?ÎGj92@]1o1>Ï?1]1?ÓX+3+14?ÓY+44+60? X+Y?Ô?Ô?×G?Ô?ÎGj92@]1j1>Ï?0]1?ÓX+3+14?ÓY+44+60? X+Y?Ô?Ô?×G?Ô?ÎGj93@]2j1>Ï?0]2?ÓX+18+29?ÓY+44+60? X+Y?Ô?Ô?×G?Ô?ÎGj93@]2o1>Ï?1]2?ÓX+18+29?ÓY+44+60? X+Y?Ô?Ô?×G?Ô?ÎGj94@]3j1>Ï?0]3?ÓX+33+44?ÓY+44+60? X+Y?Ô?Ô?×G?Ô?ÎGj94@]3o1>Ï?1]3?ÓX+33+44?ÓY+44+60? X+Y?Ô?Ô?×G?Ô?ÎGj82@]4j1>Ï?0]4?ÓX+48+59?ÓY+44+60? X+Y?Ô?Ô?×G?Ô?ÎGj82@]4o1>Ï?1]4?ÓX+48+59?ÓY+44+60? X+Y?Ô?Ô?×G?Ô?ÎGj83@]5j1>Ï?0]5?ÓX+63+74?ÓY+44+60? X+Y?Ô?Ô?×G?Ô?ÎGj83@]5o1>Ï?1]5?ÓX+63+74?ÓY+44+60? X+Y?Ô?Ô?×G?Ô?×G?ÖP?Î]1j1>Ï?0Y>2R>15W?1L?]1p1]1?ÓX+2+15?œX+43+X+61+0?Ô?×2?Ô?Î]2j1>Ï?15Y>17R>30W?2L?]2p1]2?ÓX+17+30?œX+43+X+61+0?Ô?×2?Ô?Î]3j1>Ï?30Y>32R>45W?3L?]3p1]3?ÓX+32+45?œX+43+X+61+0?Ô?×2?Ô?Î]4j1>Ï?45Y>47R>60W?4L?]4p1]4?ÓX+47+60?œX+43+X+61+0?Ô?×2?Ô?Î]5j1>Ï?60Y>62R>75W?5L?]5p1]5?ÓX+62+75?œX+43+X+61+0?Ô?×2?Ô?ÖQ?ã]?0A>1B?ÓX+1+14?Ap1A>Bp1B?ÓL+1+5?Î]LjB?]Ap1]A?Ô?Ô?ÓL+1+13?Î]Lj2>Ï?]1p2]1?Lp1]3>Ô?Î]Lj3>Ï?]2p3]2?Lp1]3>Ô?Î]Lj4>Ï?]3p4]3?Lp1]3>Ô?Ô?°13A>1B>18C?ÓX+1+5?Ap13A>Bp13B?Cp1C?ÓL+14+18?Î]LlA@]LkB?]Cp1]C?Ô?Ô?ÓX+34+40?œ2+X+93+X+0?Ô?Î]1j2@]2j0?1]1?Î]1j4@]3j0?2]1?Î]2j3@]1j0?3]1?Î]1p1j]2@]2p1j]3@]3p1j]4@]4p1j]5?4]1?Î]5j14@]1j2@]2j3@]3j4@]4j5?4]1?Î]19j5<]20j5<]21j5<]22j5?]1p5]1?Î]1j2@]2j3?6]1?Î]3j4?7]1?“22+3+*YOU)HAVE>*?Î]1j0?“22+36+*NOTHING*?Î]1j1?“22+36+*ONE)PAIR*?Î]1j2?“22+36+*TWO)PAIRS*?Î]1j3?“22+36+*THREE)OF)A)KIND*?Î]1j4?“22+36+*A)STRAIGHT*?Î]1j5?“22+36+*A)FLUSH*?Î]1j6?“22+36+*A)FULL)HOUSE*?Î]1j7?“22+36+*FOUR)OF)A)KIND*?Î]1j9?“22+36+*A)STRAIGHT)FLUSH*?]5]2?ú]+]+]+]?6µ]?22µ]?3µ]?0O>0Y?2R>15W?ÓL+1+5?Ö1?±«‚52p1Z?]ZpZƒ100]L?Z]Lp13?Î]Zj0?×1?0]Z?Ô?Î]1j1<]2j1<]3j1<]4j1<]5j1>×W?Î]6j1>×H?ã]?1]6?ι]1j¹]2@¹]2j¹]3@¹]4j¹]5>×W?ι]1j¹]2@¹]3j¹]4@¹]4j¹]5>×W?ι]1j¹]2@¹]3j¹]4>Ï?1]5>×W?Ô?ι]1j¹]2@¹]4j¹]5>Ï?1]3>×W?Ô?ι]2j¹]3@¹]4j¹]5>Ï?1]1>×W?Ô?ι]1j¹]2@¹]2j¹]3>Ï?1]4>1]5?×W>Ô?ι]2j¹]3@¹]3j¹]4>Ï?1]1>1]5?×W>Ô?ι]3j¹]4@¹]4j¹]5>Ï?1]1>1]2?1]3>×W?Ô?ι]1j¹]2>Ï?1]3>1]4?1]5>×W?Ô?ι]2j¹]3>Ï?1]1>1]4?1]5>×W?Ô?ι]3j¹]4>Ï?1]1>1]2?1]5>×W?Ô?ι]4j¹]5>Ï?1]1>1]2?1]3>×W?Ô?ÓX+1+3?1]X?Ô?ÖW?Î]1j1>Ï?1L>]1p1]1>×1>Ô?Î]2j1>Ï?2L>]2p1]2>×1>Ô?Î]3j1>Ï?3L>]3p1]3>×1>Ô?Î]4j1>Ï?4L>]4p1]4>×1>Ô?Î]5j1>Ï?5L>]5p1]5>×1>Ô?ÖH?ÓZ+1+5?ι]Zj14?“34+Yp4+*A)*?ι]Zj11?“34+Yp4+*J)*?ι]Zj12?“34+Yp4+*Q)*?ι]Zj13?“34+Yp4+*K)*?ι]Zl1¹]Zk11?“34+Yp4+¹]Z?κ]Z‚100l0º]Z‚100k14?Ï?œYp9+15+Yp9+16?œYp10+14+Yp10+17?œYp11+13+Yp11+16?œYp12+14+Yp12+17?œYp13+15+Yp13+16>Ô?κ]Z‚100l13º]Z‚100k27?Ï?œYp9+15+Yp13+15?œYp11+13+Yp11+17?œYp10+14+Yp10+16?œYp12+14+Yp12+16>Ô?κ]Z‚100l26º]Z‚100k40?Ï?œYp11+13+Yp11+17?œYp10+16+Yp12+16?œYp9+15+Yp13+15?œYp9+14+Yp13+14>Ô?κ]Z‚100l39º]Z‚100k53?Ï?œYp9+14+Yp9+15?œYp10+14+Yp10+17?œYp11+13+Yp11+17?œYp12+14+Yp12+17?œYp13+14+Yp13+15>Ô?œR+11+R+29?œW+11+W+29?œR+11+W+11?œR+11+W+29?œR+29+W+29?15pRR>15pWW?Yp15Y?Ô?ÖI?¹]]?ã]?0A>1B?ÓX+1+14?Ap1A>Bp1B?ÓL+1+5?Î]LjB?]Ap1]A?Ô?Ô?ÓL+1+13?Î]Lj2>Ï?]1p2]1?Lp1]6>Ô?Î]Lj3>Ï?]2p3]2?Lp1]6>Ô?Î]Lj4>Ï?]3p4]3?Lp1]6>Ô?Ô?°13A>1B>18C?ÓX+1+5?Ap13A>Bp13B?Cp1C?ÓL+14+18?Î]LlA@]LkB?]Cp1]C?Ô?Ô?Î]1j2@]2j0?1]4?Î]1j4@]3j0?2]4?Î]2j3@]1j0?3]4?Î]1p1j]2@]2p1j]3@]3p1j]4@]4p1j]5?4]4?Î]5j14@]1j2@]2j3@]3j4@]4j5?4]4?Î]19j5<]20j5<]21j5<]22j5?]4p5]4?Î]1j2@]2j3?6]4?Î]3j4?7]4?“54+3+*DOUG)HAS>*?Î]4j0?“54+36+*NOTHING*?Î]4j1?“54+36+*ONE)PAIR*?Î]4j2?“54+36+*TWO)PAIRS*?Î]4j3?“54+36+*THREE)OF)A)KIND*?Î]4j4?“54+36+*A)STRAIGHT*?Î]4j5?“54+36+*A)FLUSH*?Î]4j6?“54+36+*A)FULL)HOUSE*?Î]4j7?“54+36+*FOUR)OF)A)KIND*?Î]4j9?“54+36+*A)STRAIGHT)FLUSH*?]5]5?Ø?Î]1l]4?×A?Î]4l]1?×B?Î]4j]1?×C?ÖA?á?à4+5+*YOU)WIN-*?FpHF>Ø?×4?ÖB?á?à4+4+*DOUG)WINS-*?FqHF>Ø?×4?ÖC?Î]3l]6?×A?Î]6l]3?×B?Î]6j]3?×D?ÖD?Î]2l]5?×A?Î]5l]2?×B?Î]5j]2?×4?Ö7?~>Ž?ú]+]+]+]+]+]?Ù?Ö6?á?Þ*PRESS)THE*+*NUMBER)UNDER*+*EACH)CARD)THAT*+*YOU)WANT)TO*+*GET)RID)OF:*+*)*+*THEN)PRESS)ENTER*?Ø?×3?Ö8?_BLACKJAC?Ö9?_REDDOG?¬m