奇狐社區論壇 (http://www.chiefox.com.tw/bbs/index.php)
- 問題交流 (http://www.chiefox.com.tw/bbs/forumdisplay.php?forumid=28)
-- [問題] (http://www.chiefox.com.tw/bbs/showthread.php?threadid=9477)

[問題]

請各位版大,高手幫幫忙....謝謝!!

__________________
jeme

回覆: [問題]

引用:

---

最初由 b551559 發表
請各位版大,高手幫幫忙....謝謝!!

RSV:=(CLOSE-LLV(LOW,8))/(HHV(HIGH,7)-LLV(LOW,7))*100;
短K:SMA(RSV,3,1),colorwhite;
短D:SMA(短K,3,1),coloryellow;
RSV1:=(CLOSE-LLV(LOW,38))/(HHV(HIGH,38)-LLV(LOW,38))*100;
長K:SMA(RSV1,3,1),colorred;
長D:SMA(長K,10,1),COLOR66CC33;
{stickline(短K>短D,短K,短D,3,0),coloryellow;}
{STICKLINE(短K<=短D,短K,短D,3,0),colorgreen;}
{STICKLINE(長K>長D,長K,長D,3,0),colorred;}
{STICKLINE(長K<=長D,長K,長D,3,0),COLOR669933;}
FILLRGN(長K>長D,長K,長D),colorred;
FILLRGN(長K<=長D,長K,長D),COLOR8900;
FILLRGN(短K>短D,短K,短D),COLORMAGENTA;
FILLRGN(短K<=短D,短K,短D),colorgreen;
//
VARC:=(ZIG(3,5)>REF(ZIG(3,5),1)) AND (REF(ZIG(3,5),1) <=REF(ZIG(3,5),2))AND (REF(ZIG(3,5),2)<=REF(ZIG(3,5),3));
z1:VARC,linethick0;
中短線:=VARC=1;
BIAS :=(CLOSE-MA(CLOSE,5))/MA(CLOSE,5)*100;
BIASMA :=MA(BIAS,5);
乖離率錢龍版:=(CROSS(BIAS,BIASMA));
VAR1:=TROUGHBARS(3,15,1)<10;
VAR2:=IF(VAR1=1,50,0);
底部:=IF(VAR2=50,10,0);
買入:=IF(底部=10 AND REF(底部,1)=10 AND REF(底部,2)=0,50,0);//,COLOR0000cc,linethick0;
拚死進:=(中短線 AND 乖離率錢龍版 AND 買入);
STICKLINE(拚死進,100,0,3,0),COLORYELLOW;
DRAWTEXT(拚死進,100,'買進'),COLORRED;
VarF:=前M個波谷位置(3,15,1)<4;
畫柱線(信號過濾(VarF=1,5),100,0,3,0)colorblue;
畫圖示(信號過濾(VarF=1,5),10,6);
//
VARD:=(ZIG(3,5)<REF(ZIG(3,5),1)) AND (REF(ZIG(3,5),1) >=REF(ZIG(3,5),2))AND (REF(ZIG(3,5),2)>=REF(ZIG(3,5),3));
VAR3:=PEAKBARS(3,15,1)<10;
VAR4:=IF(VAR3=1,50,0);
峰部:=IF(VAR4=50,100,0);

賣:=IF(峰部=100 and REF(峰部,1)=100 and REF(峰部,2)=0,100,50);//,COLORred,linethick0;//賣//
VarF1:=前M個波峰位置(3,15,1)<4;
畫柱線(信號過濾(VarF1=1,5),100,0,2,0),COLORCYAN;
畫圖示(信號過濾(VarF1=1,5),100,7);

STICKLINE((VARC=1),(-2),40,3,0),Color0000FF;
DRAWTEXT((VARC=1),(-2),'買'),Color0000FF;
STICKLINE((VARD=1),60,100,2,0),Color00FF00;
DRAWTEXT((VARD=1),100,'賣'),Color00FF00;

有些股票沒有信號請幫忙修改 謝謝!!

---