Small optimizations by HWR0

Author: Kongduino

PSET.asm

@@ -120,7 +120,7 @@
 1160 DJNZ FILL01
 1170 CALL WAIT
 
-1180 LD A,0
+1180 XOR A
 1190 LD (POSX),A
 1200 LD A,15
 1210 LD (POSY),A
@@ -134,7 +134,7 @@
 1900 RET
 
 1950WAIT: CALL WAITK
-1960 CP 0
+1960 OR A
 1970 JP Z,WAIT
 1980 RET
 
@@ -186,13 +186,13 @@
 4160 CALL LDPSTR ; read 6 bytes: one char
 4170 LD HL,BUFFER
 4180 LD A,(REMNX)
-4190 CP 0
+4190 OR A
 4200 JP Z, PSET01
 4210 LD B,A
 4220PSET00: INC HL ; ADD REMNX TO HL
 4230 DJNZ PSET00
 4240PSET01: LD A,(REMNY)
-4250 CP 0
+4250 OR A
 4260 JP NZ, PSET02
 4270 LD A,1
 4280 JP PSET03
@@ -319,7 +319,7 @@
 6200STRLN: LD B,0
 6210 PUSH HL ;preserve HL
 6220STRLN0: LD A,(HL)
-6230 CP 0
+6230 OR A
 6240 JP Z,STRLN1
 6250 INC HL
 6260 INC B