How to read image character with OCR?

3 Ansichten (letzte 30 Tage)
bee lebah
bee lebah am 21 Jun. 2022
Beantwortet: bee lebah am 25 Jun. 2022
Hi can you help me please.
I have a problem with my program, my ocr program doesn't read letters, it reads only the number '1' which I think is coming from 'else' in file read.m.
And why does this one have a double result?
read.m
function letter=read(imagn,num_letras)
global templates
comp=[ ];
for n=1:num_letras
sem=corr2(templates{1,n},imagn);
comp=[comp sem];
end
vd=find(comp==max(comp));
%*-*-*-*-*-*-*-*-*-*-*-*-*-
if vd==1
letter='ha';
elseif vd==2
letter='na';
elseif vd==3
letter='ca';
elseif vd==4
letter='ra';
elseif vd==5
letter='ka';
elseif vd==6
letter='da';
elseif vd==7
letter='ta';
elseif vd==8
letter='sa';
elseif vd==9
letter='wa';
elseif vd==10
letter='la';
elseif vd==11
letter='pa';
elseif vd==12
letter='dha';
elseif vd==13
letter='ja';
elseif vd==14
letter='ya';
elseif vd==15
letter='nya';
elseif vd==16
letter='ma';
elseif vd==17
letter='ga';
elseif vd==18
letter='ba';
elseif vd==19
letter='tha';
elseif vd==20
letter='nga';
elseif vd==21
letter='hi';
elseif vd==22
letter='ni';
elseif vd==23
letter='ci';
elseif vd==24
letter='ri';
elseif vd==25
letter='ki';
elseif vd==26
letter='di';
elseif vd==27
letter='ti';
elseif vd==28
letter='si';
elseif vd==29
letter='wi';
elseif vd==30
letter='li';
elseif vd==31
letter='pi';
elseif vd==32
letter='dhi';
elseif vd==33
letter='ji';
elseif vd==34
letter='yi';
elseif vd==35
letter='nyi';
elseif vd==36
letter='mi';
elseif vd==37
letter='gi';
elseif vd==38
letter='bi';
elseif vd==39
letter='thi';
elseif vd==40
letter='ngi';
elseif vd==41
letter='hu';
elseif vd==42
letter='nu';
elseif vd==43
letter='cu';
elseif vd==44
letter='ru';
elseif vd==45
letter='ku';
elseif vd==46
letter='du';
elseif vd==47
letter='tu';
elseif vd==48
letter='su';
elseif vd==49
letter='wu';
elseif vd==50
letter='lu';
elseif vd==51
letter='pu';
elseif vd==52
letter='dhu';
elseif vd==53
letter='ju';
elseif vd==54
letter='yu';
elseif vd==55
letter='nyu';
elseif vd==56
letter='mu';
elseif vd==57
letter='gu';
elseif vd==58
letter='bu';
elseif vd==59
letter='thu';
elseif vd==60
letter='ngu';
elseif vd==61
letter='he';
elseif vd==62
letter='ne';
elseif vd==63
letter='ce';
elseif vd==64
letter='re';
elseif vd==65
letter='ke';
elseif vd==66
letter='de';
elseif vd==67
letter='te';
elseif vd==68
letter='se';
elseif vd==69
letter='we';
elseif vd==70
letter='le';
elseif vd==71
letter='pe';
elseif vd==72
letter='dhe';
elseif vd==73
letter='je';
elseif vd==74
letter='ye';
elseif vd==75
letter='nye';
elseif vd==76
letter='me';
elseif vd==77
letter='ge';
elseif vd==78
letter='be';
elseif vd==79
letter='the';
elseif vd==80
letter='nge';
elseif vd==81
letter='ho';
elseif vd==82
letter='no';
elseif vd==83
letter='co';
elseif vd==84
letter='ro';
elseif vd==85
letter='ko';
elseif vd==86
letter='do';
elseif vd==87
letter='to';
elseif vd==88
letter='so';
elseif vd==89
letter='wo';
elseif vd==90
letter='lo';
elseif vd==91
letter='po';
elseif vd==92
letter='dho';
elseif vd==93
letter='jo';
elseif vd==94
letter='yo';
elseif vd==95
letter='nyo';
elseif vd==96
letter='mo';
elseif vd==97
letter='go';
elseif vd==98
letter='bo';
elseif vd==99
letter='tho';
elseif vd==100
letter='ngo';
else
letter='1';
end
gui
% --- Executes on button press in buttonpilgam.
function buttonpilgam_Callback(hObject, eventdata, handles)
open=guidata(gcbo);
[filename, formatfile] = uigetfile ('*','BukaGambar');
im=imread(fullfile(formatfile, filename));
set(open.figure1,'CurrentAxes',open.axes1);
set(imagesc(im));
set(open.axes1,'Userdata',im);
%handles.im = im;
%guidata(hObject,handles);
%axes(handles.axes1);
%imshow(handles.im);
% hObject handle to buttonpilgam (see GCBO)
% eventdata reserved - to be defined in a future version of MATLAB
% handles structure with handles and user data (see GUIDATA)
% --- Executes on button press in button3proses.
function button3proses_Callback(hObject, eventdata, handles)
%Proses Grayscale
open=guidata(gcbo);
g=get(open.axes1,'Userdata');
if size(g,3)==3
g=rgb2gray(g);
end
set(open.figure1,'CurrentAxes',open.axes2);
set(imshow(g));
set(open.figure1,'Userdata',g);
set(open.axes2,'Userdata',g);
%Proses Grayscale to Threeshold
%open=guidata(gcbo);
%g=get(open.axes2,'Userdata');
%if size(g,3)==3
% g=im2bw(g);
%end
%set(open.figure1,'CurrentAxes',open.axes3);
%set(imshow(g));
%set(open.figure1,'Userdata',g);
%set(open.axes3,'Userdata',g);
%Proses Threshold to Biner
open=guidata(gcbo);
g=get(open.axes2,'Userdata');
threshold = graythresh(g);
g=~im2bw(g,threshold);
g2=g;
set(open.figure1,'CurrentAxes',open.axes4);
set(imshow(g2));
g=bwareaopen(g,50);
set(open.figure1,'Userdata',g);
set(open.axes4,'Userdata',g);
%Proses OCR
word=[ ];
text=[ ];
re=g;
load templates
global templates
num_letras=size(templates,2);
while 1
[fl re]=lines(re);
imgn=fl;
n=0;
spacevector = [];
rc = fl;
while 1
%[fc rc space]=letter_crop(rc);
%while 1
%Fcn 'letter_crop' separate letters in a line
[fc rc space]=letter_crop(rc); %fc = first letter in the line
%rc = remaining cropped line
%space = space between the letter
% cropped and the next letter
%uncomment below line to see letters one by one
%figure,imshow(fc);pause(0.5)
img_r = imresize(fc,[42 24]); %resize letter so that correlation
%can be performed
n = n + 1;
spacevector(n)=space;
%Fcn 'read_letter' correlates the cropped letter with the images
%given in the folder 'letters_numbers'
letter = read(img_r,num_letras);
%letter concatenation
word = [word letter];
if isempty(rc) %breaks loop when there are no more characters
break;
end
end
max_space = max(spacevector);
no_spaces = 0;
for x= 1:n %loop to introduce space at requisite locations
if spacevector(x+no_spaces)> (0.75 * max_space)
no_spaces = no_spaces + 1;
for m = x:n
word(n+x-m+no_spaces)=word(n+x-m+no_spaces-1);
end
word(x+no_spaces) = ' ';
spacevector = [0 spacevector];
end
end
%-----------------------------------------------------------------
% Label and count connected components
%[L Ne] = bwlabel(imgn);
%for n=1:Ne
% [r,c] = find(L==n);
% Extract letter
% n1=imgn(min(r):max(r),min(c):max(c));
% Resize letter (same size of template)
% img_r=imresize(n1,[90 90]);
%-------------------------------------------------------------------
% Call fcn to convert image to text
% letter=read(img_r,num_letras);
% Letter concatenation
% max_space = max(spacevector);
% no_spaces = 0;
% for x= 1:n %loop to introduce space at requisite locations
% if spacevector(x+no_spaces)> (1 * max_space)
% no_spaces = no_spaces + 1;
% for m = x:n
% word(n+x-m+no_spaces)=word(n+x-m+no_spaces-1);
% end
% word(x+no_spaces) = ' ';
% spacevector = [0 spacevector];
% end
% end
% word=[word letter];
%end
text = char(text, word);
% Clear 'word' variable
%fprintf(text,'%s\n',word);
word=[ ];
%*When the sentences finish, breaks the loop
if isempty(re) %See variable 're' in Fcn 'lines'
break
end
end
set(handles.figure1,'Visible','on');
set(handles.text8hslteks,'String',[text]);
set(handles.text8hslteks,'FontSize',10);
guidata(hObject, handles);
%cropping
% hObject handle to button3proses (see GCBO)
% eventdata reserved - to be defined in a future version of MATLAB
% handles structure with handles and user data (see GUIDATA)
What's wrong with my code? Thank you for your attention.

Akzeptierte Antwort

bee lebah
bee lebah am 25 Jun. 2022
So guys, finally it worked

Weitere Antworten (1)

yanqi liu
yanqi liu am 22 Jun. 2022
yes,sir,may be
vd=find(comp==max(comp))
to find what vd is?
is the vd in range
  1 Kommentar
bee lebah
bee lebah am 22 Jun. 2022
yes it is, but i don't know how to fix it. Can you help me?

Melden Sie sich an, um zu kommentieren.

Kategorien

Mehr zu Large Files and Big Data finden Sie in Help Center und File Exchange

Community Treasure Hunt

Find the treasures in MATLAB Central and discover how the community can help you!

Start Hunting!

Translated by