clc;
clear;
close?all;
%初始字典
dic?=?cell（1256）;
for?i?=?1:256
????dic{1i}?=?char（i）;
end
fid=fopen（‘lzwcode.txt‘‘wt‘）;??????%新建一個txt文件??
phns?=?[‘miao.txt‘];?????????????????%要讀取的文檔所在的路徑??
fpn?=?fopen?（phns?‘rt‘）;???????????%打開文檔??
file?=?fread（fpn‘*char‘）;???????????????????????????
s=length（file）;
star=1;
index=257;
P=file（1）;
output=zeros;
???for?j?=?2:s;
???C=file（j）;???
???len=length（dic）;
???????????for