{相对成本1}
{怀疑是千钧的公式}
AG:=STKCOUNT('A股板块');
JJ:=(3*INDEXH+INDEXL+INDEXO+2*INDEXC)/7;
VAR1:=(3*HIGH+LOW+OPEN+2*CLOSE)/7;
股价:EMA(VAR1,1),colorFFFFFF;
DPJJ:=INDEXA/INDEXV/1000;
M0:=DPJJ+JJ;
DPJD:=INDEXA/SUM(VOL,34)/AG;
市场成本:DMA(IF(CAPITAL<1,M0,VAR1),IF(CAPITAL<1,DPJD,VOL/CAPITAL)),PRECISION2,color9FFF;
绝对成本:IF(CAPITAL<1,HHV(HIGH,0)/1.618/1.382,HHV(HIGH,144)/1.618/1.382),LINETHICK2,PRECISION2,colorFFDD00;
PARTLINE(股价>市场成本,股价),colorFF;
PARTLINE(股价<绝对成本,股价),colorFF00;
DRAWTEXTEX(CLOSE,1,180,10,STKLABEL+' '+STKNAME+''),colorDDFF;
BB:=BARPOS=SYSPARAM(1);
VARIABLE:WDAY[7]='星期六';
WDAY[1]:='星期日';
WDAY[2]:='星期一';
WDAY[3]:='星期二';
WDAY[4]:='星期三';
WDAY[5]:='星期四';
WDAY[6]:='星期五';
FY:=YEAR;
FM:=MONTH;
FD:=DAY;
WD:=WEEKDAY;
P:=SYSPARAM(1);
STR1:=''+'今日： '+NUMTOSTR(FY[P],0)+'年'+NUMTOSTR(FM[P],0)+'月'+NUMTOSTR(FD[P],0)+'日 '+WDAY[WD[P]+1];
DRAWTEXTEX(CLOSE,1,500,10,STR1),colorDDFF;{点击看本软件截图： 58股票 公式网 http://www. 58gu. com 整理} |
