Routines

27672: Alter UDG references in play area for open/closed door/window


Used by routines at 24028, 27860, 28736 and 64077

HL Start address of table corresponding to door/window (see 28736)

27672 7E LD A,(HL)
27673 57 LD D,A
27674 3C INC A
27675 C8 RET Z
27676 23 INC HL
27677 5E LD E,(HL)
27678 23 INC HL
27679 E5 PUSH HL
27680 3AFF7F LD A,(32767)
27683 4F LD C,A
27684 7B LD A,E
27685 91 SUB C
27686 381D JR C,27717
27688 FE20 CP 32
27690 3019 JR NC,27717
27692 4F LD C,A
27693 E607 AND 7
27695 C678 ADD A,120
27697 6F LD L,A
27698 26E1 LD H,225
27700 46 LD B,(HL)
27701 79 LD A,C
27702 0F RRCA
27703 0F RRCA
27704 0F RRCA
27705 E603 AND 3
27707 82 ADD A,D
27708 82 ADD A,D
27709 82 ADD A,D
27710 82 ADD A,D
27711 6F LD L,A
27712 267F LD H,127
27714 7E LD A,(HL)
27715 B0 OR B
27716 77 LD (HL),A
27717 6B LD L,E
27718 26B5 LD H,181
27720 5E LD E,(HL)
27721 7A LD A,D
27722 C6A0 ADD A,160
27724 57 LD D,A
27725 E1 POP HL
27726 7E LD A,(HL)
27727 23 INC HL
27728 12 LD (DE),A
27729 7E LD A,(HL)
27730 E60F AND 15
27732 47 LD B,A
27733 7B LD A,E
27734 4F LD C,A
27735 C668 ADD A,104
27737 37 SCF
27738 1F RRA
27739 5F LD E,A
27740 380B JR C,27753
27742 78 LD A,B
27743 0F RRCA
27744 0F RRCA
27745 0F RRCA
27746 0F RRCA
27747 47 LD B,A
27748 1A LD A,(DE)
27749 E60F AND 15
27751 1803 JR 27756
27753 1A LD A,(DE)
27754 E6F0 AND 240
27756 B0 OR B
27757 12 LD (DE),A
27758 7E LD A,(HL)
27759 E6C0 AND 192
27761 CB77 BIT 6,A
27763 2802 JR Z,27767
27765 D638 SUB 56
27767 47 LD B,A
27768 79 LD A,C
27769 0E88 LD C,136
27771 CB3F SRL A
27773 3004 JR NC,27779
27775 CB08 RRC B
27777 CB09 RRC C
27779 CB3F SRL A
27781 3008 JR NC,27791
27783 CB08 RRC B
27785 CB09 RRC C
27787 CB08 RRC B
27789 CB09 RRC C
27791 C690 ADD A,144
27793 5F LD E,A
27794 1A LD A,(DE)
27795 B1 OR C
27796 A9 XOR C
27797 B0 OR B
27798 12 LD (DE),A
27799 23 INC HL
27800 C3186C JP 27672