49409: Routine at C101
| 49409 |
LD A,(50228) |
| 49412 |
LD D,A |
| 49413 |
LD A,(50229) |
| 49416 |
SUB D |
| 49417 |
SRL A |
| 49419 |
SRL A |
| 49421 |
ADD A,2 |
| 49423 |
LD H,A |
| 49424 |
LD (50186),A |
| 49427 |
LD (50191),A |
| 49430 |
LD A,(50230) |
| 49433 |
LD D,A |
| 49434 |
LD A,(50231) |
| 49437 |
SUB D |
| 49438 |
LD L,A |
| 49439 |
LD (50185),A |
| 49442 |
LD A,(50228) |
| 49445 |
AND 252 |
| 49447 |
LD B,A |
| 49448 |
LD A,(50230) |
| 49451 |
LD C,A |
| 49452 |
LD (50202),A |
| 49455 |
LD C,72 |
| 49457 |
SUB C |
| 49458 |
LD C,A |
| 49459 |
CALL 49716 |
| 49462 |
CALL 49570 |
| 49465 |
LD A,(50230) |
| 49468 |
CALL Screen_Calc |
| 49471 |
LD A,(50228) |
| 49474 |
SRL A |
| 49476 |
SRL A |
| 49478 |
LD E,A |
| 49479 |
LD D,0 |
| 49481 |
ADD HL,DE |
| 49482 |
EX DE,HL |
| 49483 |
LD HL,63280 |
| 49486 |
CALL 50148 |
| 49489 |
LD A,(50232) |
| 49492 |
LD D,A |
| 49493 |
LD A,(50233) |
| 49496 |
SUB D |
| 49497 |
SRL A |
| 49499 |
SRL A |
| 49501 |
ADD A,2 |
| 49503 |
LD H,A |
| 49504 |
LD (50186),A |
| 49507 |
LD (50191),A |
| 49510 |
LD A,(50234) |
| 49513 |
LD D,A |
| 49514 |
LD A,(50235) |
| 49517 |
SUB D |
| 49518 |
LD L,A |
| 49519 |
LD (50185),A |
| 49522 |
LD A,(50232) |
| 49525 |
AND 252 |
| 49527 |
LD B,A |
| 49528 |
LD A,(50234) |
| 49531 |
LD C,A |
| 49532 |
LD (50202),A |
| 49535 |
LD C,72 |
| 49537 |
SUB C |
| 49538 |
LD C,A |
| 49539 |
CALL 49716 |
| 49542 |
CALL 49612 |
| 49545 |
LD A,(50234) |
| 49548 |
CALL Screen_Calc |
| 49551 |
LD A,(50232) |
| 49554 |
SRL A |
| 49556 |
SRL A |
| 49558 |
LD E,A |
| 49559 |
LD D,0 |
| 49561 |
ADD HL,DE |
| 49562 |
EX DE,HL |
| 49563 |
LD HL,63280 |
| 49566 |
CALL 50148 |
| 49569 |
RET |
