咨詢內容:
?VAR22:=(CLOSE-LLV(LOW,27))/(HHV(HIGH,27)-LLV(LOW,27))*100;獲利盤: WINNER(CLOSE)*100;VAR33:=SMA(VAR22,3,1);VAR44:=SMA(VAR33,9,1);VAR55:=3*VAR33-2*VAR44;VAR66:=VOL;量比: VOL/MA(VOL,5);漲跌: (CLOSE-REF(CLOSE,1))/REF(CLOSE,1)*100;角度: (CLOSE-REF(OPEN,29))/REF(OPEN,29)*100;換手: VOL/CAPITAL*100;VAR77:=SUM(換手,30);VAR88:=LLV(INDEXL,5);VAR99:=HHV(INDEXH,5);VARAA:=EMA((INDEXC-VAR88)/(VAR99-VAR88)*100,4);VARBB:=MA(EMA(0.667*REF(VARAA,1)+0.333*VARAA,2),9);VARCC:=MA(VARBB,50);VARDD:=EMA(獲利盤,4);本盤億股: CAPITAL/1000000,;V5: MA(VOL,5)*2;VARE:=MA(V5,3);V34: MA(VOL,18)*2;VARF:=(漲跌>VARDD AND 角度<-30 AND 漲跌>3);CROSS(VARBB,VARCC) AND VARCC<29;CROSS(VARCC,VARBB) AND VARCC>58;STICKLINE(VOL AND VAR33>VAR44,0,VOL,3,1),COLORRED;STICKLINE(VOL AND VAR33<=VAR44,0,VOL,3,1),COLORCYAN;DRAWTEXT(CROSS(VARBB,VARCC) AND 角度<-18 AND VARCC<29,VOL*1.2,' ',COLORYELLOW;W:DRAWTEXT(CROSS(VARCC,VARBB) AND VARCC>58,VOL*1.2,'',COLORWHITE;DRAWTEXT(CROSS(VARE,V5) AND 角度>22,V5,'lt;----';VAR2:=CLOSE-REF(CLOSE,1);VAR3:=IF(CLOSE-REF(CLOSE,1)>=0,VAR2,0);VAR4:=REF(CLOSE,1)-CLOSE;VAR5:=IF(CLOSE-REF(CLOSE,1)<=0,VAR4,0);VAR6:=SUM(VAR3,16)/SUM(VAR5,16);VAR7:=100-100/(1+VAR6);VAR8:=EMA(VAR7,16);VAR9:=EMA(VAR8,8);VARA:=EMA(VAR8,45);MO:=(VAR8-VARA);ML:=(VAR9-VARA);VAR1A:=EMA(CLOSE,32);
量能:=V/REF(V,1);漲幅:=REF(C,1)/REF(C,8);振幅:=HHV(REF(C,1),12)/LLV(REF(C,1),12);BUYPOINT:量比>=2.70 AND C>REF(C,1) AND COUNT(REF(C/O>=1.095,1),8)<1AND 振幅<=1.10 AND C/O>=1 AND 漲幅>=0.9 AND COUNT(REF(C/O>=1.04,1),8)<1AND COUNT(REF(C/O<=0.95,1),8)<1,LINETHICK2;
請老師幫助改寫成文華日內模型早上9.00分至14.55分,紅色柱狀買開,綠色柱狀賣出;謝謝;
?
?來源:程序化99
文華技術人員:參考: ?VAR22:=(CLOSE-LLV(LOW,27))/(HHV(HIGH,27)-LLV(LOW,27))*100;獲利盤: WINNER(CLOSE)*100;VAR33:=SMA(VAR22,3,1);VAR44:=SMA(VAR33,9,1);VAR55:=3*VAR33-2*VAR44;VAR66:=VOL;量比: VOL/MA(VOL,5);漲跌: (CLOSE-REF(CLOSE,1))/REF(CLOSE,1)*100;角度: (CLOSE-REF(OPEN,29))/REF(OPEN,29)*100;CAPITAL:=GETPRICE1('流通股本');換手:=VOL/CAPITAL*100;VAR77:=SUM(換手,30);INDEXC:="999001$CLOSE";INDEXL:="999001$LOW";INDEXH:="999001$HIGH";?INDEXO:="999001$OPEN";?VAR88:=LLV(INDEXL,5);VAR99:=HHV(INDEXH,5);VARAA:=EMA((INDEXC-VAR88)/(VAR99-VAR88)*100,4);VARBB:=MA(EMA(0.667*REF(VARAA,1)+0.333*VARAA,2),9);VARCC:=MA(VARBB,50);VARDD:=EMA(獲利盤,4);本盤億股:=CAPITAL/10000;V5: MA(VOL,5)*2;VARE:=MA(V5,3);V34: MA(VOL,18)*2;VARF:=(漲跌>VARDD AND 角度<-30 AND 漲跌>3);STICKLINE(VAR33>VAR44,0,VOL,COLORRED,0);STICKLINE(VAR33<=VAR44,0,VOL,COLORCYAN,1); DRAWTEXT(CROSS(VAR33>VAR44,0.5),VOL,'買 '),COLORGREEN;DRAWTEXT(CROSS(VAR33<=VAR44,0.5),VOL,'賣'),COLORMAGENTA; DRAWTEXT(CROSS(VARBB,VARCC) AND 角度<-18 AND VARCC<29,VOL*1.2,'買 '),COLORYELLOW;DRAWTEXT(CROSS(VARCC,VARBB) AND VARCC>58,VOL*1.2,'賣'),COLORWHITE;DRAWTEXT(CROSS(VARE,V5) AND 角度>22,V5,'<----'); 量能:=V/REF(V,1);漲幅:=REF(C,1)/REF(C,8);振幅:=HHV(REF(C,1),12)/LLV(REF(C,1),12);BUYPOINT:=量比>=2.70 AND C>REF(C,1) AND COUNT(REF(C/O>=1.095,1),8)<1AND 振幅<=1.10 AND C/O>=1 AND 漲幅>=0.9 AND COUNT(REF(C/O>=1.04,1),8)<1AND COUNT(REF(C/O<=0.95,1),8)<1,LINETHICK2;