到奇狐勝券首頁 奇狐社區論壇 購買奇狐勝券 試用奇狐勝券
 
論壇首頁 你可以在這裡編輯你的資料，查看短訊，訂閱主題和論壇參數等等 免費會員註冊 會員列表 論壇幫助 論壇日曆 論壇搜索 加入我的最愛 登出論壇  
奇狐社區論壇 : Powered by vBulletin version 2.3.0 奇狐社區論壇 > 指標公式 > 問題交流 > 如何顯示K棒的正中間
總頁數 (3): « 1 2 [3]   上一主題   下一主題
作者
主題 發表新主題    回覆主題
ivancclai
資深會員

註冊日期: Apr 2017
來　　自: New Taipei city
文章數量: 163

版主大大你好

修改後的
改用 ReFX(H,1)-(H-L) 之值與未來的H做比較
改用 refx(L,1)+((H-L) 之值與未來的L做比我還是不會陣列 謝謝你 謝謝你


Rexf(H,1)-(H-L) 應該是 Refx(H,1)-(H-L) 我打字的問題

請在幫我看看 謝謝

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

註冊日期: Apr 2017
來　　自: New Taipei city
文章數量: 163

版主大大你好


這是我 還不會修改


//=================================k棒 高低點============================================

HH:=H; LL:=L;
k1:=mod(HH,100000);
k2:=mod(LL,100000);

DH:=C*0; DL:=DH;
for i=1 to datacount do begin
for j=i+1 to datacount do begin
if HH[j]>HH[i] then begin
DH[i]:=j; break;
end;
end;
for j=i+1 to datacount do begin
if LL[j]<LL[i] then begin
DL[i]:=j; break;
end;
end;
end;
DRAWNUMBER(DH=0,HH,k1,0) ALIGN0 pxup25,colorWHITE;
DRAWNUMBER(DL=0,LL,k2,0) ALIGN0 pxdn25 colorWHITE;
DRAWNUMBER(DH>0,HH,k1,0) ALIGN0 pxup25,colorRED;
DRAWNUMBER(DL>0,LL,k2,0) ALIGN0 pxdn25 colorGREEN;
DRAWNUMBER(1,LL,HH-LL,0) ALIGN0 pxDN100 colorWHITE;//H-L 點數

//=======================================================================

//==================== 堆K ===========================================
HH:=H; LL:=L;
DH:=C*0; DL:=DH; 差:=HH-LL;
for i=2 to datacount-1 do begin
for j=i+1 to datacount do begin
if HH[j]>HH[i+1]-差[i] then begin
DH[i]:=j; break;
end;
end;
for j=i+1 to datacount do begin
if LL[j]<LL[i+1]+差[i] then begin
DL[i]:=j; break;
end;
end;
end;

REFXH:=mod(REFx(HIGH,1),100000);
REFXL:=mod(REFx(LOW,1),100000);
DRAWNUMBER(DH=0,HH,REFXL+(HIGH-LOW),0) ALIGN1 pxup75,colorWHITE;
DRAWNUMBER(DL=0,LL,REFXH-(HIGH-LOW),0) ALIGN1 pxdn75 colorWHITE;
DRAWTEXT(DH=0, HH, '+S=') align2,colorWHITE,PXUP75;
DRAWTEXT(DL=0, LL, '-s=') align2,colorWHITE,PXDN75;


DRAWNUMBER(DH>0,HH, REFXL+(HIGH-LOW),0) ALIGN1 pxup75,colorRED;
DRAWTEXT(DH>0, HH, '+S=') align2,colorRED,PXUP75;
DRAWNUMBER(DL>0,LL,REFXH-(HIGH-LOW),0) ALIGN1 pxdn75 colorGREEN;
DRAWTEXT(DL>0, LL,'-s=') align2,colorGREEN,PXDN75;
//=============================================================================

SH:=SYSPARAM(4); SL:=SYSPARAM(5); SS:=SH-SL;
STICKLINE(1,SH+SS*0.1,SL-SS*0.1,0,0) COLORTRANSPARENT;

目前數字是對的

K棒高低點位 顏色變化是正確的
+S and -S 數字正確 顏色變化還是不正確 我不會修改 可以幫我看看 謝謝

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

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

引用:
最初由 ivancclai 發表
版主大大你好


這是我 還不會修改


//=================================k棒 高低點============================================

HH:=H; LL:=L;
k1:=mod(HH,100000);
k2:=mod(LL,100000);

DH:=C*0; DL:=DH;
for i=1 to datacount do begin
for j=i+1 to datacount do begin
if HH[j]>HH[i] then begin
DH[i]:=j; break;
end;
end;
for j=i+1 to datacount do begin
if LL[j]<LL[i] then begin
DL[i]:=j; break;
end;
end;
end;
DRAWNUMBER(DH=0,HH,k1,0) ALIGN0 pxup25,colorWHITE;
DRAWNUMBER(DL=0,LL,k2,0) ALIGN0 pxdn25 colorWHITE;
DRAWNUMBER(DH>0,HH,k1,0) ALIGN0 pxup25,colorRED;
DRAWNUMBER(DL>0,LL,k2,0) ALIGN0 pxdn25 colorGREEN;
DRAWNUMBER(1,LL,HH-LL,0) ALIGN0 pxDN100 colorWHITE;//H-L 點數

//=======================================================================

//==================== 堆K ===========================================
HH:=H; LL:=L;
DH:=C*0; DL:=DH; 差:=HH-LL;
for i=2 to datacount-1 do begin
for j=i+1 to datacount do begin
if HH[j]>HH[i+1]-差[i] then begin
DH[i]:=j; break;
end;
end;
for j=i+1 to datacount do begin
if LL[j]<LL[i+1]+差[i] then begin
DL[i]:=j; break;
end;
end;
end;

REFXH:=mod(REFx(HIGH,1),100000);
REFXL:=mod(REFx(LOW,1),100000);
DRAWNUMBER(DH=0,HH,REFXL+(HIGH-LOW),0) ALIGN1 pxup75,colorWHITE;
DRAWNUMBER(DL=0,LL,REFXH-(HIGH-LOW),0) ALIGN1 pxdn75 colorWHITE;
DRAWTEXT(DH=0, HH, '+S=') align2,colorWHITE,PXUP75;
DRAWTEXT(DL=0, LL, '-s=') align2,colorWHITE,PXDN75;


DRAWNUMBER(DH>0,HH, REFXL+(HIGH-LOW),0) ALIGN1 pxup75,colorRED;
DRAWTEXT(DH>0, HH, '+S=') align2,colorRED,PXUP75;
DRAWNUMBER(DL>0,LL,REFXH-(HIGH-LOW),0) ALIGN1 pxdn75 colorGREEN;
DRAWTEXT(DL>0, LL,'-s=') align2,colorGREEN,PXDN75;
//=============================================================================

SH:=SYSPARAM(4); SL:=SYSPARAM(5); SS:=SH-SL;
STICKLINE(1,SH+SS*0.1,SL-SS*0.1,0,0) COLORTRANSPARENT;

目前數字是對的

K棒高低點位 顏色變化是正確的
+S and -S 數字正確 顏色變化還是不正確 我不會修改 可以幫我看看 謝謝


您確定數字沒錯嗎?

前面說的
Refx(H,1)-(H-L)
Refx(L,1)+(H-L)

與您這兩行(紅字部分)
DRAWNUMBER(DH=0,HH,REFXL+(HIGH-LOW),0) ALIGN1 pxup75,colorWHITE;
DRAWNUMBER(DL=0,LL,REFXH-(HIGH-LOW),0) ALIGN1 pxdn75 colorWHITE;

兩者的邏輯不一致!!!

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

註冊日期: Apr 2017
來　　自: New Taipei city
文章數量: 163

版主大大你好


我要的是我寫 謝謝你 可以幫我改成此邏輯

Refx(H,1)-(H-L)
Refx(L,1)+(H-L)

DRAWNUMBER(DH=0,HH,REFXL+(HIGH-LOW),0) ALIGN1 pxup75,colorWHITE;
DRAWNUMBER(DL=0,LL,REFXH-(HIGH-LOW),0) ALIGN1 pxdn75 colorWHITE;

寫程式的部分才正確 謝謝

謝謝

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

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

引用:
最初由 ivancclai 發表
版主大大你好


我要的是我寫 謝謝你 可以幫我改成此邏輯

Refx(H,1)-(H-L)
Refx(L,1)+(H-L)

DRAWNUMBER(DH=0,HH,REFXL+(HIGH-LOW),0) ALIGN1 pxup75,colorWHITE;
DRAWNUMBER(DL=0,LL,REFXH-(HIGH-LOW),0) ALIGN1 pxdn75 colorWHITE;

寫程式的部分才正確 謝謝

謝謝


"寫程式的部分" 所指為何??? @@
您還是沒有講清楚，那一個才是正確的!!!

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

註冊日期: Apr 2017
來　　自: New Taipei city
文章數量: 163

我不知道這兩者有何差異

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

註冊日期: Apr 2017
來　　自: New Taipei city
文章數量: 163

DRAWNUMBER(DH=0,HH,REFXL+(HIGH-LOW),0) ALIGN1 pxup75,colorWHITE;
DRAWNUMBER(DL=0,LL,REFXH-(HIGH-LOW),0) ALIGN1 pxdn75 colorWHITE;
這一個正確 我debug 過

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

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

引用:
最初由 ivancclai 發表
我不知道這兩者有何差異


抱歉，前面我貼錯段落了
要貼 DH>0 和 DL>0 段落
卻誤貼為 DH=0 和 DL=0 段落

重新描述如下：

按先前的定義是：
改用 refx(H,1)-(H-L) 之值與未來的H做比較，若未來的H大過該值，則 DH>0 顯示紅
改用 refx(L,1)+(H-L) 之值與未來的L做比較，若未來的L小過該值，則 DL>0 顯示綠

而您現在撰寫的卻是：
DRAWNUMBER(DH>0,HH, REFXL+(HIGH-LOW),0) ALIGN1 pxup75,colorRED;
DRAWTEXT(DH>0, HH, '+S=') align2,colorRED,PXUP75;
DRAWNUMBER(DL>0,LL,REFXH-(HIGH-LOW),0) ALIGN1 pxdn75 colorGREEN;
式子中
當 DH>0 成立時，採 REFXL+(HIGH-LOW) 這個數畫紅，也就是 refx(L,1)+(H-L)
當 DL>0 成立時，採 REFXH-(HIGH-LOW) 這個數畫綠，也就是 refx(H,1)-(H-L)

DRAWNUMBER標示的數，與計算紅綠比較用的數，兩者不一致(相反了)!!!

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

註冊日期: Apr 2017
來　　自: New Taipei city
文章數量: 163

版主大大你好

謝謝你的解釋 要如何修正計算值跟 DRAWNUMBER 一致呢

按定義是：
改用 refx(L,1)+(H-L) 之值與未來的H做比較，若未來的H大過該值，則 DH>0 顯示紅
改用 refx(H,1)-(H-L) 之值與未來的L做比較，若未來的L小過該值，則 DL>0 顯示綠

謝謝版ˋ主大大

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

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

引用:
最初由 ivancclai 發表
版主大大你好

謝謝你的解釋 要如何修正計算值跟 DRAWNUMBER 一致呢

按定義是：
改用 refx(L,1)+(H-L) 之值與未來的H做比較，若未來的H大過該值，則 DH>0 顯示紅
改用 refx(H,1)-(H-L) 之值與未來的L做比較，若未來的L小過該值，則 DL>0 顯示綠

謝謝版ˋ主大大 


原碼:
HH:=H; LL:=L;
k1:=mod(HH,1000);
k2:=mod(LL,1000);
DH:=C*0; DL:=DH; 差:=HH-LL;
for i=2 to datacount-1 do begin
  for j=i+1 to datacount do begin
    if HH[j]>LL[i+1]+差[i] then begin
      DH[i]:=j; break;
    end;
  end;
  for j=i+1 to datacount do begin
    if LL[j]<HH[i+1]-差[i] then begin
      DL[i]:=j; break;
    end;
  end;
end;

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

註冊日期: Apr 2017
來　　自: New Taipei city
文章數量: 163

謝謝版主大大

我測試過是我需要的

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

註冊日期: Apr 2017
來　　自: New Taipei city
文章數量: 163

如圖例

ivancclai 附帶上了此圖片:

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

論壇跳轉:
主題評分:

論壇規定:
你不可以發表新主題
你不可以回覆文章
你不可以上傳附件
你不可以編輯自己的文章 		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.  聯絡我們