当前位置:分析家公式网 → 股票公式 → 通达信公式 → 一键转帖:分时简化(通达信公式 主图 源码 测试图)
软件名称:[B]分时简化(通达信公式 主图 源码 测试图)[/B]
软件类型:国产软件
运行环境:Win9X/Win2000/WinXP/Win2003/Win7/
软件语言:简体中文
授权方式:免费版
软件大小:6.00 KB
官方主页:Home Page
更新时间:2020-02-29 03:25:18
软件简介:
{公式名称: 分时简化
公式描述: 含大盘分时}
VAR1:=IF(FINANCE(3)!=0,DYNAINFO(3)*(1+0.02),DRAWNULL);
VAR2:=IF(FINANCE(3)!=0,DYNAINFO(3)*1.04,DRAWNULL);
VAR3:=IF(FINANCE(3)!=0,DYNAINFO(3)*(1-0.015),DRAWNULL);
VAR4:=IF(FINANCE(3)!=0,DYNAINFO(3)*(1-0.01),DRAWNULL);
DRAWBAND(VAR2,RGB(48,48,48),VAR1,RGB(48,48,48));
DRAWBAND(DYNAINFO(3),RGB(68,68,68),VAR3,RGB(68,68,68));
DRAWBAND(DYNAINFO(3),RGB(48,48,48),VAR4,RGB(48,48,48));
VAR5:=IF(HOUR<12,(HOUR-9.5)*60+MINUTE,(HOUR-11)*60+MINUTE);
均线:IF(1,SUM(CLOSE*VOL,VAR5)/SUM(VOL,VAR5),DRAWNULL),COLORYELLOW;
DRAWBAND(CLOSE,RGB(58,0,0),均线,RGB(0,58,0));
IF(1,SUM(CLOSE*VOL,VAR5)/SUM(VOL,VAR5),DRAWNULL),COLORYELLOW;
CLOSE,COLORWHITE;
IF(DYNAINFO(5)>DYNAINFO(3)*(1+0.05),DYNAINFO(3)*(1+0.05),DRAWNULL),COLORCCCCCC;
IF(DYNAINFO(5)>DYNAINFO(3)*(1+0.07),DYNAINFO(3)*(1+0.07),DRAWNULL),COLORCC00CC;
VAR6:=STRCAT(STRCAT(HYBLOCK,DYBLOCK),GNBLOCK);
DRAWTEXT_FIX(ISLASTBAR,0.05,0.95,0,VAR6),COLOR00CCCC;
VAR7:=STRCAT(STRCAT(120,CON2STR(CAPITAL/1000000,2)),121);
VAR8:=STRCAT(STRCAT(122,CON2STR(CAPITAL/1000000*CLOSE,2)),121);
VAR9:=STRCAT(VAR7,VAR8);
DRAWTEXT_FIX(ISLASTBAR,0.045,0.85,0,VAR9),COLOR00CCCC;
VAR10:=IF(1,HHV(HIGH,480),DRAWNULL);
VAR11:=IF(1,LLV(LOW,480),DRAWNULL);
IF(CLOSE>=REF(VAR10,1),CLOSE,DRAWNULL),COLORRED;
IF(CLOSE<=REF(VAR11,1),CLOSE,DRAWNULL),COLORGREEN;
VAR12:=(CLOSE+LOW+HIGH)/3;
VAR13:=IF(VAR12>REF(VAR12,1),(CLOSE+LOW+HIGH)/3,REF((CLOSE+LOW+HIGH)/3,1));
VAR14:=IF(VAR12<REF(VAR12,1),(CLOSE+LOW+HIGH)/3,REF((CLOSE+LOW+HIGH)/3,1));
VAR15:=VAR13;
VAR16:=(VAR13+VAR14)/2;
VAR17:=VAR14;
VAR18:=IF(ISLASTBAR,REF(VAR15,1),DRAWNULL);
VAR19:=IF(ISLASTBAR,REF(VAR16,1),DRAWNULL);
VAR20:=IF(ISLASTBAR,REF(VAR17,1),DRAWNULL);
VAR21:=1;
STICKLINE(VAR21=1,VAR18,VAR18,20,(-1)),COLOR0000CC;
STICKLINE(VAR21=1,VAR19,VAR19,20,(-1)),COLORWHITE;
STICKLINE(VAR21=1,VAR20,VAR20,20,(-1)),COLORCCCC00;
VAR22:=1;
VAR23:=BARSLAST(HOUR=9 AND MINUTE=30+VAR22)+1;
VAR24:=IF(FINANCE(3)=0,SUM(AMOUNT,0)/SUM(VOL,0),SUM(AMOUNT,0)/SUM(VOL,0)/100);
VAR25:=IF(打工皇帝#DAY,0.025,IF(打工皇帝#DAY,0.04,0.015));
VAR26:=IF(打工皇帝#DAY,0.025,IF(打工皇帝#DAY,0.015,0.04));
VAR27:=IF(FINANCE(3)=0,VAR25/5,VAR25);
VAR28:=IF(FINANCE(3)=0,VAR26/5,VAR26);
VAR29:=CLOSE>REF(CLOSE,1) AND CLOSE/VAR24>1+VAR27;
VAR30:=CLOSE<REF(CLOSE,1) AND CLOSE/VAR24<1-VAR28;
VAR31:=CROSS(SUM(VAR29,0),0.5);
VAR32:=CROSS(SUM(VAR30,0),0.5);
VAR33:=SUM(VAR31,0)*CROSS(COUNT(CLOSE<REF(CLOSE,1),BARSLAST(VAR31)),0.5);
VAR34:=SUM(VAR32,0)*CROSS(COUNT(CLOSE>REF(CLOSE,1),BARSLAST(VAR32)),0.5);
VAR35:=CONST(SUM(IF(VAR33,REF(CLOSE,1),DRAWNULL),0));
VAR36:=CONST(SUM(IF(VAR34,REF(CLOSE,1),DRAWNULL),0));
VAR37:=CROSS(SUM(VAR29 AND CLOSE>VAR35*(1+VAR27),0),0.5);
VAR38:=CROSS(SUM(VAR30 AND CLOSE<VAR36*(1-VAR28),0),0.5);
VAR39:=SUM(VAR37,0)*CROSS(COUNT(CLOSE<REF(CLOSE,1),BARSLAST(VAR37)),0.5);
VAR40:=SUM(VAR38,0)*CROSS(COUNT(CLOSE>REF(CLOSE,1),BARSLAST(VAR38)),0.5);
VAR41:=CONST(SUM(IF(VAR39,REF(CLOSE,1),DRAWNULL),0));
VAR42:=CONST(SUM(IF(VAR40,REF(CLOSE,1),DRAWNULL),0));
DRAWICON(VAR31 OR VAR37,CLOSE*1.001,39);
DRAWICON(VAR32 OR VAR38,CLOSE*0.999,38);
DRAWICON(VAR34 OR VAR40,REF(CLOSE,1)*0.9985,7);
DRAWICON(VAR33 OR VAR39,REF(CLOSE,1)*1.0015,8);
{打工皇帝}
N:=20;
N1:=7;
N2:=69;
T1:=IF((DATE<=1341231),1,1);
M3:=EMA(CLOSE,3);
M6:EMA(CLOSE,6),COLOR008000,LINETHICK3;
M12:EMA(M6,12),COLOR0000FF,LINETHICK3;
VAR1:=EMA(M12,62);
VAR2:=(CLOSE+HIGH+LOW)/(3);
VAR3:=(EMA(VAR2,10))*(T1);
VAR4:=(REF(VAR3,1))*(T1);
STICKLINE((VAR3>VAR4),VAR3,VAR4,4,0),COLOR00FFFF;
STICKLINE((VAR3<VAR4),VAR3,VAR4,4,0),COLORFF0000;
VAR5:=((REF(HIGH,1)+REF(LOW,1))/(2))*(T1);
VAR6:=MA(CLOSE,N)+((2)*(STD(CLOSE,N)))*(T1);
DRAWTEXT(CROSS(VAR3,VAR4),(VAR3)*(0.98),'★'),COLOR00FFFF;
DRAWTEXT(CROSS(VAR5,VAR6),(HIGH)*(1.04),'↓卖'),COLOR008000;
VAR7:=REF(CLOSE,1);
VAR8:=((SMA(MAX(CLOSE-VAR7,0),N1,1))/(SMA(ABS(CLOSE-VAR7),N1,1)))*(100);
VAR9:=CROSS(N2,VAR8);
VARA:=(FILTER(VAR9,4))*(T1);
DRAWTEXT(VARA,(HIGH)*(1.04),'↓卖'),COLORFFFFFF;
VARB:=((2)*(CLOSE)+HIGH+LOW)/(4);
VARC:=LLV(LOW,34);
VARD:=HHV(HIGH,34);
VARE:=(EMA(((VARB-VAR1)/(VAR5-VAR1))*(100),7))*(T1);
VARF:=(EMA((0.667)*(REF(VARE,1))+(0.333)*(VARE),5))*(T1);
DRAWTEXT(IF(((COUNT((CLOSE<REF(CLOSE,1)),6))/(6)>0.6) AND (VOL>=(1.5)*(MA(VOL,5))) AND COUNT((VARE>=VARF),3) AND (REF(LOW,1)=LLV(LOW,120)),1,0),LOW,'●买进'),COLORFF00FF;
DRAWTEXT(IF(((COUNT((CLOSE<REF(CLOSE,1)),12))/(12)>0.6) AND COUNT((VARE>VARF),6) AND (REF(LOW,5)=LLV(LOW,120)) AND REF((CLOSE>=OPEN),4) AND REF((CLOSE>OPEN),3) AND REF((CLOSE>OPEN),2) AND REF((OPEN>CLOSE),1) AND (OPEN>REF(CLOSE,1)),1,0),LOW,'●买进'),COLOR00FFFF;
VAR10:=(MA(CLOSE,80)-(MA(CLOSE,10))/(3))*(T1);
DRAWTEXT(IF((CLOSE<VAR10) AND ((VOL)/(240)>(MA(VOL,5))/(240)) AND (CLOSE>(REF(CLOSE,1))*(1.08)) AND (CLOSE<(MA(CLOSE,12))*(1.3)),1,0),LOW,'●抄底'),COLOR0000FF;
[url=http://www.70822.com/soft/sort013/sort05/down-145199.html]分时简化(通达信公式 主图 源码 测试图)[/url]