image thumbnail

vision_based_barcode_reader

by

 

This program can read 3 barcode ean13,code 39,code 128c by stable image,and by camera,

result=code39(sokytu,p,k)
function result=code39(sokytu,p,k)
    m=[1:(sokytu)];
    for i=1:(sokytu)
                j=(10*i-10+k);
                if      (p(j)==1)&(p(j+1)~=1)&&(p(j+2)==1)&&(p(j+3)==1)&&(p(j+4)~=1)&&(p(j+5)==1)&&(p(j+6)~=1)&&(p(j+7)==1)&&(p(j+8)==1)
                    m(i)=42;%*
                elseif  (p(j)==1)&&(p(j+1)~=1)&&(p(j+2)==1)&&(p(j+3)==1)&&(p(j+4)==1)&&(p(j+5)==1)&&(p(j+6)~=1)&&(p(j+7)==1)&&(p(j+8)~=1)
                    m(i)=45;%-
                elseif  (p(j)==1)&&(p(j+1)~=1)&&(p(j+2)==1)&&(p(j+3)~=1)&&(p(j+4)==1)&&(p(j+5)~=1)&&(p(j+6)==1)&&(p(j+7)==1)&&(p(j+8)==1)
                    m(i)=36;%$
                elseif  (p(j)==1)&&(p(j+1)==1)&&(p(j+2)==1)&&(p(j+3)~=1)&&(p(j+4)==1)&&(p(j+5)~=1)&&(p(j+6)==1)&&(p(j+7)~=1)&&(p(j+8)==1)
                    m(i)=37;%%
                elseif  (p(j)==1)&&(p(j+1)~=1)&&(p(j+2)~=1)&&(p(j+3)==1)&&(p(j+4)==1)&&(p(j+5)==1)&&(p(j+6)~=1)&&(p(j+7)==1)&&(p(j+8)==1)
                    m(i)=32;%space
                elseif  (p(j)~=1)&&(p(j+1)~=1)&&(p(j+2)==1)&&(p(j+3)==1)&&(p(j+4)==1)&&(p(j+5)==1)&&(p(j+6)~=1)&&(p(j+7)==1)&&(p(j+8)==1)
                    m(i)=46;%.
                elseif  (p(j)==1)&&(p(j+1)~=1)&&(p(j+2)==1)&&(p(j+3)~=1)&&(p(j+4)==1)&&(p(j+5)==1)&&(p(j+6)==1)&&(p(j+7)~=1)&&(p(j+8)==1)
                    m(i)=47;%/
                elseif  (p(j)==1)&&(p(j+1)~=1)&&(p(j+2)==1)&&(p(j+3)==1)&&(p(j+4)==1)&&(p(j+5)~=1)&&(p(j+6)==1)&&(p(j+7)~=1)&&(p(j+8)==1)
                    m(i)=43;%+
                elseif  (p(j)==1)&&(p(j+1)==1)&&(p(j+2)==1)&&(p(j+3)~=1)&&(p(j+4)~=1)&&(p(j+5)==1)&&(p(j+6)~=1)&&(p(j+7)==1)&&(p(j+8)==1)
                    m(i)=48;%0
                elseif  (p(j)~=1)&&(p(j+1)==1)&&(p(j+2)==1)&&(p(j+3)~=1)&&(p(j+4)==1)&&(p(j+5)==1)&&(p(j+6)==1)&&(p(j+7)==1)&&(p(j+8)~=1)
                    m(i)=49;%1
                elseif  (p(j)==1)&&(p(j+1)==1)&&(p(j+2)~=1)&&(p(j+3)~=1)&&(p(j+4)==1)&&(p(j+5)==1)&&(p(j+6)==1)&&(p(j+7)==1)&&(p(j+8)~=1)
                    m(i)=50;%2
                elseif  (p(j)~=1)&&(p(j+1)==1)&&(p(j+2)~=1)&&(p(j+3)~=1)&&(p(j+4)==1)&&(p(j+5)==1)&&(p(j+6)==1)&&(p(j+7)==1)&&(p(j+8)==1)
                    m(i)=51;%3
                elseif  (p(j)==1)&&(p(j+1)==1)&&(p(j+2)==1)&&(p(j+3)~=1)&&(p(j+4)~=1)&&(p(j+5)==1)&&(p(j+6)==1)&&(p(j+7)==1)&&(p(j+8)~=1)
                    m(i)=52;%4
                elseif  (p(j)~=1)&&(p(j+1)==1)&&(p(j+2)==1)&&(p(j+3)~=1)&&(p(j+4)~=1)&&(p(j+5)==1)&&(p(j+6)==1)&&(p(j+7)==1)&&(p(j+8)==1)
                    m(i)=53;%5
                elseif  (p(j)==1)&&(p(j+1)==1)&&(p(j+2)~=1)&&(p(j+3)~=1)&&(p(j+4)~=1)&&(p(j+5)==1)&&(p(j+6)==1)&&(p(j+7)==1)&&(p(j+8)==1)
                    m(i)=54;%6
                elseif  (p(j)==1)&&(p(j+1)==1)&&(p(j+2)==1)&&(p(j+3)~=1)&&(p(j+4)==1)&&(p(j+5)==1)&&(p(j+6)~=1)&&(p(j+7)==1)&&(p(j+8)~=1)
                    m(i)=55;%7
                elseif  (p(j)~=1)&&(p(j+1)==1)&&(p(j+2)==1)&&(p(j+3)~=1)&&(p(j+4)==1)&&(p(j+5)==1)&&(p(j+6)~=1)&&(p(j+7)==1)&&(p(j+8)==1)
                    m(i)=56;%8
                elseif  (p(j)==1)&&(p(j+1)==1)&&(p(j+2)~=1)&&(p(j+3)~=1)&&(p(j+4)==1)&&(p(j+5)==1)&&(p(j+6)~=1)&&(p(j+7)==1)&&(p(j+8)==1)
                    m(i)=57;%9    
                elseif  (p(j)~=1)&&(p(j+1)==1)&&(p(j+2)==1)&&(p(j+3)==1)&&(p(j+4)==1)&&(p(j+5)~=1)&&(p(j+6)==1)&&(p(j+7)==1)&&(p(j+8)~=1)
                    m(i)=65;%A
                elseif (p(j)==1)&&(p(j+1)==1)&&(p(j+2)~=1)&&(p(j+3)==1)&&(p(j+4)==1)&&(p(j+5)~=1)&&(p(j+6)==1)&&(p(j+7)==1)&&(p(j+8)~=1)
                    m(i)=66;%B 
                elseif (p(j)~=1)&&(p(j+1)==1)&&(p(j+2)~=1)&&(p(j+3)==1)&&(p(j+4)==1)&&(p(j+5)~=1)&&(p(j+6)==1)&&(p(j+7)==1)&&(p(j+8)==1)
                    m(i)=67;%C  
                elseif (p(j)==1)&&(p(j+1)==1)&&(p(j+2)==1)&&(p(j+3)==1)&&(p(j+4)~=1)&&(p(j+5)~=1)&&(p(j+6)==1)&&(p(j+7)==1)&&(p(j+8)~=1)
                    m(i)=68;%D  
                elseif (p(j)~=1)&&(p(j+1)==1)&&(p(j+2)==1)&&(p(j+3)==1)&&(p(j+4)~=1)&&(p(j+5)~=1)&&(p(j+6)==1)&&(p(j+7)==1)&&(p(j+8)==1)
                    m(i)=69;%E  
                elseif (p(j)==1)&&(p(j+1)==1)&&(p(j+2)~=1)&&(p(j+3)==1)&&(p(j+4)~=1)&&(p(j+5)~=1)&&(p(j+6)==1)&&(p(j+7)==1)&&(p(j+8)==1)
                    m(i)=70;%F 
                elseif  (p(j)==1)&&(p(j+1)==1)&&(p(j+2)==1)&&(p(j+3)==1)&&(p(j+4)==1)&&(p(j+5)~=1)&&(p(j+6)~=1)&&(p(j+7)==1)&&(p(j+8)~=1)
                    m(i)=71;%G 
                elseif  (p(j)~=1)&&(p(j+1)==1)&&(p(j+2)==1)&&(p(j+3)==1)&&(p(j+4)==1)&&(p(j+5)~=1)&&(p(j+6)~=1)&&(p(j+7)==1)&&(p(j+8)==1)
                    m(i)=72;%H
                elseif  (p(j)==1)&&(p(j+1)==1)&&(p(j+2)~=1)&&(p(j+3)==1)&&(p(j+4)==1)&&(p(j+5)~=1)&&(p(j+6)~=1)&&(p(j+7)==1)&&(p(j+8)==1)
                    m(i)=73;%I 
                elseif  (p(j)==1)&&(p(j+1)==1)&&(p(j+2)==1)&&(p(j+3)==1)&&(p(j+4)~=1)&&(p(j+5)~=1)&&(p(j+6)~=1)&&(p(j+7)==1)&&(p(j+8)==1)
                    m(i)=74;%J 
                elseif  (p(j)~=1)&&(p(j+1)==1)&&(p(j+2)==1)&&(p(j+3)==1)&&(p(j+4)==1)&&(p(j+5)==1)&&(p(j+6)==1)&&(p(j+7)~=1)&&(p(j+8)~=1)
                    m(i)=75;%K 
                elseif  (p(j)==1)&&(p(j+1)==1)&&(p(j+2)~=1)&&(p(j+3)==1)&&(p(j+4)==1)&&(p(j+5)==1)&&(p(j+6)==1)&&(p(j+7)~=1)&&(p(j+8)~=1)
                    m(i)=76;%L 
                elseif  (p(j)~=1)&&(p(j+1)==1)&&(p(j+2)~=1)&&(p(j+3)==1)&&(p(j+4)==1)&&(p(j+5)==1)&&(p(j+6)==1)&&(p(j+7)~=1)&&(p(j+8)==1)
                    m(i)=77;%M 
                elseif  (p(j)==1)&&(p(j+1)==1)&&(p(j+2)==1)&&(p(j+3)==1)&&(p(j+4)~=1)&&(p(j+5)==1)&&(p(j+6)==1)&&(p(j+7)~=1)&&(p(j+8)~=1)
                    m(i)=78;%N 
                elseif  (p(j)~=1)&&(p(j+1)==1)&&(p(j+2)==1)&&(p(j+3)==1)&&(p(j+4)~=1)&&(p(j+5)==1)&&(p(j+6)==1)&&(p(j+7)~=1)&&(p(j+8)==1)
                    m(i)=79;%O
                elseif  (p(j)==1)&&(p(j+1)==1)&&(p(j+2)~=1)&&(p(j+3)==1)&&(p(j+4)~=1)&&(p(j+5)==1)&&(p(j+6)==1)&&(p(j+7)~=1)&&(p(j+8)==1)
                    m(i)=80;%P 
                elseif  (p(j)==1)&&(p(j+1)==1)&&(p(j+2)==1)&&(p(j+3)==1)&&(p(j+4)==1)&&(p(j+5)==1)&&(p(j+6)~=1)&&(p(j+7)~=1)&&(p(j+8)~=1)
                    m(i)=81;%Q 
                elseif  (p(j)~=1)&&(p(j+1)==1)&&(p(j+2)==1)&&(p(j+3)==1)&&(p(j+4)==1)&&(p(j+5)==1)&&(p(j+6)~=1)&&(p(j+7)~=1)&&(p(j+8)==1)
                    m(i)=82;%R 
                elseif  (p(j)==1)&&(p(j+1)==1)&&(p(j+2)~=1)&&(p(j+3)==1)&&(p(j+4)==1)&&(p(j+5)==1)&&(p(j+6)~=1)&&(p(j+7)~=1)&&(p(j+8)==1)
                    m(i)=83;%S 
                elseif  (p(j)==1)&&(p(j+1)==1)&&(p(j+2)==1)&&(p(j+3)==1)&&(p(j+4)~=1)&&(p(j+5)==1)&&(p(j+6)~=1)&&(p(j+7)~=1)&&(p(j+8)==1)
                    m(i)=84;%T 
                elseif  (p(j)~=1)&&(p(j+1)~=1)&&(p(j+2)==1)&&(p(j+3)==1)&&(p(j+4)==1)&&(p(j+5)==1)&&(p(j+6)==1)&&(p(j+7)==1)&&(p(j+8)~=1)
                    m(i)=85;%U 
                elseif  (p(j)==1)&&(p(j+1)~=1)&&(p(j+2)~=1)&&(p(j+3)==1)&&(p(j+4)==1)&&(p(j+5)==1)&&(p(j+6)==1)&&(p(j+7)==1)&&(p(j+8)~=1)
                    m(i)=86;%V 
                elseif  (p(j)~=1)&&(p(j+1)~=1)&&(p(j+2)~=1)&&(p(j+3)==1)&&(p(j+4)==1)&&(p(j+5)==1)&&(p(j+6)==1)&&(p(j+7)==1)&&(p(j+8)==1)
                    m(i)=87;%W 
                elseif  (p(j)==1)&&(p(j+1)~=1)&&(p(j+2)==1)&&(p(j+3)==1)&&(p(j+4)~=1)&&(p(j+5)==1)&&(p(j+6)==1)&&(p(j+7)==1)&&(p(j+8)~=1)
                    m(i)=88;%X 
                elseif  (p(j)~=1)&&(p(j+1)~=1)&&(p(j+2)==1)&&(p(j+3)==1)&&(p(j+4)~=1)&&(p(j+5)==1)&&(p(j+6)==1)&&(p(j+7)==1)&&(p(j+8)==1)
                    m(i)=89;%Y
                elseif  (p(j)==1)&&(p(j+1)~=1)&&(p(j+2)~=1)&&(p(j+3)==1)&&(p(j+4)~=1)&&(p(j+5)==1)&&(p(j+6)==1)&&(p(j+7)==1)&&(p(j+8)==1)
                    m(i)=90;%Z
                end
        
    end
    result=char(m);

Contact us