... 1 ) IN cBuffer exit case "D" if "E" IN ::cPicFunc //cBuffer := SubStr( cBuffer, 4, 3 ) + SubStr( cBuffer, 1, 3 ) + SubStr( cBuffer, 7 ) cBuffer := InvertDwM( cBuffer ) endif xValue := CToD( cBuffer ) exit end return xValue //---------------------------------------------------------------------------// ...