Facebook
From Beige Dormouse, 4 Years ago, written in Plain Text.
Embed
Download Paste or View Raw
Hits: 211
  1. kamera_start
  2. flushdata(vid);
  3. klaw = PrzygotujKlawiature();
  4. skala = WyliczSkale(vid, klaw);
  5. tlo = PobierzTlo(vid, skala);
  6.  
  7.  
  8. obraz = PobierzBiezacyObraz(vid);
  9.    obraz = imresize(obraz, skala);
  10.    xx= imshow(obraz);
  11.  
  12. %probka_koloru = PobierzObrazModeluKoloru(vid);
  13. %wzorzec_koloru = GenerujModel(probka_koloru);
  14.  
  15.  
  16. for i=1:2000
  17.    obraz = PobierzBiezacyObraz(vid);
  18.    obraz = imresize(obraz, skala);
  19.    obraz_klaw = NalozKlawiature(obraz, klaw, 1);
  20.    set(xx, 'CData', obraz_klaw);
  21.    klawisz = ZnajdzKlawisz13tlo(obraz, tlo, -1)
  22.    
  23.    %klawisz = ZnajdzsKlawisz13model(obraz, wzorzec_koloru, -1);
  24.    Graj(klawisz, 0.2);
  25.    %pause(0.05);
  26. end
  27.  
  28. kamera_stop
  29.