
等级: 新手上路
- 注册:
- 2024-11-5
- 曾用名:
|
//该模型为简单示范模型,用户需根据自己交易经验,修改完善后再实际应用!!!
INPUT:M1(10,1,100); //第一个数字是过去多少天的成交量
VARIABLE:CNT=0,_ZTRICE=0;
VOLMA:"成交量计算.VOLMA##DAY"(M1),NODRAW;//过去M1天成交量均值
CLOSEYESTODAY:CALLSTOCK(STKLABEL,VTCLOSE,6,-1);//昨日收盘价
OPENTODAY:CALLSTOCK(STKLABEL,VTOPEN,6,0);//当日开盘价
SYMBOL:STKLABEL,NODRAW;
IF STRICMP(STRLEFT(STKLABEL,1),'3')=0 OR STRICMP(STRLEFT(STKLABEL,3),'688')=0 THEN BEGIN
IF ROUNDS(ABS((ROUNDS(CLOSEYESTODAY*1.2,2)-CLOSEYESTODAY)/CLOSEYESTODAY*100-20),5)>=ROUNDS(ABS((ROUNDS(CLOSEYESTODAY*1.2,2)+0.01-CLOSEYESTODAY)/CLOSEYESTODAY*100-20),5) THEN
_ZTRICE:=ROUNDS(CLOSEYESTODAY*1.2,2) + 0.01;
ELSE
_ZTRICE:=ROUNDS(CLOSEYESTODAY*1.2,2);
END
IF STRICMP(STRLEFT(STKLABEL,1),'0')=0 OR (STRICMP(STRLEFT(STKLABEL,1),'6')=0 AND STRICMP(STRLEFT(STKLABEL,3),'688')!=0) THEN BEGIN
IF ROUNDS(ABS((ROUNDS(CLOSEYESTODAY*1.1,2)-CLOSEYESTODAY)/CLOSEYESTODAY*100-10),5)>=ROUNDS(ABS((ROUNDS(CLOSEYESTODAY*1.1,2)+0.01-CLOSEYESTODAY)/CLOSEYESTODAY*100-10),5) THEN
_ZTRICE:=ROUNDS(CLOSEYESTODAY*1.1,2) + 0.01;
ELSE
_ZTRICE:=ROUNDS(CLOSEYESTODAY*1.1,2);
END
ZTRICE:_ZTRICE,NODRAW;
//涨停价:DYNAINFO(54),NODRAW;
IF DATE<>REF(DATE,1) THEN BEGIN
CNT:=0;
END
IF CLOSE>CLOSEYESTODAY AND CLOSE<ZTRICE AND TIME>093100 AND VOL>VOLMA*0.088 AND CNT=0 THEN BEGIN // 这里的CNT=0是否只执行每天第一次出现的信号,如果每天多次出现信号都执行则去掉
DRAWICON(1,H,3);
SELL(1,50%,LIMIT,OPENTODAY);
//SPEAK(1,'出现巨量');//声音提示
CNT:=1;
END
|
|