设为首页收藏本站

 找回密码
 注册
楼主: pwqzc
打印 上一主题 下一主题

从一无所知开始学习TB编程 [复制链接]

Rank: 1

精华
0
UID
110669
积分
23
帖子
2
主题
0
阅读权限
10
注册时间
2012-5-25
最后登录
2012-5-27
1#
发表于 2012-5-26 12:22:18 |显示全部楼层
请老师帮忙,把下面这个文华公式改写成TB的,刚接触TB,正在学习,眼下还不会改写,可操盘时还急用,谢谢啦。
MA7:=EMA((2*CLOSE+HIGH+LOW)/4,10);
MA17:=EMA((2*CLOSE+HIGH+LOW)/4,21);
MA38:=EMA((2*CLOSE+HIGH+LOW)/4,42);
VARA:=LLV(LOW,30);
VARB:=HHV(HIGH,30);
VARC:=EMA((CLOSE-VARA)/(VARB-VARA)*4,3)*25;
QS:=VARC,COLORWHITE;
VARD:=87.5;
VARE:=(VARC-LLV(VARC,3))/(HHV(VARC,3)-LLV(VARC,3))*4*25;
VARX:=(2*CLOSE+HIGH+LOW)/4;
VARY:=LLV(LOW,35);
VARAA:=HHV(HIGH,35);
B:=EMA((VARX-VARY)/(VARAA-VARY)*100,8);
B1:=EMA(B,5);
STICKLINE(B-B1>0 AND C<MA38,B,B1,COLORWHITE,0);
STICKLINE(B-B1<0 AND C>MA38,B,B1,COLORWHITE,0);
STICKLINE(B-B1>0 AND C>MA38,B,B1,COLORRED,0);
STICKLINE(B-B1<0 AND C<MA38,B,B1,COLORCYAN,0);
V1:=(2*CLOSE+HIGH+LOW)/4;
V2:=LLV(LOW,21);
VA:=HHV(HIGH,34);
FB:=EMA((V1-V2)/(VA-V2)*100,13);
FBB:=EMA((0.667*REF(FB,1)+0.333*FB),2);
ZLX:=EMA(0.382*REF(FB,2)+0.618*FB,12);
VAR1:=(EMA(C,12)-EMA(C,26))*100+50;
VAR2:=EMA(VAR1,9);
VAR3:=((HHV(H,21)-C)/(HHV(H,21)-LLV(L,21)))*100-10;
VAR4:=((C-LLV(L,21))/(HHV(H,21)-LLV(L,21)))*100;
VAR5:=SMA(VAR4,13,8);
VAR6:=SMA(VAR3,21,8);
VAR7:=MA(C,80)-MA(C,10)/7;
VAR8:=EMA(C,5);
VAR9:=MA((LLV(C,9))*1.1,14);
VAR10:=2*VAR9-VAR8-C*0.1;
VAR11:=IFELSE(((VAR8-VAR10)*5>0),(POW((VAR8-VAR10)*5,2))/10,(-1*(POW((VAR8-VAR10)*(5),2)))/(10));
VAR12:=IFELSE((VAR11>0),VAR11-0,12);
VAR13:=SMA(MAX(C-REF(C,2),0),7,1)/SMA(ABS(C-REF(C,2)),7,1)*100;
QQS:=CEILING(SMA(VAR5,13,8)),COLORWHITE;
KD:IFELSE((QQS-VAR6<(-65)),5,10),COLORYELLOW;
FD:IFELSE((QQS-VAR6>85),95,90),COLORGREEN;

使用道具 举报

您需要登录后才可以回帖 登录 | 注册

bottom

静态版|手机版|联系我们|交易开拓者 ( 粤ICP备07044698   

GMT+8, 2024-5-20 01:14

Powered by Discuz! X2 LicensedChrome插件扩展

© 2011-2012 交易开拓者 Inc.

回顶部