[转载]分时K线(源码+图)
input:LONG(26,20,100),SHORT(12,5,40),M(9,2,60);[code]
a1:=1;
a2:=DYNAINFO(14);
a3:=(FINANCE2(37));
a4:=(FINANCE2(3));
a5:=DYNAINFO(17);
a6:=(MA(CLOSE,0)) * a1;
a7:=(MA(a6,0)) * a1;
a8:=a6 - a7;
STICKLINE((a6 > a7),a6,a7,0.8,501),linethick1,colorRed;
STICKLINE((a7 > a6),a6,a7,0.8,1),linethick1;
DRAWICON(((CROSS(a7,a6)) AND (TIME > 93200)),a6,8),colorGreen;
DRAWICON(((CROSS(a6,a7)) AND (TIME > 93200)),a6,7),colorYellow;
DRAWTEXTABS(10,10,STKLABEL+' '+STKNAME+' '+BKNAME),COLOR00FFFF;
DRAWTEXTABS(CLOSE,25,' ======================'),COLORRED;
DRAWTEXTABS(CLOSE,105,' ======================'),COLORRED;
DRAWTEXTABS(CLOSE,41,' 买入条件 E13 CCI'),colorYellow;
DRAWTEXTABS(CLOSE,57,' 买入时间 2:30以后' ),colorYellow;
E:=(HIGH+LOW+OPEN+2*CLOSE)/5;
明日阻力:=2*E-LOW;
明日支撑:=2*E-HIGH;
明日突破:=E+(HIGH-LOW);
明日反转:=E-(HIGH-LOW);
今日阻力:=REF(明日阻力 , 1);
今日支撑:=REF(明日支撑 , 1);
DRAWTEXTABS(200,25,'今日阻力=:'+NUMTOSTR(今日阻力)),ColorFFFF00;
DRAWTEXTABS(200,41,'今日支撑=:'+NUMTOSTR(今日支撑)),Colorred;
DRAWTEXTABS(200,57,'明日突破=:'+NUMTOSTR(明日突破)),ColorFF00FF;
DRAWTEXTABS(200,73,'明日阻力=:'+NUMTOSTR(明日阻力)),ColorFFFF00;
DRAWTEXTABS(200,89,'明日支撑=:'+NUMTOSTR(明日支撑)),COLORRED;
DRAWTEXTABS(200,105,'明日反转=:'+NUMTOSTR(明日反转)),COLORYellow;
预测1:=(C+H+L)/3;
预测2:=H-L;
预测4:=预测1+预测2;
预测5:=预测1-预测2;
预测6:=2*预测1-L;
预测7:=2*预测1-H;
预测9:=BARSTATUS=2;
STICKLINE(预测9>0 AND 预测6>REF(C,1),预测4,预测5,1,1000),COLOR102070,LINETHICK2;
STICKLINE(预测9>0 AND 预测6>REF(C,1),预测4,预测5,0,1000),COLOR1020E0,LINETHICK2;
STICKLINE(预测9>0 AND 预测6>REF(C,1),预测6,预测7,8,1000),COLOR102070,LINETHICK2;
STICKLINE(预测9>0 AND 预测6>REF(C,1),预测6,预测7,7,1000),COLOR102080,LINETHICK2;
STICKLINE(预测9>0 AND 预测6>REF(C,1),预测6,预测7,6,1000),COLOR102090,LINETHICK2;
STICKLINE(预测9>0 AND 预测6>REF(C,1),预测6,预测7,5,1000),COLOR1020A0,LINETHICK2;
STICKLINE(预测9>0 AND 预测6>REF(C,1),预测6,预测7,4,1000),COLOR1020B0,LINETHICK2;
STICKLINE(预测9>0 AND 预测6>REF(C,1),预测6,预测7,3,1000),COLOR1020C0,LINETHICK2;
STICKLINE(预测9>0 AND 预测6>REF(C,1),预测6,预测7,2,1000),COLOR1020D0,LINETHICK2;
STICKLINE(预测9>0 AND 预测6>REF(C,1),预测6,预测7,1,1000),COLOR1020E0,LINETHICK2;
STICKLINE(预测9>0 AND 预测6<=REF(C,1),预测4,预测5,1,1000),COLOR105510,LINETHICK2;
STICKLINE(预测9>0 AND 预测6<=REF(C,1),预测4,预测5,0,1000),COLOR10CC10,LINETHICK2;
STICKLINE(预测9>0 AND 预测6<=REF(C,1),预测6,预测7,8,1000),COLOR105510,LINETHICK2;
STICKLINE(预测9>0 AND 预测6<=REF(C,1),预测6,预测7,7,1000),COLOR106610,LINETHICK2;
STICKLINE(预测9>0 AND 预测6<=REF(C,1),预测6,预测7,6,1000),COLOR107710,LINETHICK2;
STICKLINE(预测9>0 AND 预测6<=REF(C,1),预测6,预测7,5,1000),COLOR108810,LINETHICK2;
STICKLINE(预测9>0 AND 预测6<=REF(C,1),预测6,预测7,4,1000),COLOR109910,LINETHICK2;
STICKLINE(预测9>0 AND 预测6<=REF(C,1),预测6,预测7,3,1000),COLOR10AA10,LINETHICK2;
STICKLINE(预测9>0 AND 预测6<=REF(C,1),预测6,预测7,2,1000),COLOR10BB10,LINETHICK2;
STICKLINE(预测9>0 AND 预测6<=REF(C,1),预测6,预测7,1,1000),COLOR10CC10,LINETHICK2;
gj:=if(c=INDEXC,(INDEXC+INDEXh+INDEXl+INDEXO)/4,AMOUNT/(v+0.01)/100);
[/code][attach]4509[/attach]
页:
[1]