青年大學(xué)習(xí)簡易打包小程序

• • 收取截屏圖片的難受
  • 士可忍，我不能忍
  • Matlab 一鍵分類青年大學(xué)習(xí)截屏

收取截屏圖片的難受

不當(dāng)組織委員不知道，收集每個人的青年大學(xué)習(xí)的截屏，并存入每個人的文件夾是多么浪費時間的事。那話說收青大截屏分幾個步驟:

1. 同學(xué)發(fā)給你
2. 你打開QQ存入手機并上傳電腦
3. 打開電腦
4. 將圖片拖入名字對應(yīng)的文件夾
5. 打包發(fā)送

看似簡單，困難在于班級同學(xué)不會同時發(fā)給你，所以這個收集圖片的戰(zhàn)線估計要持續(xù)一周，最終會在截至的最后一天迎來高峰。

這人時間一長，記性就不好，趕上忙了忘記存圖片還要挨個的找聊天記錄

士可忍，我不能忍

簡單方便的開發(fā)一個小程序，而且符合勞苦大眾的大學(xué)生，matlab是首選工具。本來想搞個微信小程序，奈何我不會后端，沒必要為了個截屏難為自己。大佬有興趣的可以開發(fā)的小程序造福一下班級干部。哈哈哈

話不多說上程序！！！！！！！！！！！！！！

Matlab 一鍵分類青年大學(xué)習(xí)截屏

1. 首先，需要發(fā)布一個問卷星。還好問卷星可以上傳圖片，并將文本部分命名為圖片的名字，這樣就相當(dāng)于給每個人的圖片做了一個獨有的索引標(biāo)志。
   

2.問卷星導(dǎo)出的圖片會自帶姓名 （下圖打碼）

3. 需要自己創(chuàng)建一個班級信息表 txt 格式 （這里就不展示了，一般姓名和學(xué)號各一行就可以了。）

4. 

5. 打開matlab 導(dǎo)入這個程序，設(shè)置好圖片讀入路徑和存入路徑。就可以輕松搞定了

clc
clear
%% 讀取人員信息
feature('DefaultCharacterSet', 'UTF8'); 
data = importdata('data.txt');
name_num = length(data.textdata);
%%
cha = 'test\';  %這個cha 可以和t_path 合并，無所謂啦，最后都合并在一起，懶得改
t_path = 'C:\Users\baoye\Desktop\daxuexi\';  %隨便路徑，最后存照片的
file_path =  'C:\Users\baoye\Desktop\daxuexi\91723930\';% 圖像文件夾路徑  
img_path_listjpg = dir(strcat(file_path,'*.jpg'));%獲取該文件夾中所有jpg格式的圖像
img_path_listpng = dir(strcat(file_path,'*.png'));%獲取該文件夾中所有png格式的圖像
img_path_list = [img_path_listjpg;img_path_listpng]; 
img_num = length(img_path_list);%獲取圖像總數(shù)量 
I=cell(1,img_num); 
if img_num > 0 %有滿足條件的圖像   
       for j = 1:img_num %逐一讀取圖像  
           image_name = img_path_list(j).name;% 圖像名  
           image =  imread(strcat(file_path,image_name));  
           I{j}=image;
          fprintf('%d %d %s\n',i,j,strcat(file_path,image_name));% 顯示正在處理的圖像名  
           %圖像處理過程 省略  

           %這里直接可以訪問細(xì)胞元數(shù)據(jù)的方式訪問數(shù)據(jù)

       end  
end

%% 清空舊文件夾
for i = 1:name_num
   t_path = [t_path,cha,'0',num2str(data.data(i)),' ',cell2mat(data.textdata(i))];
   if exist(t_path)~=0   %判斷就文件夾是否存在
       rmdir(t_path, 's')  %存在，刪除舊文件 
       mkdir(t_path) 
   else
       mkdir(t_path) 
   end
   t_path = 'C:\Users\baoye\Desktop\daxuexi\';
end

%% 圖像與人員信息的匹配（這里使用名字，也可以自己選擇改成學(xué)號）

for i = 1:name_num
   for j = 1:img_num
      k = isempty(strfind(img_path_list(j).name,data.textdata(i))); 
      if k == 0 
        t_path = [t_path,cha,'0',num2str(data.data(i)),' ',cell2mat(data.textdata(i))];
%          mkdir(t_path)  


        %設(shè)置圖片路徑并寫入
       
        t_path = fullfile(t_path,img_path_list(j).name);
        imwrite(cell2mat( I(j)),t_path)

      end
      %路徑恢復(fù)
      t_path = 'C:\Users\baoye\Desktop\daxuexi\';
   end
   
end

5. 示例：
   test文件夾里面是空的
   程序運行之后會在test中創(chuàng)建文件夾，并圖片和文件夾對號入座！!

這個程序的缺點是沒有設(shè)置matlab 對于中文的識別，所以如果你的文件夾名字有中文，可以設(shè)置一下matlab對于中文的設(shè)置，這里沒有設(shè)置，所以路徑都是字母或數(shù)字組成
小小的人性化的地方是可以自動刪除舊文件夾，創(chuàng)建新的

如果有大佬想完善隨時可以完善！！！這個程序純屬因為本人懶的分配圖片
有BUG盡量自己解決哈哈哈，因為代碼實在簡單（開個玩笑）。有更簡單的代碼可以交流