Prev: 26361 Up: Map Next: 26413
26368: Routine at 6700
Used by the routines at 26414 and 26508.
26368 LD DE,30722 DE=30722.
26371 LD B,16 B=16.
26373 LD A,(DE) A=*DE.
26374 INC E Increment E by one.
26375 LD C,4 C=4.
26377 CP 15 Jump to 26402 if A is lower than 15.
26379 JR C,26402
26381 CP 144 Jump to 26402 if A is higher than 144.
26383 JR NC,26402
26385 INC C Increment C by one.
26386 CP 61 Jump to 26402 if A is lower than 61.
26388 JR C,26402
26390 INC C Increment C by one.
26391 CP 81 Jump to 26402 if A is lower than 81.
26393 JR C,26402
26395 LD C,2 C=2.
26397 CP 111 Jump to 26402 if A is lower than 111.
26399 JR C,26402
26401 INC C Increment C by one.
26402 LD (HL),C Write C to *HL.
26403 LD A,32 A=32.
26405 ADD A,L A+=L.
26406 LD L,A L=A.
26407 ADC A,H A+=H.
26408 SUB L A-=L.
26409 LD H,A H=A.
26410 DJNZ 26373 Decrease counter by one and loop back to 26373 until counter is zero.
26412 RET Return.
Prev: 26361 Up: Map Next: 26413