大智慧实用操盘副图指标
源码
DRAWGBKLAST(v>1,STRIP(RGB(0,0,205),RGB(60,179,113),0));
{获利盘均线 图示解股}
生命线:SMA(winner(C),120,6)*100,linethick2,COLORYELLOW;
骗筹线:SMA(winner(C),10,2)*100,linethick2,COLORMAGENTA;
获利盘:winner(C)*100,linethick2,COLORCYAN;
TJTS:=BARSTATUS=2;
DRAWTEXT(TJTS and C>0,130,'交易实战 '),LINETHICK6,Coloryellow,ALIGN2;
DRAWTEXT(TJTS and C>0,130,' '+STKLABEL+' '+STKNAME+' '),LINETHICK6,ColorFFFF80,ALIGN2;
{星期显示}
yy1:=WEEKDAY;
IF BARSTATUS=2 and (yy1=5) THEN BEGIN DRAWTEXTREL(10,950,'■星期五■'),LINETHICK2,Color0048EE;end;
IF BARSTATUS=2 and (yy1=4) THEN BEGIN DRAWTEXTREL(10,950,'■星期四■'),LINETHICK2,Color3056FF;end;
IF BARSTATUS=2 and (yy1=3) THEN BEGIN DRAWTEXTREL(10,950,'■星期三■'),LINETHICK2,Color7156FF;end;
IF BARSTATUS=2 and (yy1=2) THEN BEGIN DRAWTEXTREL(10,950,'■星期二■'),LINETHICK2,Color936AFF;end;
IF BARSTATUS=2 and (yy1=1) THEN BEGIN DRAWTEXTREL(10,950,'■星期一■'),LINETHICK2,ColorD4A3FF;end;
IF BARSTATUS=2 and (yy1=6) THEN BEGIN DRAWTEXTREL(10,950,'■星期六■'),LINETHICK2,Color05FF00;end;
IF BARSTATUS=2 and (yy1=0) THEN BEGIN DRAWTEXTREL(10,950,'■星期日■'),LINETHICK2,Color0000FF;end;
{先胜右侧交易}
aa:=sma(c,13,2);
PDAA:=IF(AA<=C,AA,C);
PDAA2:=IF(AA>C,AA,C);
DRAWTEXT(TJTS and aa>ref(aa,1) and ref(aa,1)
DRAWTEXT(TJTS and aa>ref(aa,1) and ref(aa,1)>ref(aa,2),110,'激进短线提示：持股'+' '),COLOR0066FF,ALIGN2;
DRAWTEXT(TJTS and aaref(aa,2),110,'激进短线提示：卖出'+NUMTOSTRN(PDAA2,2)+' '),COLORGREEN,ALIGN2;
{泡哥右侧交易}
A1:=MA(C,13);
ZX:=REF(A1,13/2+1);
DRAWTEXT(TJTS and CROSS(C,ZX),100,'稳健短线提示：买入'+NUMTOSTRN(ZX,2)+' '),COLORRED,ALIGN2;
DRAWTEXT(TJTS and C>ZX AND REF(C,1)>REF(ZX,1),100,'稳健短线提示：持股'+' '),COLOR0066FF,ALIGN2;
DRAWTEXT(TJTS and CREF(ZX,1),100,'稳健短线提示：卖出'+NUMTOSTRN(ZX,2)+' '),COLORGREEN,ALIGN2;
{双向爆破提示}
LC:=REF(CLOSE,1);
VR:=SUM(IF(CLOSE>LC,VOL,0),26)/SUM(IF(CLOSE<=LC,VOL,0),26)*100;
WVAD10:=MA((CLOSE-OPEN)/(HIGH-LOW)*VOL,10)/1000;
DRAWTEXT(TJTS and CROSS(WVAD10,0) AND VR<40,80,'双向拐点提示：反弹爆破'+' '),COLORGREEN,ALIGN2;
DRAWTEXT(TJTS and CROSS(WVAD10,0) AND VR>=40 AND VR<80,80,'双向拐点提示：低位爆破'+' '),COLORCYAN,ALIGN2;
DRAWTEXT(TJTS and CROSS(WVAD10,0) AND VR>=80 AND VR<160,80,'双向拐点提示：盘整爆破'+' '),COLORBLUE,ALIGN2;
DRAWTEXT(TJTS and CROSS(WVAD10,0) AND VR>=160 AND VR<400,80,'双向拐点提示：获利爆破'+' '),COLORRED,ALIGN2;
DRAWTEXT(TJTS and CROSS(WVAD10,0) AND VR>=400,80,'双向拐点提示：舔血爆破'+' '),COLORMAGENTA,ALIGN2;
{领头羊波段点}
白色:=SMA(HIGH,21,2)*1.05;
黄色:=SMA(LOW,21,2)*0.95;
粉色:=SMA(LOW,5,1);
绿色:=SMA(CLOSE,2,1);
DRAWTEXT(TJTS and CROSS(绿色,白色),110,'黑马摇篮前兆：'+NUMTOSTRN(绿色,2)+' '),COLORYELLOW,ALIGN2;
DRAWTEXT(TJTS and CROSS(绿色,粉色),110,'波段买点前兆：'+NUMTOSTRN(绿色,2)+' '),COLOR6633FF,ALIGN2;
{先胜通道提示}
MID :=MA(CLOSE,26);
UPPER:=MID+3*STD(CLOSE,26);
LOWER:=MID-3*STD(CLOSE,26);
DRAWTEXT(TJTS and UPPER>=H,110,'预估交易风险：'+NUMTOSTRN(UPPER,2)+' '),COLORGREEN,ALIGN2;
DRAWTEXT(TJTS and UPPER
{短线逃顶提示}
TD1:=(HHV(HIGH,9)-CLOSE)/(HHV(HIGH,9)-LLV(LOW,9))*100-70;
TD2:=SMA(TD1,9,1)+100;
TD3:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100;
TD4:=SMA(TD3,3,1);
TD5:=SMA(TD4,3,1)+100;
TD6:=TD5-TD2;
S:=IF(TD6>100,TD6-100,0);
DRAWTEXT(TJTS and REF(S,2)S,110,'短线逃顶提示：'+NUMTOSTRN(H,2)+' '),COLOR33CC66,ALIGN2;
{多空放量提示}
DRAWTEXT(TJTS and VOL>MA(V,40) AND VOL>MA(V,5) AND C>REF(C,1),90,'多空放量提示：多方攻击'+' '),COLORRED,ALIGN2;
DRAWTEXT(TJTS and VOL>MA(V,40) AND VOL>MA(V,5) AND C<=REF(C,1),90,'多空放量提示：空方攻击'+' '),COLORGREEN,ALIGN2;
{EXPLAIN(C>0,'──【辅助资料研判】───');}
{操作时段分析}
QS:ZIG(3,19),LINETHICK0;{转向趋势}
SS:BARSLAST(REF(QS,1)
DRAWTEXT(TJTS and (SS=1 OR CROSS(ZIG(3,19),REF(ZIG(3,19),1))),90,'操作时段分析：操作盲区'+' '),COLORYELLOW,ALIGN2;
DRAWTEXT(TJTS and SS>=2 AND SS<20 AND REF(QS,1)
DRAWTEXT(TJTS and SS>=20 AND SS<88 AND REF(QS,1)
DRAWTEXT(TJTS and SS>=88 AND REF(QS,1)
XD:BARSLAST(QS>REF(QS,1)),LINETHICK0;{下跌时间之窗}
DRAWTEXT(TJTS and (XD=2 OR XD=1),90,'操作时段分析：操作盲区'+' '),COLORYELLOW,ALIGN2;
DRAWTEXT(TJTS and XD>=3 AND XD<21 AND REF(QS,1)>QS,90,'操作时段分析：短期回调'+' '),COLOR00FFFF,ALIGN2;
DRAWTEXT(TJTS and XD>=21 AND XD<89 AND REF(QS,1)>QS,90,'操作时段分析：中期杀跌'+' '),COLORFFFF00,ALIGN2;
DRAWTEXT(TJTS and XD>=89 AND REF(QS,1)>QS,90,'操作时段分析：长期盘跌'+' '),COLOR00FF00,ALIGN2;
{时间拐点分析}
TC:=IF(CROSS(REF(ZIG(3,19),1),ZIG(3,19)),1,0);
DRAWTEXT(TJTS and CROSS(ZIG(3,19),REF(ZIG(3,19),1)),80,'价格拐点分析：相对底部'+' '),COLORYELLOW,ALIGN2;
DRAWTEXT(TJTS and SS>0 AND TC<>1 AND SS<>2 AND SS<>4 AND SS<>7 AND SS<>12 AND SS<>20 AND SS<>33 AND SS<>54 AND SS<>88 AND SS<>143 AND SS<>232,80,'时间拐点分析：上涨天数 '+NUMTOSTRN(SS+1,0)+' '),COLORYELLOW,ALIGN2;
DRAWTEXT(TJTS and SS=2,80,'时间拐点分析：时间之窗 '+NUMTOSTRN(SS+1,0)+' '),COLORRED,ALIGN2;
DRAWTEXT(TJTS and SS=4,80,'时间拐点分析：时间之窗 '+NUMTOSTRN(SS+1,0)+' '),COLORGREEN,ALIGN2;
DRAWTEXT(TJTS and SS=7,80,'时间拐点分析：时间之窗 '+NUMTOSTRN(SS+1,0)+' '),COLORRED,ALIGN2;
DRAWTEXT(TJTS and SS=12,80,'时间拐点分析：时间之窗 '+NUMTOSTRN(SS+1,0)+' '),COLORGREEN,ALIGN2;
DRAWTEXT(TJTS and SS=20,80,'时间拐点分析：时间之窗 '+NUMTOSTRN(SS+1,0)+' '),COLORRED,ALIGN2;
DRAWTEXT(TJTS and SS=33,80,'时间拐点分析：时间之窗 '+NUMTOSTRN(SS+1,0)+' '),COLORGREEN,ALIGN2;
DRAWTEXT(TJTS and SS=54,80,'时间拐点分析：时间之窗 '+NUMTOSTRN(SS+1,0)+' '),COLORRED,ALIGN2;
DRAWTEXT(TJTS and SS=88,80,'时间拐点分析：时间之窗 '+NUMTOSTRN(SS+1,0)+' '),COLORGREEN,ALIGN2;
DRAWTEXT(TJTS and SS=143,80,'时间拐点分析：时间之窗 '+NUMTOSTRN(SS+1,0)+' '),COLORRED,ALIGN2;
DRAWTEXT(TJTS and SS=232,80,'时间拐点分析：时间之窗 '+NUMTOSTRN(SS+1,0)+' '),COLORGREEN,ALIGN2;
DRAWTEXT(TJTS and CROSS(REF(ZIG(3,19),1),ZIG(3,19)),70,'价格拐点分析：相对顶部'+' '),COLORYELLOW,ALIGN2;
DRAWTEXT(TJTS and XD>0 AND TC<>1 AND XD<>3 AND XD<>5 AND XD<>8 AND XD<>13 AND XD<>21 AND XD<>34 AND XD<>55 AND XD<>89 AND XD<>144 AND XD<>233,70,'时间拐点分析：下跌天数 '+NUMTOSTRN(XD,0)+' '),COLORCCFFFF,ALIGN2;
DRAWTEXT(TJTS and XD=3,80,'时间拐点分析：时间之窗 '+NUMTOSTRN(XD,0)+' '),COLORRED,ALIGN2;
DRAWTEXT(TJTS and XD=5,80,'时间拐点分析：时间之窗 '+NUMTOSTRN(XD,0)+' '),COLORGREEN,ALIGN2;
DRAWTEXT(TJTS and XD=8,80,'时间拐点分析：时间之窗 '+NUMTOSTRN(XD,0)+' '),COLORRED,ALIGN2;
DRAWTEXT(TJTS and XD=13,80,'时间拐点分析：时间之窗 '+NUMTOSTRN(XD,0)+' '),COLORGREEN,ALIGN2;
DRAWTEXT(TJTS and XD=21,80,'时间拐点分析：时间之窗 '+NUMTOSTRN(XD,0)+' '),COLORRED,ALIGN2;
DRAWTEXT(TJTS and XD=34,80,'时间拐点分析：时间之窗 '+NUMTOSTRN(XD,0)+' '),COLORGREEN,ALIGN2;
DRAWTEXT(TJTS and XD=55,80,'时间拐点分析：时间之窗 '+NUMTOSTRN(XD,0)+' '),COLORRED,ALIGN2;
DRAWTEXT(TJTS and XD=89,80,'时间拐点分析：时间之窗 '+NUMTOSTRN(XD,0)+' '),COLORGREEN,ALIGN2;
DRAWTEXT(TJTS and XD=144,80,'时间拐点分析：时间之窗 '+NUMTOSTRN(XD,0)+' '),COLORRED,ALIGN2;
DRAWTEXT(TJTS and XD=233,80,'时间拐点分析：时间之窗 '+NUMTOSTRN(XD,0)+' '),COLORGREEN,ALIGN2;
{个股同比大盘强弱}
ZSLIFE:=(EMA(INDEXC,60)+EMA(INDEXC,90))/2;{ZSLIFE:指数生命线}
ZSBL:=INDEXC/ZSLIFE;{ZSBL:指数比例}
GGLIFE:=(EMA(CLOSE,60)+EMA(CLOSE,90))/2;{GGLIFE:个股生命线}
ZSTB:=ZSBL*GGLIFE;{ZSTB:指数同步个股}
{主力成本}
DRAWTEXT(TJTS and C>0,110,'主力成本：'+NUMTOSTRN(SUM(AMOUNT,13)/SUM(VOL,13)/100,2)+' '),COLORCYAN,ALIGN2;
{止赢止损}
ZY:=((REF(H,1)-REF(L,1))*8/10)+C;
DRAWTEXT(TJTS and C>0,110,'明日止赢：'+NUMTOSTRN(ZY,2)+' '),COLORRED,ALIGN2;
ZS:=C-((REF(H,1)-REF(L,1))*8/20);
DRAWTEXT(TJTS and C>0,110,'明日止损：'+NUMTOSTRN(ZS,2)+' '),COLORCYAN,ALIGN2;
yyy:=VOL=HHV(VOL,0);
zzz:=(C-ZSTB)/ZSTB*100;
xxx:=ABS(C-ZSTB)/ZSTB*100;
DRAWTEXT(TJTS and ZSTB
DRAWTEXT(TJTS and ZSTB>=C ,100,'弱于大盘系数％：'+NUMTOSTRN(xxx,2)+' '),COLORCYAN,ALIGN2;
DRAWTEXT(TJTS and yyy,110,'量能统计：历史天量'+' '),COLORMAGENTA,ALIGN2;
{领头羊波段点}
{EXPLAIN(C>0,'──【泡哥综合评估】───');
{趋势比重提示}
DQDB:=LLV(L,4);
CQDB:=LLV(L,19);
DQGD:=HHV(H,4);
CQGD:=HHV(H,19);
STAR1:=IF((DQDB-CQDB)>(CQGD-DQGD),1,0);
{大盘相关提示}
TS0:=BARSSINCE(C);
TS1:=BARSLAST(BARSSINCE(BACKSET(BARSTATUS=2,60+1))=0);
TS:=IF(TS0<60,TS0,TS1);
BL:=REF(IndexC/C,TS);
FC:=C*BL/BL;
FIndexC:=IndexC/BL;
STAR2:=IF(FIndexC
{资金多空提示}
ZLCM:=EMA(WINNER(CLOSE)*70,3);
SHCM:=EMA((WINNER(CLOSE*1.1)-WINNER(CLOSE*0.9))*80,3);
ZZLKP:=ZLCM/(ZLCM+SHCM)*100;
ZZLJJ:=EMA(ZZLKP,89);
STAR3:=IF(ZZLKP>ZZLJJ,1,0);
{风险临界提示}
RSV:=(CLOSE-LLV(LOW,15))/(HHV(HIGH,15)-LLV(LOW,15))*100;
K1:=SMA(RSV,10,1);
D1:=SMA(K1,5,1);
KK:=INTPART(K1);
DD:=INTPART(D1);
TFXXS:=KK+DD;
TGLXS:=(TFXXS-REF(TFXXS,1))*10;
STAR4:=IF(TGLXS>0,1,0);
STAR5:=IF(TGLXS=0 AND REF(TGLXS,1)>=0,1,0);
{EXPLAIN(C>0,'──【资金仓位管理】───');}
V1:=MA(CLOSE,5);
V2:=MA(CLOSE,20);
V3:=IF(V2>V1,V1,V2);
ZSV1:=MA(INDEXC,5);
ZSV2:=MA(INDEXC,20);
ZSV3:=IF(ZSV2>ZSV1,ZSV1,ZSV2);
DRAWTEXT(TJTS and V2=V3 AND ZSV2=ZSV3,128,'资金仓位管理：100%满仓'+' '),LINETHICK3,COLORRED,ALIGN2;
DRAWTEXT(TJTS and V2=V3 AND ZSV2<>ZSV3,128,'资金仓位管理：20%小仓'+' '),LINETHICK3,COLORMAGENTA,ALIGN2;
DRAWTEXT(TJTS and V2<>V3 AND ZSV2=ZSV3,128,'资金仓位管理：50%半仓'+' '),LINETHICK3,COLORCYAN,ALIGN2;
DRAWTEXT(TJTS and V2<>V3 AND ZSV2<>ZSV3,128,'资金仓位管理：1%微仓'+' '),LINETHICK3,COLORGREEN,ALIGN2;
