|
Routines |
| Prev: 8F7D | Up: Map | Next: 9003 |
|
|
||||
| PrintStats | 8F7E | LD HL,$8FE2 | HL=8FE2. | |
| 8F81 | CALL $187D | Call OUT_LINE2. | ||
|
Print "POT" value.
|
||||
| 8F84 | LD HL,$92C6 | HL=Messaging_InGame. | ||
| 8F87 | LD A,($96B4) | A=*PotValue. | ||
| 8F8A | LD D,$00 | D=00. | ||
| 8F8C | CALL PrintStatToScreen | Call PrintStatToScreen. | ||
|
Print current round.
|
||||
| 8F8F | LD HL,$932D | HL=Messaging_Round. | ||
| 8F92 | LD A,($96B8) | A=*TurnCounter. | ||
| 8F95 | LD D,$FF | D=FF. | ||
| 8F97 | CALL PrintStatToScreen | Call PrintStatToScreen. | ||
|
Print "YOU" and the players cash reserves.
|
||||
| 8F9A | LD HL,$92CE | HL=Messaging_You. | ||
| 8F9D | LD A,($96B5) | A=*PlayerCash. | ||
| 8FA0 | LD D,$00 | D=00. | ||
| 8FA2 | CALL PrintStatToScreen | Call PrintStatToScreen. | ||
|
Print the girls name and their cash reserve.
|
||||
| 8FA5 | LD A,($98E4) | A=*CurrentGirl. | ||
| 8FA8 | LD DE,$000B | The length of each girls name is 000B, so store this in DE for the calculation. | ||
| 8FAB | LD HL,$92CB | HL=92CB (e.g. Messaging_Sheila less 000B). | ||
| FindGirlsName_Loop | 8FAE | ADD HL,DE | Keep adding 000B to HL while A is non-zero. | |
| 8FAF | DEC A | Decrease A by one. | ||
| 8FB0 | JR NZ,FindGirlsName_Loop | Jump to FindGirlsName_Loop until A is zero. | ||
| 8FB2 | LD A,($96B6) | A=*GirlCash. | ||
| 8FB5 | LD D,$00 | D=00. | ||
| 8FB7 | CALL PrintStatToScreen | Call PrintStatToScreen. | ||
|
Print "Raise" and current value.
|
||||
| 8FBA | LD HL,$92F7 | HL=Messaging_Raise. | ||
| 8FBD | LD A,($96B7) | A=*CurrentRaiseValue. | ||
| 8FC0 | LD D,$FE | D=FE. | ||
| 8FC2 | CP $0A | Jump to PrintStats_0 if A is higher than 0A. | ||
| 8FC4 | JR NC,PrintStats_0 | |||
| 8FC6 | LD D,$00 | D=00. | ||
| PrintStats_0 | 8FC8 | CALL PrintStatToScreen | Call PrintStatToScreen. | |
|
Prints the players lives.
|
||||
| 8FCB | LD HL,$9301 | HL=Messaging_PlayerLivesHash. | ||
| 8FCE | LD A,($8F7C) | A=*PlayerLives. | ||
| 8FD1 | LD D,$FF | D=FF. | ||
| 8FD3 | CALL PrintStatToScreen | Call PrintStatToScreen. | ||
| 8FD6 | LD HL,$9306 | HL=Messaging_GirlLivesHash. | ||
| 8FD9 | LD A,($8F7D) | A=*GirlLives. | ||
| 8FDC | LD D,$FF | D=FF. | ||
| 8FDE | CALL PrintStatToScreen | Call PrintStatToScreen. | ||
| 8FE1 | RET | Return. | ||
| 8FE2 | DEFB $13,$01 | BRIGHT: ON. | ||
| 8FE4 | DEFB $10,$00 | Set INK: BLACK. | ||
| 8FE6 | DEFB $11,$07 | Set PAPER: WHITE. | ||
| 8FE8 | DEFB $0D | "ENTER". | ||
| PrintStatToScreen | 8FE9 | PUSH DE | Stash DE and AF on the stack. | |
| 8FEA | PUSH AF | |||
| 8FEB | CALL $187D | Call OUT_LINE2. | ||
| 8FEE | POP AF | Restore AF from the stack. | ||
| 8FEF | LD B,$00 | B=00. | ||
| 8FF1 | LD C,A | C=A. | ||
| 8FF2 | CALL $1A1B | Call OUT_NUM_1. | ||
| 8FF5 | POP DE | Restore DE from the stack. | ||
| 8FF6 | INC D | Increment D by one. | ||
| 8FF7 | RET Z | Return if D is zero. | ||
| 8FF8 | PUSH DE | Stash DE on the stack. | ||
| 8FF9 | LD A,$24 | Print "$". | ||
| 8FFB | RST $10 | |||
| 8FFC | POP DE | Restore DE from the stack. | ||
| 8FFD | INC D | Increment D by one. | ||
| 8FFE | RET Z | Return if D is zero. | ||
| 8FFF | LD A,$20 | Print "SPACE". | ||
| 9001 | RST $10 | |||
| 9002 | RET | Return. | ||
| Prev: 8F7D | Up: Map | Next: 9003 |