奇狐社區論壇
在這個頁面顯示本主題全部的 8 個文章

奇狐社區論壇 (http://www.chiefox.com.tw/bbs/index.php)
- 問題交流 (http://www.chiefox.com.tw/bbs/forumdisplay.php?forumid=28)
-- 轉折設定 (http://www.chiefox.com.tw/bbs/showthread.php?threadid=857)


由 ifuian 在 2004-05-14 20:56 發表:

轉折設定

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


由 ifuian 在 2004-05-14 21:04 發表:

重貼圖表

重貼圖表


由 king 在 2004-05-15 01:01 發表:

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


由 ifuian 在 2004-05-15 08:45 發表:

附上原始編碼.請指教

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;


由 ryl 在 2004-05-15 09:38 發表:

回覆: 轉折設定

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

A:=MA(C,6);
B:=MA(C,12);
要更改轉折數據,你只要調整A、B的均線參數即可(將6、12調整到你想要的爲止)。


由 ifuian 在 2004-05-15 10:48 發表:

灰熊感謝

非常非常感謝


由 king 在 2004-05-15 12:02 發表:

ryl兄
感謝回文


由 ryl 在 2004-05-15 12:43 發表:

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


引用:
最初由 ifuian 發表
非常非常感謝


不客氣,大家一起交流。


全部時間均為台灣時間, 現在時間為06:25
在這個頁面顯示本主題全部的 8 個文章


Powered by: vBulletin Version 2.3.0 - Copyright©2000-, Jelsoft Enterprises Limited.

簡愛洋行 製作 Copyright 2003-. All Rights Reserved.