Prev: B16D Up: Map Next: B39C
B191: Routine at B191
Used by the routine at B77F.
B191 LD A,$FF
B193 LD ($A035),A
B196 LD ($A034),A
B199 LD HL,$B16D
B19C LD B,$11
B19E CALL $A2AB
B1A1 CALL $B39D
B1A4 JR NZ,$B1AB
B1A6 LD HL,$B84C
B1A9 XOR A
B1AA RET
B1AB LD A,$01
B1AD PUSH IX
B1AF POP HL
B1B0 LD DE,$8259
B1B3 SBC HL,DE
B1B5 JR Z,$B1BF
B1B7 LD DE,$0008
B1BA INC A
B1BB SBC HL,DE
B1BD JR NZ,$B1BA
B1BF LD ($A033),A
B1C2 LD ($B18E),IX
B1C6 CP $2E
B1C8 JR NZ,$B1DD
B1CA LD HL,$B16D
B1CD BIT 0,(HL)
B1CF LD HL,$A002
B1D2 LD DE,$B172
B1D5 LD BC,$0006
B1D8 JR Z,$B1DB
B1DA EX DE,HL
B1DB LDIR
B1DD CALL $C493
B1E0 CALL $C4B2
B1E3 LD A,($A01C)
B1E6 AND A
B1E7 JR NZ,$B1F2
B1E9 LD A,($B39C)
B1EC LD ($A01C),A
B1EF CALL $B34F
B1F2 LD A,($A01E)
B1F5 AND $10
B1F7 LD ($B190),A
B1FA JR Z,$B200
B1FC XOR A
B1FD LD ($A01C),A
B200 XOR A
B201 LD ($A00B),A
B204 LD A,($A01D)
B207 AND $0C
B209 JR NZ,$B213
B20B CALL $C929
B20E RET NZ
B20F LD HL,$B863
B212 RET
B213 CALL $B387
B216 JR NZ,$B280
B218 LD A,($A01C)
B21B AND A
B21C JR NZ,$B224
B21E CALL $B308
B221 AND A
B222 JR Z,$B259
B224 CALL $B4C1
B227 JR Z,$B244
B229 CALL $C929
B22C JR Z,$B224
B22E LD A,($A034)
B231 LD ($B184),A
B234 LD HL,$B170
B237 INC (HL)
B238 LD A,($B190)
B23B AND A
B23C JR NZ,$B244
B23E LD A,($A01C)
B241 AND A
B242 JR Z,$B224
B244 LD A,($B184)
B247 LD ($A034),A
B24A LD A,($B170)
B24D AND A
B24E JR Z,$B259
B250 CP $01
B252 JR Z,$B20B
B254 LD HL,$B5E2
B257 XOR A
B258 RET
B259 LD A,($A033)
B25C CP $2E
B25E JR NZ,$B27B
B260 LD A,($A01C)
B263 AND A
B264 JR NZ,$B27B
B266 LD HL,$B16D
B269 BIT 0,(HL)
B26B JR NZ,$B27B
B26D LD HL,$0000
B270 LD ($B172),HL
B273 LD ($B174),HL
B276 LD ($B176),HL
B279 JR $B213
B27B LD HL,$B65F
B27E XOR A
B27F RET
B280 LD A,($A01C)
B283 AND A
B284 JR NZ,$B292
B286 CALL $B308
B289 AND A
B28A JR Z,$B259
B28C CALL $B32D
B28F AND A
B290 JR Z,$B303
B292 CALL $B4C1
B295 JR Z,$B2B7
B297 CALL $B2DF
B29A LD A,($B171)
B29D CP $01
B29F JR NZ,$B292
B2A1 LD A,($A034)
B2A4 LD ($B184),A
B2A7 LD HL,$B170
B2AA INC (HL)
B2AB LD A,($B190)
B2AE AND A
B2AF JR NZ,$B2B7
B2B1 LD A,($A01C)
B2B4 AND A
B2B5 JR Z,$B292
B2B7 LD A,($B184)
B2BA LD ($A034),A
B2BD LD A,($B170)
B2C0 AND A
B2C1 JR Z,$B259
B2C3 CP $01
B2C5 JR NZ,$B2DA
B2C7 CALL $B2DF
B2CA LD A,($B171)
B2CD AND A
B2CE JR Z,$B303
B2D0 CP $01
B2D2 JP Z,$B20B
B2D5 LD HL,$B5D3
B2D8 XOR A
B2D9 RET
B2DA LD HL,$B5E2
B2DD XOR A
B2DE RET
B2DF CALL $B36B
B2E2 CALL $B568
B2E5 JR Z,$B2FC
B2E7 CALL $C929
B2EA JR Z,$B2E2
B2EC LD A,($A035)
B2EF LD ($B185),A
B2F2 LD HL,$B171
B2F5 INC (HL)
B2F6 LD A,($B190)
B2F9 AND A
B2FA JR Z,$B2E2
B2FC LD A,($B185)
B2FF LD ($A035),A
B302 RET
B303 LD HL,$B6AE
B306 XOR A
B307 RET
B308 LD HL,($B17E)
B30B PUSH HL
B30C LD A,($B4A2)
B30F PUSH AF
B310 CALL $B34F
B313 CALL $B4C1
B316 JR Z,$B31E
B318 LD HL,$B170
B31B INC (HL)
B31C JR $B313
B31E POP AF
B31F LD ($B4A2),A
B322 LD HL,$B170
B325 LD A,(HL)
B326 LD (HL),$00
B328 POP HL
B329 LD ($B17E),HL
B32C RET
B32D LD HL,($B180)
B330 PUSH HL
B331 CALL $B36B
B334 LD A,($B549)
B337 PUSH AF
B338 CALL $B568
B33B JR Z,$B343
B33D LD HL,$B171
B340 INC (HL)
B341 JR $B338
B343 POP AF
B344 LD ($B549),A
B347 LD A,($B171)
B34A POP HL
B34B LD ($B180),HL
B34E RET
B34F XOR A
B350 LD ($B170),A
B353 LD A,$FF
B355 LD ($B4A2),A
B358 CALL AdjustObjectTableForSum
B35B LD A,($A00F)
B35E CP $07
B360 JR NC,$B366
B362 LD IX,$0000
B366 LD ($B17E),IX
B36A RET
B36B XOR A
B36C LD ($B171),A
B36F LD A,$FF
B371 LD ($B549),A
B374 CALL AdjustObjectTableForSum
B377 LD A,($A010)
B37A CP $07
B37C JR NC,$B382
B37E LD IX,$0000
B382 LD ($B180),IX
B386 RET
B387 LD A,($A01D)
B38A BIT 2,A
B38C RET Z
B38D LD HL,$B16E
B390 BIT 0,(HL)
B392 RET NZ
B393 BIT 1,A
B395 JR NZ,$B39A
B397 OR $01
B399 RET
B39A XOR A
B39B RET
Prev: B16D Up: Map Next: B39C