请帮忙编写公式

AndyHu

涨停:=  //去除ST,创业板,科创板
昨日涨停:=
连续涨停次数:=

技术009

[PEL] 复制代码

VARIABLE:mark:=0;
dayc:CALLSTOCK('',vtCLOSE,6,0);
lastdayc:CALLSTOCK('',vtCLOSE,6,-1);
zt:((dayc-lastdayc)/lastdayc)>=0.1;//涨停判断
lastzt:ref(zt,TODAYBAR);//昨日涨停

if zt then mark:=mark+1;
if not(zt) then mark:=0;

连续周期数:mark;

这样试下。

AndyHu

技术009 发表于 2021-7-6 14:37
[mw_shl_code=pel,true]VARIABLE:mark:=0;
dayc:CALLSTOCK('',vtCLOSE,6,0);
lastdayc:CALLSTOCK('',vtCL ...

谢谢老师,可否再帮我补充一下买入卖出条件,谢谢.

YZB:=zt AND C=H and O=C;//一字板

买入
时间9:30-10:00 ,一字板=0 , 卖三量=0, 如果股票连续涨停次数>=3 涨停价买入资金的30%,如果股票连续涨停次数<3, 涨停价买入资金的10%, 买入5支股票或仓位达到80%停止,
卖出
1.        如果是一字板,现价比涨停价下跌一分钱全部卖出
2.        高开>=5%,下破分时成交均线,卖出50%,跌破昨日收盘价全部卖出
3.        尾盘不涨停,昨日买入持仓全部卖出

技术009

这个至少要专业版以上才能尝试下，否则写了你也没办法使用。而且也还有几个不太好处理的地方。一些细节还需要考虑下。

103610

技术009 发表于 2021-7-6 17:28
这个至少要专业版以上才能尝试下，否则写了你也没办法使用。而且也还有几个不太好处理的地方。一些细节还需 ...

是专业版,微信没办法换绑定,我没用专业版的账户登录

技术008

程序有点复杂，这边工作人要看下可能要花些时间

技术008

尾盘不涨停,昨日买入持仓全部卖出

这里是只卖昨天买入的，前几天买入的都不卖吗

103610

技术008 发表于 2021-7-7 09:42
程序有点复杂，这边工作人要看下可能要花些时间

好的,谢谢

103610

技术008 发表于 2021-7-7 09:43
尾盘不涨停,昨日买入持仓全部卖出

这里是只卖昨天买入的，前几天买入的都不卖吗

前几天买入的也要卖出，开始我没考虑道有多日持仓的可能，多谢

技术008

程序运行在分比周期上


GLOBALVARIABLE:zt_num=0;
GLOBALVARIABLE:num=0;
if todaybar=1 then zt_num:=0;
if todaybar=1 then num:=0;
if DYNAINFO(  7)=DYNAINFO( 54) and ref(close,1) = DYNAINFO( 54) then zt_num:=zt_num+1;
ti_cond:currenttime>093000 and currenttime<100000;
if ti_cond and zt_num>=3 and DYNAINFO( 33)=0 and (THOLDCOUNT('')<=5 or TACCOUNT(28)/TACCOUNT( 6)>0.8) then tbuy(1,TACCOUNT(19)*0.3/close,mkt);

if ti_cond and zt_num<3 and DYNAINFO( 33)=0 and (THOLDCOUNT('')<=5 or TACCOUNT(28)/TACCOUNT( 6)>0.8) then tbuy(1,TACCOUNT(19)*0.1/close,mkt);



//卖出
if DYNAINFO(  7)<DYNAINFO( 54)-0.01 and ref(close,1) = DYNAINFO( 54) and tbuyholding(1)>0 then tsell(1,tbuyholding(1),mkt);
if DYNAINFO(  4)>DYNAINFO(  3)*1.05 and DYNAINFO(  7)<DYNAINFO( 11) and tbuyholding(1)>0 and num=0 then
begin
tsell(1,tbuyholding(1)/2,mkt);
num:=1;
END

if num=1 and DYNAINFO(  7)<DYNAINFO(  3) and tbuyholding(1)>0 then tsell(1,tbuyholding(1),mkt);

if DYNAINFO(  7)<DYNAINFO( 54) and tbuyholding(1)>0 and currenttime>145800 and currenttime<150000 then tsell(1,tbuyholding(1),mkt);