楚河汉界(公式源码、主图、贴图){楚河汉界 引用公式} {公称名称: CHUS} AAA:=1;TT:=1; RC:=(REF(CLOSE,1) * AAA); XA:=IF((RC > HIGH),RC,0); XB:=IF(((HIGH >= RC) AND (RC > LOW)),HIGH,0); XC:=IF((RC <= LOW),HIGH,0); XD:=((XA + XB) + XC); YA:=IF((RC > HIGH),LOW,0); YB:=IF(((HIGH >= RC) AND (RC > LOW)),LOW,0); YC:=IF((RC <= LOW),RC,0); YD:=((YA + YB) + YC); ATR:=SMA((XD - YD),20,1); TT1: (EMA(CLOSE,20) + (2 * ATR)),LINETHICK0; TT2: (EMA(CLOSE,20) - (2 * ATR)),LINETHICK0; TT3: ((((TT1 + TT1) + TT1) + TT2) / 4),LINETHICK0; TT4: ((((TT1 + TT2) + TT2) + TT2) / 4),LINETHICK0; TT5: EMA(CLOSE,8),LINETHICK0; TT6: EMA(CLOSE,20),LINETHICK0; 西楚霸王 公式源码TT:=1; CHECK:=0; CHECK1:=0; AAA:=IF((((CHECK = 0) OR (CHECK1 = 0)) AND (TT = 1)),1,0); TD:=DATATYPE; TT5:=(IF((TD = 1),"CHUS.TT1#min5",IF((TD = 2),"CHUS.TT1#min15",IF((TD = 3),"CHUS.TT1#min60",IF((TD = 4),"CHUS.TT1#min60",IF((TD = 5),"CHUS.TT1#day",IF((TD = 6),"CHUS.TT1#week","CHUS.TT1#year")))))) * TT); TT6:=(IF((TD = 1),"CHUS.TT2#min5",IF((TD = 2),"CHUS.TT2#min15",IF((TD = 3),"CHUS.TT2#min60",IF((TD = 4),"CHUS.TT2#min60",IF((TD = 5),"CHUS.TT2#day",IF((TD = 6),"CHUS.TT2#week","CHUS.TT2#year")))))) * TT); A3:=(IF((TD = 1),"CHUS.TT3#min5",IF((TD = 2),"CHUS.TT3#min15",IF((TD = 3),"CHUS.TT3#min60",IF((TD = 4),"CHUS.TT3#min60",IF((TD = 5),"CHUS.TT3#day",IF((TD = 6),"CHUS.TT3#week","CHUS.TT3#year")))))) * TT); A4:=(IF((TD = 1),"CHUS.TT4#min5",IF((TD = 2),"CHUS.TT4#min15",IF((TD = 3),"CHUS.TT4#min60",IF((TD = 4),"CHUS.TT4#min60",IF((TD = 5),"CHUS.TT4#day",IF((TD = 6),"CHUS.TT4#week","CHUS.TT4#year")))))) * TT); XC:=(IF((TD = 1),"CHUS.TT5#min5",IF((TD = 2),"CHUS.TT5#min15",IF((TD = 3),"CHUS.TT5#min60",IF((TD = 4),"CHUS.TT5#min60",IF((TD = 5),"CHUS.TT5#day",IF((TD = 6),"CHUS.TT5#week","CHUS.TT5#year")))))) * TT); XD:=(IF((TD = 1),"CHUS.TT6#min5",IF((TD = 2),"CHUS.TT6#min15",IF((TD = 3),"CHUS.TT6#min60",IF((TD = 4),"CHUS.TT6#min60",IF((TD = 5),"CHUS.TT6#day",IF((TD = 6),"CHUS.TT6#week","CHUS.TT6#year")))))) * TT); FILLRGN(((XC >= XD) AND (AAA = 1)),EMA(TT5,4),EMA(TT6,4)),color9966CC; FILLRGN(((XC < XD) AND (AAA = 1)),EMA(TT5,4),EMA(TT6,4)),colorFFFF00; FILLRGN(((EMA(CLOSE,8) >= EMA(CLOSE,20)) AND (AAA = 1)),EMA(A3,4),EMA(A4,4)),colorFF99CC; FILLRGN(((EMA(CLOSE,8) < EMA(CLOSE,20)) AND (AAA = 1)),EMA(A3,4),EMA(A4,4)),colorFFFF99; FO:=IF(CHECKUSER(1),OPEN,0); FH:=IF(CHECKUSER(1),HIGH,0); FL:=IF(CHECKUSER(1),LOW,0); FC:=IF(CHECKUSER(1),CLOSE,0); <%vo=ffl.vardata("fo") vh=ffl.vardata("fh") vl=ffl.vardata("fl") vc=ffl.vardata("fc") last=ubound(vc)vc(0)=(vh(0)+vl(0)+2*vc(0))/4 for i=1 to last vo(i)=(vo(i-1)+vc(i-1))/2 if vo(i)>vh(i) then vh(i)=vo(i) else vh(i)=vh(i) if vo(i)<vl(i) then vl(i)=vo(i) else vl(i)=vl(i) vc(i)=(2*vc(i)+vh(i)+vl(i))/4 nextffl.vardata("fo")=vo ffl.vardata("fh")=vh ffl.vardata("fl")=vl ffl.vardata("fc")=vc%> KK:=IF(((FC >= FO) AND ((FC >= REF(FC,1)) OR (REF(FC,1) >= REF(FO,1)))),1,IF(((FC < FO) AND ((FC < REF(FO,1)) OR (REF(FC,1) < REF(FO,1)))),(0 - 1),0)); 明日轉折:(ROUND(((FO + FC) / 2)) * AAA),SHIFT1,LINETHICK0,colorFFFF; 今日轉折:=ROUND(IF((KK = 1),MIN(FC,FO),IF((KK = (0 - 1)),MAX(FC,FO),IF((REF(KK,1) = 1),MIN(FC,FO),IF((REF(KK,1) = (0 - 1)),MAX(FC,FO),((FC + FO) / 2)))))); DRAWNUMBER((ISLASTBAR AND (AAA = 1)),明日轉折,ROUND(明日轉折),2),SHIFT3; STICKLINE((((FC > FO) AND (TT = 1)) AND (AAA = 1)),FH,FL,0.4,0),colorFF; STICKLINE((((FO > FC) AND (TT = 1)) AND (AAA = 1)),FH,FL,0.4,0),colorFF0000; STICKLINE(((((KK = 1) AND (FC >= FO)) AND (TT = 1)) AND (AAA = 1)),FO,FC,8,0),colorFF; STICKLINE(((((KK = 1) AND (FC < FO)) AND (TT = 1)) AND (AAA = 1)),FO,FC,8,0),colorFF; STICKLINE(((((KK = (0 - 1)) AND (FC >= FO)) AND (TT = 1)) AND (AAA = 1)),FO,FC,8,0),colorFF0000; STICKLINE(((((KK = (0 - 1)) AND (FC < FO)) AND (TT = 1)) AND (AAA = 1)),FO,FC,8,0),colorFF0000; STICKLINE(((((KK = 0) AND (FC >= FO)) AND (TT = 1)) AND (AAA = 1)),FO,FC,8,0),colorFF; STICKLINE(((((KK = 0) AND (FC < FO)) AND (TT = 1)) AND (AAA = 1)),FO,FC,8,0),colorFF; CC:=(CLOSE * TT); DIFF:=(EMA(CC,26) - EMA(CC,52)); DEA:=EMA(DIFF,52); MACD:=(2 * (DIFF - DEA)); DIF:=(EMA(CC,26) - EMA(CC,52)); ESS:=EMA(CC,26); EGG:=EMA(CC,52); RDIF:=REF(DIF,1); RSS:=REF(ESS,1); RGG:=REF(EGG,1); RDEA:=REF(DEA,1); RMACD:=REF(MACD,1); RZZZ:=(RDEA + (((52 + 1) / (2 * (52 - 1))) * RMACD)); XDIF:=((((((52 - 1) * (26 + 1)) * RGG) - (((52 + 1) * (26 - 1)) * RSS)) + (((26 + 1) * (52 + 1)) * RDIF)) / ((2 * 52) - (2 * 26))); XDEA:=((((((52 - 1) * (26 + 1)) * RGG) - (((52 + 1) * (26 - 1)) * RSS)) + (((26 + 1) * (52 + 1)) * RDEA)) / ((2 * 52) - (2 * 26))); XMACD:=((((((52 - 1) * (26 + 1)) * RGG) - (((52 + 1) * (26 - 1)) * RSS)) + (((26 + 1) * (52 + 1)) * RZZZ)) / ((2 * 52) - (2 * 26))); AA:=ISLASTBAR; BB:=BACKSET((AA = 1),1); Y:=BARSLAST((BB = 1)); X:=1; TDIF:=(DIF * X); TSS:=(ESS * X); TGG:=(EGG * X); TDEA:=(DEA * X); TMACD:=(MACD * X); TZZZ:=(TDEA + (((52 + 1) / (2 * (52 - 1))) * TMACD)); 西楚霸王:(((((((((52 - 1) * (26 + 1)) * TGG) * AAA) - ((((52 + 1) * (26 - 1)) * TSS) * AAA)) + (((26 + 1) * (52 + 1)) * TDIF)) * AAA) / ((2 * 52) - (2 * 26))) * AAA); PARTLINE(((西楚霸王 >= REF(西楚霸王,1)) AND (AAA = 1)),西楚霸王),LINETHICK3,colorFF; PARTLINE(((西楚霸王 < REF(西楚霸王,1)) AND (AAA = 1)),西楚霸王),LINETHICK3,colorFF00; 散户最不应错过的公式 (公式源码、副图、贴图)V1:=POW(MA(CLOSE,5),2)+MA(CLOSE,5); V2:=POW(MA(LOW,5),2)+MA(LOW,5); V3:=POW(MA(HIGH,5),2)+MA(HIGH,5); V4:=(V1-LLV(V2,9))/(HHV(V3,9)-LLV(V2,9))*150+65; DK:SMA(V4,3,1)*1.5,COLORFFFFFF; DD:=SMA(DK,3,1); DJ:3*DK-2*DD,COLORGREEN; L1:=(EMA(CLOSE,3) - EMA(CLOSE,13)); L2:=EMA(L1,9); L3:=BARSLAST(CROSS(L1,L2)); L4:=REF(L3,L3+1); L5:=L2<REF(L2,L4); 变盘:=CROSS(L1,L2) AND L5; DRAWTEXT( 变盘>0,DK+20,'●买'),COLOR005BF5; STICKLINE( 变盘>0,DK,DK+40,2,0),COLOR005BF5; W1:= EMA(CLOSE,12) - EMA(CLOSE,26); W2:= EMA(W1,9); W3:= 2*(W1-W2); W4:= REF(W3,1); W5:= CROSS(W4,W3) AND W4>0; DRAWTEXT(W5 AND DJ>250,DJ,'减'),COLOR00B4FF; STICKLINE(W5 AND DJ>250,DJ+20,DJ-40,2,0),COLOR00B4FF; 100,COLOR00FF00; 300,COLORFF00F8; 猎庄利器 (公式源码、副图、贴图){参数n=5,n1=21}DRAWBKBMP(CLOSE<>0,'009'); VAR1:=4*SMA((CLOSE-LLV(LOW,N))/(HHV(HIGH,N)-LLV(LOW,N))*100,5,1)-3*SMA(SMA((CLOSE-LLV(LOW,N))/(HHV(HIGH,N)-LLV(LOW,N))*100,5,1),3.2,1); VAR2:=8; 小试牛刀:IF(CROSS(VAR1,VAR2),8,0),STICK,colorFF; DRAWICON(小试牛刀>0,8,4); 发现庄迹:IF(VAR1<=8,15,0),STICK,LINETHICK2,colorFFFF00; VARO5:=LLV(LOW,27); VARO6:=HHV(HIGH,34); VARO7:=EMA((CLOSE-VARO5)/(VARO6-VARO5)*4,4)*25; 建仓区:IF(VARO7<10,100,118),LINETHICK1,colorCCFF; CD1:=(HHV(HIGH,9)-CLOSE)/(HHV(HIGH,9)-LLV(LOW,9))-0.7; CD2:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9)); CD3:=SMA(SMA(CD2,3,1),3,1); CD4:=CD3-SMA(CD1,9,1)-0.5; CD5:=IF(CD4>0,CD4,0); CD6:=REF(CD5,1); VAR81:=MA(CLOSE,9); 空头1:=IF(CD6-CD5,CD6,CD5); 减仓空仓:CROSS(CD6,CD5),colorFF00; DRAWICON(减仓空仓>0,113,5); VAR1A:=(HHV(HIGH,9)-CLOSE)/(HHV(HIGH,9)-LLV(LOW,9))*100-70; VAR2A:=SMA(VAR1A,9,1)+100; VAR3A:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100; VAR4A:=SMA(VAR3A,3,1); VAR5A:=SMA(VAR4A,3,1)+100; VAR6A:=VAR5A-VAR2A; 端庄窝:=IF(VAR6A>N1,VAR6A-N1,0); 果断出击:IF(CROSS(端庄窝,0.01),18,0),STICK,LINETHICK2,colorCC; DRAWICON(果断出击>0,18,4); XG:=CROSS(端庄窝,0.01); LC:=REF(CLOSE,1); RSI:=(SMA(MAX(CLOSE-LC,0),6,1))/(SMA(ABS(CLOSE-LC),6,1))*100; E:=CROSS(83,RSI); STICKLINE(REF(端庄窝,1)<端庄窝,端庄窝,REF(端庄窝,1),8,0),colorFF; STICKLINE(REF(端庄窝,1)>端庄窝,端庄窝,REF(端庄窝,1),8,0),colorFF00; 红持绿空:0,colorFF00; EXPLAIN(小试牛刀,'关注[少试牛刀]信号,止跌反弹,建议轻仓介入,抢反弹!'),colorFF00FF; EXPLAIN(XG,'关注[果断出击]信号,底部已确认,赶快抄底,做波小行情!'),colorFFFF; EXPLAIN(减仓空仓,'形态变坏,股价要回调了,重仓者建议大幅减仓或空仓!'),colorFF00; {点击看本软件截图: 58股票 公式网 http://www. 58gu. com 整理} |