![]() |
Routines |
Prev: 38425 | Up: Map | Next: 38654 |
Used by the routine at 37488.
|
||||
38452 | LD A,(29191) | Return if *29191 is not equal to 1. | ||
38455 | CP 1 | |||
38457 | RET NZ | |||
38458 | LD HL,39332 | HL=39332. | ||
38461 | LD IX,29184 | IX=29184. | ||
38465 | DEC (HL) | Decrease *HL by one. | ||
38466 | JR NZ,38521 | Jump to 38521 if *HL is not zero. | ||
38468 | LD (HL),5 | Write 5 to *HL. | ||
38470 | LD A,(39331) | A=*39331. | ||
38473 | CP 0 | Jump to 38491 if A is equal to 0. | ||
38475 | JR Z,38491 | |||
38477 | DEC A | Decrease A by one. | ||
38478 | LD (39331),A | Write A to *39331. | ||
38481 | JR NZ,38491 | Jump to 38491 if A is not zero. | ||
38483 | LD C,64 | C=64. | ||
38485 | LD HL,20672 | HL=20672 (screen buffer location). | ||
38488 | CALL ClearScreenArea | Call ClearScreenArea. | ||
38491 | LD HL,39385 | HL=39385. | ||
38494 | LD A,(39339) | A=*39339. | ||
38497 | SRL A | Shift A right four positions. | ||
38499 | SRL A | |||
38501 | SRL A | |||
38503 | SRL A | |||
38505 | INC A | Increment A by one. | ||
38506 | LD (HL),A | Write A to *HL. | ||
38507 | LD DE,61431 | DE=ActivePlayerCash_01. | ||
38510 | LD B,2 | B=2. | ||
38512 | CALL SpendMoney | Call SpendMoney. | ||
38515 | JR C,38635 | Jump to 38635 if A is lower. | ||
38517 | SET 1,(IX+0) | Set bit 1 of *IX+0. | ||
38521 | BIT 0,(IX+0) | Test bit 0 of *IX+0. | ||
38525 | JR Z,38577 | Jump to 38577 if A is zero. | ||
38527 | LD DE,61431 | DE=ActivePlayerCash_01. | ||
38530 | LD HL,39387 | HL=39387. | ||
38533 | LD B,2 | B=2. | ||
38535 | CALL AddMoney | Call AddMoney. | ||
38538 | LD DE,61428 | DE=ActivePlayerScore. | ||
38541 | LD HL,39389 | HL=39389. | ||
38544 | LD B,3 | B=3. | ||
38546 | CALL AddMoney | Call AddMoney. | ||
38549 | LD DE,16417 | DE=16417 (screen buffer location). | ||
38552 | LD BC,515 | BC=0515. | ||
38555 | LD HL,61430 | HL=61430. | ||
38558 | CALL PrintNumbers | Call PrintNumbers. | ||
38561 | LD HL,39341 | HL=39341. | ||
38564 | DEC (HL) | Decrease *HL by one. | ||
38565 | JR NZ,38577 | Jump to 38577 if *HL is not zero. | ||
38567 | LD HL,61434 | HL=GameState_1. | ||
38570 | SET 0,(HL) | Set bit 0 of *HL. | ||
38572 | LD SP,(39342) | SP=*39342. | ||
38576 | RET | Return. | ||
38577 | BIT 4,(IX+0) | Test bit 4 of *IX+0. | ||
38581 | JR NZ,38591 | Jump to 38591 if *HL is not zero. | ||
38583 | BIT 1,(IX+0) | Test bit 1 of *IX+0. | ||
38587 | JR Z,38630 | Jump to 38630 if *HL is zero. | ||
38589 | JR 38618 | Jump to 38618. | ||
38591 | LD DE,61431 | DE=ActivePlayerCash_01. | ||
38594 | LD HL,39392 | HL=39392. | ||
38597 | LD B,2 | B=2. | ||
38599 | CALL SpendMoney | Call SpendMoney. | ||
38602 | JR C,38635 | Jump to 38635 if *HL is lower. | ||
38604 | LD HL,39331 | HL=39331. | ||
38607 | LD (HL),5 | Write 5 to *HL. | ||
38609 | LD HL,(39383) | HL=*39383. | ||
38612 | LD DE,20672 | DE=20672 (screen buffer location). | ||
38615 | CALL 38740 | Call 38740. | ||
38618 | LD DE,16443 | DE=16443 (screen buffer location). | ||
38621 | LD BC,514 | BC=0514. | ||
38624 | LD HL,61432 | HL=ActivePlayerCash_02. | ||
38627 | CALL PrintNumbers | Call PrintNumbers. | ||
38630 | LD (IX+0),0 | Write 0 to *IX+0. | ||
38634 | RET | Return. | ||
38635 | LD HL,0 | Write 0000 to *ActivePlayerCash_01. | ||
38638 | LD (61431),HL | |||
38641 | CALL 38618 | Call 38618. | ||
38644 | LD HL,61434 | HL=GameState_1. | ||
38647 | SET 4,(HL) | Set bit 4 of *HL. | ||
38649 | LD SP,(39342) | SP=*39342. | ||
38653 | RET | Return. |
Prev: 38425 | Up: Map | Next: 38654 |