diffa:=MA((HHV(H,a)+MA(C,a)+LLV(L,a)+MA(O,a))/4,b/2,1),colorwhite; diffb:=MA((HHV(H,a)+MA(C,a)+LLV(L,a)+MA(O,a))/4,b,1),colorwhite;
diff:IF(diffa>diffb,diffa,diffb),colorwhite;
deaa:=SMA((HHV(H,a)+MA(C,a)+LLV(L,a)+MA(O,a))/4,d-10,1),coloryellow;
deab:=SMA((HHV(H,a)+MA(C,a)+LLV(L,a)+MA(O,a))/4,d,1),coloryellow;
dea:IF(deaa>deab,deaa,deab),coloryellow;
dk1:=SMA((HHV(H,a)+MA(C,a)+LLV(L,a)+MA(O,a))/4,d+30,1),colorliblue;
dk2:=SMA((HHV(H,a)+MA(C,a)+LLV(L,a)+MA(O,a))/4,e,1),colorliblue;
dk:IF(dk1>dk2,dk1,dk2),colorliblue;
DRAWTEXT(CROSS(ZIG(3,9),REF(ZIG(3,9),1)),O-O*0.05,'Bu□') ,LINETHICK1,coloryellow;
DRAWTEXT(CROSS(REF(ZIG(3,10),1),ZIG(3,10)),C+C*0.05,'■Se'),colorgreen;
{DRAWNUMBER(CROSS(ZIG(3,9),REF(ZIG(3,9),1)),O-O*0.01,O),colorgreen;} //309
{DRAWNUMBER(CROSS(REF(ZIG(3,10),1),ZIG(3,10)),C+C*0.02,O),colorcyan;} //310
B:=(diff-REF(diff,5))/REF(diff,5)*100,NODRAW;
B1:=(dea-REF(dea,1))/REF(dea,1)*100,NODRAW;
支撑:IF(B1>=0,REF(dea,BARSLAST(CROSS(B1,0))+1),DRAWNULL),colorgreen,LINETHICK2;
阻力:IF(B<0,REF(diff,BARSLAST(CROSS(0,B))+1),DRAWNULL),colormagenta,LINETHICK2;
STICKLINE(MA(C,1)>REF(MA(C,1),1),H,REF(MA(C,1),1),1,1),colorred;
STICKLINE(MA(C,1)>REF(MA(C,1),1),MA(C,1),REF(MA(C,1),1),9,1),colorred;
STICKLINE(MA(C,1)<=REF(MA(C,1),1),MA(C,1),REF(MA(C,1),1),9,0),colorcyan;
STICKLINE(MA(C,1)<=REF(MA(C,1),1),L,REF(MA(C,1),1),1,0),colorcyan;
JZ:JZCMG,nodraw,colorgreen;
SY:MGSY,nodraw,colorred;
GZ:JZ+SY,nodraw,w,colorliblue;
利:100*MGSY/GZ,nodraw,colorlired;
膨胀60:=MA(C,60)/gz,nodraw,colorwhite;
回本年60:=MA(C,60)/MGSY,nodraw,coloryellow;
系:膨胀60*(4/利),nodraw,coloryellow; ////标准投资汇报年,几年回本
净:MA(C,5)/GZ,nodraw,colorgreen;
总:ZGB/100000000,nodraw,colorlired;
流:SHGZG/100000000,nodraw,coloryellow;
盘:流*MA(C,85),nodraw,colorgreen;
游:流*0.01,nodraw,coloryellow;
P:MA(C,2)/MGSY,nodraw,colorgreen;
//换:(SUM(V,5)/SHGZG)*(100)/x,colorgreen;
未:WFPLR/ZGB,nodraw,coloryellow;
评分:=TOSTRING('评分:',1);
综合:=TOSTRING((系+净)/2,3);
DRAWTEXT_FIX(ISLASTBAR,0.9,0.2,0,评分),coloryellow;
DRAWTEXT_FIX(ISLASTBAR,0.93,0.2,0,综合),coloryellow;
解禁:=TOSTRING('解禁:',1);
比值:=TOSTRING(流/总,3);
DRAWTEXT_FIX(ISLASTBAR,0.9,0.1,0,解禁),coloryellow;
DRAWTEXT_FIX(ISLASTBAR,0.93,0.1,0,比值),coloryellow;
jing:=TOSTRING('净:',1);
比:=TOSTRING(净,3);
DRAWTEXT_FIX(ISLASTBAR,0.9,0.02,0,jing),colorgreen;
DRAWTEXT_FIX(ISLASTBAR,0.92,0.02,0,净),colorgreen;
百分率1:=TOSTRING(支撑/REF(PEAK(3,10,1),1)-1,3);
DRAWTEXT_FIX(ISLASTBAR,0.92,0.35,0,百分率1),colorcyan;
百分率2:=TOSTRING(C/支撑-1,3);
DRAWTEXT_FIX(ISLASTBAR,0.925,0.3,0,百分率2),colorlired;
百分率3:=TOSTRING(C/阻力-1,3);
DRAWTEXT_FIX(ISLASTBAR,0.97,0.45,0,百分率3),colorgreen;
百分率4:=TOSTRING(C/支撑-2+支撑/REF(PEAK(3,10,1),1),3);
DRAWTEXT_FIX(ISLASTBAR,0.925,0.4,0,百分率4),coloryellow;
百分率5:=TOSTRING((ABS(支撑/REF(PEAK(3,10,1),1)-1)*0.6+1)*支撑,2);
DRAWTEXT_FIX(ISLASTBAR,0.925,0.45,0,百分率5),colorlired;
//K1:(ABS(支撑/REF(PEAK(3,10,1),1)-1)*0.6+1)*支撑,colorcyan;
//K2:(ABS(支撑/REF(PEAK(3,10,1),1)-1)*0.9+1)*支撑,colormagenta;
//K3:(ABS(支撑/REF(PEAK(3,10,1),1)-1)*0.3+1)*支撑,colorgreen;
|
