{變軌線 通達信主圖 真正的陰陽線 東郭改編}
STICKLINE(C>REF(C,1),H,L,1.4,0),COLOR000000; STICKLINE(C>REF(C,1),H,L,1,0),COLOR0000FF; STICKLINE(C>REF(C,1),H,L,0,0),COLORCC66FF; STICKLINE(C>REF(C,1),O,C,9.4,0),COLOR000000; STICKLINE(C>REF(C,1),O,C,8.8,0),COLOR000033; STICKLINE(C>REF(C,1),O,C,8,0),COLOR000066; STICKLINE(C>REF(C,1),O,C,7,0),COLOR000099; STICKLINE(C>REF(C,1),O,C,5.8,0),COLOR0000CC; STICKLINE(C>REF(C,1),O,C,4.4,0),COLOR0000FF; STICKLINE(C>REF(C,1),O,C,2.8,0),COLORCC66FF; STICKLINE(C>REF(C,1),O,C,1,0),COLORFFBBFF; STICKLINE(C<REF(C,1),H,L,1.4,0),COLOR000000; STICKLINE(C<REF(C,1),H,L,1,0),COLORFF6600; STICKLINE(C<REF(C,1),H,L,0,0),COLORFFCC00; STICKLINE(C<REF(C,1),O,C,9.4,0),COLOR000000; STICKLINE(C<REF(C,1),O,C,8.8,0),COLOR550000; STICKLINE(C<REF(C,1),O,C,8,0),COLOR990000; STICKLINE(C<REF(C,1),O,C,7,0),COLORFF0000; STICKLINE(C<REF(C,1),O,C,5.8,0),COLORFF5500; STICKLINE(C<REF(C,1),O,C,4.4,0),COLORFF8800; STICKLINE(C<REF(C,1),O,C,2.8,0),COLORFFCC00; STICKLINE(C<REF(C,1),O,C,1,0),COLORFFFF33; STICKLINE(C=REF(C,1),H,L,1.4,0),COLOR000000; STICKLINE(C=REF(C,1),H,L,1,0),COLORBBBBFF; STICKLINE(C=REF(C,1),H,L,0,0),COLORFFFFFF; STICKLINE(C=REF(C,1),O,C,9.4,0),COLOR000000; STICKLINE(C=REF(C,1),O,C,8.8,0),COLOR333333; STICKLINE(C=REF(C,1),O,C,8,0),COLOR555555; STICKLINE(C=REF(C,1),O,C,7,0),COLOR777777; STICKLINE(C=REF(C,1),O,C,5.8,0),COLOR999999; STICKLINE(C=REF(C,1),O,C,4.4,0),COLORBBBBBB; STICKLINE(C=REF(C,1),O,C,2.8,0),COLORDDDDDD; STICKLINE(C=REF(C,1),O,C,1,0),COLORFFFFFF; VAR1:=MA(CLOSE,1); VAR2:=MA(CLOSE,3); 上軌:MA(VAR2,1),LINETHICK2,COLOR0000FF; 下軌:MA(VAR2,3),LINETHICK2,COLOR00FF00; 下面是通達信版的:主力籌碼 {主力籌碼 通達信副圖 東郭改編} ZLCM:=IF(CLOSE<0,0,EMA(WINNER(CLOSE)*70,3)); SHCM:=IF(CLOSE<0,0,EMA((WINNER(CLOSE*1.1)-WINNER(CLOSE*0.9))*80,3)); ZSHTL:=IF(CLOSE<0,0,SHCM/(ZLCM+SHCM)*100); ZZLKP:=IF(CLOSE<0,0,ZLCM/(ZLCM+SHCM)*100); ZCMZL:=IF(CLOSE<0,0,MA(ZLCM+SHCM,13)); ZZNTS:=IF(CLOSE<0,0,BARSLAST(ZSHTL<90 AND REF(ZSHTL,1)>90)); ZSHJJ:=IF(CLOSE<0,0,EMA(ZSHTL,89)); ZZLJJ:=IF(CLOSE<0,0,EMA(ZZLKP,89)); ZJLRQD:=IF(CLOSE<0,0,INTPART(ZZLKP-ZZLJJ)); SH8:=IF(CLOSE<0,0,EMA(ZSHTL,8)); DKB:=IF(CLOSE<0,0,IF(ZZLKP-REF(ZZLKP,1)>ZSHTL-REF(ZSHTL,1),1,0)); 散戶套牢系數(shù):IF(CLOSE<0,0,INTPART(ZSHTL)),LINETHICK0,COLORFFFFFF; 主力控盤系數(shù):IF(CLOSE<0,0,INTPART(ZZLKP)),LINETHICK0,COLORFFFF00; 資金流入強度:IF(CLOSE<0,0,ZJLRQD),LINETHICK0,COLOR0000FF; 市場籌碼總量:IF(CLOSE<0,0,INTPART(ZCMZL)),LINETHICK0,COLOR00FF00; STICKLINE(CLOSE>0,ZSHTL,ZZLKP,2,0),COLOREEEEEE; STICKLINE(ZSHJJ>REF(ZSHJJ,1),ZSHTL,ZSHJJ,1,0),COLORAAAAAA; STICKLINE(CLOSE>0,ZZLKP,0,2,0),COLORFF0000; STICKLINE(ZZLKP>75,ZZLKP,0,2,0),COLORFFFFFF; STICKLINE(ZZLJJ>REF(ZZLJJ,1),ZZLKP,ZZLJJ,2,0),COLOR0000FF; STICKLINE(ZSHTL>=90,ZZLKP,0,2,0),COLOR00FF00; DRAWTEXT(ZCMZL>REF(ZCMZL,1) AND SH8<REF(SH8,1) AND CURRBARSCOUNT=1,ZCMZL,'←增量資金'); 通達信版的:絕地反攻 {絕地反攻 通達信副圖 東郭改編} AA:=DMA(CLOSE,VOL/MA(VOL,4)/4); BB:=DMA(CLOSE,VOL/MA(VOL,33)/33); V1:=(CLOSE*2+HIGH+LOW)/4*10; V2:=EMA(V1,13)-EMA(V1,34); V3:=EMA(V2,5); V4:=2*(V2-V3)*5.5; 主力撤:IF(CLOSE<0,0,IF(V4<=0,V4,0)),LINETHICK1,COLOR00FF00; 主力拉:IF(CLOSE<0,0,IF(V4>=0,V4,0)),LINETHICK1,COLOR0000FF; JIA:=EMA(V4,2); V11:=3*SMA((CLOSE-LLV(LOW,55))/(HHV(HIGH,55)-LLV(LOW,55))*100,5,1)-2*SMA(SMA((CLOSE-LLV(LOW,55))/(HHV(HIGH,55)-LLV(LOW,55))*100,5,1),3,1); 趨勢線:=EMA(V11,3)-9; MID:=(HIGH+LOW+CLOSE)/3; CR:=SUM(MAX(0,HIGH-REF(MID,1)),26)/(SUM(MAX(0,REF(MID,1)-LOW),26))*100; A:=IF(CR<55,CR,0); DPZD1:=BARSLAST(A)<10; STICKLINE(趨勢線>=75 AND CROSS(JIA,V4),V4-2,V4+2,5,0),COLOR00FFFF; DRAWTEXT(趨勢線>=75 AND CROSS(JIA,V4),V4+2,' 風(fēng)險'),COLOR00FFFF; CC:=(CLOSE-AA)/AA*100<-11; DD:=(AA-BB)/BB*100<-22.3; EE:=CC AND DD; DRAWICON(IF(EE AND (OPEN>CLOSE OR OPEN<CLOSE) AND (OPEN-REF(CLOSE,1))/REF (CLOSE,1)>-0.07 AND (REF(CLOSE,1)>REF(OPEN,1) OR REF(CLOSE,1)<REF(OPEN,1)) AND (REF(OPEN,2)>REF(CLOSE,2) OR REF(OPEN,2)<REF(CLOSE,2)) AND (REF(OPEN,3) >REF(CLOSE,3) OR REF(OPEN,3)<REF(CLOSE,3)) AND (REF(OPEN,4)>REF(CLOSE,4) OR REF(OPEN,4)<REF(CLOSE,4)) AND (REF(OPEN,5)>REF(CLOSE,5) OR REF(OPEN,5)<REF (CLOSE,5)) AND (REF(OPEN,6)>REF(CLOSE,6) OR REF(OPEN,6)<REF(CLOSE,6)) AND (REF(OPEN,7)>REF(CLOSE,7) OR REF(OPEN,7)<REF(CLOSE,7)),1,0),0,1); |
|