以文本方式查看主题

-  金字塔客服中心 - 专业程序化交易软件提供商  (http://weistock.com/bbs/index.asp)
--  公式模型编写问题提交  (http://weistock.com/bbs/list.asp?boardid=4)
----  后台版本: KG =0, 如果开仓 则KG = 1;如何写。  (http://weistock.com/bbs/dispbbs.asp?boardid=4&id=151718)

--  作者:qq代人发帖
--  发布时间:2017/4/17 10:06:54
--  后台版本: KG =0, 如果开仓 则KG = 1;如何写。
请教:后台版本: KG =0, 如果开仓 则KG = 1;如何写。
--  作者:FexTel
--  发布时间:2017/4/17 10:15:42
--  
后台看你是用序列模式还是逐K  逐KVARIABLE也可以用

序列模式

IF EXTGBDATA(\'KG\')=0 THEN
BEGIN
TBUY(,,);
EXTGBDATASET(\'KG\',1);
END

--  作者:QQ56048933
--  发布时间:2017/4/17 10:40:29
--  
以下是引用FexTel在2017/4/17 10:15:42的发言:
后台看你是用序列模式还是逐K  逐KVARIABLE也可以用

序列模式

IF EXTGBDATA(\'KG\')=0 THEN
BEGIN
TBUY(,,);
EXTGBDATASET(\'KG\',1);
END
。。。
cond1:=time>0100 and time < 1840 and cyc >1 and cross(high,longprice);
//long open
//开仓和平仓
IF EXTGBDATA(\'KG\')=0 THEN
BEGIN
TBUY(cond1,1,LMT,CLOSE,0,ZH1,PZ1 );
EXTGBDATASET(\'KG\',1);
END


--  作者:QQ56048933
--  发布时间:2017/4/17 10:41:10
--  
上面的效果就是 如果开仓后, 开关赋值为1?
--  作者:FexTel
--  发布时间:2017/4/17 10:46:25
--  
IF EXTGBDATA(\'KG\')=0 AND COND1 THEN
BEGIN
TBUY(1,1,LMT,CLOSE,0,ZH1,PZ1 );
EXTGBDATASET(\'KG\',1);
END

//一定要条件同步,要不然赋值了你还没开仓

--  作者:QQ56048933
--  发布时间:2017/4/17 11:01:19
--  
如果我还想实现 if cond2  then  kg 的值恢复到 0 呢
--  作者:FexTel
--  发布时间:2017/4/17 11:08:12
--  
IF cond2 and kg THEN
BEGIN

EXTGBDATASET(\'KG\',0);
END