弘历指标源码6个（仅提供源码）
（一共六个指标，看看有几个可用）我本人不懂，看看哪位高手能帮忙
{六采神龙}
{input: 变量00(5,1,30),变量01(30,1,100);}
A02:=(WINNER((CLOSE * 1.100)) * 100.000);
A03:=(WINNER((CLOSE * 0.9)) * 100.000);
A04:=MA(A03,变量00);
STICKLINE( 1.000,0,A04, 1.000,0),colorred;
获利:MA(A03,变量00),colorred;
A06:=( 100.000 - MA(A02,变量00));
STICKLINE( 1.000, 100.000,MA(A02,变量00), 1.000,0),colorgreen;
套牢: ( 100.000 - MA(A02,变量00)),colorgreen;
A08:=(MA(A02,变量00) - MA(A03,变量00));
STICKLINE( 1.000,A04,MA(A02,变量00), 1.000,0),colorblue;
浮动: (MA(A02,变量00) - MA(A03,变量00)),coloryellow;
A0A:=(((((HHV(A04, 15.000) - A03) / A03) * 100.000) > 变量01) and (HHV(A04, 15.000) > 50.000));
STICKLINE(A0A,(0 - 2.000), 2.000, 10.000,0);
STICKLINE(NOT(A0A),(0 - 2.000), 2.000, 10.000,0),colorblue;
{弘历进出}
AC:=CLOSE;
AH:=HIGH;
AL:=LOW;
AO:=OPEN;
STICKLINE(AC<=AO,AH,AC,1,0),colorFF8800;
STICKLINE(AC<=AO,AH,AC,0,0),colorFFFF33;
STICKLINE(AC<=AO,AO,AL,1,0),colorFF8800;
STICKLINE(AC<=AO,AO,AL,0,0),colorFFFF33;
STICKLINE(AC<=AO,AC,AO,8,0),colorFF8800;
STICKLINE(AC<=AO,AC,AO,7,0),colorFF9900;
STICKLINE(AC<=AO,AC,AO,6,0),colorFFAA11;
STICKLINE(AC<=AO,AC,AO,5,0),colorFFBB11;
STICKLINE(AC<=AO,AC,AO,4,0),colorFFCC22;
STICKLINE(AC<=AO,AC,AO,3,0),colorFFDD22;
STICKLINE(AC<=AO,AC,AO,2,0),colorFFEE33;
STICKLINE(AC<=AO,AC,AO,1,0),colorFFFF33;
STICKLINE(AC>=AO,AH,AC,1,0),colorFF;
STICKLINE(AC>=AO,AH,AC,0,0),colorCC;
STICKLINE(AC>=AO,AO,AL,1,0),colorFF;
STICKLINE(AC>=AO,AO,AL,0,0),colorCC;
STICKLINE(AC>AO,AC,AO,8,0),colorAA;
STICKLINE(AC>AO,AC,AO,7,0),color11BB;
STICKLINE(AC>AO,AC,AO,6,0),color22CC;
STICKLINE(AC>AO,AC,AO,5,0),color33DD;
STICKLINE(AC>AO,AC,AO,4,0),color44EE;
STICKLINE(AC>AO,AC,AO,3,0),color55FF;
STICKLINE(AC>AO,AC,AO,2,0),color66FF;
STICKLINE(AC>AO,AC,AO,1,0),color77FF;
快线:EMA((CLOSE+LOW)/2,8);
均衡:EMA(EMA((CLOSE+LOW)/2,20),8);
STICKLINE(快线>均衡,快线,均衡,0.1,0),LINETHICK0,colorFF;
DRAWTEXT(CROSS(快线,均衡),HIGH*1.03,'加仑'),colorFF;
STICKLINE(快线<均衡,快线,均衡,0.1,0),LINETHICK0,colorFF00;
DRAWTEXT(CROSS(均衡,快线),LOW*0.98,'减仑'),colorFF00;
强弱:EMA(EMA((LOW+CLOSE+HIGH)/3,25),25),LINETHICK2,color8800;
弘历彩虹
EMA(CLOSE,6),colorFF;
EMA(CLOSE,12),colorFF;
EMA(CLOSE,18),colorFF;
EMA(CLOSE,24),colorFF00;
EMA(CLOSE,30),colorFFFF;
EMA(CLOSE,36),colorFFFF;
EMA(CLOSE,42),colorFFFF;
EMA(CLOSE,48),colorFFFF;
EMA(CLOSE,100),colorFF0000;
EMA(CLOSE,112),colorFF0000;
EMA(CLOSE,124),colorFF0000;
EMA(CLOSE,138),colorFF0000;
EMA(CLOSE,204),colorFFFFFF;
EMA(CLOSE,216),colorFFFFFF;
EMA(CLOSE,228),colorFFFFFF;
EMA(CLOSE,260),colorFFFFFF;
弘历彩虹
八大天王之背离王
AAA:=CLOSE*9.81987-14.18013*REF(CLOSE,1)-1.68013*REF(CLOSE,2)-1.3468*REF(CLOSE,3)-1.0968*REF(CLOSE,4)-0.8968*REF(CLOSE,5)-0.73013*REF(CLOSE,6)-0.58728*REF(CLOSE,7)-0.46228*REF(CLOSE,8)-0.35117*REF(CLOSE,9)-0.25117*REF(CLOSE,10)-0.16026*REF(CLOSE,11)-0.07692*REF(CLOSE,12);
BBB:=CLOSE*29.88179-36.11821*REF(CLOSE,1)-2.61821*REF(CLOSE,2)-2.28488*REF(CLOSE,3)-2.03488*REF(CLOSE,4)-1.83488*REF(CLOSE,5)-1.66821*REF(CLOSE,6)-1.52535*REF(CLOSE,7)-1.40035*REF(CLOSE,8)-1.28924*REF(CLOSE,9)-1.18924*REF(CLOSE,10)-1.09833*REF(CLOSE,11)-1.015*REF(CLOSE,12)-0.93808*REF(CLOSE,13)-0.86665*REF(CLOSE,14)-0.79998*REF(CLOSE,15)-0.73748*REF(CLOSE,16)-0.67866*REF(CLOSE,17)-0.6231*REF(CLOSE,18)-0.57047*REF(CLOSE,19)-0.52047*REF(CLOSE,20)-0.47285*REF(CLOSE,21)-0.4274*REF(CLOSE,22)-0.38392*REF(CLOSE,23)-0.34225*REF(CLOSE,24)-0.30225*REF(CLOSE,25)-0.26379*REF(CLOSE,26)-0.22675*REF(CLOSE,27)-0.19104*REF(CLOSE,28)-0.15656*REF(CLOSE,29)-0.12322*REF(CLOSE,30)-0.09096*REF(CLOSE,31)-0.05971*REF(CLOSE,32)-0.02941*REF(CLOSE,33);
高:=(3-BBB/AAA)*100;
上:=HHV(高,2);
收:=MA(高,3)-STD(高,3);
开:=MA(高,5)-STD(高,4);
低:=MA(高,5)-STD(高,4);
MID1:=MA(收,26);
DRAWTEXT(上=高 AND MID1>REF(MID1,1) AND ISLASTBAR=1,MID1,' ←变红走强↑'),colorFFFF;
DRAWTEXT(上<>高 AND MID1<REF(MID1,1) AND ISLASTBAR=1,MID1,' ←变绿走弱↓'),colorFFFF00;
DRAWTEXT(MID1>REF(MID1,1) AND 上<>高 AND ISLASTBAR=1,MID1,' ←强势调整↓'),colorFF00FF;
DRAWTEXT(MID1<REF(MID1,1) AND 上=高 AND ISLASTBAR=1,MID1,' ←弱势反弹↑'),colorFFFFFF;
UPPER:=MID1+2*STD(高,26);
LOWER:=MID1-2*STD(低,26);
FILLRGN(CLOSE>0,UPPER,LOWER),color333311;
MID:=MID1;
STICKLINE(收>=开,高,低,1,0),colorFF00FF;
STICKLINE(收>=开,高,低,0,0),colorFFBBFF;
STICKLINE(收>=开,收,开,8,0),colorFF00FF;
STICKLINE(收>=开,收,开,7,0),colorFF22FF;
STICKLINE(收>=开,收,开,6,0),colorFF44FF;
STICKLINE(收>=开,收,开,5,0),colorFF66FF;
STICKLINE(收>=开,收,开,4,0),colorFF88FF;
STICKLINE(收>=开,收,开,3,0),colorFF99FF;
STICKLINE(收>=开,收,开,2,0),colorFFAAFF;
STICKLINE(收>=开,收,开,1,0),colorFFBBFF;
STICKLINE(收<开,高,低,1,0),color8800;
STICKLINE(收<开,高,低,0,0),colorFF00;
STICKLINE(收<开,收,开,8,0),color8800;
STICKLINE(收<开,收,开,7,0),color9900;
STICKLINE(收<开,收,开,6,0),colorAA00;
STICKLINE(收<开,收,开,5,0),colorBB00;
STICKLINE(收<开,收,开,4,0),colorCC00;
STICKLINE(收<开,收,开,3,0),colorDD00;
STICKLINE(收<开,收,开,2,0),colorEE00;
STICKLINE(收<开,收,开,1,0),colorFF00;
STICKLINE(上=高,高,低,1,0),colorFF;
STICKLINE(上=高,高,低,0,0),colorEEFF;
STICKLINE(上=高,收,开,8,0),colorFF;
STICKLINE(上=高,收,开,7,0),color22FF;
STICKLINE(上=高,收,开,6,0),color44FF;
STICKLINE(上=高,收,开,5,0),color66FF;
STICKLINE(上=高,收,开,4,0),color88FF;
STICKLINE(上=高,收,开,3,0),colorAAFF;
STICKLINE(上=高,收,开,2,0),colorCCFF;
STICKLINE(上=高,收,开,1,0),colorEEFF;
底:=CROSS(低,LOWER);
追:=CROSS(低,MID);
睹:=CROSS(低,UPPER);
DRAWICON(CROSS(低,LOWER),低+5,'10');
DRAWICON(CROSS(低,MID),MID+25,'11');
DRAWICON(CROSS(低,UPPER),UPPER+40,'12');
0;
50;
箱体王
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,8,0),colorAA;
STICKLINE(CLOSE<OPEN,CLOSE,OPEN,8,0),color998855;
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,5,0),colorCC;
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,3,0),colorDD;
STICKLINE(CLOSE>OPEN,HIGH,LOW,0,0),colorFF;
STICKLINE(CLOSE<OPEN,CLOSE,OPEN,5,0),colorBBAA77;
STICKLINE(CLOSE<OPEN,CLOSE,OPEN,3,0),colorDDCC99;
STICKLINE(CLOSE<OPEN,HIGH,LOW,0,0),colorFFEEBB;
FH:=HIGH;
FL:=LOW;
SELL:=0*FH;
BUY:=SELL;
SIGNAL:=SELL;
BOXH:SELL,LINETHICK0;
BOXL:SELL,LINETHICK0;
VARIABLE:HC=0,LC=0,BT=FH[1],BB=FH[1];
FOR I=1 TO DATACOUNT DO BEGIN
IF HC>1 THEN BEGIN
IF LC>2 AND BT<=FH[I] THEN BEGIN
BUY[I]:=1;
FOR J=I-1 DOWNTO I-HC DO BEGIN
BOXH[J]:=FH[I-HC],LINETHICK0;
BOXL[J]:=FL[I-LC],LINETHICK0;
END;
HC:=0;
LC:=0;
END;
IF BT>FH[I] THEN BEGIN
IF LC>2 THEN BEGIN
IF BB>=FL[I] THEN BEGIN
SELL[I]:=1;
FOR J=I-1 DOWNTO I-HC DO BEGIN
BOXH[J]:=FH[I-HC],LINETHICK0;
BOXL[J]:=FL[I-LC],LINETHICK0;
END;
HC:=-1;
LC:=0;
END;ELSE BEGIN
|
(12)71%(5)29%