Listing of file='WCPD560A' on disk='vmedia/wcs_diags.wvd.zip'
# Sector 663, program filename = 'WCPD560A' 0010 REM . WCPD560A, 00-00 (06/28/75), 12002 : IF I<>2THEN 160 : INIT(FF)E$,L0$ : IF E$<>HEX(FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF)THEN 160 0140 IF L0$<>HEX(FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF)THEN 160 : COM CLEAR E$ : LOAD DC T"WCPD570A" 0160 E(1)=E(1)+1 : LOAD DC T"WCPD570A" 0190 LOAD DC T"WCPD570A" 0210 DEFFN'15 : LOAD DC T"START"50