易语言BP神经网络简易源码

系统结构:初始化定义,sigmoid,fnet,InitBp,易_取随机数,TrainBp,main,UseBp,

======窗口程序集1
           |  |
           |  |------ _按钮1_被单击
           |  |
           |  |------ __启动窗口_创建完毕
           |  |
           |  |
======程序集1
           |  |
           |  |------ 初始化定义
           |  |
           |  |------ sigmoid
           |  |
           |  |------ fnet
           |  |
           |  |------ InitBp
           |  |
           |  |------ 易_取随机数
           |  |
           |  |------ TrainBp
           |  |
           |  |------ main
           |  |
           |  |------ UseBp
           |  |
           |  |
======调用的Dll
           |  |
           |  |---[dll]------   _GetTickCount
           |  |
           |  |---[dll]------   _CryptAcquireContext
           |  |
           |  |---[dll]------   _CryptGenRandom

调用的DLL命令:

.DLL命令 _GetTickCount, 整数型, "kernel32.dll", "GetTickCount"

.DLL命令 _CryptAcquireContext, 整数型, "advapi32.dll", "CryptAcquireContextA"
    .参数 phProv, 整数型, 传址
    .参数 pszContainer, 整数型
    .参数 pszProvider, 整数型
    .参数 dwProvType, 整数型
    .参数 dwFlags, 整数型

.DLL命令 _CryptGenRandom, 整数型, "advapi32.dll", "CryptGenRandom"
    .参数 hProv, 整数型
    .参数 dwLen, 整数型
    .参数 pbBuffer, 双精度小数型, 传址