绝对精品请改为大智慧2
黄金先胜

input:H1(158,1,300),P(20,1,100),N8(4,1,100),P1(5,1,100);
主线:=(WMA(CLOSE,P1) * 0.98);
 VAR1:=POW((CLOSE - 主线),1);
 VAR2:=MA(VAR1,3);
 VAR3:=SQRT(VAR2);
阻力线:=(主线 + (1.96 * VAR3));
支撑线:=(主线 - (1.96 * VAR3));
 PARTLINE(((主线 > REF(主线,1)) AND (阻力线 <> 支撑线)),主线),LINETHICK3,colorFF;
 PARTLINE((主线 < REF(主线,1)),主线),LINETHICK2,colorFF0000;
 DRAWICON((主线 > REF(主线,1)),主线,10);
 N1:=SYSPARAM(3);
 N:=((N1 - SYSPARAM(2)) + 1);
 HH:=HHV(HIGH,N);
 LL:=LLV(LOW,N);
最高:HH[N1],colorFF;
最低:LL[N1],colorFF;
 (最低 + ((最高 - 最低) * 0.191));
 (最低 + ((最高 - 最低) * 0.382));
 (最低 + ((最高 - 最低) * 0.5)),colorFF00FF;
 (最低 + ((最高 - 最低) * 0.618));
 (最低 + ((最高 - 最低) * 0.809));
 DRAWNUMBER((BARSCOUNT(CLOSE) = SYSPARAM(2)),REF(最低,BARSLAST((BARSCOUNT(CLOSE) = SYSPARAM(2)))),REF(最低,BARSLAST((BARSCOUNT(CLOSE) = SYSPARAM(2)))),2),SHIFT110,colorFFFF;
 DRAWNUMBER((BARSCOUNT(CLOSE) = SYSPARAM(2)),REF((最低 + ((最高 - 最低) * 0.191)),BARSLAST((BARSCOUNT(CLOSE) = SYSPARAM(2)))),REF((最低 + ((最高 - 最低) * 0.191)),BARSLAST((BARSCOUNT(CLOSE) = SYSPARAM(2)))),2),SHIFT110,colorFFFF;
 DRAWNUMBER((BARSCOUNT(CLOSE) = SYSPARAM(2)),REF((最低 + ((最高 - 最低) * 0.382)),BARSLAST((BARSCOUNT(CLOSE) = SYSPARAM(2)))),REF((最低 + ((最高 - 最低) * 0.382)),BARSLAST((BARSCOUNT(CLOSE) = SYSPARAM(2)))),2),SHIFT110,colorFFFF;
 DRAWNUMBER((BARSCOUNT(CLOSE) = SYSPARAM(2)),REF((最低 + ((最高 - 最低) * 0.5)),BARSLAST((BARSCOUNT(CLOSE) = SYSPARAM(2)))),REF((最低 + ((最高 - 最低) * 0.5)),BARSLAST((BARSCOUNT(CLOSE) = SYSPARAM(2)))),2),SHIFT110,colorFFFF;
 DRAWNUMBER((BARSCOUNT(CLOSE) = SYSPARAM(2)),REF((最低 + ((最高 - 最低) * 0.618)),BARSLAST((BARSCOUNT(CLOSE) = SYSPARAM(2)))),REF((最低 + ((最高 - 最低) * 0.618)),BARSLAST((BARSCOUNT(CLOSE) = SYSPARAM(2)))),2),SHIFT110,colorFFFF;
 DRAWNUMBER((BARSCOUNT(CLOSE) = SYSPARAM(2)),REF((最低 + ((最高 - 最低) * 0.809)),BARSLAST((BARSCOUNT(CLOSE) = SYSPARAM(2)))),REF((最低 + ((最高 - 最低) * 0.809)),BARSLAST((BARSCOUNT(CLOSE) = SYSPARAM(2)))),2),SHIFT110,colorFFFF;
 DRAWNUMBER((BARSCOUNT(CLOSE) = SYSPARAM(2)),REF((最低 + ((最高 - 最低) * 1)),BARSLAST((BARSCOUNT(CLOSE) = SYSPARAM(2)))),REF((最低 + ((最高 - 最低) * 1)),BARSLAST((BARSCOUNT(CLOSE) = SYSPARAM(2)))),2),SHIFT110,colorFFFF;
 DRAWTEXT((BARSCOUNT(CLOSE) = SYSPARAM(2)),REF(最低,BARSLAST((BARSCOUNT(CLOSE) = SYSPARAM(2)))),'000%↑'),colorFFFF;
 DRAWTEXT((BARSCOUNT(CLOSE) = SYSPARAM(2)),REF((最低 + ((最高 - 最低) * 0.191)),BARSLAST((BARSCOUNT(CLOSE) = SYSPARAM(2)))),'19.1%↑'),colorFFFF;
 DRAWTEXT((BARSCOUNT(CLOSE) = SYSPARAM(2)),REF((最低 + ((最高 - 最低) * 0.382)),BARSLAST((BARSCOUNT(CLOSE) = SYSPARAM(2)))),'38.2%↑'),colorFFFF;
 DRAWTEXT((BARSCOUNT(CLOSE) = SYSPARAM(2)),REF((最低 + ((最高 - 最低) * 0.5)),BARSLAST((BARSCOUNT(CLOSE) = SYSPARAM(2)))),'50%↑'),colorFFFF;
 DRAWTEXT((BARSCOUNT(CLOSE) = SYSPARAM(2)),REF((最低 + ((最高 - 最低) * 0.618)),BARSLAST((BARSCOUNT(CLOSE) = SYSPARAM(2)))),'61.8%↑'),colorFFFF;
 DRAWTEXT((BARSCOUNT(CLOSE) = SYSPARAM(2)),REF((最低 + ((最高 - 最低) * 0.809)),BARSLAST((BARSCOUNT(CLOSE) = SYSPARAM(2)))),'80.9%↑'),colorFFFF;
 DRAWTEXT((BARSCOUNT(CLOSE) = SYSPARAM(2)),REF((最低 + ((最高 - 最低) * 1)),BARSLAST((BARSCOUNT(CLOSE) = SYSPARAM(2)))),'100%↑'),colorFFFF;

 VAR1:=WINNER(CLOSE);
 VAR2:=(VOL / CAPITAL);
 VAR3:=(VAR2 / VAR1);
财神线:=IF((VAR1 < (N1 / 100)),VAR3,0);
 DRAWICON((财神线 > 3),LOW,10),ALIGN5;
 VAR1:=WINNER(CLOSE);
 VAR2:=(VOL / CAPITAL);
 VAR3:=(VAR2 / VAR1);
财神线:=IF((VAR1 < (N1 / 100)),VAR3,0);
财神到:=财神线;
DRAWICON((((财神线 < REF((财神线 > 1),1)) AND (财神线 > 0.5)) AND (财神线 < 1)),HIGH,1),ALIGN5;
 VAR1111:=FORCAST(CLOSE,5);

 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;
 DRAWNUMBER((SYSPARAM(2) = BARPOS),CLOSE,FINANCE(33),2),ALIGN5;
 DRAWTEXT((SYSPARAM(2) = BARPOS),CLOSE,'     -收益'),ALIGN5;
 DRAWTEXT((BARPOS = SYSPARAM(2)),HIGH,('\n所属块:' + BLKNAME)),ALIGN4,colorFFFF;
 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;
 VAR1:=(((CLOSE + HIGH) + LOW) / 3);
 CB:=MA(VAR1,4);
 A1:=HHV(CB,18);
 A2:=HHV(CB,41);
 A3:=(HHV(HIGH,62) * 0.98);
 B1:=LLV(CB,18);
 B2:=(LLV(LOW,62) *