|  | 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 |