打印本文
關(guān)閉窗口
相關(guān)標(biāo)簽:
?
原理解析：
源碼：
?
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'+'權(quá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+' 發(fā)行價'+NUMTOSTR(FINANCE(51),2)+'元'+' 發(fā)行量'+NUMTOSTR(FINANCE(52),2)+'萬股'+'\n'+'總股本'+NUMTOSTR(FINANCE(1),0)+'萬股'+' 流通A股'+NUMTOSTR(FINANCE(7),0)+'萬股'+' 凈資產(chǎn)'+NUMTOSTR(FINANCE(35),2)+'億元'+' 每股收益'+NUMTOSTR(FINANCE(33),2)+'元'+' 每股未分配'+NUMTOSTR(FINANCE(32),2)+'元'+' 市盈率'+NUMTOSTR(DYNAINFO(39),2)+'%'+' 投資收益'+NUMTOSTR(FINANCE(24),2)+'元'+' 股東總數(shù)'+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;
光標(biāo)年:=STRRIGHT(NUMTOSTR(VARDATE[VARS]/10000,0),2)+'年';
光標(biāo)月:=STRLEFT(STRRIGHT(NUMTOSTR(VARDATE[VARS],0),4),2)+'月';
光標(biāo)日:=STRRIGHT(NUMTOSTR(VARDATE[VARS],0),2)+'日';
A:=VARSS-VARS;
DRAWTEXT(CROSS(BACKSET(ISLASTBAR,MAX(35,A)),1),LOW,光標(biāo)年+光標(biāo)月+光標(biāo)日+'至今'),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,'因為專業(yè) 所以成功QQ:87041989'),ALIGN3,colorFFCC33;
DRAWTEXT(SYSPARAM(2)=BARPOS,HIGH,'操作：以今日中價作為介入點(diǎn)（熊市不追高），漲跌5%作為止盈止損點(diǎn)，在次日K線位畫線作為提示，可以調(diào)整。 '),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;{來源:m.weiqiv.net.cn 程序化交易}
?
公式導(dǎo)入教程: 【通達(dá)信公式源碼導(dǎo)入方法教程】 【同花順公式源碼導(dǎo)入方法教程】 【大智慧新一代公式源碼導(dǎo)入方法教程】
?