calcAVなどを使うときのちょっとしたコツ

-calcAVなどを使うときのちょっとしたコツ-


calcAVなどのcalc○○を使うときにはcalcAV('配列変数',Dno-varA+1)という風にしないといけません

で、'close'などを使う際にはそのままでいいのですが、自分で独自の計算を組んでcalcAVを使いたいと思ったときにちょっと困っていませんか？

そんなときは


usertemp1[dno]:=組みたい独自の計算

calcAV('usertemp1',Dno-varA+1)


のようにすれば、自分が組みたい計算を簡単に使えます


以下に、使用例を書いておきます(5日移動平均の3日移動平均)

varA:=5;
varB:=3;

usertemp1[dno]:=calcAV('close',Dno-varA+1);
usersisu1[dno]:=calcAV('close',Dno-varB+1);


これができるようになるとマクロの幅が広がると思いますので

決算日の確認方法

-決算日の確認方法-

東証のHPで確認できるようです

URL　http://www.tse.or.jp/listing/kessan/index.html


東証TOPからの行きかた

HOME→上場会社情報→決算発表予定日などの一覧→決算発表予定日などの一覧

で行けるようです。



ちょっと下のほうにある(マウスの真ん中をコロコロと少し回す程度)


決算等の発表会社予定日一覧

と書いてあるところの上から2つ目のが使い勝手がいいです

新しいリンク先の追加

サイト名

-テクニカル分析講座-

Excel＆VBAを使ったテクニカル分析を紹介しています

時間軸での売買方法

-時間軸での売買方法-

--------------------------------------------------------------------
if (Dno > buydno(1) + 4) then tenbai;
--------------------------------------------------------------------

買った5日後の寄付きで売り
buydno(1)は最新の取引という意味
買い条件にBuyP=0は必須

TrackRecordについて

-シュミレーションのTrackRecordについて-

-----------------------------------------------------------------------------
{$DefResult}

for i:=0 to MaxRecord-1 do begin
  a := TrackRecord(temp, i);
  writedata(black,12,30,80+i*25, temp[0]+'/'+temp[1]+'/'
    +temp[2]+'/'+temp[3]+'/'+temp[4]+'/'+temp[5]+'/'
    +temp[6]+'/'+temp[7]+'/'+temp[8]);
end;

{$DefEnd}
-----------------------------------------------------------------------------

Arry配列要素の意味。

０．取引No.
１．約定日
２．売買の区分
３．株価
４．手仕舞い日
５．手仕舞いの株価
６．手数料
７．損益
８．利益率　

ここではtempをvarで定義して、temp[0]=取引No　～　temp[8]=利益率にしている
{$Defresult}  {$Derend}　もマクロの中に書かないといけない
各位置はマクロの雛形1参照
手数料を入れると、6、7がきりの悪い数字になる(このときは手数料0を推奨)


-手数料と利益率を除いた記述-
----------------------------------------------------------------------
{$DefResult}

for i:=0 to MaxRecord-1 do begin
  a := TrackRecord(temp, i);
  writedata(black,11,30,100+i*25, '/'+temp[1]+'/'
    +temp[2]+'/'+temp[3]+'/'+temp[4]+'/'+temp[5]+'/'+temp[7]+'/');
end;

{$DefEnd}
-----------------------------------------------------------------------

チャート画面内に指数を表示

-チャート画面内に指数を表示-

usersisu1[dno]:=(usertemp1[dno]/75)*(close[enddno]/10) + 0.8*close[enddno];

/usertemp1[dno]が指数
/この指数は50を中央として、だいたい0～100の間で動く指数

Fchart独特のFor構文

-Fchart独特のFor構文-

/--------------------------------------
/ ProGo　(終値－寄付値)の14日単純移動平均
/--------------------------------------

SisuName:=ProGo;

var i,sum,para;

begin

SisuColor1:=red;
para:=14;
sum:=0;
for i:=Dno-para+1 to Dno do
sum:=sum+Close[i]-Open[i];
UserSisu1[Dno]:=sum/para;

debugout(close[i],open[i],close[i]-open[i],sum, usersisu1[Dno]);

end;