请求技术人员将我文化代码修改到能在TB上用

ddqh10032419

你好，我有一个在文化使用的交易代码，现在想移植到TB上使用，希望技术人员帮助调整下，可以的话请联系我，我私下发代码给你，谢谢。
N:=17;
N1:=7;
N2:=69;
LH:=79;
M3: EMA(CLOSE,3);
M8: EMA(CLOSE,8);
M13: EMA(M8,13);
M62: EMA(M8,62);
VAR1:=EMA(M13,62);
M81: EMA(M62,81);
M144: EMA(VAR1,144);
VAR2:=(CLOSE+HIGH+LOW)/3;
VAR3:=EMA(VAR2,10);
VAR4:=REF(VAR3,1);
STICKLINE1(VAR3>VAR4,VAR3,VAR4,15,0),COLORRED;
STICKLINE1(VAR3<VAR4,VAR3,VAR4,20,0),COLORGREEN;
VAR5:=(REF(HIGH,1)+REF(LOW,1))/2;
VAR6:=MA(CLOSE,N)+2*STD(CLOSE,N);
VAR7:=REF(CLOSE,1);
VAR8:=SMA(MAX(CLOSE-VAR7,0),N1,1)/SMA(ABS(CLOSE-VAR7),N1,1)*100;
VAR9:=CROSS(N2,VAR8);
VARB:=(2*CLOSE+HIGH+LOW)/4;
VARC:=LLV(LOW,34);
VARD:=HHV(HIGH,34);
VARE:=EMA((VARB-VAR1)/(VAR5-VAR1)*100,7);
VARF:=EMA(0.667*REF(VARE,1)+0.333*VARE,5);
VAR10:=MA(CLOSE,80)-MA(CLOSE,10)/3;
DRAWTEXT(IF(CLOSE<VAR10 AND VOL/240>MA(VOL,5)/240 AND CLOSE>REF(CLOSE,1)*1.08 AND CLOSE<MA(CLOSE,13)*1.3,1,0),LOW,'●理想抄底！');
VAR11:=REF(CLOSE,1);
VAR12:=SMA(MAX(CLOSE-VAR11,0),N,1)/SMA(ABS(CLOSE-VAR11),N,1)*100;
DRAWICON(CROSS(LH,VAR12),HIGH*1.02,1);
DRAWTEXT(CROSS(LH,VAR12),HIGH*1.03,'理想逃顶');
HO:=HIGH>REF(HIGH,1) && HIGH>REF(HIGH,2) && HIGH>REFX(HIGH,1);
FXH:=CROSS(HO,0.9);
HH:=REF(HIGH,BARSLAST(FXH));
LO:=LOW<REF(LOW,1) && LOW<REF(LOW,2) && LOW<=REFX(LOW,1);
FXL:=CROSS(LO,0.9);
LL:=REF(LOW,BARSLAST(FXL));
STICKLINE(CLOSE,HH,HH+0.00001,1,0),COLORMAGENTA;
STICKLINE(CLOSE,LL,LL+0.00001,1,0),COLORGREEN;
DRAWTEXT(ABS(C-O)>MA(ABS(C-O),20)*3,H,'突破！'),COLORYELLOW;
CROSS(VAR3,VAR4),SOUND('A');//变红发出声音A
CROSSDOWN(VAR3,VAR4),SOUND('B');//变绿发出声音B

tbheyihao

已私信TB代码给你

luqian67

tbheyihao 发表于 2016-3-2 12:06
已私信TB代码给你

我在文华上也有这个，目前也想用这个在TB实盘上跑，能否发一份代码给我，十分感谢。

ego90289698

这段代码有未来：“REFX” 是向后引用
。。。。
DRAWTEXT(CROSS(LH,VAR12),HIGH*1.03,'理想逃顶');
HO:=HIGH>REF(HIGH,1) && HIGH>REF(HIGH,2) && HIGH>REFX(HIGH,1);====》HIGH>REFX(HIGH,1) 含未来。意思是最高价大于未来一天的最高价。
FXH:=CROSS(HO,0.9);
HH:=REF(HIGH,BARSLAST(FXH));
LO:=LOW<REF(LOW,1) && LOW<REF(LOW,2) && LOW<=REFX(LOW,1);====》LOW<=REFX(LOW,1) 含未来。意思是最低价小于等于未来一天的最低价。
FXL:=CROSS(LO,0.9);
。。。。
这样的策略也来实盘？