【唐伯虎点秋香】.ALG
VAR1W:=IF(CURRENTDATE<=1099931229,1,0);
DRAWBKBMP(CLOSE>0,'0000');
STICKLINE(CLOSE>=OPEN AND VAR1W,OPEN,CLOSE,6,1),colorFF;
STICKLINE(OPEN>CLOSE AND VAR1W,CLOSE,OPEN,6,0),colorFFFF00;
STICKLINE(CLOSE>=OPEN AND VAR1W,CLOSE,HIGH,0.5,1),colorFF;
STICKLINE(CLOSE>=OPEN AND VAR1W,OPEN,LOW,0.5,1),colorFF;
STICKLINE(OPEN>CLOSE AND VAR1W,CLOSE,LOW,0.5,0),colorFFFF00;
STICKLINE(OPEN>CLOSE AND VAR1W,OPEN,HIGH,0.5,0),colorFFFF00;
VAR1D:=DMA((CLOSE+OPEN)/2,VOL/(SMA(VOL,5,1)*5));
【周星驰】:EMA(VAR1D,5)*VAR1W,colorFF9AA8;
PARTLINE(【周星驰】<REF(【周星驰】,1) AND VAR1W,【周星驰】),LINETHICK2,colorFF0000;
PARTLINE(【周星驰】>REF(【周星驰】,1) AND VAR1W,【周星驰】),LINETHICK2,colorB900FF;
VAR1:=HHV(HIGH,40);
VAR2:=LLV(LOW,120);
VAR3:=HHV(HIGH,13);
VAR4:=LLV(LOW,13);
TT:VAR1*(1-5/100)*VAR1W,LINETHICK2,color400080;
【巩俐】:VAR3*(1-5/100)*VAR1W,POINTDOT,LINETHICK3,color71FF8C;
触发C点:MA(CLOSE*1.002,10)*VAR1W,LINETHICK0,color9D00FF;
HV:VAR2*(1+5/100)*VAR1W,LINETHICK2,colorFF;
HH:VAR4*(1+5/100)*VAR1W,color6800FF;
VAR1X:=POW(CLOSE-触发C点,2);
VAR2X:=MA(VAR1X,20);
VAR3X:=SQRT(VAR2X);
STICKLINE(REF(触发C点,1)<触发C点 AND VAR1W,触发C点,REF(触发C点,1),3,0),LINETHICK2,colorFFFF;
STICKLINE(REF(触发C点,1)>触发C点 AND VAR1W,触发C点,REF(触发C点,1),3,0),LINETHICK2,colorFF0000;
AA:=(CLOSE+OPEN)/2;
SS:=EMA(AA,5)*VAR1W;
VV:=EMA(AA,10)*VAR1W;
VVA:=EMA(AA,30)*VAR1W;
FFB:=LLV(LOW,5);
FFF:=HHV(HIGH,5);
N日新高:=IF(CROSS(HIGH,FFF),HIGH,REF(HIGH,BARSLAST(CROSS(HIGH,FFF))));
N日新低:=IF(CROSS(FFB,LOW),LOW,REF(LOW,BARSLAST(CROSS(FFB,LOW))));
N日死叉:=IF(CROSS(VV,SS),CLOSE,REF(CLOSE,BARSLAST(CROSS(VV,SS))));
DDFF:=(N日新高+N日新低)/2;
TD:=BACKSET(ISLASTBAR,1);
STICKLINE(TD AND N日新高 AND VAR1W,N日新高,N日新高,100,0),LINETHICK1,colorFFFFFF;
STICKLINE(TD AND N日新低 AND VAR1W,N日新低,N日新低,100,0),LINETHICK1,colorFF;
STICKLINE(TD AND DDFF AND VAR1W,DDFF,DDFF,100,0),LINETHICK1,colorFF0000;
STICKLINE(TD AND N日死叉 AND VAR1W,N日死叉,N日死叉,300,0),LINETHICK1,colorFF00;
TD:=BACKSET(ISLASTBAR,1);
DRAWNUMBER(TD AND N日死叉 AND VAR1W,N日死叉,N日死叉,2),SHIFT2,colorFFFF00;
DRAWNUMBER(TD AND N日新高 AND VAR1W,N日新高,N日新高,2),SHIFT2,colorFF00;
DRAWNUMBER(TD AND N日新低 AND VAR1W,N日新低,N日新低,2),SHIFT2,colorFF;
DRAWNUMBER(TD AND DDFF AND VAR1W,DDFF,DDFF,2),SHIFT2,colorFFFFFF;
VV8:=SUMBARS(VOL,CAPITAL/(100/40));
AO:=SYSPARAM(1)=BARPOS;
TD:=BACKSET(AO,VV8);
TD1:=TD>REF(TD,1);
DRAWTEXT(TD1 AND 0=VAR1W,2,'不好意思时间到期了'),colorFF;
EXPLAIN(1 AND WEEKDAY=1,'今天股市是:星期一'),colorA4FF98;
EXPLAIN(1 AND WEEKDAY=2,'今天股市是:星期二'),colorA4FF98;
EXPLAIN(1 AND WEEKDAY=3,'今天股市是:星期三'),colorA4FF98;
EXPLAIN(1 AND WEEKDAY=4,'今天股市是:星期四'),colorA4FF98;
EXPLAIN(1 AND WEEKDAY=5,'今天股市是:星期五'),colorA4FF98;
EXPLAIN(1 AND WEEKDAY=6,'今天股市是:星期六'),colorA4FF98;
EXPLAIN(1 AND WEEKDAY=0,'今天股市是:星期日'),colorA4FF98;
EXPLAIN(CLOSE>0,'试用版取消了解盘'),colorFFFFFF; |