Routines |
Prev: 37687 | Up: Map | Next: 37721 |
|
||||
Check if there is a straight flush.
|
||||
CheckStraightFlush | 37697 | CALL Handler_StraightFlush | Call Handler_StraightFlush. | |
37700 | JR NZ,CheckFourOfAKind | Jump to CheckFourOfAKind if there are no straight flushes. | ||
There is a straight flush! Process it.
Find the "seed" card value from its position in the duplicates table.
|
||||
37702 | DEC HL | Decrease HL by one. | ||
37703 | CALL CalculateCard | Call CalculateCard. | ||
37706 | LD (38044),A | Write this card to *TableHandEvaluation_BaseCard. | ||
Also find the high card in case it's a draw.
|
||||
37709 | CALL CalculateSuit | Call CalculateSuit. | ||
37712 | LD (38045),A | Write A to *TableHandEvaluation_BaseCardSuit. | ||
Record this hand "type".
|
||||
37715 | LD A,9 | Write "Straight Flush" to *TableHandEvaluation_Type. | ||
37717 | LD (38043),A | |||
37720 | RET | Return. |
Prev: 37687 | Up: Map | Next: 37721 |