Listing of file='DEPROTEC' on disk='vmedia/best_of_BD_fules.wvd.zip'
# Sector 525, program filename = 'DEPROTEC' 0010 DIM A$(16) 0020 LIST DC F 0030 INPUT "WHAT PROGRAM",A1$ : LIMITS FA1$,A,B,D 0040 C=A 0050 DATA LOAD BA F(A,L)A$() 0060 STR(A$(1),1,1)=HEX(40) 0070 DATA SAVE BA F(A,L)A$() 0080 A=A+1 : IF A=BTHEN 130 0090 DATA LOAD BA F(A,L)A$() 0100 STR(A$(1),1,1)=HEX(00) 0110 DATA SAVE BA F(A,L)A$() 0120 GOTO 80 0130 LOAD DC FA1$