A:linecode/basK AZS WwPU$():MC$"":PL$"":MAX (SVC,2 px "ENTER LINE CODE";F$: : MC @(,),"Invalid MFG Code";();: xz F$;" IS LINE #";MC{|p"R",,"CONFIG/DAT"0z ,  AS YY$T I : ,I=:MF$(I)YY$:bA$()vF%: SVC(F%)F% I :(A$,,)MF$(I): SVC(F%,A$):⅐F:X$" "F$:Z: SVC(F,X$,Z):MCZ: