Routines
Prev: 37736 Up: Map Next: 38725
38356: Routine at 95D4
Used by the routines at Game_Over and Start_1UP_Game.
38356 LD HL,43542 Call 38369 using 43542.
38359 CALL 38369
38362 LD HL,43606 Call 38369 using 43606.
38365 CALL 38369
38368 RET Return.
fffff
38369 LD A,(HL)
38370 LD (38723),A
38373 LD BC,10
38376 XOR A
38377 SBC HL,BC
38379 LD A,(HL)
38380 AND A
38381 RET Z
38382 DEC HL
38383 LD A,(HL)
38384 AND A
38385 INC HL
38386 JP Z,38606
38389 LD BC,4
38392 ADD HL,BC
38393 LD E,L
38394 LD D,H
38395 LD A,(38723)
38398 AND A
38399 LD A,(HL)
38400 JR NZ,38426
38402 AND A
38403 JR Z,38409
38405 DEC (HL)
38406 JP 38552
38409 DEC HL
38410 DEC HL
38411 LD A,(HL)
38412 AND A
38413 JR Z,38419
38415 DEC (HL)
38416 JP 38443
38419 DEC HL
38420 LD (HL),1
38422 DEC HL
38423 LD (HL),0
38425 RET
38426 INC HL
38427 CP (HL)
38428 DEC HL
38429 JR Z,38435
38431 INC (HL)
38432 JP 38552
38435 DEC HL
38436 LD A,(HL)
38437 DEC A
38438 DEC HL
38439 CP (HL)
38440 JR Z,38419
38442 INC (HL)
38443 LD BC,5
38446 ADD HL,BC
38447 LD (HL),0
38449 LD A,(38723)
38452 AND A
38453 INC HL
38454 LD A,(HL)
38455 JR Z,38466
38457 SUB 4
38459 LD (HL),A
38460 INC HL
38461 JR NC,38473
38463 DEC (HL)
38464 JR 38473
38466 ADD A,4
38468 LD (HL),A
38469 INC HL
38470 JR NC,38473
38472 INC (HL)
38473 PUSH DE
38474 LD C,(HL)
38475 DEC HL
38476 LD L,(HL)
38477 LD H,C
38478 LD A,1
38480 LD (DE),A
38481 LD A,(38723)
38484 AND A
38485 LD A,(HL)
38486 JR NZ,38492
38488 LD B,A
38489 DEC A
38490 LD (DE),A
38491 LD A,B
38492 INC DE
38493 LD (DE),A
38494 INC HL
38495 INC DE
38496 LD A,(HL)
38497 LD (DE),A
38498 INC DE
38499 LD (DE),A
38500 LD HL,7
38503 ADD HL,DE
38504 EX DE,HL
38505 LD L,A
38506 LD H,49
38508 LD A,9
38510 LD (38724),A
38513 LD B,57
38515 LD C,(HL)
38516 LD A,(BC)
38517 LD (DE),A
38518 INC DE
38519 INC B
38520 LD A,(BC)
38521 LD (DE),A
38522 INC DE
38523 LD A,(38724)
38526 DEC A
38527 LD (38724),A
38530 JR Z,38539
38532 LD BC,59
38535 ADD HL,BC
38536 JP 38513
38539 POP HL
38540 PUSH HL
38541 LD BC,7
38544 ADD HL,BC
38545 LD A,(HL)
38546 CP 1
38548 CALL Z,38686
38551 POP HL
38552 LD BC,4
38555 ADD HL,BC
38556 LD E,(HL)
38557 INC HL
38558 LD D,(HL)
38559 INC HL
38560 LD A,(HL)
38561 INC HL
38562 XOR (HL)
38563 LD (38723),A
38566 INC HL
38567 INC DE
38568 INC DE
38569 LD A,(DE)
38570 ADD A,(HL)
38571 LD (HL),A
38572 INC HL
38573 INC DE
38574 LD A,(38723)
38577 AND A
38578 LD A,(DE)
38579 LD B,A
38580 LD A,(HL)
38581 JR Z,38586
38583 SUB B
38584 JR 38587
38586 ADD A,B
38587 AND A
38588 JR NC,38593
38590 LD (HL),0
38592 RET
38593 CP 95
38595 JR C,38604
38597 CP 200
38599 JR NC,38590
38601 LD (HL),95
38603 RET
38604 LD (HL),A
38605 RET
38606 LD C,(HL)
38607 DEC HL
38608 LD (HL),C
38609 INC HL
38610 INC HL
38611 LD (HL),0
38613 INC HL
38614 PUSH HL
38615 LD DE,6
38618 ADD HL,DE
38619 EX DE,HL
38620 LD HL,37736
38623 ADD HL,BC
38624 ADD HL,BC
38625 LD C,(HL)
38626 INC HL
38627 LD B,(HL)
38628 INC HL
38629 LD A,(HL)
38630 INC HL
38631 LD H,(HL)
38632 LD L,A
38633 AND A
38634 SBC HL,BC
38636 PUSH HL
38637 LD A,(38723)
38640 AND A
38641 JR Z,38652
38643 ADD HL,BC
38644 LD BC,4
38647 AND A
38648 SBC HL,BC
38650 LD C,L
38651 LD B,H
38652 LD A,C
38653 LD (DE),A
38654 INC DE
38655 LD A,B
38656 LD (DE),A
38657 POP HL
38658 SRL H
38660 RR L
38662 SRL H
38664 RR L
38666 LD B,L
38667 POP HL
38668 LD (HL),0
38670 LD A,(38723)
38673 AND A
38674 JR NZ,38679
38676 LD A,B
38677 DEC A
38678 LD (HL),A
38679 INC HL
38680 LD (HL),B
38681 EX DE,HL
38682 INC DE
38683 JP 38473
38686 INC HL
38687 INC HL
38688 LD A,3
38690 LD (38724),A
38693 LD C,4
38695 INC HL
38696 LD D,H
38697 LD E,L
38698 LD B,0
38700 ADD HL,BC
38701 LD A,(DE)
38702 LD B,(HL)
38703 LD (HL),A
38704 LD A,B
38705 LD (DE),A
38706 INC HL
38707 INC DE
38708 LD A,(DE)
38709 LD B,(HL)
38710 LD (HL),A
38711 LD A,B
38712 LD (DE),A
38713 LD A,(38724)
38716 DEC A
38717 LD (38724),A
38720 JR NZ,38695
38722 RET
38723 DEFB 0
38724 DEFB 0
Prev: 37736 Up: Map Next: 38725