市场情绪温度计主图:市场结构【通达信】与主力资金成本源代码

LIJIN1:=(3*CLOSE+LOW+OPEN+HIGH)/6;

LIJIN2:(20*LIJIN1+19*REF(LIJIN1,1)+18*REF(LIJIN1,2)+17*REF(LIJIN1,3)+16*REF(LIJIN1,4)+15*REF(LIJIN1,5)+14*REF(LIJIN1,6)+13*REF(LIJIN1,7)+12*REF(LIJIN1,8)+11*REF(LIJIN1,9)+10*REF(LIJIN1,10)+9*REF(LIJIN1,11)+8*REF(LIJIN1,12)+7*REF(LIJIN1,13)+6*REF(LIJIN1,14)+5*REF(LIJIN1,15)+4*REF(LIJIN1,16)+3*REF(LIJIN1,17)+2*REF(LIJIN1,18)+REF(LIJIN1,20))/210;

LIJIN3:MA(LIJIN2,6);

DRAWBAND(LIJIN2,RGB(128,128,0),LIJIN3,RGB(0,0,128));

STICKLINE(C>O,C,O,3,0),COLOR000077;

STICKLINE(C>O,C,O,2,0),COLOR000099;

STICKLINE(C>O,C,O,1,0),COLOR0000BB;

STICKLINE(C>O,H,L,0,0),COLOR0000FF;

STICKLINE(C<O,C,O,3,0),COLOR007700;

STICKLINE(C<O,C,O,2,0),COLOR009900;

STICKLINE(C<O,C,O,1,0),COLOR00BB00;

STICKLINE(C<O,H,L,0,0),COLOR00FF00;

STICKLINE(C=O,C,O,3,0),COLORWHITE;

STICKLINE(C=O,H,L,0,0),COLORWHITE;

STICKLINE(CLOSE>REF(CLOSE,1)*1.0985&&CLOSE=HIGH,CLOSE,OPEN,3,-1),COLORFF00FF;

STICKLINE(CLOSE<REF(CLOSE,1)*0.9015&&CLOSE=LOW,CLOSE,OPEN,3,-1),COLORF0F000;

DRAWRECTREL(0,0,300,800,RGB(0,0,100));

LIJIN4:=100*(1-WINNER(C));

LIJIN5:=100*WINNER(C);

LIJIN6:=COST(90);

LIJIN7:=COST(70);

LIJIN8:=COST(50);

LIJIN9:=COST(4);

LIJIN10:=HHV(H,9);

LIJIN11:=LLV(L,9);

LIJIN12:=REF(H,1);

LIJIN13:=REF(L,1);

LIJIN14:=REF(C,1);

LIJIN15:=(LIJIN12+LIJIN13+LIJIN14)/9;

LIJIN16:=9*LIJIN15-LIJIN13;

LIJIN17:=9*LIJIN15-LIJIN12;

LIJIN18:=LIJIN15+(LIJIN12-LIJIN13);

LIJIN19:=LIJIN15-(LIJIN12-LIJIN13);

DRAWTEXT_FIX(C>0,0,0.07,0,'【获利盘％】'),COLORRED;

DRAWTEXT_FIX(C>0,0,0.13,0,'【套牢盘％】'),COLOR00FF00;

DRAWTEXT_FIX(C>0,0,0.23,0,'【市场成本】'),COLORYELLOW;

DRAWTEXT_FIX(C>0,0,0.29,0,'【主力成本】'),COLOR008FFF;

DRAWTEXT_FIX(C>0,0,0.39,0,'【90％成本】'),COLORFFFFBF;

DRAWTEXT_FIX(C>0,0,0.45,0,'【70％成本】'),COLORF0F000;

DRAWTEXT_FIX(C>0,0,0.55,0,'【短期压力】'),COLORWHITE;

DRAWTEXT_FIX(C>0,0,0.61,0,'【短期支撑】'),COLORYELLOW;

DRAWTEXT_FIX(C>0,0.17,0.06,0,'【最高】'),COLORFF00FF;

DRAWTEXT_FIX(C>0,0.17,0.12,0,'【近高】'),COLORFF99FF;

DRAWTEXT_FIX(C>0,0.17,0.18,0,'【中价】'),COLORYELLOW;

DRAWTEXT_FIX(C>0,0.17,0.24,0,'【近低】'),COLORFFFFBF;

DRAWTEXT_FIX(C>0,0.17,0.30,0,'【最低】'),COLORF0F000;

DRAWNUMBER_FIX(C>0,0.09,0.07,0,CONST(LIJIN5)),COLORRED;

DRAWNUMBER_FIX(C>0,0.09,0.13,0,CONST(LIJIN4)),COLOR00FF00;

DRAWNUMBER_FIX(C>0,0.09,0.23,0,CONST(LIJIN8)),COLORYELLOW;

DRAWNUMBER_FIX(C>0,0.09,0.29,0,CONST(LIJIN9)),COLOR008FFF;

DRAWNUMBER_FIX(C>0,0.09,0.39,0,CONST(LIJIN6)),COLORFFFFBF;

DRAWNUMBER_FIX(C>0,0.09,0.45,0,CONST(LIJIN7)),COLORF0F000;

DRAWNUMBER_FIX(C>0,0.09,0.55,0,CONST(LIJIN10)),COLORWHITE;

DRAWNUMBER_FIX(C>0,0.09,0.61,0,CONST(LIJIN11)),COLORYELLOW;

DRAWNUMBER_FIX(C>0,0.23,0.06,0,CONST(LIJIN18)),COLORFF00FF;

DRAWNUMBER_FIX(C>0,0.23,0.12,0,CONST(LIJIN16)),COLORFF99FF;

DRAWNUMBER_FIX(C>0,0.23,0.18,0,CONST(LIJIN15)),COLORYELLOW;

DRAWNUMBER_FIX(C>0,0.23,0.24,0,CONST(LIJIN17)),COLORFFFFBF;

DRAWNUMBER_FIX(C>0,0.23,0.30,0,CONST(LIJIN19)),COLORF0F000;