請在加入開平倉指令用于回測

作者：文華財經來源：cxh99.com 發布時間：2023年04月15日

咨詢內容： ?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;
?
?來源:程序化99
文華技術人員： ?參考：

?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;