HH1:=IFELSE(H<REF(H,1)&&REF(H,1)<REF(H,2),REF(H,2),0);
LL1:=IFELSE(L>REF(L,1)&&REF(L,1)>REF(L,2),REF(L,2),0);
HH2:=VALUEWHEN(HH1>0,HH1);
LL2:=VALUEWHEN(LL1>0,LL1);
HH:=HHV(HIGH,1)/10+HHV(HIGH,2)/10+HHV(HIGH,2)/10+HHV(HIGH,4)/10+HHV(HIGH,4)/10+HHV(HIGH,8)/10+HHV(HIGH,8)/10+HHV(HIGH,13)/10+HHV(HIGH,40)/10+HHV(HIGH,20)/10;
LL:=LLV(LOW,1)/10+LLV(LOW,2)/10+LLV(LOW,2)/10+LLV(LOW,4)/10+LLV(LOW,4)/10+LLV(LOW,8)/10+LLV(LOW,8)/10+LLV(LOW,13)/10+LLV(LOW,40)/10+LLV(LOW,20)/10;
H1:=IFELSE(HH<REF(HH,1)&&LL<REF(LL,1)&&REF(OPEN,1)>CLOSE&&OPEN>CLOSE&&(HHV(OPEN,0)-CLOSE)>0,REF(HH,2),0);
L1:=IFELSE(LL>REF(LL,1)&&HH>REF(HH,1)&&REF(OPEN,1)<CLOSE&&OPEN<CLOSE&&(CLOSE-LLV(OPEN,0))>0,REF(LL,2),0);
X:=DATE;
X0:=H1,LINETHICK2;
X00:=L1;
XXX0:=O,LINETHICK2;
XXX00:=C;
XXX000:=H;
XXX0000:=L;
H2:=VALUEWHEN(X0>0,X0),LINETHICK2;
L2:=VALUEWHEN(X00>0,X00),LINETHICK2;
K1:=IFELSE(CLOSE>H2,-3,IFELSE(CLOSE<L2,1,0));
K2:=VALUEWHEN(K1<>0,K1);
G:=IFELSE(K2=1,H2,L2);
X000:=K2,LINETHICK2;
TMP:=K2,LINETHICK2;
W1:=X000,LINETHICK2;
X0000:=OPEN-CLOSE,LINETHICK2;
W2:=X0000,LINETHICK2;
HT:=IFELSE(OPEN>CLOSE,OPEN,CLOSE),LINETHICK2;
LT:=IFELSE(OPEN<CLOSE,OPEN,CLOSE),LINETHICK2;
DRAWLINE(W1=1,XXX000,W1=1,HT,COLORGREEN);//青色上影线
DRAWLINE(W1=1,XXX0000,W1=1,LT,COLORGREEN);//青色下影线
DRAWLINE(W1=-3,XXX000,W1=-3,HT,COLORRED);//红色上影线
DRAWLINE(W1=-3,XXX0000,W1=-3,LT,COLORRED);//红色下影线
STICKLINE(W1>0,XXX0,XXX00,COLORGREEN,1);//青色空心K线
STICKLINE(W1<=0,XXX0,XXX00,COLORRED,1);//红色空心K线
STICKLINE(W2>0&&W1<=0,XXX0,XXX00,COLORRED,0);//红色实心K线
STICKLINE(W2>0&&W1>0,XXX0,XXX00,COLORGREEN,0);//青色实心K线
DRAWLINE(TMP=1&&REF(TMP,1)=1,G,TMP=1&&REF(TMP,1)=1,REF(G,1),COLORGREEN),DOT;//青色折竖线
DRAWLINE(TMP=-3&&REF(TMP,1)=-3,G,TMP=-3&&REF(TMP,1)=-3,REF(G,1),COLORYELLOW),DOT;//红色折竖线
DRAWSL(K2=1,G,0,1,0,COLORGREEN),DOT;//青色折横线
DRAWSL(K2=-3,G,0,1,0,COLORYELLOW),DOT;//红色折横线
DRAWTEXT(CROSS(TMP,0),HH,'空'),COLORGREEN,FONTSIZE22;
DRAWTEXT(CROSS(0,TMP),LL,'多'),COLORYELLOW,FONTSIZE22,VALIGN0;
DRAWGBK1(TMP>0,RGB(10,50,10));
DRAWGBK1(TMP<0,RGB(50,00,50));
CROSS(0,TMP),SOUND('A');
CROSS(TMP,0),SOUND('B');
VAR1:=(2*CLOSE+HIGH+LOW+OPEN)/5;
A1:(EMA(VAR1,14)+EMA(VAR1,14)+EMA(VAR1,14)+EMA(VAR1,14))/4,COLORRED,LINETHICK1,NOTEXT;
IF(A1>=REF(A1,1),A1,NULL),COLORRED,LINETHICK1,NOTEXT;
IF(A1<=REF(A1,1),A1,NULL),COLORGREEN,LINETHICK1,NOTEXT;
A2:EMA(A1,2),COLORRED,LINETHICK1,NOTEXT;
IF(A2>=REF(A2,1),A2,NULL),COLORRED,LINETHICK1,NOTEXT;
IF(A2<=REF(A2,1),A2,NULL),COLORGREEN,LINETHICK1,NOTEXT;
A3:EMA(A2,2.5),COLORRED,LINETHICK1,NOTEXT;
IF(A3>=REF(A3,1),A3,NULL),COLORRED,LINETHICK1,NOTEXT;
IF(A3<=REF(A3,1),A3,NULL),COLORGREEN,LINETHICK1,NOTEXT;
A4:EMA(A2,3),COLORRED,LINETHICK1,NOTEXT;
IF(A4>=REF(A4,1),A4,NULL),COLORRED,LINETHICK1,NOTEXT;
IF(A4<=REF(A4,1),A4,NULL),COLORGREEN,LINETHICK1,NOTEXT;
A5:EMA(A2,4),COLORRED,LINETHICK1,NOTEXT;
IF(A5>=REF(A5,1),A5,NULL),COLORRED,LINETHICK1,NOTEXT;
IF(A5<=REF(A5,1),A5,NULL),COLORGREEN,LINETHICK1,NOTEXT;
MA2:=EMA(CLOSE,5);
MA3:=EMA(CLOSE,6);
A55:=EMA(A1,18);
IF(A55>=REF(A55,1),A55,NULL),COLORMAGENTA,LINETHICK1,NOTEXT;
IF(A55<=REF(A55,1),A55,NULL),COLORCYAN,LINETHICK1,NOTEXT;
A56:=EMA(A55,3);
IF(A56>=REF(A56,1),A56,NULL),COLORMAGENTA,LINETHICK1,NOTEXT;
IF(A56<=REF(A56,1),A56,NULL),COLORCYAN,LINETHICK1,NOTEXT;
A57:EMA(A55,5),NOTEXT;
IF(A57>=REF(A57,1),A57,NULL),COLORMAGENTA,LINETHICK1,NOTEXT;
IF(A57<=REF(A57,1),A57,NULL),COLORCYAN,LINETHICK1,NOTEXT;
A58:EMA(A55,7),NOTEXT;
IF(A58>=REF(A58,1),A58,NULL),COLORMAGENTA,LINETHICK1,NOTEXT;
IF(A58<=REF(A58,1),A58,NULL),COLORCYAN,LINETHICK1,NOTEXT;
A59:EMA(A55,9),NOTEXT;
IF(A59>=REF(A59,1),A59,NULL),COLORMAGENTA,LINETHICK1,NOTEXT;
IF(A59<=REF(A59,1),A59,NULL),COLORCYAN,LINETHICK1,NOTEXT;
N:=120;//参数N需自行定义
CURRBARSCOUN:=DATACOUNT-BARPOS+1;
KT8:=BARSLAST(CURRBARSCOUN=N);
GD8:=REFX1(IF(ISLASTBAR=1,HHV(H,KT8),0),10000);//{高点}
DD:=REFX1(IF(ISLASTBAR=1,LLV(L,KT8),0),10000);//{低点}
KJ:=GD8-DD;//{高低点差值=分区高度}
GD4:=IF(CURRBARSCOUN<=N/30+16,GD8,NULL);
高:=IF(CURRBARSCOUN<=N/30+16,GD8,NULL),COLORWHITE,COLOR00FFFF,PRECIS0;
低:=IF(CURRBARSCOUN<=N/30+16,DD,NULL),COLORWHITE,COLORFFFF00,PRECIS0;
高区:IF(CURRBARSCOUN<=N-100,GD8,NULL),COLORGREEN,PRECIS0,NOTEXT;
低区:IF(CURRBARSCOUN<=N-100,DD,NULL),COLORRED,PRECIS0,NOTEXT;
压力:IF(CURRBARSCOUN<=N-100,DD+KJ*0.809,NULL),COLORGREEN,PRECIS0,NOTEXT;
警示:IF(CURRBARSCOUN<=N-100,DD+KJ*0.618,NULL),COLOR00FFFF,PRECIS0,NOTEXT;
突破:IF(CURRBARSCOUN<=N-100,DD+KJ/2,NULL),COLORYELLOW,PRECIS0,NOTEXT;
强势:IF(CURRBARSCOUN<=N-100,DD+KJ*0.382,NULL),COLORFF00FF,PRECIS0,NOTEXT;
支撑:IF(CURRBARSCOUN<=N-100,DD+KJ*0.191,NULL),COLORRED,PRECIS0,NOTEXT;
H18:= IFELSE(H<REF(H,2) AND REF(H,1)<REF(H,2),REF(H,2),0);
L18:= IFELSE(L>REF(L,2) AND REF(L,1)>REF(L,2),REF(L,2),0);
H28:=VALUEWHEN(H18>0,H18);
L28:=VALUEWHEN(L18>0,L18);
K18:=IFELSE(CLOSE>H28,-3,IFELSE(CLOSE<L28,1,0));
K28:=VALUEWHEN(K18<>0,K18);
TMP1:=K28;
DRAWICON(CROSS(0,TMP1)&&W1<0,L, 'ICO1'),VALIGN0;
DRAWICON(CROSS(TMP1,0)&&W1>0,H, 'ICO2');
DRAWICON(CROSS(0,TMP1)&&W1>0,L, 'ICO152'),VALIGN0;
DRAWICON(CROSS(TMP1,0)&&W1<0,H, 'ICO155');
能不能在30秒周期上跨周期地引用以上五分钟的开平仓条件,上面的代码是趋势模型,红色为做多,绿色为做空,有办法引用吗?麻烦老师想想帮忙想想办法。
|