金字塔决策交易系统

 找回密码
 

微信登录

微信扫一扫,快速登录

搜索
查看: 3107|回复: 1

全局变量的使用

[复制链接]

171

主题

475

帖子

485

积分

Rank: 2

等级: 标准版

注册:
2021-5-31
曾用名:
发表于 2021-12-18 11:50 | 显示全部楼层 |阅读模式
我在图表程序化中使用下面的语句来控制当天卖出股票后满足买入条件不再买,能得到正常的控制。
VARIABLE:TZKC:=0;
IF HOLDING>0 THEN
BEGIN
        TZKC:=1;
        END
IF HOLDING=0 AND (TIME=150000 OR TIME=093000) THEN
BEGIN
    TZKC:=0;
    END
我在后台程序化中修改如下:
VARIABLE:TZKC:=0;
IF THOLDING>0 THEN
BEGIN
        TZKC:=1;
        END
IF TBUYHOLDINGEX('','',2)=0 AND (TIME=150000 OR TIME=093000) THEN
BEGIN
    TZKC:=0;
    END
if islastbar then  
BEGIN
DEBUGFILE('D:\TEDT\TEST.TXT',STKLABEL&'TZKC:%.0f',TZKC);
end
检查输出结果,在股票平仓后,下一周期输出TZKC=0,没有等到收盘或者第二天开盘就重置为0 了,起不到控制当天不再开仓的作用。
请教:是否再后台程序化中需要把VARIABLE更换为GLOBALVARIABLE后,就与VARIABLE在图表程序化的效果一样了,不再被重置?

回复

使用道具 举报

3976

主题

4045

帖子

4070

积分

Rank: 8Rank: 8

等级: 超级版主

注册:
2021-5-18
曾用名:
发表于 2021-12-18 12:38 | 显示全部楼层
建议使用extgbdataset赋值和extgbdata取值,extgbdata初始值为0,两个成对使用
IF THOLDING>0 THEN
BEGIN
         extgbdataset(stklabel&numtostr(period,2)&'ci',1);
         END
IF TBUYHOLDINGEX('','',2)=0 TIME=093000 THEN
BEGIN
      extgbdata(stklabel&numtostr(period,2)&'ci')=0
END
if 开仓条件 and extgbdata(stklabel&numtostr(period,2)&'ci')=0 then
begin        
      tbuy();
end
金字塔提供一对一VIP专业技术指导服务,技术团队实时响应您的日常使用问题与策略编写。联系电话:021-20339086
回复

使用道具 举报

您需要登录后才可以回帖 登录 | 微信登录

本版积分规则

手机版|小黑屋|上海金之塔信息技术有限公司 ( 沪ICP备13035422号 )

GMT+8, 2024-11-17 18:42 , Processed in 0.218290 second(s), 22 queries .

Powered by Discuz! X3.4

Copyright © 2001-2021, Tencent Cloud.

快速回复 返回顶部 返回列表