![]() |
Routines |
Prev: 37989 | Up: Map | Next: 38092 |
|
||||
38008 | INC DE | Increment DE by one. | ||
38009 | LD A,(DE) | A=*DE. | ||
38010 | DEC DE | Decrease DE by one. | ||
38011 | AND %11111000 | Keep only bits 3-7. | ||
38013 | LD (39337),A | Write A to *39337. | ||
38016 | LD BC,5 | BC=0005. | ||
38019 | LD L,(IX+1) | L=*IX+1. | ||
38022 | LD H,(IX+0) | H=*IX+0. | ||
38025 | SET 2,(HL) | Set bit 2 of *HL. | ||
38027 | PUSH HL | Stash HL on the stack. | ||
38028 | AND A | Set flags. | ||
38029 | SBC HL,DE | HL-=DE (with carry). | ||
38031 | JR Z,38058 | Jump to 38058 if DE is zero. | ||
38033 | POP IX | Restore IX from the stack. | ||
38035 | LD A,(39337) | A=*39337. | ||
38038 | XOR (IX+0) | |||
38041 | LD (IX+0),A | Write A to *IX+0. | ||
38044 | LD A,(IX+5) | Jump to 38055 if *IX+5 is equal to 0. | ||
38047 | CP 0 | |||
38049 | JR Z,38055 | |||
38051 | ADD IX,BC | IX+=BC. | ||
38053 | JR 38019 | Jump to 38019. | ||
38055 | POP BC | Restore BC from the stack. | ||
38056 | JR 38083 | Jump to 38083. | ||
38058 | POP HL | Restore HL from the stack. | ||
38059 | ADD HL,BC | HL+=BC. | ||
38060 | LD A,(HL) | A=*HL. | ||
38061 | INC HL | Increment HL by one. | ||
38062 | LD L,(HL) | L=*HL. | ||
38063 | LD (IX+0),A | Write A to *IX+0. | ||
38066 | LD (IX+1),L | Write L to *IX+1. | ||
38069 | LD H,A | H=A. | ||
38070 | SET 2,(HL) | Set bit 2 of *HL. | ||
38072 | POP BC | Restore BC from the stack. | ||
38073 | LD HL,(39335) | HL=*39335. | ||
38076 | LD (HL),C | Write C to *HL. | ||
38077 | INC HL | Increment HL by one. | ||
38078 | LD (HL),B | Write B to *HL. | ||
38079 | INC HL | Increment HL by one. | ||
38080 | LD (39335),HL | Write HL to *39335. | ||
38083 | LD IX,64 | IX=0064. | ||
38087 | ADD IX,BC | IX+=BC. | ||
38089 | JP 37989 | Jump to 37989. |
Prev: 37989 | Up: Map | Next: 38092 |