|
Routines |
| Prev: 6D28 | Up: Map | Next: 6D96 |
| 6D49 | LD A,($5C78) | A=*FRAMES. | ||
| 6D4C | INC A | Increment A by one. | ||
| 6D4D | LD ($785A),A | Write A to *785A. | ||
|
This entry point is used by the routines at 6C00, 6E18 and 763C.
|
||||
| 6D50 | LD HL,$782A | HL=Action. | ||
| 6D53 | LD A,(HL) | Jump to 6D5E if *HL is not zero. | ||
| 6D54 | AND A | |||
| 6D55 | JR NZ,$6D5E | |||
| 6D57 | DEC L | Decrease L by one. | ||
| 6D58 | LD A,(HL) | Jump to 6D77 if *HL is zero. | ||
| 6D59 | AND A | |||
| 6D5A | JR Z,$6D77 | |||
| 6D5C | LD A,$02 | A=02. | ||
| 6D5E | LD L,$CC | L=CC. | ||
| 6D60 | LD B,$02 | B=02. | ||
| 6D62 | LD D,(HL) | D=*HL. | ||
| 6D63 | INC L | Increment L by one. | ||
| 6D64 | LD E,(HL) | E=*HL. | ||
| 6D65 | OUT ($FE),A | OUT FE | ||
| 6D67 | XOR %00010000 | Flip bits 4. | ||
| 6D69 | DEC E | Decrease E by one. | ||
| 6D6A | JR NZ,$6D69 | Jump to 6D69 until E is zero. | ||
| 6D6C | CALL $EC00 | Call EC00. | ||
| 6D6F | DEC D | Decrease D by one. | ||
| 6D70 | JR NZ,$6D64 | Jump to 6D64 until D is zero. | ||
| 6D72 | INC L | Increment L by one. | ||
| 6D73 | DJNZ $6D62 | Decrease counter by one and loop back to 6D62 until counter is zero. | ||
| 6D75 | JR $6D5E | Jump to 6D5E. | ||
| 6D77 | LD A,($7835) | A=*7835. | ||
| 6D7A | SUB $9B | A-=9B. | ||
| 6D7C | LD C,A | C=A. | ||
| 6D7D | LD D,$14 | D=14. | ||
| 6D7F | LD L,$CC | L=CC. | ||
| 6D81 | XOR A | A=00. | ||
| 6D82 | LD B,C | B=C. | ||
| 6D83 | OUT ($FE),A | OUT FE | ||
| 6D85 | XOR %00010000 | Flip bits 4. | ||
| 6D87 | LD E,(HL) | E=*HL. | ||
| 6D88 | DEC E | Decrease E by one. | ||
| 6D89 | JR NZ,$6D88 | Jump to 6D88 until E is zero. | ||
| 6D8B | CALL $EC00 | Call EC00. | ||
| 6D8E | DJNZ $6D87 | Decrease counter by one and loop back to 6D87 until counter is zero. | ||
| 6D90 | INC L | Increment L by one. | ||
| 6D91 | DEC D | Decrease D by one. | ||
| 6D92 | JR NZ,$6D82 | Jump to 6D82 until D is zero. | ||
| 6D94 | JR $6D7D | Jump to 6D7D. | ||
| Prev: 6D28 | Up: Map | Next: 6D96 |