Listing of file='WCPD520A' on disk='vmedia/701-2046C.wvd.zip'
# Sector 148, program filename = 'WCPD520A' 0010 REM . WCPD520A, 00-00 (6/28/75), 12002 0100 PRINT "COM CLEAR ............................"; : FOR I=1TO 26 : NEXT I : DIM A(2),B$(2),C(2,2),D$(2,2) : A=1 : B=2 : C=3 : DIM X(2),Y$3 : FOR I=1TO 2 : READ A(I),B$(I) : FOR J=1TO 2 : READ C(I,J),D$(I,J) : NEXT J : NEXT I : DATA 1,"A",2,"B",3,"C" 0250 DATA 4,"D",5,"E",6,"F" : X(1)=4 : X(2)=5 : Y$="123" : COM CLEAR Y$ : LOAD DC T#6,"WCPD530A" 0310 DEFFN'15 : COM CLEAR : LOAD DC T#6,"START"