Warning: Unsuccessful read: The specified amount of data was not returned within the Timeout period.

Actually my project is Encryption of message at the sender site and Decryption at the receiver side. There is no problem at the sender side, but at the receiver side it is creating issues. The normal code for encryption and decryption is perfect, but the problem arises with the tcpip at the receiver. The decryption of the message at the sender side is not same when using the tcpip, but without using the tcpip the decryption is perfect. The message encrypted appears perfectly at the receiver side but problem arises afterwards as the decryption is not perfect and throwing error as unsuccessful read.

at sender:

t=tcpip('0.0.0.0',30000,'NetworkRole','Server');
t.OutputBufferSize=5000;
fopen(t);
fprintf(t,'%s\n',out3);
fwrite(t,h);
fwrite(t,st);

at receiver:

t=tcpip('LocalHost',30000,'NetworkRole','Client','TimeOut',3);
t.InputBufferSize=5000;
fopen(t);
nam=fscanf(t)
b1=fread(t);

please help me with this.

Answer 1

[Walter Roberson]

https://www.mathworks.com/help/instrument/fread.html

Rules for Completing a Binary Read Operation

A read operation with fread blocks access to the MATLAB Command Window until

• The specified number of values is read. For UDP objects, DatagramTerminateMode must be off.
• The time specified by the Timeout property passes.
• A datagram is received (for UDP objects only when DatagramTerminateMode is on).
• The input buffer is filled.
• The EOI line is asserted (GPIB and VXI instruments only).
• The EOSCharCode is received (GPIB and VXI instruments only).

The "specified number of values" by default is the number that fill the input buffer.

You are not using UDP so datagram does not matter.

You are not using GPIB or VXI so EOl and EOSCharCode are not relevant.

So what is left is Timeout (what you are getting), or the input buffer being filled.

You have set the input buffer size to 5000.

What we are not given enough information to know is whether your output value h happens to be 5000 bytes. If it is less, then because you only write h (after the text line), the reader would sit waiting until timeout.

There are basically five ways of using TCP:

1. don't send binary data (represent numbers by text) and send line terminators; or
2. encode variable length binary data in forms that is guaranteed not to have whatever terminator you choose, and send that and the terminator to end the packet; or
3. never send variable-length binary data: use a protocol that uses a fixed length of binary data at every point, and reads only that much data. Terminator should be off for this purpose; or
4. only send variable length binary data as the last part of the conversation, and close down the socket to signal to the other end that there is no more data to be received. Terminator should be off for this purpose; or
5. do not send binary data whose length is not known to the receiver. Instead, use a protocol that transmits the size first (possibly in binary) followed by the variable length data. The receiver reads the fixed length size, and uses that to adjust the information about how much binary data to read. Terminator should be off for this purpose.

[Siddarth Aryan V]

sir, but I receiving the correct values at the receiver but the problem is with fscanf() I think so.

if you want you can run the code and say me where I need to make corretions:

sender code:

clc;
clear all;
close all;
inputs_x=7; %------------------------no. of bits of data
output_x=7;
statx=2; %-------------------no. of states
% ------------------------ no of bits for states
for tem=1:1000
if 2^tem >=statx
states=tem;
break
end
end
hls=24; % size of the hidden layer
% -------------------------- weight initialization
w1=rand(hls,(inputs_x+states+1));
w2=rand((output_x+states),hls+1);
neta=1;
a=1;
sx=0;
p=[];
training_setx=[];
training_setx=[0 0 0 0 0 0 0 0;0 0 0 0 0 0 1 0;0 0 0 0 0 1 0 0;0 0 0 0 0 1 1 0;0 0 0 0 1 0 0 0;0 0 0 0 1 0 1 0;0 0 0 0 1 1 0 0;0 0 0 0 1 1 1 0;0 0 0 1 0 0 0 0;0 0 0 1 0 0 1 0;0 0 0 1 0 1 0 0;0 0 0 1 0 1 1 0;0 0 0 1 1 0 0 0;0 0 0 1 1 0 1 0;0 0 0 1 1 1 0 0;0 0 0 1 1 1 1 0;0 0 1 0 0 0 0 0;0 0 1 0 0 0 1 0;0 0 1 0 0 1 0 0;0 0 1 0 0 1 1 0;0 0 1 0 1 0 0 0;0 0 1 0 1 0 1 0;0 0 1 0 1 1 0 0;0 0 1 0 1 1 1 0;0 0 1 1 0 0 0 0;0 0 1 1 0 0 1 0;0 0 1 1 0 1 0 0;0 0 1 1 0 1 1 0;0 0 1 1 1 0 0 0;0 0 1 1 1 0 1 0;0 0 1 1 1 1 0 0;0 0 1 1 1 1 1 0;0 1 0 0 0 0 0 0;0 1 0 0 0 0 1 0;0 1 0 0 0 1 0 0;0 1 0 0 0 1 1 0;0 1 0 0 1 0 0 0;0 1 0 0 1 0 1 0;0 1 0 0 1 1 0 0;0 1 0 0 1 1 1 0;0 1 0 1 0 0 0 0;0 1 0 1 0 0 1 0;0 1 0 1 0 1 0 0;0 1 0 1 0 1 1 0;0 1 0 1 1 0 0 0;0 1 0 1 1 0 1 0;0 1 0 1 1 1 0 0;0 1 0 1 1 1 1 0;0 1 1 0 0 0 0 0;0 1 1 0 0 0 1 0;0 1 1 0 0 1 0 0;0 1 1 0 0 1 1 0;0 1 1 0 1 0 0 0;0 1 1 0 1 0 1 0;0 1 1 0 1 1 0 0;0 1 1 0 1 1 1 0;0 1 1 1 0 0 0 0;0 1 1 1 0 0 1 0;0 1 1 1 0 1 0 0;0 1 1 1 0 1 1 0;0 1 1 1 1 0 0 0;0 1 1 1 1 0 1 0;0 1 1 1 1 1 0 0;0 1 1 1 1 1 1 0; 1 0 0 0 0 0 0 0;1 0 0 0 0 0 1 0;1 0 0 0 0 1 0 0;1 0 0 0 0 1 1 0;1 0 0 0 1 0 0 0;1 0 0 0 1 0 1 0;1 0 0 0 1 1 0 0;1 0 0 0 1 1 1 0;1 0 0 1 0 0 0 0;1 0 0 1 0 0 1 0;1 0 0 1 0 1 0 0;1 0 0 1 0 1 1 0;1 0 0 1 1 0 0 0;1 0 0 1 1 0 1 0;1 0 0 1 1 1 0 0;1 0 0 1 1 1 1 0;1 0 1 0 0 0 0 0;1 0 1 0 0 0 1 0;1 0 1 0 0 1 0 0;1 0 1 0 0 1 1 0;1 0 1 0 1 0 0 0;1 0 1 0 1 0 1 0;1 0 1 0 1 1 0 0;1 0 1 0 1 1 1 0;1 0 1 1 0 0 0 0;1 0 1 1 0 0 1 0;1 0 1 1 0 1 0 0;1 0 1 1 0 1 1 0;1 0 1 1 1 0 0 0;1 0 1 1 1 0 1 0;1 0 1 1 1 1 0 0;1 0 1 1 1 1 1 0;1 1 0 0 0 0 0 0;1 1 0 0 0 0 1 0;1 1 0 0 0 1 0 0;1 1 0 0 0 1 1 0;1 1 0 0 1 0 0 0;1 1 0 0 1 0 1 0;1 1 0 0 1 1 0 0;1 1 0 0 1 1 1 0;1 1 0 1 0 0 0 0;1 1 0 1 0 0 1 0;1 1 0 1 0 1 0 0;1 1 0 1 0 1 1 0;1 1 0 1 1 0 0 0;1 1 0 1 1 0 1 0;1 1 0 1 1 1 0 0;1 1 0 1 1 1 1 0;1 1 1 0 0 0 0 0;1 1 1 0 0 0 1 0;1 1 1 0 0 1 0 0;1 1 1 0 0 1 1 0;1 1 1 0 1 0 0 0;1 1 1 0 1 0 1 0;1 1 1 0 1 1 0 0;1 1 1 0 1 1 1 0;1 1 1 1 0 0 0 0;1 1 1 1 0 0 1 0;1 1 1 1 0 1 0 0;1 1 1 1 0 1 1 0;1 1 1 1 1 0 0 0;1 1 1 1 1 0 1 0;1 1 1 1 1 1 0 0;1 1 1 1 1 1 1 0;0 0 0 0 0 0 0 1;0 0 0 0 0 0 1 1;0 0 0 0 0 1 0 1;0 0 0 0 0 1 1 1;0 0 0 0 1 0 0 1;0 0 0 0 1 0 1 1;0 0 0 0 1 1 0 1;0 0 0 0 1 1 1 1;0 0 0 1 0 0 0 1;0 0 0 1 0 0 1 1;0 0 0 1 0 1 0 1;0 0 0 1 0 1 1 1;0 0 0 1 1 0 0 1;0 0 0 1 1 0 1 1;0 0 0 1 1 1 0 1;0 0 0 1 1 1 1 1;0 0 1 0 0 0 0 1;0 0 1 0 0 0 1 1;0 0 1 0 0 1 0 1;0 0 1 0 0 1 1 1;0 0 1 0 1 0 0 1;0 0 1 0 1 0 1 1;0 0 1 0 1 1 0 1;0 0 1 0 1 1 1 1;0 0 1 1 0 0 0 1;0 0 1 1 0 0 1 1;0 0 1 1 0 1 0 1;0 0 1 1 0 1 1 1;0 0 1 1 1 0 0 1;0 0 1 1 1 0 1 1;0 0 1 1 1 1 0 1;0 0 1 1 1 1 1 1;0 1 0 0 0 0 0 1;0 1 0 0 0 0 1 1;0 1 0 0 0 1 0 1;0 1 0 0 0 1 1 1;0 1 0 0 1 0 0 1;0 1 0 0 1 0 1 1;0 1 0 0 1 1 0 1;0 1 0 0 1 1 1 1;0 1 0 1 0 0 0 1;0 1 0 1 0 0 1 1;0 1 0 1 0 1 0 1;0 1 0 1 0 1 1 1;0 1 0 1 1 0 0 1;0 1 0 1 1 0 1 1;0 1 0 1 1 1 0 1;0 1 0 1 1 1 1 1;0 1 1 0 0 0 0 1;0 1 1 0 0 0 1 1;0 1 1 0 0 1 0 1;0 1 1 0 0 1 1 1;0 1 1 0 1 0 0 1;0 1 1 0 1 0 1 1;0 1 1 0 1 1 0 1;0 1 1 0 1 1 1 1;0 1 1 1 0 0 0 1;0 1 1 1 0 0 1 1;0 1 1 1 0 1 0 1;0 1 1 1 0 1 1 1;0 1 1 1 1 0 0 1;0 1 1 1 1 0 1 1;0 1 1 1 1 1 0 1;0 1 1 1 1 1 1 1; 1 0 0 0 0 0 0 1;1 0 0 0 0 0 1 1;1 0 0 0 0 1 0 1;1 0 0 0 0 1 1 1;1 0 0 0 1 0 0 1;1 0 0 0 1 0 1 1;1 0 0 0 1 1 0 1;1 0 0 0 1 1 1 1;1 0 0 1 0 0 0 1;1 0 0 1 0 0 1 1;1 0 0 1 0 1 0 1;1 0 0 1 0 1 1 1;1 0 0 1 1 0 0 1;1 0 0 1 1 0 1 1;1 0 0 1 1 1 0 1;1 0 0 1 1 1 1 1;1 0 1 0 0 0 0 1;1 0 1 0 0 0 1 1;1 0 1 0 0 1 0 1;1 0 1 0 0 1 1 1;1 0 1 0 1 0 0 1;1 0 1 0 1 0 1 1;1 0 1 0 1 1 0 1;1 0 1 0 1 1 1 1;1 0 1 1 0 0 0 1;1 0 1 1 0 0 1 1;1 0 1 1 0 1 0 1;1 0 1 1 0 1 1 1;1 0 1 1 1 0 0 1;1 0 1 1 1 0 1 1;1 0 1 1 1 1 0 1;1 0 1 1 1 1 1 1;1 1 0 0 0 0 0 1;1 1 0 0 0 0 1 1;1 1 0 0 0 1 0 1;1 1 0 0 0 1 1 1;1 1 0 0 1 0 0 1;1 1 0 0 1 0 1 1;1 1 0 0 1 1 0 1;1 1 0 0 1 1 1 1;1 1 0 1 0 0 0 1;1 1 0 1 0 0 1 1;1 1 0 1 0 1 0 1;1 1 0 1 0 1 1 1;1 1 0 1 1 0 0 1;1 1 0 1 1 0 1 1;1 1 0 1 1 1 0 1;1 1 0 1 1 1 1 1;1 1 1 0 0 0 0 1;1 1 1 0 0 0 1 1;1 1 1 0 0 1 0 1;1 1 1 0 0 1 1 1;1 1 1 0 1 0 0 1;1 1 1 0 1 0 1 1;1 1 1 0 1 1 0 1;1 1 1 0 1 1 1 1;1 1 1 1 0 0 0 1;1 1 1 1 0 0 1 1;1 1 1 1 0 1 0 1;1 1 1 1 0 1 1 1;1 1 1 1 1 0 0 1;1 1 1 1 1 0 1 1;1 1 1 1 1 1 0 1;1 1 1 1 1 1 1 1];
training_outx=[0 0 0 0 0 0 1 1;0 0 0 0 0 1 0 1;0 0 0 0 0 1 1 1;0 0 0 0 1 0 0 1;0 0 0 0 1 0 1 1;0 0 0 0 1 1 0 1;0 0 0 0 1 1 1 1;0 0 0 1 0 0 0 1;0 0 0 1 0 0 1 1;0 0 0 1 0 1 0 1;0 0 0 1 0 1 1 1;0 0 0 1 1 0 0 1;0 0 0 1 1 0 1 1;0 0 0 1 1 1 0 1;0 0 0 1 1 1 1 1;0 0 1 0 0 0 0 1;0 0 1 0 0 0 1 1;0 0 1 0 0 1 0 1;0 0 1 0 0 1 1 1;0 0 1 0 1 0 0 1;0 0 1 0 1 0 1 1;0 0 1 0 1 1 0 1;0 0 1 0 1 1 1 1;0 0 1 1 0 0 0 1;0 0 1 1 0 0 1 1;0 0 1 1 0 1 0 1;0 0 1 1 0 1 1 1;0 0 1 1 1 0 0 1;0 0 1 1 1 0 1 1;0 0 1 1 1 1 0 1;0 0 1 1 1 1 1 1;0 1 0 0 0 0 0 1;0 1 0 0 0 0 1 1;0 1 0 0 0 1 0 1;0 1 0 0 0 1 1 1;0 1 0 0 1 0 0 1;0 1 0 0 1 0 1 1;0 1 0 0 1 1 0 1;0 1 0 0 1 1 1 1;0 1 0 1 0 0 0 1;0 1 0 1 0 0 1 1;0 1 0 1 0 1 0 1;0 1 0 1 0 1 1 1;0 1 0 1 1 0 0 1;0 1 0 1 1 0 1 1;0 1 0 1 1 1 0 1;0 1 0 1 1 1 1 1;0 1 1 0 0 0 0 1;0 1 1 0 0 0 1 1;0 1 1 0 0 1 0 1;0 1 1 0 0 1 1 1;0 1 1 0 1 0 0 1;0 1 1 0 1 0 1 1;0 1 1 0 1 1 0 1;0 1 1 0 1 1 1 1;0 1 1 1 0 0 0 1;0 1 1 1 0 0 1 1;0 1 1 1 0 1 0 1;0 1 1 1 0 1 1 1;0 1 1 1 1 0 0 1;0 1 1 1 1 0 1 1;0 1 1 1 1 1 0 1;0 1 1 1 1 1 1 1; 1 0 0 0 0 0 0 1;1 0 0 0 0 0 1 1;1 0 0 0 0 1 0 1;1 0 0 0 0 1 1 1;1 0 0 0 1 0 0 1;1 0 0 0 1 0 1 1;1 0 0 0 1 1 0 1;1 0 0 0 1 1 1 1;1 0 0 1 0 0 0 1;1 0 0 1 0 0 1 1;1 0 0 1 0 1 0 1;1 0 0 1 0 1 1 1;1 0 0 1 1 0 0 1;1 0 0 1 1 0 1 1;1 0 0 1 1 1 0 1;1 0 0 1 1 1 1 1;1 0 1 0 0 0 0 1;1 0 1 0 0 0 1 1;1 0 1 0 0 1 0 1;1 0 1 0 0 1 1 1;1 0 1 0 1 0 0 1;1 0 1 0 1 0 1 1;1 0 1 0 1 1 0 1;1 0 1 0 1 1 1 1;1 0 1 1 0 0 0 1;1 0 1 1 0 0 1 1;1 0 1 1 0 1 0 1;1 0 1 1 0 1 1 1;1 0 1 1 1 0 0 1;1 0 1 1 1 0 1 1;1 0 1 1 1 1 0 1;1 0 1 1 1 1 1 1;1 1 0 0 0 0 0 1;1 1 0 0 0 0 1 1;1 1 0 0 0 1 0 1;1 1 0 0 0 1 1 1;1 1 0 0 1 0 0 1;1 1 0 0 1 0 1 1;1 1 0 0 1 1 0 1;1 1 0 0 1 1 1 1;1 1 0 1 0 0 0 1;1 1 0 1 0 0 1 1;1 1 0 1 0 1 0 1;1 1 0 1 0 1 1 1;1 1 0 1 1 0 0 1;1 1 0 1 1 0 1 1;1 1 0 1 1 1 0 1;1 1 0 1 1 1 1 1;1 1 1 0 0 0 0 1;1 1 1 0 0 0 1 1;1 1 1 0 0 1 0 1;1 1 1 0 0 1 1 1;1 1 1 0 1 0 0 1;1 1 1 0 1 0 1 1;1 1 1 0 1 1 0 1;1 1 1 0 1 1 1 1;1 1 1 1 0 0 0 1;1 1 1 1 0 0 1 1;1 1 1 1 0 1 0 1;1 1 1 1 0 1 1 1;1 1 1 1 1 0 0 1;1 1 1 1 1 0 1 1;1 1 1 1 1 1 0 1;1 1 1 1 1 1 1 1;0 0 0 0 0 0 0 1;0 0 0 0 0 1 0 0;0 0 0 0 0 1 1 0;0 0 0 0 1 0 0 0;0 0 0 0 1 0 1 0;0 0 0 0 1 1 0 0;0 0 0 0 1 1 1 0;0 0 0 1 0 0 0 0;0 0 0 1 0 0 1 0;0 0 0 1 0 1 0 0;0 0 0 1 0 1 1 0;0 0 0 1 1 0 0 0;0 0 0 1 1 0 1 0;0 0 0 1 1 1 0 0;0 0 0 1 1 1 1 0;0 0 1 0 0 0 0 0;0 0 1 0 0 0 1 0;0 0 1 0 0 1 0 0;0 0 1 0 0 1 1 0;0 0 1 0 1 0 0 0;0 0 1 0 1 0 1 0;0 0 1 0 1 1 0 0;0 0 1 0 1 1 1 0;0 0 1 1 0 0 0 0;0 0 1 1 0 0 1 0;0 0 1 1 0 1 0 0;0 0 1 1 0 1 1 0;0 0 1 1 1 0 0 0;0 0 1 1 1 0 1 0;0 0 1 1 1 1 0 0;0 0 1 1 1 1 1 0;0 1 0 0 0 0 0 0;0 1 0 0 0 0 1 0;0 1 0 0 0 1 0 0;0 1 0 0 0 1 1 0;0 1 0 0 1 0 0 0;0 1 0 0 1 0 1 0;0 1 0 0 1 1 0 0;0 1 0 0 1 1 1 0;0 1 0 1 0 0 0 0;0 1 0 1 0 0 1 0;0 1 0 1 0 1 0 0;0 1 0 1 0 1 1 0;0 1 0 1 1 0 0 0;0 1 0 1 1 0 1 0;0 1 0 1 1 1 0 0;0 1 0 1 1 1 1 0;0 1 1 0 0 0 0 0;0 1 1 0 0 0 1 0;0 1 1 0 0 1 0 0;0 1 1 0 0 1 1 0;0 1 1 0 1 0 0 0;0 1 1 0 1 0 1 0;0 1 1 0 1 1 0 0;0 1 1 0 1 1 1 0;0 1 1 1 0 0 0 0;0 1 1 1 0 0 1 0;0 1 1 1 0 1 0 0;0 1 1 1 0 1 1 0;0 1 1 1 1 0 0 0;0 1 1 1 1 0 1 0;0 1 1 1 1 1 0 0;0 1 1 1 1 1 1 0; 1 0 0 0 0 0 0 0;1 0 0 0 0 0 1 0;1 0 0 0 0 1 0 0;1 0 0 0 0 1 1 0;1 0 0 0 1 0 0 0;1 0 0 0 1 0 1 0;1 0 0 0 1 1 0 0;1 0 0 0 1 1 1 0;1 0 0 1 0 0 0 0;1 0 0 1 0 0 1 0;1 0 0 1 0 1 0 0;1 0 0 1 0 1 1 0;1 0 0 1 1 0 0 0;1 0 0 1 1 0 1 0;1 0 0 1 1 1 0 0;1 0 0 1 1 1 1 0;1 0 1 0 0 0 0 0;1 0 1 0 0 0 1 0;1 0 1 0 0 1 0 0;1 0 1 0 0 1 1 0;1 0 1 0 1 0 0 0;1 0 1 0 1 0 1 0;1 0 1 0 1 1 0 0;1 0 1 0 1 1 1 0;1 0 1 1 0 0 0 0;1 0 1 1 0 0 1 0;1 0 1 1 0 1 0 0;1 0 1 1 0 1 1 0;1 0 1 1 1 0 0 0;1 0 1 1 1 0 1 0;1 0 1 1 1 1 0 0;1 0 1 1 1 1 1 0;1 1 0 0 0 0 0 0;1 1 0 0 0 0 1 0;1 1 0 0 0 1 0 0;1 1 0 0 0 1 1 0;1 1 0 0 1 0 0 0;1 1 0 0 1 0 1 0;1 1 0 0 1 1 0 0;1 1 0 0 1 1 1 0;1 1 0 1 0 0 0 0;1 1 0 1 0 0 1 0;1 1 0 1 0 1 0 0;1 1 0 1 0 1 1 0;1 1 0 1 1 0 0 0;1 1 0 1 1 0 1 0;1 1 0 1 1 1 0 0;1 1 0 1 1 1 1 0;1 1 1 0 0 0 0 0;1 1 1 0 0 0 1 0;1 1 1 0 0 1 0 0;1 1 1 0 0 1 1 0;1 1 1 0 1 0 0 0;1 1 1 0 1 0 1 0;1 1 1 0 1 1 0 0;1 1 1 0 1 1 1 0;1 1 1 1 0 0 0 0;1 1 1 1 0 0 1 0;1 1 1 1 0 1 0 0;1 1 1 1 0 1 1 0;1 1 1 1 1 0 0 0;1 1 1 1 1 0 1 0;1 1 1 1 1 1 0 0;1 1 1 1 1 1 1 0;0 0 0 0 0 0 0 0;0 0 0 0 0 0 1 0];
for x=1:100000
training_set=training_setx(a,:);
training_out=training_outx(a,:);
% --------------------------- output hidden layer
inputu=[1 training_set];
sum_h=(w1*(inputu)')';
o_h=1./(1+exp(-sum_h));
% --------------------------- output layer
input_h=[1 o_h];
sum_out=(w2*(input_h)')';
out=1./(1+exp(-sum_out));
% ---------------------------- delta
delta_out=neta*(out.*(1-out)).*(training_out - out);
delta_h=(delta_out*w2).*input_h.*(1-input_h);
% update of weight --------------------------
% output layer --------------------------------
for t=1:(output_x+states)
w2(t,:) = w2(t,:) + neta*delta_out(t)*input_h;
end
% hidden layer ----------------------------------
for t=1:hls
w1(t,:) = w1(t,:) + neta*delta_h(t+1)*inputu;
end
for t=1:(output_x+states)
if out(t)>=0.7
out1(t)=1;
elseif out(t)<=0.2
out1(t)=0;
else out1(t)=out(t);
end
end
p=[p sum(out-training_out)];
if out1==training_out
a=a+1;
sx=sx+1;
end
if a>((2^inputs_x)*statx)
a=a-((2^inputs_x)*statx);
end
end
plot(p.*p);
% testing the program
z=input('enter the number of rounds:');
h=z;
j=0;
ipo=input('enter the word:','s');
statx=input('starting state:');
st=statx;
while(j<z)
%while(j<i)
finp=[];
for i=1:length(ipo)
b=ipo(i);
switch b
case('C')
set=[0 0 0 0 0 0 0];
case('f')
set=[0 0 0 0 0 0 1];
case('4')
set=[0 0 0 0 0 1 0];
case('@')
set=[0 0 0 0 0 1 1];
case(' ')
set=[0 0 0 0 1 0 0];
case('A')
set=[0 0 0 0 1 0 1];
case('h')
set=[0 0 0 0 1 1 0];
case('6')
set=[0 0 0 0 1 1 1];
case('#')
set=[0 0 0 1 0 0 0];
case('B')
set=[0 0 0 1 0 0 1];
case('b')
set=[0 0 0 1 0 1 0];
case('3')
set=[0 0 0 1 0 1 1];
case('(')
set=[0 0 0 1 1 0 0];
case('M')
set=[0 0 0 1 1 0 1];
case('n')
set=[0 0 0 1 1 1 0];
case('9')
set=[0 0 0 1 1 1 1];
case('D')
set=[0 0 1 0 0 0 0];
case('j')
set=[0 0 1 0 0 0 1];
case('p')
set=[0 0 1 0 0 1 0];
case('8')
set=[0 0 1 0 0 1 1];
case('$')
set=[0 0 1 0 1 0 0];
case('P')
set=[0 0 1 0 1 0 1];
case('r')
set=[0 0 1 0 1 1 0];
case('+')
set=[0 0 1 0 1 1 1];
case('7')
set=[0 0 1 1 0 0 0];
case('E')
set=[0 0 1 1 0 0 1];
case('d')
set=[0 0 1 1 0 1 0];
case('0')
set=[0 0 1 1 0 1 1];
case('!')
set=[0 0 1 1 1 0 0];
case('Z')
set=[0 0 1 1 1 0 1];
case('s')
set=[0 0 1 1 1 1 0];
case('<')
set=[0 0 1 1 1 1 1];
case('F')
set=[0 1 0 0 0 0 0];
case('a')
set=[0 1 0 0 0 0 1];
case('5')
set=[0 1 0 0 0 1 0];
case('%')
set=[0 1 0 0 0 1 1];
case('G')
set=[0 1 0 0 1 0 0];
case('c')
set=[0 1 0 0 1 0 1];
case('1')
set=[0 1 0 0 1 1 0];
case('=')
set=[0 1 0 0 1 1 1];
case('I')
set=[0 1 0 1 0 0 0];
case('g')
set=[0 1 0 1 0 0 1];
case('2')
set=[0 1 0 1 0 1 0];
case('|')
set=[0 1 0 1 0 1 1];
case('H')
set=[0 1 0 1 1 0 0];
case('t')
set=[0 1 0 1 1 0 1];
case('\')
set=[0 1 0 1 1 1 0];
case('N')
set=[0 1 0 1 1 1 1];
case('k')
set=[0 1 1 0 0 0 0];
case('{')
set=[0 1 1 0 0 0 1];
case('K')
set=[0 1 1 0 0 1 0];
case('u')
set=[0 1 1 0 0 1 1];
case('}')
set=[0 1 1 0 1 0 0];
case('e')
set=[0 1 1 0 1 0 1];
case('J')
set=[0 1 1 0 1 1 0];
case('[')
set=[0 1 1 0 1 1 1];
case('L')
set=[0 1 1 1 0 0 0];
case('v')
set=[0 1 1 1 0 0 1];
case(']')
set=[0 1 1 1 0 1 0];
case('O')
set=[0 1 1 1 0 1 1];
case('q')
set=[0 1 1 1 1 0 0];
case('?')
set=[0 1 1 1 1 0 1];
case('S')
set=[0 1 1 1 1 1 0];
case('z')
set=[0 1 1 1 1 1 1];
case(':')
set=[1 0 0 0 0 0 0];
case('Q')
set=[1 0 0 0 0 0 1];
case('i')
set=[1 0 0 0 0 1 0];
case(';')
set=[1 0 0 0 0 1 1];
case('R')
set=[1 0 0 0 1 0 0];
case('l')
set=[1 0 0 0 1 0 1];
case('m')
set=[1 0 0 0 1 1 0];
case('T')
set=[1 0 0 0 1 1 1];
case('y')
set=[1 0 0 1 0 0 0];
case('/')
set=[1 0 0 1 0 0 1];
case('”')
set=[1 0 0 1 0 1 0];
case('U')
set=[1 0 0 1 0 1 1];
case('o')
set=[1 0 0 1 1 0 0];
case('&')
set=[1 0 0 1 1 0 1];
case('V')
set=[1 0 0 1 1 1 0];
case('x')
set=[1 0 0 1 1 1 1];
case('*')
set=[1 0 1 0 0 0 0];
case('W')
set=[1 0 1 0 0 0 1];
case('.')
set=[1 0 1 0 0 1 0];
case('w')
set=[1 0 1 0 0 1 1];
case(',')
set=[1 0 1 0 1 0 0];
case('’')
set=[1 0 1 0 1 0 1];
case('X')
set=[1 0 1 0 1 1 0];
case('^')
set=[1 0 1 0 1 1 1];
case('Y')
set=[1 0 1 1 0 0 0];
case('-')
set=[1 0 1 1 0 0 1];
case('_')
set=[1 0 1 1 0 1 0];
case(')')
set=[1 0 1 1 0 1 1];
case('~')
set=[1 0 1 1 1 0 0];
case('`')
set=[1 0 1 1 1 0 1];
case('>')
set=[1 0 1 1 1 1 0];
case('?')
set=[1 0 1 1 1 1 1];
case('?')
set=[1 1 0 0 0 0 0];
case('?')
set=[1 1 0 0 0 0 1];
case('?')
set=[1 1 0 0 0 1 0];
case('?')
set=[1 1 0 0 0 1 1];
case('?')
set=[1 1 0 0 1 0 0];
case('?')
set=[1 1 0 0 1 0 1];
case('?')
set=[1 1 0 0 1 1 0];
case('?')
set=[1 1 0 0 1 1 1];
case('??')
set=[1 1 0 1 0 0 0];
case('?')
set=[1 1 0 1 0 0 1];
case('??')
set=[1 1 0 1 0 1 0];
case('?')
set=[1 1 0 1 0 1 1];
case('?')
set=[1 1 0 1 1 0 0];
case('?')
set=[1 1 0 1 1 0 1];
case('??')
set=[1 1 0 1 1 1 0];
case('??')
set=[1 1 0 1 1 1 1];
case('??')
set=[1 1 1 0 0 0 0];
case('?')
set=[1 1 1 0 0 0 1];
case('?')
set=[1 1 1 0 0 1 0];
case('??')
set=[1 1 1 0 0 1 1];
case('??')
set=[1 1 1 0 1 0 0];
case('??')
set=[1 1 1 0 1 0 1];
case('?')
set=[1 1 1 0 1 1 0];
case('??')
set=[1 1 1 0 1 1 1];
case('?')
set=[1 1 1 1 0 0 0];
case('????')
set=[1 1 1 1 0 0 1];
case('???')
set=[1 1 1 1 0 1 0];
case('??')
set=[1 1 1 1 0 1 1];
case('??')
set=[1 1 1 1 1 0 0];
case('?')
set=[1 1 1 1 1 0 1];
case('?')
set=[1 1 1 1 1 1 0];
case('?')
set=[1 1 1 1 1 1 1];
end
ipox=[set statx];
inputp=[1 ipox];
sum_h=(w1*(inputp)')';
o_h=1./(1+exp(-sum_h));
% output layer ---------------------------
input_h=[1 o_h];
sum_out=(w2*(input_h)')';
out=1./(1+exp(-sum_out));
for t=1:(states+output_x)
if out(t)>=0.8
out1(t)=1;
elseif out(t)<=0.4
out1(t)=0;
else out1(t)=out(t);
end
end
finp=[finp;out1];
tempch=[];
statx=out1( (output_x + 1):(output_x+states));
end
outzs=[''];
for f=1:length(ipo)
tempch=finp(f,:);
tempch=tempch(1:7);
if tempch==[0 0 0 0 0 0 0]
outzs=[outzs 'C'];
end
if tempch==[0 0 0 0 0 0 1]
outzs=[outzs 'f'];
end
if tempch==[0 0 0 0 0 1 0]
outzs=[outzs '4'];
end
if tempch==[0 0 0 0 0 1 1]
outzs=[outzs '@'];
end
if tempch==[0 0 0 0 1 0 0]
outzs=[outzs ' '];
end
if tempch==[0 0 0 0 1 0 1]
outzs=[outzs 'A'];
end
if tempch==[0 0 0 0 1 1 0]
outzs=[outzs 'h'];
end
if tempch==[0 0 0 0 1 1 1]
outzs=[outzs '6'];
end
if tempch==[0 0 0 1 0 0 0]
outzs=[outzs '#'];
end
if tempch==[0 0 0 1 0 0 1]
outzs=[outzs 'B'];
end
if tempch==[0 0 0 1 0 1 0]
outzs=[outzs 'b'];
end
if tempch==[0 0 0 1 0 1 1]
outzs=[outzs '3'];
end
if tempch==[0 0 0 1 1 0 0]
outzs=[outzs '('];
end
if tempch==[0 0 0 1 1 0 1]
outzs=[outzs 'M'];
end
if tempch==[0 0 0 1 1 1 0]
outzs=[outzs 'n'];
end
if tempch==[0 0 0 1 1 1 1]
outzs=[outzs '9'];
end
if tempch==[0 0 1 0 0 0 0]
outzs=[outzs 'D'];
end
if tempch==[0 0 1 0 0 0 1]
outzs=[outzs 'j'];
end
if tempch==[0 0 1 0 0 1 0]
outzs=[outzs 'p'];
end
if tempch==[0 0 1 0 0 1 1]
outzs=[outzs '8'];
end
if tempch==[0 0 1 0 1 0 0]
outzs=[outzs '$'];
end
if tempch==[0 0 1 0 1 0 1]
outzs=[outzs 'P'];
end
if tempch==[0 0 1 0 1 1 0]
outzs=[outzs 'r'];
end
if tempch==[0 0 1 0 1 1 1]
outzs=[outzs '+'];
end
if tempch==[0 0 1 1 0 0 0]
outzs=[outzs '7'];
end
if tempch==[0 0 1 1 0 0 1]
outzs=[outzs 'E'];
end
if tempch==[0 0 1 1 0 1 0]
outzs=[outzs 'd'];
end
if tempch==[0 0 1 1 0 1 1]
outzs=[outzs '0'];
end
if tempch==[0 0 1 1 1 0 0]
outzs=[outzs '!'];
end
if tempch==[0 0 1 1 1 0 1]
outzs=[outzs 'Z'];
end
if tempch==[0 0 1 1 1 1 0]
outzs=[outzs 's'];
end
if tempch==[0 0 1 1 1 1 1]
outzs=[outzs '<'];
end
if tempch==[0 1 0 0 0 0 0]
outzs=[outzs 'F'];
end
if tempch==[0 1 0 0 0 0 1]
outzs=[outzs 'a'];
end
if tempch==[0 1 0 0 0 1 0]
outzs=[outzs '5'];
end
if tempch==[0 1 0 0 0 1 1]
outzs=[outzs '%'];
end
if tempch==[0 1 0 0 1 0 0]
outzs=[outzs 'G'];
end
if tempch==[0 1 0 0 1 0 1]
outzs=[outzs 'c'];
end
if tempch==[0 1 0 0 1 1 0]
outzs=[outzs '1'];
end
if tempch==[0 1 0 0 1 1 1]
outzs=[outzs '='];
end
if tempch==[0 1 0 1 0 0 0]
outzs=[outzs 'I'];
end
if tempch==[0 1 0 1 0 0 1]
outzs=[outzs 'g'];
end
if tempch==[0 1 0 1 0 1 0]
outzs=[outzs '2'];
end
if tempch==[0 1 0 1 0 1 1]
outzs=[outzs '|'];
end
if tempch==[0 1 0 1 1 0 0]
outzs=[outzs 'H'];
end
if tempch==[0 1 0 1 1 0 1]
outzs=[outzs 't'];
end
if tempch==[0 1 0 1 1 1 0]
outzs=[outzs '\'];
end
if tempch==[0 1 0 1 1 1 1]
outzs=[outzs 'N'];
end
if tempch==[0 1 1 0 0 0 0]
outzs=[outzs 'k'];
end
if tempch==[0 1 1 0 0 0 1]
outzs=[outzs '{'];
end
if tempch==[0 1 1 0 0 1 0]
outzs=[outzs 'K'];
end
if tempch==[0 1 1 0 0 1 1]
outzs=[outzs 'u'];
end
if tempch==[0 1 1 0 1 0 0]
outzs=[outzs '}'];
end
if tempch==[0 1 1 0 1 0 1]
outzs=[outzs 'e'];
end
if tempch==[0 1 1 0 1 1 0]
outzs=[outzs 'J'];
end
if tempch==[0 1 1 0 1 1 1]
outzs=[outzs '['];
end
if tempch==[0 1 1 1 0 0 0]
outzs=[outzs 'L'];
end
if tempch==[0 1 1 1 0 0 1]
outzs=[outzs 'v'];
end
if tempch==[0 1 1 1 0 1 0]
outzs=[outzs ']'];
end
if tempch==[0 1 1 1 0 1 1]
outzs=[outzs 'O'];
end
if tempch==[0 1 1 1 1 0 0]
outzs=[outzs 'q'];
end
if tempch==[0 1 1 1 1 0 1]
outzs=[outzs '?'];
end
if tempch==[0 1 1 1 1 1 0]
outzs=[outzs 'S'];
end
if tempch==[0 1 1 1 1 1 1]
outzs=[outzs 'z'];
end
if tempch==[1 0 0 0 0 0 0]
outzs=[outzs ':'];
end
if tempch==[1 0 0 0 0 0 1]
outzs=[outzs 'Q'];
end
if tempch==[1 0 0 0 0 1 0]
outzs=[outzs 'i'];
end
if tempch==[1 0 0 0 0 1 1]
outzs=[outzs ';'];
end
if tempch==[1 0 0 0 1 0 0]
outzs=[outzs 'R'];
end
if tempch==[1 0 0 0 1 0 1]
outzs=[outzs 'l'];
end
if tempch==[1 0 0 0 1 1 0]
outzs=[outzs 'm'];
end
if tempch==[1 0 0 0 1 1 1]
outzs=[outzs 'T'];
end
if tempch==[1 0 0 1 0 0 0]
outzs=[outzs 'y'];
end
if tempch==[1 0 0 1 0 0 1]
outzs=[outzs '/'];
end
if tempch==[1 0 0 1 0 1 0]
outzs=[outzs '”'];
end
if tempch==[1 0 0 1 0 1 1]
outzs=[outzs 'U'];
end
if tempch==[1 0 0 1 1 0 0]
outzs=[outzs 'o'];
end
if tempch==[1 0 0 1 1 0 1]
outzs=[outzs '&'];
end
if tempch==[1 0 0 1 1 1 0]
outzs=[outzs 'V'];
end
if tempch==[1 0 0 1 1 1 1]
outzs=[outzs 'x'];
end
if tempch==[1 0 1 0 0 0 0]
outzs=[outzs '*'];
end
if tempch==[1 0 1 0 0 0 1]
outzs=[outzs 'W'];
end
if tempch==[1 0 1 0 0 1 0]
outzs=[outzs '.'];
end
if tempch==[1 0 1 0 0 1 1]
outzs=[outzs 'w'];
end
if tempch==[1 0 1 0 1 0 0]
outzs=[outzs ','];
end
if tempch==[1 0 1 0 1 0 1]
outzs=[outzs '’'];
end
if tempch==[1 0 1 0 1 1 0]
outzs=[outzs 'X'];
end
if tempch==[1 0 1 0 1 1 1]
outzs=[outzs '^'];
end
if tempch==[1 0 1 1 0 0 0]
outzs=[outzs 'Y'];
end
if tempch==[1 0 1 1 0 0 1]
outzs=[outzs '-'];
end
if tempch==[1 0 1 1 0 1 0]
outzs=[outzs '_'];
end
if tempch==[1 0 1 1 0 1 1]
outzs=[outzs ')'];
end
if tempch==[1 0 1 1 1 0 0]
outzs=[outzs '~'];
end
if tempch==[1 0 1 1 1 0 1]
outzs=[outzs '`'];
end
if tempch==[1 0 1 1 1 1 0]
outzs=[outzs '>'];
end
if tempch==[1 0 1 1 1 1 1]
outzs=[outzs '?'];
end
if tempch==[1 1 0 0 0 0 0]
outzs=[outzs '?'];
end
if tempch==[1 1 0 0 0 0 1]
outzs=[outzs '?'];
end
if tempch==[1 1 0 0 0 1 0]
outzs=[outzs '?'];
end
if tempch==[1 1 0 0 0 1 1]
outzs=[outzs '?'];
end
if tempch==[1 1 0 0 1 0 0]
outzs=[outzs '?'];
end
if tempch==[1 1 0 0 1 0 1]
outzs=[outzs '?'];
end
if tempch==[1 1 0 0 1 1 0]
outzs=[outzs '?'];
end
if tempch==[1 1 0 0 1 1 1]
outzs=[outzs '?'];
end
if tempch==[1 1 0 1 0 0 0]
outzs=[outzs '??'];
end
if tempch==[1 1 0 1 0 0 1]
outzs=[outzs '?'];
end
if tempch==[1 1 0 1 0 1 0]
outzs=[outzs '??'];
end
if tempch==[1 1 0 1 0 1 1]
outzs=[outzs '?'];
end
if tempch==[1 1 0 1 1 0 0]
outzs=[outzs '?'];
end
if tempch==[1 1 0 1 1 0 1]
outzs=[outzs '?'];
end
if tempch==[1 1 0 1 1 1 0]
outzs=[outzs '??'];
end
if tempch==[1 1 0 1 1 1 1]
outzs=[outzs '??'];
end
if tempch==[1 1 1 0 0 0 0]
outzs=[outzs '??'];
end
if tempch==[1 1 1 0 0 0 1]
outzs=[outzs '?'];
end
if tempch==[1 1 1 0 0 1 0]
outzs=[outzs '?'];
end
if tempch==[1 1 1 0 0 1 1]
outzs=[outzs '??'];
end
if tempch==[1 1 1 0 1 0 0]
outzs=[outzs '??'];
end
if tempch==[1 1 1 0 1 0 1]
outzs=[outzs '??'];
end
if tempch==[1 1 1 0 1 1 0]
outzs=[outzs '?'];
end
if tempch==[1 1 1 0 1 1 1]
outzs=[outzs '??'];
end
if tempch==[1 1 1 1 0 0 0]
outzs=[outzs '?'];
end
if tempch==[1 1 1 1 0 0 1]
outzs=[outzs '????'];
end
if tempch==[1 1 1 1 0 1 0]
outzs=[outzs '???'];
end
if tempch==[1 1 1 1 0 1 1]
outzs=[outzs '??'];
end
if tempch==[1 1 1 1 1 0 0]
outzs=[outzs '??'];
end
if tempch==[1 1 1 1 1 0 1]
outzs=[outzs '?'];
end
if tempch==[1 1 1 1 1 1 0]
outzs=[outzs '?'];
end
if tempch==[1 1 1 1 1 1 1]
outzs=[outzs '?'];
end
end
ipo=outzs;
j=j+1;
end
outzs
out3=outzs
t=tcpip('0.0.0.0',30000,'NetworkRole','Server');
t.OutputBufferSize=500000;
fopen(t);
fprintf(t,'%s\n',out3);
fwrite(t,h);
fwrite(t,st);

%//////////////////////////////////////////////////////////////////////////////////receiver code:
clc;
clear all;
close all;
inputs_x=7; %------------------------no. of bits of data
output_x=7;
statx=2;%-------------------no. of states
% ------------------------ no of bits for states
for tem=1:1000
if 2^tem >=statx
states=tem;
break
end
end
hls=24; % size of the hidden layer
% -------------------------- weight initialization
w1=rand(hls,(inputs_x+states+1));
w2=rand((output_x+states),hls+1);
neta=1;
a=1;
sx=0;
p=[];
training_setx=[];
training_setx=[0 0 0 0 0 0 0 0;0 0 0 0 0 0 1 0;0 0 0 0 0 1 0 0;0 0 0 0 0 1 1 0;0 0 0 0 1 0 0 0;0 0 0 0 1 0 1 0;0 0 0 0 1 1 0 0;0 0 0 0 1 1 1 0;0 0 0 1 0 0 0 0;0 0 0 1 0 0 1 0;0 0 0 1 0 1 0 0;0 0 0 1 0 1 1 0;0 0 0 1 1 0 0 0;0 0 0 1 1 0 1 0;0 0 0 1 1 1 0 0;0 0 0 1 1 1 1 0;0 0 1 0 0 0 0 0;0 0 1 0 0 0 1 0;0 0 1 0 0 1 0 0;0 0 1 0 0 1 1 0;0 0 1 0 1 0 0 0;0 0 1 0 1 0 1 0;0 0 1 0 1 1 0 0;0 0 1 0 1 1 1 0;0 0 1 1 0 0 0 0;0 0 1 1 0 0 1 0;0 0 1 1 0 1 0 0;0 0 1 1 0 1 1 0;0 0 1 1 1 0 0 0;0 0 1 1 1 0 1 0;0 0 1 1 1 1 0 0;0 0 1 1 1 1 1 0;0 1 0 0 0 0 0 0;0 1 0 0 0 0 1 0;0 1 0 0 0 1 0 0;0 1 0 0 0 1 1 0;0 1 0 0 1 0 0 0;0 1 0 0 1 0 1 0;0 1 0 0 1 1 0 0;0 1 0 0 1 1 1 0;0 1 0 1 0 0 0 0;0 1 0 1 0 0 1 0;0 1 0 1 0 1 0 0;0 1 0 1 0 1 1 0;0 1 0 1 1 0 0 0;0 1 0 1 1 0 1 0;0 1 0 1 1 1 0 0;0 1 0 1 1 1 1 0;0 1 1 0 0 0 0 0;0 1 1 0 0 0 1 0;0 1 1 0 0 1 0 0;0 1 1 0 0 1 1 0;0 1 1 0 1 0 0 0;0 1 1 0 1 0 1 0;0 1 1 0 1 1 0 0;0 1 1 0 1 1 1 0;0 1 1 1 0 0 0 0;0 1 1 1 0 0 1 0;0 1 1 1 0 1 0 0;0 1 1 1 0 1 1 0;0 1 1 1 1 0 0 0;0 1 1 1 1 0 1 0;0 1 1 1 1 1 0 0;0 1 1 1 1 1 1 0; 1 0 0 0 0 0 0 0;1 0 0 0 0 0 1 0;1 0 0 0 0 1 0 0;1 0 0 0 0 1 1 0;1 0 0 0 1 0 0 0;1 0 0 0 1 0 1 0;1 0 0 0 1 1 0 0;1 0 0 0 1 1 1 0;1 0 0 1 0 0 0 0;1 0 0 1 0 0 1 0;1 0 0 1 0 1 0 0;1 0 0 1 0 1 1 0;1 0 0 1 1 0 0 0;1 0 0 1 1 0 1 0;1 0 0 1 1 1 0 0;1 0 0 1 1 1 1 0;1 0 1 0 0 0 0 0;1 0 1 0 0 0 1 0;1 0 1 0 0 1 0 0;1 0 1 0 0 1 1 0;1 0 1 0 1 0 0 0;1 0 1 0 1 0 1 0;1 0 1 0 1 1 0 0;1 0 1 0 1 1 1 0;1 0 1 1 0 0 0 0;1 0 1 1 0 0 1 0;1 0 1 1 0 1 0 0;1 0 1 1 0 1 1 0;1 0 1 1 1 0 0 0;1 0 1 1 1 0 1 0;1 0 1 1 1 1 0 0;1 0 1 1 1 1 1 0;1 1 0 0 0 0 0 0;1 1 0 0 0 0 1 0;1 1 0 0 0 1 0 0;1 1 0 0 0 1 1 0;1 1 0 0 1 0 0 0;1 1 0 0 1 0 1 0;1 1 0 0 1 1 0 0;1 1 0 0 1 1 1 0;1 1 0 1 0 0 0 0;1 1 0 1 0 0 1 0;1 1 0 1 0 1 0 0;1 1 0 1 0 1 1 0;1 1 0 1 1 0 0 0;1 1 0 1 1 0 1 0;1 1 0 1 1 1 0 0;1 1 0 1 1 1 1 0;1 1 1 0 0 0 0 0;1 1 1 0 0 0 1 0;1 1 1 0 0 1 0 0;1 1 1 0 0 1 1 0;1 1 1 0 1 0 0 0;1 1 1 0 1 0 1 0;1 1 1 0 1 1 0 0;1 1 1 0 1 1 1 0;1 1 1 1 0 0 0 0;1 1 1 1 0 0 1 0;1 1 1 1 0 1 0 0;1 1 1 1 0 1 1 0;1 1 1 1 1 0 0 0;1 1 1 1 1 0 1 0;1 1 1 1 1 1 0 0;1 1 1 1 1 1 1 0;0 0 0 0 0 0 0 1;0 0 0 0 0 0 1 1;0 0 0 0 0 1 0 1;0 0 0 0 0 1 1 1;0 0 0 0 1 0 0 1;0 0 0 0 1 0 1 1;0 0 0 0 1 1 0 1;0 0 0 0 1 1 1 1;0 0 0 1 0 0 0 1;0 0 0 1 0 0 1 1;0 0 0 1 0 1 0 1;0 0 0 1 0 1 1 1;0 0 0 1 1 0 0 1;0 0 0 1 1 0 1 1;0 0 0 1 1 1 0 1;0 0 0 1 1 1 1 1;0 0 1 0 0 0 0 1;0 0 1 0 0 0 1 1;0 0 1 0 0 1 0 1;0 0 1 0 0 1 1 1;0 0 1 0 1 0 0 1;0 0 1 0 1 0 1 1;0 0 1 0 1 1 0 1;0 0 1 0 1 1 1 1;0 0 1 1 0 0 0 1;0 0 1 1 0 0 1 1;0 0 1 1 0 1 0 1;0 0 1 1 0 1 1 1;0 0 1 1 1 0 0 1;0 0 1 1 1 0 1 1;0 0 1 1 1 1 0 1;0 0 1 1 1 1 1 1;0 1 0 0 0 0 0 1;0 1 0 0 0 0 1 1;0 1 0 0 0 1 0 1;0 1 0 0 0 1 1 1;0 1 0 0 1 0 0 1;0 1 0 0 1 0 1 1;0 1 0 0 1 1 0 1;0 1 0 0 1 1 1 1;0 1 0 1 0 0 0 1;0 1 0 1 0 0 1 1;0 1 0 1 0 1 0 1;0 1 0 1 0 1 1 1;0 1 0 1 1 0 0 1;0 1 0 1 1 0 1 1;0 1 0 1 1 1 0 1;0 1 0 1 1 1 1 1;0 1 1 0 0 0 0 1;0 1 1 0 0 0 1 1;0 1 1 0 0 1 0 1;0 1 1 0 0 1 1 1;0 1 1 0 1 0 0 1;0 1 1 0 1 0 1 1;0 1 1 0 1 1 0 1;0 1 1 0 1 1 1 1;0 1 1 1 0 0 0 1;0 1 1 1 0 0 1 1;0 1 1 1 0 1 0 1;0 1 1 1 0 1 1 1;0 1 1 1 1 0 0 1;0 1 1 1 1 0 1 1;0 1 1 1 1 1 0 1;0 1 1 1 1 1 1 1; 1 0 0 0 0 0 0 1;1 0 0 0 0 0 1 1;1 0 0 0 0 1 0 1;1 0 0 0 0 1 1 1;1 0 0 0 1 0 0 1;1 0 0 0 1 0 1 1;1 0 0 0 1 1 0 1;1 0 0 0 1 1 1 1;1 0 0 1 0 0 0 1;1 0 0 1 0 0 1 1;1 0 0 1 0 1 0 1;1 0 0 1 0 1 1 1;1 0 0 1 1 0 0 1;1 0 0 1 1 0 1 1;1 0 0 1 1 1 0 1;1 0 0 1 1 1 1 1;1 0 1 0 0 0 0 1;1 0 1 0 0 0 1 1;1 0 1 0 0 1 0 1;1 0 1 0 0 1 1 1;1 0 1 0 1 0 0 1;1 0 1 0 1 0 1 1;1 0 1 0 1 1 0 1;1 0 1 0 1 1 1 1;1 0 1 1 0 0 0 1;1 0 1 1 0 0 1 1;1 0 1 1 0 1 0 1;1 0 1 1 0 1 1 1;1 0 1 1 1 0 0 1;1 0 1 1 1 0 1 1;1 0 1 1 1 1 0 1;1 0 1 1 1 1 1 1;1 1 0 0 0 0 0 1;1 1 0 0 0 0 1 1;1 1 0 0 0 1 0 1;1 1 0 0 0 1 1 1;1 1 0 0 1 0 0 1;1 1 0 0 1 0 1 1;1 1 0 0 1 1 0 1;1 1 0 0 1 1 1 1;1 1 0 1 0 0 0 1;1 1 0 1 0 0 1 1;1 1 0 1 0 1 0 1;1 1 0 1 0 1 1 1;1 1 0 1 1 0 0 1;1 1 0 1 1 0 1 1;1 1 0 1 1 1 0 1;1 1 0 1 1 1 1 1;1 1 1 0 0 0 0 1;1 1 1 0 0 0 1 1;1 1 1 0 0 1 0 1;1 1 1 0 0 1 1 1;1 1 1 0 1 0 0 1;1 1 1 0 1 0 1 1;1 1 1 0 1 1 0 1;1 1 1 0 1 1 1 1;1 1 1 1 0 0 0 1;1 1 1 1 0 0 1 1;1 1 1 1 0 1 0 1;1 1 1 1 0 1 1 1;1 1 1 1 1 0 0 1;1 1 1 1 1 0 1 1;1 1 1 1 1 1 0 1;1 1 1 1 1 1 1 1];
training_outx=[1 1 1 1 1 1 1 1;0 0 0 0 0 0 0 1;0 0 0 0 0 0 1 1;0 0 0 0 0 1 0 1;0 0 0 0 0 1 1 1;0 0 0 0 1 0 0 1;0 0 0 0 1 0 1 1;0 0 0 0 1 1 0 1;0 0 0 0 1 1 1 1;0 0 0 1 0 0 0 1;0 0 0 1 0 0 1 1;0 0 0 1 0 1 0 1;0 0 0 1 0 1 1 1;0 0 0 1 1 0 0 1;0 0 0 1 1 0 1 1;0 0 0 1 1 1 0 1;0 0 0 1 1 1 1 1;0 0 1 0 0 0 0 1;0 0 1 0 0 0 1 1;0 0 1 0 0 1 0 1;0 0 1 0 0 1 1 1;0 0 1 0 1 0 0 1;0 0 1 0 1 0 1 1;0 0 1 0 1 1 0 1;0 0 1 0 1 1 1 1;0 0 1 1 0 0 0 1;0 0 1 1 0 0 1 1;0 0 1 1 0 1 0 1;0 0 1 1 0 1 1 1;0 0 1 1 1 0 0 1;0 0 1 1 1 0 1 1;0 0 1 1 1 1 0 1;0 0 1 1 1 1 1 1;0 1 0 0 0 0 0 1;0 1 0 0 0 0 1 1;0 1 0 0 0 1 0 1;0 1 0 0 0 1 1 1;0 1 0 0 1 0 0 1;0 1 0 0 1 0 1 1;0 1 0 0 1 1 0 1;0 1 0 0 1 1 1 1;0 1 0 1 0 0 0 1;0 1 0 1 0 0 1 1;0 1 0 1 0 1 0 1;0 1 0 1 0 1 1 1;0 1 0 1 1 0 0 1;0 1 0 1 1 0 1 1;0 1 0 1 1 1 0 1;0 1 0 1 1 1 1 1;0 1 1 0 0 0 0 1;0 1 1 0 0 0 1 1;0 1 1 0 0 1 0 1;0 1 1 0 0 1 1 1;0 1 1 0 1 0 0 1;0 1 1 0 1 0 1 1;0 1 1 0 1 1 0 1;0 1 1 0 1 1 1 1;0 1 1 1 0 0 0 1;0 1 1 1 0 0 1 1;0 1 1 1 0 1 0 1;0 1 1 1 0 1 1 1;0 1 1 1 1 0 0 1;0 1 1 1 1 0 1 1;0 1 1 1 1 1 0 1;0 1 1 1 1 1 1 1; 1 0 0 0 0 0 0 1;1 0 0 0 0 0 1 1;1 0 0 0 0 1 0 1;1 0 0 0 0 1 1 1;1 0 0 0 1 0 0 1;1 0 0 0 1 0 1 1;1 0 0 0 1 1 0 1;1 0 0 0 1 1 1 1;1 0 0 1 0 0 0 1;1 0 0 1 0 0 1 1;1 0 0 1 0 1 0 1;1 0 0 1 0 1 1 1;1 0 0 1 1 0 0 1;1 0 0 1 1 0 1 1;1 0 0 1 1 1 0 1;1 0 0 1 1 1 1 1;1 0 1 0 0 0 0 1;1 0 1 0 0 0 1 1;1 0 1 0 0 1 0 1;1 0 1 0 0 1 1 1;1 0 1 0 1 0 0 1;1 0 1 0 1 0 1 1;1 0 1 0 1 1 0 1;1 0 1 0 1 1 1 1;1 0 1 1 0 0 0 1;1 0 1 1 0 0 1 1;1 0 1 1 0 1 0 1;1 0 1 1 0 1 1 1;1 0 1 1 1 0 0 1;1 0 1 1 1 0 1 1;1 0 1 1 1 1 0 1;1 0 1 1 1 1 1 1;1 1 0 0 0 0 0 1;1 1 0 0 0 0 1 1;1 1 0 0 0 1 0 1;1 1 0 0 0 1 1 1;1 1 0 0 1 0 0 1;1 1 0 0 1 0 1 1;1 1 0 0 1 1 0 1;1 1 0 0 1 1 1 1;1 1 0 1 0 0 0 1;1 1 0 1 0 0 1 1;1 1 0 1 0 1 0 1;1 1 0 1 0 1 1 1;1 1 0 1 1 0 0 1;1 1 0 1 1 0 1 1;1 1 0 1 1 1 0 1;1 1 0 1 1 1 1 1;1 1 1 0 0 0 0 1;1 1 1 0 0 0 1 1;1 1 1 0 0 1 0 1;1 1 1 0 0 1 1 1;1 1 1 0 1 0 0 1;1 1 1 0 1 0 1 1;1 1 1 0 1 1 0 1;1 1 1 0 1 1 1 1;1 1 1 1 0 0 0 1;1 1 1 1 0 0 1 1;1 1 1 1 0 1 0 1;1 1 1 1 0 1 1 1;1 1 1 1 1 0 0 1;1 1 1 1 1 0 1 1;1 1 1 1 1 1 0 1;1 1 1 1 1 1 0 0;1 1 1 1 1 1 1 0;0 0 0 0 0 0 0 0;0 0 0 0 0 0 1 0;0 0 0 0 0 1 0 0;0 0 0 0 0 1 1 0;0 0 0 0 1 0 0 0;0 0 0 0 1 0 1 0;0 0 0 0 1 1 0 0;0 0 0 0 1 1 1 0;0 0 0 1 0 0 0 0;0 0 0 1 0 0 1 0;0 0 0 1 0 1 0 0;0 0 0 1 0 1 1 0;0 0 0 1 1 0 0 0;0 0 0 1 1 0 1 0;0 0 0 1 1 1 0 0;0 0 0 1 1 1 1 0;0 0 1 0 0 0 0 0;0 0 1 0 0 0 1 0;0 0 1 0 0 1 0 0;0 0 1 0 0 1 1 0;0 0 1 0 1 0 0 0;0 0 1 0 1 0 1 0;0 0 1 0 1 1 0 0;0 0 1 0 1 1 1 0;0 0 1 1 0 0 0 0;0 0 1 1 0 0 1 0;0 0 1 1 0 1 0 0;0 0 1 1 0 1 1 0;0 0 1 1 1 0 0 0;0 0 1 1 1 0 1 0;0 0 1 1 1 1 0 0;0 0 1 1 1 1 1 0;0 1 0 0 0 0 0 0;0 1 0 0 0 0 1 0;0 1 0 0 0 1 0 0;0 1 0 0 0 1 1 0;0 1 0 0 1 0 0 0;0 1 0 0 1 0 1 0;0 1 0 0 1 1 0 0;0 1 0 0 1 1 1 0;0 1 0 1 0 0 0 0;0 1 0 1 0 0 1 0;0 1 0 1 0 1 0 0;0 1 0 1 0 1 1 0;0 1 0 1 1 0 0 0;0 1 0 1 1 0 1 0;0 1 0 1 1 1 0 0;0 1 0 1 1 1 1 0;0 1 1 0 0 0 0 0;0 1 1 0 0 0 1 0;0 1 1 0 0 1 0 0;0 1 1 0 0 1 1 0;0 1 1 0 1 0 0 0;0 1 1 0 1 0 1 0;0 1 1 0 1 1 0 0;0 1 1 0 1 1 1 0;0 1 1 1 0 0 0 0;0 1 1 1 0 0 1 0;0 1 1 1 0 1 0 0;0 1 1 1 0 1 1 0;0 1 1 1 1 0 0 0;0 1 1 1 1 0 1 0;0 1 1 1 1 1 0 0;0 1 1 1 1 1 1 0; 1 0 0 0 0 0 0 0;1 0 0 0 0 0 1 0;1 0 0 0 0 1 0 0;1 0 0 0 0 1 1 0;1 0 0 0 1 0 0 0;1 0 0 0 1 0 1 0;1 0 0 0 1 1 0 0;1 0 0 0 1 1 1 0;1 0 0 1 0 0 0 0;1 0 0 1 0 0 1 0;1 0 0 1 0 1 0 0;1 0 0 1 0 1 1 0;1 0 0 1 1 0 0 0;1 0 0 1 1 0 1 0;1 0 0 1 1 1 0 0;1 0 0 1 1 1 1 0;1 0 1 0 0 0 0 0;1 0 1 0 0 0 1 0;1 0 1 0 0 1 0 0;1 0 1 0 0 1 1 0;1 0 1 0 1 0 0 0;1 0 1 0 1 0 1 0;1 0 1 0 1 1 0 0;1 0 1 0 1 1 1 0;1 0 1 1 0 0 0 0;1 0 1 1 0 0 1 0;1 0 1 1 0 1 0 0;1 0 1 1 0 1 1 0;1 0 1 1 1 0 0 0;1 0 1 1 1 0 1 0;1 0 1 1 1 1 0 0;1 0 1 1 1 1 1 0;1 1 0 0 0 0 0 0;1 1 0 0 0 0 1 0;1 1 0 0 0 1 0 0;1 1 0 0 0 1 1 0;1 1 0 0 1 0 0 0;1 1 0 0 1 0 1 0;1 1 0 0 1 1 0 0;1 1 0 0 1 1 1 0;1 1 0 1 0 0 0 0;1 1 0 1 0 0 1 0;1 1 0 1 0 1 0 0;1 1 0 1 0 1 1 0;1 1 0 1 1 0 0 0;1 1 0 1 1 0 1 0;1 1 0 1 1 1 0 0;1 1 0 1 1 1 1 0;1 1 1 0 0 0 0 0;1 1 1 0 0 0 1 0;1 1 1 0 0 1 0 0;1 1 1 0 0 1 1 0;1 1 1 0 1 0 0 0;1 1 1 0 1 0 1 0;1 1 1 0 1 1 0 0;1 1 1 0 1 1 1 0;1 1 1 1 0 0 0 0;1 1 1 1 0 0 1 0;1 1 1 1 0 1 0 0;1 1 1 1 0 1 1 0;1 1 1 1 1 0 0 0;1 1 1 1 1 0 1 0];
for x=1:100000
training_set=training_setx(a,:);
training_out=training_outx(a,:);
% --------------------------- output hidden layer
inputu=[1 training_set];
sum_h=(w1*(inputu)')';
o_h=1./(1+exp(-sum_h));
% --------------------------- output layer
input_h=[1 o_h];
sum_out=(w2*(input_h)')';
out=1./(1+exp(-sum_out));
% ---------------------------- delta
delta_out=neta*(out.*(1-out)).*(training_out - out);
delta_h=(delta_out*w2).*input_h.*(1-input_h);
% update of weight --------------------------
% output layer --------------------------------
for t=1:(output_x+states)
w2(t,:) = w2(t,:) + neta*delta_out(t)*input_h;
end
% hidden layer ----------------------------------
for t=1:hls
w1(t,:) = w1(t,:) + neta*delta_h(t+1)*inputu;
end
for t=1:(output_x+states)
if out(t)>=0.7
out1(t)=1;
elseif out(t)<=0.2
out1(t)=0;
else out1(t)=out(t);
end
end
p=[p sum(out-training_out)];
if out1==training_out
a=a+1;
sx=sx+1;
end
if a>((2^inputs_x)*statx)
a=a-((2^inputs_x)*statx);
end
end
plot(p.*p);
t=tcpip('LocalHost',30000,'NetworkRole','Client','TimeOut',2);
t.InputBufferSize=500000;
fopen(t);
nam=fscanf(t)
b1=fread(t);
c=b1(1)
d=b1(2)
% testing the program
z=c;
j=0;
ipo=nam;
st=d;
statx=st;
while(j<z)
finp=[];
for i=1:length(ipo)
b=ipo(i);
switch b
case('C')
set=[0 0 0 0 0 0 0];
case('f')
set=[0 0 0 0 0 0 1];
case('4')
set=[0 0 0 0 0 1 0];
case('@')
set=[0 0 0 0 0 1 1];
case(' ')
set=[0 0 0 0 1 0 0];
case('A')
set=[0 0 0 0 1 0 1];
case('h')
set=[0 0 0 0 1 1 0];
case('6')
set=[0 0 0 0 1 1 1];
case('#')
set=[0 0 0 1 0 0 0];
case('B')
set=[0 0 0 1 0 0 1];
case('b')
set=[0 0 0 1 0 1 0];
case('3')
set=[0 0 0 1 0 1 1];
case('(')
set=[0 0 0 1 1 0 0];
case('M')
set=[0 0 0 1 1 0 1];
case('n')
set=[0 0 0 1 1 1 0];
case('9')
set=[0 0 0 1 1 1 1];
case('D')
set=[0 0 1 0 0 0 0];
case('j')
set=[0 0 1 0 0 0 1];
case('p')
set=[0 0 1 0 0 1 0];
case('8')
set=[0 0 1 0 0 1 1];
case('$')
set=[0 0 1 0 1 0 0];
case('P')
set=[0 0 1 0 1 0 1];
case('r')
set=[0 0 1 0 1 1 0];
case('+')
set=[0 0 1 0 1 1 1];
case('7')
set=[0 0 1 1 0 0 0];
case('E')
set=[0 0 1 1 0 0 1];
case('d')
set=[0 0 1 1 0 1 0];
case('0')
set=[0 0 1 1 0 1 1];
case('!')
set=[0 0 1 1 1 0 0];
case('Z')
set=[0 0 1 1 1 0 1];
case('s')
set=[0 0 1 1 1 1 0];
case('<')
set=[0 0 1 1 1 1 1];
case('F')
set=[0 1 0 0 0 0 0];
case('a')
set=[0 1 0 0 0 0 1];
case('5')
set=[0 1 0 0 0 1 0];
case('%')
set=[0 1 0 0 0 1 1];
case('G')
set=[0 1 0 0 1 0 0];
case('c')
set=[0 1 0 0 1 0 1];
case('1')
set=[0 1 0 0 1 1 0];
case('=')
set=[0 1 0 0 1 1 1];
case('I')
set=[0 1 0 1 0 0 0];
case('g')
set=[0 1 0 1 0 0 1];
case('2')
set=[0 1 0 1 0 1 0];
case('|')
set=[0 1 0 1 0 1 1];
case('H')
set=[0 1 0 1 1 0 0];
case('t')
set=[0 1 0 1 1 0 1];
case('\')
set=[0 1 0 1 1 1 0];
case('N')
set=[0 1 0 1 1 1 1];
case('k')
set=[0 1 1 0 0 0 0];
case('{')
set=[0 1 1 0 0 0 1];
case('K')
set=[0 1 1 0 0 1 0];
case('u')
set=[0 1 1 0 0 1 1];
case('}')
set=[0 1 1 0 1 0 0];
case('e')
set=[0 1 1 0 1 0 1];
case('J')
set=[0 1 1 0 1 1 0];
case('[')
set=[0 1 1 0 1 1 1];
case('L')
set=[0 1 1 1 0 0 0];
case('v')
set=[0 1 1 1 0 0 1];
case(']')
set=[0 1 1 1 0 1 0];
case('O')
set=[0 1 1 1 0 1 1];
case('q')
set=[0 1 1 1 1 0 0];
case('?')
set=[0 1 1 1 1 0 1];
case('S')
set=[0 1 1 1 1 1 0];
case('z')
set=[0 1 1 1 1 1 1];
case(':')
set=[1 0 0 0 0 0 0];
case('Q')
set=[1 0 0 0 0 0 1];
case('i')
set=[1 0 0 0 0 1 0];
case(';')
set=[1 0 0 0 0 1 1];
case('R')
set=[1 0 0 0 1 0 0];
case('l')
set=[1 0 0 0 1 0 1];
case('m')
set=[1 0 0 0 1 1 0];
case('T')
set=[1 0 0 0 1 1 1];
case('y')
set=[1 0 0 1 0 0 0];
case('/')
set=[1 0 0 1 0 0 1];
case('”')
set=[1 0 0 1 0 1 0];
case('U')
set=[1 0 0 1 0 1 1];
case('o')
set=[1 0 0 1 1 0 0];
case('&')
set=[1 0 0 1 1 0 1];
case('V')
set=[1 0 0 1 1 1 0];
case('x')
set=[1 0 0 1 1 1 1];
case('*')
set=[1 0 1 0 0 0 0];
case('W')
set=[1 0 1 0 0 0 1];
case('.')
set=[1 0 1 0 0 1 0];
case('w')
set=[1 0 1 0 0 1 1];
case(',')
set=[1 0 1 0 1 0 0];
case('’')
set=[1 0 1 0 1 0 1];
case('X')
set=[1 0 1 0 1 1 0];
case('^')
set=[1 0 1 0 1 1 1];
case('Y')
set=[1 0 1 1 0 0 0];
case('-')
set=[1 0 1 1 0 0 1];
case('_')
set=[1 0 1 1 0 1 0];
case(')')
set=[1 0 1 1 0 1 1];
case('~')
set=[1 0 1 1 1 0 0];
case('`')
set=[1 0 1 1 1 0 1];
case('>')
set=[1 0 1 1 1 1 0];
case('?')
set=[1 0 1 1 1 1 1];
case('?')
set=[1 1 0 0 0 0 0];
case('?')
set=[1 1 0 0 0 0 1];
case('?')
set=[1 1 0 0 0 1 0];
case('?')
set=[1 1 0 0 0 1 1];
case('?')
set=[1 1 0 0 1 0 0];
case('?')
set=[1 1 0 0 1 0 1];
case('?')
set=[1 1 0 0 1 1 0];
case('?')
set=[1 1 0 0 1 1 1];
case('??')
set=[1 1 0 1 0 0 0];
case('?')
set=[1 1 0 1 0 0 1];
case('??')
set=[1 1 0 1 0 1 0];
case('?')
set=[1 1 0 1 0 1 1];
case('?')
set=[1 1 0 1 1 0 0];
case('?')
set=[1 1 0 1 1 0 1];
case('??')
set=[1 1 0 1 1 1 0];
case('??')
set=[1 1 0 1 1 1 1];
case('??')
set=[1 1 1 0 0 0 0];
case('?')
set=[1 1 1 0 0 0 1];
case('?')
set=[1 1 1 0 0 1 0];
case('??')
set=[1 1 1 0 0 1 1];
case('??')
set=[1 1 1 0 1 0 0];
case('??')
set=[1 1 1 0 1 0 1];
case('?')
set=[1 1 1 0 1 1 0];
case('??')
set=[1 1 1 0 1 1 1];
case('?')
set=[1 1 1 1 0 0 0];
case('????')
set=[1 1 1 1 0 0 1];
case('???')
set=[1 1 1 1 0 1 0];
case('??')
set=[1 1 1 1 0 1 1];
case('??')
set=[1 1 1 1 1 0 0];
case('?')
set=[1 1 1 1 1 0 1];
case('?')
set=[1 1 1 1 1 1 0];
case('?')
set=[1 1 1 1 1 1 1];
end
ipox=[set statx];
inputp=[1 ipox];
sum_h=(w1*(inputp)')';
o_h=1./(1+exp(-sum_h));
% output layer ---------------------------
input_h=[1 o_h];
sum_out=(w2*(input_h)')';
out=1./(1+exp(-sum_out));
for t=1:(states+output_x)
if out(t)>=0.8
out1(t)=1;
elseif out(t)<=0.4
out1(t)=0;
else out1(t)=out(t);
end
end
finp=[finp;out1];
tempch=[];
statx=out1( (output_x + 1):(output_x+states));
end
outzs=[''];
for f=1:length(ipo)
tempch=finp(f,:);
tempch=tempch(1:7);
if tempch==[0 0 0 0 0 0 0]
outzs=[outzs 'C'];
end
if tempch==[0 0 0 0 0 0 1]
outzs=[outzs 'f'];
end
if tempch==[0 0 0 0 0 1 0]
outzs=[outzs '4'];
end
if tempch==[0 0 0 0 0 1 1]
outzs=[outzs '@'];
end
if tempch==[0 0 0 0 1 0 0]
outzs=[outzs ' '];
end
if tempch==[0 0 0 0 1 0 1]
outzs=[outzs 'A'];
end
if tempch==[0 0 0 0 1 1 0]
outzs=[outzs 'h'];
end
if tempch==[0 0 0 0 1 1 1]
outzs=[outzs '6'];
end
if tempch==[0 0 0 1 0 0 0]
outzs=[outzs '#'];
end
if tempch==[0 0 0 1 0 0 1]
outzs=[outzs 'B'];
end
if tempch==[0 0 0 1 0 1 0]
outzs=[outzs 'b'];
end
if tempch==[0 0 0 1 0 1 1]
outzs=[outzs '3'];
end
if tempch==[0 0 0 1 1 0 0]
outzs=[outzs '('];
end
if tempch==[0 0 0 1 1 0 1]
outzs=[outzs 'M'];
end
if tempch==[0 0 0 1 1 1 0]
outzs=[outzs 'n'];
end
if tempch==[0 0 0 1 1 1 1]
outzs=[outzs '9'];
end
if tempch==[0 0 1 0 0 0 0]
outzs=[outzs 'D'];
end
if tempch==[0 0 1 0 0 0 1]
outzs=[outzs 'j'];
end
if tempch==[0 0 1 0 0 1 0]
outzs=[outzs 'p'];
end
if tempch==[0 0 1 0 0 1 1]
outzs=[outzs '8'];
end
if tempch==[0 0 1 0 1 0 0]
outzs=[outzs '$'];
end
if tempch==[0 0 1 0 1 0 1]
outzs=[outzs 'P'];
end
if tempch==[0 0 1 0 1 1 0]
outzs=[outzs 'r'];
end
if tempch==[0 0 1 0 1 1 1]
outzs=[outzs '+'];
end
if tempch==[0 0 1 1 0 0 0]
outzs=[outzs '7'];
end
if tempch==[0 0 1 1 0 0 1]
outzs=[outzs 'E'];
end
if tempch==[0 0 1 1 0 1 0]
outzs=[outzs 'd'];
end
if tempch==[0 0 1 1 0 1 1]
outzs=[outzs '0'];
end
if tempch==[0 0 1 1 1 0 0]
outzs=[outzs '!'];
end
if tempch==[0 0 1 1 1 0 1]
outzs=[outzs 'Z'];
end
if tempch==[0 0 1 1 1 1 0]
outzs=[outzs 's'];
end
if tempch==[0 0 1 1 1 1 1]
outzs=[outzs '<'];
end
if tempch==[0 1 0 0 0 0 0]
outzs=[outzs 'F'];
end
if tempch==[0 1 0 0 0 0 1]
outzs=[outzs 'a'];
end
if tempch==[0 1 0 0 0 1 0]
outzs=[outzs '5'];
end
if tempch==[0 1 0 0 0 1 1]
outzs=[outzs '%'];
end
if tempch==[0 1 0 0 1 0 0]
outzs=[outzs 'G'];
end
if tempch==[0 1 0 0 1 0 1]
outzs=[outzs 'c'];
end
if tempch==[0 1 0 0 1 1 0]
outzs=[outzs '1'];
end
if tempch==[0 1 0 0 1 1 1]
outzs=[outzs '='];
end
if tempch==[0 1 0 1 0 0 0]
outzs=[outzs 'I'];
end
if tempch==[0 1 0 1 0 0 1]
outzs=[outzs 'g'];
end
if tempch==[0 1 0 1 0 1 0]
outzs=[outzs '2'];
end
if tempch==[0 1 0 1 0 1 1]
outzs=[outzs '|'];
end
if tempch==[0 1 0 1 1 0 0]
outzs=[outzs 'H'];
end
if tempch==[0 1 0 1 1 0 1]
outzs=[outzs 't'];
end
if tempch==[0 1 0 1 1 1 0]
outzs=[outzs '\'];
end
if tempch==[0 1 0 1 1 1 1]
outzs=[outzs 'N'];
end
if tempch==[0 1 1 0 0 0 0]
outzs=[outzs 'k'];
end
if tempch==[0 1 1 0 0 0 1]
outzs=[outzs '{'];
end
if tempch==[0 1 1 0 0 1 0]
outzs=[outzs 'K'];
end
if tempch==[0 1 1 0 0 1 1]
outzs=[outzs 'u'];
end
if tempch==[0 1 1 0 1 0 0]
outzs=[outzs '}'];
end
if tempch==[0 1 1 0 1 0 1]
outzs=[outzs 'e'];
end
if tempch==[0 1 1 0 1 1 0]
outzs=[outzs 'J'];
end
if tempch==[0 1 1 0 1 1 1]
outzs=[outzs '['];
end
if tempch==[0 1 1 1 0 0 0]
outzs=[outzs 'L'];
end
if tempch==[0 1 1 1 0 0 1]
outzs=[outzs 'v'];
end
if tempch==[0 1 1 1 0 1 0]
outzs=[outzs ']'];
end
if tempch==[0 1 1 1 0 1 1]
outzs=[outzs 'O'];
end
if tempch==[0 1 1 1 1 0 0]
outzs=[outzs 'q'];
end
if tempch==[0 1 1 1 1 0 1]
outzs=[outzs '?'];
end
if tempch==[0 1 1 1 1 1 0]
outzs=[outzs 'S'];
end
if tempch==[0 1 1 1 1 1 1]
outzs=[outzs 'z'];
end
if tempch==[1 0 0 0 0 0 0]
outzs=[outzs ':'];
end
if tempch==[1 0 0 0 0 0 1]
outzs=[outzs 'Q'];
end
if tempch==[1 0 0 0 0 1 0]
outzs=[outzs 'i'];
end
if tempch==[1 0 0 0 0 1 1]
outzs=[outzs ';'];
end
if tempch==[1 0 0 0 1 0 0]
outzs=[outzs 'R'];
end
if tempch==[1 0 0 0 1 0 1]
outzs=[outzs 'l'];
end
if tempch==[1 0 0 0 1 1 0]
outzs=[outzs 'm'];
end
if tempch==[1 0 0 0 1 1 1]
outzs=[outzs 'T'];
end
if tempch==[1 0 0 1 0 0 0]
outzs=[outzs 'y'];
end
if tempch==[1 0 0 1 0 0 1]
outzs=[outzs '/'];
end
if tempch==[1 0 0 1 0 1 0]
outzs=[outzs '”'];
end
if tempch==[1 0 0 1 0 1 1]
outzs=[outzs 'U'];
end
if tempch==[1 0 0 1 1 0 0]
outzs=[outzs 'o'];
end
if tempch==[1 0 0 1 1 0 1]
outzs=[outzs '&'];
end
if tempch==[1 0 0 1 1 1 0]
outzs=[outzs 'V'];
end
if tempch==[1 0 0 1 1 1 1]
outzs=[outzs 'x'];
end
if tempch==[1 0 1 0 0 0 0]
outzs=[outzs '*'];
end
if tempch==[1 0 1 0 0 0 1]
outzs=[outzs 'W'];
end
if tempch==[1 0 1 0 0 1 0]
outzs=[outzs '.'];
end
if tempch==[1 0 1 0 0 1 1]
outzs=[outzs 'w'];
end
if tempch==[1 0 1 0 1 0 0]
outzs=[outzs ','];
end
if tempch==[1 0 1 0 1 0 1]
outzs=[outzs '’'];
end
if tempch==[1 0 1 0 1 1 0]
outzs=[outzs 'X'];
end
if tempch==[1 0 1 0 1 1 1]
outzs=[outzs '^'];
end
if tempch==[1 0 1 1 0 0 0]
outzs=[outzs 'Y'];
end
if tempch==[1 0 1 1 0 0 1]
outzs=[outzs '-'];
end
if tempch==[1 0 1 1 0 1 0]
outzs=[outzs '_'];
end
if tempch==[1 0 1 1 0 1 1]
outzs=[outzs ')'];
end
if tempch==[1 0 1 1 1 0 0]
outzs=[outzs '~'];
end
if tempch==[1 0 1 1 1 0 1]
outzs=[outzs '`'];
end
if tempch==[1 0 1 1 1 1 0]
outzs=[outzs '>'];
end
if tempch==[1 0 1 1 1 1 1]
outzs=[outzs '?'];
end
if tempch==[1 1 0 0 0 0 0]
outzs=[outzs '?'];
end
if tempch==[1 1 0 0 0 0 1]
outzs=[outzs '?'];
end
if tempch==[1 1 0 0 0 1 0]
outzs=[outzs '?'];
end
if tempch==[1 1 0 0 0 1 1]
outzs=[outzs '?'];
end
if tempch==[1 1 0 0 1 0 0]
outzs=[outzs '?'];
end

if tempch==[1 1 0 0 1 0 1]
outzs=[outzs '?'];
end
if tempch==[1 1 0 0 1 1 0]
outzs=[outzs '?'];
end
if tempch==[1 1 0 0 1 1 1]
outzs=[outzs '?'];
end
if tempch==[1 1 0 1 0 0 0]
outzs=[outzs '??'];
end
if tempch==[1 1 0 1 0 0 1]
outzs=[outzs '?'];
end
if tempch==[1 1 0 1 0 1 0]
outzs=[outzs '??'];
end
if tempch==[1 1 0 1 0 1 1]
outzs=[outzs '?'];
end
if tempch==[1 1 0 1 1 0 0]
outzs=[outzs '?'];
end
if tempch==[1 1 0 1 1 0 1]
outzs=[outzs '?'];
end
if tempch==[1 1 0 1 1 1 0]
outzs=[outzs '??'];
end
if tempch==[1 1 0 1 1 1 1]
outzs=[outzs '??'];
end
if tempch==[1 1 1 0 0 0 0]
outzs=[outzs '??'];
end
if tempch==[1 1 1 0 0 0 1]
outzs=[outzs '?'];
end
if tempch==[1 1 1 0 0 1 0]
outzs=[outzs '?'];
end
if tempch==[1 1 1 0 0 1 1]
outzs=[outzs '??'];
end
if tempch==[1 1 1 0 1 0 0]
outzs=[outzs '??'];
end
if tempch==[1 1 1 0 1 0 1]
outzs=[outzs '??'];
end
if tempch==[1 1 1 0 1 1 0]
outzs=[outzs '?'];
end
if tempch==[1 1 1 0 1 1 1]
outzs=[outzs '??'];
end
if tempch==[1 1 1 1 0 0 0]
outzs=[outzs '?'];
end
if tempch==[1 1 1 1 0 0 1]
outzs=[outzs '????'];
end
if tempch==[1 1 1 1 0 1 0]
outzs=[outzs '???'];
end
if tempch==[1 1 1 1 0 1 1]
outzs=[outzs '??'];
end
if tempch==[1 1 1 1 1 0 0]
outzs=[outzs '??'];
end
if tempch==[1 1 1 1 1 0 1]
outzs=[outzs '?'];
end
if tempch==[1 1 1 1 1 1 0]
outzs=[outzs '?'];
end
if tempch==[1 1 1 1 1 1 1]
outzs=[outzs '?'];
end
end
ipo=outzs;
j=j+1;
end
outzswnder

[Walter Roberson]

Your code is badly in need of a rewrite.

Create a cell array of character vectors, each representing one of the items to match, in the order you want them to be matched. Then use ismember() of the data to be matched to that cell array, using the second output of the function to get an index into the list. Convert the index to binary to get your tempch .

On the reverse end, convert your tempch binary to a decimal number and use that to index the cell array of matched characters.

No more switch, no more long long if/if chains.

[Samuel Gray]

"Your code is badly in need of a rewrite."

LOL