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

註冊日期: Jan 2004
來  自:
文章數量: 19

[問題]請問如何顯示指定日期的價格?

如題
說明如下
例如我想在各股畫面中畫出指定日期
如:93/3/23的低點
因此我就可以統計出大盤破底
而個股沒破底的個股
請問該如何撰寫公式?

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

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

用 DATE 可取得日期

例如:
於20040602的Low做箭頭標記
kbardate:=date;
DRAWICON(kbardate=1040602,low,4);

將20040602的Low向右畫一延伸線
DRAWLINE(kbardate=1040602,low,ref(kbardate,1)=1040602,ref(LOW,1),1);

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

註冊日期: Jan 2004
來  自:
文章數量: 19

哇!
回覆真迅速
謝謝您了
不過,請問如何顯示數值呢?
因為只劃線無法進行選股~

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

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

用下列的程式即可達到目標:
finddate:=1040602; 指定取得數值的日期
useval:=Low; 用於指定要傳回的價為 Low
(若您要改用 High 請改為 useval:=High; )
checkval 為取得的結果(指定日期的 Low)
    若傳回 -1, 則無該日期數據
=========================


dates:=date;
finddate:=1040602;
useval:=Low;
checkval:c*0;
<%
dates=FFL.VarData("dates")
finddate=FFL.VarData("finddate")
useval=FFL.VarData("useval")
checkval=FFL.VarData("checkval")
FirstNo=FFL.VarStartIndex("dates")
SetVal = -1
for i = FirstNo to Ubound(dates)
if dates(i) = finddate then SetVal = useval(i): exit for
next
for i = FirstNo to Ubound(dates)
checkval(i) = SetVal
next
FFL.VarData("checkval")=checkval
%>

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

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

若您不考慮過去的值(結果只放於今日)
指定的日期又比較接近目前日期
用下列改過的程式, 效率會提升很多

dates:=date;
finddate:=1040602;
useval:=Low;
checkval:c*0;
<%
dates=FFL.VarData("dates")
finddate=FFL.VarData("finddate")
useval=FFL.VarData("useval")
checkval=FFL.VarData("checkval")
FirstNo=FFL.VarStartIndex("dates")
SetVal = -1
EndNo = Ubound(dates)
for i = EndNo to FirstNo step -1
if dates(i) = finddate then SetVal = useval(i): exit for
next
checkval(EndNo) = SetVal
FFL.VarData("checkval")=checkval
%>

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

註冊日期: Jan 2004
來  自:
文章數量: 19

謝謝您!

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

論壇跳轉:
主題評分:

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