?? sctrx.m
字號:
function eks = sctr(kk)
k=[];
temp=[];
post=[];
k = kk;
l=size(kk);%mencari ukuran kata kunci
%melakukan ekstrak huruf yang sama
for i=1:l(1,2)-1
if double(k(i))~=32
for j=i+1 : l(1,2)
if k(i) == k(j)
k(j)='@';
end
end
else
k(i) = '@';
end
end
%menampilkan hasil ekstrak
j=1;
for i =1 : l(1,2)
if k(i)~='@'
temp(j) = k(i);
j = j+1;
end
l = size(k);
end
%fprintf('%s\n',eks);
%buat pemetaan kunci
for i = 1 : 26
map(1,i) = char(96+i);
end
l = size(temp);
%fprintf('%d\n',l);
mapsem = map(1,:);
x=0;
for i = 1 : 26
for j = 1 : l(1,2)
if mapsem(i) == temp(j)
mapsem(i)='@';
x= x+1;
end
end
end
%fprintf('%s\n',mapsem);
for i = 1 : 26
if mapsem(i) ~= '@'
temp(x+1) = mapsem(i);
x = x+1;
end
end
p = 1;
for i = 1:l(1,2)
eks(p) = char(temp(i));
m =i;
p = p+1;
while m < 26
m = m + l(1,2);
if m > 26
break;
end
eks(p) = char(temp(m));
p = p+1;
end
end
%l = size(eks);
%eks = grup(eks,l);
return
?? 快捷鍵說明
復制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號
Ctrl + =
減小字號
Ctrl + -