こんにちは。

今日はなぜか早起きしてしまったので、UWSCで勉強がてら
イザナミ起動から検証してシグナルをクリップボードにコピーするところまで
自動でやっちゃうコードを作成しました。

あくまでもサンプルですので、下記のコードを使って不具合がおきても責任は取れませんので
自己責任で使用するようにしてください
Public ○○は環境に応じて変更してください
Public IZANAMI_PATH  = "C:\Program Files (x86)\izaneo\izaneo.exe"
Public IZANAMI_TITLE = "株システムトレードソフト イザナミ - Version 2.1.04"
Public CSV_TITLE     = "CSV出力設定"

WID = RUN_IZANAMI()
ACW(WID,0,0)
PUSH_BTN(WID, 3)  //開始
PUSH_BTN(WID, 2)  //検証する
PUSH_BTN(WID, 13) //実行
PUSH_BTN(WID, 6)  //最適分散投資
PUSH_BTN(WID, 14) //実行
COPY_RESULT(WID)  //出力をクリップボードにコピー

EXIT

Function RUN_IZANAMI()
  ifB FOPEN(IZANAMI_PATH, F_EXISTS) = FALSE
    MSGBOX("IZANAMI_PATH is wrong.")
    ExitExit
  endIf
  Result = getid(IZANAMI_TITLE)
  IF Result = -1
    EXEC(IZANAMI_PATH)
    WHILE Result = -1
      SLEEP(0.5)
      Result = getid(IZANAMI_TITLE)
    WEND
  ENDIF
  SLEEP(1)
Fend

Procedure PUSH_BTN(WID, BTN_ID)
  CLKITEM(WID,"",CLK_BTN,TRUE,BTN_ID)
  SLEEP(3)
  REPEAT
    SLEEP(0.5)
  UNTIL STATUS(WID, ST_ACTIVE) AND !STATUS(WID, ST_BUSY)
  SLEEP(1)
Fend

Procedure COPY_RESULT(WID)
  CLKITEM(WID,"",CLK_BTN,TRUE,10) //CSV
  CSVID = getid(CSV_TITLE)
  ACW(CSVID,0,0)
  CLKITEM(CSVID,"OK")           //OK
  ACW(WID,0,0)
Fend
私の環境だと問題なく動いたのですが、ここで止まっちゃうなどがあれば
コメントいただけると対応できる範囲で調べて見ます
想像以上に簡単に操作できそうです。
これから普段やってる作業で自動化できそうなものは自動化していきたいと思います

とりあえず、NYダウのCSVをダウンロードしてシグナルを出す部分を自動化したいです 

イザナミの売買ルール比較サイトを作成しました

イザナミストラテジー比較サイト

使い方を紹介した記事はこちら=>ストラテジー比較サイト作ってみました。




当ブログはイザナミを使用してシストレを運用中 株システムトレードソフトイザナミ
『株システムトレードソフト イザナミ』♪無料ダウンロード♪