到奇狐勝券首頁 奇狐社區論壇 購買奇狐勝券 試用奇狐勝券
 
論壇首頁 你可以在這裡編輯你的資料，查看短訊，訂閱主題和論壇參數等等 免費會員註冊 會員列表 論壇幫助 論壇日曆 論壇搜索 加入我的最愛 登出論壇  
奇狐社區論壇 : Powered by vBulletin version 2.3.0 奇狐社區論壇 > 指標公式 > 問題交流 > 求助
  上一主題   下一主題
作者
主題 發表新主題    回覆主題
fatsai99
中級會員

註冊日期: May 2009
來　　自:
文章數量: 65
求助

請版主幫忙
以下公式於紅綠K棒轉換時紅K棒下方增加買字在綠K棒上方有賣
請版主幫忙 謝謝



NkO:=O;
NkH:=H;
NkL:=L;
NkC:=C;
NKC[0]:=(NKH[0]+NKL[0]+2*NKC[0])/4;
For i=Lbound(NKC)+1 to Ubound(NKC) do Begin NKO[i]:=(NKO[i-1]+NKC[i-1])/2;
if NKO[i]>NKH[i] then NKH[i]:=NKO[i] else NKH[i]:=NKH[i];
if NKO[i]<NKL[i] then NKL[i]:=NKO[i] else NKL[i]:=NKL[i];
NKC[i]:=(NKH[i]+NKL[i]+2*NKC[i])/4;
End;
STICKLINE(NKC>NKO ,NKC,NKH,0.1,1),ColorRED;
STICKLINE(NKC>NKO ,NKO,NKC,7,0),ColorRED;
STICKLINE(NKC>NKO ,NKO,NKL,0.1,1),ColorRED;
STICKLINE(NKC=NKO and NKC>REF(NKC,1),NKL,NKH,0.1,0),ColorRED;
STICKLINE(NKC=NKO and NKC>REF(NKC,1),NKO,NKC,7,0),ColorRED;
STICKLINE(NKC=NKO and NKC=REF(NKC,1),NKL,NKH,0.1,0),ColorYELLOW;
STICKLINE(NKC=NKO and NKC=REF(NKC,1),NKO,NKC,7,0),ColorYELLOW;
STICKLINE(NKC=NKO and NKC<REF(NKC,1),NKL,NKH,0.1,0),Colorgreen;
STICKLINE(NKC=NKO and NKC<REF(NKC,1),NKO,NKC,7,0),Colorgreen;
STICKLINE(NKC<NKO ,NKO,NKH,0.1,0),Colorgreen;
STICKLINE(NKC<NKO ,NKO,NKC,7,0),Colorgreen;
STICKLINE(NKC<NKO ,NKC,NKL,0.1,0),Colorgreen;

向版主報告此篇 | 查IP位址
Old Post 2010-06-11 02:28
fatsai99 現在離線 點選這裡查看 fatsai99 的個人資料 點選這裡給 fatsai99 傳送一條短訊 查找更多關於 fatsai99 的文章 增加 fatsai99 至你的好友列表 編輯/刪除訊息 引用回覆
cgjj
總版主

註冊日期: Oct 2003
來　　自:
文章數量: 18100
回覆: 求助

引用:
最初由 fatsai99 發表
請版主幫忙
以下公式於紅綠K棒轉換時紅K棒下方增加買字在綠K棒上方有賣
請版主幫忙 謝謝



NkO:=O;
NkH:=H;
NkL:=L;
NkC:=C;
NKC[0]:=(NKH[0]+NKL[0]+2*NKC[0])/4;
For i=Lbound(NKC)+1 to Ubound(NKC) do Begin NKO[i]:=(NKO[i-1]+NKC[i-1])/2;
if NKO[i]>NKH[i] then NKH[i]:=NKO[i] else NKH[i]:=NKH[i];
if NKO[i]<NKL[i] then NKL[i]:=NKO[i] else NKL[i]:=NKL[i];
NKC[i]:=(NKH[i]+NKL[i]+2*NKC[i])/4;
End;
STICKLINE(NKC>NKO ,NKC,NKH,0.1,1),ColorRED;
STICKLINE(NKC>NKO ,NKO,NKC,7,0),ColorRED;
STICKLINE(NKC>NKO ,NKO,NKL,0.1,1),ColorRED;
STICKLINE(NKC=NKO and NKC>REF(NKC,1),NKL,NKH,0.1,0),ColorRED;
STICKLINE(NKC=NKO and NKC>REF(NKC,1),NKO,NKC,7,0),ColorRED;
STICKLINE(NKC=NKO and NKC=REF(NKC,1),NKL,NKH,0.1,0),ColorYELLOW;
STICKLINE(NKC=NKO and NKC=REF(NKC,1),NKO,NKC,7,0),ColorYELLOW;
STICKLINE(NKC=NKO and NKC<REF(NKC,1),NKL,NKH,0.1,0),Colorgreen;
STICKLINE(NKC=NKO and NKC<REF(NKC,1),NKO,NKC,7,0),Colorgreen;
STICKLINE(NKC<NKO ,NKO,NKH,0.1,0),Colorgreen;
STICKLINE(NKC<NKO ,NKO,NKC,7,0),Colorgreen;
STICKLINE(NKC<NKO ,NKC,NKL,0.1,0),Colorgreen;


這段程式是有錯的, 不應該有 [0] 的狀況
NKC[0]:=(NKH[0]+NKL[0]+2*NKC[0])/4;
可能會引發奇狐當掉唷

向版主報告此篇 | 查IP位址
Old Post 2010-06-11 09:57
cgjj 現在離線 點選這裡查看 cgjj 的個人資料 點選這裡給 cgjj 傳送一條短訊 查找更多關於 cgjj 的文章 增加 cgjj 至你的好友列表 編輯/刪除訊息 引用回覆
fatsai99
中級會員

註冊日期: May 2009
來　　自:
文章數量: 65

目前跑的狀況還算穩定
請問版主如何增加買賣字樣
謝謝

向版主報告此篇 | 查IP位址
Old Post 2010-06-11 10:07
fatsai99 現在離線 點選這裡查看 fatsai99 的個人資料 點選這裡給 fatsai99 傳送一條短訊 查找更多關於 fatsai99 的文章 增加 fatsai99 至你的好友列表 編輯/刪除訊息 引用回覆
cgjj
總版主

註冊日期: Oct 2003
來　　自:
文章數量: 18100

引用:
最初由 fatsai99 發表
目前跑的狀況還算穩定
請問版主如何增加買賣字樣
謝謝


不是穩定就不會出錯
輕則讓您錯的不知其所以然(溢位存取可能會導致數值錯亂)
重則讓奇狐直接當掉
後果則可能是 [輕] 所造成的損失較大
有錯就一定得要修正
盲目的用會讓您的風險很大

向版主報告此篇 | 查IP位址
Old Post 2010-06-11 11:44
cgjj 現在離線 點選這裡查看 cgjj 的個人資料 點選這裡給 cgjj 傳送一條短訊 查找更多關於 cgjj 的文章 增加 cgjj 至你的好友列表 編輯/刪除訊息 引用回覆
cgjj
總版主

註冊日期: Oct 2003
來　　自:
文章數量: 18100

NkO:=O;
NkH:=H;
NkL:=L;
NkC:=C;
NKC[1]:=(NKH[1]+NKL[1]+2*NKC[1])/4;
For i=Lbound(NKC)+1 to Ubound(NKC) do Begin NKO[i]:=(NKO[i-1]+NKC[i-1])/2;
if NKO[i]>NKH[i] then NKH[i]:=NKO[i] else NKH[i]:=NKH[i];
if NKO[i]<NKL[i] then NKL[i]:=NKO[i] else NKL[i]:=NKL[i];
NKC[i]:=(NKH[i]+NKL[i]+2*NKC[i])/4;
End;
STICKLINE(NKC>NKO ,NKC,NKH,0.1,1),ColorRED;
STICKLINE(NKC>NKO ,NKO,NKC,7,0),ColorRED;
STICKLINE(NKC>NKO ,NKO,NKL,0.1,1),ColorRED;
STICKLINE(NKC=NKO and NKC>REF(NKC,1),NKL,NKH,0.1,0),ColorRED;
STICKLINE(NKC=NKO and NKC>REF(NKC,1),NKO,NKC,7,0),ColorRED;
STICKLINE(NKC=NKO and NKC=REF(NKC,1),NKL,NKH,0.1,0),ColorYELLOW;
STICKLINE(NKC=NKO and NKC=REF(NKC,1),NKO,NKC,7,0),ColorYELLOW;
STICKLINE(NKC=NKO and NKC<REF(NKC,1),NKL,NKH,0.1,0),Colorgreen;
STICKLINE(NKC=NKO and NKC<REF(NKC,1),NKO,NKC,7,0),Colorgreen;
STICKLINE(NKC<NKO ,NKO,NKH,0.1,0),Colorgreen;
STICKLINE(NKC<NKO ,NKO,NKC,7,0),Colorgreen;
STICKLINE(NKC<NKO ,NKC,NKL,0.1,0),Colorgreen;
R1:=NKC>NKO;
R2:=NKC=NKO and NKC>REF(NKC,1);
RCK:=R1 or R2;
RCK:=RCK and ref(RCK,1)=0;
G1:=NKC<NKO;
G2:=NKC=NKO and NKC<REF(NKC,1);
GCK:=G1 or G2;
GCK:=GCK and ref(GCK,1)=0;
DRAWICON(RCK,L,1) pxdn10;
DRAWICON(GCK,H,1) pxup40;

向版主報告此篇 | 查IP位址
Old Post 2010-06-11 11:44
cgjj 現在離線 點選這裡查看 cgjj 的個人資料 點選這裡給 cgjj 傳送一條短訊 查找更多關於 cgjj 的文章 增加 cgjj 至你的好友列表 編輯/刪除訊息 引用回覆
fatsai99
中級會員

註冊日期: May 2009
來　　自:
文章數量: 65

版主謝謝

向版主報告此篇 | 查IP位址
Old Post 2010-06-11 11:58
fatsai99 現在離線 點選這裡查看 fatsai99 的個人資料 點選這裡給 fatsai99 傳送一條短訊 查找更多關於 fatsai99 的文章 增加 fatsai99 至你的好友列表 編輯/刪除訊息 引用回覆
全部時間均為台灣時間, 現在時間為23:20 發表新主題    回覆主題
  上一主題   下一主題
顯示可列印版本 | 訂閱此主題

論壇跳轉:
主題評分:

論壇規定:
你不可以發表新主題
你不可以回覆文章
你不可以上傳附件
你不可以編輯自己的文章 		HTML語法禁止
vB 語法核准
表情符號核准
貼圖語法[IMG]核准
 

本站所有內容未經作者授權禁止轉貼節錄, 發表言論僅供參考勿作為投資決策依據。瀏覽本站請使用 IE 5.5 以上版本, 最佳瀏覽解析度 1024 x 768 全彩。

Powered by: vBulletin Version 2.3.0 - Copyright©2000-, Jelsoft Enterprises Limited.
簡愛洋行 製作 Copyright 2003-. All Rights Reserved.  聯絡我們