Redjoe 撰寫程式下單雜記(期貨)

台灣期貨交易所最近30天交易檔

2012-02-13T18:20:00.001+08:00

記一下, 有時要查, 會忘了。

台灣期貨交易所最近30天交易檔位置 :
台灣期貨交易所 -> 交易資訊 -> 盤後資料 -> 期貨 -> 前30個交易日期貨每筆成交資料

下載

使用 wget 抓取 - wget http://www.taifex.com.tw/DailyDownload/Daily_yyyy_mm_dd.zip
用瀏覽器打開 - http://www.taifex.com.tw/DailyDownload/Daily_yyyy_mm_dd.zip

最後 Daily_yyyy_mm_dd.zip 中, yyyy是四位數西元年, mm為兩位數月份, dd為兩
位數日期, 例西元2012年01月15日, 即為 Daily_2012_01_15.zip

-

2012年台期所期貨最後交易日檔

2012-01-13T00:36:00.003+08:00

有用的人補一下吧, 2012(中華民國101年)台期所期貨最後交易日檔

2012-01-13

2012台期所期貨最後交易日檔

資訊來源 - 期貨交易所 - 交易制度 - 台灣行事曆

AutoHotkey_L 已知的問題

2012-01-12T22:36:00.009+08:00

版本 AutoHotkey_L 1.1.05.05 及 1.1.05.06, 檔案要存成UTF-8格式。

問題:在INI檔中, 用中文Section及Key會抓不到資料, 現ERROR。

用舊版及AutoHotkey 1.0.48.05是正常的, 檔案要存成ANSI格式。

ini檔內容
[期貨商品]
交易所 = TW
商品數 = 3

商品1 = txf

程式碼

iniFile = ./jcmp.ini
IfNotExist, %iniFile%
{
 MsgBox, IniFile %iniFile% not Exist.
 ExitApp
}

IniRead, exchange, %iniFile%, 期貨商品, 交易所
IniRead, pNumber,  %iniFile%, 期貨商品, 商品數
IniRead, fExt,     %iniFile%, 期貨商品, 副檔名


msgbox ahk version:%A_AhkVersion%`n`n商品數=%pNumber% \
`n副檔名=%fExt%`n交易所=%exchange%

結果出現ERROR

註:這是舊程式, 以前跑起來是正常的。

順勢,停損/停利

2011-07-02T04:39:00.002+08:00

順勢,停損/停利 - 勝率、買賣點很重要嗎？

順勢:口袋不夠深時,(資金不足,會被斷頭), 操作方向。
停損:降低風險, 確保資金。
停利:保證利潤。

順勢是方向, 停損/停利是出場時機, 還有進場時間, 三者為穫利基本關鍵, 策略暨為三者的組合。

-

2011年台期所期貨最後交易日檔

2010-12-21T10:51:00.006+08:00

2010-12-21

每年都要補的內容,最後交易日也就是結算日, 期交所每年定訂,在程式交易中會用到, 是得到當月期貨及換倉重要參考。

2011(中華民國100年)台期所期貨最後交易日檔

資訊來源 - 期貨交易所 - 交易制度 - 台灣行事曆

-
--
-

AutoHotKey補一個月的轉檔程式

2010-06-25T22:12:00.006+08:00

這支程式是用AutoHotKey寫的,用來補前幾天(前30天)沒有做轉檔, 要配合
台指期轉檔程式 - part4(懶人包), 自動取得交易檔, 轉Tick及1分K線。

程式中用到他人的 SimpleArray.ahk 要放在同個資料夾(目錄)下。下載SimpleArray.zip, 下載後要解zip檔。

getTick.ahk程式碼


;
; AutoHotkey Version: 1.0.0
; Platform:   Win XP
; Author:     R.J 
; Date :      2010/6/11
; Script Function:
;   Get Tick
;
#Include SimpleArray.ahk

;        1  2  3  4  5  6  7  8  9 10 11 12
Month = 31|28|31|30|31|30|31|31|30|31|30|31

PerlExe      = c:\perl\bin\perl.exe
plGetTick    = c:\tick\prg_perl3w\gettick3w.pl
plProc3wTick = c:\tick\prg_perl3w\proc3w_tick.pl

ToDay = %A_YYYY%-%A_MM%-%A_DD%

if (%A_MM% == 1 ){
  sStartMonth := 12                         ; 前月
} else {
  sStartMonth := A_MM + 99
  sStartMonth := SubStr(sStartMonth, 2, 2)  ; 前月
}

sStartDay = %A_YYYY%-%sStartMonth%-%A_DD%
sStopDay = %A_YYYY%-%A_MM%-%A_DD%


Gui, Font, S12,
Gui, Add, Text, x10 y25 w70 h20 , Start Date :
Gui, Add, Text, x10 y85 w70 h20 , Stop Date  :
Gui, Add, Edit, x90 y23 w90 h20 r1 vStartEdit, %sStartDay%
Gui, Add, Edit, x90 y83 w90 h20 r1 vStopEdit,  %sStopDay%
Gui, Add, Button, x220 y18 w46 h29 , Start
Gui, Show, x300 y150 h250 w320, Get Future Daily-Trade from TAIFEX
Return

GuiClose:
ExitApp


ButtonStart:
  Gui, Submit
  stopDate := StopEdit

  stYYYY   := SubStr(StartEdit, 1, 4)
  stMM     := SubStr(StartEdit, 6, 2)
  stDD     := SubStr(StartEdit, 9, 2)

  WorkDate  = %stYYYY%-%stMM%-%stDD%

  ; While (stopDate >= WorkDate) {
  While (WorkDate <= stopDate) {
    if (stDD > SA_Get(Month, stMM)) {
      ; 換月
      stDD -= SA_Get(Month, stMM)
      if (stDD < 10) {
        stDD += 100
        stDD := SubStr(stDD, 2, 2)
      }
      stMM += 1
      if (stMM > 12) {
        stMM := 01
        stYYYY += 1
      } else if (stMM < 10) {
        stMM += 100
        stMM := SubStr(stMM, 2, 2)
      }
    }
    WorkDate = %stYYYY%-%stMM%-%stDD%

    RunWait, %comspec% /c date %WorkDate%, , min
    sleep, 1000

    if (A_WDay >= 2 and A_WDay <= 6) {
      RunWait, %PerlExe%  %plGetTick%
      RunWait, %PerlExe%  %plProc3wTick%
    }

    stDD += 1
    if (stDD < 10) {
      stDD += 100
      stDD := SubStr(stDD, 2, 2)
    }
    WorkDate = %stYYYY%-%stMM%-%stDD%
  }

  RunWait, %comspec% /c date %ToDay%, , min    ;; Reset Today DateTime
Return

2010年台期所期貨最後交易日檔

2010-06-18T00:12:00.003+08:00

2010-06-18

2010台期所期貨最後交易日檔

參考 - 台灣期貨交易所 - 行事曆

-
--
-

perl程式 - 取出今天K線

2010-05-18T09:56:00.005+08:00

目的:為了即時補上斷線後的資料, 再匯入策略軟體(TS), 將看盤軟體匯出的一分K線, 只取出今天的K線, 且去除不完整的最後一筆(時間沒到)。

輸入 - C:\tmp\1.csv
輸出 - C:\tickhist\txf.csv

再配合 autoit 或 AutoHotKey , 就可以按一下自動補上今日K線資料

today1k.pl 程式


#!C:\Perl\bin\perl.exe

# 取出今天的K線, 去除最後一筆

# 輸入一分K線檔 - C:\tmp\1.csv
# 輸出一分K線檔 - C:\tickhist\txf.csv

use POSIX qw(strftime);
use integer;

$src_k1m  = 'C:\\tmp\\1.csv';           # 1mk source file
$tmpfile  = 'C:\\tickhist\\tmp001.csv'; # tmp file
$tar_k1m  = 'C:\\tickhist\\txf.csv';    # 1mk target file

$today          = strftime "%Y/%m/%d", localtime;

print "Process $today Today 1 Minute K To : $tar_k1m.\n";


open(infile,  $src_k1m) || die("Cannot open $src_k1m.\n");
open(tempfile, ">$tmpfile");

$rec_no=0;
;

while(my $k1m_record = )
{
  chomp $k1m_record;
  # $k1m_record =~ s/ //g;
  # ($kDate, $kTime, $kOpen, $kHigh, $kLow, $kClose, $kVol)=split(/, / , $k1m_record);
  ($kDateTime, $kOpen, $kHigh, $kLow, $kClose, $kVol)=split(/,/ , $k1m_record);
  ($kDate, $kTime)=split(/ / , $kDateTime);

  if ($kDate eq $today ){
      print tempfile "$kDate,$kTime,$kOpen,$kHigh,$kLow,$kClose,$kVol\n";
      $rec_no = $rec_no + 1;
  }
}

close(tempfile);
close(infile);

open(tmp_file, $tmpfile) || die("Cannot open $tmpfile.\n");
open(outfile, ">$tar_k1m");

print outfile "Date,Time,Open,High,Low,Close,Vol\n";

for ( $i=1; $i<$rec_no; $i++ ) {
  my $tmp_record = ;
  print outfile $tmp_record;

  # print "$i\n";
}

close(tmp_file);
close(outfile);

# 刪除暫存檔
unlink $tmpfile;

註:
1.其時用附屬工具 grep 來做會更精簡。
2.看盤軟體"康和全都賺"匯出一分K, 會有將近三個月的K線資料。

---

linux 版的 TeamViewer

2010-05-18T08:42:00.005+08:00

2010-05-18

TeamViewer 終於有 linux 版了

在金融業使用最多的遠端連線軟體 TeamViewer , 最近出了 linux 版, 這是一個好用的軟體, 現在在 linux 及 mac 下也可以安裝了 , 不必用wine來安裝使用。

http://www.teamviewer.com/ 提供的 linux 版本

.deb(debian/ubuntu)
.rpm(Red Hat, Fedora, Suse, Mandriva)
.tar.gz

下載位置 http://www.teamviewer.com/download/

在 Arch Linux 官方套件 - Arch Linux TeamViewer

---

康和全都賺轉出1分鐘K線

2010-04-29T00:42:00.004+08:00

康和全都賺轉(匯)出300筆(近3個月)的1分鐘K線

開技術分析。
選一分K線。
滑鼠右鍵->重新回補資料。
滑鼠右鍵->瀏覽歷史資料。
儲存到CSV檔。

註:

資料開頭會多兩行, 第一行瀏覽歷史資料名稱, 第二行是抬頭, 在TS匯入時要先刪除。
若是在盤中轉(匯)出, 要刪除最後一筆, (很可能時間還沒到, 最後一筆還不完整)。

台指期轉檔程式 - part4(懶人包)

2010-04-27T20:38:00.004+08:00

因應 JameX 網友所提的"懶人包",

1. tick.zip
2. tool.zip
3. CRONw_crontab.zip

為配合TS的匯入, 這次改了一分K線的檔案名稱, 及輸出目錄, 並刪除抬頭

安裝說明, 參照台指期轉檔程式 - part4

---

台指期轉檔程式 - part4

2010-04-21T04:25:00.005+08:00

因為我比較懶, 用K線轉檔機還要按按鈕, 所以用 CRONw 排程, 自行到期交所抓當日的成交檔, 分類 tick, 再轉K線...

最近在 win XP sp3 下安裝

perl - ActivePerl-5.8.2.808-MSWin32-x86.msi
CRONw - CRONw_2.0.zip
tool - wget.exe unzip.exe
perl 轉檔程式

之前的操作忘了, 這次記錄一下。

1. perl
ActivePerl-5.8.2.808-MSWin32-x86.msi
2. CRONw
CRONw_2.0.zip
a.unzip CRONw_2.0.zip
b. CRONw -> C:\CRONw
3. tool.zip
a.unzip put at c:\tool\
b.file
1. c:\tool\wget.exe
2. c:\tool\unzip.exe
3. c:\tool\unzip32.dll
4. tick.zip (perl script)
a. unzip put at c:\tick
b.file
1. c:\tick\prg_perl3w\gettick3w.bat
2. c:\tick\prg_perl3w\proc3w_tick.bat
3. c:\tick\prg_perl3w\gettick3w.pl
4. c:\tick\prg_perl3w\proc3w_tick.pl
5. c:\tick\prg_perl3w\last-trading-days
6. c:\tick\prg_perl3w\movefile2dir.pl
(其他-手動補之前的K線)
7. c:\tick\ext\make_kline
8. c:\tick\ext\win_crontab.txt
9. c:\tick\ext\user_proc3w_tick.ba
10. c:\tick\ext\tick2kline.pl
c. 排程時間 copy c:\tick\ext\win_crontab.txt to c:\CRONw\crontab.txt
(add crontab rule)
27 15 * * 1-5 c:\perl\bin\perl.exe C:\tick\prg_perl3w\gettick3w.pl
29 15 * * 1-5 c:\perl\bin\perl.exe C:\tick\prg_perl3w\proc3w_tick.pl

5. install CRONW modules -> read \INSTALL.txt
a. installer.pl

6. install CRONw to WinXP Service
a. 安裝服務 - perl cronHelper.pl --install
b. 起動服務 - net start CRON
c. 檢查 -> Cron Service (CRONw) - net start

時間定在 15:27 以後, 是確保當時可以抓得到今日的成交檔

期交所2006,2007,2008舊交易檔

2009-10-11T13:58:00.006+08:00

以前收集的

期交所舊交易檔(太占網頁空間了, 更吃網路頻寬, 過兩個星期後會移除。)

2006年 - http://rj.twbbs.org/~redjoe/future/daily/Daily_2006.zip
2007年 - http://rj.twbbs.org/~redjoe/future/daily/Daily_2007.zip

2008年 1月至8月20日 - http://rj.twbbs.org/~redjoe/future/daily/Daily_2008.zip

設定 crontab 最後一天執行

2009-09-16T00:33:00.008+08:00

每月最後一天做統計, 將一個月的K線自動合併(每天做一次合併結果也是一樣)

設定crontab 最後一天執行(crontab entry to run every last day of the month)

00 23 * * *[ `date +%d` -eq `echo \`cal\` | awk '{print $NF}'` ] && your-script

或

00 23 * * * [[ $(date +'%d') -eq $(cal | awk '!/^$/{ print $NF }' | tail -1) ]] && your-script

或

00 12 * * * [ `echo \`cal\`|awk '{print$NF}'` -eq `date +\%d` ] && your-script

To Do : crontab 自動算出期貨每月結算日

台指期轉檔程式,perl 程式的自動排程(cronw)

2009-07-31T03:04:00.010+08:00

配合前兩篇 - 自期交所自行下載交易檔 perl 程式(win-XP) 及台指期轉檔程式,perl 程式 2 (配合前支gettick3w.pl-自行下載交易檔)

另外有兩部份 crontab 的設定及最後交易日檔, crontab 是自動排程, 最後交易日檔是判斷交易檔中的當月成交資料基的依據。

說明:

程式放在 C:\tick\prg_perl3w\ 下。
資料處理在 C:\tick\prg_perl3w\daily\ 下。
最後交易檔會移到 C:\tick\prg_perl3w\daily\yyyymm\ , 成交檔分好的 tick 及 k線檔(附名csv)會移到 C:\tick\prg_perl3w\tick\yyyymm\ 。以今天為例會移到 C:\tick\prg_perl3w\daily\200907\ 及 C:\tick\prg_perl3w\tick\200907\ , 若是日期為 2009-08-04 會移到 C:\tick\prg_perl3w\daily\200908\ 及 C:\tick\prg_perl3w\tick\200908\ 。

crontab 的設定

每週 1-5 15:38分,執行這支perl程式 C:\tick\prg_perl3w\gettick3w.pl (到期交所抓檔)
每週 1-5 15:43分,執行分拆 C:\tick\prg_perl3w\proc_tick3w.pl
crontab 內容(C:\CRONw\crontab.txt)

#      
# m  h  dom mon dow command
# 分 時 日 月 周  指令
38 15  * * 1-5 c:\perl\bin\perl.exe  C:\tick\prg_perl3w\gettick3w.pl
43 15  * * 1-5 c:\perl\bin\perl.exe  C:\tick\prg_perl3w\proc_tick3w.pl

參考我的 wiki : windows版 Crontab for Win - cronw

2009年台期所期貨最後交易日檔
2009依日期排順序的最後交易, 2010年(含)以後要自行建立。要用我的成程轉以前的資料, 要自行建立這個 "最後交易日檔"。

內容

參考我的 wiki : 2009 Last Trading Days - 2009年台期所期貨最後交易日

台指期轉檔程式,perl 程式 2 (配合前支gettick3w.pl-自行下載交易檔)

2009-07-31T02:54:00.013+08:00

配合前支程式 : 自期交所自行下載交易檔 perl 程式(win-XP) - gettick3w.pl

配合環境: windows xp sp2
程式名稱 : proc3w_tick.pl
程式目的 : 將當天交易檔分拆成台指期,小台,電指期,金指期當月分tick檔
程式碼

#!C:\Perl\bin\perl.exe

# 2009-06-25 change output file name
# 2009/6/25 Change directory to C:\\tick\\prg_perl3w\\
# 2009/6/18 For Win32 ActivePerl
# 2009-06-17   for move File to Storage Directory
# 2009-06-06 Process Tick and Make K-Line File

use POSIX qw(strftime);
use integer;

$workDir = 'C:\\tick\\prg_perl3w\\daily\\';
$tickDir = 'C:\\tick\\prg_perl3w\\tick\\';
# 可以改成 5 分K
# my $Minute5K  = 5;  # 5分K
my $Minute1K  = 1;  # 1分K

# 讀取最後交易日檔
my $LastTradingDays = "C:\\tick\\prg_perl3w\\last-trading-days";


$today          = strftime "%Y%m%d", localtime;

$today_YY = substr $today, 0, 4;
$today_mm = substr $today, 4, 2;
$today_dd = substr $today, 6, 2;

$tick_day = $today_YY . "-" . $today_mm . "-" . $today_dd;

$wkMonth = &get_current_month_product($LastTradingDays);

print "Process $today Tick and Make $Minute1K Minute K-Line File..\n";

chdir $workDir;

&split_Tick ($today_YY, $today_mm, $today_dd, $wkMonth);

$tickdayfile = '???' . $today;

$daily_trade_file  = 'Daily_' . $today_YY . '_' . $today_mm . '_' . $today_dd;

$saveDir        = substr $today, 0, 6;
$tickStoreDir   = $tickDir . $saveDir . '/';
$dailyStoreDir  = $workDir . $saveDir . '/';

`C:\\tick\\prg_perl3w\\movefile2dir.pl $workDir $dailyStoreDir $daily_trade_file`;
`C:\\tick\\prg_perl3w\\movefile2dir.pl $workDir $tickStoreDir  $tickdayfile`;

exit;

sub process_kline {
 # in參數 $tickfile $KMinute

 my $startHH  = '08';  # 開始時
 my $startMM  = '45';  # 開始分
 my $IdxK  = -1;    # idx
 my $PreIdxK  = -1;    # idx

 my $tickfile = $_[0];
 my $KMinute  = $_[1];

 $workday = substr $tickfile, 3, 8;
 my $kline_file = substr($tickfile, 0, 11) . '_' . $KMinute . 'k' . substr($tickfile, 11, 4);

 open(infile,  $tickfile) || die("Cannot open $tickfile.\n");
 open(outfile, ">$kline_file");

 print outfile "Date Time,Open,High,Low,Close,Vol\n";

 # print "K File Processing...\n";

 ;

 while(my $tk_record = )
 {
   chomp $tk_record;
   $tk_record =~ s/ //g;
   ($tickTime, $tickPrice, $tickVol)=split(/,/ , $tk_record);

   $tkTimeHh = substr $tickTime, 0, 2;
   $tkTimeMm = substr $tickTime, 3, 2;
   $tkTimeSs = substr $tickTime, 6, 2;

   $IdxK  = int(((($tkTimeHh - $startHH) * 60) + ($tkTimeMm - $startMM)) / $KMinute);
   if ($IdxK == $PreIdxK) { # 同根k
     if ($tickPrice > $HPrice) {
       $HPrice = $tickPrice;
     }
     if ($tickPrice < $LPrice) {
       $LPrice = $tickPrice;
     }
     $CPrice = $tickPrice;
     $KVol   = $KVol + $tickVol;
   }
   else {
     if ($PreIdxK != -1){
       print outfile $KTime,$OPrice,$HPrice,$LPrice,$CPrice,$KVol\n";
     }
     $OPrice = $tickPrice;
     $HPrice = $tickPrice;
     $LPrice = $tickPrice;
     $CPrice = $tickPrice;
     $KVol   = $tickVol  ;

     my $KTimeHH = ((($IdxK + 1) * $KMinute) + ($startHH * 60) + $startMM) / 60 + 100;
     my $KTimeMM = ((($IdxK + 1) * $KMinute) + ($startHH * 60) + $startMM) % 60 + 100;
     $KTimeHH = substr $KTimeHH, 1, 2;
     $KTimeMM = substr $KTimeMM, 1, 2;

     $KTime   = $tick_day . ' ' . $KTimeHH . ':' . $KTimeMM;
     $PreIdxK = $IdxK;
   }
  }
 if ($IdxK == $PreIdxK) {
   # 同根k
   print outfile "$KTime,$OPrice,$HPrice,$LPrice,$CPrice,$KVol\n";
 }
 close(outfile);
  close(infile);
}

# get current month product. ex: 200906 (取得當月月分)
sub get_current_month_product{
 my $LastTradingDays_file = $_[0];
 open(open_LastTradingDays, $LastTradingDays_file)|| die("Cannot open $LastTradingDays_file.\n");
 @recs = ;

 for($row=@recs-1; $row >= 0; $row=$row-1)
 {
   my $LastTradingDays = $recs[$row];
   if ($LastTradingDays >= $today ) {
      $TradingDays = $LastTradingDays;
   }
 }
 my $wkMonth = substr $TradingDays, 0, 6;

 close(open_LastTradingDays);
 return $wkMonth;
}

sub split_Tick {
 chdir $workDir;
 # in參數 $today_YY $today_mm $today_dd $wkMonth

 $workday_YY  = $_[0];
 $workday_mm  = $_[1];
 $workday_dd  = $_[2];
 $workMonth   = $_[3];

 $workdayfile = $workday_YY . $workday_mm . $workday_dd;


 $trade_file  = 'Daily_' . $workday_YY . '_' . $workday_mm . '_' . $workday_dd . '.rpt';

 my $TX_Product  = 'TX';  # 台指
 my $MTX_Product = 'MTX'; # 小台
 my $TE_Product  = 'TE';  # 電指期
 my $TF_Product  = 'TF';  # 金指期

 # 2009-06-25 change output file name
 $tx_tickfile  = 'txf' . $workdayfile . '.csv'; # 台指
 $mtx_tickfile = 'mxf' . $workdayfile . '.csv'; # 小台
 $te_tickfile  = 'exf' . $workdayfile . '.csv'; # 電指期
 $tf_tickfile  = 'fxf' . $workdayfile . '.csv'; # 金指期

 open(read_file, $trade_file) || die("Cannot open $trade_file.\n");


 open(out_tx, ">$tx_tickfile");
 open(out_mtx,">$mtx_tickfile");
 open(out_te, ">$te_tickfile");
 open(out_tf, ">$tf_tickfile");

 print out_tx  "Date Time,Price,Vol\n";
 print out_mtx "Date Time,Price,Vol\n";
 print out_te  "Date Time,Price,Vol\n";
 print out_tf  "Date Time,Price,Vol\n";

 # print "Split Tick File Processing...\n";

 while(my $record = )
 {
   chomp $record;
   $record =~ s/ //g;
   # 交易日期,商品代號,交割年月,成交時間,成交價格,成交數量(B+S),近月價格,遠月價格
   ($tDays, $tProduct, $tMonth, $tickTime, $tPrice, $tVol, $nPrice, $fPrice)=split(/,/ , $record);
   # print "$tDays, $tProduct, $tMonth, $tickTime, $tPrice, $tVol, $nPrice, $fPrice\n";

   $tVol = $tVol / 2;

   $tTimeHh = substr $tickTime, 0, 2;
   $tTimeMm = substr $tickTime, 2, 2;
   $tTimeSs = substr $tickTime, 4, 2;

   $tTime   = $tTimeHh . ':' . $tTimeMm . ':' . $tTimeSs;

   # 當月
   if ($tMonth eq $workMonth)
   {
     if ($tProduct eq $TX_Product) { # 台指
       print out_tx "$tTime,$tPrice,$tVol\n";
     }
     elsif ($tProduct eq $MTX_Product) { # 小台
       print out_mtx "$tTime,$tPrice,$tVol\n";
     }
     elsif ($tProduct eq $TE_Product) { # 電指期
       print out_te "$tTime,$tPrice,$tVol\n";
     }
     elsif ($tProduct eq $TF_Product) { # 金指期
       print out_tf "$tTime,$tPrice,$tVol\n";
     }
   }
 }

 close(out_tf);
 close(out_te);
 close(out_mtx);
 close(out_tx);

 close(read_file);

 &process_kline($tx_tickfile, $Minute1K);
}

參考我的 wiki : Process split tick - proc3w_tick.pl

自期交所自行下載交易檔 perl 程式(win-XP)

2009-07-15T02:45:00.005+08:00

在Windows XP使用 perl script 程式,配合cronw自動排程,自動抓台期交所當天交易檔

環境: windows xp sp2
程式名稱 : gettick3w.pl
程式目的 : 抓台期交所當天交易檔
程式碼

#!C:\Perl\bin\perl.exe

# 2009/6/25 Change directory to C:\\tick\\prg_perl3w\\
# 2009/6/18 For Win32 ActivePerl
#!/usr/bin/perl # 原程式是在 Debian linux 下
# 2009-05-30 get taiwan future tick

use POSIX qw(strftime);

$workDir = 'C:\\tick\\prg_perl3w\\daily\\';

$today_ziptickfile = strftime "Daily_%Y_%m_%d.zip", localtime;
$today_tickfile    = strftime "Daily_%Y_%m_%d.rpt", localtime;

$LogFile = $workDir . "perl_crontab.log";

$tickfile = "http://www.taifex.com.tw/DailyDownload/" .$today_ziptickfile ;

chdir $workDir;

# 用 wget 抓台期交所當天交易檔
my $content = `C:\\tool\\wget.exe -c -a $LogFile -P $workDir $tickfile`;

if (-e $today_ziptickfile) {
# 解 zip 檔
# `unzip $today_ziptickfile`;
`c:\\tool\\unzip $today_ziptickfile`;
}
else {
die("File not exist : $today_ziptickfile.\n");
}

參考我的 wiki : Get Taiwan future tick - gettick3w.pl

自期交所自行下載交易檔及轉台指期的1分K-bash程式

2009-07-02T23:33:00.013+08:00

這部份是在linux上的shell script程式,配合crontab自動排程

Crontab for User

自動排程crontab
編輯 user 的 crontab (執行 crontab -l )
每週 1-5 16:44分,執行這支bash程式(~/prg_bash/cron_proc_tick.bash)
crontab 內容

# m  h  dom mon dow command
# 分 時 日  月  周  指令
44 16  * * 1-5 ~/prg_bash/cron_proc_tick.bash

抓交易檔轉成tick程式

環境: debian linux lenny
程式名稱 : cron_proc_tick.bash
程式目的 : 抓台灣期貨交易所當天交易檔,並分別轉成tick(.csv)
BASH 程式碼

#!/bin/sh

# Get Tick

today_tickfile=http://www.taifex.com.tw/DailyDownload/Daily_`date +%Y_%m_%d`.zip

wget -c -a ~/tick/prg_bash/rj_crontab.log -P ~/tick/prg_bash/daily/ $today_tickfile


# Process Tick

cd ~/tick/prg_bash/daily/

todayfile=`date +%Y_%m_%d`
today=`date +%Y%m%d`
todayMonth=`date +%Y%m`
zipfile=Daily_$todayfile.zip

workmonth=./tmp1

wkproduct=`ls -l Daily_$todayfile.zip | cut -d ' ' -f 5 `

if [ "$wkproduct" -ne '93' ]; then

unzip $zipfile

# echo Daily_$todayfile.rpt
# echo $todayfile.TX

# ltd=`tac last-trading-days`
ltd=`tac ~/tick/last-trading-days`
for td in $ltd
do
#echo "$td="$td , "$today="$today
if [ "$td" -ge "$today" ]; then
#echo " $td > $today "
wkmonth=`echo $td`
fi
done

echo $wkmonth > $workmonth

wkproduct=`cut -c 1-6 $workmonth`
# echo $wkproduct


# TX 台指
head -n 1 Daily_$todayfile.rpt > $todayfile.TX
sed '/MTX/d' Daily_$todayfile.rpt | sed -n '/TX/p' | sed -n 's/ //gp' | awk -F, 'BEGIN{OFS=","}($3=='$wkproduct'){ print $1,$2,$3,$4,$5,$6/2 }' >> $todayfile.TX
echo "TickTime,Price,Vol" > txf$today.csv
sed '/MTX/d' Daily_$todayfile.rpt | sed -n '/TX/p' | sed -n 's/ //gp' | awk -F, 'BEGIN{OFS=","}($3=='$wkproduct'){ print $4,$5,$6/2 }' >> txf$today.csv

# MTX 小台
head -n 1 Daily_$todayfile.rpt > $todayfile.MTX
sed -n '/MTX/p' Daily_$todayfile.rpt | sed -n 's/ //gp' | awk -F, 'BEGIN{OFS=","}($3=='$wkproduct'){ print $1,$2,$3,$4,$5,$6/2 }' >> $todayfile.MTX
echo "TickTime,Price,Vol" > mxf$today.csv
sed -n '/MTX/p' Daily_$todayfile.rpt | sed -n 's/ //gp' | awk -F, 'BEGIN{OFS=","}($3=='$wkproduct'){ print $4,$5,$6/2 }' >> mxf$today.csv


# TE 電指期
head -n 1 Daily_$todayfile.rpt > $todayfile.TE
sed -n '/TE/p' Daily_$todayfile.rpt | sed -n 's/ //gp' | awk -F, 'BEGIN{OFS=","}($3=='$wkproduct'){ print $1,$2,$3,$4,$5,$6/2 }' >> $todayfile.TE
echo "TickTime,Price,Vol" > exf$today.csv
sed -n '/TE/p' Daily_$todayfile.rpt | sed -n 's/ //gp' | awk -F, 'BEGIN{OFS=","}($3=='$wkproduct'){ print $4,$5,$6/2 }' >> exf$today.csv

## TF 金指期
head -n 1 Daily_$todayfile.rpt > $todayfile.TF
sed '/GTF/d' Daily_$todayfile.rpt | sed -n '/TF/p' | sed -n 's/ //gp' | awk -F, 'BEGIN{OFS=","}($3=='$wkproduct'){ print $1,$2,$3,$4,$5,$6/2 }' >> $todayfile.TF
echo "TickTime,Price,Vol" > fxf$today.csv
sed '/GTF/d' Daily_$todayfile.rpt | sed -n '/TF/p' | sed -n 's/ //gp' | awk -F, 'BEGIN{OFS=","}($3=='$wkproduct'){ print $4,$5,$6/2 }' >> fxf$today.csv

rm $workmonth


if [ ! -d $todayMonth ]; then
mkdir $todayMonth
fi
mv Daily_$todayfile.rpt $zipfile  $todayMonth/

if [ ! -d "~/tick/prg_bash/tick/$todayMonth" ]; then
mkdir ~/tick/prg_bash/tick/$todayMonth
fi
mv $todayfile.TX txf$today.csv $todayfile.MTX mxf$today.csv $todayfile.TE exf$today.csv $todayfile.TF fxf$today.csv ~/tick/prg_bash/tick/$todayMonth/

fi

參考我的 wiki : Get Taiwan future tick - cron_proc_tick.bash

原提供 "轉自期交所的台指期1分K" 將停止

2009-07-02T23:16:00.004+08:00

最近幾次會將提供轉自期交所的台指期1分K線的程式放上來。

而原提供 "轉自期交所的台指期1分K", 將在下個月1日(2009/08/01)停止, 不再提供轉好的1分K線csv檔(好像也沒人用)。

若需要的人, 可自行按程式說明建置或修改自己的格式(5分,15分,30分,60分,1日K)。

2009年4-6月績效

2009-06-30T20:24:00.004+08:00

習慣記一下績效, 我的是依月份統計, 不是期貨的月份,

2009年4-6月績效

單口損益

四月 +339
五月 -162
六月 +581

6月24日大漲那天, 有事外出, 11:30回來後就沒看盤, 寫程式時沒考慮漲停獲利出場, 下午一點多, 時間到了才平倉, 少賺了約180點, 真可惜。

記錄一下

Win XP 下安裝自動排程 CRONw 2.0

2009-06-20T10:21:00.008+08:00

Win XP 下安裝自動排程 CRONw 2.0。

這個 CRONw 是用 perl 寫的自動排程工具, 先要裝 perl, 為了安裝方便, 請參考 CRONw 的安裝這篇來安裝 ActivePerl 及 CRONw 2.0 。

這樣就可以使用 CRONw 這個自動排程工具, 下篇再寫自動排程 CRONw 的使用設定。

我的 Wiki -- 2009-06-20 cronw 安裝 (包括ActivePerl)

定時自動抓期交所的成交資料(3)

2009-06-09T22:27:00.005+08:00

每天提供轉自期交所的台指期1分K線。

這幾天在轉前幾年的成交資料, 順便把定時自動抓期交所的成交資料程式改寫, 全改成perl, 方便在windows下定時抓資料及轉成1分k線, 考慮到頻寬的問題, 目前只先放上台指一分K線給別人下載。

位置 http://rj.twbbs.org/~redjoe/future/daily/

台証期貨-程式化交易系統說明會2

2009-06-09T21:14:00.004+08:00

台証本月分有程式交易講座

台証期貨月月旺講座 ˙ 時間：6/25(四) 18:00~20:00程式化交易系統說明會Part2—認識與實務

台証期貨主頁 - http://www.twfc.com.tw/
每月講座 - http://www.twfc.com.tw/month.htm

原日期為 6/23(二) 18:00~20:00

定時自動抓期交所的成交資料(續)

2009-05-06T18:07:00.005+08:00

前一篇定時自動抓期交所的成交資料測試結果很好, 唯一有問題是商品有GTF沒考慮進去, 現在已修改了。

這個定時抓當天成交資料, 並分拆成多個檔, 是個很不錯的用 crontab 定時跑的script , 是可以放在主機上, 每天定時跑出結果, 並分享給要用的人, 只是我的頻寬會影響到, 我可不希望在看盤時有太多人來抓, 所以不考慮掛在我家中主機上, 有需要的人, 自行按前篇定時自動抓期交所的成交資料建置 , 需要幫助的, 請寄E-Mail給我, 或有人有主機, 可以讓我放上去, 造褔要每天抓的人。

另外看tick發現對程式下單有影響的問題

開盤前掛好單, 在08:45:00當下超過兩百筆的交易, 若要用程式抓, 可能(應當)會有些抓不到, 報價資料源,網路,電腦,程式等, 這幾個配合幾乎是不可能全抓到 :

報價資料源無法控制
網路頻寬可以申請T3的
要用期交所同等及的電腦, 超過成本太多(高)了
程式可以調整

除了08:45:00這秒外, 大部份每秒不超過 40 個 Tick, 用 30次/秒去抓, 大概就可以了, 只是不知其他人寫的自動下單, 要用到Tick來處嗎? 還是用策略去避開這個問題。

2009-05-06 08:45:00 的 Tick - 337 筆
2009-05-05 08:45:00 的 Tick - 254 筆
2009-05-04 08:45:00 的 Tick - 71 筆

還有就是 - 太多有錢人了, 開盤 Tick 單筆有 300 的量, 100及200也不少, 我只有用小台, 要怎麼玩得過別人(大戶)

以下是台指的三天部分片斷
2009_05_06.TX


交易日期,商品代號,交割年月,成交時間,成交價格,成交數量(B+S)
20090506,TX,200905,08450000,6510,2
20090506,TX,200905,08450000,6510,4
20090506,TX,200905,08450000,6510,2
20090506,TX,200905,08450000,6510,2
20090506,TX,200905,08450000,6510,2
20090506,TX,200905,08450000,6510,2
20090506,TX,200905,08450000,6510,2
20090506,TX,200905,08450000,6510,4
20090506,TX,200905,08450000,6510,2
20090506,TX,200905,08450000,6510,2
20090506,TX,200905,08450000,6510,4
20090506,TX,200905,08450000,6510,2
20090506,TX,200905,08450000,6510,2
20090506,TX,200905,08450000,6510,6
20090506,TX,200905,08450000,6510,2
20090506,TX,200905,08450000,6510,10
20090506,TX,200905,08450000,6510,10
20090506,TX,200905,08450000,6510,40
20090506,TX,200905,08450000,6510,40
20090506,TX,200905,08450000,6510,2
20090506,TX,200905,08450000,6510,12
20090506,TX,200905,08450000,6510,10
20090506,TX,200905,08450000,6510,10
20090506,TX,200905,08450000,6510,10
20090506,TX,200905,08450000,6510,2
20090506,TX,200905,08450000,6510,10
20090506,TX,200905,08450000,6510,2
20090506,TX,200905,08450000,6510,10
20090506,TX,200905,08450000,6510,2
20090506,TX,200905,08450000,6510,10
20090506,TX,200905,08450000,6510,10
20090506,TX,200905,08450000,6510,2
20090506,TX,200905,08450000,6510,2
20090506,TX,200905,08450000,6510,4
20090506,TX,200905,08450000,6510,4
20090506,TX,200905,08450000,6510,30
20090506,TX,200905,08450000,6510,10
20090506,TX,200905,08450000,6510,2
20090506,TX,200905,08450000,6510,2
20090506,TX,200905,08450000,6510,6
20090506,TX,200905,08450000,6510,2
20090506,TX,200905,08450000,6510,2
20090506,TX,200905,08450000,6510,4
20090506,TX,200905,08450000,6510,4
20090506,TX,200905,08450000,6510,2
20090506,TX,200905,08450000,6510,4
20090506,TX,200905,08450000,6510,2
20090506,TX,200905,08450000,6510,4
20090506,TX,200905,08450000,6510,6
20090506,TX,200905,08450000,6510,2
20090506,TX,200905,08450000,6510,4
20090506,TX,200905,08450000,6510,6
20090506,TX,200905,08450000,6510,6
20090506,TX,200905,08450000,6510,2
20090506,TX,200905,08450000,6510,4
20090506,TX,200905,08450000,6510,2
20090506,TX,200905,08450000,6510,60
20090506,TX,200905,08450000,6510,2
20090506,TX,200905,08450000,6510,2
20090506,TX,200905,08450000,6510,2
20090506,TX,200905,08450000,6510,4
20090506,TX,200905,08450000,6510,10
20090506,TX,200905,08450000,6510,4
20090506,TX,200905,08450000,6510,2
20090506,TX,200905,08450000,6510,4
20090506,TX,200905,08450000,6510,2
20090506,TX,200905,08450000,6510,2
20090506,TX,200905,08450000,6510,2
20090506,TX,200905,08450000,6511,2
20090506,TX,200905,08450000,6512,4
20090506,TX,200905,08450000,6509,2
20090506,TX,200905,08450100,6513,2
20090506,TX,200905,08450100,6511,2
20090506,TX,200905,08450200,6515,2
20090506,TX,200905,08450200,6512,4
20090506,TX,200905,08450200,6508,4


交易日期,商品代號,交割年月,成交時間,成交價格,成交數量(B+S)
20090505,TX,200905,08450000,6637,2
20090505,TX,200905,08450000,6637,2
20090505,TX,200905,08450000,6637,44
20090505,TX,200905,08450000,6637,2
20090505,TX,200905,08450000,6637,2
20090505,TX,200905,08450000,6637,6
20090505,TX,200905,08450000,6637,2
20090505,TX,200905,08450000,6637,4
20090505,TX,200905,08450000,6637,4
20090505,TX,200905,08450000,6637,4
20090505,TX,200905,08450000,6637,2
20090505,TX,200905,08450000,6637,2
20090505,TX,200905,08450000,6637,2
20090505,TX,200905,08450000,6637,2
20090505,TX,200905,08450000,6637,2
20090505,TX,200905,08450000,6637,2
20090505,TX,200905,08450000,6637,2
20090505,TX,200905,08450000,6637,20
20090505,TX,200905,08450000,6637,2
20090505,TX,200905,08450000,6637,2
20090505,TX,200905,08450000,6637,2
20090505,TX,200905,08450000,6637,2
20090505,TX,200905,08450000,6637,40
20090505,TX,200905,08450000,6637,4
20090505,TX,200905,08450000,6637,2
20090505,TX,200905,08450000,6637,2
20090505,TX,200905,08450000,6637,2
20090505,TX,200905,08450000,6637,10
20090505,TX,200905,08450000,6637,2
20090505,TX,200905,08450000,6637,20
20090505,TX,200905,08450000,6637,2
20090505,TX,200905,08450000,6637,116
20090505,TX,200905,08450000,6637,4
20090505,TX,200905,08450000,6637,2
20090505,TX,200905,08450000,6637,2
20090505,TX,200905,08450000,6637,6
20090505,TX,200905,08450000,6637,2
20090505,TX,200905,08450000,6637,2
20090505,TX,200905,08450000,6637,2
20090505,TX,200905,08450000,6637,12
20090505,TX,200905,08450000,6637,4
20090505,TX,200905,08450000,6637,4
20090505,TX,200905,08450000,6637,4
20090505,TX,200905,08450000,6637,4
20090505,TX,200905,08450000,6637,2
20090505,TX,200905,08450000,6637,4
20090505,TX,200905,08450000,6637,4
20090505,TX,200905,08450000,6637,2
20090505,TX,200905,08450000,6637,30
20090505,TX,200905,08450000,6637,2
20090505,TX,200905,08450000,6637,2
20090505,TX,200905,08450000,6637,2
20090505,TX,200905,08450000,6637,4
20090505,TX,200905,08450000,6637,2
20090505,TX,200905,08450000,6637,2
20090505,TX,200905,08450000,6637,2
20090505,TX,200905,08450000,6637,2
20090505,TX,200905,08450000,6637,2
20090505,TX,200905,08450000,6637,2
20090505,TX,200905,08450000,6637,4
20090505,TX,200905,08450000,6637,2
20090505,TX,200905,08450000,6637,2
20090505,TX,200905,08450000,6637,2
20090505,TX,200905,08450000,6637,14
20090505,TX,200905,08450000,6637,4
20090505,TX,200905,08450000,6637,2
20090505,TX,200905,08450000,6637,2
20090505,TX,200905,08450000,6637,4
20090505,TX,200905,08450000,6637,2
20090505,TX,200905,08450000,6637,4
20090505,TX,200905,08450000,6637,2
20090505,TX,200905,08450000,6637,8
20090505,TX,200905,08450000,6637,24
20090505,TX,200905,08450000,6637,2
20090505,TX,200905,08450000,6637,4
20090505,TX,200905,08450000,6637,2
20090505,TX,200905,08450000,6637,2
20090505,TX,200905,08450000,6637,2
20090505,TX,200905,08450000,6637,2
20090505,TX,200905,08450000,6637,4
20090505,TX,200905,08450000,6637,2
20090505,TX,200905,08450000,6637,4
20090505,TX,200905,08450000,6637,12
20090505,TX,200905,08450000,6637,2
20090505,TX,200905,08450000,6637,2
20090505,TX,200905,08450000,6637,2
20090505,TX,200905,08450000,6637,2
20090505,TX,200905,08450000,6637,2
20090505,TX,200905,08450000,6637,4
20090505,TX,200905,08450000,6637,2
20090505,TX,200905,08450000,6637,8
20090505,TX,200905,08450000,6637,2
20090505,TX,200905,08450000,6637,50
20090505,TX,200905,08450000,6637,2
20090505,TX,200905,08450000,6637,2
20090505,TX,200905,08450000,6637,6
20090505,TX,200905,08450000,6637,2
20090505,TX,200905,08450000,6637,4
20090505,TX,200905,08450000,6637,2
20090505,TX,200905,08450000,6637,2
20090505,TX,200905,08450000,6637,6
20090505,TX,200905,08450000,6637,2
20090505,TX,200905,08450000,6637,2
20090505,TX,200905,08450000,6637,2
20090505,TX,200905,08450000,6637,2
20090505,TX,200905,08450000,6637,2
20090505,TX,200905,08450000,6637,2
20090505,TX,200905,08450000,6637,16
20090505,TX,200905,08450000,6637,2
20090505,TX,200905,08450000,6637,4
20090505,TX,200905,08450000,6637,2
20090505,TX,200905,08450000,6637,12
20090505,TX,200905,08450000,6637,2
20090505,TX,200905,08450000,6637,2
20090505,TX,200905,08450000,6637,8
20090505,TX,200905,08450000,6637,14
20090505,TX,200905,08450000,6637,2
20090505,TX,200905,08450000,6637,4
20090505,TX,200905,08450000,6637,2
20090505,TX,200905,08450000,6637,6
20090505,TX,200905,08450000,6637,2
20090505,TX,200905,08450000,6637,2
20090505,TX,200905,08450000,6637,200
20090505,TX,200905,08450000,6637,2
20090505,TX,200905,08450000,6637,2
20090505,TX,200905,08450000,6637,2
20090505,TX,200905,08450000,6637,2
20090505,TX,200905,08450000,6637,4
20090505,TX,200905,08450000,6637,2
20090505,TX,200905,08450000,6637,2
20090505,TX,200905,08450000,6637,2
20090505,TX,200905,08450000,6637,2
20090505,TX,200905,08450000,6637,2
20090505,TX,200905,08450000,6637,4
20090505,TX,200905,08450000,6637,2
20090505,TX,200905,08450000,6637,2
20090505,TX,200905,08450000,6637,2
20090505,TX,200905,08450000,6637,2
20090505,TX,200905,08450000,6637,2
20090505,TX,200905,08450000,6637,2
20090505,TX,200905,08450000,6637,12
20090505,TX,200905,08450000,6637,2
20090505,TX,200905,08450000,6637,16
20090505,TX,200905,08450000,6637,4
20090505,TX,200905,08450000,6637,10
20090505,TX,200905,08450000,6637,2
20090505,TX,200905,08450000,6637,4
20090505,TX,200905,08450000,6637,2
20090505,TX,200905,08450000,6637,2
20090505,TX,200905,08450000,6637,100
20090505,TX,200905,08450000,6637,2
20090505,TX,200905,08450000,6637,2
20090505,TX,200905,08450000,6637,30
20090505,TX,200905,08450000,6637,4
20090505,TX,200905,08450000,6637,6
20090505,TX,200905,08450000,6637,2
20090505,TX,200905,08450000,6637,2
20090505,TX,200905,08450000,6637,6
20090505,TX,200905,08450000,6637,2
20090505,TX,200905,08450000,6637,12
20090505,TX,200905,08450000,6637,2
20090505,TX,200905,08450000,6637,2
20090505,TX,200905,08450000,6637,2
20090505,TX,200905,08450000,6637,2
20090505,TX,200905,08450000,6637,2
20090505,TX,200905,08450000,6637,2
20090505,TX,200905,08450000,6637,10
20090505,TX,200905,08450000,6637,10
20090505,TX,200905,08450000,6637,2
20090505,TX,200905,08450000,6637,4
20090505,TX,200905,08450000,6637,4
20090505,TX,200905,08450000,6637,2
20090505,TX,200905,08450000,6637,2
20090505,TX,200905,08450000,6637,2
20090505,TX,200905,08450000,6637,2
20090505,TX,200905,08450000,6637,2
20090505,TX,200905,08450000,6637,2
20090505,TX,200905,08450000,6637,20
20090505,TX,200905,08450000,6637,4
20090505,TX,200905,08450000,6637,2
20090505,TX,200905,08450000,6637,40
20090505,TX,200905,08450000,6637,2
20090505,TX,200905,08450000,6637,2
20090505,TX,200905,08450000,6637,4
20090505,TX,200905,08450000,6637,2
20090505,TX,200905,08450000,6637,2
20090505,TX,200905,08450000,6637,2
20090505,TX,200905,08450000,6637,100
20090505,TX,200905,08450000,6637,6
20090505,TX,200905,08450000,6637,12
20090505,TX,200905,08450000,6637,2
20090505,TX,200905,08450000,6637,2
20090505,TX,200905,08450000,6637,2
20090505,TX,200905,08450000,6637,2
20090505,TX,200905,08450000,6637,6
20090505,TX,200905,08450000,6637,6
20090505,TX,200905,08450000,6637,2
20090505,TX,200905,08450000,6637,2
20090505,TX,200905,08450000,6637,8
20090505,TX,200905,08450000,6637,100
20090505,TX,200905,08450000,6637,2
20090505,TX,200905,08450000,6637,8
20090505,TX,200905,08450000,6637,6
20090505,TX,200905,08450000,6637,2
20090505,TX,200905,08450000,6637,2
20090505,TX,200905,08450000,6637,2
20090505,TX,200905,08450000,6637,4
20090505,TX,200905,08450000,6637,2
20090505,TX,200905,08450000,6637,100
20090505,TX,200905,08450000,6637,20
20090505,TX,200905,08450000,6637,2
20090505,TX,200905,08450000,6637,4
20090505,TX,200905,08450000,6637,2
20090505,TX,200905,08450000,6637,2
20090505,TX,200905,08450000,6637,2
20090505,TX,200905,08450000,6637,10
20090505,TX,200905,08450000,6637,2
20090505,TX,200905,08450000,6637,2
20090505,TX,200905,08450000,6637,2
20090505,TX,200905,08450000,6637,4
20090505,TX,200905,08450000,6637,100
20090505,TX,200905,08450000,6637,2
20090505,TX,200905,08450000,6637,2
20090505,TX,200905,08450000,6637,4
20090505,TX,200905,08450000,6637,2
20090505,TX,200905,08450000,6637,4
20090505,TX,200905,08450000,6637,4
20090505,TX,200905,08450000,6637,2
20090505,TX,200905,08450000,6637,2
20090505,TX,200905,08450000,6637,2
20090505,TX,200905,08450000,6637,2
20090505,TX,200905,08450000,6637,4
20090505,TX,200905,08450000,6637,4
20090505,TX,200905,08450000,6637,4
20090505,TX,200905,08450000,6637,2
20090505,TX,200905,08450000,6637,2
20090505,TX,200905,08450000,6637,10
20090505,TX,200905,08450000,6637,2
20090505,TX,200905,08450000,6637,2
20090505,TX,200905,08450000,6637,2
20090505,TX,200905,08450000,6637,2
20090505,TX,200905,08450000,6637,12
20090505,TX,200905,08450000,6637,10
20090505,TX,200905,08450000,6637,2
20090505,TX,200905,08450000,6637,2
20090505,TX,200905,08450000,6637,2
20090505,TX,200905,08450000,6637,6
20090505,TX,200905,08450000,6637,12
20090505,TX,200905,08450000,6637,10
20090505,TX,200905,08450000,6637,4
20090505,TX,200905,08450000,6637,4
20090505,TX,200905,08450000,6637,2
20090505,TX,200905,08450000,6637,4
20090505,TX,200905,08450000,6637,10
20090505,TX,200905,08450000,6637,2
20090505,TX,200905,08450000,6637,10
20090505,TX,200905,08450000,6637,60
20090505,TX,200905,08450000,6637,4
20090505,TX,200905,08450000,6637,2
20090505,TX,200905,08450000,6637,4
20090505,TX,200905,08450000,6637,2
20090505,TX,200905,08450000,6637,2
20090505,TX,200905,08450000,6637,2
20090505,TX,200905,08450000,6637,4
20090505,TX,200905,08450000,6637,2
20090505,TX,200905,08450000,6637,20
20090505,TX,200905,08450000,6637,10
20090505,TX,200905,08450000,6637,2
20090505,TX,200905,08450000,6637,4
20090505,TX,200905,08450000,6637,2
20090505,TX,200905,08450000,6637,6
20090505,TX,200905,08450000,6637,2
20090505,TX,200905,08450000,6637,24
20090505,TX,200905,08450000,6637,4
20090505,TX,200905,08450000,6637,4
20090505,TX,200905,08450000,6637,2
20090505,TX,200905,08450000,6637,2
20090505,TX,200905,08450000,6637,20
20090505,TX,200905,08450000,6637,2
20090505,TX,200905,08450000,6637,2
20090505,TX,200905,08450000,6637,2
20090505,TX,200905,08450000,6637,2
20090505,TX,200905,08450000,6637,12
20090505,TX,200905,08450000,6637,2
20090505,TX,200905,08450000,6637,10
20090505,TX,200905,08450000,6637,10
20090505,TX,200905,08450000,6637,10
20090505,TX,200905,08450000,6637,10
20090505,TX,200905,08450000,6637,10
20090505,TX,200905,08450000,6637,10
20090505,TX,200905,08450000,6637,10
20090505,TX,200905,08450000,6637,10
20090505,TX,200905,08450000,6637,10
20090505,TX,200905,08450000,6637,10
20090505,TX,200905,08450000,6637,10
20090505,TX,200905,08450000,6637,2
20090505,TX,200905,08450000,6637,4
20090505,TX,200905,08450000,6637,4
20090505,TX,200905,08450000,6637,20
20090505,TX,200905,08450000,6637,2
20090505,TX,200905,08450000,6637,100
20090505,TX,200905,08450000,6637,2
20090505,TX,200905,08450000,6637,2
20090505,TX,200905,08450000,6637,6
20090505,TX,200905,08450000,6637,4
20090505,TX,200905,08450000,6637,2
20090505,TX,200905,08450000,6637,2
20090505,TX,200905,08450000,6637,20
20090505,TX,200905,08450000,6637,2
20090505,TX,200905,08450000,6637,100
20090505,TX,200905,08450000,6637,2
20090505,TX,200905,08450000,6637,2
20090505,TX,200905,08450000,6637,4
20090505,TX,200905,08450000,6637,4
20090505,TX,200905,08450000,6637,2
20090505,TX,200905,08450000,6638,2
20090505,TX,200905,08450000,6640,2
20090505,TX,200905,08450000,6640,2
20090505,TX,200905,08450000,6645,4
20090505,TX,200905,08450000,6645,2
20090505,TX,200905,08450000,6647,4
20090505,TX,200905,08450000,6647,2
20090505,TX,200905,08450000,6648,2
20090505,TX,200905,08450000,6648,4
20090505,TX,200905,08450000,6648,6
20090505,TX,200905,08450000,6648,4
20090505,TX,200905,08450000,6648,2
20090505,TX,200905,08450000,6648,10
20090505,TX,200905,08450000,6648,4
20090505,TX,200905,08450000,6648,2
20090505,TX,200905,08450000,6649,4
20090505,TX,200905,08450000,6649,2
20090505,TX,200905,08450000,6649,2
20090505,TX,200905,08450000,6649,2
20090505,TX,200905,08450000,6649,10
20090505,TX,200905,08450000,6649,4
20090505,TX,200905,08450000,6649,2
20090505,TX,200905,08450100,6649,16
20090505,TX,200905,08450100,6649,6
20090505,TX,200905,08450200,6649,6
20090505,TX,200905,08450200,6649,4
20090505,TX,200905,08450200,6649,2
20090505,TX,200905,08450200,6649,8
20090505,TX,200905,08450200,6649,8
20090505,TX,200905,08450200,6649,4
20090505,TX,200905,08450200,6649,6
20090505,TX,200905,08450200,6649,2
20090505,TX,200905,08450200,6649,4
20090505,TX,200905,08450300,6649,2
20090505,TX,200905,08450300,6649,12
20090505,TX,200905,08450300,6649,2
20090505,TX,200905,08450300,6650,2
20090505,TX,200905,08450300,6650,36
20090505,TX,200905,08450300,6650,2
20090505,TX,200905,08450300,6650,2
20090505,TX,200905,08450400,6650,50
20090505,TX,200905,08450400,6650,2
20090505,TX,200905,08450400,6650,36
20090505,TX,200905,08450400,6650,6
20090505,TX,200905,08450400,6648,6
20090505,TX,200905,08450400,6648,4
20090505,TX,200905,08450400,6650,4
20090505,TX,200905,08450400,6650,2
20090505,TX,200905,08450400,6648,4
20090505,TX,200905,08450400,6650,2
20090505,TX,200905,08450400,6648,2
20090505,TX,200905,08450400,6646,2
20090505,TX,200905,08450400,6650,2
20090505,TX,200905,08450400,6650,12
20090505,TX,200905,08450400,6650,2
20090505,TX,200905,08450400,6650,2
20090505,TX,200905,08450500,6646,2
20090505,TX,200905,08450500,6646,2
20090505,TX,200905,08450500,6648,2
20090505,TX,200905,08450500,6648,16
20090505,TX,200905,08450500,6650,20
20090505,TX,200905,08450500,6650,58
20090505,TX,200905,08450500,6652,2
20090505,TX,200905,08450500,6651,2
20090505,TX,200905,08450500,6652,4
20090505,TX,200905,08450500,6652,2
20090505,TX,200905,08450500,6652,2
20090505,TX,200905,08450600,6652,2
20090505,TX,200905,08450600,6651,2
20090505,TX,200905,08450600,6658,2
20090505,TX,200905,08450600,6659,2


交易日期,商品代號,交割年月,成交時間,成交價格,成交數量(B+S)
20090504,TX,200905,08450000,6363,2
20090504,TX,200905,08450000,6363,2
20090504,TX,200905,08450000,6363,2
20090504,TX,200905,08450000,6363,2
20090504,TX,200905,08450000,6363,4
20090504,TX,200905,08450000,6363,2
20090504,TX,200905,08450000,6363,2
20090504,TX,200905,08450000,6363,2
20090504,TX,200905,08450000,6363,4
20090504,TX,200905,08450000,6363,2
20090504,TX,200905,08450000,6363,4
20090504,TX,200905,08450000,6363,4
20090504,TX,200905,08450000,6363,2
20090504,TX,200905,08450000,6363,2
20090504,TX,200905,08450000,6363,2
20090504,TX,200905,08450000,6363,2
20090504,TX,200905,08450000,6363,2
20090504,TX,200905,08450000,6363,2
20090504,TX,200905,08450000,6363,16
20090504,TX,200905,08450000,6363,4
20090504,TX,200905,08450000,6363,6
20090504,TX,200905,08450000,6363,2
20090504,TX,200905,08450000,6363,20
20090504,TX,200905,08450000,6363,6
20090504,TX,200905,08450000,6363,200
20090504,TX,200905,08450000,6363,2
20090504,TX,200905,08450000,6363,4
20090504,TX,200905,08450000,6363,10
20090504,TX,200905,08450000,6363,2
20090504,TX,200905,08450000,6363,2
20090504,TX,200905,08450000,6363,26
20090504,TX,200905,08450000,6363,2
20090504,TX,200905,08450000,6363,2
20090504,TX,200905,08450000,6363,2
20090504,TX,200905,08450000,6363,10
20090504,TX,200905,08450000,6363,2
20090504,TX,200905,08450000,6363,6
20090504,TX,200905,08450000,6363,2
20090504,TX,200905,08450000,6363,2
20090504,TX,200905,08450000,6363,4
20090504,TX,200905,08450000,6363,2
20090504,TX,200905,08450000,6363,8
20090504,TX,200905,08450000,6363,2
20090504,TX,200905,08450000,6363,2
20090504,TX,200905,08450000,6363,2
20090504,TX,200905,08450000,6363,2
20090504,TX,200905,08450000,6363,2
20090504,TX,200905,08450000,6363,18
20090504,TX,200905,08450000,6363,200
20090504,TX,200905,08450000,6363,4
20090504,TX,200905,08450000,6363,2
20090504,TX,200905,08450000,6363,4
20090504,TX,200905,08450000,6363,2
20090504,TX,200905,08450000,6363,2
20090504,TX,200905,08450000,6363,2
20090504,TX,200905,08450000,6363,6
20090504,TX,200905,08450000,6363,2
20090504,TX,200905,08450000,6363,10
20090504,TX,200905,08450000,6363,2
20090504,TX,200905,08450000,6363,2
20090504,TX,200905,08450000,6363,4
20090504,TX,200905,08450000,6363,2
20090504,TX,200905,08450000,6363,2
20090504,TX,200905,08450000,6363,2
20090504,TX,200905,08450000,6363,4
20090504,TX,200905,08450000,6363,2
20090504,TX,200905,08450000,6363,2
20090504,TX,200905,08450000,6363,4
20090504,TX,200905,08450000,6363,14
20090504,TX,200905,08450000,6363,2
20090504,TX,200905,08450000,6363,2
20090504,TX,200905,08450000,6363,10
20090504,TX,200905,08450000,6363,2
20090504,TX,200905,08450000,6363,4
20090504,TX,200905,08450000,6363,2
20090504,TX,200905,08450000,6363,4
20090504,TX,200905,08450000,6363,4
20090504,TX,200905,08450000,6363,2
20090504,TX,200905,08450000,6363,2
20090504,TX,200905,08450000,6363,2
20090504,TX,200905,08450000,6363,2
20090504,TX,200905,08450000,6363,2
20090504,TX,200905,08450000,6363,2
20090504,TX,200905,08450000,6363,2
20090504,TX,200905,08450000,6363,2
20090504,TX,200905,08450000,6363,10
20090504,TX,200905,08450000,6363,2
20090504,TX,200905,08450000,6363,2
20090504,TX,200905,08450000,6363,4
20090504,TX,200905,08450000,6363,4
20090504,TX,200905,08450000,6363,2
20090504,TX,200905,08450000,6363,16
20090504,TX,200905,08450000,6363,2
20090504,TX,200905,08450000,6363,2
20090504,TX,200905,08450000,6363,2
20090504,TX,200905,08450000,6363,2
20090504,TX,200905,08450000,6363,40
20090504,TX,200905,08450000,6363,4
20090504,TX,200905,08450000,6363,4
20090504,TX,200905,08450000,6363,20
20090504,TX,200905,08450000,6363,2
20090504,TX,200905,08450000,6363,2
20090504,TX,200905,08450000,6363,6
20090504,TX,200905,08450000,6363,2
20090504,TX,200905,08450000,6363,2
20090504,TX,200905,08450000,6363,2
20090504,TX,200905,08450000,6363,8
20090504,TX,200905,08450000,6363,10
20090504,TX,200905,08450000,6363,20
20090504,TX,200905,08450000,6363,2
20090504,TX,200905,08450000,6363,2
20090504,TX,200905,08450000,6363,2
20090504,TX,200905,08450000,6363,2
20090504,TX,200905,08450000,6363,4
20090504,TX,200905,08450000,6363,2
20090504,TX,200905,08450000,6363,2
20090504,TX,200905,08450000,6363,6
20090504,TX,200905,08450000,6363,4
20090504,TX,200905,08450000,6363,2
20090504,TX,200905,08450000,6363,4
20090504,TX,200905,08450000,6363,2
20090504,TX,200905,08450000,6363,10
20090504,TX,200905,08450000,6363,2
20090504,TX,200905,08450000,6363,2
20090504,TX,200905,08450000,6363,10
20090504,TX,200905,08450000,6363,2
20090504,TX,200905,08450000,6363,2
20090504,TX,200905,08450000,6363,2
20090504,TX,200905,08450000,6363,2
20090504,TX,200905,08450000,6363,2
20090504,TX,200905,08450000,6363,2
20090504,TX,200905,08450000,6363,2
20090504,TX,200905,08450000,6363,2
20090504,TX,200905,08450000,6363,2
20090504,TX,200905,08450000,6363,2
20090504,TX,200905,08450000,6363,10
20090504,TX,200905,08450000,6363,8
20090504,TX,200905,08450000,6363,2
20090504,TX,200905,08450000,6363,2
20090504,TX,200905,08450000,6363,2
20090504,TX,200905,08450000,6363,8
20090504,TX,200905,08450000,6363,2
20090504,TX,200905,08450000,6363,2
20090504,TX,200905,08450000,6363,4
20090504,TX,200905,08450000,6363,2
20090504,TX,200905,08450000,6363,4
20090504,TX,200905,08450000,6363,4
20090504,TX,200905,08450000,6363,2
20090504,TX,200905,08450000,6363,2
20090504,TX,200905,08450000,6363,2
20090504,TX,200905,08450000,6363,40
20090504,TX,200905,08450000,6363,10
20090504,TX,200905,08450000,6363,2
20090504,TX,200905,08450000,6363,2
20090504,TX,200905,08450000,6363,6
20090504,TX,200905,08450000,6363,30
20090504,TX,200905,08450000,6363,2
20090504,TX,200905,08450000,6363,100
20090504,TX,200905,08450000,6363,6
20090504,TX,200905,08450000,6363,4
20090504,TX,200905,08450000,6363,2
20090504,TX,200905,08450000,6363,2
20090504,TX,200905,08450000,6363,2
20090504,TX,200905,08450000,6363,2
20090504,TX,200905,08450000,6363,2
20090504,TX,200905,08450000,6363,2
20090504,TX,200905,08450000,6363,4
20090504,TX,200905,08450000,6363,100
20090504,TX,200905,08450000,6363,2
20090504,TX,200905,08450000,6363,100
20090504,TX,200905,08450000,6363,2
20090504,TX,200905,08450000,6363,2
20090504,TX,200905,08450000,6363,30
20090504,TX,200905,08450000,6363,10
20090504,TX,200905,08450000,6363,10
20090504,TX,200905,08450000,6363,2
20090504,TX,200905,08450000,6363,100
20090504,TX,200905,08450000,6363,2
20090504,TX,200905,08450000,6363,6
20090504,TX,200905,08450000,6363,4
20090504,TX,200905,08450000,6363,2
20090504,TX,200905,08450000,6363,2
20090504,TX,200905,08450000,6363,12
20090504,TX,200905,08450000,6363,4
20090504,TX,200905,08450000,6363,100
20090504,TX,200905,08450000,6363,26
20090504,TX,200905,08450000,6363,100
20090504,TX,200905,08450000,6363,100
20090504,TX,200905,08450000,6363,100
20090504,TX,200905,08450000,6363,2
20090504,TX,200905,08450000,6363,126
20090504,TX,200905,08450000,6363,100
20090504,TX,200905,08450000,6363,4
20090504,TX,200905,08450000,6363,2
20090504,TX,200905,08450000,6363,100
20090504,TX,200905,08450000,6363,2
20090504,TX,200905,08450000,6363,2
20090504,TX,200905,08450000,6363,10
20090504,TX,200905,08450000,6363,180
20090504,TX,200905,08450000,6363,16
20090504,TX,200905,08450000,6363,102
20090504,TX,200905,08450000,6363,4
20090504,TX,200905,08450000,6363,120
20090504,TX,200905,08450000,6363,2
20090504,TX,200905,08450000,6363,2
20090504,TX,200905,08450000,6363,100
20090504,TX,200905,08450000,6363,2
20090504,TX,200905,08450000,6363,4
20090504,TX,200905,08450000,6363,2
20090504,TX,200905,08450000,6363,100
20090504,TX,200905,08450000,6363,6
20090504,TX,200905,08450000,6363,10
20090504,TX,200905,08450000,6363,2
20090504,TX,200905,08450000,6363,100
20090504,TX,200905,08450000,6363,2
20090504,TX,200905,08450000,6363,2
20090504,TX,200905,08450000,6363,100
20090504,TX,200905,08450000,6363,2
20090504,TX,200905,08450000,6363,12
20090504,TX,200905,08450000,6363,62
20090504,TX,200905,08450000,6363,2
20090504,TX,200905,08450000,6363,2
20090504,TX,200905,08450000,6363,2
20090504,TX,200905,08450000,6363,4
20090504,TX,200905,08450000,6363,2
20090504,TX,200905,08450000,6363,40
20090504,TX,200905,08450000,6363,2
20090504,TX,200905,08450000,6363,20
20090504,TX,200905,08450000,6363,4
20090504,TX,200905,08450000,6363,4
20090504,TX,200905,08450000,6363,2
20090504,TX,200905,08450000,6363,2
20090504,TX,200905,08450000,6363,100
20090504,TX,200905,08450000,6363,14
20090504,TX,200905,08450000,6363,4
20090504,TX,200905,08450000,6363,100
20090504,TX,200905,08450000,6363,2
20090504,TX,200905,08450000,6363,2
20090504,TX,200905,08450000,6363,2
20090504,TX,200905,08450000,6363,6
20090504,TX,200905,08450000,6363,2
20090504,TX,200905,08450000,6363,4
20090504,TX,200905,08450000,6363,100
20090504,TX,200905,08450000,6363,2
20090504,TX,200905,08450000,6363,2
20090504,TX,200905,08450000,6363,12
20090504,TX,200905,08450000,6363,4
20090504,TX,200905,08450000,6363,6
20090504,TX,200905,08450000,6363,2
20090504,TX,200905,08450000,6363,10
20090504,TX,200905,08450000,6358,2
20090504,TX,200905,08450000,6351,2
20090504,TX,200905,08450000,6350,4
20090504,TX,200905,08450000,6350,2
20090504,TX,200905,08450100,6350,2
20090504,TX,200905,08450100,6336,2
20090504,TX,200905,08450100,6335,2
20090504,TX,200905,08450100,6321,4
20090504,TX,200905,08450100,6350,2
20090504,TX,200905,08450100,6350,6
20090504,TX,200905,08450100,6359,6
20090504,TX,200905,08450200,6362,4
20090504,TX,200905,08450200,6362,2
20090504,TX,200905,08450200,6362,2
20090504,TX,200905,08450200,6352,18
20090504,TX,200905,08450200,6315,2
20090504,TX,200905,08450200,6350,2
20090504,TX,200905,08450200,6357,2
20090504,TX,200905,08450200,6359,2
20090504,TX,200905,08450200,6359,2
20090504,TX,200905,08450200,6349,8
20090504,TX,200905,08450200,6359,10
20090504,TX,200905,08450200,6359,2
20090504,TX,200905,08450200,6362,2
20090504,TX,200905,08450300,6348,2
20090504,TX,200905,08450300,6348,2
20090504,TX,200905,08450300,6348,2
20090504,TX,200905,08450300,6315,2
20090504,TX,200905,08450300,6315,8
20090504,TX,200905,08450300,6348,2
20090504,TX,200905,08450300,6357,2
20090504,TX,200905,08450300,6357,2
20090504,TX,200905,08450300,6357,4
20090504,TX,200905,08450300,6357,2
20090504,TX,200905,08450300,6357,2
20090504,TX,200905,08450300,6357,2
20090504,TX,200905,08450300,6352,8
20090504,TX,200905,08450300,6345,2
20090504,TX,200905,08450300,6349,2
20090504,TX,200905,08450300,6349,2
20090504,TX,200905,08450300,6349,2
20090504,TX,200905,08450300,6349,2
20090504,TX,200905,08450300,6356,2
20090504,TX,200905,08450300,6356,2
20090504,TX,200905,08450400,6345,2
20090504,TX,200905,08450400,6345,2
20090504,TX,200905,08450400,6353,2
20090504,TX,200905,08450400,6313,2
20090504,TX,200905,08450400,6313,2
20090504,TX,200905,08450400,6310,2

定時自動抓期交所的成交資料

2009-05-02T01:10:00.008+08:00

這幾天在趕程式, 空時看程式交易聚寶盆的文章, 其中有下載當天(最近30天)的成交資料, 要每天去抓, 覺得不方便。

昨天五月一日(星期五)沒交易, 在自家的主機(Debian)上, 用shell script 配合crontab寫了每天(星期一至星期五)16:30左右, 自動到期交所抓當天成交資料, 並分拆成台指, 小台指, 金指期, 電指期的tick檔, 下星期開始跑, 先暫時這樣。

這個程式只取當期(近月)的tick, 若是4月29日當天,會做以下動作

到期交所抓當天成交資料(Daily_2009_04_29.zip)
解Daily_2009_04_29.zip成Daily_2009_04_29.rpt
參考最後結算日檔(last-trading-days)取出近月tick, 並分成台指, 小台指, 金指期, 電指期，及產生2009_04_29.TX , 2009_04_29.MTX , 2009_04_29.TF , 2009_04_29.TE 四個檔

待處理

還沒有統計成1分鐘K,
及改成perl寫的程式
合併到原有的K線中

用 wget 下載的 script - wget-future-tick


#!/bin/sh

today_tickfile=http://www.taifex.com.tw/DailyDownload/Daily_`date +%Y_%m_%d`.zip

wget -c -a /daily/future_tick.log -P /daily/ $today_tickfile

分拆成台指,小台指,金指期,電指期的 script - proc-tick


#!/bin/sh

todayfile=`date +%Y_%m_%d`    # -> 2009_04_29
today=`date +%Y%m%d`          # -> 20090429
zipfile=Daily_$todayfile.zip  # -> Daily_2009_04_29.zip

workmonth=./tmp1              # 暫存用

# 取得下載檔 size
filesize=`ls -l Daily_$todayfile.zip | cut -d ' ' -f 5 `

if [ "$filesize" -ne '93' ]; then  # 超過 93 才有資料

unzip $zipfile              # 解zip

# echo Daily_$todayfile.rpt
# echo $todayfile.TX

ltd=`tac last-trading-days` # 最後結算日檔
for td in $ltd
do
  #echo "$td="$td , "$today="$today
  if [ "$td" -ge "$today" ]; then
    #echo " $td > $today "
    wkmonth=`echo $td`      # 取得最近的結算日 -> wkmonth
  fi
done

echo $wkmonth > $workmonth

wkproduct=`cut -c 1-6 $workmonth`   # 當期交易商品月份
# echo $wkproduct

# 用 sed 及 awk 分拆檔案
# TX 台指
head -n 1 Daily_$todayfile.rpt > $todayfile.TX      # 留表頭第一行
sed '/MTX/d' Daily_$todayfile.rpt | sed -n '/TX/p' | sed -n 's/ //gp' | awk -F, 'BEGIN{OFS=","}($3=='$wkproduct'){ print $1,$2,$3,$4,$5,$6 }' >> $todayfile.TX

# MTX 小台
head -n 1 Daily_$todayfile.rpt > $todayfile.MTX
sed -n '/MTX/p' Daily_$todayfile.rpt | sed -n 's/ //gp' | awk -F, 'BEGIN{OFS=","}($3=='$wkproduct'){ print $1,$2,$3,$4,$5,$6 }' >> $todayfile.MTX

# TE 電指期
head -n 1 Daily_$todayfile.rpt > $todayfile.TE
sed -n '/TE/p' Daily_$todayfile.rpt | sed -n 's/ //gp' | awk -F, 'BEGIN{OFS=","}($3=='$wkproduct'){ print $1,$2,$3,$4,$5,$6 }' >> $todayfile.TE

## TF 金指期
head -n 1 Daily_$todayfile.rpt > $todayfile.TF
sed '/GTF/d' Daily_$todayfile.rpt | sed -n '/TF/p' | sed -n 's/ //gp' | awk -F, 'BEGIN{OFS=","}($3=='$wkproduct'){ print $1,$2,$3,$4,$5,$6 }' >> $todayfile.TF

rm $workmonth          # 刪除暫存檔
fi

crontab中的內容


# 分 時 日 月 星期 要執行的指令
34  16  * * 1-5 redjoetseng  cd /daily/ && run-parts /etc/cron.tick/01get/wget-future-tick #每天抓future成交記錄
44  16  * * 1-5 redjoetseng  cd /daily/ && run-parts /etc/cron.tick/02proc/proc-tick  #依商品分拆future成交記錄

註:

windows下也有crontab 排程(自動執行)程式 - CRONw
修改金指期(TF)部份,有GTF要除掉。(2009-05-06)

台灣期交所下載網頁

家中的ADSL網路有問題, 上網不正常

2009-04-09T05:21:00.005+08:00

因為中華電信的ADSL有些問題, 網路一直不正常, 連帶的架在家裡的網站, 這兩天都連不上。

這個網站是Debian的雜記及程式下單的維基, 其中有合作的下單程式-小蝦米, 前天在下載小蝦米一號試用版, 沒辦法連上時才發現, 最早是不能上網, 昨天中華電信來換過ADSL的數據機, 沒檢查網站是否正常, 晚上要用時, 才發現從外面連不進來, 區網內部是正的, 今天會來再更換ADSL的數據機, 兩天了,都在搞這個問題!

昨天換完ADSL的數據機,是早上9:50, 還來得及再掛上自動下單程式, 程式有正常下單, 昨天小賺50點。今天大漲, 網路連出去正常, 自動下單程式今天賺了約130點。

網路不正常, 及早通知後修複, 還好沒影響到程式下單, 這算是風險吧！

昨天看了中華電信ADSL的網頁, 看到ADSL好像降價了, 要去問問價格了。

2009年1-3月績效

2009-04-05T01:49:00.004+08:00

統計一下2009年1-3月績效

單口損益

一月 -230
二月 +169
三月 +354

原來三月會更好些, 到499左右, 可惜2,3,30,31這幾日有事(電腦有些問題),沒進場程式下單。

回測這幾天的績效
三月 2月 +60
三月 2月 +51
三月30月 +78
三月31月 -34
共 +145

損失不超過單月350以上, 這支下單程式, 我都會實際用小台來下單。

記錄一下

電腦不關機，自動下單程式每天自動下單

2009-03-25T23:49:00.007+08:00

今天開始測試電腦不關機，自動下單程式掛在那裡，讓程式每天自動下單，是否會執行，明天就會知道。

要這樣做，有幾個條件：

電腦不關機。

報價源要能掛在那裡，每天能自行運作，我是用台証的Office Quote來測，元大yeswin、康和全都賺這些都可以，台証超級大三元、康和E閃電等會斷線要求重連的看盤軟體是不行的。

自動下單程式要有定時重設的功能，或是用autoit這類有排程(時間到了會自行執行)管理的軟體也是可以。

下單主機不可關機。

做這個的目地是要弄個AI型的自動下單程式，每天能自行賺錢。

寶來點金靈環球通的DDE功能

2009-03-21T12:02:00.010+08:00

上個月底寶來營業員來找我，談及可能要寫下單程式(下單機)以及合作事宜，所以先在寶來開戶，拿到下單API相關檔案。

這兩天有空試試DDE，發現並不是真正的DDE，是程式(點金靈環球通)直接將報價寫入Execl儲存格中，無法從儲存格中看到DDE接收格式。

結果是有不少限制：

無法用外部程式自動開啟Execl收DDE功能，也就是要手動。
無法同時開啟兩個程式，同時接收相同的DDE，例如兩份DDE的台指期(大台)。
最後要同時開Execl檔，由點金靈環球通送到Execl，另一程式開Execl收資料，才能正常使用DDE的即時資訊。這個我沒試過，可能會有問題，改天寫支程式試試。

結論：寶來點金靈環球通算是偽DDE，並不好用，限制多，雖然可用，這是缺點，但也讓我有另一種思考方式，來處理這類程式，這算是優點吧。

寶來財富888也有DDE，在寶來主頁有說明，改天再試試。

DDE的定義用法 - 使用動態資料交換 (DDE) 建立連結

好吃不黏牙的台証Office Quote報價源

2009-02-05T03:43:00.011+08:00

前兩天(2009/02/02)收到台証營業員王先生幫我伸請的Office Quote，昨天花了30分鐘熟析，並改了程式中來源設定檔，以配合Office Quote當資訊來源來跑程式，有近月期貨可選用，小巧、操作簡便，是個好吃不黏牙的報價源，唯一要說的是，要一直使用這個Office Quote報價源，台証要求要達到每月約一百口大台的交易量，多了些，以及要在開盤前重連線，沒有重新連線，報價會進不來。

昨天試了一下，開台指期(大台)、現貨(大盤)報價，記錄使用Memory(記憶體/內存)的用量，並比較Office Quote、台証超級大三元、元大yeswin(越是贏)、康和E閃電-標準版、康和E閃電-I KNOW版。

Office Quote：5048K
yeswin ：97280K
台証超級大三元：28272k
康和E閃電-標準版：26600K
康和E閃電-I KNOW版：6648K

Office Quote真是小巧，不佔太多Memory，舊電腦跑起也會很順。

註：
1.Office Quote是艾揚的產品。
2.台証超級大三元及康和E閃電都是凱衛資訊的產品，程式名稱都是axis.exe。

資料是 2009-02-04 上午09：30以後抓的，附圖在我的(redjoe.tseng)picasa-Future相簿2009/02/05 內。

多個報價來源的必要性

2009-01-27T00:25:00.008+08:00

一般來說，程式交易下單，都是只有一個報價源，在報價源穩定時，沒什麼關係，但是當有狀況時，多個報價來源，對使用DDE Server當報價資訊來源，就是非常重要，不可能因此而停止每天的交易。

付費的報價資訊源是個很好的選擇，但是一般的小散戶(也就是我)，是無法支付這個費用，只好轉往免費的來源，如DDE，還好當今的看盤軟體都有這項功能，所以就要準備多個DDE來源，並對這些DDE源做優劣比較，這比較的部份在我之前的BLOG中有提及。

日盛HTS快易點的DDE

2009-01-27T00:10:00.004+08:00

記一下日盛HTS快易點的DDE
在日盛主頁->操作手冊下的 (9911) JIHSUN HTS DDE EXCEL

用起來應當是差不多(我沒有帳號)，有的人試試。

策略統計

2009-01-25T00:10:00.006+08:00

這裡所說的策略統計是指策略回測及實際策略下單。

策略回測，是依策略用舊資料來回頭測試績效，大部份的策略下單，都有軟體測過，只是每個人重視程度不同，這些測試資料大部分是用K線(１分鐘/５分鐘/１５分鐘/６０分鐘/日)，少部分是用tick。做波段用K線，當沖用tick或短K線(１分鐘/５分鐘)。

實際策略下單，則是自行程式記錄及期貨商的月報表，這部分大家較不注意，實際上自行程式記錄及期貨商會的月報表是會有些出入。

回測的效能(時間及精確度)，會依資料源及程式(軟體)，有很大不同。用 Execl VBA 來回測一年的tick或１分鐘K線，可想而知，會等很久，若要調策略參數最佳化，用 C++ / Delphi / VB 2005(2008) 等程式來撰寫，會較好速度快。C及VB5等會因作業系統(MS-Windows)不支援，漸漸變成孤兒。

程式交易的風險

2009-01-16T00:13:00.007+08:00

程式交易的風險有幾個部份

首先是策略，策略有問題，一定不賺錢．

排除了策略，再討論其他的風險（下單後無法即時平倉）

電腦故障，就是當機．
網路斷線，ISP提供的服務有問題
報價來源不正確（DDE收到錯誤價格），大約每家期貨商每年都會有幾次．
下單主機出狀況，以台証為例，要重連（要看公告），先前連上是無法下單．

除了這些，就是策略（下單）程式了，這部份的風險，才在開發軟體（寫程式）的人掌控中．

改了版面及加上留言在側邊

2009-01-03T15:31:00.005+08:00

改了版面, 修了計數器的背景顏色, 再動留言部份.

一直覺得留言(回應)是很重要, 這Blogger做的不好, 最後找到 lvchen 最新回應2.0 來囉！

改了後感覺還不錯, 就先用....

要安裝時, 先登, 再到中文版安裝頁面會自行幫你裝好...

程式交易核心

2009-01-03T11:13:00.002+08:00

程式交易核心(2008-09-18) from R.J Personal Wiki

報價資訊取得
- 期貨公司下單軟體 → DDE → Execl
- 艾楊 / 精誠iDQ 等報價資訊源
下單方式
- 期貨公司提供下單API
- 網頁 / 期貨公司 + AutoIt
策略
- 自行分析 - 程式 / 試算表統計
- TS之類軟體

Blogger 使用 Site States 的免費計數器

2009-01-03T01:55:00.005+08:00

原先是要裝 Google Analytics , 最後發現不合用, 找了Google, 在 http://stat.lab3.tw/ 有簡單好用的計數器, 就用這Site States了.(國人自製的, 愛用台灣製造)

是先找到 Site States 免費計數器 - PageRank, 線上人數, 累積人數多合一計數器的說明.

寫一下過程, 以免忘了

到 http://stat.lab3.tw/ 申請計數器.
填資料.
新增成功後, 有段 HTML 程式碼，貼到網站的側欄。
我的是blogger, 到版面配置 -> 網頁元素 -> 新增小工具, 找到 HTML/JavaScript 加入, 標題 : 統計資料, 內容 : 貼上 http://stat.lab3.tw/ 的 HTML 程式碼.
儲存後就OK了, 顏色要好看, 是要修改HTML 程式碼, 參考 http://stat.lab3.tw/ 的使用方法 .

康和E閃電的I KNOW

2009-01-01T14:22:00.008+08:00

康和E閃電有個I KNOW版本, 是個PANEL(面版)顯示, 看起來不錯, 查了(axis.exe)使用的記憶體用量(Memory),離峰時間只有幾M(約6M), 可以用在收DDE上, 比起標準版20M好了很多, 改天來試試.

因為是要用程式自動下單, 記憶體最好能省就省, 下單才會順些快些, 在滑移價差出現時, 會有些點數的差異...

那些網路環境(連線速度), 券商下單到交易所速度, 不是我們能控制的.

元大Yeswin(YSCP.exe)要用掉80多M的記憶體, 是多了些, 目前我是用這個收DDE, 因為不會斷線要我重連, 程式可以前一天就掛在上面, 不用早起開電腦看盤, 當然會有些風險(電腦當機, ADSL斷線, 券商無法下單平倉)啦, 我是較懶的人, 一定要用這方式.

其他的DDE來源也是要比一下CUP用量及記憶體用量.

今天找康和營業員，要在康和開期貨帳號-(搬2008/04/24)

2008-12-30T23:56:00.001+08:00

自己的yahoo部落格 - 2008/04/24 23:03

今天找康和營業員，要在康和開期貨帳號，他說會寄資料給我。

是有需要另外開個帳號，原寫程式的帳號鎖住，停了幾天。上網找了些程式下單的網頁，看來看去，覺得若是"專門寫股票期貨軟體"的公司，是要弄個像HTS類的軟體，專給這些有需要的交易人，可能要做的更強大些，最好能把簡單的編譯器、簡略的AI、及常用的K,D這類API都放上去，這樣就會非常方便。

要這樣做，可能要找個會OS、Compiler旳人來弄，在PCB行業，有很多CAM軟體開發商都有自行開發的環境，像GCCAM有GC-BASIC這類輔助語言，MS-Office有VBA這個好用的BASIC，大概就是這類語言。

HTS好像很接近，可是感覺還有些差距，我沒用過，改天到有提供HTS的期貨公司開個戶來試試。

另外，好像期貨公司只有微軟windows版本的軟體，windows XP快要(明年)不再提供更新，微軟windows換新版本就要換新電腦，不然跑不動。為何沒有Linux、Mac或Unic版本的軟體，方便更換不同的作業系統？，可能是成本考量吧，在國外應當會有不同OS版本的軟體。

--------------------------------------------------------------------------------------------
以上是搬家的文章

目前我的程式下單是用台証的, 康和程式下單要加$$

帳號登入被鎖住，暫時用測試帳號-(搬2008/04/24)

2008-12-30T23:52:00.001+08:00

自己的yahoo部落格 - 2008/04/24 22:06

這幾天帳號玩死了，測試下單部份無法工作，暫時停下來，改用測試帳號來測試，工作停了些天。

這個帳號在錯誤時都沒有提示錯誤，一般錯誤都會提示，可能是在程式中沒提示。上個月輸入元大的銀行，也是沒提示，只出一個按，按下去是繼續輸入，不知狀況下按了兩次，就鎖了，還真有"人性化設計"。

我是使用Delphi, BCB程式語言，劵商營業員提供的只有VB,Execl,Delphi，只有Execl是完整可執行，缺了些文件，改起來還不知是對是錯，目前只到能正常登入，Delphi與BCB,Execl登入後提示訊息都不同，下單Execl會帶出輸入CA(憑證)的對話窗，Delphi沒有，會有提示示窗，BCB 完全無動作。

昨天看到有人用康和的觸即式下單，還不錯用，是少了點功能，若不是都用自己寫的程式跑，還真需要用它。

--------------------------------------------------------------------------------------------
以上是搬家的文章

台証超級大三元也有(很多家都有這個功能)

在券商中的期貨職缺-(搬2008/04/22)

2008-12-30T23:51:00.001+08:00

自己的yahoo部落格 - 2008/04/22 11:24

這幾天在看券商的工作,看看那些是要具備的條件，好像都要 "具期貨商業務員執照"，這個真的很重要嗎?

等有空時，我應該去考個證照。

看到太X洋證券 ”電腦交易程式研發“，內容是“期貨電腦程式型態交易策略研發”，這個工作和我現在所做工作相近，只差在我現在期貨功力弱，很多東西要看Memo，無法一眼看出內容真象。

另外，上班時間都是8:00，實在是早了些，從桃園縣趕到台北內湖松山，是有困難的。

艾揚也缺人，上班時間9:00~18:00，要去應徵看看，那些下單的API沒文件，光看別的語言程式來改，還真辛苦。想問問其他寫下單交易程式的人，是怎麼寫的，有那些可參考。

--------------------------------------------------------------------------------------------
以上是搬家的文章

Tick資料，是用來測試即時的策略下單-(搬2008/04/20)

2008-12-30T23:46:00.001+08:00

自己的yahoo部落格 - 2008/04/20 00:09

Tick資料是用來測試即時的策略下單，
K線資料是策略模擬，找出好的(Rule)策略規則。

做期貨是要賺錢的，不要衝動，衝動賺不了錢。
重點

下單時間
下買/賣單
平倉時間

下單之後該怎麼做才是重要的。

決定損失與獲利

停損點數
停利點數
判斷的時間週期

這個市場裡面充滿了很多很多的錯誤，在這個錯誤很多的市場中, 你要比別人成功，唯一的方法，就是看誰犯的錯誤少，程式下單就是要避免這些人為的錯誤。

晴哥於2008/10/18 21:42 回應

嗨~ 請問R.J::

嗯 ~~ 您這篇是說 Back-testing 歷史數據時要以tick 去模擬以前當天內的即時環境嗎??

我也覺得應該是以 tick去作Back-testing 是最真實的 ^_^ 不知你這篇所表達的是否是這個意思呢??

R.J於2008/10/22 23:35回覆

測試當然是tick最好, 只是資料量太大了, 只好用K線(取樣後有些失真的值)來處理, 若都用tick, 一月的資料量處理起來就大多了,更不用說一年十年的 data, 保存也不易.

但有些細部只能用tick, 最近覺得1分K太粗糙了, 用30秒K可能效果會更好, 只是卷商都沒有30秒K.

--------------------------------------------------------------------------------------------
以上是搬家的文章

使用艾揚的即時傳送服務，程式下單有API-(搬008/04/19)

2008-12-30T23:39:00.001+08:00

自己的yahoo部落格 - 2008/04/19 23:46

艾揚的即時傳送服務，有些API，可以快速撰寫下單程式，再配合DDE，可按自己的Rule，弄出會賺錢的程式，每天一直不停的幫投資者賺錢。

對於期貨，我還是新手，有待加強，但是，我是寫這些半自動及AI軟體的老手，寫這些程式不成問題，希望能在期貨賺到錢。

過幾天，我的第一支有Rule下單程式要完成了，要正式下海開始賺錢了，賺錢賺錢賺錢，大家都賺錢。

R.J於2008/08/04 21:13 回應

1. 艾揚有提供的期貨/証卷商, 可在艾揚網頁->客戶->金融服務業查看 : 網頁 : http://www.icetech.com.tw/customers/ .
2. 打電話直接詢問艾揚.

我所知道艾揚即時傳送服務是要收費, 對金融業的散戶, 這費用應當是相當合理的.(這是我的推測)

註 : 我只是寫些規則及下單程式的程式撰寫員

Pei於2008/10/15 21:29 回應
艾揚是提供市場價格而已, 還是也有提供券商API 給散戶寫程式下單阿?

R.J於2008/10/22 23:41回覆
艾揚是有券商API(艾揚給券商的),只是一定要券商同意, 券商才會開門讓你登入券商的主機.

所以還是要從券商要到下單API, 才是正途

--------------------------------------------------------------------------------------------
以上是搬家的文章

程式交易系統論壇-(搬2008/04/19)

2008-12-30T23:33:00.001+08:00

自己的yahoo部落格 - 2008/04/19 05:19

找了好久的網路，沒有看到專門的 “程式交易系統” 討論論壇，

大部份只有部份內容。

----

股票盤後分析系統 openfoundry ( C / C++ )

VB 實例探討：股票分析系統(第零篇)

天生贏家 - http://www.crazys.net/stock/wwwboard.cgi
股市e起來 - http://www.setbb.com/wcnjan/
群益金融網 - 期貨
雅策資訊 - http://www.yassersoft.com/
自動下單 - http://yctseng.blogspot.com/2007/10/blog-post_8993.htm

自動下單機部份原碼使用Autoit 完成程式交易自動下單
阿政的投機生活自動下單
多帳號版下單機 - http://www.nisan.us/
日盛HTS
HTS的STS程式語法介紹
http://yctseng.blogspot.com/search/label/HTS

如何讓電腦傳簡訊給你

--------------------------------------------------------------------------------------------
以上是搬家的文章

股票家(Stock Chart)
聚財網-程式交易在期貨
Touchance-程式交易家
群益-程式交易討論區
程式交易俱樂部
HTS學園版 - http://www.nisan.us/modules/newbb/
天生贏家 - http://www.crazys.net/stock/wwwboard.cgi
股市e起來 - http://www.setbb.com/wcnjan/
群益金融網 - 期貨

全都賺1k資料最近300筆-(搬2008/03/15)

2008-12-30T23:31:00.001+08:00

自己的yahoo部落格 - 2008/03/15 05:01

康和全都賺在 "技術分析" 圖上點右鍵，選瀏覽歷史資料，會有最近大約3個月的1k資料，再按儲存到CSV檔。

--------------------------------------------------------------------------------------------
以上是搬家的文章

元大Yeswin的Tick資料-(搬2008/03/01)

2008-12-30T23:28:00.001+08:00

自己的yahoo部落格 - 2008/03/01 04:25

無意中找到元大Yeswin有Tick資料可下載，只要每天開Yeswin，再下載就可以了，不必開盤前打開自已寫的DDE接收程式。

註:若要自行寫出 "依Rule自動下單" 程式，這個DDE接收程式的功能還是要作出來。

--------------------------------------------------------------------------------------------
以上是搬家的文章

外包期貨程式-(搬2008/02/26)

2008-12-30T23:27:00.001+08:00

自己的yahoo部落格 - 2008/02/26 11:46

今天找資料時看到有人要找外包寫期貨的 " 移動平均線停損單"，本來是有興趣接來寫寫看，但接案要 "成為贊助會員"，這個很麻煩。

這幾天(快一個月了)在了解期貨，也試了一些東西，幾家期貨(康和、元大、台証)都能取得DDE，轉成K線。

是要寫下單程式了，要問問看那家期貨商有提供source code可參考，大概要花兩三個工作天。

註:寶來沒試過抓DDE，應該很快。

好像沒替自己廣告過，學的是資訊工程中的軟體工程。

我會linux(Debian)架站 web server(apache/tomcat) / mysql database / blog(Drupal/WordPress/b2evolution) / wiki(DokuWiki/Kwiki/DidiWiki/jspwiki/MediaWiki/PHPWiki/MoinMoin) / nfs / samba / ftp (好像沒人用了)

會寫程式 java / C++ (BCB/GCC) / JSP / PHP / Perl / COBOL

熟悉平台 Unix (HP-UX) / Linux(Debian/SuSE) / Windows(XP/2000/98/95) / DOS(應該沒人在用了)

--------------------------------------------------------------------------------------------
以上是搬家的文章

期貨統計程式-(搬2008/02/26)

2008-12-30T23:24:00.001+08:00

自己的yahoo部落格 - 2008/02/26 11:39

前些天在研究期貨自動下單程式，接下來是統計程式，也就是策略部份。

下載幾天的交易，要試一下會不會賺，用程式跑跑看。
最早是想用excel中的VBA去跑，擔心會太慢，要改成C++來跑。

--------------------------------------------------------------------------------------------
以上是搬家的文章

聚財網上的程式下單討論-(搬2008/08/08)

2008-12-30T23:08:00.001+08:00

自己的yahoo部落格 - 2008/08/08 01:48

今天看了聚財網理財論壇飆股理財&程式交易聯誼會凌波微步的下單環境,和我的有很大差異, 統計一下要 :

1.元大Yeswin
2.富達版Wealth-Lab
3.autoit軟體

自己寫的程式下單
1.有DDE看盤軟體(如元大Yeswin, 康和全都賺, 台証大三元)
2.Excel
3.自寫程式

只要開盤前
1.先打開看盤軟體
2.執行自寫程式(會自行開Excel收DDE)

這樣就OK了, 好像我的比較簡單.

其實我是比較想知道,可以同時開多個下單程式,收多個DDE
我的只能個別對映, 就是要一個DDE的看盤軟體對映一支下單程式,

當我有三組下單程式要下單時, 電腦loading太重, 跑不動, 一定要分在兩台電腦上.

最後還是要用 "艾揚的即時傳送服務" 的這類元件(與DDE功能相同), 可收送即時的多份成交價格給不同下單程式, 這才是正途

R.J於2008/09/29 16:10 回應
1.開元大Yeswin
2.要收DDE欄位打開
3.開Excel
4.把這個期貨/股票拉到Excel

就可到Excel看你要的DDE欄位

sanyo於2008/12/18 17:11 回應
請問要如何把dde 的小時.開盤.最高.最低.收盤.放到excel

R.J於2008/12/23 12:59回覆
顏色有問題, 重貼

不同的DDE來源, 有些不同,
以台証超級大三元為例:

1.選單->客戶服務
2.0720DDE EXCEL
3.選代碼(商品名稱)
4.選項目(有時間)
5.按新增鈕
6.按送至EXECL鈕

(可以看EXECL中的代碼)
很簡單
--------------------------------------------------------------------------------------------
以上是搬家文章

台証的超級大三元看盤下單軟體-(搬2008/10/23)

2008-12-30T22:59:00.002+08:00

自己的yahoo部落格 - 2008/10/23 00:16

這幾天用了台証超級大三元及 康和e閃電 後, 發現是同家軟體公司的產品, 兩者的DDE設定完全一樣,優點在 2008/10/05 - 康和的e閃電看盤下單軟體 說過了.

這裡要說的是缺點及限制.

1. 這個自訂報價及DDE設定, 要手動換月, 很不方便, 應當要有近月的功能.
2. 每天開盤前會斷線, 強迫重新連線, 這個太不合理了, 08:00 才預登入, 又要再登入, 若是Execl開好要收DDE, 斷線重登會收不到, 要我用這個當主要的看盤軟體兼收DDE, 是無法接受的.

註: 台証超級大三元 無記憶 password 功能, 而 康和e閃電 則有.

R.J於2008/12/09 21:38 回應
康和e閃電可記憶帳號及密碼, 比較方便.

寶貝瘋於2008/12/15 16:19 回應

根據我的了解，台証軟體重新連線時間已提早到七點出頭，所以只要在七點十分後登入的都不會再斷線重登了。這訊息分享給各位。

也觀迎蒞臨我的部落格，希望有機會為您們來服務。http://gingerkingcanwin.blogspot.com/

R.J於2008/12/16 07:58回覆

只要是斷線重登, 就不方便, 現是用康和全都賺及元大yeswin, 元大的yeswin一直掛著, 大約兩三星期重開, 占電腦資源又少, 在國內盤是首選, 全都賺有國外盤, 是國外期指取得即時資訊, 給自動下單不可或缺的, 當然也是最少掛一兩星期..

R.J於2008/12/29 00:15回覆

這部份是無法分享的, 和我合作的人都有策略設計, 是有智慧財產權. 大部份這類下單程式都會收費, 可以找到付費下單程式.

不會寫程式我可以按鐘點(上課)教你, 或是代你寫程式.

下單程式(不含策略), 是可以分享的.

--------------------------------------------------------------------------------------------
以上是搬家文章

2009-01-06
加Picture(picasa)

http://picasaweb.google.com/redjoe.tseng/RJFuture#5288199144951068930

http://picasaweb.google.com/redjoe.tseng/RJFuture#5288199154772288690

康和的e閃電看盤下單軟體-(搬2008/10/05)

2008-12-30T22:49:00.001+08:00

自己的yahoo部落格 - 2008/10/05 01:35

前天下載了 "康和的e閃電", 試用了一下, 發覺不錯,

哈!, 我不是康和的營業員, 我是康和的客戶, 這都不是重點, 重點是有DDE, 且很方便, 對一般操作人員非常友善, 對我而言是多了一組DDE來源, 只可惜沒有國外的DDE可收, 只有全都賺有國外的報價DDE, 可接到Execl.

以下是一些我認為不錯的功能:
一分鐘K線:
技術分析->再k線圖中按右鍵, 會出現選單, 選倒數第三個"傳送至 Excel", 就會存成 .csv檔, 只有當天的, 這部份比 "全都賺" 差, 全都賺會有最近兩個多月的一分K線.

康和e閃電 DDE:
選單 : 客戶服務->0720DDE EXCEL, 再按 "傳送至 Excel"

假設要知道總委買口數
把委買量1~委買量5 都丟到Excel, 在Execl或程式中加總, 就是總委買口數

還有一個功能, 就是警示下單, 可以設定到某一價格, 會下單或提示訊息, 可惜我已自行寫了這個功能.(全都賺有外掛可做到這個功能)

下單還有多筆下單功能, 也就是下20口, 會是20筆一口單.

好像無法存Tick, 有點可惜了

R.J於2008/10/07 01:06回覆
元大只有委買量1, 無法算總委買口數
永豐的Eleader好像也有, 我沒用過, 只聽人提過有下單API

怒漢於2008/10/06 07:43 回應
大大還有康和e閃電總委買口數
DDE 的寫法也一樣嗎懇請大大幫忙
小弟還不太會Excel 謝謝

ryan於2008/12/24 00:02 回應
E閃電
連"傳送至 Excel"都不用按，
只要一開始有先打開DDE一次，
再把設定－環境設定－初始啟動畫面－最後畫面，打勾好後，
以後只要啟動E閃電就可以直接傳送DDE資料，
參考一下！

R.J於2008/12/25 07:35回覆
寫下單程式收DDE,就是用這種方法.

把收DDE的檔(EXECL檔或是CSV檔)先準備好, 先開有DDE看盤軟體, 再開收DDE的EXECL檔或是CSV檔, EXECL就會自動收到DDE.

康和E閃電及台証超級大三元都要注意換月(沒有近月), 以及會斷線重連的問題.
--------------------------------------------------------------------------------------------
以上是搬家文章

這幾天要動手寫VB的下單程式-(搬2008/12/29)

2008-12-30T21:49:00.001+08:00

自己的yahoo部落格 - 2008/08/04 21:41

最近在青輔會教VB2005(.net) ,以前都是上JAVA, JSP, 系統分析與設計, 終於強迫自己使用VB2005了

拿到的大部份下單程式, 有50%是VB6, 其他如Delphi, C++(MFC, VC), VBA(Execl)等等, 因為以前一路都是在M$的環境下, 開發應用軟體程式, 從DOS 3.x, Win 95, Win 98, Win 2000, 經過多年, 發現會很累, 於是改成JAVA, 可是JAVA的下單API大都沒有,只好改用其他程式語言, BCB較熟, 這陣子Delphi也用熟了, 最近VB2005也熟了, 順便寫寫策略下單程式, 練練程式.

回應(1)
--------------------------------------------------------------------------------------------
以上是搬家文章
回應是沒辦法了..

我是用台証的api, 康和也有了api(VB), 因為台証已在RUN了, 所以沒寫..

--------------------------------------------------------------------------------------------
實際上做的不好

R.J 2008-12-30

有DDE的看盤軟體-(搬2008/06/03)

2008-12-30T20:34:00.001+08:00

自己的yahoo部落格 - 2008/06/03 17:36

今天看盤時，在看盤軟體上東看西看，查到看盤軟體(台証大三元)上的開發商(聲達)，連了過去，發現台証大三元也有DDE，抓DDE的方法和yeswin差不多，一樣是把股票/期貨名稱拉到Excel後，就可以配合程式下單了。

統計一下有DDE的，且我有用過的看盤軟體，康和全都賺、元大yeswin、台証大三元。只是有些奇怪，以前為何台証的營業員不說自家的看盤軟體有DDE，可能是這些看盤軟體都是別人寫的吧。

股市小達人於2008/07/07 15:15 回應
請問是否要支援DDE才能夠寫自動下單呢?
R.J於2008/08/04 21:17 回應
自動下單不需要DDE, 要即時取得股票/期貨的價格,才要DDE這類的東西.

Steven於2008/10/22 14:13 回應
可以試試 www.touchance.com 包含 Excel, TradeStation 自動下單

晴哥於2008/10/22 22:42 回應
剛去看過這網站ㄌ...www.touchance.com 我覺得就是下單機嘛 !! 只是包裝ㄉ比較好看而已 !!
因為這家公司剛成立不久 , 裡面的 FAQ 可以將即時報價有導入Global Server嗎
其最基本的報價直接導入Global Server和回補功能竟也還未建立起來 ,,
醬就要為程式交易者 " 服務 " =收費 ,, 哎.......
如果沒有比別家強 ,那誰願意當冤大頭讓你實驗當白老鼠呢 ??

R.J於2008/10/22 23:47回覆
這個 Global Server 是別人的產品, 且不用 Global Server 就可以程式交易.
我是沒用過 Global Server 的, 連 TradeStation 我也沒用過.. Ha..

R.J於2008/10/29 22:18
超級大三元沒有近月的期貨, 每次換月都很麻煩, 還有就是會在08:26分左右清盤斷線, 程式沒辦預先掛在那, 所以是不能用,
殘念...
--------------------------------------------------------------------------------------------
以上是搬家文章

康和e閃電及台証超級大三元也有DDE(同家軟體公司的產品)

使用Google Analytics記錄訪客計數器和統計資料

2008-12-28T23:34:00.002+08:00

裝好blog,首要是調整好blog版面配置及設定,
計數器及統計資料要參考這篇http://abintech.azhai.org/2007/02/google-analytics.html來設定, 還沒動, 要等有空再做.

會搬家是因為yahoo會在文章內容最後加上廣告, 不相關的廣告無法移除, 要成為較專業部落格, 不要有亂七八糟的廣告.

我希望是加些期貨股票的相關的廣告, 有些是期貨商的廣告, 最好是程式下單的廣告.

原來在yahoo的文章會先整理過,再轉貼到這裡,