Routines
Prev: A3FF Up: Map Next: A647
A402: Routine at A402
Used by the routine at 9CA6.
A402 LD A,($A614)
A405 LD B,A
A406 LD HL,$B3D6
A409 ADD A,L
A40A LD L,A
A40B LD A,(HL)
A40C LD ($A60F),A
A40F LD A,$02
A411 LD ($A616),A
A414 LD A,B
A415 LD HL,$B3EC
A418 ADD A,L
A419 LD L,A
A41A LD A,(HL)
A41B LD ($A612),A
A41E LD A,B
A41F LD HL,$B426
A422 ADD A,L
A423 LD L,A
This entry point is used by the routine at B2FB.
A424 LD A,(HL)
A425 LD ($A615),A
A428 LD A,$80
A42A LD ($A61C),A
A42D LD A,$01
A42F LD ($A5F1),A
A432 LD A,B
A433 LD HL,$B401
A436 ADD A,L
A437 LD L,A
A438 LD A,(HL)
A439 LD ($A617),A
A43C LD A,$80
A43E LD ($A611),A
A441 LD A,$00
A443 LD ($A60E),A
A446 LD ($A618),A
A449 LD A,B
A44A LD HL,$B432
A44D ADD A,L
A44E LD L,A
A44F LD A,(HL)
A450 LD ($A646),A
A453 LD A,B
A454 LD HL,$B40D
A457 ADD A,L
A458 LD L,A
A459 LD A,(HL)
A45A LD ($A619),A
A45D LD A,B
A45E LD HL,$B41A
A461 ADD A,L
A462 LD L,A
A463 LD A,(HL)
A464 LD ($A61A),A
A467 LD A,$01
A469 LD ($A610),A
A46C LD A,$80
A46E LD ($A61B),A
A471 LD A,B
A472 LD HL,$B43E
A475 ADD A,L
A476 LD L,A
A477 LD A,(HL)
A478 LD ($A60B),A
A47B RET
This entry point is used by the routine at 9ED2.
A47C LD B,A
A47D LD A,($A62F)
A480 CP $0A
A482 JR Z,$A492
A484 CP $10
A486 JR Z,$A492
A488 CP $04
A48A JR Z,$A492
A48C CP $07
A48E JR Z,$A492
A490 LD A,B
A491 RET
A492 LD A,B
A493 LD HL,$B449
A496 ADD A,L
A497 LD L,A
A498 LD A,(HL)
A499 RET
A49A LD A,($A614)
A49D CP $07
A49F JR C,$A4BE
A4A1 LD A,($A63D)
A4A4 CP $19
A4A6 JR Z,$A4B1
A4A8 LD A,$04
A4AA LD ($A5F6),A
A4AD LD ($A5F1),A
A4B0 RET
A4B1 LD A,$0A
A4B3 LD ($A5F6),A
A4B6 LD ($A5F1),A
A4B9 XOR A
A4BA LD ($A618),A
A4BD RET
A4BE LD A,($A62F)
A4C1 CP $01
A4C3 JR NZ,$A4A8
A4C5 JP $A4B1
A4C8 LD A,$0E
A4CA LD ($A5F6),A
A4CD LD ($A5F1),A
A4D0 XOR A
A4D1 LD ($A618),A
A4D4 RET
A4D5 LD A,$09
A4D7 LD ($A5F1),A
A4DA LD ($A5F6),A
A4DD XOR A
A4DE LD ($A618),A
A4E1 RET
A4E2 LD A,($A5FA)
A4E5 AND A
A4E6 JR Z,$A4F5
A4E8 LD A,$07
A4EA LD ($A5F1),A
A4ED LD ($A5F6),A
A4F0 XOR A
A4F1 LD ($A618),A
A4F4 RET
A4F5 LD A,$04
A4F7 LD ($A5F6),A
A4FA LD ($A5F1),A
A4FD RET
A4FE CALL Random_Number
A501 CP $80
A503 JR C,$A50C
A505 LD A,$05
A507 LD ($A618),A
A50A JR $A4E2
A50C CALL Random_Number
A50F AND A
A510 JP $A517
A513 LD A,$06
A515 JR NZ,$A519
A517 LD A,$18
A519 LD ($A5F6),A
A51C LD ($A5F1),A
A51F XOR A
A520 LD ($A618),A
A523 RET
A524 LD A,($A608)
A527 LD HL,$A642
A52A CP (HL)
A52B JR Z,$A531
A52D LD A,$10
A52F JR $A533
A531 LD A,$0A
A533 LD ($A5F1),A
A536 LD ($A5F6),A
A539 XOR A
A53A LD ($A618),A
A53D RET
A53E LD A,($A5F5)
A541 CP $0A
A543 JR Z,$A54E
A545 LD A,$0A
A547 LD ($A5F6),A
A54A LD ($A5F1),A
A54D RET
A54E XOR A
A54F LD ($A618),A
A552 RET
This entry point is used by the routine at 9ED2.
A553 SLA A
A555 LD DE,$B3A9
A558 ADD A,E
A559 LD E,A
A55A LD A,(DE)
A55B LD L,A
A55C INC DE
A55D LD A,(DE)
A55E LD H,A
A55F JP (HL)
A560 LD A,($A614)
A563 CP $07
A565 JR C,$A57B
A567 CALL Random_Number
A56A AND A
A56B JP M,$A57B
A56E XOR A
A56F LD ($A618),A
A572 LD A,$0B
A574 LD ($A5F1),A
A577 LD ($A5F6),A
A57A RET
A57B LD A,$01
A57D LD ($A618),A
A580 JP $A49A
This entry point is used by the routine at 9ED2.
A583 LD A,($A60A)
A586 LD D,A
A587 LD A,($A644)
A58A LD E,A
A58B SLA E
A58D SLA D
A58F LD HL,$A608
A592 LD A,($A642)
A595 CP (HL)
A596 JR Z,$A5C3
A598 LD A,($A608)
A59B AND A
A59C JR NZ,$A5A2
A59E LD A,E
A59F SUB D
A5A0 JR $A5A4
A5A2 LD A,D
A5A3 SUB E
A5A4 LD ($A5EE),A
A5A7 LD A,($A62F)
A5AA LD HL,$B47E
A5AD ADD A,L
A5AE LD L,A
A5AF LD A,(HL)
A5B0 AND A
A5B1 JR NZ,$A5BE
A5B3 LD A,($A5EE)
A5B6 CP $EF
A5B8 JR NC,$A5C0
A5BA CP $16
A5BC JR C,$A5C0
A5BE XOR A
A5BF RET
A5C0 LD A,$01
A5C2 RET
A5C3 LD A,($A608)
A5C6 AND A
A5C7 JR Z,$A5CD
A5C9 LD A,D
A5CA SUB E
A5CB JR $A5CF
A5CD LD A,E
A5CE SUB D
A5CF LD ($A5EE),A
A5D2 LD A,($A62F)
A5D5 LD HL,$B47E
A5D8 ADD A,L
A5D9 LD L,A
A5DA LD A,(HL)
A5DB AND A
A5DC JR Z,$A5BE
A5DE LD A,($A5EE)
A5E1 CP $03
A5E3 JR C,$A5BE
A5E5 CP $10
A5E7 JR NC,$A5BE
A5E9 LD A,$01
A5EB RET
A5EC NOP
A5ED NOP
A5EE NOP
A5EF NOP
A5F0 NOP
A5F1 NOP
A5F2 NOP
A5F3 NOP
A5F4 NOP
A5F5 NOP
A5F6 NOP
A5F7 NOP
A5F8 NOP
A5F9 NOP
A5FA NOP
A5FB NOP
A5FC NOP
A5FD NOP
A5FE NOP
A5FF NOP
A600 NOP
A601 NOP
A602 NOP
A603 NOP
A604 NOP
A605 NOP
A606 NOP
A607 NOP
A608 NOP
A609 NOP
A60A NOP
A60B NOP
A60C JP PE,$007F
A60F NOP
A610 NOP
A611 NOP
A612 NOP
A613 NOP
A614 NOP
A615 NOP
A616 NOP
A617 NOP
A618 NOP
A619 NOP
A61A NOP
A61B NOP
A61C NOP
A61D NOP
A61E NOP
A61F NOP
A620 NOP
A621 NOP
A622 NOP
A623 NOP
A624 NOP
A625 NOP
A626 NOP
A627 NOP
A628 NOP
A629 NOP
A62A NOP
A62B NOP
A62C NOP
A62D NOP
A62E NOP
A62F NOP
A630 NOP
A631 NOP
A632 NOP
A633 NOP
A634 NOP
A635 NOP
A636 NOP
A637 NOP
A638 NOP
A639 NOP
A63A NOP
A63B NOP
A63C NOP
A63D NOP
A63E NOP
A63F NOP
A640 NOP
A641 NOP
A642 NOP
A643 NOP
A644 NOP
A645 LD A,(HL)
A646 NOP
Prev: A3FF Up: Map Next: A647