|
成本型帶量攻擊 input:N1(5,0,100),N2(13,0,100),N3(34,0,100); VAR0:=(REF(HIGH,1) * AMOUNT); VAR1:=(REF(HIGH,10) * AMOUNT); VAR2:=(HIGH * 1.01); VAR3:=(((VAR2 * VOL) + (VAR1 * (CAPITAL - VOL))) / CAPITAL); VAR4:=(REF(LOW,1) * 0.9); VAR5:=(LOW * 0.9); VAR6:=(((VAR5 * VOL) + (VAR4 * (CAPITAL - VOL))) / CAPITAL); VAR7:=EMA(VAR6,10); VAR8:=EMA(VAR3,30); VAR9:=((VAR8 * 3) + 2); VARA:=IF((CLOSE <= VAR7),VAR9,VAR8); PP:=((VAR8 * 3) + 2); QQ:=IF((VARA = PP),9,0); DRAWTEXT(FILTER(QQ,21),(LOW - 0.2),'熱身'),ALIGN0,colorFF; MFQ:=(FILTER(QQ,21) = 1); jj:=(AMOUNT / (100 * VOL)); 吸籌成本:COST(LLV((LOW * 0.191),21)),colorFF00FF; 短線成本:EMA(jj,N1),colorFF00; 中線成本:EMA(jj,N2),colorFFFF; 長線成本:EMA(jj,N3),colorFFFF00; 無窮成本:DMA(CLOSE,(VOL / CAPITAL)); 關注點選股:=FILTER((CROSS(短線成本,中線成本) AND (MA(CLOSE,3) > MA(CLOSE,5))),21); DRAWTEXT(關注點選股,(LOW - 0.188),'增量'),ALIGN2,colorFF00FF; CB:=INTPART(SMA((VOL * CLOSE),3,1)); 三日均量:=INTPART(SMA((VOL * CLOSE),5,1)); 五日均量:=INTPART(SMA((VOL * CLOSE),10,1)); 十日均量:=INTPART(((CLOSE * VOL) - REF(五日均量,1))); 能量選股:(FILTER(((CROSS(十日均量,CB) AND (CB > 三日均量)) AND (MA(CLOSE,3) > MA(CLOSE,5))),21) = 1),LINETHICK0,colorFF; DRAWICON((能量選股 AND (MA(CLOSE,3) > MA(CLOSE,5))),LOW,12); DRAWTEXT((能量選股 AND (MA(CLOSE,3) > MA(CLOSE,5))),(LOW - 0.13013),'★帶量攻擊'),ALIGN0,colorFFFF; 能量增減:=((VOL * (((OPEN + CLOSE) + LOW) + HIGH)) / 400000); A:=REF(CLOSE,1); LC:=((SMA(MAX((CLOSE - A),0),N1,1) / SMA(ABS((CLOSE - A)),N1,1)) * 100); P1:=((SMA(MAX((CLOSE - A),0),N2,1) / SMA(ABS((CLOSE - A)),N2,1)) * 100); P2:=((SMA(MAX((CLOSE - A),0),N3,1) / SMA(ABS((CLOSE - A)),N3,1)) * 100); P3:=EMA(能量增減,10); MA10:=EMA(能量增減,30); MA30:=(CROSS("KDJ.J",P3) AND ((CLOSE / REF(CLOSE,1)) > 0.91)); SG:=(CROSS("KDJ.J",MA10) AND ((CLOSE / REF(CLOSE,1)) > 0.91)); XG:=(CROSS(LC,P1) AND ((CLOSE / REF(CLOSE,1)) > 0.91)); SG1:=(CROSS(P1,P2) AND ((CLOSE / REF(CLOSE,1)) > 0.91)); SG2:=(CROSS(LC,P2) AND ((CLOSE / REF(CLOSE,1)) > 0.91)); SG3:=FILTER((MA30 AND SG),10); JS:=FILTER((XG AND SG1),10); JC:=(SG3 AND JS); DRAWICON(FILTER(JC,10),LOW,10); DRAWICON(FILTER(JS,10),LOW,1); DRAWICON(FILTER(SG3,10),LOW,4); DRAWTEXT(SG3,(LOW - 0.02118),'奇襲'),colorFF00; [ 本帖最后由 蝶戀花 于 2006-1-24 21:53 編輯 ]股票論壇 www.55188.com |
|
|
