弘历的特色指标 ， 请高手改成通达信的 ， 谢谢！

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);
BBB1:=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);
BBB2:=-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);
BBB:=BBB1+BBB2;
高:=(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+4,' ←变红走强↑'),COLOR0000FF;
DRAWTEXT(上!=高 AND MID1<REF(MID1,1) AND ISLASTBAR=1 ,MID1+8,'←变绿走弱↓'),COLOR00FF00;
DRAWTEXT(MID1>REF(MID1,1) AND 上!=高 AND ISLASTBAR=1 ,MID1-4,'←强势调整↓'),COLORFF00FF;
DRAWTEXT(MID1<REF(MID1,1) AND 上=高 AND ISLASTBAR=1 ,MID1-8,'←弱势反弹↑'),COLORFFFFFF;
UPPER:=MID1+2*STD(高,26);
LOWER:=MID1-2*STD(低,26);
STICKLINE(CLOSE>0,UPPER,LOWER,5,0),COLOR333311;
{DRAWBAND(UPPER,RGB(0,50,50),LOWER,RGB(0,0,96));}
MID:=MID1;
{STICKLINE(收>=开,高,低,0,0),COLORFF00FF;}
STICKLINE(收>=开,高,低,0,0),COLORFFBBFF;
STICKLINE(收>=开,收,开,3,0),COLORFF00FF;
{STICKLINE(收>=开,收,开,2.6,0),COLORFF22FF;
STICKLINE(收>=开,收,开,2.4,0),COLORFF44FF;
STICKLINE(收>=开,收,开,2,0),COLORFF66FF;}
STICKLINE(收>=开,收,开,1.6,0),COLORFF88FF;
{STICKLINE(收>=开,收,开,1.2,0),COLORFF99FF;
STICKLINE(收>=开,收,开,0.8,0),COLORFFAAFF;
STICKLINE(收>=开,收,开,0.4,0),COLORFFBBFF;
STICKLINE(收<开,高,低,0,0),COLOR008800;}
STICKLINE(收<开,高,低,0,0),COLOR00FF00;
STICKLINE(收<开,收,开,3,0),COLOR008800;
{STICKLINE(收<开,收,开,2.6,0),COLOR009900;
STICKLINE(收<开,收,开,2.4,0),COLOR00AA00;
STICKLINE(收<开,收,开,2,0),COLOR00BB00;}
STICKLINE(收<开,收,开,1.6,0),COLOR00CC00;
{STICKLINE(收<开,收,开,1.4,0),COLOR00DD00;
STICKLINE(收<开,收,开,1,0),COLOR00EE00;
STICKLINE(收<开,收,开,0.6,0),COLOR00FF00;
STICKLINE(上=高,高,低,0,0),COLOR0000FF;}
STICKLINE(上=高,高,低,0,0),COLOR00EEFF;
STICKLINE(上=高,收,开,3,0),COLOR0000FF;
{STICKLINE(上=高,收,开,2.6,0),COLOR0022FF;
STICKLINE(上=高,收,开,2.2,0),COLOR0044FF;
STICKLINE(上=高,收,开,1.8,0),COLOR0066FF;
{STICKLINE(上=高,收,开,1.4,0),COLOR0088FF;
STICKLINE(上=高,收,开,1,0),COLOR00AAFF;
STICKLINE(上=高,收,开,0.6,0),COLOR00CCFF;
STICKLINE(上=高,收,开,0,0),COLOR00EEFF;}
底:=CROSS(低,LOWER);
追:=CROSS(低,MID);
赌:=CROSS(低,UPPER);
DRAWICON(CROSS(低,LOWER),低-5,1);
DRAWICON(CROSS(低,MID),MID+15,8);
DRAWICON(CROSS(低,UPPER),UPPER+40,2);

        弘历的特色指标 ， 请高手改成通达信的  ， 谢谢！

背离王源码
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;

[ 本帖最后由 浩申 于 2008-12-25 20:20 编辑 ]