code.m
上传用户:cnlongwei
上传日期:2022-07-22
资源大小:7k
文件大小:21k
源码类别:

加密解密

开发平台:

Matlab

  1. function varargout = code(varargin)
  2. % CODE M-file for code.fig
  3. %      CODE, by itself, creates a new CODE or raises the existing
  4. %      singleton*.
  5. %
  6. %      H = CODE returns the handle to a new CODE or the handle to
  7. %      the existing singleton*.
  8. %
  9. %      CODE('CALLBACK',hObject,eventData,handles,...) calls the local
  10. %      function named CALLBACK in CODE.M with the given input arguments.
  11. %
  12. %      CODE('Property','Value',...) creates a new CODE or raises the
  13. %      existing singleton*.  Starting from the left, property value pairs are
  14. %      applied to the GUI before code_OpeningFcn gets called.  An
  15. %      unrecognized property name or invalid value makes property application
  16. %      stop.  All inputs are passed to code_OpeningFcn via varargin.
  17. %
  18. %      *See GUI Options on GUIDE's Tools menu.  Choose "GUI allows only one
  19. %      instance to run (singleton)".
  20. %
  21. % See also: GUIDE, GUIDATA, GUIHANDLES
  22. % Edit the above text to modify the response to help code
  23. % Last Modified by GUIDE v2.5 19-Sep-2009 16:15:56
  24. % Begin initialization code - DO NOT EDIT
  25. gui_Singleton = 1;
  26. gui_State = struct('gui_Name',       mfilename, ...
  27.                    'gui_Singleton',  gui_Singleton, ...
  28.                    'gui_OpeningFcn', @code_OpeningFcn, ...
  29.                    'gui_OutputFcn',  @code_OutputFcn, ...
  30.                    'gui_LayoutFcn',  [] , ...
  31.                    'gui_Callback',   []);
  32. if nargin && ischar(varargin{1})
  33.     gui_State.gui_Callback = str2func(varargin{1});
  34. end
  35. if nargout
  36.     [varargout{1:nargout}] = gui_mainfcn(gui_State, varargin{:});
  37. else
  38.     gui_mainfcn(gui_State, varargin{:});
  39. end
  40. % End initialization code - DO NOT EDIT
  41. % --- Executes just before code is made visible.
  42. function code_OpeningFcn(hObject, eventdata, handles, varargin)
  43. % This function has no output args, see OutputFcn.
  44. % hObject    handle to figure
  45. % eventdata  reserved - to be defined in a future version of MATLAB
  46. % handles    structure with handles and user data (see GUIDATA)
  47. % varargin   command line arguments to code (see VARARGIN)
  48. % Choose default command line output for code
  49. handles.output = hObject;
  50. % Update handles structure
  51. guidata(hObject, handles);
  52. % UIWAIT makes code wait for user response (see UIRESUME)
  53. % uiwait(handles.figure1);
  54. % --- Outputs from this function are returned to the command line.
  55. function varargout = code_OutputFcn(hObject, eventdata, handles) 
  56. % varargout  cell array for returning output args (see VARARGOUT);
  57. % hObject    handle to figure
  58. % eventdata  reserved - to be defined in a future version of MATLAB
  59. % handles    structure with handles and user data (see GUIDATA)
  60. % Get default command line output from handles structure
  61. varargout{1} = handles.output;
  62. function edit6_Callback(hObject, eventdata, handles)
  63. % hObject    handle to edit6 (see GCBO)
  64. % eventdata  reserved - to be defined in a future version of MATLAB
  65. % handles    structure with handles and user data (see GUIDATA)
  66. % Hints: get(hObject,'String') returns contents of edit6 as text
  67. %        str2double(get(hObject,'String')) returns contents of edit6 as a double
  68. % --- Executes during object creation, after setting all properties.
  69. function edit6_CreateFcn(hObject, eventdata, handles)
  70. % hObject    handle to edit6 (see GCBO)
  71. % eventdata  reserved - to be defined in a future version of MATLAB
  72. % handles    empty - handles not created until after all CreateFcns called
  73. % Hint: edit controls usually have a white background on Windows.
  74. %       See ISPC and COMPUTER.
  75. if ispc && isequal(get(hObject,'BackgroundColor'), get(0,'defaultUicontrolBackgroundColor'))
  76.     set(hObject,'BackgroundColor','white');
  77. end
  78. function edit7_Callback(hObject, eventdata, handles)
  79. % hObject    handle to edit7 (see GCBO)
  80. % eventdata  reserved - to be defined in a future version of MATLAB
  81. % handles    structure with handles and user data (see GUIDATA)
  82. % Hints: get(hObject,'String') returns contents of edit7 as text
  83. %        str2double(get(hObject,'String')) returns contents of edit7 as a double
  84. % --- Executes during object creation, after setting all properties.
  85. function edit7_CreateFcn(hObject, eventdata, handles)
  86. % hObject    handle to edit7 (see GCBO)
  87. % eventdata  reserved - to be defined in a future version of MATLAB
  88. % handles    empty - handles not created until after all CreateFcns called
  89. % Hint: edit controls usually have a white background on Windows.
  90. %       See ISPC and COMPUTER.
  91. if ispc && isequal(get(hObject,'BackgroundColor'), get(0,'defaultUicontrolBackgroundColor'))
  92.     set(hObject,'BackgroundColor','white');
  93. end
  94. function edit8_Callback(hObject, eventdata, handles)
  95. % hObject    handle to edit8 (see GCBO)
  96. % eventdata  reserved - to be defined in a future version of MATLAB
  97. % handles    structure with handles and user data (see GUIDATA)
  98. % Hints: get(hObject,'String') returns contents of edit8 as text
  99. %        str2double(get(hObject,'String')) returns contents of edit8 as a double
  100. % --- Executes during object creation, after setting all properties.
  101. function edit8_CreateFcn(hObject, eventdata, handles)
  102. % hObject    handle to edit8 (see GCBO)
  103. % eventdata  reserved - to be defined in a future version of MATLAB
  104. % handles    empty - handles not created until after all CreateFcns called
  105. % Hint: edit controls usually have a white background on Windows.
  106. %       See ISPC and COMPUTER.
  107. if ispc && isequal(get(hObject,'BackgroundColor'), get(0,'defaultUicontrolBackgroundColor'))
  108.     set(hObject,'BackgroundColor','white');
  109. end
  110. % --- Executes on button press in pushbutton3.
  111. function pushbutton3_Callback(hObject, eventdata, handles)
  112. % hObject    handle to pushbutton3 (see GCBO)
  113. % eventdata  reserved - to be defined in a future version of MATLAB
  114. % handles    structure with handles and user data (see GUIDATA)
  115. function edit1_Callback(hObject, eventdata, handles)
  116. % hObject    handle to edit1 (see GCBO)
  117. % eventdata  reserved - to be defined in a future version of MATLAB
  118. % handles    structure with handles and user data (see GUIDATA)
  119. % Hints: get(hObject,'String') returns contents of edit1 as text
  120. %        str2double(get(hObject,'String')) returns contents of edit1 as a double
  121. % --- Executes during object creation, after setting all properties.
  122. function edit1_CreateFcn(hObject, eventdata, handles)
  123. % hObject    handle to edit1 (see GCBO)
  124. % eventdata  reserved - to be defined in a future version of MATLAB
  125. % handles    empty - handles not created until after all CreateFcns called
  126. % Hint: edit controls usually have a white background on Windows.
  127. %       See ISPC and COMPUTER.
  128. if ispc && isequal(get(hObject,'BackgroundColor'), get(0,'defaultUicontrolBackgroundColor'))
  129.     set(hObject,'BackgroundColor','white');
  130. end
  131. function edit2_Callback(hObject, eventdata, handles)
  132. % hObject    handle to edit2 (see GCBO)
  133. % eventdata  reserved - to be defined in a future version of MATLAB
  134. % handles    structure with handles and user data (see GUIDATA)
  135. % Hints: get(hObject,'String') returns contents of edit2 as text
  136. %        str2double(get(hObject,'String')) returns contents of edit2 as a double
  137. % --- Executes during object creation, after setting all properties.
  138. function edit2_CreateFcn(hObject, eventdata, handles)
  139. % hObject    handle to edit2 (see GCBO)
  140. % eventdata  reserved - to be defined in a future version of MATLAB
  141. % handles    empty - handles not created until after all CreateFcns called
  142. % Hint: edit controls usually have a white background on Windows.
  143. %       See ISPC and COMPUTER.
  144. if ispc && isequal(get(hObject,'BackgroundColor'), get(0,'defaultUicontrolBackgroundColor'))
  145.     set(hObject,'BackgroundColor','white');
  146. end
  147. function edit4_Callback(hObject, eventdata, handles)
  148. % hObject    handle to edit4 (see GCBO)
  149. % eventdata  reserved - to be defined in a future version of MATLAB
  150. % handles    structure with handles and user data (see GUIDATA)
  151. % Hints: get(hObject,'String') returns contents of edit4 as text
  152. %        str2double(get(hObject,'String')) returns contents of edit4 as a double
  153. % --- Executes during object creation, after setting all properties.
  154. function edit4_CreateFcn(hObject, eventdata, handles)
  155. % hObject    handle to edit4 (see GCBO)
  156. % eventdata  reserved - to be defined in a future version of MATLAB
  157. % handles    empty - handles not created until after all CreateFcns called
  158. % Hint: edit controls usually have a white background on Windows.
  159. %       See ISPC and COMPUTER.
  160. if ispc && isequal(get(hObject,'BackgroundColor'), get(0,'defaultUicontrolBackgroundColor'))
  161.     set(hObject,'BackgroundColor','white');
  162. end
  163. % --- Executes on button press in pushbutton1.
  164. function pushbutton1_Callback(hObject, eventdata, handles)
  165. % hObject    handle to pushbutton1 (see GCBO)
  166. % eventdata  reserved - to be defined in a future version of MATLAB
  167. % handles    structure with handles and user data (see GUIDATA)
  168. global truemiwen;
  169. u=3.85;
  170. miyao=str2num(get(handles.edit2,'String'));
  171. mingwen=get(handles.edit3,'String');
  172. nativelabel=unicode2native(mingwen,'CP936');
  173. x=miyao;
  174. for i=1:size(nativelabel,2)
  175.     y=u*x*(1-x);
  176.     x=y;
  177.     temp1=num2str(y);    
  178.     if length(temp1)<5
  179.         tempzerp=zeros(5-length(temp1));
  180.         temp1=strcat(temp1,num2str(tempzerp));
  181.     end
  182.     temp2=str2num((temp1(3:5)));       
  183.     ww(i)=mod(temp2,256);
  184.     jiamihou(i)=bitxor(ww(i),nativelabel(i));
  185. % % % %     ww(i)=y;
  186. end
  187. truemiwen=jiamihou;
  188. miwen=native2unicode(jiamihou,'CP936');
  189. set(handles.edit4,'String',miwen);
  190. function edit9_Callback(hObject, eventdata, handles)
  191. % hObject    handle to edit9 (see GCBO)
  192. % eventdata  reserved - to be defined in a future version of MATLAB
  193. % handles    structure with handles and user data (see GUIDATA)
  194. % Hints: get(hObject,'String') returns contents of edit9 as text
  195. %        str2double(get(hObject,'String')) returns contents of edit9 as a double
  196. % --- Executes during object creation, after setting all properties.
  197. function edit9_CreateFcn(hObject, eventdata, handles)
  198. % hObject    handle to edit9 (see GCBO)
  199. % eventdata  reserved - to be defined in a future version of MATLAB
  200. % handles    empty - handles not created until after all CreateFcns called
  201. % Hint: edit controls usually have a white background on Windows.
  202. %       See ISPC and COMPUTER.
  203. if ispc && isequal(get(hObject,'BackgroundColor'), get(0,'defaultUicontrolBackgroundColor'))
  204.     set(hObject,'BackgroundColor','white');
  205. end
  206. function edit10_Callback(hObject, eventdata, handles)
  207. % hObject    handle to edit10 (see GCBO)
  208. % eventdata  reserved - to be defined in a future version of MATLAB
  209. % handles    structure with handles and user data (see GUIDATA)
  210. % Hints: get(hObject,'String') returns contents of edit10 as text
  211. %        str2double(get(hObject,'String')) returns contents of edit10 as a double
  212. % --- Executes during object creation, after setting all properties.
  213. function edit10_CreateFcn(hObject, eventdata, handles)
  214. % hObject    handle to edit10 (see GCBO)
  215. % eventdata  reserved - to be defined in a future version of MATLAB
  216. % handles    empty - handles not created until after all CreateFcns called
  217. % Hint: edit controls usually have a white background on Windows.
  218. %       See ISPC and COMPUTER.
  219. if ispc && isequal(get(hObject,'BackgroundColor'), get(0,'defaultUicontrolBackgroundColor'))
  220.     set(hObject,'BackgroundColor','white');
  221. end
  222. function edit11_Callback(hObject, eventdata, handles)
  223. % hObject    handle to edit11 (see GCBO)
  224. % eventdata  reserved - to be defined in a future version of MATLAB
  225. % handles    structure with handles and user data (see GUIDATA)
  226. % Hints: get(hObject,'String') returns contents of edit11 as text
  227. %        str2double(get(hObject,'String')) returns contents of edit11 as a double
  228. % --- Executes during object creation, after setting all properties.
  229. function edit11_CreateFcn(hObject, eventdata, handles)
  230. % hObject    handle to edit11 (see GCBO)
  231. % eventdata  reserved - to be defined in a future version of MATLAB
  232. % handles    empty - handles not created until after all CreateFcns called
  233. % Hint: edit controls usually have a white background on Windows.
  234. %       See ISPC and COMPUTER.
  235. if ispc && isequal(get(hObject,'BackgroundColor'), get(0,'defaultUicontrolBackgroundColor'))
  236.     set(hObject,'BackgroundColor','white');
  237. end
  238. function edit12_Callback(hObject, eventdata, handles)
  239. % hObject    handle to edit12 (see GCBO)
  240. % eventdata  reserved - to be defined in a future version of MATLAB
  241. % handles    structure with handles and user data (see GUIDATA)
  242. % Hints: get(hObject,'String') returns contents of edit12 as text
  243. %        str2double(get(hObject,'String')) returns contents of edit12 as a double
  244. % --- Executes during object creation, after setting all properties.
  245. function edit12_CreateFcn(hObject, eventdata, handles)
  246. % hObject    handle to edit12 (see GCBO)
  247. % eventdata  reserved - to be defined in a future version of MATLAB
  248. % handles    empty - handles not created until after all CreateFcns called
  249. % Hint: edit controls usually have a white background on Windows.
  250. %       See ISPC and COMPUTER.
  251. if ispc && isequal(get(hObject,'BackgroundColor'), get(0,'defaultUicontrolBackgroundColor'))
  252.     set(hObject,'BackgroundColor','white');
  253. end
  254. % --- Executes on button press in pushbutton4.
  255. function pushbutton4_Callback(hObject, eventdata, handles)
  256. % hObject    handle to pushbutton4 (see GCBO)
  257. % eventdata  reserved - to be defined in a future version of MATLAB
  258. % handles    structure with handles and user data (see GUIDATA)
  259. global truemiwen;
  260. u=3.85;
  261. miyao=str2num(get(handles.edit6,'String'));
  262. mingwen=get(handles.edit4,'String');
  263. set(handles.edit7,'String',mingwen);
  264. % % % % nativelabel=unicode2native(mingwen,'CP936');
  265. nativelabel=truemiwen;
  266. x=miyao;
  267. for i=1:size(nativelabel,2)
  268.     y=u*x*(1-x);
  269.     x=y;
  270.     temp1=num2str(y);    
  271.     if length(temp1)<5
  272.         tempzerp=zeros(5-length(temp1));
  273.         temp1=strcat(temp1,num2str(tempzerp));
  274.     end
  275.     temp2=str2num((temp1(3:5)));       
  276.     ww(i)=mod(temp2,256);
  277.     jiamihou(i)=bitxor(ww(i),nativelabel(i));
  278. % % % %     ww(i)=y;
  279. end
  280. miwen=native2unicode(jiamihou,'CP936');
  281. set(handles.edit8,'String',miwen);
  282. function edit13_Callback(hObject, eventdata, handles)
  283. % hObject    handle to edit13 (see GCBO)
  284. % eventdata  reserved - to be defined in a future version of MATLAB
  285. % handles    structure with handles and user data (see GUIDATA)
  286. % Hints: get(hObject,'String') returns contents of edit13 as text
  287. %        str2double(get(hObject,'String')) returns contents of edit13 as a double
  288. % --- Executes during object creation, after setting all properties.
  289. function edit13_CreateFcn(hObject, eventdata, handles)
  290. % hObject    handle to edit13 (see GCBO)
  291. % eventdata  reserved - to be defined in a future version of MATLAB
  292. % handles    empty - handles not created until after all CreateFcns called
  293. % Hint: edit controls usually have a white background on Windows.
  294. %       See ISPC and COMPUTER.
  295. if ispc && isequal(get(hObject,'BackgroundColor'), get(0,'defaultUicontrolBackgroundColor'))
  296.     set(hObject,'BackgroundColor','white');
  297. end
  298. function edit14_Callback(hObject, eventdata, handles)
  299. % hObject    handle to edit14 (see GCBO)
  300. % eventdata  reserved - to be defined in a future version of MATLAB
  301. % handles    structure with handles and user data (see GUIDATA)
  302. % Hints: get(hObject,'String') returns contents of edit14 as text
  303. %        str2double(get(hObject,'String')) returns contents of edit14 as a double
  304. % --- Executes during object creation, after setting all properties.
  305. function edit14_CreateFcn(hObject, eventdata, handles)
  306. % hObject    handle to edit14 (see GCBO)
  307. % eventdata  reserved - to be defined in a future version of MATLAB
  308. % handles    empty - handles not created until after all CreateFcns called
  309. % Hint: edit controls usually have a white background on Windows.
  310. %       See ISPC and COMPUTER.
  311. if ispc && isequal(get(hObject,'BackgroundColor'), get(0,'defaultUicontrolBackgroundColor'))
  312.     set(hObject,'BackgroundColor','white');
  313. end
  314. function edit15_Callback(hObject, eventdata, handles)
  315. % hObject    handle to edit4 (see GCBO)
  316. % eventdata  reserved - to be defined in a future version of MATLAB
  317. % handles    structure with handles and user data (see GUIDATA)
  318. % Hints: get(hObject,'String') returns contents of edit4 as text
  319. %        str2double(get(hObject,'String')) returns contents of edit4 as a double
  320. % --- Executes during object creation, after setting all properties.
  321. function edit15_CreateFcn(hObject, eventdata, handles)
  322. % hObject    handle to edit4 (see GCBO)
  323. % eventdata  reserved - to be defined in a future version of MATLAB
  324. % handles    empty - handles not created until after all CreateFcns called
  325. % Hint: edit controls usually have a white background on Windows.
  326. %       See ISPC and COMPUTER.
  327. if ispc && isequal(get(hObject,'BackgroundColor'), get(0,'defaultUicontrolBackgroundColor'))
  328.     set(hObject,'BackgroundColor','white');
  329. end
  330. function edit16_Callback(hObject, eventdata, handles)
  331. % hObject    handle to edit16 (see GCBO)
  332. % eventdata  reserved - to be defined in a future version of MATLAB
  333. % handles    structure with handles and user data (see GUIDATA)
  334. % Hints: get(hObject,'String') returns contents of edit16 as text
  335. %        str2double(get(hObject,'String')) returns contents of edit16 as a double
  336. % --- Executes during object creation, after setting all properties.
  337. function edit16_CreateFcn(hObject, eventdata, handles)
  338. % hObject    handle to edit16 (see GCBO)
  339. % eventdata  reserved - to be defined in a future version of MATLAB
  340. % handles    empty - handles not created until after all CreateFcns called
  341. % Hint: edit controls usually have a white background on Windows.
  342. %       See ISPC and COMPUTER.
  343. if ispc && isequal(get(hObject,'BackgroundColor'), get(0,'defaultUicontrolBackgroundColor'))
  344.     set(hObject,'BackgroundColor','white');
  345. end
  346. % --- Executes on button press in pushbutton1.
  347. function pushbutton5_Callback(hObject, eventdata, handles)
  348. % hObject    handle to pushbutton1 (see GCBO)
  349. % eventdata  reserved - to be defined in a future version of MATLAB
  350. % handles    structure with handles and user data (see GUIDATA)
  351. function edit17_Callback(hObject, eventdata, handles)
  352. % hObject    handle to edit2 (see GCBO)
  353. % eventdata  reserved - to be defined in a future version of MATLAB
  354. % handles    structure with handles and user data (see GUIDATA)
  355. % Hints: get(hObject,'String') returns contents of edit2 as text
  356. %        str2double(get(hObject,'String')) returns contents of edit2 as a double
  357. % --- Executes during object creation, after setting all properties.
  358. function edit17_CreateFcn(hObject, eventdata, handles)
  359. % hObject    handle to edit2 (see GCBO)
  360. % eventdata  reserved - to be defined in a future version of MATLAB
  361. % handles    empty - handles not created until after all CreateFcns called
  362. % Hint: edit controls usually have a white background on Windows.
  363. %       See ISPC and COMPUTER.
  364. if ispc && isequal(get(hObject,'BackgroundColor'), get(0,'defaultUicontrolBackgroundColor'))
  365.     set(hObject,'BackgroundColor','white');
  366. end
  367. function edit18_Callback(hObject, eventdata, handles)
  368. % hObject    handle to edit18 (see GCBO)
  369. % eventdata  reserved - to be defined in a future version of MATLAB
  370. % handles    structure with handles and user data (see GUIDATA)
  371. % Hints: get(hObject,'String') returns contents of edit18 as text
  372. %        str2double(get(hObject,'String')) returns contents of edit18 as a double
  373. % --- Executes during object creation, after setting all properties.
  374. function edit18_CreateFcn(hObject, eventdata, handles)
  375. % hObject    handle to edit18 (see GCBO)
  376. % eventdata  reserved - to be defined in a future version of MATLAB
  377. % handles    empty - handles not created until after all CreateFcns called
  378. % Hint: edit controls usually have a white background on Windows.
  379. %       See ISPC and COMPUTER.
  380. if ispc && isequal(get(hObject,'BackgroundColor'), get(0,'defaultUicontrolBackgroundColor'))
  381.     set(hObject,'BackgroundColor','white');
  382. end
  383. function edit3_Callback(hObject, eventdata, handles)
  384. % hObject    handle to edit3 (see GCBO)
  385. % eventdata  reserved - to be defined in a future version of MATLAB
  386. % handles    structure with handles and user data (see GUIDATA)
  387. % Hints: get(hObject,'String') returns contents of edit3 as text
  388. %        str2double(get(hObject,'String')) returns contents of edit3 as a double
  389. % --- Executes during object creation, after setting all properties.
  390. function edit3_CreateFcn(hObject, eventdata, handles)
  391. % hObject    handle to edit3 (see GCBO)
  392. % eventdata  reserved - to be defined in a future version of MATLAB
  393. % handles    empty - handles not created until after all CreateFcns called
  394. % Hint: edit controls usually have a white background on Windows.
  395. %       See ISPC and COMPUTER.
  396. if ispc && isequal(get(hObject,'BackgroundColor'), get(0,'defaultUicontrolBackgroundColor'))
  397.     set(hObject,'BackgroundColor','white');
  398. end
  399. function edit5_Callback(hObject, eventdata, handles)
  400. % hObject    handle to edit5 (see GCBO)
  401. % eventdata  reserved - to be defined in a future version of MATLAB
  402. % handles    structure with handles and user data (see GUIDATA)
  403. % Hints: get(hObject,'String') returns contents of edit5 as text
  404. %        str2double(get(hObject,'String')) returns contents of edit5 as a double
  405. % --- Executes during object creation, after setting all properties.
  406. function edit5_CreateFcn(hObject, eventdata, handles)
  407. % hObject    handle to edit5 (see GCBO)
  408. % eventdata  reserved - to be defined in a future version of MATLAB
  409. % handles    empty - handles not created until after all CreateFcns called
  410. % Hint: edit controls usually have a white background on Windows.
  411. %       See ISPC and COMPUTER.
  412. if ispc && isequal(get(hObject,'BackgroundColor'), get(0,'defaultUicontrolBackgroundColor'))
  413.     set(hObject,'BackgroundColor','white');
  414. end