| 量学主图+自用成交量（源码 主图+副图 通达信 贴图）
所属地区:DRAWTEXT_FIX(1,0,0,0,地区：),COLORYELLOW;DRAWTEXT_FIX(1,0.05,0,0,DYBLOCK),COLORYELLOW;所属行业:DRAWTEXT_FIX(1,0,0.08,0,行业：),COLORYELLOW;DRAWTEXT_FIX(1,0.05,0.08,0,HYBLOCK),COLORYELLOW;所属概念:DRAWTEXT_FIX(1,0,0.16,0,概念：),COLORYELLOW;DRAWTEXT_FIX(1,0.05,0.16,0,GNBLOCK),COLORYELLOW;所属风格:DRAWTEXT_FIX(1,0,0.24,0,风格：),COLORYELLOW;DRAWTEXT_FIX(1,0.05,0.24,0,FGBLOCK),COLORYELLOW;{当前价格线}收盘价:REFDATE(C,DATE),DOTLINE,COLORLIGREEN;{确定基柱}JZ:=V/REF(V,1)>=1.9 AND C>O ;{确定将军柱}A1:=O<MIN(MIN(REFX(L,1),REFX(L,2)),REFX(L,3)) OR O<(REFX(L,1)+REFX(L,2)+REFX(L,3))/3;JJZ:=JZ AND A1;STICKLINE(JJZ,C,O,3,0),COLORRED;DD:=MIN(MIN(REFX(L,1),REFX(L,2)),REFX(L,3));{确定黄金柱}A2:=V>REFX(V,1) AND REFX(V,1)>REFX(V,2) AND REFX(V,2)>REFX(V,3);A3:=C<REFX(L,1) AND REFX(L,1)<REFX(L,2) AND REFX(L,2)<REFX(L,3) AND REFX(C,3)>REFX(O,3);DRAWICON(JZ AND A2 AND A3,L,1);STICKLINE(JZ AND A2 AND A3,C,O,3,0),COLORYELLOW;{画出黄金线}AA:=REF(DD,BARSLAST(JJZ));{必杀线}T1B:=CONST(LLVBARS(LOW,10));T1HIGH:=CONST(REF(HIGH,T1B));CC:=CONST(CURRBARSCOUNT);T2B:=CONST(BARSLAST(CURRBARSCOUNT>CC+T1B AND H>T1HIGH));T2HIGH:=CONST(REF(HIGH,T2B));T3:=CONST(BARSLAST(CURRBARSCOUNT>CC+T2B AND HIGH>T2HIGH));T3HIGH:=CONST(REF(HIGH,T3));必杀线:DRAWLINE(CURRBARSCOUNT=T3+1, T3HIGH, ISLASTBAR, T3HIGH, 1),COLORRED,LINETHICK3;{,LINETHICK2,COLOR0000FF;}DRAWTEXT(ISLASTBAR, T3HIGH, 必杀线)LINETHICK1,COLORWHITE;MA5K:必杀线,COLORYELLOW,LINETHICK1;EXP7:EMA(CLOSE,7);VAR2:EMA(C,21),COLORRED,LINETHICK1;上翘:IF(VAR2>REF(VAR2,1),VAR2,DRAWNULL),,COLORRED,LINETHICK1;下拐:IF(VAR2<REF(VAR2,1),VAR2,DRAWNULL),COLORGREEN,LINETHICK1; VAR1:MA(C,105),COLORRED;上升:IF(VAR1>REF(VAR1,1),VAR1,DRAWNULL),LINETHICK2,COLORRED;下降:IF(VAR1<REF(VAR1,1),VAR1,DRAWNULL),LINETHICK2,COLORGREEN;年线:MA(C,360),COLORWHITE POINTDOT;IF(年线>=REF(年线,1),年线,DRAWNULL),LINETHICK3,COLORRED;IF(年线<=REF(年线,1),年线,DRAWNULL),LINETHICK3,COLORGREEN;P:=8;KE:=V*(H-L)/REF(C,1);KEP:=KE=HHV(KE,P);KUD:=BARSLAST(KEP);{红平台收:IF(IF(KUD=0,C>REF(C,1),REF(C,KUD)>REF(REF(C,1),KUD)),IF(KUD=0,C,REF(C,KUD)),DRAWNULL),POINTDOT,COLORYELLOW;}红平台低:IF(IF(KUD=0,C>REF(C,1),REF(C,KUD)>REF(REF(C,1),KUD)),IF(KUD=0,L,REF(L,KUD)),DRAWNULL),POINTDOT,COLORWHITE;回调警戒:IF(IF(KUD=0,C>REF(C,1),REF(C,KUD)>REF(REF(C,1),KUD)),IF(KUD=0,C-(C-REF(C,1))*0.618,REF(C-(C-REF(C,1))*0.618,KUD)),DRAWNULL),POINTDOT,COLORBLUE;绿平台收:IF(IF(KUD=0,C<REF(C,1),REF(C,KUD)<REF(REF(C,1),KUD)),IF(KUD=0,C,REF(C,KUD)),DRAWNULL),POINTDOT,COLORGREEN;企稳警戒:IF(IF(KUD=0,C<REF(C,1),REF(C,KUD)<REF(REF(C,1),KUD)),IF(KUD=0,C+(REF(C,1)-C)*0.618,REF(C+(REF(C,1)-C)*0.618,KUD)),DRAWNULL),POINTDOT,COLORLIRED;{STICKLINE(IF(KUD=0,C>REF(C,1),REF(C,KUD)>REF(REF(C,1),KUD)),红平台收,红平台收,6,1),COLORYELLOW;}STICKLINE(IF(KUD=0,C>REF(C,1),REF(C,KUD)>REF(REF(C,1),KUD)),红平台低,红平台低,6,1),COLORWHITE;STICKLINE(IF(KUD=0,C>REF(C,1),REF(C,KUD)>REF(REF(C,1),KUD)),回调警戒,回调警戒,6,1),COLORBLUE;STICKLINE(IF(KUD=0,C<REF(C,1),REF(C,KUD)<REF(REF(C,1),KUD)),绿平台收,绿平台收,6,1),COLORGREEN;STICKLINE(IF(KUD=0,C<REF(C,1),REF(C,KUD)<REF(REF(C,1),KUD)),企稳警戒,企稳警戒,6,1),COLORLIRED;
|
