請老師幫忙看一下謝謝

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

咨詢內容： ?KPW:=BARSLAST(DATE>REF(DATE,1));//TIME<=0900KPJ:=REF(O,KPW);DRAWGBK(O<KPJ,RGB(0,30,0),RGB(0,50,0),0);DRAWGBK(O>=KPJ,RGB(30,0,0),RGB(50,0,0),0);STICKLINE(C>=O,OPEN,CLOSE,RGB(120,120,120),1);STICKLINE(C< O,OPEN,CLOSE,RGB(120,120,120),0);DRAWLINE(H>L,H,H>L,MAX(C,O),RGB(120,120,120));DRAWLINE(H>L,L,H>L,MIN(C,O),RGB(120,120,120));HX:=HHV(HIGH,3);LX:=LLV(LOW,3);H1:=IFELSE(HX<REF(HX,1)&&HX<REF(HX,2)&&HX<REF(HX,4)&&LX<REF(LX,1)&&LX<REF(LX,3)&&LX<REF(LX,5)&&OPEN>CLOSE&&(HHV(OPEN,0)-CLOSE)>0,REF(HX,4),0);L1:=IFELSE(LX>REF(LX,1)&&LX>REF(LX,3)&&LX>REF(LX,5)&&HX>REF(HX,1)&&HX>REF(HX,2)&&HX>REF(HX,4)&&OPEN<CLOSE&&(CLOSE-LLV(OPEN,0))>0,REF(LX,4),0);H2:=VALUEWHEN(H1>0,H1);L2:=VALUEWHEN(L1>0,L1);K1:=IFELSE(CLOSE>H2,-3,IFELSE(CLOSE<L2,1,0));K2:=VALUEWHEN(K1<>0,K1);G:=IFELSE(K2=1,H2,L2);G1:=VALUEWHEN(ISLASTBAR,G);TMP:=K2;W1:=K2;W2:=OPEN-CLOSE;HT:=IFELSE(OPEN>CLOSE,OPEN,CLOSE);LT:=IFELSE(OPEN<CLOSE,OPEN,CLOSE);VAR3:=IF(DATE<990202,1,0);KWZ:=BARSLAST(CROSS(TMP,0));DWZ:=BARSLAST(CROSS(0,TMP));KKP:=REF(KPJ,KWZ);DKP:=REF(KPJ,DWZ);DRAWLINE(W1=1&&VAR3>0&&REF(C,KWZ)<KKP&&(REF(C,KWZ+1)<REF(KPJ,KWZ+1)||REF(C,KWZ)<REF(REF(L,KPW),KWZ)),HIGH,W1=1,HT,COLORCYAN);DRAWLINE(W1=1&&VAR3>0&&REF(C,KWZ)<KKP&&(REF(C,KWZ+1)<REF(KPJ,KWZ+1)||REF(C,KWZ)<REF(REF(L,KPW),KWZ)),LOW,W1=1,LT,COLORCYAN);STICKLINE(W1>0&&VAR3>0&&REF(C,KWZ)<KKP&&(REF(C,KWZ+1)<REF(KPJ,KWZ+1)||REF(C,KWZ)<REF(REF(L,KPW),KWZ)),OPEN,CLOSE,COLORCYAN,1);STICKLINE(W2>0&&W1>0&&VAR3>0&&REF(C,KWZ)<KKP&&(REF(C,KWZ+1)<REF(KPJ,KWZ+1)||REF(C,KWZ)<REF(REF(L,KPW),KWZ)),OPEN,CLOSE,COLORCYAN,0);DRAWLINE(TMP=1&&REF(TMP,1)=1&&VAR3>0,G,TMP=1&&REF(TMP,1)=1,REF(G,1),RGB(120,120,120)),DOT;DRAWSL(K2=1&&VAR3>0,G,0,1,0,RGB(120,120,120)),DOT;DRAWLINE(TMP=1&&REF(TMP,1)=1&&VAR3>0&&REF(C,KWZ)<KKP&&(REF(C,KWZ+1)<REF(KPJ,KWZ+1)||REF(C,KWZ)<REF(REF(L,KPW),KWZ)),G,TMP=1&&REF(TMP,1)=1,REF(G,1),COLORCYAN),DOT;DRAWSL(K2=1&&VAR3>0&&REF(C,KWZ)<KKP&&(REF(C,KWZ+1)<REF(KPJ,KWZ+1)||REF(C,KWZ)<REF(REF(L,KPW),KWZ)),G,0,1,0,COLORCYAN),DOT;STICKLINE(W1<=0&&VAR3>0&&REF(C,DWZ)>DKP&&(REF(H,DWZ+1)>REF(KPJ,DWZ+1)||REF(KPW,DWZ)<1),OPEN,CLOSE,COLORRED,1);STICKLINE(W2>0&&W1<=0&&VAR3>0&&REF(C,DWZ)>DKP&&(REF(H,DWZ+1)>REF(KPJ,DWZ+1)||REF(KPW,DWZ)<1),OPEN,CLOSE,COLORRED,0);DRAWLINE(W1=-3&&VAR3>0&&REF(C,DWZ)>DKP&&(REF(H,DWZ+1)>REF(KPJ,DWZ+1)||REF(KPW,DWZ)<1),HIGH,W1=-3,HT,COLORRED);DRAWLINE(W1=-3&&VAR3>0&&REF(C,DWZ)>DKP&&(REF(H,DWZ+1)>REF(KPJ,DWZ+1)||REF(KPW,DWZ)<1),LOW,W1=-3,LT,COLORRED);DRAWLINE(TMP=-3&&REF(TMP,1)=-3&&VAR3>0,G,TMP=-3&&REF(TMP,1)=-3,REF(G,1),RGB(120,120,120)),DOT;DRAWSL(K2=-3&&VAR3>0,G,0,1,0,RGB(120,120,120)),DOT;DRAWLINE(TMP=-3&&REF(TMP,1)=-3&&VAR3>0&&REF(C,DWZ)>DKP&&(REF(H,DWZ+1)>REF(KPJ,DWZ+1)||REF(KPW,DWZ)<1),G,TMP=-3&&REF(TMP,1)=-3,REF(G,1),COLORRED),DOT;DRAWSL(K2=-3&&VAR3>0&&REF(C,DWZ)>DKP&&(REF(H,DWZ+1)>REF(KPJ,DWZ+1)||REF(KPW,DWZ)<1),G,0,1,0,COLORRED),DOT;DRAWTEXT(CROSS(TMP,0)&&VAR3>0,HX,'ELL',FONTSIZE12,RGB(120,120,120);DRAWTEXT(CROSS(0,TMP)&&VAR3>0,LX,'UY',FONTSIZE12,RGB(120,120,120);DRAWTEXT(CROSS(TMP,0)&&VAR3>0&&REF(C,KWZ)<KKP&&(REF(C,KWZ+1)<REF(KPJ,KWZ+1)||REF(C,KWZ)<REF(REF(L,KPW),KWZ)),HX,'ELL',FONTSIZE18,COLORCYAN;DRAWTEXT(CROSS(0,TMP)&&VAR3>0&&REF(C,DWZ)>DKP&&(REF(H,DWZ+1)>REF(KPJ,DWZ+1)||REF(KPW,DWZ)<1),LX,'UY',FONTSIZE18,COLORYELLOW;KZY:=BARSLAST(REF(H,2)<REF(L,KWZ)&&KWZ<DWZ&&REF(C,1)>REF(H,2)&&(REF(H,2)>=REF(H,3)||REF(C,3)>REF(O,3)));DRAWTEXT(KZY>KWZ&&REF(H,1)<REF(L,KWZ)&&KWZ<DWZ&&C>REF(H,1)&&(REF(H,1)>=REF(H,2)||REF(C,2)>REF(O,2)),LX,'UY_STOP',FONTSIZE12,RGB(120,120,120);DRAWTEXT(KZY>KWZ&&REF(H,1)<REF(L,KWZ)&&KWZ<DWZ&&C>REF(H,1)&&(REF(H,1)>=REF(H,2)||REF(C,2)>REF(O,2))&&REF(C,KWZ)<KKP&&(REF(C,KWZ+1)<REF(KPJ,KWZ+1)||REF(C,KWZ)<REF(REF(L,KPW),KWZ)),LX,'UY_STOP',FONTSIZE12,COLORGREEN;DZY:=BARSLAST(REF(L,2)>REF(H,DWZ)&&DWZ<KWZ&&REF(C,1)<REF(L,2)&&(REF(L,2)<=REF(L,3)||REF(C,3)<REF(O,3)));DRAWTEXT(DZY>DWZ&&REF(L,1)>REF(H,DWZ)&&DWZ<KWZ&&C<REF(L,1)&&(REF(L,1)<=REF(L,2)||REF(C,2)<REF(O,2)),H,'ELL_STOP',FONTSIZE12,RGB(120,120,120);DRAWTEXT(DZY>DWZ&&REF(L,1)>REF(H,DWZ)&&DWZ<KWZ&&C<REF(L,1)&&REF(C,DWZ)>DKP&&(REF(H,DWZ+1)>REF(KPJ,DWZ+1)||REF(KPW,DWZ)<1)&&(REF(L,1)<=REF(L,2)||REF(C,2)<REF(O,2)),H,'ELL_STOP',FONTSIZE12,COLORYELLOW;VAR3<1&&DATE>REF(DATE,1),WORD(1,'過期！微信:XIHUIGUOJI';1。老師去掉灰色開線。跌破支撐為陰。漲破壓力線為陽。謝謝。。。。2。開線色為正常色。兩個修改模式謝謝
?
?來源:程序化99
文華技術人員： ?第2種方案不要修改了老師謝謝
?
?來源: www.tumamayizhan.com
文華客服： ? KPW:=BARSLAST(DATE>REF(DATE,1));//TIME<=0900 KPJ:=REF(O,KPW); DRAWGBK(O<KPJ,RGB(0,30,0),RGB(0,50,0),0); DRAWGBK(O>=KPJ,RGB(30,0,0),RGB(50,0,0),0); HX:=HHV(HIGH,3); LX:=LLV(LOW,3); H1:=IFELSE(HX<REF(HX,1)&&HX<REF(HX,2)&&HX<REF(HX,4)&&LX<REF(LX,1)&&LX<REF(LX,3)&&LX<REF(LX,5)&&OPEN>CLOSE&&(HHV(OPEN,0)-CLOSE)>0,REF(HX,4),0); L1:=IFELSE(LX>REF(LX,1)&&LX>REF(LX,3)&&LX>REF(LX,5)&&HX>REF(HX,1)&&HX>REF(HX,2)&&HX>REF(HX,4)&&OPEN<CLOSE&&(CLOSE-LLV(OPEN,0))>0,REF(LX,4),0); H2:=VALUEWHEN(H1>0,H1); L2:=VALUEWHEN(L1>0,L1); K1:=IFELSE(CLOSE>H2,-3,IFELSE(CLOSE<L2,1,0)); K2:=VALUEWHEN(K1<>0,K1); G:=IFELSE(K2=1,H2,L2); G1:=VALUEWHEN(ISLASTBAR,G); TMP:=K2; W1:=K2; W2:=OPEN-CLOSE; HT:=IFELSE(OPEN>CLOSE,OPEN,CLOSE); LT:=IFELSE(OPEN<CLOSE,OPEN,CLOSE); VAR3:=IF(DATE<990202,1,0); KWZ:=BARSLAST(CROSS(TMP,0)); DWZ:=BARSLAST(CROSS(0,TMP)); KKP:=REF(KPJ,KWZ); DKP:=REF(KPJ,DWZ); DRAWLINE(W1=1&&VAR3>0&&REF(C,KWZ)<KKP&&(REF(C,KWZ+1)<REF(KPJ,KWZ+1)||REF(C,KWZ)<REF(REF(L,KPW),KWZ)),HIGH,W1=1,HT,COLORCYAN); DRAWLINE(W1=1&&VAR3>0&&REF(C,KWZ)<KKP&&(REF(C,KWZ+1)<REF(KPJ,KWZ+1)||REF(C,KWZ)<REF(REF(L,KPW),KWZ)),LOW,W1=1,LT,COLORCYAN); STICKLINE(W1>0&&VAR3>0&&REF(C,KWZ)<KKP&&(REF(C,KWZ+1)<REF(KPJ,KWZ+1)||REF(C,KWZ)<REF(REF(L,KPW),KWZ)),OPEN,CLOSE,COLORCYAN,1); STICKLINE(W2>0&&W1>0&&VAR3>0&&REF(C,KWZ)<KKP&&(REF(C,KWZ+1)<REF(KPJ,KWZ+1)||REF(C,KWZ)<REF(REF(L,KPW),KWZ)),OPEN,CLOSE,COLORCYAN,0); DRAWLINE(TMP=1&&REF(TMP,1)=1&&VAR3>0,G,TMP=1&&REF(TMP,1)=1,REF(G,1),RGB(120,120,120)),DOT; DRAWSL(K2=1&&VAR3>0,G,0,1,0,RGB(120,120,120)),DOT; DRAWLINE(TMP=1&&REF(TMP,1)=1&&VAR3>0&&REF(C,KWZ)<KKP&&(REF(C,KWZ+1)<REF(KPJ,KWZ+1)||REF(C,KWZ)<REF(REF(L,KPW),KWZ)),G,TMP=1&&REF(TMP,1)=1,REF(G,1),COLORCYAN),DOT; DRAWSL(K2=1&&VAR3>0&&REF(C,KWZ)<KKP&&(REF(C,KWZ+1)<REF(KPJ,KWZ+1)||REF(C,KWZ)<REF(REF(L,KPW),KWZ)),G,0,1,0,COLORCYAN),DOT; STICKLINE(W1<=0&&VAR3>0&&REF(C,DWZ)>DKP&&(REF(H,DWZ+1)>REF(KPJ,DWZ+1)||REF(KPW,DWZ)<1),OPEN,CLOSE,COLORRED,1); STICKLINE(W2>0&&W1<=0&&VAR3>0&&REF(C,DWZ)>DKP&&(REF(H,DWZ+1)>REF(KPJ,DWZ+1)||REF(KPW,DWZ)<1),OPEN,CLOSE,COLORRED,0); DRAWLINE(W1=-3&&VAR3>0&&REF(C,DWZ)>DKP&&(REF(H,DWZ+1)>REF(KPJ,DWZ+1)||REF(KPW,DWZ)<1),HIGH,W1=-3,HT,COLORRED); DRAWLINE(W1=-3&&VAR3>0&&REF(C,DWZ)>DKP&&(REF(H,DWZ+1)>REF(KPJ,DWZ+1)||REF(KPW,DWZ)<1),LOW,W1=-3,LT,COLORRED); DRAWLINE(TMP=-3&&REF(TMP,1)=-3&&VAR3>0,G,TMP=-3&&REF(TMP,1)=-3,REF(G,1),RGB(120,120,120)),DOT; DRAWSL(K2=-3&&VAR3>0,G,0,1,0,RGB(120,120,120)),DOT; DRAWLINE(TMP=-3&&REF(TMP,1)=-3&&VAR3>0&&REF(C,DWZ)>DKP&&(REF(H,DWZ+1)>REF(KPJ,DWZ+1)||REF(KPW,DWZ)<1),G,TMP=-3&&REF(TMP,1)=-3,REF(G,1),COLORRED),DOT; DRAWSL(K2=-3&&VAR3>0&&REF(C,DWZ)>DKP&&(REF(H,DWZ+1)>REF(KPJ,DWZ+1)||REF(KPW,DWZ)<1),G,0,1,0,COLORRED),DOT; DRAWTEXT(CROSS(TMP,0)&&VAR3>0,HX,'ELL',FONTSIZE12,RGB(120,120,120); DRAWTEXT(CROSS(0,TMP)&&VAR3>0,LX,'UY',FONTSIZE12,RGB(120,120,120); DRAWTEXT(CROSS(TMP,0)&&VAR3>0&&REF(C,KWZ)<KKP&&(REF(C,KWZ+1)<REF(KPJ,KWZ+1)||REF(C,KWZ)<REF(REF(L,KPW),KWZ)),HX,'ELL',FONTSIZE18,COLORCYAN; DRAWTEXT(CROSS(0,TMP)&&VAR3>0&&REF(C,DWZ)>DKP&&(REF(H,DWZ+1)>REF(KPJ,DWZ+1)||REF(KPW,DWZ)<1),LX,'UY',FONTSIZE18,COLORYELLOW; KZY:=BARSLAST(REF(H,2)<REF(L,KWZ)&&KWZ<DWZ&&REF(C,1)>REF(H,2)&&(REF(H,2)>=REF(H,3)||REF(C,3)>REF(O,3))); DRAWTEXT(KZY>KWZ&&REF(H,1)<REF(L,KWZ)&&KWZ<DWZ&&C>REF(H,1)&&(REF(H,1)>=REF(H,2)||REF(C,2)>REF(O,2)),LX,'UY_STOP',FONTSIZE12,RGB(120,120,120); DRAWTEXT(KZY>KWZ&&REF(H,1)<REF(L,KWZ)&&KWZ<DWZ&&C>REF(H,1)&&(REF(H,1)>=REF(H,2)||REF(C,2)>REF(O,2))&&REF(C,KWZ)<KKP&&(REF(C,KWZ+1)<REF(KPJ,KWZ+1)||REF(C,KWZ)<REF(REF(L,KPW),KWZ)),LX,'UY_STOP',FONTSIZE12,COLORGREEN; DZY:=BARSLAST(REF(L,2)>REF(H,DWZ)&&DWZ<KWZ&&REF(C,1)<REF(L,2)&&(REF(L,2)<=REF(L,3)||REF(C,3)<REF(O,3))); DRAWTEXT(DZY>DWZ&&REF(L,1)>REF(H,DWZ)&&DWZ<KWZ&&C<REF(L,1)&&(REF(L,1)<=REF(L,2)||REF(C,2)<REF(O,2)),H,'ELL_STOP',FONTSIZE12,RGB(120,120,120); DRAWTEXT(DZY>DWZ&&REF(L,1)>REF(H,DWZ)&&DWZ<KWZ&&C<REF(L,1)&&REF(C,DWZ)>DKP&&(REF(H,DWZ+1)>REF(KPJ,DWZ+1)||REF(KPW,DWZ)<1)&&(REF(L,1)<=REF(L,2)||REF(C,2)<REF(O,2)),H,'ELL_STOP',FONTSIZE12,COLORYELLOW; VAR3<1&&DATE>REF(DATE,1),WORD(1,'過期！微信:XIHUIGUOJI'; DRAWCOLORKLINE(TMP>0&&C>=O,COLORCYAN,1); DRAWCOLORKLINE(TMP>0&&C<O,COLORCYAN,1);