Matlab程序：手画光滑曲线图形界面

※鱼鱼╰☆

1. function fig = draw()
   
2. % 手画光滑曲线图形界面
   
3. % 先用Range确定大致范围；然后用ginput用鼠标单击大致数据点；最后用Draw it画图。
   
4. % 本程序采用样条拟合
   
5. 
   
6. % By L. J. Hu, 2000
   
7. % This is the machine-generated representation of a Handle Graphics object
   
8. % and its children.  Note that handle values may change when these objects
   
9. % are re-created. This may cause problems with any callbacks written to
   
10. % depend on the value of the handle at the time the object was saved.
    
11. %
    
12. % To reopen this object, just type the name of the M-file at the MATLAB
    
13. % prompt. The M-file and its associated MAT-file must be on your path.
    
14. 
    
15. load draw
    
16. 
    
17. h0 = figure('Color',[0.8 0.8 0.8], ...
    
18.         'Colormap',mat0, ...
    
19.         'Name','Smooth Draw', ...
    
20.         'NumberTitle','off', ...
    
21.         'PointerShapeCData',mat1, ...
    
22.         'Position',[40 45 560 375], ...
    
23.         'Resize','off', ...
    
24.         'Tag','drawfig', ...
    
25.         'UserData',mat2);
    
26. h1 = axes('Parent',h0, ...
    
27.         'Units','pixels', ...
    
28.         'Box','on', ...
    
29.         'CameraUpVector',[0 1 0], ...
    
30.         'CameraUpVectorMode','manual', ...
    
31.         'Color',[1 1 1], ...
    
32.         'ColorOrder',mat3, ...
    
33.         'HandleVisibility','callback', ...
    
34.         'Position',[52 135 347 218], ...
    
35.         'Tag','Axes1', ...
    
36.         'XColor',[0 0 0], ...
    
37.         'XGrid','on', ...
    
38.         'XLimMode','manual', ...
    
39.         'YColor',[0 0 0], ...
    
40.         'YGrid','on', ...
    
41.         'YLimMode','manual', ...
    
42.         'ZColor',[0 0 0], ...
    
43.         'ZGrid','on');
    
44. h2 = text('Parent',h1, ...
    
45.         'Color',[0 0 0], ...
    
46.         'HandleVisibility','off', ...
    
47.         'HorizontalAlignment','center', ...
    
48.         'Position',[0.4971098265895954 -0.1105990783410138 9.160254037844386], ...
    
49.         'Tag','Axes1Text4', ...
    
50.         'VerticalAlignment','cap');
    
51. set(get(h2,'Parent'),'XLabel',h2);
    
52. h2 = text('Parent',h1, ...
    
53.         'Color',[0 0 0], ...
    
54.         'HandleVisibility','off', ...
    
55.         'HorizontalAlignment','center', ...
    
56.         'Position',[-0.08959537572254335 0.4930875576036867 9.160254037844386], ...
    
57.         'Rotation',90, ...
    
58.         'Tag','Axes1Text3', ...
    
59.         'VerticalAlignment','baseline');
    
60. set(get(h2,'Parent'),'YLabel',h2);
    
61. h2 = text('Parent',h1, ...
    
62.         'Color',[0 0 0], ...
    
63.         'HandleVisibility','off', ...
    
64.         'HorizontalAlignment','right', ...
    
65.         'Position',[-0.1502890173410405 1.101382488479263 9.160254037844386], ...
    
66.         'Tag','Axes1Text2', ...
    
67.         'Visible','off');
    
68. set(get(h2,'Parent'),'ZLabel',h2);
    
69. h2 = text('Parent',h1, ...
    
70.         'Color',[0 0 0], ...
    
71.         'HandleVisibility','off', ...
    
72.         'HorizontalAlignment','center', ...
    
73.         'Position',[0.4971098265895954 1.032258064516129 9.160254037844386], ...
    
74.         'Tag','Axes1Text1', ...
    
75.         'VerticalAlignment','bottom');
    
76. set(get(h2,'Parent'),'Title',h2);
    
77. h1 = uicontrol('Parent',h0, ...
    
78.         'Units','points', ...
    
79.         'BackgroundColor',[0.752941176470588 0.752941176470588 0.752941176470588], ...
    
80.         'ListboxTop',0, ...
    
81.         'Position',[325.5 3 85.5 263.25], ...
    
82.         'Style','frame', ...
    
83.         'Tag','Frame1');
    
84. h1 = uicontrol('Parent',h0, ...
    
85.         'Units','points', ...
    
86.         'Callback','clear;[x,y]=ginput;', ...
    
87.         'FontSize',14, ...
    
88.         'ListboxTop',0, ...
    
89.         'Position',[333 222 72 25.5], ...
    
90.         'String','Ginput', ...
    
91.         'Tag','Pushbutton1');
    
92. h1 = uicontrol('Parent',h0, ...
    
93.         'Units','points', ...
    
94.         'Callback','pp=csaps(x,y,0.9999);fnplt(pp,''b'',2);', ...
    
95.         'FontSize',14, ...
    
96.         'ListboxTop',0, ...
    
97.         'Position',[333.75 192 72 24.75], ...
    
98.         'String','Draw It', ...
    
99.         'Tag','Pushbutton2');
    
100. h1 = uicontrol('Parent',h0, ...
     
101.         'Units','points', ...
     
102.         'Callback','gline', ...
     
103.         'FontSize',14, ...
     
104.         'ListboxTop',0, ...
     
105.         'Position',[333.75 163.5 72 24.75], ...
     
106.         'String','Line', ...
     
107.         'Tag','Pushbutton3');
     
108. h1 = uicontrol('Parent',h0, ...
     
109.         'Units','points', ...
     
110.         'Callback',mat4, ...
     
111.         'FontSize',14, ...
     
112.         'ListboxTop',0, ...
     
113.         'Position',[334.5 102 72 25.5], ...
     
114.         'String','Range', ...
     
115.         'Tag','Pushbutton4');
     
116. h1 = uicontrol('Parent',h0, ...
     
117.         'Units','points', ...
     
118.         'Callback','cla;axis([0 1 0 1]);hold off', ...
     
119.         'FontSize',14, ...
     
120.         'ListboxTop',0, ...
     
121.         'Position',[334.5 13.5 71.25 26.25], ...
     
122.         'String','Erase', ...
     
123.         'Tag','Pushbutton5');
     
124. h1 = uicontrol('Parent',h0, ...
     
125.         'Units','points', ...
     
126.         'Callback','grid', ...
     
127.         'FontSize',14, ...
     
128.         'ListboxTop',0, ...
     
129.         'Position',[334.5 133.5 72 25.5], ...
     
130.         'String','Grid', ...
     
131.         'Tag','Pushbutton6');
     
132. h1 = uicontrol('Parent',h0, ...
     
133.         'Units','points', ...
     
134.         'ListboxTop',0, ...
     
135.         'Position',[21.75 9 273 63.75], ...
     
136.         'Style','frame', ...
     
137.         'Tag','Frame2');
     
138. h1 = uicontrol('Parent',h0, ...
     
139.         'Units','points', ...
     
140.         'BackgroundColor',[1 1 1], ...
     
141.         'Callback','eval(get(gcbo,''string''))', ...
     
142.         'ListboxTop',0, ...
     
143.         'Position',[32.25 9.75 261 46.5], ...
     
144.         'Style','edit', ...
     
145.         'Tag','EditText1');
     
146. h1 = uicontrol('Parent',h0, ...
     
147.         'Units','points', ...
     
148.         'Callback',mat5, ...
     
149.         'FontSize',14, ...
     
150.         'ListboxTop',0, ...
     
151.         'Position',[334.5 73.5 71.25 23.25], ...
     
152.         'String','Labels', ...
     
153.         'Tag','Pushbutton7');
     
154. h1 = uicontrol('Parent',h0, ...
     
155.         'Units','points', ...
     
156.         'BackgroundColor',[0.752941176470588 0.752941176470588 0.752941176470588], ...
     
157.         'ListboxTop',0, ...
     
158.         'Position',[27 57.75 81 12], ...
     
159.         'String','Command Window', ...
     
160.         'Style','text', ...
     
161.         'Tag','StaticText1');
     
162. h1 = uicontrol('Parent',h0, ...
     
163.         'Units','points', ...
     
164.         'BackgroundColor',[0.752941176470588 0.752941176470588 0.752941176470588], ...
     
165.         'ListboxTop',0, ...
     
166.         'Position',[332.25 248.25 75.75 15], ...
     
167.         'String','Control Panel', ...
     
168.         'Style','text', ...
     
169.         'Tag','StaticText2');
     
170. h1 = uicontrol('Parent',h0, ...
     
171.         'Units','points', ...
     
172.         'Callback','hold', ...
     
173.         'FontSize',14, ...
     
174.         'ListboxTop',0, ...
     
175.         'Position',[334.5 43.5 70.5 24.75], ...
     
176.         'String','Hold', ...
     
177.         'Tag','Pushbutton8');
     
178. if nargout > 0, fig = h0; end
     

复制代码