請(qǐng)?jiān)诩尤腴_(kāi)平倉(cāng)指令用于回測(cè)
作者:文華財(cái)經(jīng) 來(lái)源:cxh99.com 發(fā)布時(shí)間:2023年04月15日
-
咨詢內(nèi)容:
?A:=5;B:=10;D:=20;E:=30;F:=40;G:=50;纏論_1:=1;纏論_2:=MA(CLOSE,170);纏論_3:=IF(HIGH<REF(HIGH,1) AND REF(HIGH,1)<REF(HIGH,2),REF(HIGH,2),0);纏論_4:=IF(LOW>REF(LOW,1) AND REF(LOW,1)>REF(LOW,2),REF(LOW,2),0);纏論_5:=VALUEWHEN(纏論_3>0,纏論_3);纏論_6:=VALUEWHEN(纏論_4>0,纏論_4);纏論_7:=HHV(HIGH,A)/10*纏論_1+HHV(HIGH,B)/10+HHV(HIGH,B)/10+HHV(HIGH,D)/10+HHV(HIGH,D)/10+HHV(HIGH,E)/10+HHV(HIGH,E)/10+HHV(HIGH,F)/10+HHV(HIGH,G)/10+HHV(HIGH,20)/10;纏論_8:=LLV(LOW,A)/10*纏論_1+LLV(LOW,B)/10+LLV(LOW,B)/10+LLV(LOW,D)/10+LLV(LOW,D)/10+LLV(LOW,E)/10+LLV(LOW,E)/10+LLV(LOW,F)/10+LLV(LOW,G)/10+LLV(LOW,20)/10;纏論_9:=IF(纏論_7<REF(纏論_7,1) AND 纏論_8<REF(纏論_8,1) AND REF(OPEN,1)>CLOSE AND OPEN>CLOSE AND HHV(OPEN,0)-CLOSE>0,REF(纏論_7,2),0);纏論_10:=IF(纏論_8>REF(纏論_8,1) AND 纏論_7>REF(纏論_7,1) AND REF(OPEN,1)<CLOSE AND OPEN<CLOSE AND CLOSE-LLV(OPEN,0)>0,REF(纏論_8,2),0);纏論_11:=DATE;纏論_12:=纏論_9;纏論_13:=纏論_10;纏論_14:=OPEN;纏論_15:=CLOSE;纏論_16:=HIGH;纏論_17:=LOW;纏論_18:=VALUEWHEN(纏論_12>0,纏論_12);纏論_19:=VALUEWHEN(纏論_13>0,纏論_13);纏論_20:=IF(CLOSE>纏論_18,(-3),IF(CLOSE<纏論_19,1,0));纏論_21:=VALUEWHEN(纏論_20<>0,纏論_20);纏論_22:=IF(纏論_21=1,纏論_18,纏論_19);纏論_23:=VALUEWHEN(ISLASTBAR,纏論_22);纏論_24:=纏論_21;纏論_25:=纏論_21;纏論_26:=纏論_24;纏論_27:=OPEN-CLOSE;纏論_28:=纏論_27;纏論_29:=IF(OPEN>CLOSE,OPEN,CLOSE);纏論_30:=IF(OPEN<CLOSE,OPEN,CLOSE);STICKLINE1(纏論_26=1,纏論_16,纏論_29,0,0),COLORCYAN;STICKLINE1(纏論_26=1,纏論_17,纏論_30,0,0),COLORCYAN;STICKLINE1(纏論_26=(-3),纏論_16,纏論_29,0,0),COLORRED;STICKLINE1(纏論_26=(-3),纏論_17,纏論_30,0,0),COLORRED;STICKLINE(纏論_26>0,纏論_14,纏論_15,3,1),COLORCYAN;STICKLINE(纏論_26<=0,纏論_14,纏論_15,3,1),COLORRED;STICKLINE(纏論_28>0 AND 纏論_26<=0,纏論_14,纏論_15,3,0),COLORRED;STICKLINE(纏論_28>0 AND 纏論_26>0,纏論_14,纏論_15,3,0),COLORCYAN;IF(纏論_21=1,纏論_22,NULL),COLORCYAN;IF(纏論_21=(-3),纏論_22,NULL),COLORRED;
//CROSS(纏論_21,0),SPK;//CROSSDOWN(纏論_21,0),BPK;
TT:TIME>=0927&&TIME<1500,NODRAW;D1:CROSSDOWN(纏論_21,0)&&TT=1,NODRAW;K1:CROSS(纏論_21,0)&&TT=1,NODRAW;D2:CROSS(TT,0.5)&&EXIST(CROSSDOWN(纏論_21,0),BARSLAST(TIME=0900)+1)&&NOT(CROSS(纏論_21,0)),NODRAW;K2:CROSS(TT,0.5)&&EXIST(CROSS(纏論_21,0),BARSLAST(TIME=0900)+1)&&NOT(CROSSDOWN(纏論_21,0)),NODRAW;DD:D1||D2,NODRAW;KK:K1||K2,NODRAW;DRAWTEXT(KK&&COUNT(KK,BARSLAST(DD))=1,H,'';DRAWTEXT(DD&&COUNT(DD,BARSLAST(KK))=1,L,'',VALIGN0;
?
?來(lái)源:程序化99
-
文華技術(shù)人員:
?參考:
?A:=5;
B:=10;
D:=20;
E:=30;
F:=40;
G:=50;
纏論_1:=1;
纏論_2:=MA(CLOSE,170);
纏論_3:=IF(HIGH<REF(HIGH,1) AND REF(HIGH,1)<REF(HIGH,2),REF(HIGH,2),0);
纏論_4:=IF(LOW>REF(LOW,1) AND REF(LOW,1)>REF(LOW,2),REF(LOW,2),0);
纏論_5:=VALUEWHEN(纏論_3>0,纏論_3);
纏論_6:=VALUEWHEN(纏論_4>0,纏論_4);
纏論_7:=HHV(HIGH,A)/10*纏論_1+HHV(HIGH,B)/10+HHV(HIGH,B)/10+HHV(HIGH,D)/10+HHV(HIGH,D)/10+HHV(HIGH,E)/10+HHV(HIGH,E)/10+HHV(HIGH,F)/10+HHV(HIGH,G)/10+HHV(HIGH,20)/10;
纏論_8:=LLV(LOW,A)/10*纏論_1+LLV(LOW,B)/10+LLV(LOW,B)/10+LLV(LOW,D)/10+LLV(LOW,D)/10+LLV(LOW,E)/10+LLV(LOW,E)/10+LLV(LOW,F)/10+LLV(LOW,G)/10+LLV(LOW,20)/10;
纏論_9:=IF(纏論_7<REF(纏論_7,1) AND 纏論_8<REF(纏論_8,1) AND REF(OPEN,1)>CLOSE AND OPEN>CLOSE AND HHV(OPEN,0)-CLOSE>0,REF(纏論_7,2),0);
纏論_10:=IF(纏論_8>REF(纏論_8,1) AND 纏論_7>REF(纏論_7,1) AND REF(OPEN,1)<CLOSE AND OPEN<CLOSE AND CLOSE-LLV(OPEN,0)>0,REF(纏論_8,2),0);
纏論_11:=DATE;
纏論_12:=纏論_9;
纏論_13:=纏論_10;
纏論_14:=OPEN;
纏論_15:=CLOSE;
纏論_16:=HIGH;
纏論_17:=LOW;
纏論_18:=VALUEWHEN(纏論_12>0,纏論_12);
纏論_19:=VALUEWHEN(纏論_13>0,纏論_13);
纏論_20:=IF(CLOSE>纏論_18,(-3),IF(CLOSE<纏論_19,1,0));
纏論_21:=VALUEWHEN(纏論_20<>0,纏論_20);
纏論_22:=IF(纏論_21=1,纏論_18,纏論_19);
纏論_23:=VALUEWHEN(ISLASTBAR,纏論_22);
纏論_24:=纏論_21;
纏論_25:=纏論_21;
纏論_26:=纏論_24;
纏論_27:=OPEN-CLOSE;
纏論_28:=纏論_27;
纏論_29:=IF(OPEN>CLOSE,OPEN,CLOSE);
纏論_30:=IF(OPEN<CLOSE,OPEN,CLOSE);
STICKLINE1(纏論_26=1,纏論_16,纏論_29,0,0),COLORCYAN;
STICKLINE1(纏論_26=1,纏論_17,纏論_30,0,0),COLORCYAN;
STICKLINE1(纏論_26=(-3),纏論_16,纏論_29,0,0),COLORRED;
STICKLINE1(纏論_26=(-3),纏論_17,纏論_30,0,0),COLORRED;
STICKLINE(纏論_26>0,纏論_14,纏論_15,3,1),COLORCYAN;
STICKLINE(纏論_26<=0,纏論_14,纏論_15,3,1),COLORRED;
STICKLINE(纏論_28>0 AND 纏論_26<=0,纏論_14,纏論_15,3,0),COLORRED;
STICKLINE(纏論_28>0 AND 纏論_26>0,纏論_14,纏論_15,3,0),COLORCYAN;
IF(纏論_21=1,纏論_22,NULL),COLORCYAN;
IF(纏論_21=(-3),纏論_22,NULL),COLORRED;
//CROSS(纏論_21,0),SPK;
//CROSSDOWN(纏論_21,0),BPK;
TT:TIME>=0927&&TIME<1500,NODRAW;
D1:CROSSDOWN(纏論_21,0)&&TT=1,NODRAW;
K1:CROSS(纏論_21,0)&&TT=1,NODRAW;
D2:CROSS(TT,0.5)&&EXIST(CROSSDOWN(纏論_21,0),BARSLAST(TIME=0900)+1)&&NOT(CROSS(纏論_21,0)),NODRAW;
K2:CROSS(TT,0.5)&&EXIST(CROSS(纏論_21,0),BARSLAST(TIME=0900)+1)&&NOT(CROSSDOWN(纏論_21,0)),NODRAW;
DD:D1||D2,NODRAW;
KK:K1||K2,NODRAW;
DRAWTEXT(KK&&COUNT(KK,BARSLAST(DD))=1,H,'';
DRAWTEXT(DD&&COUNT(DD,BARSLAST(KK))=1,L,'',VALIGN0;
KK&&COUNT(KK,BARSLAST(DD))=1,SPK;
DD&&COUNT(DD,BARSLAST(KK))=1,BPK;
AUTOFILTER;