INPUT: P1(1,0,10),M(1,0,12),P2(2,0,20),N(21,3,60),N1(3,3,5),ZZ(1,1,3),P3(3,0,10),P4(1,0,4),M10(5,1,20);
c1:=(C+2*H+L+O)/5; a1:=EMA((EMA(c1,1)+EMA(c1,3)+EMA(c1,5))/3,3); a2:=EMA((EMA(c1,6)+EMA(c1,8)+EMA( c1,10))/3,3); a3:=EMA((EMA(c1,10)+EMA(c1,12)+EMA( c1,14))/3,3); a4:=EMA((EMA(c1,14)+EMA(c1,16)+EMA( c1,18))/3,3); a5:=EMA((EMA(c1,18)+EMA(c1,20)+EMA( c1,22))/3,3); a6:=EMA((EMA(c1,22)+EMA(c1,24)+EMA(c1,26))/3,3); a:=EMA((EMA(c1,29)+EMA(c1,31)+EMA(c1,33))/3,3); tj:=c1>a; tj2:=c1>OPEN or c1=OPEN and c1>REF(c1,1); STICKLINE(tj2,H,L,0.5,0),colorred; STICKLINE(tj,O,C,8,0),color102088; STICKLINE(tj,O,C,7,0),color102099; STICKLINE(tj,O,C,6,0),color1020aa; STICKLINE(tj,O,C,5,0),color1020bb; STICKLINE(tj,O,C,4,0),color1020cc; STICKLINE(tj,O,C,3,0),color1020dd; STICKLINE(tj,O,C,2,0),color1020ee; STICKLINE(tj,O,C,1,0),color1020ff; STICKLINE(NOT(tj),O,C,8,0),colorff7700; STICKLINE(NOT(tj),O,C,7,0),colorff8800; STICKLINE(NOT(tj),O,C,6,0),colorff9900; STICKLINE(NOT(tj),O,C,5,0),colorffaa00; STICKLINE(NOT(tj),O,C,4,0),colorffbb00; STICKLINE(NOT(tj),O,C,3,0),colorffcc00; STICKLINE(NOT(tj),O,C,2,0),colorffdd00; STICKLINE(NOT(tj),O,C,1,0),colorffee00; c11:=REF(C,1); c2:=HHV(c11,2); c3:=LLV(c11,1); et:=HHV(c11,2); et1:=REF(et,1); xb:=LLV(c11,1); xb1:=REF(xb,1); s:=BARSLAST(C<xb and c11>=xb1); m1:=REF(m,1); n9:=BARSLAST(C>et and c11<=et1); s1:=REF(n9,1); m2:=BARSLAST(m-n9>0 and m1<=n1)+1; n2:=BARSLAST(n9-m>0 and n1<=m1)+1; et2:=HHV(et,m2); xb2:=LLV(xb,n2); app:=IF(m-n9>0 and m1<=n1,1,IF(n9-m>0 and n1<=m1,0,2)); h11:=IF(m-n9>0,C,et2); h2:=IF(app=1,C,c2); h3:=IF(m-n9<0,C,xb2); h4:=IF(app=1,C,xb2); 关键位:=IF(m-n9>0 or app=1 ,CLOSE,h3); m1:MA(C,3); 多空线:MA(C,8),Color00FFFF; 生命线:MA(C,21),Color00FF00; 均线变异:=IF(m1>生命线,生命线,m1); PARTLINE(多空线,多空线<ref(多空线,1),RGB(255,0,255)),ColorFF00FF,linethick2; PARTLINE(均线变异,均线变异>REF(均线变异,1) and 均线变异=生命线,RGB(255,0,0)),Color00FF00,linethick2; var1:=(HHV(H,n)-C)/(HHV(H,n)-LLV(L,n))*100; var3:=(C-LLV(L,n))/(HHV(H,n)-LLV(L,n))*100; var6:=var3-var1; z:=MA(var6,n1); DRAWTEXT(IF(CROSS(z,0),1,0),L,'平空开多!'),linethick1,color0066ff; DRAWTEXT(IF(CROSS(0,z),1,0),H,'平多开空!'),linethick1,color0066ff; Var2:=LLV(L,11); Var3:=HHV(H,25); 警戒线:= p1 ; 减仓线:= p2 ; 卖出线:= p3 ; 空头线:=p4; 动力线:= EMA((C-Var2)/(Var3-Var2)*4,4); DRAWTEXT(IF(CROSS(动力线,警戒线),1,0),C+0.03,'预警 '),colorwhite; DRAWTEXT(IF(CROSS(动力线,减仓线),1,0),C+0.06,'减磅 '),COLORYELLOW; DRAWTEXT(IF(CROSS(动力线,卖出线),1,0),C+0.09,'出局?'),COLORGREEN; DRAWTEXT(IF(CROSS(动力线,空头线),1,0),C-0.02,'与虎谋皮 '),COLORRED; DRAWTEXT(IF(CROSS(警戒线,动力线),1,0),C-0.09,'预警确认 '),COLORRED; DRAWTEXT(IF(CROSS(减仓线,动力线),1,0),C-0.06,'减磅确认 '),COLORRED; DRAWTEXT(IF(CROSS(卖出线,动力线),1,0),C-0.05,'出局确认'),COLORRED; DRAWTEXT(IF(CROSS(空头线,动力线),1,0),C-0.05,'虎皮到手'),COLORRED; DRAWICON(CROSS(动力线,警戒线),h+0.01,1); DRAWICON(CROSS(动力线,减仓线),h+0.01,3); DRAWICON(CROSS(动力线,卖出线),H+0.01,4); WW:=(MA(C,3)+MA(C,8)+MA(C,15)+MA(C,34))/4; DRAWICON(CROSS(C,WW),LOW-0.02,4); DRAWICON(CROSS(WW,C),HIGH+0.04,5); DRAWTEXT(CROSS(C,WW),LOW-0.02,' 开多'),Color0000FF; DRAWTEXT(CROSS(WW,C),HIGH+0.06,' 多平'),Color8080FF; mA1:=MA(C,S); mA2:MA(C,P3),linethick3,color6600FF; mA3:MA(C,P2),linethick2,color00ffff; mA4:MA(C,P1),linethick1,colorffffff; MA6:=MA(C,S); a:=HHV(MA((LOW+HIGH+C)/3,17),60); b:=LLV(MA((LOW+HIGH+C)/3,1),40); STICKLINE(C<OPEN and REF(C,1)>REF(O,1),REF(C,1),REF(C,1),20,0),COLORFFFFFF; DRAWTEXT(FILTER(EMA(C,40)-EMA(C,8)>0 AND EMA(C,8)/L>1.16,3),LOW-0.02,'●'),linethick3 , COLORMAGENTA; DRAWTEXT(FILTER(EMA(C,8)-EMA(C,40)>0 AND HIGH/EMA(C,8)>1.16,3),HIGH+0.02,'●'),linethick3 ,color99ff00;
|
