35 lines
1.1 KiB
MQL5
35 lines
1.1 KiB
MQL5
 | //+------------------------------------------------------------------+
| ||
//| KBAppendSmoke.mq5|
| |||
//| Non-trading KB append smoke test (DualEA) |
| |||
//+------------------------------------------------------------------+
| |||
#property script_show_inputs
| |||
#property strict
| |||
| |||
#include <KnowledgeBase.mqh>
| |||
| |||
void OnStart()
| |||
{
| |||
// Use the shared KB path in Common Files
| |||
CKnowledgeBase kb("DualEA\\knowledge_base.csv", ",");
| |||
| |||
TradeRecord r;
| |||
r.timestamp = TimeCurrent();
| |||
r.symbol = "KB_SMOKE"; // clearly tagged test symbol
| |||
r.type = ORDER_TYPE_BUY;
| |||
r.entry_price = 0.0;
| |||
r.stop_loss = 0.0;
| |||
r.take_profit = 0.0;
| |||
r.close_price = 0.0;
| |||
r.profit = 0.0;
| |||
r.strategy_id = "KBAppendSmoke"; // test tag 1
| |||
| |||
bool ok1 = kb.WriteRecord(r);
| |||
Sleep(50);
| |||
| |||
r.timestamp = TimeCurrent();
| |||
r.strategy_id = "KBAppendSmoke2"; // test tag 2
| |||
bool ok2 = kb.WriteRecord(r);
| |||
| |||
PrintFormat("KBAppendSmoke: write1=%s, write2=%s (to Common Files \\DualEA\\knowledge_base.csv)",
| |||
ok1?"OK":"FAIL", ok2?"OK":"FAIL");
| |||
}
|