|
Routines |
| Prev: 37766 | Up: Map | Next: 37833 |
|
Used by the routine at CheckFlush.
|
||||
|
Check if there is a straight.
|
||||
| CheckStraight | 37808 | CALL Handler_Straight | Call Handler_Straight. | |
| 37811 | JR NZ,CheckThreeOfAKind | Jump to CheckThreeOfAKind if there are no straights. | ||
|
There is a straight! Process it.
|
||||
| 37813 | DEC HL | Decrease HL by one. | ||
| 37814 | LD A,(HL) | A=*HL. | ||
| 37815 | CALL CalculateCard | Call CalculateCard. | ||
| 37818 | LD (38044),A | Write A to *TableHandEvaluation_BaseCard. | ||
| 37821 | CALL CalculateSuit | Call CalculateSuit. | ||
| 37824 | LD (38045),A | Write A to *TableHandEvaluation_BaseCardSuit. | ||
|
Record this hand "type".
|
||||
| 37827 | LD A,5 | Write "Straight" to *TableHandEvaluation_Type. | ||
| 37829 | LD (38043),A | |||
| 37832 | RET | Return. | ||
| Prev: 37766 | Up: Map | Next: 37833 |