{射击之星}
DRAWGBK(1,COLORRGB(0,0,20),COLORRGB(0,60,50),1);
MA6:=MA(CLOSE,6);
MA18:=MA(CLOSE,18);
MA3:(3)*(MA18) - (2)*(MA6),LINETHICK2,POINTDOT,COLORD39D91;
MA4:(3)*(MA6) - (2)*(MA18),LINETHICK2,POINTDOT,colorFF00;
M1:SUM((EMA((CLOSE + LOW)/(2),2))/(2.98),3),POINTDOT,COLOR00CCFF;
M21:EMA(M1,21),COLORFF00FF;
M30:MA(CLOSE,30),LINETHICK1,colorFF;
VAR1:=(2)*(MA((LLV((CLOSE + LOW)/(2),8))*(1.1),13)) - EMA((CLOSE + LOW)/(2),3) - ((CLOSE + LOW)/(2))*(0.1);
VAR2:=IF(((EMA((CLOSE + LOW)/(2),3) - VAR1)*(5) > 0),(POW((EMA((CLOSE + LOW)/(2),3) - VAR1)*(5),2))/(10),(((-1))*(POW((EMA((CLOSE + LOW)/(2),3) - VAR1)*(5),2)))/(10));
VAR3:=IF((VAR2 > 0),VAR2 - 0,(-1));
DRAWTEXT(CROSS(VAR3,0) AND ((CLOSE + LOW)/(2) > MA((CLOSE + LOW)/(2),8)),(M21)*(1.01),'射击'),LINETHICK2,COLORWHITE;
STICKLINE(CROSS(VAR3,0) AND ((CLOSE + LOW)/(2) > MA((CLOSE + LOW)/(2),8)),(LOW)*(0.99),(LOW)*(0.95),4,0),COLORYELLOW;
zz:=(o+h+l)/3;
买:EMA(zz,4),COLOR00CCFF,LINETHICK1;
yc:=(h+l)/2;
ychjx:=(EMA(zz,4))+(yc-ref(zz,3))/4;
DRAWTEXT(BARPOS=SYSPARAM(2),c,'\n \n 昨测买点：'+NUMTOSTR(ref(ychjx,1),2))align4,LINETHICK2,colorred;
DRAWTEXT(BARPOS=SYSPARAM(2),l,'\n \n \n 今日买点：'+NUMTOSTR(买,2 ))PXDN40,align4,LINETHICK2,colorgreen;
DRAWTEXT(BARPOS=SYSPARAM(2),c,'\n \n \n \n 买点：'+NUMTOSTR(ychjx,2))align4,LINETHICK2,colorred;
x1:=(C+L+H)/3;
x2:=EMA(x1,6);
x3:=EMA(x2,5);
DRAWICON(CROSS(X2,X3),L-0.1,10);
DRAWICON(CROSS(X3,X2),H+0.1,12);
stickline(x2>=x3,low,high,0.1,1),COLOR0000dd;
stickline(x2>=x3,close,open,9,2),COLOR0000dd;
stickline(x2>=x3,close,open,9,8),colorFF;
stickline(x2<x3,low,high,0.1,1),colorGREEN;
stickline(x2<x3,close,open,9,2),colorGREEN;
stickline(CROSS(X2,X3),open,close,6,1),COLOR00CCFF;
stickline(CROSS(X3,X2),open,close,6,1),colorBLUE;
varC:=SMA(MAX(C-REF(C,1),0),6,1)/SMA(ABS(C-REF(C,1)),6,1)*100;
DRAWICON(CROSS(82,varC),HIGH,2);
var6:=REF(C,1);
var7:=SMA(MAX(C-var6,0),6,1)/SMA(ABS(C-var6),6,1)*100;
DRAWTEXT(CROSS(84,var7),H*1.01,'↓★'),COLORGREEN ;
A:MA(CLOSE,14),ColorFF00FF,LINETHICK0;
A1:=(CLOSE+HIGH+LOW)/(3);
B:=EMA(A1,21);
B2:=REF(B,1);
MA55:=EMA(CLOSE,55);
DRAWTEXT((B>B2),ma55,'*'),Coloryellow;
DRAWTEXT((B<B2),ma55,'*'),colorFF00;
variable:
wday[7]:='星期六';
wday[1]:='星期日';
wday[2]:='星期一';
wday[3]:='星期二';
wday[4]:='星期三';
wday[5]:='星期四';
wday[6]:='星期五';
fy:=YEAR;
fm:=MONTH;
fd:=DAY;
lfy:=LYEAR;
lfm:=LMONTH;
lfd:=LDAY;
wd:=WEEKDAY;
p:=SYSPARAM(1);
str1:='今天是：'+NUMTOSTR(fy[p],0)+'年'+NUMTOSTR(fm[p],0)+'月'+NUMTOSTR(fd[p],0)+'日(农历：'+NUMTOSTR(lfy[p],0)+'年'+NUMTOSTR(lfm[p],0)+'月'+NUMTOSTR(lfd[p],0)+'日) '+wday[wd[p]+1]+'';
DRAWTEXTEX(c,1,230,80,str1),Color0098FF;
DRAWTEXT(sysparam(2)=BARPOS,c,'所属板块:'+BLKNAME),COLOR00CCFF,ALIGN4;{点击看本软件截图： 58股票 公式网 http://www. 58gu. com 整理} |
