麻烦老师帮忙看看，我编的用于控制账户整体风险的程序有何问题，谢谢！

103726

老师，您好！下面程序是我编的，用于控制账户整体风险，整体账户从最高点回撤超过5%清仓所有股票，固定时间5分钟读取一次账户总资产 ，如果资产上涨则记录下来，如下跌则与记录的进行比较，回撤出超5%清仓。备注： //期间不能转出资金，否则会误触清仓！该程序调试正常，该建的目录和文件我都建了，但不工作。麻烦老师帮忙看看，有没有更好的解决办法，谢谢老师！

/***基础设置
下单账号:='1900500';

// ***账户和持仓检查
多持:=TbuyHOLDINGEX(下单账号,STKLABEL,0);               //取可以卖出的持仓
总资产:=TACCOUNT(6);
Filedress1:='F:\宝财股票记录文件\记录资产总值.ini';
读取资产:= GETINIFILE(Filedress1,下单账号,'记录资产');

// *** 读取错误检查
if not(valid(总资产)) then exit;

// ***比较并记录
IF 总资产>读取资产 and 总资产>0 THEN
  BEGIN
    WRITEINIFILE(Filedress1,下单账号,'记录资产',总资产);
  END

// *** 平仓条件
卖出信号:=总资产<读取资产 and  100*(读取资产-总资产)/读取资产 > 5;

IF 卖出信号 and 多持>0  THEN
  BEGIN
    tsell(1,0,lmt,close*0.99,0,下单账号,STKLABEL);
    WRITEINIFILE(Filedress1,下单账号,'记录资产',1);       
  END

资深技术05

先看下你写入的ini文件中的值对不对。

根据写入的数值手工算下是否符合条件。

103726

他没有往文件中写数值

资深技术05

我本地直接运行就写入了。

你换个系统路径试下。可能是写文件权限有问题之类的。