收藏不少精品公式,以后每天推荐精品公式一个(组),能成为精品,必须是实用指标,有完整用法说明,先来第一个,这是带未来函数的,不喜欢的别下。
睹鬼决策系统 - 解盘精品指标
超级精品,慢慢看清下面的用法说明啊,不顶不留言别下!
{引用指标名}CHUS
TT:=(DATE < 10997061599);
//CHECK:=STRCMP(UPPERSTR(STRLEFT(,1)),'F');
//CHECK1:=STRCMP(UPPERSTR(STRLEFT(,5)),'PU003');
//AAA:=IF((((CHECK = 0) OR (CHECK1 = 0)) AND (TT = 1)),1,0);
AAA:=1;
RC:=(REF(CLOSE,1) * AAA);
XA:=IF((RC > HIGH),RC,0);
XB:=IF(((HIGH >= RC) AND (RC > LOW)),HIGH,0);
XC:=IF((RC <= LOW),HIGH,0);
XD:=((XA + XB) + XC);
YA:=IF((RC > HIGH),LOW,0);
YB:=IF(((HIGH >= RC) AND (RC > LOW)),LOW,0);
YC:=IF((RC <= LOW),RC,0);
YD:=((YA + YB) + YC);
ATR:=SMA((XD - YD),20,1);
TT1:(((EMA(CLOSE,20) + (2 * ATR)) * TT) * AAA),LINETHICK1;
TT2:(((EMA(CLOSE,20) - (2 * ATR)) * TT) * AAA),LINETHICK1;
TT3:((((((TT1 + TT1) + TT1) + TT2) / 4) * TT) * AAA),LINETHICK1;
TT4:((((((TT1 + TT2) + TT2) + TT2) / 4) * TT) * AAA),LINETHICK1;
TT5:((EMA(CLOSE,8) * TT) * AAA),LINETHICK1;
TT6:((EMA(CLOSE,20) * TT) * AAA),LINETHICK1;
参数 p1=13 p2=34 p3=55 p4=89 p5=144 n=10 p=3
DRAWGBK(CLOSE=CLOSE,COLORRGB(30,30,60),COLORRGB(30,30,60),1);
DRAWTEXT(SYSPARAM(2)=BARPOS,CLOSE,'收益:'+NUMTOSTR(FINANCE(33),2)+'\n'+'净资:'+NUMTOSTR(FINANCE(34),2)+'\n'+'流通:'+NUMTOSTR(FINANCE(7)/10000,2)+'亿'+'\n'+'流通:'+NUMTOSTR(FINANCE(7)/FINANCE(1)*100,0)+' %'+'\n'+'权益:'+NUMTOSTR(FINANCE(36),0)+' %'+'\n'+'主营:'+NUMTOSTR(FINANCE(53),0)+' %'+'\n'+'利润:'+NUMTOSTR(FINANCE(54),0)+' %'+'\n'+'主营:'+NUMTOSTR(FINANCE(20)/10000,1)+'亿'+'\n'),ALIGN3,colorCCFFCC;
VAR0:=IF(DATE<=1901120,1,0);
上市日期年:REF(YEAR,BARSCOUNT(CLOSE)-1),LINETHICK0,colorFF;
月:REF(MONTH,BARSCOUNT(CLOSE)-1),LINETHICK0,colorFF00FF;
日:REF(DAY,BARSCOUNT(CLOSE)-1),LINETHICK0,colorFFFF;
DRAWTEXT(SYSPARAM(2)=BARPOS,CLOSE,'证券代码:'+STKLABEL),ALIGN4,colorFF;
DRAWTEXT(BARPOS=SYSPARAM(2),HIGH,' 所属板块:'+BLKNAME+' 发行价'+NUMTOSTR(FINANCE(51),2)+'元'+' 发行量'+NUMTOSTR(FINANCE(52),2)+'万股'+'\n'+'总股本'+NUMTOSTR(FINANCE(1),0)+'万股'+' 流通A股'+NUMTOSTR(FINANCE(7),0)+'万股'+' 净资产'+NUMTOSTR(FINANCE(35),2)+'亿元'+' 每股收益'+NUMTOSTR(FINANCE(33),2)+'元'+' 每股未分配'+NUMTOSTR(FINANCE(32),2)+'元'+' 市盈率'+NUMTOSTR(DYNAINFO(39),2)+'%'+' 投资收益'+NUMTOSTR(FINANCE(24),2)+'元'+' 股东总数'+NUMTOSTR(FINANCE(50),0)+'户'),ALIGN4,color222222;
板幅度:=IF(STRFIND(STKNAME,'S',1)>0,0.0489,0.0965);
板:=(CLOSE-REF(CLOSE,1))/REF(CLOSE,1)>板幅度 AND HIGH=CLOSE;
VARVA:=板;
DRAWTEXT(板,HIGH,'板'),ALIGN0,PXUP25,colorFF00;
VARS:=SYSPARAM(1);
VARSS:=SYSPARAM(3);
VARDATE:=DATE;
光标年:=STRRIGHT(NUMTOSTR(VARDATE[VARS]/10000,0),2)+'年';
光标月:=STRLEFT(STRRIGHT(NUMTOSTR(VARDATE[VARS],0),4),2)+'月';
光标日:=STRRIGHT(NUMTOSTR(VARDATE[VARS],0),2)+'日';
A:=VARSS-VARS;
DRAWTEXT(CROSS(BACKSET(ISLASTBAR,MAX(35,A)),1),LOW,光标年+光标月+光标日+'至今'),ALIGN4,PXDN4,colorFFFFFF;
DRAWTEXT(CROSS(BACKSET(ISLASTBAR,MAX(35,A)),1),LOW,'────────'),ALIGN5,PXDN15,colorFF;
DRAWTEXT(CROSS(BACKSET(ISLASTBAR,MAX(35,A)),1),LOW,' 换手:'+NUMTOSTR(SUM(VOL,A+1)/(FINANCE(7)),2)+' %'),ALIGN4,PXDN95,colorFF99CC;
DRAWTEXT(CROSS(BACKSET(ISLASTBAR,MAX(35,A)),1),LOW,' 成本:'+NUMTOSTR((SUM(IF(CLOSE<100,AMOUNT,CLOSE),A+1))/(SUM(IF(CLOSE<100,VOL*100,1),A+1)),2)+' 元'),ALIGN4,PXDN35,colorFFFF;
DRAWTEXT(CROSS(BACKSET(ISLASTBAR,MAX(35,A)),1),LOW,' 涨幅:'+NUMTOSTR((CLOSE-REF(CLOSE,A+1))*100/REF(CLOSE,A+1),2)+' %'),ALIGN4,PXDN65,colorFF99CC;
DRAWTEXT(CROSS(BACKSET(ISLASTBAR,MAX(35,A)),1),LOW,' 涨停:'+NUMTOSTR(COUNT(VARVA,A+1),0)+' 次'),ALIGN4,PXDN125,colorFF99CC;
STICKLINE(ISLASTBAR AND A<>0,(SUM(IF(CLOSE<100,AMOUNT,CLOSE),A+1))/(SUM(IF(CLOSE<100,VOL*100,1),A+1)),(SUM(IF(CLOSE<100,AMOUNT,CLOSE),A+1))/(SUM(IF(CLOSE<100,VOL*100,1),A+1)),8,0),colorFFFF;
DRAWTEXT(CROSS(BACKSET(ISLASTBAR,MAX(35,A)),1),LOW,'http://yzcdj.51.com'),ALIGN5,PXDN15,colorFFCC33;
DRAWTEXT(CROSS(BACKSET(ISLASTBAR,MAX(3,A)),1),LOW,'因为专业 所以成功QQ:87041989'),ALIGN3,colorFFCC33;
DRAWTEXT(SYSPARAM(2)=BARPOS,HIGH,'操作:以今日中价作为介入点(熊市不追高),涨跌5%作为止盈止损点,在次日K线位画线作为提示,可以调整。 '),ALIGN5,colorFFFFFF;
EXPLAINEX(CLOSE,'本中:',(LOW+HIGH)/2,2,1),colorFFFF;
EXPLAINEX(CLOSE,'+1%:',(HIGH+LOW)/2*1.01,2,1);
EXPLAINEX(CLOSE,'+2%:',(HIGH+LOW)/2*1.02,2,1);
EXPLAINEX(CLOSE,'+3%:',(HIGH+LOW)/2*1.03,2,1);
EXPLAINEX(CLOSE,'+5%:',(HIGH+LOW)/2*1.05,2,1);
EXPLAINEX(CLOSE,'+10%:',(HIGH+LOW)/2*1.1,2,1),colorFF;
EXPLAINEX(CLOSE,'-1%:',(HIGH+LOW)/2*0.99,2,1);
EXPLAINEX(CLOSE,'-2%:',(HIGH+LOW)/2*0.98,2,1);
EXPLAINEX(CLOSE,'-3%:',(HIGH+LOW)/2*0.97,2,1);
EXPLAINEX(CLOSE,'-5%:',(HIGH+LOW)/2*0.95,2,1);
EXPLAINEX(CLOSE,'-10%:',(HIGH+LOW)/2*0.9,2,1),colorFF0000;
DRAWNUMBER(BARSCOUNT(CLOSE)=SYSPARAM(1),(HIGH+LOW)/2,(HIGH+LOW)/2,2),SHIFT1,colorFFFF;
DRAWTEXT(BARSCOUNT(CLOSE)=SYSPARAM(1),(HIGH+LOW)/2*1.05,'少贪为妙5%'),SHIFT2,colorFF00FF;
DRAWTEXT(BARSCOUNT(CLOSE)=SYSPARAM(1),(HIGH+LOW)/2*0.95,'愿睹服输5%'),SHIFT2,PXUP10,colorFFFF;
STICKLINE(BARSCOUNT(CLOSE)=SYSPARAM(1),(HIGH+LOW)/2,(HIGH+LOW)/2,10,0),LINETHICK2,colorFFFF;
STICKLINE(BARSCOUNT(CLOSE)=SYSPARAM(1),(HIGH+LOW)/2*1.01,(HIGH+LOW)/2*1.01,2,0),SHIFT1,colorFFFF;
STICKLINE(BARSCOUNT(CLOSE)=SYSPARAM(1),(HIGH+LOW)/2*1.02,(HIGH+LOW)/2*1.02,2,0),SHIFT1,LINETHICK1,colorFFFF;
STICKLINE(BARSCOUNT(CLOSE)=SYSPARAM(1),(HIGH+LOW)/2*1.03,(HIGH+LOW)/2*1.03,5,0),SHIFT1,colorFFFF;
STICKLINE(BARSCOUNT(CLOSE)=SYSPARAM(1),(HIGH+LOW)/2*1.05,(HIGH+LOW)/2*1.05,17,0),SHIFT1,colorFF00FF;
STICKLINE(BARSCOUNT(CLOSE)=SYSPARAM(1),(HIGH+LOW)/2*0.99,(HIGH+LOW)/2*0.99,2,0),SHIFT1,colorAFB49C;
STICKLINE(BARSCOUNT(CLOSE)=SYSPARAM(1),(HIGH+LOW)/2*0.98,(HIGH+LOW)/2*0.98,2,0),SHIFT1,LINETHICK1,colorAFB49C;
STICKLINE(BARSCOUNT(CLOSE)=SYSPARAM(1),(HIGH+LOW)/2*0.97,(HIGH+LOW)/2*0.97,5,0),SHIFT1,colorAFB49C;
STICKLINE(BARSCOUNT(CLOSE)=SYSPARAM(1),(HIGH+LOW)/2*0.95,(HIGH+LOW)/2*0.95,17,0),SHIFT1,colorFFFF;
DRAWBKBMP(CLOSE>=OPEN OR CLOSE<OPEN,'999');
VAR1:=(OPEN+LOW+HIGH+CLOSE)/4;
DRAWICON(CROSS(EMA(CLOSE,3),MA(CLOSE,10)),LOW,4);
DP:=IF(CLOSE=INDEXC,0,1);
GJ:=AMOUNT/VOL/100;
明日阻力:=LOW+GJ-LOW+CLOSE-LOW;
明日支撑:=LOW+CLOSE-GJ;
今日阻力:=REF(明日阻力,1);
今日支撑:=REF(明日支撑,1);
IF SYSPARAM(3)=2 THEN
A:=BARPOS;
IF SYSPARAM(3)=1 THEN
B:=BARPOS;
D:=A-B;
E:=HHV(HIGH,D);
DRAWTEXTEX(CLOSE,1,20,0,'---------------'),colorFFFFFF;
DRAWTEXTEX(CLOSE,1,20,80,'---------------'),colorFFFFFF;
DRAWTEXTEX(CLOSE,1,20,160,'---------------'),colorFFFFFF;
DRAWTEXTEX(CLOSE,1,20,240,'---------------'),colorFFFFFF;
DRAWTEXTEX(CLOSE,1,20,320,'---------------'),colorFFFFFF;
DRAWTEXTEX(CLOSE,1,20,40,'今日支撑=:'+NUMTOSTR(今日支撑,2)+''),colorFFFF;
DRAWTEXTEX(CLOSE,1,20,120,'今日阻力=:'+NUMTOSTR(今日阻力,2)+''),colorFF00;
DRAWTEXTEX(CLOSE,1,20,200,'明日支撑=:'+NUMTOSTR(明日支撑,2)),colorFF00FF;
DRAWTEXTEX(CLOSE,1,20,280,'明日阻力=:'+NUMTOSTR(明日阻力,2)),colorFFFF00;
DRAWTEXTEX(CLOSE,1,20,280,'明日阻力=:'+NUMTOSTR(明日阻力,2)),colorFFFF00;
STICKLINE(BARSCOUNT(CLOSE)=SYSPARAM(1),(HIGH+LOW)/2,(HIGH+LOW)/2,10,0),LINETHICK2,colorFFFF;
STICKLINE(BARSCOUNT(CLOSE)=SYSPARAM(1),(HIGH+LOW)/2*1.01,(HIGH+LOW)/2*1.01,2,0),SHIFT1,colorFFFF; |