H | 207 (ANGELFACE) |
30706 | 2E00 | LD L,0 | |
30708 | CB46 | BIT 0,(HL) | Is ANGELFACE midstride? |
30710 | C0 | RET NZ | Return if so |
30711 | CD4F77 | CALL 30543 | IS ANGELFACE on the top, middle or bottom floor? |
30714 | C0 | RET NZ | Return if not |
30715 | CD9162 | CALL 25233 | A=random number |
30718 | 07 | RLCA | |
30719 | D0 | RET NC | Return 50% of the time |
30720 | CD646D | CALL 28004 | Can any teachers see ANGELFACE? |
30723 | D8 | RET C | Return if so |
30724 | 0603 | LD B,3 | |
30726 | CDC877 | CALL 30664 | Is there anyone in front of ANGELFACE to be hit? |
30729 | D8 | RET C | Return if not |
30730 | C1 | POP BC | |
30731 | C1 | POP BC | |
30732 | 211378 | LD HL,30739 | Place the address of the routine at 30739 into bytes 17 and 18 of ANGELFACE's buffer |
30735 | 2211CF | LD (53009),HL | |
30738 | C9 | RET |