分析家公式网,提供指标公式,股票软件 用户登录  |  用户 注册
当前位置：分析家公式网 → 股票公式 → 通达信公式 → 一键转帖：卖公式 ，超长代码自用

软件名称：[B]卖公式 ，超长代码自用[/B]
软件类型：国产软件
运行环境：Win9X/Win2000/WinXP/Win2003/Win7/
软件语言：简体中文
授权方式：免费版
软件大小：15.0 KB
官方主页：Home Page
更新时间：2014-04-02 04:31:37
软件简介:

MAH:=(H*18+REF(H,1)*17+REF(H,2)*16+REF(H,3)*15+REF(H,4)*14+REF(H,5)*13+REF(H,6)*12+REF(H,7)*11+REF(H,8)*10+REF(H,9)*9+REF(H,10)*8+REF(H,11)*7+REF(H,12)*6+REF(H,13)*5+REF(H,14)*4+REF(H,15)*3+REF(H,16)*2+REF(H,17)*1)/171;

MAL:=(L*18+REF(L,1)*17+REF(L,2)*16+REF(L,3)*15+REF(L,4)*14+REF(L,5)*13+REF(L,6)*12+REF(L,7)*11+REF(L,8)*10+REF(L,9)*9+REF(L,10)*8+REF(L,11)*7+REF(L,12)*6+REF(L,13)*5+REF(L,14)*4+REF(L,15)*3+REF(L,16)*2+REF(L,17)*1)/171;

MA5:=MA(CLOSE,5);

MA10:=MA(CLOSE,10);

MA20:=MA(CLOSE,20);

MA60:=MA(CLOSE,60);

DK:= CLOSE>=MAH OR (C>MA5 AND C>MA10 AND C>MA20 AND C>MA60);

KK:= MAL>CLOSE OR (C<MA5 AND C<MA10 AND C<MA20 AND C<MA60);

DK1:=BARSLAST(DK);

KK1:=BARSLAST(KK);

DK2:=BARSLAST(CROSS(KK1,DK1));

KK2:=BARSLAST(CROSS(DK1,KK1));

HS:=DK2<KK2;

LS:=KK2<DK2;

STICKLINE(HS,-0.5,0.5,6,0),COLOR001050;

STICKLINE(LS,-0.5,0.5,6,0),COLORBLACK;

{红柱兰柱分阴阳}
VARE1:=MA((VOL-REF(VOL,1))/REF(VOL,1),5);
VARE2:=(CLOSE-MA(CLOSE,24))/MA(CLOSE,24)*100;
MY:= VARE2*(1+VARE1);
阴阳:MA(MY,18),COLORSTICK;
趋:MA(阴阳,5);

{成交买卖强弱}

A44:=VOL*CLOSE;

B44:=SUM(A44,1)/SUM(VOL,1);

B144:=EMA(B44,17);

买卖强弱:MA((B44-B144)*100/B44,18),COLORRED,LINETHICK2;
IF(买卖强弱<REF(买卖强弱,1),买卖强弱,DRAWNULL),COLORGREEN,LINETHICK2;

{操盘区}

VAR0:=(MA(CLOSE,5)+MA(CLOSE,10)+MA(CLOSE,15)+MA(CLOSE,20))/4;

积极操盘区:IF(VAR0>REF(VAR0,2),VAR0,DRAWNULL), COLORRED, NODRAW;

持币观望区:IF(VAR0<REF(VAR0,2),VAR0,DRAWNULL), COLORGREEN, NODRAW;

{安全区间}

安全区间:=EMA((EMA(CLOSE,10)-EMA(CLOSE,60)),10),NODRAW;

DRAWTEXT(安全区间>REF(安全区间,1),6.5,'多'),COLORRED;

{量能异动}

VAR2Q:=REF(LOW,1);

VAR3Q:=SMA(ABS(LOW-VAR2Q),3,1)/SMA(MAX(LOW-VAR2Q,0),3,1)*100;

VAR4Q:=EMA(IF(CLOSE*1.3,VAR3Q*10,VAR3Q/10),3);

VAR5Q:=LLV(LOW,30);

VAR6Q:=HHV(VAR4Q,30);

VAR7Q:=IF(MA(CLOSE,58),1,0);

VAR8Q:=EMA(IF(LOW<=VAR5Q,(VAR4Q+VAR6Q*2)/2,0),3)/999*VAR7Q;

火焰山:=IF(VAR8Q>100,5,VAR8Q/15);

STICKLINE(火焰山>0,0 ,火焰山*1.02,1,0 ),COLOR4444FF;

{绿色资金进入区}

VAR1:=INDEXA/100000000;

VAR2:=INDEXADV;

VAR3:=INDEXDEC;

VAR4:=VAR2/(VAR2+VAR3);

VAR5:=VAR3/(VAR2+VAR3);

VAR6:=EMA(VAR4,3);

VAR7:=EMA(VAR5,3);

VAR8:=EMA(VAR6,5);

VAR9:=EMA(VAR7,5);

资金:=EMA(VAR9,10)/150;

底:=BARSLAST(LLV(L,4)=LLV(L,120))<5 ;

安全区:STICKLINE(底,资金-0.3,资金,3,0),COLORGREEN;

{看空看多区间变化}

VAR1456:=(HHV(HIGH,36)-CLOSE)/(HHV(HIGH,36)-LLV(LOW,36))*100;

机构做空能量线:= SMA(VAR1456,3,1)-50,LINETHICK2,COLORGREEN;

VAR2456:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100;

机构做多能量线:= SMA(VAR2456,5,1)-8-50,LINETHICK2,COLORRED;

DRAWTEXT(CROSS(机构做多能量线,0),5,'<-看多'),COLORRED;

DRAWTEXT(CROSS(0,机构做多能量线),-5,'<-看空'),COLORGREEN;

DRAWTEXT(CROSS(机构做空能量线,0),-4,'<-确认看空'),COLORGREEN;

DRAWTEXT(CROSS(0,机构做空能量线),4,'<-确认看多'),COLORRED;

{生命量能}

生命量能:=EMA(100*(CLOSE-LLV(LOW,31))/(HHV(HIGH,31)-LLV(LOW,31)),3)/4;


DRAWTEXT(生命量能<1,-2.5,'<--3级买'),COLORFF1493;

{量能}

VAR21:=REF((LOW+OPEN+CLOSE+HIGH)/4,1);

VAR22:=SMA(ABS(LOW-VAR21),13,1)/SMA(MAX(LOW-VAR21,0),10,1);

VAR23:=EMA(VAR22,10);

VAR24:=LLV(LOW,33);

VAR25:=EMA(IF(LOW<=VAR24,VAR23,0),3);

DRAWTEXT(VAR25>REF(VAR25,1),-3,'买量'),COLORRED;

VAR177:=(CLOSE-LLV(LOW,36))/(HHV(HIGH,36)-LLV(LOW,36))*100;

VAR277:=SMA(VAR177,3,1);

VAR377:=SMA(VAR277,3,1);

趋势线:=3*SMA((CLOSE-LLV(LOW,27))/(HHV(HIGH,27)-LLV(LOW,27))*100,5,1)-2*SMA(SMA((CLOSE-LLV(LOW,27))/(HHV(HIGH,27)-LLV(LOW,27))*100,5,1),3,1); 

VAR777:=CROSS(VAR377,趋势线) AND VAR377>60;

{DRAWTEXT(FILTER(VAR777,5)=1,+3,'<-3级卖'),COLOR32CD32; }

{动能运行轨迹}

RSV:=(((CLOSE - LLV(LOW,33)) / (HHV(HIGH,33) - LLV(LOW,33))) * 100);

Y0:=SMA(RSV,7,1);

Y1:=SMA(SMA(RSV,7,1),3,1);

Y2:=(((CLOSE/COST(13))<=0.8)*10),COLORMAGENTA;

Y3:=SMA(SMA(SMA(RSV,6,1),5,1),3,1),COLORGREEN;

DRAWTEXT(CROSS(18,Y0) AND Y1<21,-2.5,'进底部'),COLORGREEN;

DRAWTEXT(CROSS(Y0,20),-3.3,'出底部'),COLORRED;

{解盘}

ARE4:=MA(C,20);

ARE5:=(C>MA(C,5));

ARE6:=(MA(C,5)>MA(C,10));

ARE7:=(C>MA(C,10));

ARE8:=(MA(C,5)>MA(C,20));

ARE9:=(C>MA(C,20));

ARE10:=REF(ARE4,1);

ARE11:=(ARE4>ARE10);

AVX:=(((((IF(ARE5,10,(0-10))+IF(ARE6,10,(0-10)))+IF(ARE7,10,(0-10)))+IF(ARE8,10,(0-10)))+IF(ARE9,10,(0-10)))+IF(ARE11,10,(0-10)));

DSLX:=(C/INDEXC);

DSLX1:=MA(DSLX,5);

DSLX2:=MA(DSLX,10);

  VRE1:=MA(V,5);

VRE2:=MA(V,10);

阻力位:=IF((C>200),(C*1.01),(C*1.07));

阻力位１:=IF((C<10),(C*1.05),阻力位);

止损位:=IF((C>200),(C*0.99),(C*0.93));

止损位１:=IF((C<10),(C*0.95),止损位);

TJTS1:=ISLASTBAR AND C<500;

TJTS2:=ISLASTBAR AND C>500;

KDAT:=REFDATE(HHV(H,45)/1.01,DATE);

解盘1:=CONST(IF(TJTS1 AND  ((CROSS(AVX,1) AND (VRE1 >= VRE2)) AND (DSLX >= DSLX1)) ,1,0));

解盘2:=CONST(IF(TJTS1 AND  ((CROSS(AVX,1) AND (VRE1 < VRE2)) AND (DSLX >= DSLX1)) ,1,0));

解盘3:=CONST(IF(TJTS1 AND  ((CROSS(AVX,1) AND (VRE1 > VRE2)) AND (DSLX < DSLX1)) ,1,0));

解盘4:=CONST(IF(TJTS1 AND  ((CROSS(AVX,1) AND (VRE1 <= VRE2)) AND (DSLX < DSLX1)) ,1,0));

解盘5:=CONST(IF(TJTS1 AND  ((CROSS(1,AVX) AND (VRE1 >= VRE2)) AND (DSLX >= DSLX1)) ,1,0));

解盘6:=CONST(IF(TJTS1 AND  ((CROSS(1,AVX) AND (VRE1 < VRE2)) AND (DSLX >= DSLX1)) ,1,0));

解盘7:=CONST(IF(TJTS1 AND  ((CROSS(1,AVX) AND (VRE1 >= VRE2)) AND (DSLX < DSLX1)) ,1,0));

解盘8:=CONST(IF(TJTS1 AND  ((CROSS(1,AVX) AND (VRE1 < VRE2)) AND (DSLX < DSLX1)) ,1,0));

解盘9:=CONST(IF(TJTS1 AND  ((((AVX >= 1) AND (REF(AVX,1) > 0)) AND (VRE1 >= VRE2)) AND (DSLX >= DSLX1)) ,1,0));

解盘10:=CONST(IF(TJTS1 AND  ((((AVX >= 1) AND (REF(AVX,1) > 0)) AND (VRE1 < VRE2)) AND (DSLX >= DSLX1)) ,1,0));

解盘11:=CONST(IF(TJTS1 AND  ((((AVX >= 1) AND (REF(AVX,1) > 0)) AND (VRE1 >= VRE2)) AND (DSLX < DSLX1)) ,1,0));

解盘12:=CONST(IF(TJTS1 AND  ((((AVX >= 1) AND (REF(AVX,1) > 0)) AND (VRE1 < VRE2)) AND (DSLX < DSLX1)) ,1,0));

解盘13:=CONST(IF(TJTS1 AND  ((((AVX < 1) AND (REF(AVX,1) < 0)) AND (VRE1 >= VRE2)) AND (DSLX >= DSLX1)) ,1,0));

解盘14:=CONST(IF(TJTS1 AND  ((((AVX < 1) AND (REF(AVX,1) < 0)) AND (VRE1 < VRE2)) AND (DSLX >= DSLX1)) ,1,0));

解盘15:=CONST(IF(TJTS1 AND  ((((AVX < 1) AND (REF(AVX,1) < 0)) AND (VRE1 >= VRE2)) AND (DSLX < DSLX1)) ,1,0));

解盘16:=CONST(IF(TJTS1 AND  ((((AVX < 1) AND (REF(AVX,1) < 0)) AND (VRE1 < VRE2)) AND (DSLX < DSLX1)) ,1,0));

解盘17:=CONST(IF(TJTS2 AND  (CROSS(AVX,1) AND (VRE1 >= VRE2)) ,1,0));

解盘18:=CONST(IF(TJTS2 AND  (CROSS(AVX,1) AND (VRE1 >= VRE2)) ,1,0));

解盘19:=CONST(IF(TJTS2 AND  (CROSS(AVX,1) AND (VRE1 < VRE2)) ,1,0));

解盘20:=CONST(IF(TJTS2 AND  (CROSS(AVX,1) AND (VRE1 < VRE2)) ,1,0));

解盘21:=CONST(IF(TJTS2 AND  (CROSS(1,AVX) AND (VRE1 >= VRE2)) ,1,0));

解盘22:=CONST(IF(TJTS2 AND  (CROSS(1,AVX) AND (VRE1 < VRE2)) ,1,0));

解盘23:=CONST(IF(TJTS2 AND  (((AVX >= 1) AND (REF(AVX,1) > 0)) AND (
[url=http://www.70822.com/soft/sort013/sort05/down-71192.html]卖公式 ，超长代码自用[/url]

关于本站 | 网站帮助 | 广告合作 | 声明 | 友情连接 | 网站地图 |
分析家公式网声明：本站所有股票公式软件资料均网上公开收集，如侵权请联系删帖。站内所有广告，均与本站无关！
Copyright © 2003-2024 70822.Com. All Rights Reserved .
页面执行时间：46.87500 毫秒