 |
ivancclai
資深會員
註冊日期: Apr 2017
來 自: New Taipei city
文章數量: 243 |
|
求助 永豐海期 如何判但產品及小數點位
版主大大你好
求助 永豐海期 如何程式自動判斷產品及小數點位 我有使用永豐海期 其產品 小道瓊/小那/黃金 等等 產品 其小數點個不同 小道瓊 整數黃金 小數點一位數/ 小那斯達
克 小數點兩位數 我要顯示 今天的 開高低收 要如何程式判斷產品 及 程式自動修正小數點 我不會做求助版主 謝謝
//====================================================================================
// ============ 今高 ===================================
TH := DYNAINFO( 5) COLORFF linethick2;
DRAWSL(ISLASTBAR ,TH ,0,0,1) coloR0000FF LINETHICK3 LINEDOT;
DRAWSL(ISLASTBAR ,TH ,0,0,3) coloR0000FF LINETHICK1 LINEDOT;
DRAWNUMBER(ISLASTBAR,TH,TH,PN) SHIFT5 ,colorFF PXUP60;
DRAWTEXT(ISLASTBAR,TH,'今高') SHIFT40,colorFF PXUP60;
//EXPLAIN(1>0,'==============='),colorFFFFFF;
//EXPLAINEX(1>0,'今高 = ',TH,0,0) COLORFF;
//EXPLAIN(1>0,'==============='),colorFFFFFF;
//============================================================
// ============ 新價線 ===================================
NP : DYNAINFO( 7) COLORFFFF linethick1 LINEDOT;
DRAWSL(ISLASTBAR ,NP ,0,0,1) pxdn0 coloR00FFFF LINETHICK1 LINEDOT;
DRAWSL(ISLASTBAR ,NP ,0,0,3) pxdn0 coloR00FFFF LINETHICK1 LINEDOT;
DRAWNUMBER(ISLASTBAR,NP,NP,PN) SHIFT5,colorFFFF PXUP60;
DRAWTEXT(ISLASTBAR,NP,'最新價') SHIFT80,colorFFFF PXUP60;
//EXPLAIN(1>0,'==============='),colorFF1FFFF;
//EXPLAINEX(1>0,'最新價 = ',NP,0,0) COLORFFFF00;
//EXPLAIN(1>0,'==============='),colorFFFFFF;
//============================================================
// ============ 今開 ===================================
TDOPEN := DYNAINFO( 4) COLORFFFFFF LINETHICK1;
DRAWSL(ISLASTBAR ,TDOPEN ,0,0,1) coloRFFFFFF LINETHICK3 LINEDOT;
DRAWSL(ISLASTBAR ,TDOPEN ,0,0,3) coloRFFFFFF LINETHICK1 LINEDOT;
DRAWNUMBER(ISLASTBAR,TDOPEN,TDOPEN,PN) SHIFT5,colorFFFFFF PXUP60;
DRAWTEXT(ISLASTBAR,TDOPEN,'今開') SHIFT40,colorFFFFFF PXUP60;
//EXPLAIN(1>0,'==============='),colorFFFFFF;
//EXPLAINEX(1>0,'今開 = ',TDOPEN,0,0) COLORFFFFFF;
//EXPLAIN(1>0,'==============='),colorFFFFFF;
//===========================================================
// ============ 今低 ===================================
TL : DYNAINFO( 6) COLORFF00 linethick3;
DRAWSL(ISLASTBAR ,TL ,0,0,1) pxdn0 coloR00FF00 LINETHICK3 LINEDOT;
DRAWSL(ISLASTBAR ,TL ,0,0,3) pxdn0 coloR00FF00 LINETHICK1 LINEDOT;
DRAWNUMBER(ISLASTBAR,TL,TL,PN) SHIFT5,colorFF00 PXUP60;
DRAWTEXT(ISLASTBAR,TL,'今低') SHIFT40,colorFF00 PXUP60;
//EXPLAIN(1>0,'==============='),colorFFFFFF;
//EXPLAINEX(1>0,'今低 = ',TL,0,0) COLORFF00;
//EXPLAIN(1>0,'==============='),colorFFFFFF;
//============================================================
//==============================================================================
|
| 最後由 ivancclai 在 2024-09-27 04:57 編輯 |
向版主報告此篇 |  |
|
2024-09-27 04:43 |
|
|
| |
|
cgjj
總版主
註冊日期: Oct 2003
來 自:
文章數量: 18091 |
|
回覆: 求助 永豐海期 如何判但產品及小數點位
引用:
最初由 ivancclai 發表
版主大大你好
求助 永豐海期 如何程式自動判斷產品及小數點位 我有使用永豐海期 其產品 小道瓊/小那/黃金 等等 產品 其小數點個不同 小道瓊 整數黃金 小數點一位數/ 小那斯達
克 小數點兩位數 我要顯示 今天的 開高低收 要如何程式判斷產品 及 程式自動修正小數點 我不會做求助版主 謝謝
//====================================================================================
// ============ 今高 ===================================
TH := DYNAINFO( 5) COLORFF linethick2;
DRAWSL(ISLASTBAR ,TH ,0,0,1) coloR0000FF LINETHICK3 LINEDOT;
DRAWSL(ISLASTBAR ,TH ,0,0,3) coloR0000FF LINETHICK1 LINEDOT;
DRAWNUMBER(ISLASTBAR,TH,TH,PN) SHIFT5 ,colorFF PXUP60;
DRAWTEXT(ISLASTBAR,TH,'今高') SHIFT40,colorFF PXUP60;
//EXPLAIN(1>0,'==============='),colorFFFFFF;
//EXPLAINEX(1>0,'今高 = ',TH,0,0) COLORFF;
//EXPLAIN(1>0,'==============='),colorFFFFFF;
//============================================================
// ============ 新價線 ===================================
NP : DYNAINFO( 7) COLORFFFF linethick1 LINEDOT;
DRAWSL(ISLASTBAR ,NP ,0,0,1) pxdn0 coloR00FFFF LINETHICK1 LINEDOT;
DRAWSL(ISLASTBAR ,NP ,0,0,3) pxdn0 coloR00FFFF LINETHICK1 LINEDOT;
DRAWNUMBER(ISLASTBAR,NP,NP,PN) SHIFT5,colorFFFF PXUP60;
DRAWTEXT(ISLASTBAR,NP,'最新價') SHIFT80,colorFFFF PXUP60;
//EXPLAIN(1>0,'==============='),colorFF1FFFF;
//EXPLAINEX(1>0,'最新價 = ',NP,0,0) COLORFFFF00;
//EXPLAIN(1>0,'==============='),colorFFFFFF;
//============================================================
// ============ 今開 ===================================
TDOPEN := DYNAINFO( 4) COLORFFFFFF LINETHICK1;
DRAWSL(ISLASTBAR ,TDOPEN ,0,0,1) coloRFFFFFF LINETHICK3 LINEDOT;
DRAWSL(ISLASTBAR ,TDOPEN ,0,0,3) coloRFFFFFF LINETHICK1 LINEDOT;
DRAWNUMBER(ISLASTBAR,TDOPEN,TDOPEN,PN) SHIFT5,colorFFFFFF PXUP60;
DRAWTEXT(ISLASTBAR,TDOPEN,'今開') SHIFT40,colorFFFFFF PXUP60;
//EXPLAIN(1>0,'==============='),colorFFFFFF;
//EXPLAINEX(1>0,'今開 = ',TDOPEN,0,0) COLORFFFFFF;
//EXPLAIN(1>0,'==============='),colorFFFFFF;
//===========================================================
// ============ 今低 ===================================
TL : DYNAINFO( 6) COLORFF00 linethick3;
DRAWSL(ISLASTBAR ,TL ,0,0,1) pxdn0 coloR00FF00 LINETHICK3 LINEDOT;
DRAWSL(ISLASTBAR ,TL ,0,0,3) pxdn0 coloR00FF00 LINETHICK1 LINEDOT;
DRAWNUMBER(ISLASTBAR,TL,TL,PN) SHIFT5,colorFF00 PXUP60;
DRAWTEXT(ISLASTBAR,TL,'今低') SHIFT40,colorFF00 PXUP60;
//EXPLAIN(1>0,'==============='),colorFFFFFF;
//EXPLAINEX(1>0,'今低 = ',TL,0,0) COLORFF00;
//EXPLAIN(1>0,'==============='),colorFFFFFF;
//============================================================
//==============================================================================
您可以用
STKLABEL 或 STKNAME 來分辨當前在哪一個商品中執行
以當前品種最小變動價位(非當前升降單位)，來求需指定的小數位數(PN)，範例如下:
MINDIFFS:=numtostr(MINDIFF,-7);
FP:=STRFIND(MINDIFFS,'.',1);
PN:(strlen(MINDIFFS)-FP)*(FP>0);
|
|
向版主報告此篇 | |
|
|
2024-09-27 08:55 |
|
|
| |
本站所有內容未經作者授權禁止轉貼節錄, 發表言論僅供參考勿作為投資決策依據。瀏覽本站請使用 IE 5.5 以上版本, 最佳瀏覽解析度 1024 x 768 全彩。
|
Powered by: vBulletin Version 2.3.0 - Copyright©2000-, Jelsoft Enterprises Limited.
簡愛洋行 製作 Copyright 2003-. All Rights Reserved. 聯絡我們
|
