Cyber Code

simple facedetection open cv visual studio

#include "stdafx.h"<br />
#include "cv.h"<br />
#include "highgui.h"<br />
<br />
//fungsi deteksi wajah<br />
void detect_and_draw(IplImage* img){<br />
 //inisialisasi<br />
 CvHaarClassifierCascade *cascade=0;<br />
 CvMemStorage *storage=0;<br />
<br />
 IplImage* gray=img;<br />
<br />
 //baca file xml u/ image detection<br />
 if(!cascade){<br />
  char * file="C:/OpenCV2.1/data/haarcascades/haarcascade_frontalface_alt.xml";<br />
  cascade=(CvHaarClassifierCascade*) cvLoad(file, 0, 0, 0);<br />
  storage=cvCreateMemStorage(0);<br />
 }<br />
<br />
 //deteksi wajah<br />
 CvSeq* faces=cvHaarDetectObjects(<br />
  gray,<br />
  cascade,<br />
  storage,<br />
  1.1,<br />
  3,<br />
  CV_HAAR_DO_CANNY_PRUNING,<br />
  cvSize(10, 10));<br />
<br />
 int i;<br />
<br />
 //menggambar kotak merah pd bagian wajah yg ditemukan<br />
 for(i=0; i<(faces ? faces->total : 0) ; i++){<br />
  CvRect* r=(CvRect*) cvGetSeqElem(faces, i);<br />
  cvRectangle(img,<br />
   cvPoint(r->x, r->y),<br />
   cvPoint(r->x + r->width, r->y + r->height),<br />
   CV_RGB(255, 0, 0),<br />
   1, 8, 0<br />
   );<br />
 }<br />
<br />
 //menampilkan gambar hasil deteksi<br />
 cvNamedWindow("hasil");<br />
 cvShowImage("hasil", img);<br />
<br />
 cvWaitKey(0);<br />
}<br />
<br />
int main(array<System::String ^> ^args){<br />
 //load image asli<br />
 const char* filename="dank.jpg";<br />
 IplImage* img=cvLoadImage(filename);<br />
<br />
 //panggil fungsi<br />
 detect_and_draw(img);<br />
}<br />
<div>
<br /></div>

simple facedetection open cv visual studio

#include "stdafx.h" #include "cv.h" #include "highgui.h" //fungsi deteksi wajah void detect_and_draw(IplI...

11:42 AM

Red tracking color MATLAB

<div class="separator" style="clear: both; text-align: center;">
<a href="https://blogger.googleusercontent.com/img/b/R29vZ2xl/AVvXsEgJH6BtgneLdfv31M-pd7BSgqqtVnd2I8z7xIx3FOaZU7BGfwtcfq-JdZoH6LXcxd5IbI6jpOLaCSAYxj8bFGint-ibdd4oXlOROkZ_5raDCcmOem3hjif6gOS9Jmii5VC6qbXYq173SaY/s1600/red+tracking+color.png" imageanchor="1" style="margin-left: 1em; margin-right: 1em;"><img border="0" height="266" src="https://blogger.googleusercontent.com/img/b/R29vZ2xl/AVvXsEgJH6BtgneLdfv31M-pd7BSgqqtVnd2I8z7xIx3FOaZU7BGfwtcfq-JdZoH6LXcxd5IbI6jpOLaCSAYxj8bFGint-ibdd4oXlOROkZ_5raDCcmOem3hjif6gOS9Jmii5VC6qbXYq173SaY/s320/red+tracking+color.png" width="320" /></a></div>
<div class="separator" style="clear: both; text-align: left;">
<br /></div>
<div class="separator" style="clear: both; text-align: left;">
programnya.....</div>
<div class="separator" style="clear: both; text-align: left;">
<br /></div>
<div class="separator" style="clear: both; text-align: left;">
<br /></div>
<div class="separator" style="clear: both;">
close all;</div>
<div class="separator" style="clear: both;">
clear all;</div>
<div class="separator" style="clear: both;">
clc;</div>
<div class="separator" style="clear: both;">
<br /></div>
<div class="separator" style="clear: both;">
% spesifikasi format webcam yang digunakan</div>
<div class="separator" style="clear: both;">
vid=videoinput('winvideo',1,'YUY2_320x240');</div>
<div class="separator" style="clear: both;">
set(vid,'TriggerRepeat',Inf);</div>
<div class="separator" style="clear: both;">
vid.returnedcolorspace='rgb';</div>
<div class="separator" style="clear: both;">
vid.FrameGrabInterval=2;</div>
<div class="separator" style="clear: both;">
<br /></div>
<div class="separator" style="clear: both;">
start(vid)</div>
<div class="separator" style="clear: both;">
<br /></div>
<div class="separator" style="clear: both;">
while(vid.FramesAcquired<=200)</div>
<div class="separator" style="clear: both;">
    </div>
<div class="separator" style="clear: both;">
    % mengambil citra dari video</div>
<div class="separator" style="clear: both;">
    data = getsnapshot(vid);</div>
<div class="separator" style="clear: both;">
    % Untuk mendeteksi objek berwarna merah yang bergerak</div>
<div class="separator" style="clear: both;">
    % Diperlukan pengurangan komponen warna merah </div>
<div class="separator" style="clear: both;">
    % Mengekstrak komponen warna merah dari citra grayscale </div>
<div class="separator" style="clear: both;">
    diff_im = imsubtract(data(:,:,1), rgb2gray(data));</div>
<div class="separator" style="clear: both;">
    % Filterisasi menggunakan filter median untuk menghilangkan noise</div>
<div class="separator" style="clear: both;">
    diff_im = medfilt2(diff_im, [3 3]);</div>
<div class="separator" style="clear: both;">
    % Konversi grayscale ke biner</div>
<div class="separator" style="clear: both;">
    diff_im = im2bw(diff_im,0.18);</div>
<div class="separator" style="clear: both;">
    % Menghilangkan semua pixel kurang dari 300 px</div>
<div class="separator" style="clear: both;">
    diff_im = bwareaopen(diff_im,300);</div>
<div class="separator" style="clear: both;">
    % Memberi label semua komponen yang terkoneksi pada citra</div>
<div class="separator" style="clear: both;">
    bw = bwlabel(diff_im, 8);</div>
<div class="separator" style="clear: both;">
<br /></div>
<div class="separator" style="clear: both;">
    % Berikut ini adalah sintak untuk mengkarakterisasi tiap bagian label.</div>
<div class="separator" style="clear: both;">
    stats = regionprops(bw, 'BoundingBox', 'Centroid');</div>
<div class="separator" style="clear: both;">
    </div>
<div class="separator" style="clear: both;">
    % Menampilkan citra hasil snapshot</div>
<div class="separator" style="clear: both;">
    imshow(data)</div>
<div class="separator" style="clear: both;">
    </div>
<div class="separator" style="clear: both;">
    hold on</div>
<div class="separator" style="clear: both;">
    </div>
<div class="separator" style="clear: both;">
    % Berikut adalah logika loop untuk membuat box kotak yang mengitari objek warna merah.</div>
<div class="separator" style="clear: both;">
    for object = 1:length(stats)</div>
<div class="separator" style="clear: both;">
        bb = stats(object).BoundingBox;</div>
<div class="separator" style="clear: both;">
        bc = stats(object).Centroid;</div>
<div class="separator" style="clear: both;">
        rectangle('Position',bb,'EdgeColor','r','LineWidth',2)</div>
<div class="separator" style="clear: both;">
        plot(bc(1),bc(2), '-m+')</div>
<div class="separator" style="clear: both;">
        bc(2)</div>
<div class="separator" style="clear: both;">
        a=text(bc(1)+15,bc(2),strcat('X:',num2str(round(bc(1))),'Y:',num2str(round(bc(2)))));</div>
<div class="separator" style="clear: both;">
        set(a,'FontName','Arial','FontWeight','bold','FontSize',12,'Color','red');</div>
<div class="separator" style="clear: both;">
    end</div>
<div class="separator" style="clear: both;">
    </div>
<div class="separator" style="clear: both;">
    hold off</div>
<div class="separator" style="clear: both;">
end</div>
<div class="separator" style="clear: both;">
stop(vid)</div>
<div class="separator" style="clear: both; text-align: left;">
<br /></div>
<div class="separator" style="clear: both; text-align: left;">
<br /></div>
<br />

Red tracking color MATLAB

programnya..... close all; clear all; clc; % spesifikasi format webcam yang digunakan vid=videoinput('winvideo'...

11:53 AM

Skin face detection MATLAB

<div class="separator" style="clear: both; text-align: center;">
<a href="https://blogger.googleusercontent.com/img/b/R29vZ2xl/AVvXsEj3X7whTfekwP8zEpFbUXPC99lw7VkhoNw5QMT9BWVn39blr98oF7yt7QXSocbYw-oOGeTHxA-wvrUYT_IlyeanBIRw30O8lND6iab5Rs6NXXKR5vbY0C5gApZl9bzm7fTwu9bTTTChLj0/s1600/SKIN+FACE+DETECTION.png" imageanchor="1" style="margin-left: 1em; margin-right: 1em;"><img border="0" height="230" src="https://blogger.googleusercontent.com/img/b/R29vZ2xl/AVvXsEj3X7whTfekwP8zEpFbUXPC99lw7VkhoNw5QMT9BWVn39blr98oF7yt7QXSocbYw-oOGeTHxA-wvrUYT_IlyeanBIRw30O8lND6iab5Rs6NXXKR5vbY0C5gApZl9bzm7fTwu9bTTTChLj0/s320/SKIN+FACE+DETECTION.png" width="320" /></a></div>
<div class="separator" style="clear: both; text-align: left;">
<br /></div>
<div class="separator" style="clear: both; text-align: left;">
PROGRAM</div>
<div class="separator" style="clear: both;">
% spesifikasi format webcam yang digunakan</div>
<div class="separator" style="clear: both;">
vid = videoinput('winvideo',1,'YUY2_320x240');</div>
<div class="separator" style="clear: both;">
set(vid, 'FramesPerTrigger', Inf);</div>
<div class="separator" style="clear: both;">
set(vid, 'ReturnedColorspace', 'rgb')</div>
<div class="separator" style="clear: both;">
vid.FrameGrabInterval = 5;</div>
<div class="separator" style="clear: both;">
<br /></div>
<div class="separator" style="clear: both;">
% memulai program  </div>
<div class="separator" style="clear: both;">
start(vid)</div>
<div class="separator" style="clear: both;">
<br /></div>
<div class="separator" style="clear: both;">
<br /></div>
<div class="separator" style="clear: both;">
while(vid.FramesAcquired<=100)</div>
<div class="separator" style="clear: both;">
<br /></div>
<div class="separator" style="clear: both;">
data = getsnapshot(vid);</div>
<div class="separator" style="clear: both;">
diff_im = imsubtract(data(:,:,1), rgb2gray(data));</div>
<div class="separator" style="clear: both;">
diff_im = medfilt2(diff_im, [3 3]);</div>
<div class="separator" style="clear: both;">
diff_im = imadjust(diff_im);</div>
<div class="separator" style="clear: both;">
level = graythresh(diff_im);</div>
<div class="separator" style="clear: both;">
bw = im2bw(diff_im,level);</div>
<div class="separator" style="clear: both;">
BW5 = imfill(bw,'holes');</div>
<div class="separator" style="clear: both;">
bw6 = bwlabel(BW5, 8);</div>
<div class="separator" style="clear: both;">
stats = regionprops(bw6,['basic']);</div>
<div class="separator" style="clear: both;">
[N,M]=size(stats);</div>
<div class="separator" style="clear: both;">
if (bw==0)</div>
<div class="separator" style="clear: both;">
        break;</div>
<div class="separator" style="clear: both;">
else</div>
<div class="separator" style="clear: both;">
<br /></div>
<div class="separator" style="clear: both;">
     tmp = stats(1);</div>
<div class="separator" style="clear: both;">
for i = 2 : N</div>
<div class="separator" style="clear: both;">
      if stats(i).Area > tmp.Area</div>
<div class="separator" style="clear: both;">
        tmp = stats(i);</div>
<div class="separator" style="clear: both;">
      end</div>
<div class="separator" style="clear: both;">
   </div>
<div class="separator" style="clear: both;">
end</div>
<div class="separator" style="clear: both;">
bb = tmp.BoundingBox;</div>
<div class="separator" style="clear: both;">
bc = tmp.Centroid;</div>
<div class="separator" style="clear: both;">
<br /></div>
<div class="separator" style="clear: both;">
imshow(data)</div>
<div class="separator" style="clear: both;">
hold on</div>
<div class="separator" style="clear: both;">
rectangle('Position',bb,'EdgeColor','r','LineWidth',2)</div>
<div class="separator" style="clear: both;">
hold off</div>
<div class="separator" style="clear: both;">
end</div>
<div class="separator" style="clear: both;">
end</div>
<div class="separator" style="clear: both;">
<br /></div>
<div class="separator" style="clear: both;">
stop(vid);</div>
<div class="separator" style="clear: both;">
<br /></div>
<div class="separator" style="clear: both;">
% Flush all the image data stored in the memory buffer.</div>
<div class="separator" style="clear: both;">
flushdata(vid);</div>
<div class="separator" style="clear: both;">
<br /></div>
<div class="separator" style="clear: both;">
% Clear semua variabel</div>
<div class="separator" style="clear: both;">
clear all</div>
<div>
<br /></div>
<div class="separator" style="clear: both; text-align: left;">
<br /></div>
<br />

Skin face detection MATLAB

PROGRAM % spesifikasi format webcam yang digunakan vid = videoinput('winvideo',1,'YUY2_320x240'); set(vid, 'F...

11:42 AM

MATLAB Tracking object

<div class="separator" style="clear: both; text-align: center;">
<a href="https://blogger.googleusercontent.com/img/b/R29vZ2xl/AVvXsEh4_4UMuuEeuVRRH2Bfck8OR7BXrtg3Bzn2T7VMswVHZq5KfhjGwE_F9PLolbFbtP8Tk3bMcNphWiOkj9xw6HXnUzqrsIRsHv-plWKTAx3qR6kKfccTHr7rXz_fO8pSuqtoKKi9i4uTvro/s1600/detecting+objec.png" imageanchor="1" style="margin-left: 1em; margin-right: 1em;"><img border="0" height="187" src="https://blogger.googleusercontent.com/img/b/R29vZ2xl/AVvXsEh4_4UMuuEeuVRRH2Bfck8OR7BXrtg3Bzn2T7VMswVHZq5KfhjGwE_F9PLolbFbtP8Tk3bMcNphWiOkj9xw6HXnUzqrsIRsHv-plWKTAx3qR6kKfccTHr7rXz_fO8pSuqtoKKi9i4uTvro/s320/detecting+objec.png" width="320" /></a></div>
<br />
<br />
programnya<br />
<br />
close all;<br />
clear all;<br />
clc;<br />
<br />
% spesifikasi format webcam yang digunakan<br />
vid=videoinput('winvideo',1,'YUY2_320x240');<br />
set(vid,'TriggerRepeat',Inf);<br />
vid.returnedcolorspace='rgb';<br />
vid.FrameGrabInterval=2;<br />
<br />
start(vid)<br />
<br />
while(vid.FramesAcquired<=100)% frame harus lebih besar dari tic toc<br />
    tic<br />
    for f=1:50;% nilai ini harus lebih kecil dari frame<br />
    % mengambil citra dari video<br />
    data = getsnapshot(vid);<br />
    %proses flip agar posisi citra berhadapan dengan objek<br />
    R=data(:,:,1);<br />
    R=fliplr(R);<br />
    G=data(:,:,2);<br />
    G=fliplr(G);<br />
    B=data(:,:,3);<br />
    B=fliplr(B);<br />
    data=cat(3,R,G,B);<br />
    % Untuk mendeteksi objek berwarna merah yang bergerak<br />
    % Diperlukan pengurangan komponen warna merah<br />
    % Mengekstrak komponen warna merah dari citra grayscale<br />
    diff_im = imsubtract(data(:,:,1), rgb2gray(data));<br />
    % Filterisasi menggunakan filter median untuk menghilangkan noise<br />
    diff_im = medfilt2(diff_im, [3 3]);<br />
    % Konversi grayscale ke biner<br />
    diff_im = im2bw(diff_im,0.18);<br />
    % Menghilangkan semua pixel kurang dari 300 px<br />
    diff_im = bwareaopen(diff_im,300);<br />
    % Memberi label semua komponen yang terkoneksi pada citra<br />
    bw = bwlabel(diff_im, 8);<br />
<br />
    % Berikut ini adalah sintak untuk mengkarakterisasi tiap bagian label.<br />
    stats = regionprops(bw, 'BoundingBox', 'Centroid');<br />
   <br />
    % Menampilkan citra hasil snapshot<br />
    imshow(data)<br />
   <br />
    hold on<br />
   <br />
    % Berikut adalah logika loop untuk membuat box kotak yang mengitari objek warna merah.<br />
    for object = 1:length(stats)<br />
        bb = stats(object).BoundingBox;<br />
        bc = stats(object).Centroid;<br />
        rectangle('Position',bb,'EdgeColor','r','LineWidth',2)<br />
        plot(bc(1),bc(2), '-m+')<br />
        sumbux(f)=bc(1);<br />
        sumbuy(f)=bc(2);<br />
       <br />
        a=text(bc(1)+15,bc(2),strcat('X:',num2str(round(bc(1))),'Y:',num2str(round(bc(2)))));<br />
        set(a,'FontName','Arial','FontWeight','bold','FontSize',12,'Color','red');<br />
    end<br />
   <br />
    hold off<br />
    end<br />
end<br />
stop(vid)<br />
t=toc;<br />
t1=t/50:t/50:t<br />
<br />
% menampilkan grafik gerak objek<br />
figure<br />
subplot(3,1,1)<br />
plot(t1,sumbux,'r-')<br />
xlabel('Waktu t(s)')<br />
ylabel('Kordinat x')<br />
title('Kordinat x terhadap t','fontsize',14,'fontname','Arial')<br />
subplot(3,1,2)<br />
plot(t1,sumbuy,'r-')<br />
xlabel('Waktu t(s)')<br />
ylabel('Kordinat y')<br />
title('Kordinat y terhadap t','fontsize',14,'fontname','Arial')<br />
subplot(3,1,3)<br />
plot(sumbux,sumbuy,'r-')<br />
xlabel('Kordinat x')<br />
ylabel('Kordinat y')<br />
title('Kordinat y vs x','fontsize',14,'fontname','Arial')<br />
<div>
<br /></div>
<br />

MATLAB Tracking object

programnya close all; clear all; clc; % spesifikasi format webcam yang digunakan vid=videoinput('winvideo',1,'YUY2_32...

10:57 AM

Program GUI matlab robot PC

<div class="separator" style="clear: both; text-align: center;">
<br /></div>
<div class="separator" style="clear: both; text-align: center;">
<a href="https://blogger.googleusercontent.com/img/b/R29vZ2xl/AVvXsEiJr09xJoYYHh0gx5sT4tWCr0Td2uXUIvxoy8zDZFeRy7X740g3P2r7ZnORSyc-CksBVow2307n3ncgDPCZH-G08YVJTX_Na4mQGjdv6wUyzZycxmmtz9DUYgc2XxC1PTLk7UJEvMJIrIo/s1600/gui+pc.png" imageanchor="1" style="margin-left: 1em; margin-right: 1em;"><img border="0" height="258" src="https://blogger.googleusercontent.com/img/b/R29vZ2xl/AVvXsEiJr09xJoYYHh0gx5sT4tWCr0Td2uXUIvxoy8zDZFeRy7X740g3P2r7ZnORSyc-CksBVow2307n3ncgDPCZH-G08YVJTX_Na4mQGjdv6wUyzZycxmmtz9DUYgc2XxC1PTLk7UJEvMJIrIo/s320/gui+pc.png" width="320" /></a></div>
<div class="separator" style="clear: both; text-align: center;">
<br /></div>
<div class="separator" style="clear: both; text-align: left;">
<br /></div>
<div class="separator" style="clear: both; text-align: left;">
programnya.....</div>
<div class="separator" style="clear: both; text-align: left;">
<br /></div>
<div class="separator" style="clear: both; text-align: left;">
<br /></div>
<div class="separator" style="clear: both;">
function varargout = guivisiBOT(varargin)</div>
<div class="separator" style="clear: both;">
% GUIVISIBOT MATLAB code for guivisiBOT.fig</div>
<div class="separator" style="clear: both;">
%      GUIVISIBOT, by itself, creates a new GUIVISIBOT or raises the existing</div>
<div class="separator" style="clear: both;">
%      singleton*.</div>
<div class="separator" style="clear: both;">
%</div>
<div class="separator" style="clear: both;">
%      H = GUIVISIBOT returns the handle to a new GUIVISIBOT or the handle to</div>
<div class="separator" style="clear: both;">
%      the existing singleton*.</div>
<div class="separator" style="clear: both;">
%</div>
<div class="separator" style="clear: both;">
%      GUIVISIBOT('CALLBACK',hObject,eventData,handles,...) calls the local</div>
<div class="separator" style="clear: both;">
%      function named CALLBACK in GUIVISIBOT.M with the given input arguments.</div>
<div class="separator" style="clear: both;">
%</div>
<div class="separator" style="clear: both;">
%      GUIVISIBOT('Property','Value',...) creates a new GUIVISIBOT or raises the</div>
<div class="separator" style="clear: both;">
%      existing singleton*.  Starting from the left, property value pairs are</div>
<div class="separator" style="clear: both;">
%      applied to the GUI before guivisiBOT_OpeningFcn gets called.  An</div>
<div class="separator" style="clear: both;">
%      unrecognized property name or invalid value makes property application</div>
<div class="separator" style="clear: both;">
%      stop.  All inputs are passed to guivisiBOT_OpeningFcn via varargin.</div>
<div class="separator" style="clear: both;">
%</div>
<div class="separator" style="clear: both;">
%      *See GUI Options on GUIDE's Tools menu.  Choose "GUI allows only one</div>
<div class="separator" style="clear: both;">
%      instance to run (singleton)".</div>
<div class="separator" style="clear: both;">
%</div>
<div class="separator" style="clear: both;">
% See also: GUIDE, GUIDATA, GUIHANDLES</div>
<div class="separator" style="clear: both;">
<br /></div>
<div class="separator" style="clear: both;">
% Edit the above text to modify the response to help guivisiBOT</div>
<div class="separator" style="clear: both;">
<br /></div>
<div class="separator" style="clear: both;">
% Last Modified by GUIDE v2.5 19-May-2014 12:35:31</div>
<div class="separator" style="clear: both;">
<br /></div>
<div class="separator" style="clear: both;">
% Begin initialization code - DO NOT EDIT</div>
<div class="separator" style="clear: both;">
gui_Singleton = 1;</div>
<div class="separator" style="clear: both;">
gui_State = struct('gui_Name',       mfilename, ...</div>
<div class="separator" style="clear: both;">
                   'gui_Singleton',  gui_Singleton, ...</div>
<div class="separator" style="clear: both;">
                   'gui_OpeningFcn', @guivisiBOT_OpeningFcn, ...</div>
<div class="separator" style="clear: both;">
                   'gui_OutputFcn',  @guivisiBOT_OutputFcn, ...</div>
<div class="separator" style="clear: both;">
                   'gui_LayoutFcn',  [] , ...</div>
<div class="separator" style="clear: both;">
                   'gui_Callback',   []);</div>
<div class="separator" style="clear: both;">
if nargin && ischar(varargin{1})</div>
<div class="separator" style="clear: both;">
    gui_State.gui_Callback = str2func(varargin{1});</div>
<div class="separator" style="clear: both;">
end</div>
<div class="separator" style="clear: both;">
<br /></div>
<div class="separator" style="clear: both;">
if nargout</div>
<div class="separator" style="clear: both;">
    [varargout{1:nargout}] = gui_mainfcn(gui_State, varargin{:});</div>
<div class="separator" style="clear: both;">
else</div>
<div class="separator" style="clear: both;">
    gui_mainfcn(gui_State, varargin{:});</div>
<div class="separator" style="clear: both;">
end</div>
<div class="separator" style="clear: both;">
% End initialization code - DO NOT EDIT</div>
<div class="separator" style="clear: both;">
<br /></div>
<div class="separator" style="clear: both;">
<br /></div>
<div class="separator" style="clear: both;">
% --- Program Opening Video Webcam </div>
<div class="separator" style="clear: both;">
function guivisiBOT_OpeningFcn(hObject, eventdata, handles, varargin)</div>
<div class="separator" style="clear: both;">
% This function has no output args, see OutputFcn.</div>
<div class="separator" style="clear: both;">
% hObject    handle to figure</div>
<div class="separator" style="clear: both;">
% eventdata  reserved - to be defined in a future version of MATLAB</div>
<div class="separator" style="clear: both;">
% handles    structure with handles and user data (see GUIDATA)</div>
<div class="separator" style="clear: both;">
% varargin   command line arguments to guivisiBOT (see VARARGIN)</div>
<div class="separator" style="clear: both;">
<br /></div>
<div class="separator" style="clear: both;">
% Choose default command line output for guivisiBOT</div>
<div class="separator" style="clear: both;">
handles.output = hObject;</div>
<div class="separator" style="clear: both;">
% Update handles structure</div>
<div class="separator" style="clear: both;">
guidata(hObject, handles);</div>
<div class="separator" style="clear: both;">
<br /></div>
<div class="separator" style="clear: both;">
<br /></div>
<div class="separator" style="clear: both;">
% UIWAIT makes guivisiBOT wait for user response (see UIRESUME)</div>
<div class="separator" style="clear: both;">
% uiwait(handles.figure1);</div>
<div class="separator" style="clear: both;">
<br /></div>
<div class="separator" style="clear: both;">
<br /></div>
<div class="separator" style="clear: both;">
% --- Outputs from this function are returned to the command line.</div>
<div class="separator" style="clear: both;">
function varargout = guivisiBOT_OutputFcn(hObject, eventdata, handles) </div>
<div class="separator" style="clear: both;">
% varargout  cell array for returning output args (see VARARGOUT);</div>
<div class="separator" style="clear: both;">
% hObject    handle to figure</div>
<div class="separator" style="clear: both;">
% eventdata  reserved - to be defined in a future version of MATLAB</div>
<div class="separator" style="clear: both;">
% handles    structure with handles and user data (see GUIDATA)</div>
<div class="separator" style="clear: both;">
<br /></div>
<div class="separator" style="clear: both;">
% Get default command line output from handles structure</div>
<div class="separator" style="clear: both;">
varargout{1} = handles.output;</div>
<div class="separator" style="clear: both;">
<br /></div>
<div class="separator" style="clear: both;">
<br /></div>
<div class="separator" style="clear: both;">
% --- Program Perintah BELOK KIRI</div>
<div class="separator" style="clear: both;">
function kiri_Callback(hObject, eventdata, handles)</div>
<div class="separator" style="clear: both;">
% hObject    handle to kiri (see GCBO)</div>
<div class="separator" style="clear: both;">
% eventdata  reserved - to be defined in a future version of MATLAB</div>
<div class="separator" style="clear: both;">
% handles    structure with handles and user data (see GUIDATA)</div>
<div class="separator" style="clear: both;">
global s</div>
<div class="separator" style="clear: both;">
fwrite(s,'Z');</div>
<div class="separator" style="clear: both;">
<br /></div>
<div class="separator" style="clear: both;">
<br /></div>
<div class="separator" style="clear: both;">
<br /></div>
<div class="separator" style="clear: both;">
% --- Program perintah BELOK KANAN</div>
<div class="separator" style="clear: both;">
function kanan_Callback(hObject, eventdata, handles)</div>
<div class="separator" style="clear: both;">
% hObject    handle to kanan (see GCBO)</div>
<div class="separator" style="clear: both;">
% eventdata  reserved - to be defined in a future version of MATLAB</div>
<div class="separator" style="clear: both;">
% handles    structure with handles and user data (see GUIDATA)</div>
<div class="separator" style="clear: both;">
global s</div>
<div class="separator" style="clear: both;">
fwrite(s,'A');</div>
<div class="separator" style="clear: both;">
<br /></div>
<div class="separator" style="clear: both;">
<br /></div>
<div class="separator" style="clear: both;">
<br /></div>
<div class="separator" style="clear: both;">
% --- Program perintah MAJU</div>
<div class="separator" style="clear: both;">
function maju_Callback(hObject, eventdata, handles)</div>
<div class="separator" style="clear: both;">
% hObject    handle to maju (see GCBO)</div>
<div class="separator" style="clear: both;">
% eventdata  reserved - to be defined in a future version of MATLAB</div>
<div class="separator" style="clear: both;">
% handles    structure with handles and user data (see GUIDATA)</div>
<div class="separator" style="clear: both;">
global s</div>
<div class="separator" style="clear: both;">
fwrite(s,'K');</div>
<div class="separator" style="clear: both;">
<br /></div>
<div class="separator" style="clear: both;">
<br /></div>
<div class="separator" style="clear: both;">
<br /></div>
<div class="separator" style="clear: both;">
% --- Program perintah MUNDUR</div>
<div class="separator" style="clear: both;">
function mundur_Callback(hObject, eventdata, handles)</div>
<div class="separator" style="clear: both;">
% hObject    handle to mundur (see GCBO)</div>
<div class="separator" style="clear: both;">
% eventdata  reserved - to be defined in a future version of MATLAB</div>
<div class="separator" style="clear: both;">
% handles    structure with handles and user data (see GUIDATA)</div>
<div class="separator" style="clear: both;">
global s</div>
<div class="separator" style="clear: both;">
fwrite(s,'M');</div>
<div class="separator" style="clear: both;">
<br /></div>
<div class="separator" style="clear: both;">
<br /></div>
<div class="separator" style="clear: both;">
% --- Program perintah DIAM</div>
<div class="separator" style="clear: both;">
function diam_Callback(hObject, eventdata, handles)</div>
<div class="separator" style="clear: both;">
% hObject    handle to diam (see GCBO)</div>
<div class="separator" style="clear: both;">
% eventdata  reserved - to be defined in a future version of MATLAB</div>
<div class="separator" style="clear: both;">
% handles    structure with handles and user data (see GUIDATA)</div>
<div class="separator" style="clear: both;">
global s</div>
<div class="separator" style="clear: both;">
fwrite(s,'O');</div>
<div class="separator" style="clear: both;">
<br /></div>
<div class="separator" style="clear: both;">
<br /></div>
<div class="separator" style="clear: both;">
<br /></div>
<div class="separator" style="clear: both;">
function edit1_Callback(hObject, eventdata, handles)</div>
<div class="separator" style="clear: both;">
% hObject    handle to edit1 (see GCBO)</div>
<div class="separator" style="clear: both;">
% eventdata  reserved - to be defined in a future version of MATLAB</div>
<div class="separator" style="clear: both;">
% handles    structure with handles and user data (see GUIDATA)</div>
<div class="separator" style="clear: both;">
<br /></div>
<div class="separator" style="clear: both;">
% Hints: get(hObject,'String') returns contents of edit1 as text</div>
<div class="separator" style="clear: both;">
%        str2double(get(hObject,'String')) returns contents of edit1 as a double</div>
<div class="separator" style="clear: both;">
<br /></div>
<div class="separator" style="clear: both;">
<br /></div>
<div class="separator" style="clear: both;">
% --- Executes during object creation, after setting all properties.</div>
<div class="separator" style="clear: both;">
function edit1_CreateFcn(hObject, eventdata, handles)</div>
<div class="separator" style="clear: both;">
% hObject    handle to edit1 (see GCBO)</div>
<div class="separator" style="clear: both;">
% eventdata  reserved - to be defined in a future version of MATLAB</div>
<div class="separator" style="clear: both;">
% handles    empty - handles not created until after all CreateFcns called</div>
<div class="separator" style="clear: both;">
<br /></div>
<div class="separator" style="clear: both;">
% Hint: edit controls usually have a white background on Windows.</div>
<div class="separator" style="clear: both;">
%       See ISPC and COMPUTER.</div>
<div class="separator" style="clear: both;">
if ispc && isequal(get(hObject,'BackgroundColor'), get(0,'defaultUicontrolBackgroundColor'))</div>
<div class="separator" style="clear: both;">
    set(hObject,'BackgroundColor','white');</div>
<div class="separator" style="clear: both;">
end</div>
<div class="separator" style="clear: both;">
<br /></div>
<div class="separator" style="clear: both;">
<br /></div>
<div class="separator" style="clear: both;">
<br /></div>
<div class="separator" style="clear: both;">
function edit2_Callback(hObject, eventdata, handles)</div>
<div class="separator" style="clear: both;">
% hObject    handle to edit2 (see GCBO)</div>
<div class="separator" style="clear: both;">
% eventdata  reserved - to be defined in a future version of MATLAB</div>
<div class="separator" style="clear: both;">
% handles    structure with handles and user data (see GUIDATA)</div>
<div class="separator" style="clear: both;">
<br /></div>
<div class="separator" style="clear: both;">
% Hints: get(hObject,'String') returns contents of edit2 as text</div>
<div class="separator" style="clear: both;">
%        str2double(get(hObject,'String')) returns contents of edit2 as a double</div>
<div class="separator" style="clear: both;">
<br /></div>
<div class="separator" style="clear: both;">
<br /></div>
<div class="separator" style="clear: both;">
% --- Executes during object creation, after setting all properties.</div>
<div class="separator" style="clear: both;">
function edit2_CreateFcn(hObject, eventdata, handles)</div>
<div class="separator" style="clear: both;">
% hObject    handle to edit2 (see GCBO)</div>
<div class="separator" style="clear: both;">
% eventdata  reserved - to be defined in a future version of MATLAB</div>
<div class="separator" style="clear: both;">
% handles    empty - handles not created until after all CreateFcns called</div>
<div class="separator" style="clear: both;">
<br /></div>
<div class="separator" style="clear: both;">
% Hint: edit controls usually have a white background on Windows.</div>
<div class="separator" style="clear: both;">
%       See ISPC and COMPUTER.</div>
<div class="separator" style="clear: both;">
if ispc && isequal(get(hObject,'BackgroundColor'), get(0,'defaultUicontrolBackgroundColor'))</div>
<div class="separator" style="clear: both;">
    set(hObject,'BackgroundColor','white');</div>
<div class="separator" style="clear: both;">
end</div>
<div class="separator" style="clear: both;">
<br /></div>
<div class="separator" style="clear: both;">
<br /></div>
<div class="separator" style="clear: both;">
% --- Executes on button press in koneksi.</div>
<div class="separator" style="clear: both;">
function koneksi_Callback(hObject, eventdata, handles)</div>
<div class="separator" style="clear: both;">
% hObject    handle to koneksi (see GCBO)</div>
<div class="separator" style="clear: both;">
% eventdata  reserved - to be defined in a future version of MATLAB</div>
<div class="separator" style="clear: both;">
% handles    structure with handles and user data (see GUIDATA)</div>
<div class="separator" style="clear: both;">
global s</div>
<div class="separator" style="clear: both;">
myform=guidata(gcbo);</div>
<div class="separator" style="clear: both;">
aa=get(myform.edit1,'String');</div>
<div class="separator" style="clear: both;">
bb=str2double(get(myform.edit2,'String'));</div>
<div class="separator" style="clear: both;">
s=serial(aa,'Baudrate',bb,'DataBits',8,'StopBits',1,'InputBufferSize',16000);</div>
<div class="separator" style="clear: both;">
fopen(s);</div>
<div class="separator" style="clear: both;">
<br /></div>
<div class="separator" style="clear: both;">
<br /></div>
<div class="separator" style="clear: both;">
<br /></div>
<div class="separator" style="clear: both;">
% --- Executes on button press in diskoneksi.</div>
<div class="separator" style="clear: both;">
function diskoneksi_Callback(hObject, eventdata, handles)</div>
<div class="separator" style="clear: both;">
% hObject    handle to diskoneksi (see GCBO)</div>
<div class="separator" style="clear: both;">
% eventdata  reserved - to be defined in a future version of MATLAB</div>
<div class="separator" style="clear: both;">
% handles    structure with handles and user data (see GUIDATA)</div>
<div class="separator" style="clear: both;">
global s</div>
<div class="separator" style="clear: both;">
clear s;</div>
<div class="separator" style="clear: both;">
close;</div>
<div>
<br /></div>
<div class="separator" style="clear: both; text-align: left;">
<br /></div>
<div class="separator" style="clear: both; text-align: left;">
<br /></div>
<br />

Program GUI matlab robot PC

programnya..... function varargout = guivisiBOT(varargin) % GUIVISIBOT MATLAB code for guivisiBOT.fig % GUIVISIBOT, ...

10:45 AM

ROBOT KONTROL KOMPUTER arduino

<div class="separator" style="clear: both; text-align: center;">
<a href="https://blogger.googleusercontent.com/img/b/R29vZ2xl/AVvXsEgIJOtvzBNJXcHf-ZTvN2lpoa2te7ihx_Uy62_dl1gYgse_8fw-BWVn_Ps-bTZndAd2PcSbFqskJtieVz5vzA-V0iYw3OdJY-pEsm8xRa0RnFU269lVjYYKSJvX28QJCPZ1BuO-dQJGmCI/s1600/kontrol+pc.png" imageanchor="1" style="margin-left: 1em; margin-right: 1em;"><img border="0" height="208" src="https://blogger.googleusercontent.com/img/b/R29vZ2xl/AVvXsEgIJOtvzBNJXcHf-ZTvN2lpoa2te7ihx_Uy62_dl1gYgse_8fw-BWVn_Ps-bTZndAd2PcSbFqskJtieVz5vzA-V0iYw3OdJY-pEsm8xRa0RnFU269lVjYYKSJvX28QJCPZ1BuO-dQJGmCI/s320/kontrol+pc.png" width="320" /></a></div>
<br />
<br />
programnya .....<br />
<br />
// ROBOT KONTROL KOMPUTER<br />
<br />
// Definisi awal<br />
<br />
int kiriA = 9;<br />
int kiriB = 6;<br />
int kananA = 5;<br />
int kananB = 3;<br />
<br />
void setup()<br />
{<br />
  Serial.begin(9600);<br />
  pinMode(kiriA,OUTPUT);<br />
  pinMode(kiriB,OUTPUT);<br />
  pinMode(kananA,OUTPUT);<br />
  pinMode(kananB,OUTPUT);<br />
}<br />
<br />
void loop()<br />
{<br />
  if(Serial.available()>0)<br />
  {<br />
    byte dataku=Serial.read();<br />
    if (dataku=='M')<br />
    {<br />
      digitalWrite(kiriA,HIGH);<br />
      digitalWrite(kiriB,LOW);<br />
      digitalWrite(kananA,HIGH);<br />
      digitalWrite(kananB,LOW);<br />
      Serial.println("ROBOT MUNDUR");<br />
    }<br />
    else if (dataku=='Z')<br />
    {<br />
      digitalWrite(kiriA,LOW);<br />
      digitalWrite(kiriB,HIGH);<br />
      digitalWrite(kananA,LOW);<br />
      digitalWrite(kananB,HIGH);<br />
      Serial.println("ROBOT MAJU");<br />
    }<br />
    else if (dataku=='Y')<br />
    {<br />
      digitalWrite(kiriA,LOW);<br />
      digitalWrite(kiriB,HIGH);<br />
      digitalWrite(kananA,HIGH);<br />
      digitalWrite(kananB,LOW);<br />
      Serial.println("ROBOT BELOK KIRI");<br />
    }<br />
    else if (dataku=='X')<br />
    {<br />
      digitalWrite(kiriA,HIGH);<br />
      digitalWrite(kiriB,LOW);<br />
      digitalWrite(kananA,LOW);<br />
      digitalWrite(kananB,HIGH);<br />
      Serial.println("ROBOT BELOK KANAN");<br />
    }<br />
    else<br />
    {<br />
      digitalWrite(kiriA,LOW);<br />
      digitalWrite(kiriB,LOW);<br />
      digitalWrite(kananA,LOW);<br />
      digitalWrite(kananB,LOW);<br />
      Serial.println("ROBOT DIAM");<br />
    }<br />
  }<br />
  <br />
}<br />
<div>
<br /></div>
<br />
<br />

ROBOT KONTROL KOMPUTER arduino

programnya ..... // ROBOT KONTROL KOMPUTER // Definisi awal int kiriA = 9; int kiriB = 6; int kananA = 5; int kananB = 3; voi...

10:34 AM