仿六彩神龍 M:=13;N:=30; A01:=(C+O+L+H)/4; A02:=(WINNER((A01 * 1.04)) * 100.000); A03:=(WINNER((A01 * 0.96)) * 100.000); A04:A03,NODRAW; A08:A02-A03,NODRAW; A06:( 100.000 - A02),NODRAW; STICKLINE( 1.000,0,A04, 2,0),COLORRED; STICKLINE( 1.000, 100.000,A02, 2,0),COLORGREEN; STICKLINE( 1.000,A04,(100-A06), 2,0),COLORYELLOW; A0A:=(((((HHV(A04, 15.000) - A03) / A03) * 100.000) > N) AND (HHV(A04, 15.000) > 50.000)); STICKLINE(A0A,(0 - 2.000), 2.000, 4,0),COLORYELLOW; STICKLINE(NOT(A0A),(0 - 2.000), 2.000, 4,0),COLORMAGENTA; 獲利:MA(A03,M),COLORFF00AA,LINETHICK3; 浮動: (MA(A02,M) - MA(A03,M)),COLOR7FFF00,LINETHICK3; 套牢: (100.000 - MA(A02,M)),COLORGREEN,LINETHICK3,NODRAW; 50,LINETHICK3; DRAWICON(CROSS(獲利,浮動),浮動,23); 六彩神龍
主力:WINNER(CLOSE*0.95),LINETHICK2,COLORFF33CC,NODRAW;
M:=13;N:=30;
A01:=(C+O+L+H)/4; A02:=(WINNER((A01 * 1.04)) * 100.000); A03:=(WINNER((A01 * 0.96)) * 100.000); A04:A03,NODRAW; A08:A02-A03,NODRAW; A06:( 100.000 - A02),NODRAW; STICKLINE( 1.000,0,A04, 2,0),COLORRED; {股旁網(wǎng)-股票公式網(wǎng)站 WWW.GUPANG.COM} STICKLINE( 1.000, 100.000,A02, 2,0),COLORGREEN,NODRAW; STICKLINE( 1.000,A04,(100-A06), 2,0),COLORYELLOW,NODRAW; A0A:=(((((HHV(A04, 15.000) - A03) / A03) * 100.000) > N) AND (HHV(A04, 15.000) > 50.000)); STICKLINE(A0A,(0 - 2.000), 2.000, 4,0),COLORYELLOW,NODRAW; STICKLINE(NOT(A0A),(0 - 2.000), 2.000, 4,0),COLORMAGENTA,NODRAW; 浮動: (MA(A02,M) - MA(A03,M)),COLORYELLOW,LINETHICK3,NODRAW; 套牢: (100.000 - MA(A02,M)),COLORGREEN,LINETHICK3,NODRAW; 凈流:=A04,COLOR00FFFF; STICKLINE(凈流<0,0,凈流,3,0),COLORFF6600; STICKLINE(凈流<0,0,凈流,2,0),COLORFF9900; STICKLINE(凈流<0,0,凈流,1.5,0),COLORFFCC00; STICKLINE(凈流<0,0,凈流,0.5,0),COLORCYAN; STICKLINE(凈流>0,0,凈流,3,0),COLOR000099; STICKLINE(凈流>0,0,凈流,2,0),COLOR0000CC; STICKLINE(凈流>0,0,凈流,1.5,0),COLOR0000FF; STICKLINE(凈流>0,0,凈流,0.5,0),COLORCC66FF; STICKLINE(凈流<REF(凈流,1)AND 凈流>0,0,凈流,3,0),COLORFF0099; STICKLINE(凈流<REF(凈流,1)AND 凈流>0,0,凈流,2,0),COLORFF00CC; STICKLINE(凈流<REF(凈流,1)AND 凈流>0,0,凈流,2,0),COLORFF00FF; STICKLINE(凈流<REF(凈流,1)AND 凈流>0,0,凈流,1,0),COLORFF66FF; STICKLINE(凈流>REF(凈流,1)AND 凈流<0,0,凈流,3,0),COLOR000066; STICKLINE(凈流>REF(凈流,1)AND 凈流<0,0,凈流,2,0),COLOR0000AA; STICKLINE(凈流>REF(凈流,1)AND 凈流<0,0,凈流,1.5,0),COLOR0000BB; STICKLINE(凈流>REF(凈流,1)AND 凈流<0,0,凈流,0.5,0),COLOR0000CC; 強勢線:2,COLOREBC79E; 獲利:MA(A03,M)CROSSDOT,COLORFF6100,LINETHICK3; IF(獲利>REF(獲利,1),獲利,DRAWNULL)CROSSDOT,COLORYELLOW,LINETHICK3; 增減:獲利-REF(獲利,1),COLORFFFF00 ,NODRAW; 弱勢抄底 牛熊通道 弘歷通道 薛斯通道 弘歷進(jìn)出 弘歷彩虹 趨勢王 波段王 操盤王 背離王 強弱王
弱勢抄底: n,m1,m2(9.3.3) RSV:=(CLOSE-LLV(LOW,N))/(HHV(HIGH,N)-LLV(LOW,N))*100; K:=SMA(RSV,M1,1); D:=SMA(K,M2,1); J:=3*K-2*D; DIFF :=EMA(CLOSE,m3) - EMA(CLOSE,m4); DEA :=EMA(DIFF,m5); MACD :=2*(DIFF-DEA); STICKLINE((K >D) and ( REF(K,1) D) and ( REF(K,1) 4. 牛熊通道 AA:=MA((2*CLOSE+HIGH+LOW)/4,5); 短高 :AA*102/100,dotline; 短低:AA*(200-102)/100,DOTLINE; CC:=ABS((2*CLOSE+HIGH+LOW)/4-MA(CLOSE,30))/MA(CLOSE,30); DD:DMA(CLOSE,CC); 長高:(1+9/100)*DD,LINETHICK2; 長底:(1-9/100)*DD,LINETHICK2; zz:=DD-ref(DD,1); partline(DD,zz>0,rgb(255,0,0),zz 5. 弘歷通道 中軌 : MA(CLOSE,10); 上軌: 中軌 + 2*STD(CLOSE,10); 下軌: 中軌 - 2*STD(CLOSE,10); 6.薛斯通道: n1.n2.p1.p2(30.8.15.3) UPPERL: MA(HIGH,n1)*(1+p1/100),colorwhite; UPPERS: MA(HIGH,n2)*(1+p2/100),coloryellow; LOWERS: MA(LOW,n2)*(1-p2/100),colorff00ff; LOWERL: MA(LOW,n1)*(1-p1/100),color00ff00; 7. 弘歷進(jìn)出 X1:EMA(C,8),COLORWHITE; X2:EMA(C,20),COLORYELLOW; X3:EMA(X2,20),COLORGREEN; VAR4: EMA(CLOSE,8),COLORWHITE; VAR5: EMA(CLOSE,20),COLORYELLOW; STICKLINE(VAR4>VAR5,VAR5,VAR4,0.01,0),COLORRED; STICKLINE(VAR4 止損 '),COLORGREEN; DRAWTEXT(CROSS(VAR4,VAR5),VAR4,'★加倉'),COLORRED; 8. 弘歷彩虹 收盤價 :=c; WMA(CLOSE,10),COLORRED; WMA(CLOSE,20),COLORRED; WMA(CLOSE,30),COLORRED; WMA(CLOSE,40),COLORGREEN; WMA(CLOSE,50),COLORYELLOW; WMA(CLOSE,60),COLORYELLOW; WMA(CLOSE,70),COLORYELLOW; WMA(CLOSE,80),COLORYELLOW; WMA(CLOSE,150),COLORBLUE; WMA(CLOSE,160),COLORBLUE; WMA(CLOSE,180),COLORBLUE; WMA(CLOSE,200),COLORBLUE; WMA(CLOSE,300),COLORWHITE; WMA(CLOSE,320),COLORWHITE; WMA(CLOSE,340),COLORWHITE; WMA(CLOSE,389),COLORWHITE; 9. 趨勢王 A1:=(EMA((OPEN+HIGH+LOW+CLOSE)/4,3)+EMA((OPEN+HIGH+LOW+CLOSE)/4,6)+EMA((OPEN+HIGH+LOW+CLOSE)/4,9))/3; A2:=(EMA((OPEN+HIGH+LOW+CLOSE)/4,5)+EMA((OPEN+HIGH+LOW+CLOSE)/4,10)+EMA((OPEN+HIGH+LOW+CLOSE)/4,20))/3; A3:=(EMA((OPEN+HIGH+LOW+CLOSE)/4,7)+EMA((OPEN+HIGH+LOW+CLOSE)/4,14)+EMA((OPEN+HIGH+LOW+CLOSE)/4,28))/3; A4:=(EMA((OPEN+HIGH+LOW+CLOSE)/4,9)+EMA((OPEN+HIGH+LOW+CLOSE)/4,18)+EMA((OPEN+HIGH+LOW+CLOSE)/4,36))/3; A5:=(EMA((OPEN+HIGH+LOW+CLOSE)/4,11)+EMA((OPEN+HIGH+LOW+CLOSE)/4,22)+EMA((OPEN+HIGH+LOW+CLOSE)/4,44))/3; A6:=(EMA((OPEN+HIGH+LOW+CLOSE)/4,13)+EMA((OPEN+HIGH+LOW+CLOSE)/4,26)+EMA((OPEN+HIGH+LOW+CLOSE)/4,52))/3; A7:=(EMA((OPEN+HIGH+LOW+CLOSE)/4,21)+EMA((OPEN+HIGH+LOW+CLOSE)/4,34)+EMA((OPEN+HIGH+LOW+CLOSE)/4,68))/3; VAR1:=FORCAST(A1,6); VAR2:=FORCAST(A2,6); VAR3:=FORCAST(A3,6); VAR4:=FORCAST(A4,6); VAR5:=FORCAST(A5,6); VAR6:=FORCAST(A6,6); VAR7:=FORCAST(A7,6); PARTLINE(VAR1,VAR1>REF(VAR1,1),RGB(255,0,255),VAR1REF(VAR2,1),RGB(255,0,255),VAR2REF(VAR3,1),RGB(255,0,255),VAR3REF(VAR4,1),RGB(255,0,255),VAR4REF(VAR5,1),RGB(255,0,255),VAR5REF(VAR6,1),RGB(255,0,255),VAR6REF(VAR7,1),RGB(255,0,255),VAR7=REF(towerc,1),towerc,directionmax,8,0),COLORRED; M15:STICKLINE(towerc=REF(TOWERC,1),TOWERC,DIRECTIONMAX,6,0),COLORRED; M2:STICKLINE(TOWERC>=REF(TOWERC,1),TOWERC,DIRECTIONMAX,5,0),COLORRED; M3:STICKLINE(TOWERC>=REF(TOWERC,1),TOWERC,DIRECTIONMAX,4,0),COLORRED; M4:STICKLINE(TOWERC>=REF(TOWERC,1),TOWERC,DIRECTIONMAX,3,0),COLORRED; M5:STICKLINE(TOWERC>=REF(TOWERC,1),TOWERC,DIRECTIONMAX,2,0),COLORRED; M6:STICKLINE(TOWERC>=REF(TOWERC,1),TOWERC,DIRECTIONMAX,1,0),COLORRED; M8:STICKLINE(TOWERC 10. 波段王 A1:=(3*CLOSE+OPEN+HIGH+LOW)/6; A2:=FORCAST(EMA(A1,8),6); A3:=FORCAST(EMA(A1,17),6); V4:=FORCAST(EMA(A1,11),6); V5:=FORCAST(EMA(A1,14),6); PARTLINE(A2,A2>=A3,RGB(255,0,0),A2=A3,RGB(255,0,0),A2=A3,RGB(255,0,0),A2=A3,RGB(255,0,0),A2 RSV:=(CLOSE-LLV(LOW,N))/(HHV(HIGH,N)-LLV(LOW,N))*100; K:=SMA(RSV,M1,1); D:=SMA(K,M2,1); J:=3*K-2*D; BU:=CROSS(J,50); SEL:=CROSS(50,J); STICKLINE(J>=50,LOW,HIGH,0.8,0),COLORBLUE; STICKLINE(J>=50,CLOSE,OPEN,8,0),COLORBLUE; STICKLINE(J 11. 操盤王 b:=(EMA(((O+H+L+C)/4),3)+EMA(((O+H+L+C)/4),6)+EMA(((O+H+L+C)/4),9))/4; d:=(EMA(((O+H+L+C)/4),5)+EMA(((O+H+L+C)/4),10)+EMA(((O+H+L+C)/4),20))/4; a1:DRAWTEXT((b>d) AND (REF(b,1) 買 '); a2:DRAWTEXT((b REF(d,1)), HIGH*1.01, '賣'); STICKLINE((bd),LOW,HIGH,0.8,0),COLORRED; STICKLINE((b>d),CLOSE,OPEN,8,0),COLORRED; 12. 背離王 A1:=FORCAST(EMA(CLOSE,5),6); A2:=FORCAST(EMA(CLOSE,8),6); A3:=FORCAST(EMA(CLOSE,11),6); A4:=FORCAST(EMA(CLOSE,14),6); A5:=FORCAST(EMA(CLOSE,17),6); B:=A1+A2+A3+A4-4*A5; TOWERC:=EMA(B,2); FORCAST(EMA(B,3),6),POINTDOT,colorgreen; FORCAST(EMA(B,4),6),POINTDOT,colorgreen; FORCAST(EMA(B,5),6),POINTDOT,colorgreen; FORCAST(EMA(B,6),6),POINTDOT,colorgreen; FORCAST(EMA(B,7),6),POINTDOT,colorgreen; FORCAST(EMA(B,8),6),POINTDOT,colorgreen; FORCAST(EMA(B,9),6),POINTDOT,colorgreen; FORCAST(EMA(B,10),6),POINTDOT,colorgreen; FORCAST(EMA(B,11),6),POINTDOT,colorgreen; FORCAST(EMA(B,12),6),POINTDOT,colorgreen; FORCAST(EMA(B,13),6),POINTDOT,colorgreen; FORCAST(EMA(B,14),6),POINTDOT,colorgreen; FORCAST(EMA(B,15),6),POINTDOT,colorgreen; FORCAST(EMA(B,16),6),POINTDOT,colorgreen; FORCAST(EMA(B,17),6),POINTDOT,colorgreen; STICKLINE(TOWERC>=REF(TOWERC,1),TOWERC,REF(TOWERC,1),8,0),colorred; STICKLINE(TOWERC=REF(TOWERC,1),TOWERC,REF(TOWERC,1),5,0),colorred; STICKLINE(TOWERC>=REF(TOWERC,1),TOWERC,REF(TOWERC,1),3,0),colorred; STICKLINE(TOWERC>=REF(TOWERC,1),TOWERC,REF(TOWERC,1),0,0),colorred; STICKLINE(TOWERC 13. 強弱王 n1.n2(14,14,) LC :=REF(CLOSE,1); RSI1:=SMA(MAX(CLOSE-LC,0),N1,1)/SMA(ABS(CLOSE-LC),N1,1)*100; M1:RSI1,COLORWHITE; LC1 :=REF("1A0001$CLOSE",1); RSI2:=SMA(MAX("1A0001$CLOSE"-LC1,0),N2,1)/SMA(ABS("1A0001$CLOSE"-LC1),N2,1)*100; M2:RSI2,COLORYELLOW; FILLRGN(RSI1,RSI2,RSI1>=RSI2,RGB(255,0,0),RSI1 弘歷軟件指標(biāo): 1.強勢信號: 說白了kdj(9.3.3),j值上穿50和下穿50。懶得寫! 2.弘歷太極:n1=9 LC := REF(CLOSE,1); 3.弱勢抄底:n,m1,m2(9.3.3) RSV:=(CLOSE-LLV(LOW,N))/(HHV(HIGH,N)-LLV(LOW,N))*100; 4.牛熊通道 AA:=MA((2*CLOSE+HIGH+LOW)/4,5); 5.弘歷通道 中軌 : 6.薛斯通道:n1.n2.p1.p2(30.8.15.3) UPPERL: MA(HIGH,n1)*(1+p1/100),colorwhite; 7.弘歷進(jìn)出 X1:EMA(C,8),COLORWHITE; 8.弘歷彩虹 收盤價:=c; 9.趨勢王 A1:=(EMA((OPEN+HIGH+LOW+CLOSE)/4,3)+EMA((OPEN+HIGH+LOW+CLOSE)/4,6)+EMA((OPEN+HIGH+LOW+CLOSE)/4,9))/3; 10.波段王 A1:=(3*CLOSE+OPEN+HIGH+LOW)/6; RSV:=(CLOSE-LLV(LOW,N))/(HHV(HIGH,N)-LLV(LOW,N))*100; 11.操盤王 b:=(EMA(((O+H+L+C)/4),3)+EMA(((O+H+L+C)/4),6)+EMA(((O+H+L+C)/4),9))/4; 12.背離王 A1:=FORCAST(EMA(CLOSE,5),6); 13.強弱王 n1.n2(14,14,) LC :=REF(CLOSE,1); 14.換手王 n (40) m1:=100*VOL/CAPITAL; |
|