开通博客赚积分
发布资源赚积分
分类

源码开发语言/平台
当前位置：首页 > 源码/资料 > 数值算法/人工智能 > matlab例程 > 查看源码
GOP.m
资源名称：MPEG-2(MATLAB).rar　[点击查看]
上传用户：cxsjwj
上传日期：2022-08-09
资源大小：34k
文件大小：2k
源码类别：

matlab例程

开发平台：

Matlab

GOP.m：源码内容
  1.  function [B2,B3,P4,B5,B6,P7,B8,B9,I10]=GOP(i,resize,long,wide)
  2.         %reading P4 frame
  3.         framedata=aviread('news.avi',i+3);
  4.         P4=frame2im(framedata);
  5.         if resize==1
  6.            P4=imresize(P4,[long,wide]);
  7.         end
  8.         P4=rgb2gray(P4);
  9.          P4=double(P4);
  11.    
  12.         
  13.         %reading B2 frame
  14.         framedata=aviread('news.avi',i+1);
  15.         B2=frame2im(framedata);
  16.         if resize==1
  17.         B2=imresize(B2,[long,wide]);
  18.         end
  19.         B2=rgb2gray(B2);
  20.         B2=double(B2);
  21.         %reading B3 frame
  22.         framedata=aviread('news.avi',i+2);
  23.         B3=frame2im(framedata);
  24.        if resize==1
  25.    B3=imresize(B3,[long,wide]);
  26.     end
  27.         B3=rgb2gray(B3);      
  28.         B3=double(B3);
  29.         %reading B5 frame
  30.         framedata=aviread('news.avi',i+4);
  31.         B5=frame2im(framedata);
  32.         if resize==1
  33.    B5=imresize(B5,[long,wide]);
  34.     end
  35.         B5=rgb2gray(B5); 
  36.         B5=double(B5);
  37.         %reading B6 frame
  38.         framedata=aviread('news.avi',i+5);
  39.         B6=frame2im(framedata);
  40.          if resize==1
  41.    B6=imresize(B6,[long,wide]);
  42.     end
  43.         B6=rgb2gray(B6);        
  44.         B6=double(B6);
  45.         %reading B8 frame
  46.         framedata=aviread('news.avi',i+7);
  47.         B8=frame2im(framedata);
  48.         if resize==1
  49.    B8=imresize(B8,[long,wide]);
  50.     end
  51.         B8=rgb2gray(B8);     
  52.         B8=double(B8);
  53.         %reading B9 frame
  54.         framedata=aviread('news.avi',i+8);
  55.         B9=frame2im(framedata);
  56.         if resize==1
  57.    B9=imresize(B9,[long,wide]);
  58.     end
  59.         B9=rgb2gray(B9); 
  60.         B9=double(B9);
  61.         %reading I10 frame
  62.         framedata=aviread('news.avi',i+9);
  63.         I10=frame2im(framedata);
  64.          if resize==1
  65.   I10=imresize(I10,[long,wide]);
  66.     end
  67.         I10=rgb2gray(I10); 
  68.         I10=double(I10);
  70.         %reading P7 frame
  71.         framedata=aviread('news.avi',i+6);
  72.         P7=frame2im(framedata);
  73.         if resize==1
  74.    P7=imresize(P7,[long,wide]);
  75.     end
  76.         P7=rgb2gray(P7);       
  77.         P7=double(P7);