Routines |
Prev: 61121 | Up: Map | Next: 61383 |
61329 | PUSH AF | Stash AF on the stack. | ||
61330 | EXX | Switch to the shadow registers. | ||
61331 | LD A,(62063) | C=*62063. | ||
61334 | LD C,A | |||
61335 | LD A,(43065) | A=*43065. | ||
61338 | AND %00000111 | Keep only bits 0-2. | ||
61340 | JR Z,61346 | If the result is zero, jump to 61346. | ||
61342 | LD B,3 | B=3. | ||
61344 | JR 61348 | Jump to 61348. | ||
61346 | LD B,2 | B=2. | ||
61348 | LD A,(43065) | A=*43065. | ||
61351 | AND %11111000 | Keep only bits 3-7. | ||
61353 | LD H,0 | Create an offset in HL. | ||
61355 | LD L,A | |||
61356 | ADD HL,HL | HL*=4. | ||
61357 | ADD HL,HL | |||
61358 | LD DE,64256 | DE=64256. | ||
61361 | ADD HL,DE | HL+=DE. | ||
61362 | LD DE,30 | DE=0030. | ||
61365 | LD (HL),C | Write C to *HL. | ||
61366 | INC HL | Increment HL by one. | ||
61367 | LD (HL),C | Write C to *HL. | ||
61368 | INC HL | Increment HL by one. | ||
61369 | LD A,(43064) | A=*43064. | ||
61372 | AND %00000111 | Keep only bits 0-2. | ||
61374 | JR Z,61377 | If the result is zero, jump to 61377. | ||
61376 | LD (HL),C | Write C to *HL. | ||
61377 | ADD HL,DE | HL+=DE. | ||
61378 | DJNZ 61365 | Decrease counter by one and loop back to 61365 until counter is zero. | ||
61380 | EXX | Switch back to the normal registers. | ||
61381 | POP AF | Restore AF from the stack. | ||
61382 | RET | Return. |
Prev: 61121 | Up: Map | Next: 61383 |