CODE * ( DE * BC -> DE (high) and HL (low) )
DE POP, BC POP, chkPS,
HL 0 LDdn,
A 0x10 LDri,
( loop )
HL ADDHLd,
E RL, D RL,
JRNC, 4 A, ( noinc )
BC ADDHLd,
JRNC, 1 A, ( noinc )
DE INCd,
( noinc )
A DECr,
JRNZ, -14 A, ( loop )
HL PUSH,
;CODE