[应用相关] STM32F4上神经网络识别的实现

try

    try

        obj=serial('COM15','baudrate',115200,'parity','none','databits',8,'stopbits',1);

        flag_fetch=1;

    catch

        fprintf('Create Obj Error');

    end

    obj.BytesAvailableFcnMode = 'terminator';

    obj.Terminator = 'c';

    obj.BytesAvailableFcn =@serial_nn_callback;

    try

        fopen(obj);

    catch

        fprintf('Open Error\n');

        break;

    end



    pause;

    flag_fetch=0;

catch



    fprintf('Serial Read Error!\n');

end

fclose(obj);

delete(obj);

clear obj;

function [c]= serial_nn_callback(obj, ~)



% var start

...

% var end



try

    n = get(obj, 'BytesAvailable');

    if n>20&& (flag_fetch==1)

        a = fread(obj, 29, 'uchar');%数据帧长度

        if a(1)~='A'

            fscanf(obj) ;

        end

        % 协议解析 start

        % 协议解析 end

    end

    catch

end

input=input';

net = newff( minmax(input) , [mid_layer,output_layer] , { 'logsig' 'logsig' }  ,'traingdx') ; 

net.trainparam.show = 50 ;

net.trainparam.epochs = 500 ;

net.trainparam.goal = 0.00001 ;

net.trainParam.lr = 0.001 ;

w_i2l=net.IW{1,1};%输入层到中间层的权值

b_i2l=net.b{1,1};%输入层到中间层的阈值

w_l2o=net.LW{2,1};%中间层到输出层的权值

b_l2o=net.b{2,1};%中间层到输出层的阈值

% 导出函数 start

...

% 导出函数 end

void layer_to_layer(

    int lin_num,

    int lout_num,

    float32_t* input,

    float32_t* output,

    float32_t* w,

    float32_t* b 

    )

{

     float32_t *temp;

     memset(output, 0, 

                lout_num * sizeof(float32_t)); 

     temp = (float32_t *)malloc(lin_num * sizeof(float32_t));

     for (int i=0;i<lout_num;i++)

     {

#ifdef    ARM_M4        

        arm_mult_f32(input,w+i*lin_num,temp,lin_num);    //CMSIS-DSP库 向量相乘

#else

                for (int i=0;i<lin_num;i++)                      //非DSP指令

                {

                  *(temp+i)=*(input)*(*(w+i*lin_num))

                }         

#endif 

        for (int j=0;j<lin_num;j++)

        {

            *(output+i)=*(output+i)+*(temp+j);

        }

        *(output+i)=*(output+i)+*(b+i);

        *(output+i)=logsig_fun(*(output+i));

     }

     free(temp);

}