醉红尘 发表于 2023-11-14 18:20:25

精选通达信主图指标之操盘手(源码分享)

<p data-first-child >通达信主图操盘手(附源码)</p><p >            MA5:MA(C,5),COLORYELLOW;</p><p >            MA10:MA(CLOSE,10),COLORFF00FF;</p><p >            MA30:MA(C,30),COLORRED,LINETHICK2;</p><p >         跌:IF(MA(CLOSE,30)<=REF(MA(CLOSE,30),1),MA(CLOSE,30),DRAWNULL),COLORGREEN,LINETHICK2;</p><p >            MA60:MA(CLOSE,60),COLORFFCC66;</p><p >            GJTJ1:=100*(C-LLV(L,5))/(HHV(C,5)-LLV(L,5));</p><p >            GJTJ2:=100*(C-LLV(L,10))/(HHV(C,10)-LLV(L,10));</p><p >            GJTJ3:=100*(C-LLV(L,20))/(HHV(C,20)-LLV(L,20));</p><p >            GJTJ4:=100*(C-LLV(L,30))/(HHV(C,30)-LLV(L,30));</p><p >            BAIJIN1:=BARSLAST(CROSS(30,GJTJ1))<2 AND</p><p >BARSLAST(CROSS(GJTJ1,50))<2;</p><p >            BAIJIN2:=BARSLAST(CROSS(GJTJ4,GJTJ1))<2 AND GJTJ1>GJTJ4;</p><p >            BAIJIN3:=GJTJ1>60 AND GJTJ4>70;</p><p >            DRAWTEXT(BAIJIN1 AND BAIJIN2 AND BAIJIN3,L-0.02,'白金'),COLORWHITE;</p><p >            HUANGJIN1:=BARSLAST(CROSS(50,GJTJ1))<3 AND</p><p >            BARSLAST(CROSS(GJTJ1,50))<3;</p><p >            HUANGJIN2:=BARSLAST(CROSS(GJTJ4,GJTJ1))<2 AND GJTJ1>GJTJ4;</p><p >            DRAWTEXT(HUANGJIN1 AND HUANGJIN2,L-0.03,'黄金'),COLORYELLOW;</p><p >            XG:=BARSLAST(CROSS(GJTJ4,GJTJ1))<5AND GJTJ1>GJTJ4;</p><p >            DRAWTEXT(COUNT(XG,3)=1 AND XG AND</p><p >            C>MA(C,20),L-0.02,'启动金三角'),COLORRED;</p><p >            ZHENCANG1:=BARSLAST(CROSS(GJTJ4,GJTJ1))>3 AND</p><p >            BARSLAST(CROSS(GJTJ1,GJTJ4))<3;</p><p >            ZHENCANG2:=BARSLAST(CROSS(GJTJ4,GJTJ2));</p><p >            ZHENCANG3:=GJTJ3<GJTJ4 AND GJTJ2<GJTJ4;</p><p >            ZHENCANG4:=BARSLAST(CROSS(GJTJ4,GJTJ3))>3 AND</p><p >            BARSLAST(CROSS(GJTJ1,GJTJ4))<3;</p><p >            ZHENCANG5:=GJTJ2<GJTJ3 AND GJTJ2<GJTJ4 AND GJTJ2<GJTJ1 AND</p><p >GJTJ1=100;</p><p >            ZCB1:=ZHENCANG1>0 AND REF(ZHENCANG1,1)=0 AND REF(ZHENCANG1,2)>0;</p><p >            DRAWTEXT(ZHENCANG1 AND ZHENCANG2 AND ZHENCANG3 AND ZHENCANG4 AND</p><p >            ZHENCANG5,L-0.05,'震仓启点');</p><p >            AA:=BARSLAST(CROSS(97,GJTJ1))<=1 AND BARSLAST(CROSS(GJTJ1,85))<=1;</p><p >            BB:=BARSLAST(CROSS(97,GJTJ2))<=1 AND BARSLAST(CROSS(GJTJ2,85))<=1;</p><p >            AA1:=AA AND BB;</p><p >            AAA:=BARSLAST(CROSS(97,GJTJ1))<=2 AND BARSLAST(CROSS(GJTJ1,85))<=1;</p><p >            BAA:=BARSLAST(CROSS(97,GJTJ2))<=2 AND BARSLAST(CROSS(GJTJ2,85))<=1;</p><p >            AA2:=AA AND BB ;</p><p >            AAAA:=BARSLAST(CROSS(97,GJTJ1))<=3 AND BARSLAST(CROSS(GJTJ1,85))<=1;</p><p >            BAAA:=BARSLAST(CROSS(97,GJTJ2))<=3 AND BARSLAST(CROSS(GJTJ2,85))<=1;</p><p >            AA3:=AAAA AND BAAA ;</p><p >            BB1:=REF(AA1,1);</p><p >            BB2:=REF(AA2,1);</p><p >            BB3:=REF(AA3,1);</p><p >            DD1:=GJTJ1=100 AND GJTJ2=100AND AA1 ;</p><p >            DD2:=GJTJ1=100 AND GJTJ2=100AND AA2 ;</p><p >            DD3:=GJTJ1=100 AND GJTJ2=100AND AA3 ;</p><p >            DRAWTEXT(DD1 OR DD2 OR DD3,L-0.02,'短线追涨'),COLORFF00FF;</p><p >            AW:=BARSLAST(CROSS(95,GJTJ1))<=2;</p><p >            BW:=BARSLAST(CROSS(95,GJTJ2))<=2;</p><p >            EW:= GJTJ4<GJTJ1 AND GJTJ1<GJTJ2 AND GJTJ1<GJTJ3;</p><p >            FW:=GJTJ2>50 AND GJTJ3>50;</p><p >            GW:=GJTJ1=100 AND GJTJ2=100;</p><p >            TXW:=COUNT(GW,2)=1;</p><p >            DRAWTEXT(AW AND BW AND EW AND FW AND TXW,L-0.03,'起涨首日');</p><p >            AQ:=GJTJ3=100;</p><p >            BQ:=GJTJ4<90;</p><p >            DRAWTEXT(COUNT(AQ,2) = 2 AND BQ,L-0.02,'波启前兆');</p><p > DSJ:=1;</p><p >            GET:ZIG(3,N),COLORYELLOW;</p><p >            PL5:=ZIG(3,5)*DSJ;</p><p >            EN1:=ZIG(3,5)>REF(ZIG(3,5),1) AND REF(ZIG(3,5),1)<=REF(ZIG(3,5),2)</p><p >            ANDREF(ZIG(3,5),2)<=REF(ZIG(3,5),3)*DSJ;</p><p >            EX1:=ZIG(3,5)<REF(ZIG(3,5),1) AND REF(ZIG(3,5),1)>=REF(ZIG(3,5),2)</p><p >            ANDREF(ZIG(3,5),2)>=REF(ZIG(3,5),3)*DSJ;</p><p >            PL10:=ZIG(3,10)*DSJ;</p><p >            EN2:=ZIG(3,10)>REF(ZIG(3,10),1) AND</p><p >            REF(ZIG(3,10),1)<=REF(ZIG(3,10),2)AND</p><p >            REF(ZIG(3,10),2)<=REF(ZIG(3,10),3)*DSJ;</p><p >            EX2:=ZIG(3,10)<REF(ZIG(3,10),1) AND</p><p >            REF(ZIG(3,10),1)>=REF(ZIG(3,10),2)AND</p><p >            REF(ZIG(3,10),2)>=REF(ZIG(3,10),3)*DSJ;</p><p >            PL20:=ZIG(3,20)*DSJ;</p><p >            EN3:=ZIG(3,20)>REF(ZIG(3,20),1) AND</p><p >            REF(ZIG(3,20),1)<=REF(ZIG(3,20),2)AND</p><p >            REF(ZIG(3,20),2)<=REF(ZIG(3,20),3)*DSJ;</p><p >            EX3:=ZIG(3,20)<REF(ZIG(3,20),1) AND</p><p >            REF(ZIG(3,20),1)>=REF(ZIG(3,20),2)AND</p><p >            REF(ZIG(3,20),2)>=REF(ZIG(3,20),3)*DSJ;</p><p >            PL40:=ZIG(3,40)*DSJ;</p><p >         走强1:=BARSLAST(PL5<REF(PL5,1));</p><p >         走弱1:=BARSLAST(PL5>REF(PL5,1));</p><p >         走强2:=BARSLAST(PL10<REF(PL10,1));</p><p >         走弱2:=BARSLAST(PL10>REF(PL10,1));</p><p >         走强3:=BARSLAST(PL20<REF(PL20,1));</p><p >         走弱3:=BARSLAST(PL20>REF(PL20,1));</p><p >            ZTJZ5:=IF(PL10>REF(PL10,1),COUNT(EN1,走强2),0);</p><p >            ZTJD5:=IF(PL10>REF(PL10,1),COUNT(EX1,走强2),0);</p><p >            DTJZ5:=IF(PL10<REF(PL10,1),COUNT(EN1,走弱2),0);</p><p >            DTJD5:=IF(PL10<REF(PL10,1),COUNT(EX1,走弱2),0);</p><p >            ZTJZ10:=IF(PL20>REF(PL20,1),COUNT(EN2,走强3),0);</p><p >            ZTJD10:=IF(PL20>REF(PL20,1),COUNT(EX2,走强3),0);</p><p >            DTJZ10:=IF(PL20<REF(PL20,1),COUNT(EN2,走弱3),0);</p><p >            DTJD10:=IF(PL20<REF(PL20,1),COUNT(EX2,走弱3),0);</p><p >            DRAWTEXT(EN1 AND DTJZ5=1,L*0.98,'㈠'),COLORFFFF00;</p><p >            DRAWTEXT(EX1 AND DTJD5=2,H*1.02,'㈡'),COLORFFFF00;</p><p >            DRAWTEXT(EN2 AND ZTJZ5=1,L*0.98,'㈢'),COLORFFFF00;</p><p >            DRAWTEXT(EX1 AND PL10>REF(PL10,1) AND ZTJD5=1,H*1.02,'⑴'),COLORFF0000;</p><p >            DRAWTEXT(EN1 AND PL10>REF(PL10,1) AND ZTJZ5=2,L*0.98,'⑵'),COLORFF0000;</p><p >            DRAWTEXT(EX1 AND PL10>REF(PL10,1) AND ZTJZ5=2,H*1.02,'⑶'),COLORF000F0;</p><p >            DRAWTEXT(EN1 AND PL10>REF(PL10,1) AND ZTJZ5=3,L*0.98,'⑷'),COLORFF0000;</p><p >            DRAWTEXT(EX2 AND PL20>REF(PL20,1) AND ZTJD10=1,H*1.02,'⑸'),COLORFF0000;</p><p >            DRAWTEXT(EN2 AND DTJZ10=1,L*0.94,'Ⅰ'),COLORFF0000;</p><p >            DRAWTEXT(EX2 AND DTJD10=2,H*1.06,'Ⅱ'),COLORFF0000;</p><p >            DRAWTEXT(EN3 AND ZTJZ10=1,L*0.94,'Ⅲ'),COLORFF0000;</p><p >            DRAWTEXT(EX2 AND PL20>REF(PL20,1) AND </p><p >            ZTJD10=1,H*1.06,'①'),COLORFFFF00;</p><p >            DRAWTEXT(EN2 AND PL20>REF(PL20,1) AND </p><p >            ZTJZ10=2,L*0.94,'②'),COLORFFFF00;</p><p >            DRAWTEXT(EX2 AND PL20>REF(PL20,1) AND ZTJD10=2 OR (ZTJD10=0 OR </p><p >            ZTJD10=2) AND EX2,H*1.06*DSJ,'③'),COLORFFFF00;</p><p >            DRAWTEXT(EN2 AND PL20>REF(PL0,1) AND</p><p >            ZTJZ10=3,L*0.94,'④'),COLORFFFF00;</p><p class="ztext-empty-paragraph"><br/></p><figcaption>注:平台目前更新的有关公式源码,手机电脑均可使用,部分提示编码错误的,是为了避免业内叨唠,大家看好有意,可以及时联系我们这边,(会有收费,主99副1)帮忙处理,在线即回!感谢后续多多,关注支持!</figcaption><p></p>

likeyqd 发表于 2024-1-21 15:26:13

一切尽在不言中,谢谢!

任侠放荡感 发表于 2024-3-10 03:32:36

很好的内容,感谢分享!
页: [1]
查看完整版本: 精选通达信主图指标之操盘手(源码分享)