home *** CD-ROM | disk | FTP | other *** search
/ Jumbo 2,500 Game Pack / DDVDAV937D1.iso / sharewarefin / PRESIDNT.ZIP / ULTRAPR.RU_ / ULTRAPR.RU
Text File  |  1997-06-13  |  2KB  |  49 lines

  1. ; Play my twos if there's only one other card value
  2. 2    NumDiffVals = 1
  3.  
  4. ; If I've got a two and two other values, play the highest - but don't split
  5. HQ    NumDiffVals = 2        TotMyTwos > 0
  6. HT    NumDiffVals = 2        TotMyTwos > 0
  7. HP    NumDiffVals = 2        TotMyTwos > 0
  8. H    NumDiffVals = 2        TotMyTwos > 0
  9.  
  10. ; If I've got two 2s, and two different kinds of cards, get the lead
  11. 2    Lead = 0    TotMyTwos = 2    NumDiffVals = 2
  12. 2    Lead = 0    TotMyTwos = 3    NumDiffVals = 3
  13.  
  14. ; If there are two players (including me) and I can skip to get the lead, do it
  15. ; Even if I have to split something up
  16. L*    PlayersLeft = 2        MatchesUpCard = 1
  17.  
  18. ; If the odds are low that I can be followed, and I don't have the lead, play the high card near end of game 
  19. H*    Lead = 0    FollowOdds < 20    PlayersLeft < 3
  20.  
  21. ; Always follow or lead a quad or trip, regardless
  22. LQ    
  23. LT    
  24.  
  25. ; And always follow a low pair
  26. LP    Lead = 0    CardVal < 10
  27.  
  28. ; Or follow a card if it's of low value
  29. L    Lead = 0    CardVal < 10
  30.  
  31. ; If I only have two values of cards, then play the lowest - even if I have to split
  32. L*    NumDiffVals = 2
  33.  
  34. ; Get aggressive (and the lead) if I have lots of twos 
  35. 2     Lead = 0    TotMyTwos > 1        TwosLeft < 2
  36. 2    PlayersLeft < 4        Lead = 0    TotMyTwos > 1
  37. 2    Lead = 0    TotMyTwos = 3        TotMyCards < 6
  38. 2    Lead = 0    TotMyTwos = 2         TotMyCards < 5
  39.  
  40. ; If I have a mediocre hand then pass if ther are four or five players left
  41. P    Lead = 0    HandValue < 7    TotMyTwos < 2    PlayersLeft > 3
  42. P    Lead = 0    HandValue < 9    TotMyTwos = 0    PlayersLeft > 3
  43.  
  44. ; Play anything to try and get the lead - without splitting, first
  45. LP
  46. L
  47.  
  48. ; But split if I have to if at am near top
  49. L*    HigherPlayers < 2