forked from MrBaro75/Warrior_EA
83 lines
3.7 KiB
MQL5
83 lines
3.7 KiB
MQL5
//+------------------------------------------------------------------+
| |||
//| NeuronPrimitives.mqh |
| |||
//| |
| |||
//| CConnection/CArrayCon bodies - the per-synapse weight (+ Adam |
| |||
//| moment) storage and its owning array, used by the CPU-only |
| |||
//| CNeuronBase/CNeuron neuron family (AI\Network.mqh) as their |
| |||
//| fallback last-resort weight representation. |
| |||
//| |
| |||
//| Included from AI\Network.mqh AFTER every class declaration - |
| |||
//| bodies only, no declarations. Relocation is behaviour-neutral by |
| |||
//| construction: nothing here is reachable until Network.mqh ends. |
| |||
//+------------------------------------------------------------------+
| |||
#ifndef WARRIOR_AI_IMPL_NEURONPRIMITIVES_MQH
| |||
#define WARRIOR_AI_IMPL_NEURONPRIMITIVES_MQH
| |||
#include "..\..\System\Random.mqh"
| |||
//+------------------------------------------------------------------+
| |||
//| |
| |||
//+------------------------------------------------------------------+
| |||
bool CConnection::Save(int file_handle)
| |||
{
| |||
if(file_handle == INVALID_HANDLE)
| |||
return false;
| |||
//---
| |||
if(FileWriteDouble(file_handle, weight) <= 0)
| |||
return false;
| |||
if(FileWriteDouble(file_handle, deltaWeight) <= 0)
| |||
return false;
| |||
if(FileWriteDouble(file_handle, mt) <= 0)
| |||
return false;
| |||
if(FileWriteDouble(file_handle, vt) <= 0)
| |||
return false;
| |||
//---
| |||
return true;
| |||
}
| |||
//+------------------------------------------------------------------+
| |||
//| |
| |||
//+------------------------------------------------------------------+
| |||
bool CConnection::Load(int file_handle)
| |||
{
| |||
if(file_handle == INVALID_HANDLE)
| |||
return false;
| |||
//---
| |||
weight = FileReadDouble(file_handle);
| |||
deltaWeight = FileReadDouble(file_handle);
| |||
mt = FileReadDouble(file_handle);
| |||
vt = FileReadDouble(file_handle);
| |||
//---
| |||
return true;
| |||
}
| |||
//+------------------------------------------------------------------+
| |||
//| |
| |||
//+------------------------------------------------------------------+
| |||
//+------------------------------------------------------------------+
| |||
//| |
| |||
//+------------------------------------------------------------------+
| |||
bool CArrayCon::CreateElementScaled(int index, double weighScale)
| |||
{
| |||
if(index < 0 || index >= m_data_max)
| |||
return false;
| |||
//---
| |||
// Fan-in-scaled to match the CNeuronBaseOCL/CNeuronConvOCL/CNeuronLSTMOCL weight-init sites -
| |||
// callers now compute their own He/LeCun-uniform weighScale (same rationale as those) and pass it
| |||
// down through CNeuronBase::Init(), since this per-connection constructor has no visibility into
| |||
// its owning neuron's fan-in on its own. weighScale < 0 (no caller opinion) keeps the old flat
| |||
// draw as a safe default.
| |||
double weigh;
| |||
if(weighScale > 0.0)
| |||
weigh = WarriorRandSymmetric() * weighScale;
| |||
else
| |||
weigh = WarriorRandUniform() - 0.5;
| |||
if(weigh == 0)
| |||
weigh = 0.001;
| |||
m_data[index] = new CConnection(weigh);
| |||
if(CheckPointer(m_data[index]) == POINTER_INVALID)
| |||
return false;
| |||
//---
| |||
return (true);
| |||
}
| |||
//+------------------------------------------------------------------+
| |||
//| |
| |||
//+------------------------------------------------------------------+
| |||
#endif // WARRIOR_AI_IMPL_NEURONPRIMITIVES_MQH
| |||
//+------------------------------------------------------------------+
|