請問要如何更改轉折數據??謝謝

ifuian 附帶上了此圖片:

重貼圖表

ifuian 附帶上了此圖片:

請提供原碼,因為此指標並非內建公式

A:=MA(C,6);
B:=MA(C,12);
轉折:
IF((REF(A,2)>REF(B,2)) AND (REF(A,1)>REF(B,1)) AND (A<B),H,
IF((REF(A,2)<REF(B,2)) AND (REF(A,1)<REF(B,1)) AND (A>B),L,

IF(BARSLAST((REF(A,2)>REF(B,2)) AND (REF(A,1)>REF(B,1)) AND (A<B))<BARSLAST((REF(A,2)<REF(B,2)) AND (REF(A,1)<REF(B,1)) AND (A>B)),
REF(H,BARSLAST((REF(A,2)>REF(B,2)) AND (REF(A,1)>REF(B,1)) AND (A<B))),
REF(L,BARSLAST((REF(A,2)<REF(B,2)) AND (REF(A,1)<REF(B,1)) AND (A>B)))))

),COLORYELLOW;LC := REF(CLOSE,1);
RSI1:=SMA(MAX(CLOSE-LC,0),6,1)/SMA(ABS(CLOSE-LC),6,1)*100;
RSI2:=SMA(MAX(CLOSE-LC,0),12,1)/SMA(ABS(CLOSE-LC),12,1)*100;

A1:=IF(((REF(RSI1,3)>REF(RSI1,2)) AND (REF(RSI1,2)>REF(RSI1,1)) AND (REF(RSI1,1)<RSI1)),1,0);
B1:=IF(((REF(RSI1,3)<REF(RSI1,2)) AND (REF(RSI1,2)<REF(RSI1,1)) AND (REF(RSI1,1)>RSI1)),1,0);

D1:=IF(B=1,C,REF(C,BARSLAST(B=1)));
E1:=IF(B=1,RSI1,REF(RSI1,BARSLAST(B=1)));

DRAWICON((E1<REF(E1,1)) AND (D1>REF(D1,1)),H*1.005,3);
STICKLINE(C>O OR (C=O AND C>REF(C,1)),C,H,0.1,0),COLORRED;
STICKLINE(C>O OR (C=O AND C>REF(C,1)),O,L,0.1,0),COLORRED;
STICKLINE(C>O OR (C=O AND C>REF(C,1)),O,C,7,0),COLORRED;
STICKLINE(C<O OR (C=O AND C<=REF(C,1)),H,L,0.1,0),COLORcyan;
STICKLINE(C<O OR (C=O AND C<=REF(C,1)),O,C,7,0),COLORcyan;

LC1 := REF(CLOSE,1);
RSI3:=SMA(MAX(CLOSE-LC,0),6,1)/SMA(ABS(CLOSE-LC),6,1)*100;
RSI4:=SMA(MAX(CLOSE-LC,0),12,1)/SMA(ABS(CLOSE-LC),12,1)*100;

A2:=IF(((REF(RSI1,3)>=REF(RSI1,2)) AND (REF(RSI1,2)>=REF(RSI1,1)) AND (REF(RSI1,1)<RSI1)),1,0);
B2:=IF(((REF(RSI1,3)<=REF(RSI1,2)) AND (REF(RSI1,2)<=REF(RSI1,1)) AND (REF(RSI1,1)>RSI1)),1,0);

D2:=IF(A=1,ref(C,1),REF(ref(C,1),BARSLAST(A=1))),LINETHICK0;
E2:=IF(A=1,ref(RSI1,1),REF(ref(RSI1,1),BARSLAST(A=1)));

DRAWICON((E2>REF(E2,1)) AND (D2<REF(D2,1)),L*0.995,1);
昨收:=D2;
昨RSI1:=E2;

{Stop and Reverse , SAR , 拋物轉向系統}
SARN:SAR(N,STEP,MAXP),CIRCLEDOT;
{Adaptive Moving Average , AMA , 最佳移動平均}
Direction:=CLOSE - REF( CLOSE , N ) ;

XX:=ABS( CLOSE - REF( CLOSE , 1 ) ) ;

Volatility:=SUM( XX , N ) ;


ER:=ABS( Direction / Volatility ) ;


FastC:= 2 / ( p + 1 ) ;

SlowC:= 2 / ( q + 1 ) ;

SSC:=ER * ( FastC - SlowC ) + SlowC ;


Constant :=SSC * SSC , Linethick0;


YY:=REF( Close , 1 ) + Constant * ( CLOSE - REF( Close , 1 ) ) ;


AA:=IF( SUM( 1 , 0 )= N + 1 , YY , 0 ) ;

BB:=BarsLast( AA>0 ) ;

DDD:=REF( C , BB ) ;



DD:=REF( C , BB ) ;

收盤價格:CLOSE , Linethick0 , Precision2;
CC:=CLOSE , Linethick0 ;

<%
NN= FFL.VarData("N")

VD= FFL.VarData("DD")
VC= FFL.VarData("CC")

Vonstant= FFL.VarData("Constant")


LT = UBound( VC )


for m=NN + 1 to LT

VD( m )=VD( m - 1 ) + Vonstant( m ) * ( VC( m ) - VD( m - 1 ) )

next


FFL.VarData("DD")=VD
%>

AMAD , Linethick0;



FFilter:=( K / 100 ) * Std( AMA - REF( AMA , 1 ) , N ) ;


XA:=IF( AMA<REF( AMA , 1 ) , AMA , 0 ) ;
XN:=BarsLast( XA>0 ) ;

AMALow :=REF( AMA , XN ) ;


YA:=IF( AMA>REF( AMA , 1 ) , AMA , 0 ) ;
YN:=BarsLast( YA>0 ) ;

AMAHigh :=REF( AMA , YN ) ;


RR:=IF( AMAHigh - AMA > FFilter , -1 , 0 ) ;
TT:=IF( AMA - AMALow > FFilter , 1 , RR ) ;

PartLine(TT=1,AMA) , ColorRed , Linethick2;
PartLine(TT= -1,AMA) , ColorGreen , Linethick2;
PartLine(TT= 0,AMA) , ColorWhite , Linethick2;

引用:

---

最初由 ifuian 發表
請問要如何更改轉折數據??謝謝

---

非常非常感謝

ryl兄
感謝回文

引用:

---

最初由 king 發表
ryl兄
感謝回文

---