投资者咨询：老师帮修改一下 (文华财经wh9)
来源:文华财经 日期:2020-7-30 18:43
请老师修改以便在WH6可以用
Params
Numeric M(1);
Numeric N(0);
Numeric M(1);
Numeric N(0);
Vars
Numeric DAYD;
Numeric DAYK;
Begin
DRAWCOLORKLINE(ISUP,CYAN,1);//收盘价大于开盘价，绘制红色空心K线
DRAWCOLORKLINE(ISDOWN,CYAN,0);//收盘价小于开盘价，绘制青色实心K线
DRAWCOLORKLINE(ISEQUAL,CYAN,1);//收盘价等于开盘价，绘制白色十字线
DAYD=BARSLAST(HIGH>REF(HIGH,1));
DAYK=BARSLAST(LOW<REF(LOW,1));
DRAWCOLORKLINE(ISUP&&HIGH>REF(HIGH,1)&&BARSLAST(REF(HIGH,1)>REF(HIGH,2))>=BARSLAST(REF(LOW,1)<REF(LOW,2)),RED,M);//收盘价大于开盘价，绘制红色空心K线
DRAWCOLORKLINE(ISDOWN&&HIGH>REF(HIGH,1)&&BARSLAST(REF(HIGH,1)>REF(HIGH,2))>=BARSLAST(REF(LOW,1)<REF(LOW,2)),RED,N);//收盘价小于开盘价，绘制青色实心K线
DRAWCOLORKLINE(ISEQUAL&&HIGH>REF(HIGH,1)&&BARSLAST(REF(HIGH,1)>REF(HIGH,2))>=BARSLAST(REF(LOW,1)<REF(LOW,2)),RED,1);//收盘价等于开盘价，绘制白色十字线
DRAWCOLORKLINE(ISUP&&LOW<REF(LOW,1)&&BARSLAST(REF(LOW,1)<REF(LOW,2))>=BARSLAST(REF(HIGH,1)>REF(HIGH,2)),YELLOW,M);//收盘价大于开盘价，绘制红色空心K线
DRAWCOLORKLINE(ISDOWN&&LOW<REF(LOW,1)&&BARSLAST(REF(LOW,1)<REF(LOW,2))>=BARSLAST(REF(HIGH,1)>REF(HIGH,2)),YELLOW,N);//收盘价小于开盘价，绘制青色实心K线
DRAWCOLORKLINE(ISEQUAL&&LOW<REF(LOW,1)&&BARSLAST(REF(LOW,1)<REF(LOW,2))>=BARSLAST(REF(HIGH,1)>REF(HIGH,2)),YELLOW,1);//收盘价等于开盘价，绘制白色十字线
DRAWCOLORKLINE(ISUP&&HIGH>REF(HIGH,1)&&LOW<REF(LOW,1),WHITE,M);//收盘价大于开盘价，绘制红色空心K线
DRAWCOLORKLINE(ISDOWN&&HIGH>REF(HIGH,1)&&LOW<REF(LOW,1),WHITE,N);//收盘价小于开盘价，绘制青色实心K线
DRAWCOLORKLINE(ISEQUAL&&HIGH>REF(HIGH,1)&&LOW<REF(LOW,1),WHITE,1);//收盘价等于开盘价，绘制白色十字线
KText(BarStatus==2,-5,Ref(High,5),Green,"↓",Fontsize50,Align1,Valign2);
KText(BarStatus==2,-10,Ref(High,10),Green,"↓",Fontsize50,Align1,Valign2);
KText(BarStatus==2,-20,Ref(High,20),Green,"↓",Fontsize50,Align1,Valign2);
KText(BarStatus==2,-60,Ref(High,60),Green,"↓",Fontsize50,Align1,Valign2);
End
Numeric DAYD;
Numeric DAYK;
Begin
DRAWCOLORKLINE(ISUP,CYAN,1);//收盘价大于开盘价，绘制红色空心K线
DRAWCOLORKLINE(ISDOWN,CYAN,0);//收盘价小于开盘价，绘制青色实心K线
DRAWCOLORKLINE(ISEQUAL,CYAN,1);//收盘价等于开盘价，绘制白色十字线
DAYD=BARSLAST(HIGH>REF(HIGH,1));
DAYK=BARSLAST(LOW<REF(LOW,1));
DRAWCOLORKLINE(ISUP&&HIGH>REF(HIGH,1)&&BARSLAST(REF(HIGH,1)>REF(HIGH,2))>=BARSLAST(REF(LOW,1)<REF(LOW,2)),RED,M);//收盘价大于开盘价，绘制红色空心K线
DRAWCOLORKLINE(ISDOWN&&HIGH>REF(HIGH,1)&&BARSLAST(REF(HIGH,1)>REF(HIGH,2))>=BARSLAST(REF(LOW,1)<REF(LOW,2)),RED,N);//收盘价小于开盘价，绘制青色实心K线
DRAWCOLORKLINE(ISEQUAL&&HIGH>REF(HIGH,1)&&BARSLAST(REF(HIGH,1)>REF(HIGH,2))>=BARSLAST(REF(LOW,1)<REF(LOW,2)),RED,1);//收盘价等于开盘价，绘制白色十字线
DRAWCOLORKLINE(ISUP&&LOW<REF(LOW,1)&&BARSLAST(REF(LOW,1)<REF(LOW,2))>=BARSLAST(REF(HIGH,1)>REF(HIGH,2)),YELLOW,M);//收盘价大于开盘价，绘制红色空心K线
DRAWCOLORKLINE(ISDOWN&&LOW<REF(LOW,1)&&BARSLAST(REF(LOW,1)<REF(LOW,2))>=BARSLAST(REF(HIGH,1)>REF(HIGH,2)),YELLOW,N);//收盘价小于开盘价，绘制青色实心K线
DRAWCOLORKLINE(ISEQUAL&&LOW<REF(LOW,1)&&BARSLAST(REF(LOW,1)<REF(LOW,2))>=BARSLAST(REF(HIGH,1)>REF(HIGH,2)),YELLOW,1);//收盘价等于开盘价，绘制白色十字线
DRAWCOLORKLINE(ISUP&&HIGH>REF(HIGH,1)&&LOW<REF(LOW,1),WHITE,M);//收盘价大于开盘价，绘制红色空心K线
DRAWCOLORKLINE(ISDOWN&&HIGH>REF(HIGH,1)&&LOW<REF(LOW,1),WHITE,N);//收盘价小于开盘价，绘制青色实心K线
DRAWCOLORKLINE(ISEQUAL&&HIGH>REF(HIGH,1)&&LOW<REF(LOW,1),WHITE,1);//收盘价等于开盘价，绘制白色十字线
KText(BarStatus==2,-5,Ref(High,5),Green,"↓",Fontsize50,Align1,Valign2);
KText(BarStatus==2,-10,Ref(High,10),Green,"↓",Fontsize50,Align1,Valign2);
KText(BarStatus==2,-20,Ref(High,20),Green,"↓",Fontsize50,Align1,Valign2);
KText(BarStatus==2,-60,Ref(High,60),Green,"↓",Fontsize50,Align1,Valign2);
End
技术人员回复
日期:2020-7-30 18:46
参考:
M:=1;
N:=0;
DRAWCOLORKLINE(ISUP,COLORCYAN,1);//收盘价大于开盘价，绘制红色空心K线
DRAWCOLORKLINE(ISDOWN,COLORCYAN,0);//收盘价小于开盘价，绘制青色实心K线
DRAWCOLORKLINE(ISEQUAL,COLORCYAN,1);//收盘价等于开盘价，绘制白色十字线
DAYD:=BARSLAST(HIGH>REF(HIGH,1));
DAYK:=BARSLAST(LOW<REF(LOW,1));
DRAWCOLORKLINE(ISUP&&HIGH>REF(HIGH,1)&&BARSLAST(REF(HIGH,1)>REF(HIGH,2))>=BARSLAST(REF(LOW,1)<REF(LOW,2)),COLORRED,M);//收盘价大于开盘价，绘制红色空心K线
DRAWCOLORKLINE(ISDOWN&&HIGH>REF(HIGH,1)&&BARSLAST(REF(HIGH,1)>REF(HIGH,2))>=BARSLAST(REF(LOW,1)<REF(LOW,2)),COLORRED,N);//收盘价小于开盘价，绘制青色实心K线
DRAWCOLORKLINE(ISEQUAL&&HIGH>REF(HIGH,1)&&BARSLAST(REF(HIGH,1)>REF(HIGH,2))>=BARSLAST(REF(LOW,1)<REF(LOW,2)),COLORRED,1);//收盘价等于开盘价，绘制白色十字线
DRAWCOLORKLINE(ISUP&&LOW<REF(LOW,1)&&BARSLAST(REF(LOW,1)<REF(LOW,2))>=BARSLAST(REF(HIGH,1)>REF(HIGH,2)),COLORYELLOW,M);//收盘价大于开盘价，绘制红色空心K线
DRAWCOLORKLINE(ISDOWN&&LOW<REF(LOW,1)&&BARSLAST(REF(LOW,1)<REF(LOW,2))>=BARSLAST(REF(HIGH,1)>REF(HIGH,2)),COLORYELLOW,N);//收盘价小于开盘价，绘制青色实心K线
DRAWCOLORKLINE(ISEQUAL&&LOW<REF(LOW,1)&&BARSLAST(REF(LOW,1)<REF(LOW,2))>=BARSLAST(REF(HIGH,1)>REF(HIGH,2)),COLORYELLOW,1);//收盘价等于开盘价，绘制白色十字线
DRAWCOLORKLINE(ISUP&&HIGH>REF(HIGH,1)&&LOW<REF(LOW,1),COLORWHITE,M);//收盘价大于开盘价，绘制红色空心K线
DRAWCOLORKLINE(ISDOWN&&HIGH>REF(HIGH,1)&&LOW<REF(LOW,1),COLORWHITE,N);//收盘价小于开盘价，绘制青色实心K线
DRAWCOLORKLINE(ISEQUAL&&HIGH>REF(HIGH,1)&&LOW<REF(LOW,1),COLORWHITE,1);//收盘价等于开盘价，绘制白色十字线
KTEXT(BARSTATUS=2,-5,REF(HIGH,5),1,COLORGREEN,'↓'),FONTSIZE50,ALIGN1,VALIGN2;
KTEXT(BARSTATUS=2,-10,REF(HIGH,10),1,COLORGREEN,'↓'),FONTSIZE50,ALIGN1,VALIGN2;
KTEXT(BARSTATUS=2,-20,REF(HIGH,20),1,COLORGREEN,'↓'),FONTSIZE50,ALIGN1,VALIGN2;
KTEXT(BARSTATUS=2,-60,REF(HIGH,60),1,COLORGREEN,'↓'),FONTSIZE50,ALIGN1,VALIGN2;
投资者咨询：老师帮修改一下 (文华财经wh9)
来源:文华财经 日期:2020-7-30 18:43
可是我怎么样才可以用这个把主图的K线指标代换呢，WH9就很容易实现，WH6我试了好多遍都是弄到副图去了
技术人员回复
日期:2020-7-30 19:55
