以下是原码:
RSV:=(CLOSE-LLV(LOW,100))/(HHV(HIGH,100)-LLV(LOW,100))*100;
K:SMA(RSV,3,1);
D:SMA(K,3,1);
J:3*K-2*D;
STICKLINE(K>D,D,REF(D,1),5,0),COLOR0000FF;
STICKLINE(K<D,D,REF(D,1),5,0),COLORFFF000;
partline(D,D<ref(D,1),rgb(0,255,255),D>ref(D,1),rgb(255,0,0)),LINETHICK1;

小菜鸟先在此谢过好心的高手!!!!!!!!!!

你发的公式最后一句总是通不过，但从前几句的来看和如果下公式差不多，你试试看
N 1,100,1
VAR1:=HHV(HIGH,9)-LLV(LOW,9);
VAR2:=HHV(HIGH,9)-CLOSE;
VAR3:=CLOSE-LLV(LOW,9);
VAR4:=VAR2/VAR1*100-70;
VAR5:=(CLOSE-LLV(LOW,60))/(HHV(HIGH,60)-LLV(LOW,60))*100;
VAR6:=(2*CLOSE+HIGH+LOW)/4;
VAR7:=SMA(VAR3/VAR1*100,3,1);
VAR8:=LLV(LOW,34);
VAR9:=SMA(VAR7,3,1)-SMA(VAR4,9,1);
VARA:=IF(VAR9>100,VAR9-100,0);
VARB:=HHV(HIGH,34);
AA:= VARA*2;
BB:= EMA((VAR6-VAR8)/(VARB-VAR8)*100,13);
VARC:=EMA(0.667*REF(BB,1)+0.333*BB,2);
CC:= SMA(VAR5,20,1);
VARD:=SMA(AA,2,1)-AA;
VARE:=EMA(0.667*REF(BB,1)+0.333*BB,2)-BB;
VAR1A:=(HHV(HIGH,9)-CLOSE)/(HHV(HIGH,9)-LLV(LOW,9))*100-70;
VAR2A:=SMA(VAR1A,9,1)+100;
VAR3A:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100;
VAR4A:=SMA(VAR3A,3,1);
VAR5A:=SMA(VAR4A,3,1)+100;
VAR6A:=VAR5A-VAR2A;
提前抄底: IF(VAR6A>N,VAR6A-N,0),COLORFFFFFF;
LC:=REF(CLOSE,1);
RSI:=SMA(MAX(CLOSE-LC,0),6,1)/SMA(ABS(CLOSE-LC),6,1)*100;
E:=CROSS(83,RSI);
DRAWTEXT(E,提前抄底,'逃顶'),COLOR00FFFF;
STICKLINE(REF(提前抄底,1)<提前抄底,提前抄底,REF(提前抄底,1),5,0),COLORRED;
STICKLINE(REF(提前抄底,1)>提前抄底,提前抄底,REF(提前抄底,1),5,0),COLORFFCC66;
RS:=(CLOSE-LLV(LOW,20))/(HHV(HIGH,20)-LLV(LOW,20))*100;
K:SMA(RS,5,1),COLOR00FFFF;
D:SMA(K,3,1),COLOR00FF00;
J:3*K-2*D,COLORFF00FF,LINETHICK0;
{底部起红豆买进，逃顶线出了就抓紧卖};
持股:(REF(提前抄底,1)<提前抄底 )=1,COLORRED;
持币:(REF(提前抄底,1)> 提前抄底)=1,COLORFFFF00;
买:(持股=1 AND REF(持币,1)=1),COLOR008CFF;

去掉partline(D,D<ref(D,1),rgb(0,255,255),D>ref(D,1),rgb(255,0,0)),LINETHICK1;
可以用

谢谢提供

[ 本帖最后由 沉出晚菊 于 2008-6-11 22:48 编辑 ]

谢谢你们,真的太感激了

谢谢你们,真的太感激了

谢谢你们,真的太感激了

谢谢你们,真的太感激了

谢谢你们,真的太感激了

我来给你改个，原版！最后一句，看看。应该这样改！


RSV:=(CLOSE-LLV(LOW,100))/(HHV(HIGH,100)-LLV(LOW,100))*100;
K:SMA(RSV,3,1);
D:SMA(K,3,1);
J:3*K-2*D;
STICKLINE(K>D,D,REF(D,1),2,0),COLOR0000FF;
STICKLINE(K<D,D,REF(D,1),2,0),COLORFFF000;
IF(D<REF(D,1),D,DRAWNULL),COLORGREEN,LINETHICK2;
IF(D>REF(D,1),D,DRAWNULL),COLORRED,LINETHICK2;

谢谢大家的无私奉献！