奇狐社區論壇 (http://www.chiefox.com.tw/bbs/index.php)
- 問題交流 (http://www.chiefox.com.tw/bbs/forumdisplay.php?forumid=28)
-- 請問K線程式寫法? (http://www.chiefox.com.tw/bbs/showthread.php?threadid=8242)

請問K線程式寫法?

請教各位大大以下K線程式寫法? 感激不盡!

1.以每日收盤價為主.
2.漲過前兩根的相對高點用紅色畫.
3.跌破前兩根的相對低點用綠色畫.
4.由紅轉綠秀出"賣出信號".
5.由綠轉紅秀出"買進信號".

範例如附件.

__________________
Mark Huang

回覆: 請問K線程式寫法?

引用:

---

最初由 stechmark 發表
請教各位大大以下K線程式寫法? 感激不盡!

1.以每日收盤價為主.
2.漲過前兩根的相對高點用紅色畫.
3.跌破前兩根的相對低點用綠色畫.
4.由紅轉綠秀出"賣出信號".
5.由綠轉紅秀出"買進信號".

範例如附件.

---

感謝L0123大大回覆:

很抱歉沒說明清楚.

1.以每日收盤價為主.
2.漲過前兩根的相對高點用紅色畫 , 未跌破前兩根的相對低點繼續用紅色畫.(今日收盤價至前一日收盤價)
3.跌破前兩根的相對低點用綠色畫 , 未漲過前兩根的相對高點繼續用綠色畫..(今日收盤價至前一日收盤價)
4.由紅轉綠秀出"賣出信號".
5.由綠轉紅秀出"買進信號".

請參考附圖. Thanks!!!

__________________
Mark Huang

引用:

---

最初由 stechmark 發表
感謝LO123大大回覆:

很抱歉沒說明清楚.

1.以每日收盤價為主.
2.漲過前兩根的相對高點用紅色畫 , 未跌破前兩根的相對低點繼續用紅色畫.
3.跌破前兩根的相對低點用綠色畫 , 未漲過前兩根的相對高點繼續用綠色畫.
4.由紅轉綠秀出"賣出信號".
5.由綠轉紅秀出"買進信號".

請參考附圖. Thanks!!!

---

依所述條件撰寫
HH:=MAX(REF(H,1),REF(H,2));
LL:=MIN(REF(L,1),REF(L,2));
VAR1:=CROSS(C,HH);
VAR2:=CROSS(LL,C);
VAR3:=IF(VAR1,1,IF(VAR2,-1,0));
VAR4:=REF(VAR3,BARSLAST(VAR3));
STICKLINE(CROSS(VAR4,0),REF(C,1),C,8,0),COLORGREEN;
STICKLINE(CROSS(VAR4,0),HH,C,8,0),COLORRED;
STICKLINE(REF(VAR4,1)=1 AND VAR4=1,REF(C,1),C,8,0)COLORRED;
STICKLINE(CROSS(0,VAR4),REF(C,1),C,8,0),COLORRED;
STICKLINE(CROSS(0,VAR4),LL,C,8,0),COLORGREEN;
STICKLINE(REF(VAR4,1)=-1 AND VAR4=-1,REF(C,1),C,8,0),COLORGREEN;

__________________
E-Trader World 交易世界、
Plurk、
Facebook、
Twitter
(EQ:情緒智商) & (HD:習慣領域)才是主導成功交易的重要關鍵。
「存於一個人自身的真相非常簡單，然而人們卻總是追求深奧的真理。」，金融交易亦是如此。

引用:

---

最初由 king 發表
依所述條件撰寫
HH:=MAX(REF(H,1),REF(H,2));
LL:=MIN(REF(L,1),REF(L,2));
VAR1:=CROSS(C,HH);
VAR2:=CROSS(LL,C);
VAR3:=IF(VAR1,1,IF(VAR2,-1,0));
VAR4:=REF(VAR3,BARSLAST(VAR3));
STICKLINE(CROSS(VAR4,0),REF(C,1),C,8,0),COLORGREEN;
STICKLINE(CROSS(VAR4,0),HH,C,8,0),COLORRED;
STICKLINE(REF(VAR4,1)=1 AND VAR4=1,REF(C,1),C,8,0)COLORRED;
STICKLINE(CROSS(0,VAR4),REF(C,1),C,8,0),COLORRED;
STICKLINE(CROSS(0,VAR4),LL,C,8,0),COLORGREEN;
STICKLINE(REF(VAR4,1)=-1 AND VAR4=-1,REF(C,1),C,8,0),COLORGREEN;

---

回覆: 請問K線程式寫法?

AA:=C;
//收盤
BB:=C>REF(H,2);
//收盤漲過前兩天的相對高點
CC:=C<REF(L,2);
//收盤跌破前兩天的相對低點
STICKLINE(BB,C,O,8,0),COLORRED;
//收盤漲過前兩天的相對高點用紅色畫表示:多方控盤
STICKLINE(BB,H,L,0,0),COLORRED;
STICKLINE(CC,C,O,8,0),COLORGREEN;
//收盤跌破前兩天的相對低點用綠色畫表示:空方控盤
STICKLINE(CC,H,L,0,0),COLORGREEN;
STICKLINE(C>REF(C,1) AND C < REF(H,2),C,O,8,0),COLORYELLOW;
//收盤大於昨天收盤但未漲過前兩天的相對高點用黃色畫表示:盤整小心空翻多
STICKLINE(C>REF(C,1) AND C < REF(H,2),H,L,0,0),COLORYELLOW;
STICKLINE(C<REF(C,1) AND C > REF(L,2),C,O,8,0),COLORYELLOW;
//收盤小於昨天收盤但未跌破前兩根的相對低點用黃色畫表示:盤整小心多翻空
STICKLINE(C<REF(C,1) AND C > REF(L,2),H,L,0,0),COLORYELLOW;
DRAWICON(CROSS(AA,REF(H,2)) AND BB ,L/1.003,4);
//收盤漲過前兩天的相對高點:買進訊號及加碼訊號
DRAWICON(CROSS(REF(L,2),AA) AND CC ,H*1.003,5);
//收盤跌破前兩天的相對低點:賣出訊號或加空訊號
STICKLINE(CROSS(AA,REF(H,2)) AND BB,REF(H,2),REF(H,2),8,0),LINETHICK2,COLORWHITE;
DRAWNUMBER(CROSS(AA,REF(H,2)) AND BB,L/1.009,REF(H,2),0),COLORWHITE;
//轉多關鍵價
STICKLINE(CROSS(REF(L,2),AA) AND CC,REF(L,2),REF(L,2),8,0),LINETHICK2,COLORWHITE;
DRAWNUMBER(CROSS(REF(L,2),AA) AND CC,H*1.009,REF(L,2),0),COLORWHITE;
//轉空關鍵價

__________________
人外有人 天外有天 不懼不貪 亦富亦安

感謝各位大大指導 , 但與我要的仍有不同.

說明不清造成各位大大誤解 , 重新說明如下:

1. 以每日收盤價(CLOSE)畫線. (不看OPEN , HIGH , LOW).
2. 漲過前兩根的相對高點(CLOSE 非 HIGH)用紅色畫 , 未跌破前兩根的相對低點(CLOSE 非 LOW)繼續用紅色畫 , 只看最近三根K線 , 其餘的不管.
3. 跌破前兩根的相對低點(CLOSE 非 LOW)用綠色畫 , 未漲過前兩根的相對高點(CLOSE 非 HIGH)繼續用綠色畫 , 只看最近三根K線 , 其餘的不管.
4. 由紅轉綠秀出"賣出信號".
5. 由綠轉紅秀出"買進信號".

詳見附圖. Thanks!!!

__________________
Mark Huang

x1:=c>max(ref(C,1),ref(C,2));xx:=c<=max(ref(C,1),ref(C,2)) and c>=min(ref(C,1),ref(C,2));
x2:=ref(x1,1)=1 and xx=1;x3:=ref(x2,1)=1 and xx=1;
x0:x1 or x2 or x3,linethick0;
stickline(x0,c,ref(c,1),10,0),colorred;
y1:=c<min(ref(C,1),ref(C,2));yy:=c>=min(ref(C,1),ref(C,2)) and c<=max(ref(C,1),ref(C,2));
y2:=ref(y1,1)=1 and yy=1;y3:=ref(y2,1)=1 and yy=1;
y0:y1 or y2 or y3,linethick0;
stickline(y0,c,ref(c,1),10,0),colorgreen;
drawicon(x0=1 and ref(y0,1)=1,min(c,ref(c,1)),4),align0,pxdn20;
drawicon(y0=1 and ref(x0,1)=1,max(c,ref(c,1)),5),align0,pxup20;
c,colorwhite;

感謝各位大大教導

奇狐社區論壇臥虎藏龍人才輩出 , 且都願意與大家分享 , 願意教導新人程式技巧.

當然更證明奇狐勝券是一套很好的軟體 , 可依照自己的需求來設計程式.

感謝kkkkkk大大 , 結果是我想要的 , 獲益無窮. Thanls!!!

祝 大家操盤順利賺大錢!!!

__________________
Mark Huang

引用:

---

最初由 stechmark 發表
感謝各位大大教導

奇狐社區論壇臥虎藏龍人才輩出 , 且都願意與大家分享 , 願意教導新人程式技巧.

當然更證明奇狐勝券是一套很好的軟體 , 可依照自己的需求來設計程式.

感謝kkkkkk大大 , 結果是我想要的 , 獲益無窮. Thanls!!!

祝 大家操盤順利賺大錢!!!

---

我能不能順個水順便問一下
如果我條件相同,但要改成最高價跟最低價

2.最高價漲過前兩根的相對高點用紅色畫.
3.最低價跌破前兩根的相對低點用綠色畫.
4.由紅轉綠秀出"賣出信號".
5.由綠轉紅秀出"買進信號".

如果是這樣的話該怎麼寫呢??試了許久都試不完全

請大大再小修正

引用:

---

最初由 kkkkkk 發表
x1:=c>max(ref(C,1),ref(C,2));xx:=c<=max(ref(C,1),ref(C,2)) and c>=min(ref(C,1),ref(C,2));
x2:=ref(x1,1)=1 and xx=1;x3:=ref(x2,1)=1 and xx=1;
x0:x1 or x2 or x3,linethick0;
stickline(x0,c,ref(c,1),10,0),colorred;
y1:=c<min(ref(C,1),ref(C,2));yy:=c>=min(ref(C,1),ref(C,2)) and c<=max(ref(C,1),ref(C,2));
y2:=ref(y1,1)=1 and yy=1;y3:=ref(y2,1)=1 and yy=1;
y0:y1 or y2 or y3,linethick0;
stickline(y0,c,ref(c,1),10,0),colorgreen;
drawicon(x0=1 and ref(y0,1)=1,min(c,ref(c,1)),4),align0,pxdn20;
drawicon(y0=1 and ref(x0,1)=1,max(c,ref(c,1)),5),align0,pxup20;
c,colorwhite;

---

引用:

---

最初由 lowtau 發表
我能不能順個水順便問一下
如果我條件相同,但要改成最高價跟最低價

2.最高價漲過前兩根的相對高點用紅色畫.
3.最低價跌破前兩根的相對低點用綠色畫.
4.由紅轉綠秀出"賣出信號".
5.由綠轉紅秀出"買進信號".

如果是這樣的話該怎麼寫呢??試了許久都試不完全

---

__________________
至誠能勝天下至偽
至拙能勝天下至巧

引用:

---

最初由 nien 發表
感謝您撥空解惑下述問題
1.取消買賣訊號
2.取消白色曲線
3.當今日紅色棒向上突破昨日綠色棒最高點以上部份為紅色 但在未過昨日綠棒最高點以下部分能維持綠色
4.同理 今日綠棒未向下跌破昨日紅棒最低點部分能維持紅色
5.如何將此公式納為己用

---

__________________
至誠能勝天下至偽
至拙能勝天下至巧

抱歉 請再再小小修正

感謝peter109迅速回應 長相是對的 但很抱歉當時未能詳述造成誤解 浪費您寶貴時間 原意仍是以stechmark為基礎 即是以收媻價為唯一參數 將昨日收盤價當今日開盤價 今日收盤價再與前2根之最高或最低比較 以決定顏色是紅或綠
1.續紅 若今日收盤價高於前2根中之最低價時
2.續綠 若今日收盤價低於前2根中之最高價時
3.同一支棒上紅下綠 若今收盤價跌破前2根之最低價時 由緊鄰之前1根紅棒(全紅色)之最低價平移位置 才開始向下變綠色
4.下綠上紅 若今收盤價向上突破前2根之最高價時 由前1根率棒之最高價位置 才開始向上變紅

再次感謝您熱心協助
奇狐社區真是投資人之寶庫 謝謝

給個範例
您再改為您要的吧

Mx:=max(ref(C,1),ref(C,2));
Mn:=min(ref(C,1),ref(C,2));
x1:=C>MX;
x2:=barslast(X1);
X3:=C<Mn;
X4:=barslast(X3);

x0:X4>X2,linethick;
stickline(x0,H,MX,10,0),colorred;

Y0:=X2>X4,linethick0;
stickline(y0,L,Mn,10,0),colorgreen;

stickline(ref(x0,1)=1 AND Y0,Mn,Mx,10,0),colorYELLOW;
stickline(ref(Y0,1)=1 AND X0,Mx,Mn,10,0),colorYELLOW;

__________________
至誠能勝天下至偽
至拙能勝天下至巧