|
以下为通达信股票软件付图技术指标《买卖天机》原码
FBS2
{买卖天机——多空模拟成交量（HSL）}
{当日估测成交量（个股为换手率，大盘为成交金额）任意周期动态估测值,X:=1,2,4,6,12,26,52;T:=120,10;}
X:=4;
Y:=7*X;{对应于20日K线}
T:=120;{对应于120分钟K线}
VV0:=IF(CLOSE<180,100*DYNAINFO(8)/(FINANCE(7)/100),IF(PERIOD=8,DYNAINFO(8)/1000000,DYNAINFO(10)/10000000000));
VV1:=IF(CLOSE<180,100*VOL/(FINANCE(7)/100),IF(PERIOD=8,VOL/1000000,AMOUNT/10000000000));
VV2:=IF(MOD(FROMOPEN,60)>0,MOD(FROMOPEN,60),60);
VV3:=IF(MOD(FROMOPEN,30)>0,MOD(FROMOPEN,30),30);
VV4:=IF(MOD(FROMOPEN,15)>0,MOD(FROMOPEN,15),15);
VV5:=IF(MOD(FROMOPEN,5)>0,MOD(FROMOPEN,5),5);
VV6:=IF(MOD(FROMOPEN,T)>0,MOD(FROMOPEN,T),T);
VV7:=IF(PERIOD=5,240/FROMOPEN,IF(PERIOD=4,60/VV2,IF(PERIOD=3,30/VV3,IF(PERIOD=2,15/VV4,IF(PERIOD=1,5/VV5,IF(PERIOD=8,T/VV6,1))))));
VV8:=VV0*(240-FROMOPEN)/FROMOPEN+VV1;
VV9:=DATETODAY(DATE)-REF(DATETODAY(DATE),1);
VV10:=REF(DATETODAY(DATE),1)-REF(DATETODAY(DATE),2);
VV11:=REF(DATETODAY(DATE),2)-REF(DATETODAY(DATE),3);
VV12:=REF(DATETODAY(DATE),3)-REF(DATETODAY(DATE),4);
VV13:=REF(DATETODAY(DATE),4)-REF(DATETODAY(DATE),5);
VV13B:=REF(DATETODAY(DATE),5)-REF(DATETODAY(DATE),6);
VV14:=MIN(MIN(MIN(MIN(VV10,VV11),VV12),VV13),VV13B);
VV15:=MIN(VV9,VV14);
VV16:=IF(MOD(WEEKDAY,5)>0,MOD(WEEKDAY,5),5);
VV17:=IF(MONTH=2,IF(MOD(YEAR,4)>0,28,29),IF(MONTH<=7,IF(MOD(MONTH,2)>0,31,30),IF(MOD(MONTH,2)>0,30,31)));
VV18:=IF(REF(MONTH,1)=3,IF(MOD(YEAR,4)>0,90,91),IF(REF(MONTH,1)=6,91,IF(REF(MONTH,1)=9,92,IF(REF(MONTH,1)=12,92,92))));
VV19:=IF(MOD(YEAR,4)>0,365,366);
VV20:=IF(REF(DATE,1)>=1100222,1/VV15,1/MIN(VV9-9,VV14));
VV21:=IF(VV14=Y,VV20,1/VV15);
VV22:=IF(REF(WEEKDAY,1)=5,1/(VV9-2),1/VV9);
VV23:=IF(REF(WEEKDAY,1)=1 OR REF(WEEKDAY,1)=2,1/VV9,1/(VV9-2));
VV24:=IF(REF(WEEKDAY,1)=1,1/VV9,1/(VV9-2));
VV25:=VV14*IF(VV14=2,VV22,IF(VV14=3,VV23,IF(VV14=4,VV24,VV21)));
VV26:=IF(PERIOD=6,5/VV16,IF(PERIOD=7,VV17/VV15,IF(PERIOD=10,VV18/VV15,IF(PERIOD=11,VV19/VV15,IF(PERIOD=9,VV25,VV14/VV15)))));
VV:=IF(CURRBARSCOUNT=1,IF(PERIOD<=5 OR PERIOD=8,VV1*VV7,VV8*VV26),VV1);{{任意周期当日估测成交量}
换:VV,LINETHICK0;
量活跃度:VV/MA(VV,55),LINETHICK0;
量环比:VV/REF(VV1,1),COLORGRAY,STICK,LINETHICK3;
AA:=VV/(2*(HIGH-LOW)-ABS(CLOSE-OPEN));
AA1:=AA*(HIGH-LOW);
AA2:=AA*((HIGH-MAX(OPEN,CLOSE))+(MIN(OPEN,CLOSE)-LOW));
主买:=IF(HIGH>LOW,IF(CLOSE>OPEN,AA1,AA2),IF(CLOSE>REF(CLOSE,1),VV,IF(CLOSE<REF(CLOSE,1),0,VV/2))),LINETHICK0;
ZM:=IF(HIGH>LOW,IF(CLOSE>OPEN,AA2,AA1),IF(CLOSE>REF(CLOSE,1),0,IF(CLOSE<REF(CLOSE,1),VV,VV/2))); DKB:=IF(ZM>0,主买/ZM,HHV(主买/ZM,55));
STICKLINE(DKB>2,0,主买,2.5,0),COLORRED;
STICKLINE(DKB>2,VV,主买,2.5,0),COLORLIGREEN;
STICKLINE(DKB<=2,0,主买,2.5,1),COLORRED;
STICKLINE(DKB<=2,VV,主买,2.5,1),COLORLIGREEN;
STICKLINE(CLOSE>0,VV/2,VV/2,3,0),COLORGRAY;
多空比:IF(DKB<30,DKB,30),COLORFF00FF,LINETHICK3;
主卖:=ZM,LINETHICK0;
KDB:=IF(主买>0,主卖/主买,HHV(主卖/主买,55));
空多比:IF(KDB<30,KDB,30),COLORBLUE,LINETHICK3;
多环比:IF(REF(主买,1)>0,主买/REF(主买,1),HHV(主买/REF(主买,1),55)),LINETHICK0;
空环比:IF(REF(主卖,1)>0,主卖/REF(主卖,1),HHV(主卖/REF(主卖,1),55)),LINETHICK0;
VHB3:=SUM(VV,3)/REF(SUM(VV,3),3);
VHB8:=SUM(VV,8)/REF(SUM(VV,8),8);
LB3:VHB3,COLORMAGENTA,LINETHICK0;
LB8:VHB8,COLORYELLOW,LINETHICK0;
STICKLINE(量环比>1,0,量环比,0,0),COLOR33CCFF;
|
