A | Number of lines to add/10 |
29643 | D5 | PUSH DE | |
29644 | E5 | PUSH HL | |
29645 | 5F | LD E,A | |
29646 | 1600 | LD D,0 | |
29648 | 2AE77F | LD HL,(32743) | HL=number of lines/10 |
29651 | 0118FC | LD BC,64536 | |
29654 | 09 | ADD HL,BC | Does ERIC have less than 10000 lines? |
29655 | 3003 | JR NC,29660 | Jump if so |
29657 | 19 | ADD HL,DE | Add lines to ERIC's total |
29658 | 1809 | JR 29669 | |
29660 | 19 | ADD HL,DE | Add lines to ERIC's total |
29661 | 3006 | JR NC,29669 | Jump if ERIC still has less than 10000 lines |
29663 | E5 | PUSH HL | |
29664 | CD32F5 | CALL 62770 | Set MR WACKER on his way to expel ERIC |
29667 | A7 | AND A | Clear the carry flag |
29668 | E1 | POP HL | |
29669 | ED42 | SBC HL,BC | Now HL=new lines total/10 |
29671 | 22E77F | LD (32743),HL | |
29674 | EB | EX DE,HL | |
29675 | 21C451 | LD HL,20932 | HL=appropriate display file address |
29678 | C3C573 | JP 29637 | Print the new lines total |