飞狐财神到了主图源码

input:N(27,1,100),N1(7,1,100),N2(19,1,100);
HH:=HHV(H,10);
LL:=LLV(L,10);
AA:=SMA(C,13,2);
DRAWTEXT(ISLASTBAR=1 AND AA>REF(AA,1) AND REF(AA,1) DRAWTEXT(ISLASTBAR=1 AND AA>REF(AA,1) AND REF(AA,1)>REF(AA,2),HH,'激进持股'),COLOR0066FF;
DRAWTEXT(ISLASTBAR=1 AND AAREF(AA,2),HH,'激进卖出'),COLORGREEN;
A1:=MA(C,13);
ZX:=REF(A1,13/2+1);
DRAWTEXT(ISLASTBAR=1 AND CROSS(C,ZX),LL,'稳健买入'),COLORRED;
DRAWTEXT(ISLASTBAR=1 AND C>ZX AND REF(C,1)>REF(ZX,1),LL,'稳健持股'),COLOR0066FF;
DRAWTEXT(ISLASTBAR=1 AND CREF(ZX,1),LL,'稳健卖'),COLORGREEN;
VAR1111:=FORCAST(CLOSE,5);
VAR1:=1;
平衡线:=(EMA(EMA(EMA(HIGH,3),3),1) * VAR1);
VAR2:=(平衡线 * 0.85);
临界线:WMA(CLOSE,10),LINETHICK2;
VAR1:=POW((CLOSE - 临界线),1);
VAR2:=MA(VAR1,3);
VAR3:=SQRT(VAR2);
支撑线:=(临界线 - (1.96 * VAR3));
PARTLINE((临界线 < REF(临界线,1)),临界线),LINETHICK2,colorFF00;
VAR1Z:=(((CLOSE - OPEN) / OPEN) * 100);
VAR2Z:=REF(CLOSE,1);
VAR3Z:=((SMA(MAX((CLOSE - VAR2Z),0),6,1) / SMA(ABS((CLOSE - VAR2Z)),6,1)) * 100);
VAR4Z:=(COUNT((VAR3Z < 20),20) >= 1);
DRAWTEXT(((VAR1Z > 9) AND VAR4Z),LOW,'★屠龙'),LINETHICK4,colorFFFF;
JJJ:=(((CLOSE + HIGH) + LOW) / 3);
AA:=EMA(JJJ,3);
BB:=REF(AA,1);
持股:DRAWICON((AA > BB),BB,12);
VAR3:=REF(CLOSE,1);
VAR4:=REF(CLOSE,2);
VAR5:=REF(CLOSE,3);
VAR6:=REF(CLOSE,9);
VAR7:=HHV(CLOSE,9);
VAR8:=LLV(CLOSE,9);
VARC:=(((VAR3 = VAR8) AND (CLOSE >= VAR4)) OR ((((VAR4 = VAR8) AND (VAR3 <= VAR5)) AND (VAR4 < VAR6)) AND (CLOSE >= VAR3)));
黄色买入:STICKLINE(VARC,(VAR3 * 0.94),(VAR4 * 0.94),25,16),colorFFFF;
VAR1:=((REF(HIGH,1) + REF(LOW,1)) / 2);
VAR2:=((REF(HIGH,1) + REF(LOW,1)) / 2);
VAR3:=(MA(CLOSE,N) + (2 * STD(CLOSE,N)));
DRAWICON(CROSS(VAR2,VAR3),(HIGH * 1.035),3);
DRAWTEXT(CROSS(VAR2,VAR3),(HIGH * 1.02),'卖出1'),colorFF00;
VAR4:=REF(CLOSE,1);
VAR5:=((SMA(MAX((CLOSE - VAR4),0),N1,1) / SMA(ABS((CLOSE - VAR4)),N1,1)) * 100);
VAR6:=CROSS(N2,VAR5);
VAR7:=FILTER(VAR6,4);
A7:=((((2 * CLOSE) + HIGH) + LOW) / 4);
VAR10:=LLV(LOW,34);
VAR11:=HHV(HIGH,34);
SK:=EMA((((A7 - VAR1) / (VAR2 - VAR1)) * 100),7);
SD:=EMA(((0.667 * REF(SK,1)) + (0.333 * SK)),5);
DRAWTEXT(IF((((((COUNT((CLOSE < REF(CLOSE,1)),8) / 8) > (6 / 10)) AND (VOL >= (1.5 * MA(VOL,5)))) AND COUNT((SK >= SD),3)) AND (REF(LOW,1) = LLV(LOW,120))),1,0),LOW,'●买进1'),color99FF;
DRAWTEXT(IF((((((((((COUNT((CLOSE < REF(CLOSE,1)),13) / 13) > (6 / 10)) AND COUNT((SK > SD),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,'●买进2'),colorFFFF;
VAR12:=(MA(CLOSE,80) - (MA(CLOSE,10) / 3));
DRAWTEXT(IF(((((CLOSE < VAR12) AND ((VOL / 240) > (MA(VOL,5) / 240))) AND (CLOSE > (REF(CLOSE,1) * 1.08))) AND (CLOSE < (MA(CLOSE,13) * 1.3))),1,0),LOW,'●抄底'),colorFFFF;
VAR11:=(((((2 * CLOSE) + OPEN) + HIGH) + LOW) / 5);
M8:=VOL;
主力:=(SUM((VAR11 * M8),3) / SUM(M8,3));
散户:=主力;
M1:=LLV(散户,5);
VAR11:=(((((2 * CLOSE) + OPEN) + HIGH) + LOW) / 5);
M8:=VOL;
M5:=(SUM((VAR11 * M8),1) / SUM(M8,1));
M13:=(SUM((VAR11 * M8),5) / SUM(M8,5));
M21:=(SUM((VAR11 * M8),13) / SUM(M8,13));
主力:=(SUM((VAR11 * M8),3) / SUM(M8,3));
Y:=(SUM((VAR11 * M8),21) / SUM(M8,21));
U1:=M5;
U3:=M13;
散户:=主力;
XX1:=M21;
C5:=((U3 > 散户) AND (散户 > XX1));
C8:=IF((C5 > 0),LLV(U3,5),HHV(散户,5));
C13:=IF((C5 > 0),LLV(散户,8),HHV(散户,5));
VAR1118:=IF((C5 > 0),LLV(XX1,13),HHV(散户,5));
M1:=LLV(散户,20);
DRAWTEXT((M1 = REF(M1,1)),M1,'┬'),LINETHICK5,colorCC33FF;
DRAWTEXT(((REF(M1,1) < REF(M1,2)) AND (M1 = REF(M1,1))),M1,'★'),colorFF;
STICKLINE((CLOSE < OPEN),HIGH,LOW,1,0),color8800;
STICKLINE((CLOSE < OPEN),HIGH,LOW,0,0),colorFF00;
STICKLINE((CLOSE < OPEN),CLOSE,OPEN,8,0),color8800;
STICKLINE((CLOSE < OPEN),CLOSE,OPEN,7,0),color9900;
STICKLINE((CLOSE < OPEN),CLOSE,OPEN,6,0),colorAA00;
STICKLINE((CLOSE < OPEN),CLOSE,OPEN,5,0),colorBB00;
STICKLINE((CLOSE < OPEN),CLOSE,OPEN,4,0),colorCC00;
STICKLINE((CLOSE < OPEN),CLOSE,OPEN,3,0),colorDD00;
STICKLINE((CLOSE < OPEN),CLOSE,OPEN,2,0),colorEE00;
STICKLINE((CLOSE < OPEN),CLOSE,OPEN,1,0),colorFF00;
STICKLINE((CLOSE >= OPEN),HIGH,LOW,1,0),colorFF;
STICKLINE((CLOSE >= OPEN),HIGH,LOW,0,0),colorEEFF;
STICKLINE((CLOSE >= OPEN),CLOSE,OPEN,8,0),colorFF;
STICKLINE((CLOSE >= OPEN),CLOSE,OPEN,7,0),color22FF;
STICKLINE((CLOSE >= OPEN),CLOSE,OPEN,6,0),color44FF;
STICKLINE((CLOSE >= OPEN),CLOSE,OPEN,5,0),color66FF;
STICKLINE((CLOSE >= OPEN),CLOSE,OPEN,4,0),color88FF;
STICKLINE((CLOSE >= OPEN),CLOSE,OPEN,3,0),colorAAFF;
STICKLINE((CLOSE >= OPEN),CLOSE,OPEN,2,0),colorCCFF;
STICKLINE((CLOSE >= OPEN),CLOSE,OPEN,1,0),colorEEFF;
VAR22:=((LLV(LOW,3) = LLV(LOW,3)) AND (CLOSE >= (OPEN * 1.04)));
VAR333:=(CLOSE > ((REF(HIGH,1) + REF(LOW,1)) / 2));
VAR44:=(VAR22 AND VAR333);
VAR55:=BARSLAST(VAR333);
VAR66:=BARSLAST(VAR44);
VAR77:=IF((VAR66 > 0),(((CLOSE - REF(CLOSE,1)) / REF(CLOSE,1)) * 100),0);
VAR88:=SUM(VAR77,1);
VAR93:=IF((VAR55 > 3),(0 - 2),0);
DRAWICON(((REF(VAR93,1) = (0 - 2)) AND (VAR93 = 0)),LOW,1),colorFF;
DRAWICON(((REF(VAR93,1) = (0 - 2)) AND (VAR93 = 0)),LOW,8),colorFF;
DRAWTEXTEX(sysparam(3)=BARPOS,0,10,8,'【代码:'+STKLABEL+' 名称:'+STKNAME+'】'),Colorcyan;
DRAWTEXT((BARPOS = SYSPARAM(2)),HIGH,('所属板块:' + BLKNAME)+ '\n')ALIGN4,colorred;
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);
DRAWTEXTex(c,0,300,1,
numtostr(fy[p],0)+'年'+numtostr(fm[p],0)+'月'
+numtostr(fd[p],0)+'日,'+wday[wd[p]+1]+'\n'),COLORyellow;
DRAWTEXTEX(1,1,20,880,' 耐 心 等 待 时 机'),COLORRED;
DRAWTEXTEX(1,1,20,150,'决 策 在 人 脑 严 格 执 行 纪 律'),COLORRED;
X:=EMA(((SLOPE(CLOSE,21) * 20) + CLOSE),68);
Y:=EMA(CLOSE,10);
DRAWTEXT(CROSS(Y,X),(LOW * 0.95),'←安全C级'),COLORRED;
VAR1:=LLV(LOW,21);
VAR2:=HHV(HIGH,21);
AK1:=EMA((((CLOSE - VAR1) / (VAR2 - VAR1)) * 100),5);
AK:=EMA((((CLOSE - VAR1) / (VAR2 - VAR1)) * 50),13);
DD:=EMA(((0.667 * REF(AK1,1)) + (0.333 * AK1)),2);
VAR3:=LLV(LOW,55);
VAR4:=HHV(HIGH,34);
VAR5:=EMA((((CLOSE - VAR3) / (VAR4 - VAR3)) * 100),3);
VAR6:=((AK + VAR5) / 2);
VAR7:=EMA(((0.667 * REF(VAR5,1)) + (0.333 * AK1)),2);
VAR8:=EMA(VAR6,5);
BB:=EMA(((0.667 * REF(VAR8,1)) + (0.333 * VAR8)),2);
AB:=CROSS(AK1,AK);
BB1:=(CROSS(AK1,BB) AND (BB < 30));
CD:=(BB1 * 0.6);
DRAWTEXT((CD = 0.6),(LOW * 0.95),'←安全A级'),COLORGREEN;
DRAWTEXT((AB = 1),(LOW * 0.97),'←安全 B 级'),COLOR33CC99,COLORYELLOW;
压力:MA(REF(HHV(C,30),1),2),COLORGREEN;
支撑:MA(REF(LLV(C,30),1),2),COLORRED;
STICKLINE(OPEN>=CLOSE ,CLOSE ,OPEN,8,0 ),COLORFF6600;
STICKLINE(OPEN>=CLOSE ,CLOSE ,OPEN,7,0 ),COLORFF7700;
STICKLINE(OPEN>=CLOSE ,CLOSE ,OPEN,6,0 ),COLORFF9900;
STICKLINE(OPEN>=CLOSE ,CLOSE ,OPEN,5,0 ),COLORFFBB00;
STICKLINE(OPEN>=CLOSE ,CLOSE ,OPEN,4,0 ),COLORFFCC00;
STICKLINE(OPEN>=CLOSE ,CLOSE ,OPEN,3,0 ),COLORFFDD00;
STICKLINE(OPEN>=CLOSE ,CLOSE ,OPEN,2,0 ),COLORFFEE00;
STICKLINE(OPEN>=CLOSE ,CLOSE ,OPEN,1,0 ),COLORFFFF00;
{立体柱子：红色}
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,8,0) ,COLOR000033;
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,6,0) ,COLOR000066;
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,4,0) ,COLOR000099;
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,3,0) ,COLOR0000BB;
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,1,0) ,COLOR0000DD;
VAR9Q:=C= HHV(C,4)AND (REF(C,1)>=REF(C,2) OR REF(C,1)>=REF (C,3)) OR REF(C,1)=HHV(C,4) AND CLOSE>=REF(C,2) OR REF(C,2) =HHV(C,4) AND REF(C,3)=LLV(C,4) AND C>=REF(C,1) OR REF(C,3) =HHV(C,4) AND C>=REF(C,1) AND C>=REF(C,2);
红持:var9Q,color0000ff,LINETHICK0;
{立体柱子：红色}
STICKLINE(VAR9Q,C,(O+C)/2,8,0),COLOR000044;
STICKLINE(VAR9Q,C,(O+C)/2,7,0),COLOR000055;
STICKLINE(VAR9Q,C,(O+C)/2,6,0),COLOR000066;
STICKLINE(VAR9