奇狐社區論壇 總頁數 (2): « 1 [2]
在這個頁面顯示本主題全部的 20 個文章

奇狐社區論壇 (http://www.chiefox.com.tw/bbs/index.php)
- 問題交流 (http://www.chiefox.com.tw/bbs/forumdisplay.php?forumid=28)
-- 選出最大金額股票 (http://www.chiefox.com.tw/bbs/showthread.php?threadid=20915)


由 cgjj 在 2017-06-28 09:05 發表:

引用:
最初由 lamb3939 發表
這個我知道,因為我想做極短線,不想手動從那兒去看,我也知道一直變,所以才想可不可以從預警去加。就只想問可不可以這樣。


技術可行,但無法完美實現(會大於等於25個商品)

技術指標計算基礎是基於當前商品
預警N個商品,也是逐一商品做公式運算
運算出該商品目前在板塊中的排序名次,決定是否被選中
然而在依序運算所有商品的過程中
行情極可能就在這中間發生變動(前25名成份會變)
故實際選出前25名內的商品,可能會超過25個
(時間差所導致,這情況逐筆交易後會更明顯)


由 lamb3939 在 2017-06-28 13:58 發表:

我知道隨時間前25會變,所以會超過25個,我只是希望能如此,請版大教我如何寫程式來這樣做。萬分感激


由 cgjj 在 2017-06-28 16:33 發表:

引用:
最初由 lamb3939 發表
我知道隨時間前25會變,所以會超過25個,我只是希望能如此,請版大教我如何寫程式來這樣做。萬分感激


原碼:
UseBlkName:='上市股票'; //設定選用板塊 SetMaxStkNum:=25; //設定選出數量 UseDIR:=1; //設定排序方向 0.升序 1.降序 BlkStkNum:=STKCOUNT(UseBlkName); if BlkStkNum=0 then exit; RdNum:=0; //有效商品數 VARIABLE:RdNo[BlkStkNum]=0; //原始次序 VARIABLE:SortPAry[BlkStkNum]=0; for SNo:=1 to BlkStkNum do begin UseSTK:=STKFROMBLK(UseBlkName,SNo); GetAMOUNT:=DYNAINFO2(10,UseSTK); if GetAMOUNT> 0 then begin RdNum:=RdNum+1; RdNo[RdNum]:=SNo; SortPAry[RdNum]:=GetAMOUNT; end; end; MaxStkNum:=if(RdNum<SetMaxStkNum,RdNum,SetMaxStkNum); tmp:=SORTPOS(SortPAry,UseDIR,1,RdNum); SelListStr:=''; for SNo:=1 to MaxStkNum do begin UseSTK:=STKFROMBLK(UseBlkName,RdNo[SortPAry[SNo]]); SelListStr:=SelListStr+UseSTK+';'; end; 選中:STRFIND(SelListStr,MARKETLABEL+STKLABEL,1)>0;


由 lamb3939 在 2017-06-30 09:32 發表:

版主您好,以下是我自己寫的程式,標示出成交金額大於5000000的情況有出現符號,如果我同時也要出現聲音的話要怎麼改,請您幫我改一下,謝謝
==========================
AE:=AMOUNT>=5000000 and AMOUNT<6000000 ;
DRAWICON(AE,L,12) pxup50;
==========================


由 cgjj 在 2017-06-30 11:05 發表:

引用:
最初由 lamb3939 發表
版主您好,以下是我自己寫的程式,標示出成交金額大於5000000的情況有出現符號,如果我同時也要出現聲音的話要怎麼改,請您幫我改一下,謝謝
==========================
AE:=AMOUNT>=5000000 and AMOUNT<6000000 ;
DRAWICON(AE,L,12) pxup50;
==========================



範例:
PLAYSOUND(AE,0,GETAPPMAINDIR+'\Effwav\eff01.wav')


全部時間均為台灣時間, 現在時間為08:42 總頁數 (2): « 1 [2]
在這個頁面顯示本主題全部的 20 個文章


Powered by: vBulletin Version 2.3.0 - Copyright©2000-, Jelsoft Enterprises Limited.

簡愛洋行 製作 Copyright 2003-. All Rights Reserved.