改為文華

作者：文華財經來源：cxh99.com 發布時間：2019年05月28日

咨詢內容： ?{分時控盤}VAR1:=EMA(EMA(CLOSE,13),13);控盤:=(VAR1-REF(VAR1,1))/REF(VAR1,1)*1000;STICKLINE(控盤<0,控盤,0,1,1),COLOR00FF00;STICKLINE(控盤>REF(控盤,1) AND 控盤<0,控盤,0,1,1),COLORFF00FF;無莊控盤:=控盤<0;STICKLINE(控盤>REF(控盤,1) AND 控盤>0,控盤,0,1,1),COLOR0000FF;有莊控盤:=控盤>REF(控盤,1) AND 控盤>0;VAR2:=100*WINNER(CLOSE*0.95);STICKLINE(控盤<REF(控盤,1) AND 控盤>0,控盤,0,1,1),COLORFFFF00;主力出貨:=控盤<REF(控盤,1) AND 控盤>0;STICKLINE(VAR2>50 AND COST(85)<CLOSE AND 控盤>0,控盤,0,1,1),COLOR00FFFF;高度控盤: VAR2>50 AND COST(85)<CLOSE AND 控盤>0,COLOR00FFFF,LINETHICK2;A10:=CROSS(控盤,0);控盤B:=FILTER(IF(A10,1,0),5);{分時價格原碼}JJ:=DYNAINFO(11);{波段買賣原碼}P:=55;S:=8;M1:=3;財:=(EMA(CLOSE,S)-EMA(CLOSE,P))*10,COLORRED,LINETHICK2;神:=EMA(財,M1),COLORGREEN,LINETHICK1;DRAWBAND(財,RGB(255,0,0),神,RGB(0,100,50));{股價與均線偏離買賣條件}BTJ1:=(C-JJ)/JJ<-0.005;BTJ11:=(C-JJ)/JJ<-0.03;BTJ12:=LAST(JJ>=REF(JJ,1),5,1) AND (C-JJ)/JJ<0.005;STJ1:=(C-JJ)/JJ>0.005;{控盤買賣條件}STJ01:=控盤<REF(控盤,1) AND 控盤>0.5;STJ02:=控盤>0;BTJ2:=控盤>REF(控盤,1) AND 控盤<-0.2;BTJ22:=控盤>REF(控盤,1) AND 控盤<0 ;{波段買賣條件}BTJ3:=CROSS(財,神) AND 財<-0.3;BTJ32:=CROSS(財,神) AND 財<-0.1;STJ31:=CROSS(神,財);STJ32:=CROSS(神,財) AND 財>1.618;{以下為信號};BTJ81:=FILTER(BTJ1 AND BTJ2 AND BTJ3,13);BTJ811:=FILTER(BTJ11 AND BTJ2 AND BTJ3,13);BTJ82:=FILTER(BTJ12 AND BTJ22 AND BTJ32,13);DRAWICON(BTJ82,神,23);{追買};DRAWICON(BTJ81 AND TIME>10,神,27);{};DRAWICON(BTJ811 AND TIME>10,神,26);{有莊};DRAWTEXT(BTJ81,神,'),COLORRED;DRAWTEXT(BTJ811,神*1.2,'有莊'),COLORWHITE;STJ81:=FILTER(STJ1 AND STJ01 AND STJ31,13);DRAWICON(STJ81,神,19);STJ82:=FILTER(STJ02 AND STJ32 ,13);DRAWICON(STJ82,神,15);STJ83:=STJ81 AND STJ82;DRAWTEXT(STJ83,神,'必賣'),COLOR00FF00;?
?
?來源:程序化99
文華技術人員： 不同軟件機制不同，加載效果可能略有差異，參考：
VAR1:=EMA(EMA(CLOSE,13),13); 控盤:=(VAR1-REF(VAR1,1))/REF(VAR1,1)*1000; STICKLINE1(控盤<0,控盤,0,1,1),COLOR00FF00; STICKLINE1(控盤>REF(控盤,1) AND 控盤<0,控盤,0,1,1),COLORFF00FF; 無莊控盤:=控盤<0; STICKLINE1(控盤>REF(控盤,1) AND 控盤>0,控盤,0,1,1),COLOR0000FF; 有莊控盤:=控盤>REF(控盤,1) AND 控盤>0; VAR2:=100*WINNER(CLOSE*0.95); STICKLINE1(控盤<REF(控盤,1) AND 控盤>0,控盤,0,1,1),COLORFFFF00; 主力出貨:=控盤<REF(控盤,1) AND 控盤>0; STICKLINE1(VAR2>50 AND COST(85)<CLOSE AND 控盤>0,控盤,0,1,1),COLOR00FFFF; 高度控盤: VAR2>50 AND COST(85)<CLOSE AND 控盤>0,COLOR00FFFF,LINETHICK2; A10:=CROSS(控盤,0); 控盤B:=FILTER(IF(A10,1,0),5); //{分時價格原碼} JJ:=REFX1(AVPRICE,10000); //{波段買賣原碼} P:=55; S:=8; M1:=3; 財:=(EMA(CLOSE,S)-EMA(CLOSE,P))*10,COLORRED,LINETHICK2; 神:=EMA(財,M1),COLORGREEN,LINETHICK1; FILLRGN(財>=神,財,神,RGB(255,0,0)); FILLRGN(財<神,財,神,RGB(0,100,50)); //{股價與均線偏離買賣條件} BTJ1:=(C-JJ)/JJ<-0.005; BTJ11:=(C-JJ)/JJ<-0.03; BTJ12:=LAST(JJ>=REF(JJ,1),5,1) AND (C-JJ)/JJ<0.005; STJ1:=(C-JJ)/JJ>0.005; //{控盤買賣條件} STJ01:=控盤<REF(控盤,1) AND 控盤>0.5; STJ02:=控盤>0; BTJ2:=控盤>REF(控盤,1) AND 控盤<-0.2; BTJ22:=控盤>REF(控盤,1) AND 控盤<0 ; //{波段買賣條件} BTJ3:=CROSS(財,神) AND 財<-0.3; BTJ32:=CROSS(財,神) AND 財<-0.1; STJ31:=CROSS(神,財); STJ32:=CROSS(神,財) AND 財>1.618; //{以下為信號}; BTJ81:=FILTER(BTJ1 AND BTJ2 AND BTJ3,13); BTJ811:=FILTER(BTJ11 AND BTJ2 AND BTJ3,13); BTJ82:=FILTER(BTJ12 AND BTJ22 AND BTJ32,13); DRAWICON(BTJ82,神,23);//{追買}; DRAWICON(BTJ81 AND TIME>10,神,27);//{}; DRAWICON(BTJ811 AND TIME>10,神,26);//{有莊}; DRAWTEXT(BTJ81,神,'底',COLORRED; DRAWTEXT(BTJ811,神*1.2,'莊',COLORWHITE; STJ81:=FILTER(STJ1 AND STJ01 AND STJ31,13); DRAWICON(STJ81,神,19); STJ82:=FILTER(STJ02 AND STJ32 ,13); DRAWICON(STJ82,神,15); STJ83:=STJ81 AND STJ82; DRAWTEXT(STJ83,神,'賣',COLOR00FF00;