digital_clock1(varargin)

function digital_clock1(varargin)
k = date;
clc
figcol = [0 0 0];
f = figure('menubar','none',...
    'numbertitle','off',...
    'name','DIGITAL CLOCK BY RAHUL',...
    'position',[520 300 365 115],...
    'resize','off',...
    'color',figcol);

h.txt1 = uicontrol(f,'style','text',...
    'position',[167 88 188 22],...
    'fontname','comic sans MS',...
    'fontsize',12,...
    'fontweight','bold',...
    'foregroundcolor',[1 1 1],...
    'backgroundcolor',figcol,...
    'string','Hr      Min      Sec');

h.txt2 = uicontrol(f,'style','text',...
    'position',[174 5 168 38],...
    'fontname','comic sans MS',...
    'fontsize',15,...
    'fontweight','bold',...
    'foregroundcolor',[1 0.8 0.8],...
    'string',k,...
    'backgroundcolor',figcol);

h.txth = uicontrol(f,'style','text',...
    'position',[170 59 43 30],...
    'fontname','comic sans MS',...
    'fontsize',14,...
    'fontweight','bold',...
    'foregroundcolor',[1 0.8 0.8],...
    'backgroundcolor',figcol);

h.txtm = uicontrol(f,'style','text',...
    'position',[236 59 43 29],...
    'fontname','comic sans MS',...
    'fontsize',14,...
    'fontweight','bold',...
    'foregroundcolor',[0.75 0 0.75],...
    'backgroundcolor',figcol);

h.txts = uicontrol(f,'style','text',...
    'position',[305 59 38 28],...
    'fontname','comic sans MS',...
    'fontsize',14,...
    'fontweight','bold',...
    'foregroundcolor','r',...
    'backgroundcolor',figcol);

h.txt3 = uicontrol(f,'style','text',...
    'position',[217 59 18 30],...
    'fontname','comic sans MS',...
    'fontsize',14,...
    'fontweight','bold',...
    'foregroundcolor','r',...
    'string',':',...
    'backgroundcolor',figcol);

h.txt4 = uicontrol(f,'style','text',...
    'position',[279 60 18 30],...
    'fontname','comic sans MS',...
    'fontsize',14,...
    'fontweight','bold',...
    'foregroundcolor','r',...
    'string',':',...
    'backgroundcolor',figcol);

h.rad1 = uicontrol(f,'style','radio',...
    'position',[15 73 164 27],...
    'fontname','comic sans MS',...
    'fontsize',10,...
    'fontweight','bold',...
    'foregroundcolor','g',...
    'string','DIGITAL CLOCK ON',...
    'backgroundcolor',figcol,...
    'callback',@con_callback);


h.rad2 = uicontrol(f,'style','radio',...
    'position',[15 47 164 27],...
    'fontname','comic sans MS',...
    'fontsize',10,...
    'fontweight','bold',...
    'foregroundcolor','r',...
    'string','DIGITAL CLOCK OFF',...
    'backgroundcolor',figcol,...
    'callback',@coff_callback);

h.tog1 = uicontrol(f,'style','toggle',...
    'position',[20 13 101 27],...
    'fontname','comic sans MS',...
    'fontsize',10,...
    'fontweight','bold',...
    'foregroundcolor','w',...
    'string','HIDE DATE',...
    'backgroundcolor',figcol,...
    'callback',@da_te_callback);


function con_callback(hObject, eventdata)
set(h.rad2,'value',0)
v = get(hObject,'value');
while v == 1
    c = clock;
    if c(4) > 12
        set(h.txth,'string',abs(12-c(4)));
    else
        set(h.txth,'string',c(4));
    end
    set(h.txtm,'string',c(5));
    set(h.txts,'string',ceil(c(6)));
    v1 = get(h.rad2,'value');
    if v1 == 1
        set(h.txth,'string','');
        set(h.txtm,'string','');
        set(h.txts,'string','');
        break
    end
    pause(1)
end
end

function coff_callback(hObject, eventdata)
set(h.rad1,'value',0)
end

function da_te_callback(hObject, eventdata)
v = get(hObject,'value');
if v == 1
    set(h.txt2,'string','')
    set(hObject,'string','SHOW DATE')
else
    set(hObject,'string','HIDE DATE')
    set(h.txt2,'string',k)
end
end

end