%>
input:N1(12,1,100);
DRAWGBK(CLOSE<HHV(HIGH,0),COLORRGB(60,15,35),COLORRGB(50,50,90),1);
A1:=EMA((2*CLOSE+HIGH+LOW)/4,N1);
A2:=EMA(A1,2);
A3:=EMA(A2,2);
A4:=EMA(A3,2);
A5:=EMA(A4,2);
A6:=EMA(A5,2);
A7:=EMA(A6,2);
A8:=EMA(A7,2);
A9:=EMA(A8,2);
A10:=EMA(A9,2);
A11:=EMA(A10,2);
A12:=EMA(A11,2);
A13:=EMA(A12,2);
A14:=EMA(A13,2);
A15:=EMA(A14,2);
FILLRGN(A1>A15,A1,A15),LINETHICK3,colorFF;
STICKLINE(A1>A15,A1,A15,1,0),POINTDOT,LINETHICK1,colorFF0000;
下线1:HHV(FORCAST(CLOSE,10),18),colorE66878;
下线2:HHV(FORCAST(CLOSE,10),14),colorF0F000;
下线3:HHV(FORCAST(CLOSE,10),10),colorFFFF;
下线4:HHV(FORCAST(CLOSE,10),6),colorFF00;
上线:FORCAST(CLOSE,10),LINETHICK1,colorFF;
X1:=REF(HIGH,1)-REF(HIGH,2)>=REF(HIGH,1)*1.03;
X2:=CLOSE/OPEN>1.05 AND CLOSE-REF(CLOSE,1)>=X1;
X3:=X2+REF(CLOSE,1);
DRAWTEXT(X2 AND X3,HIGH+0.09,'∨'),colorFF00;
LC:=REF(CLOSE,1);
RSI:=(SMA(MAX(CLOSE-LC,0),6,1))/(SMA(ABS(CLOSE-LC),6,1))*100;
DRAWICON(CROSS(RSI,11),LOW*0.99,10),ALIGN1;
STICKLINE(CLOSE>OPEN,CLOSE,HIGH,0.1,0),colorFF;
STICKLINE(CLOSE>OPEN,OPEN,LOW,0.1,0),colorFF;
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,5,0),LINETHICK2,color5050FF;
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,4,0),color5050FF;
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,3.6,0),color5F5FFF;
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,3,0),color5F5FFF;
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,2.5,0),color6C6CFF;
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,2,0),color6C6CFF;
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,2.4,0),color7E7EFF;
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,2,0),color7E7EFF;
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,1.3,0),color9D9DFF;
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,1,0),color9D9DFF;
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,2.2,0),colorAFAFFF;
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,2,0),colorAFAFFF;
STICKLINE(CLOSE<OPEN,CLOSE,OPEN,1.2,0),colorC1C1FF;
STICKLINE(CLOSE<OPEN,CLOSE,OPEN,0.5,0),colorC1C1FF;
STICKLINE(CLOSE<=OPEN,CLOSE,OPEN,3,0),color9900;
STICKLINE(CLOSE<OPEN,CLOSE,HIGH,0.1,0),colorFF8A85;
STICKLINE(CLOSE<OPEN,OPEN,LOW,0.1,0),colorFF8A85;
STICKLINE(CLOSE<OPEN,CLOSE,OPEN,5,0),LINETHICK2,color8200;
STICKLINE(CLOSE<OPEN,CLOSE,OPEN,4,0),color138B13;
STICKLINE(CLOSE<OPEN,CLOSE,OPEN,3,0),color279227;
STICKLINE(CLOSE<OPEN,CLOSE,OPEN,2,0),color419D41;
STICKLINE(CLOSE<OPEN,CLOSE,OPEN,2,0),color62AB62;
STICKLINE(CLOSE<OPEN,CLOSE,OPEN,2,0),color80B980;
STICKLINE(CLOSE<OPEN,CLOSE,OPEN,2,0),color90BE90;
STICKLINE(CLOSE<OPEN,CLOSE,OPEN,1,0),color9FC49E;
STICKLINE(CLOSE<OPEN,CLOSE,OPEN,0.5,0),colorB1CCB1;
A11:=MA(WINNER(CLOSE),9)*100;
B11:=CROSS(A11,1.8);
D11:=B11>0;
DRAWTEXT(D11,LOW-0.1,'┻'),colorFFFF;
LC:=REF(CLOSE,1);
RSI:=(SMA(MAX(CLOSE-LC,0),6,1))/(SMA(ABS(CLOSE-LC),6,1))*100;
E1:=CROSS(83,RSI);
DRAWTEXT(E1,HIGH+0.15,'Ⅹ'),colorFFAAFF;
系统成本:=COST(50);
起步成本:=COST(10);
当日换手:=((VOL / CAPITAL) * 100);
十日换手:=SUM(当日换手,10);
百日换手:=SUM(当日换手,100);
LC:=REF(CLOSE,1);
RSI:=SMA(MAX(CLOSE-LC,0),6,1)/SMA(ABS(CLOSE-LC),6,1)*100;
跑了不悔:=if(CROSS(84,RSI),HIGH*1.02,high+1),PRECISION2,linethick0,COLORWHITE;
CB1:=EMA(COST(5),5);
CB2:=EMA(COST(13),5);
CB3:=EMA(COST(34),5);
CB4:=llv(CB1,34);
CB5:=llv(CB2,34);
CB6:=llv(CB3,34);
CB7:=EMA(C,5);
CB8:=llv(CB7,34);
{成本}
一关:=IF(CB1>CB4,CB1,CB4);
二关:=IF(CB2>CB5,CB2,CB5);
三关:=IF(CB3>CB6,CB3,CB6);
冲关:=IF(CB7>CB8,CB7,CB8);
p:=SYSPARAM(1);
DRAWTEXTEX(系统成本,1,1, 50,'系统成本 '+NUMTOSTR(系统成本[p],2)+' 元'),COLORWHITE;
DRAWTEXTEX(起步成本,1,1,150,'起步成本 '+NUMTOSTR(起步成本[p],2)+' 元'),COLORYELLOW;
DRAWTEXTEX(当日换手,1,1,250,'当日换手 '+NUMTOSTR(当日换手[p],2)+' %'),COLORMAGENTA;
DRAWTEXTEX(十日换手,1,1,350,'十日换手 '+NUMTOSTR(十日换手[p],2)+' %'),COLORGREEN;
DRAWTEXTEX(百日换手,1,1,450,'百日换手 '+NUMTOSTR(百日换手[p],2)+' %'),COLORWHITE;
DRAWTEXTEX(跑了不悔,1,200, 50,'跑了不悔 '+NUMTOSTR(跑了不悔[p],2)+' 元'),COLORWHITE;
DRAWTEXTEX(一关,1,200,150,'一关 '+NUMTOSTR(一关[p],2)+' 元'),COLORYELLOW;
DRAWTEXTEX(二关,1,200,250,'二关 '+NUMTOSTR(二关[p],2)+' 元'),COLORMAGENTA;
DRAWTEXTEX(三关,1,200,350,'三关 '+NUMTOSTR(三关[p],2)+' 元'),COLORGREEN;
DRAWTEXTEX(冲关,1,200,450,'冲关 '+NUMTOSTR(冲关[p],2)+' 元'),COLORWHITE;
{}
jQCB:=EMA(C,3);
DScj1:=PEAKBARS(3,5,1);
DScj2:=TROUGHBARS(3,5,1);
DScj3:=PEAKBARS(2,5,1);
峰号:=DATACOUNT-DScj1[DATACOUNT];
谷号:=DATACOUNT-DScj2[DATACOUNT];
点石0:=MA(LLV(jQCB,3),DScj2+1);
成金0:=MA(HHV(jQCB,1),DScj3+1);
压力0:=MA(WMA(h,2),DScj1+1);
DRAWICON(BARPOS=峰号,H*1.02,12);//预警信号
DRAWICON(BARPOS=谷号,L*0.98,10);//预警信号
DRAWNUMBER(BARPOS=峰号,H*1.02,jQCB,2),PXUP26,ALIGN,COLORWHITE,SHIFT1;
DRAWNUMBER(BARPOS=谷号,L*0.98,jQCB,2),PXUP26,ALIGN,COLORBROWN,SHIFT1;
DRAWTEXT(BARPOS=峰号,H*1.02,'▼'),ALIGN,ColorFF9700,SHIFT1;
DRAWTEXT(BARPOS=谷号,L*0.98,'▲'),ALIGN,COLORRED,SHIFT1;
//DRAWTEXT(BARPOS=SYSPARAM(2),C,'■预警信号 -- 信号灯(不可操作!)'),align4,PXDN6,COLORWHITE;
asv:=DScj3>0 and CROSS(成金0,ref(成金0,1));
asw:=BARSLAST(BARPOS=谷号)>0;
DRAWNUMBER(asv and asw,L*0.98,jQCB,2),ALIGN,Color0089FF;
DRAWTEXT(asv and asw,L*0.98,'▲'),PXUP26,ALIGN,Color0089FF;
//
{股票教程网-股票公式网站 www.gwgz.net}
var31:=hhvbars(zig(3, 19)>ref(zig(3,19),1)
and ref(zig(3,19), 1)<ref(zig(3,19), 2),0);
stickline(var31=2,l*0.95,l*0.98,8,0),color0000ff;
drawtext(var31=2,l*0.95,'3天'),coloryellow;
stickline(var31=4,h*1.05,h*1.02,8,0),color9966ff;
drawtext(var31=4,h*1.06,'5天'),coloryellow;
stickline(var31=7,l*0.95,l*0.98,8,0),color00ffff;
drawtext(var31=7,l*0.95,'8天'),coloryellow;
stickline(var31=12,h*1.05,h*1.02,8,0),colorff33ff;
drawtext(var31=12,h*1.06,'13天'),coloryellow;
stickline(var31=20,l*0.95,l*0.98,8,0),color0066ff;
drawtext(var31=20,l*0.95,'21天'),coloryellow;
stickline(var31=33,h*1.05,h*1.02,8,0),colorffff00;
drawtext(var31=33,h*1.06,'34天'),coloryellow;
stickline(var31=54,l*0.95,l*0.98,8,0),color006600;
drawtext(var31=54,l*0.95,'55天'),coloryellow;
stickline(var31=88,h*1.05,h*1.02,8,0),color00ff00;
drawtext(var31=88,h*1.06,'89天'),coloryellow;
stickline(var31=143,l*0.95,l*0.98,8,0),colorccffff;
drawtext(var31=143,l*0.95,'144天'),coloryellow;
stickline(var31=232 ,h*1.05,h*1.02,8,0),colorff0033;
drawtext(var31=232,h*1.06,'233天'),coloryellow;
stickline(var31=376,l*0.95,l*0.98,8,0),colorff9966;
drawtext(var31=376,l*0.95,'377天'),coloryellow;