TB圈
精华
热门
推荐
请高手帮忙把一个文华指标转变为TB指标
2023-09-07 15:29
请高手帮忙把一个文华指标转变为TB指标
VAR1:=((CLOSE - LLV(LOW,15))/(HHV(HIGH,15) - LLV(LOW,15)))*(100);
VAR2:=REVERSE(VAR1);
VAR3:=SMA(VAR1,5,1);
K:=SMA(VAR3,3,1);
D:=SMA(K,3,1);
STICKLINE(K >= D,K,D,COLORRED,0);
STICKLINE(K < D,K,D,COLORGREEN,0);
DI:15;
DING:85;
https://www.tbquant.net/forumDetail?cur=tbquan&id=9841&cid=all
需要转化简语言的看这个帖子
简语言转化成功率看使用的函数，如果有暂不支持的函数就不行
你这个程序目测是可以的
公式是不是有问题，会出现无穷大的极值，图像失真
找到原因了，是有一种特殊情况，代码中没考虑，我改了一下，应该可以了
Params
//此处添加参数
Vars
//此处添加变量
Series<Numeric> VAR1;
Series<Numeric> VAR2;
Series<Numeric> VAR3;
Series<Numeric> K;
Series<Numeric> KD;
Defs
//此处添加公式函数
Events
//此处实现事件函数
//初始化事件函数，策略运行期间，首先运行且只有一次
OnInit()
{
}
//Bar更新事件函数，参数indexs表示变化的数据源图层ID数组
OnBar(ArrayRef<Integer> indexs)
{
VAR1 = ((CLOSE - Lowest(LOW,15))/IIF((Highest(HIGH,15) - Lowest(LOW,15))==0,1,(Highest(HIGH,15) - Lowest(LOW,15))))*(100);
VAR2 = VAR1*-1;
VAR3 = SMA(VAR1,5,1);
K = SMA(VAR3,3,1);
KD = SMA(K,3,1);
If(K>=KD){
PlotAuto(\"DKX\",K,KD,Red,Enum_Bar);
}Else{
PlotAuto(\"DKX\",KD,K,Green,Enum_Bar);
}
PlotNumeric(\"DI\",15);
PlotNumeric(\"DING\",85);
}