point procedure by veka/cpu (mod. by xplrdg98/cpu)

Hello, Знахарь This is the first time I've seen this. Description of the destination: PTABFIL LD HL,PTABLE+#100 LD IS,#E0F8 LD BC,#FF8 PTF1 INC B LD A,B SRL A SCF RRA SRL A XOR B AND E XOR B ; OR #C0 LD (HL),A DEC H LD A,B RLCA RLCA AND D LD (HL),A INC H INC L LD A,B CP #BF JR NZ,PTF1 PTF2 XOR A LD (HL),A DEC H LD (HL),A INC H INC L JR NZ,PTF2 INC H PTF3 LD A,L AND E RRCA RRCA RRCA LD (HL),A INC H LD (HL),C DEC H RRC C INC L JR NZ,PTF3 RET Details of: XPLOT LD H,'PTABLE ;7 LD L,D ;4 LD A,(HL) ;7 INC H ;4 LD D,(HL) ;7 INC H ;4 LD L,E ;4 ADD A,(HL) ;7 LD E,A ;4 INC H ;4 LD A,(DE) ;7 OR (HL);7 LD (DE),A ;7=73!!! RET