大智慧免費版 【短線買賣】全部源碼+【紅色主圖】部分源碼
+【BOLL主圖 】部分源碼（培油組合版）
variable:p1=0;
DRAWTEXTABS(30,0,BKNAME ),colorDDDDDD;
DRAWTEXTABS(30,15,'流通盤：'+CAPITAL/100+'萬股，利潤增長：'+FINANCE2(10)+'%。每股收益：'+FINANCE2(3)+'元。' ),color00DDDD;
DRAWTEXTABS(30,30,'B買入，S賣出，紅粉柱關(guān)注。' ),colorFFDD00;
CB:cyc(5),colorFF9999,linethick1;
c,color0066FF,linethick1;
C13:cyc(13),color009900;
成本:=cb;
收盤價:=c;
偏離度:(成本-c)/c*100,linethick0,color1166FF;
DRAWTEXT(cross(收盤價,成本) and count(cross(收盤價,成本),6)>1,c ,'B' ),color00FFFF;
DRAWTEXT(cross(成本,收盤價),o ,'S' ),colorFFFFFF;
stickline(c>o,l,h,0.1,0),color003366;
stickline(c>o,o,c,7,0),color0033BB;
stickline(c<o,l,h,0.1,0),color339900;
stickline(c<o,c,o,7,0),color33BB00;
stickline(cross(收盤價,成本),o,C ,7,0 ),colorFF00FF;
stickline(cross(收盤價,成本),o,o+(C-o)*0.50 ,7,0 ),color0000FF;
{蓋印}
DRAWRECTABS(0,0,30,35,rgb(250,60,80)),color000099;
DRAWRECTABS(0,30,30,45,rgb(250,250,80)),color009999;
DRAWTEXTABS(2,5,'楊軟'),colorFFFFFF,LINETHICK1;
DRAWTEXTABS(2,18,'自創(chuàng)'),colorFFFFFF,LINETHICK1;
DRAWTEXTABS(2,30,'首選'),color0000FF,LINETHICK1;
RSV:=(C-LLV(L,9))/(HHV(H,9)-LLV(L,9))*100;
K:=SMA(RSV,3,1);
D:=SMA(K,3,1);
J:=3*K-2*D;
TT2:=DMA((((HIGH + LOW) + (CLOSE * 2)) / 4.15),0.9);
TT1:=REF(EMA(TT2,3),1);
DRAWTEXT(CROSS(CLOSE,TT1)AND J<55,LOW,'買'),COLORRED;
LC:=REF(CLOSE,1);
RSI:=((SMA(MAX((CLOSE - LC),0),3,1) / SMA(ABS((CLOSE - LC)),3,1)) * 100);
DRAWTEXT(CROSS(88,RSI),HIGH * 1.02,'頂'),COLOR00FFFF;
DRAWTEXT(CROSS(80,RSI),HIGH * 1.02,'逃'),COLOR00FFFF;
X:=LLV(J,2)=LLV(J,8);
Y:=IF(CROSS(J,REF(J+0.01,1)) AND X AND J<20,30,0);
DRAWTEXT(CROSS(J,REF(J+0.01,1)) AND X AND J<20,LOW,'短進'),COLORFF00FF;
DRAWTEXT((MA(CLOSE,13) > MA(CLOSE,18)) AND CROSS(CLOSE,MA(CLOSE,4)) AND (MA(CLOSE,4) < MA(CLOSE,13)),(LOW)*(0.97),'贏'),COLOR00FF00;
VAR1:=4*SMA((CLOSE-LLV(LOW,5))/(HHV(HIGH,5)-LLV(LOW,5))*100,5,1)-
3*SMA(SMA((CLOSE-LLV(LOW,5))/(HHV(HIGH,5)-LLV(LOW,5))*100,5,1),3.2,1);
VAR2:=8;
CC:=CROSS(VAR1,VAR2);
DRAWTEXT(CC,L*0.98,'買！'),COLOR0099FF;
DSLX:=(CLOSE / INDEXC);
DSLX1:=MA(DSLX,5);
DSLX2:=MA(DSLX,10);
V1:=MA(VOL,5);
V2:=MA(VOL,10);
A4:=MA(CLOSE,20);
A5:=(CLOSE > MA(CLOSE,5));
A6:=(MA(CLOSE,5) > MA(CLOSE,10));
A7:=(CLOSE > MA(CLOSE,10));
A8:=(MA(CLOSE,5) > MA(CLOSE,20));
A9:=(CLOSE > MA(CLOSE,20));
A10:=REF(A4,1);
A11:=(A4 > A10);
AVX:=(((((IF(A5,10,(0 - 10)) + IF(A6,10,(0 - 10))) + IF(A7,10,(0 - 10))) + IF(A8,10,(0 - 10))) + IF(A9,10,(0 - 10))) + IF(A11,10,(0 - 10)));
k2:=hhv(h,barslast(DISPSTATUS=1)+1);
TJTS1:=BARSTATUS=2 and c<200;
TJTS2:=BARSTATUS=2 and c>200;
DRAWTEXT(TJTS1 and ((CROSS(AVX,1) AND (V1 < V2)) AND (DSLX >= DSLX1)) ,k2*0.99,'該股雖然走勢趨強，但量能還顯不足，可以考慮短線進場，倉位在1/2左右。 '),ALIGN2,colorDC143C;
DRAWTEXT(TJTS1 and ((CROSS(AVX,1) AND (V1 > V2)) AND (DSLX < DSLX1)) ,k2*0.99,'該股量價配合良好，但相對其它股票并沒有明顯走強，可以考慮短線進場，倉位1/2左右。 '),ALIGN2,colorDC143C;
DRAWTEXT(TJTS1 and ((CROSS(AVX,1) AND (V1 <= V2)) AND (DSLX < DSLX1)) ,k2*0.99,'該股形態(tài)尚可，但量能不足，股票也未完全走強，可以短線進場，，倉位1/3左右。 '),ALIGN2,color0000FF;
DRAWTEXT(TJTS2 and (CROSS(AVX,1) AND (V1 < V2)) ,k2*0.98,' 可以考慮短線進場，倉位在1/2左右，一旦量能放大可以加倉買入。 '),ALIGN2,color0000FF;
DRAWTEXT(TJTS2 and (CROSS(AVX,1) AND (V1 >= V2)) ,k2*0.99,'大盤量能理想，有明顯走強跡象，可以考慮中線進場參與，倉位在2/3左右， '),ALIGN2,color0000FF;
DRAWTEXT(TJTS2 and (CROSS(AVX,1) AND (V1 >= V2)) ,k2*0.99,'大盤量能理想，有明顯走強跡象，可以考慮中線進場參與，倉位在2/3左右， '),ALIGN2,color0000FF;
