'comment' library A14 -- genuine from KQX; 'procedure' copy text(in device,outdev,fromto); 'value' in device,outdev; 'integer' in device,outdev; 'string' from to; 'KDF9' 12/9/14/1; V0=B4322406415237071; V1=B1243647147200000; {fromto}; {outdev}; {indevice}; (copy text); JS4P295; JS12P295; =M15; M0M15; ZERO; SHLD+8; SETB215; NEV; J5#Z; ZERO; SHLD+8; REV; SHL-40; SETB235; J2=; REV; DUP; 6; ERASE; 1; JS6P295; J6; J1#; DUP; 26; ERASE; 2; ERASE; 3; JS6P295; J2; DUPD; NEV; J4=Z; SETB215; J7=; SETB216; J27#; SETB20; OR; J25; 27; SETB236; J2=; SETB240; J2=; SETB256; J2=; 25; JS14P295; J3; 4; JS10P295; ERASE; JS8P295; JS16P295; 'EXIT'; 5; SET1; J16; 7; SHL-8; DUP; 8; ERASE; 9; JS6P295; J8; DUP; SET10; -; J10