当前位置:分析家公式网 → 股票公式 → 通达信公式 → 一键转帖:万山红遍(源码 、主图、通达信、贴图)
软件名称:[B]万山红遍(源码 、主图、通达信、贴图)[/B]
软件类型:国产软件
运行环境:Win9X/Win2000/WinXP/Win2003/Win7/
软件语言:简体中文
授权方式:免费版
软件大小:11.0 KB
官方主页:Home Page
更新时间:2015-11-02 07:34:54
软件简介:
{万山红遍} 高:=CONST(REF(HHV(H,150),3)); 低:=CONST(REF(LLV(L,150),3)); NN:=100; N:=9; LC:=REF(C,1); QC:=REF(C,2); AA:=REF(H,N)=HHV(H,2*N+1); AA1:=REF(L,N)=LLV(L,2*N+1); QY:=BACKSET(AA,N+1); QY1:=BACKSET(AA1,N+1); CC:=FILTER(QY,N) AND H=HHV(H,N+1); CC1:=FILTER(QY1,N) AND L=LLV(L,N+1); DDD:=BARSLAST(CC); DD1:=BARSLAST(CC1); GDTS:=IF(CC,CURRBARSCOUNT,0); DDTS:=IF(CC1,CURRBARSCOUNT,0); UTS:=IF(DDD,REF(GDTS,DDD),GDTS); DDTS1:=IF(DD1,REF(DDTS,DD1),DDTS); GDCS1:=CONST(UTS); DDCS1:=CONST(DDTS1); GDCS13:=CONST(REF(H,GDCS1-1)); DDCS13:=CONST(REF(L,DDCS1-1)); SS1:=REF(UTS,DDD+1); TS2:=REF(DDTS1,DD1+1); GDCS2:=CONST(SS1); DDCS2:=CONST(TS2); M:=INTPART(3*N/5); AAA:=REF(H,M)=HHV(H,2*M+1); QYY:=BACKSET(AAA,M+1); CCC:=FILTER(QYY,M) AND H=HHV(H,M+1); DDDD:=BARSLAST(CCC),NODRAW; GDTSS:=IF(CCC,CURRBARSCOUNT,0); TSS:=IF(DDDD,REF(GDTSS,DDDD),GDTSS); GDCS11:=CONST(TSS); TS11:=REF(TSS,DDDD+1); GDCS22:=CONST(TS11); AA11:=REF(L,M)=LLV(L,2*M+1); QY11:=BACKSET(AA11,M+1); CC11:=FILTER(QY11,M) AND L=LLV(L,M+1); DD11:=BARSLAST(CC11); DDTSS:=IF(CC11,CURRBARSCOUNT,0); DDTS11:=IF(DD11,REF(DDTSS,DD11),DDTSS); DDCS11:=CONST(DDTS11); DDTS22:=REF(DDTS11,DD11+1); DDCS22:=CONST(DDTS22); ZGD:=HHV(H,60)*1.01.00; ZGD2:=CONST(ZGD); 高压M:=DRAWLINE(CURRBARSCOUNT=GDCS22,H,CURRBARSCOUNT=GDCS11,H,1),COLORRED,LINETHICK1; 低撑M:=DRAWLINE(CURRBARSCOUNT=DDCS22,L,CURRBARSCOUNT=DDCS11,L,1) COLORRED,LINETHICK1; 高压1:=DRAWLINE(CURRBARSCOUNT=GDCS2,H,CURRBARSCOUNT=GDCS1,H,1) ,COLORBLUE,LINETHICK1; 低撑1:=DRAWLINE(CURRBARSCOUNT=DDCS2,L,CURRBARSCOUNT=DDCS1,L,1),COLORBLUE,LINETHICK1; 高点:=CONST(HHV(H,NN)); 低点:=CONST(LLV(L,NN)); {背景变色} R1:=C>LC AND C>QC; R2:=REF(R1,1) AND C<=LC AND C>=QC; R3:=REF(R2,1) AND C>=LC AND C<=QC; R4:=REF(R3,1) AND C<=LC AND C>=QC; R5:=REF(R4,1) AND C>=LC AND C<=QC; R6:=REF(R5,1) AND C<=LC AND C>=QC; R7:=REF(R6,1) AND C>=LC AND C<=QC; R8:=REF(R7,1) AND C<=LC AND C>=QC; R9:=REF(R8,1) AND C>=LC AND C<=QC; RA:=REF(R9,1) AND C<=LC AND C>=QC; RB:=REF(RA,1) AND C>=LC AND C<=QC; RC:=REF(RB,1) AND C<=LC AND C>=QC; RD:=C<LC AND C<QC; RE:=REF(RD,1) AND C>=LC AND C<=QC; RF:=REF(RE,1) AND C<=LC AND C>=QC; R10:=REF(RF,1) AND C>=LC AND C<=QC; R11:=REF(R10,1) AND C<=LC AND C>=QC; R12:=REF(R11,1) AND C>=LC AND C<=QC; R13:=REF(R12,1) AND C<=LC AND C>=QC; R14:=REF(R13,1) AND C>=LC AND C<=QC; R15:=REF(R14,1) AND C<=LC AND C>=QC; R16:=REF(R15,1) AND C>=LC AND C<=QC; R17:=REF(R16,1) AND C<=LC AND C>=QC; R18:=REF(R17,1) AND C>=LC AND C<=QC; R19:=REF(RD OR RE OR RF OR R10 OR R11 OR R12 OR R13 OR R14 OR R15 OR R16 OR R17 OR R18,1) AND R1; R1A:=((REF(R1 OR R2 OR R3 OR R4 OR R5 OR R6 OR R7 OR R8 OR R9 OR RA OR RB OR RC,1)) AND RD); VAR3:=IF(C<200 ,MA(COST(80),3),2500),NODRAW; VAR4:=(H+LC)/3; VAR5:=EMA((O+H+L+C)/4,2330); VAR6:=(VAR5 + ((VAR5 * 6) / 100)); 短买:R19,NODRAW,COLOR00AAAA; 离场:R1A,NODRAW,COLORFF7700; 持股:R1 OR R2 OR R3 OR R4 OR R5 OR R6 OR R7 OR R8 OR R9 OR RA OR RB OR RC,NODRAW,COLOR8000FF; 观望:RD OR RE OR RF OR R10 OR R11 OR R12 OR R13 OR R14 OR R15 OR R16 OR R17 OR R18,NODRAW,COLOR767628; 超跌:=(C-MA(C,34))/MA(C,34)*100<-14,COLORBBBBBB,NODRAW; Q1:=CONST(IF(短买,100,IF(离场,0,IF(持股,100,IF(超跌,150,40))))),NODRAW; Q2:=CONST(IF(短买,100,IF(离场,66,IF(持股,0,IF(超跌,150,118))))),NODRAW; Q3:=CONST(IF(短买,0,IF(离场,132,IF(持股,50,IF(超跌,150,118))))),NODRAW; DRAWBAND(高点,RGB(Q1,Q2,Q3),低点,DRAWNULL); C1:=IF(短买,短买,DRAWNULL),; C2:=IF(离场,离场,DRAWNULL),; {DDE金指 N: 1, 999, 13;} JH:=SMA(MAX(C-REF(C,1),0),6,1)/SMA(ABS(C-REF(C,1)),6,1)*100; SZ:=FILTER(CROSS(JH,35),13); SX:=FILTER(CROSS(JH,30),7); SQ:=FILTER(CROSS(71,JH),74); SD:=FILTER(CROSS(80,JH),74); CCL:=REF(HHV(C,120),1); DD:=REF(LLV(C,120),1); WW:=100*(C-DD)/(CCL-DD); EE:=AMOUNT; FF:=(EMA(EE,5)/REF(EMA(EE,5),5)); 低买:IF(CAPITAL<1,SZ,SX),COLOR22FFFF,NODRAW; 变盘:FILTER(O<REF(L,1) AND C>O AND V>REF(V,1),13),COLORFF88FF,NODRAW; 霸占:=FILTER((FF>=2 AND WW<35 AND BARSCOUNT(C)>30 OR (FF>=2 AND WW<100) AND BARSCOUNT(C)<50),90),COLOR0000AA,NODRAW; 顶部:=IF(CAPITAL<1,SQ,SD),COLOR00CC00,NODRAW; 持股K:C>REF(C,1),COLOR0099FF,NODRAW; 持币K:C<REF(C,1),COLORFFAA00,NODRAW; 平盘:=C=REF(C,1),COLOR999999,NODRAW; STICKLINE(持股K,H,L,3,1),COLOR0099FF; STICKLINE(持股K,C,O,1.5,0),COLOR0099FF; STICKLINE(持币K,H,L,3,1),COLORFF9900; STICKLINE(持币K,C,O,1.5,0),COLORFF9900; STICKLINE(平盘,H,L,3,1),COLOR999999; STICKLINE(平盘,C,O,1.5,0),COLOR999999; STICKLINE(霸占,H,L,3,1),COLOR0000CC; STICKLINE(霸占,C,O,1.5,0),COLOR0000CC; STICKLINE(变盘,H,L,3,1), COLORFF88FF; STICKLINE(变盘,C,O,1.5,0),COLORFF88FF; STICKLINE(低买,H,L,3,1),COLOR22FFFF; STICKLINE(低买,C,O,1.5,0),COLOR22FFFF; STICKLINE(顶部,H,L,3,1),COLOR00CC00; STICKLINE(顶部,C,O,1.5,0),COLOR00CC00; 趋势线:=3*SMA((C-LLV(L,27))/(HHV(H,27)-LLV(L,27))*100,5,1)-2*SMA(SMA((C-LLV(L,27))/ (HHV(H,27)-LLV(L,27))*100,5,1),3,1),COLORBCBC00,NODRAW; ZZ:=趋势线>REF(趋势线,1); {阻力支撑} QWX1:=HHV(C,30); QWX2:=LLV(C,30); QWX3:=CONST((QWX1+QWX2)/2); QWX4:=ABS((2*C+H+L)/4-MA(C,20))/MA(C,20); QWX5:=CONST((1-7/100)*(DMA(C,QWX4))); QWX6:=CONST((1+7/100)*(DMA(C,QWX4))); 阻力:IF(BARSLAST(CURRBARSCOUNT=12),QWX6,DRAWNULL),COLORFF9D3C,LINETHICK1,CIRCLEDOT; 支撑:IF(BARSLAST(CURRBARSCOUNT=12),QWX5,DRAWNULL),COLORFF00FF,LINETHICK1,CIRCLEDOT; {最佳买入选股} RSI5:=(SMA(MAX((C-LC),0),5,1)/SMA(ABS((C-LC)),5,1))*100; TR1:=SUM(MAX(MAX((H-L),ABS(H-REF(C,1))),ABS(L-REF(C,1))),10); HD:=H-REF(H,1); LD:=REF(L,1)-L; DMP:=SUM(IF((HD>0 AND HD>LD),HD,0),10); DMM:=SUM(IF((LD>0 AND LD>HD),LD,0),10); PDI:=DMP*100/TR1; MDI:=DMM*100/TR1; ADX:=MA((ABS((MDI-PDI)/(MDI+PDI))*100),5); AV:=RSI5+ADX; DXR:=(ADX+REF(ADX,5)/2)+RSI5; WR10:=(100*(HHV(H,10)-C))/(HHV(H,10)-LLV(L,10)); NEWVOL:=RSI5-WR10; 最佳买入:=AV+NEWVOL; J:="KDJ.J"; X:=LLV(J,2)=LLV(J,8); 买入时机:=(CROSS(J,3)); 佳选A:=CROSS(最佳买入,0); {DIF综合抓牛} RSIA:=(SMA(MAX(C-LC,0),6,1)/SMA(ABS(C-LC),6,1)*100)/100; WR:=-100*(HHV(H,14)-C)/(HHV(H,14)-LLV(L,14)); 反向:=((0-WR)-100)/100,; 角度差:=1-(反向/RSI); 角度2:=MA(角度差,2); 角度4:=MA(角度差,4); 角度差A:=角度差>MA(角度差,3)*1.3; 转向:=REF(角度差,1)<REF(角度差,2) AND 角度差>REF(角度差,1) AND REF(角度差,1)<1.06; SS:=COUNT(转向,4)>0 OR COUNT(角度差A,4)>0; DIF买:=CROSS(角度2,角度4) AND SS,COLOR0088FF; {精准买点} CYC13:=0.01*EXPMA(AMOUNT,13)/EXPMA(V,13); CYS:=(C-CYC13)/CYC13*100; 逢低买入:=IF("ZXNH.ZXNH"=1 AND CYS<=-2,0.6,0); 抓牛A:=DIF买&&逢低买入; 到:=(HHV(H,21)-C)/(HHV(H,21)-LLV(L,21))*100-10; 底:=(C-LLV(L,21))/(HHV(H,21)-LLV(L,21))*100; 啦:=SMA(底,13,8); 哈:=CEILING(SMA(啦,13,8)); 哈哈:=SMA(到,21,8); 差:=哈-哈哈,COLORFFFFFF; RC1:=REF((L+O+C+H)/4,1); RC2:=SMA(ABS(L-RC1),13,1)/SMA(MAX(LOW-RC1,0),10,1); RC3:=EMA(RC2,10); RC4:=LLV(L,33); RC5:=EMA(IF(L<=RC4,RC3,0),3),; 建仓:=IF(RC5>REF(RC5,1),RC5,0); 洗:=IF(RC5<REF(RC5,1),RC5,0),; 启动A:=FILTER(REF(差,1)<-70 AND 差>REF(差,1) AND (建仓 OR 洗),3); {乖离破底} X3:=(2*C+L+H)/4; 地:=EMA(X3,55)*0.84,; 乖离5:=(C-MA(C,5))/MA(C,5)*100,NODRAW; 乖离A:=FILTER(L<地 AND REF(乖离5,1)<-5 AND 乖离5>REF(乖离5,1),3); 趋势:=7*SMA((C-LLV(L,27))/(HHV(H,27)-LLV(L,27))*30,4,1) -3*SMA(SMA((C-LLV(L,27))/(HHV(H,27)-LLV(L,27))*30,4,1),3,1) -SMA(SMA(SMA((C-LLV(L,27))/(HHV(H,27)-LLV(L,27))*30,4,1),3,1),2,1); 天线:=78.89; 逃顶:=CROSS(天线,趋势); 低吸A:=CROSS(趋势,5); {内能线} ZF:=((C-REF(C,1))/REF(C,1))*100; HSL:=(V/CAPITAL)*100; KK:=ZF/HSL,COLOR6000FF; KK5:=MA(KK,5),COLORFFAA00; LL:=LLV(KK,34); 内能买A:=CROSS(KK,KK5)&&REF(KK,1)<=LL&&ZZ,; {包Z不赔} 止跌:=(REF(EVERY(C<O,2),1) AND C>O); VAR1N:=MA(C,5),; VAR2N:=MA(C,10); VAR3N:=(VAR1N-C)/C>3/100; VAR4N:=(VAR2N-VAR1N)/VAR1N>
[url=http://www.70822.com/soft/sort013/sort05/down-90625.html]万山红遍(源码 、主图、通达信、贴图)[/url]