input: Length(5),Length2(10), VolFactor1(2),_BuyOrSell(1, "進／出場", inputkind:=Dict(["買進",1],["賣出",0]));


if barfreq<> "Min" or barinterval <> 5 then raiseruntimeerror("頻率設定錯誤");



SetInputName(1, "均量區間");
SetInputName(2, "主力買賣區間");
SetInputName(3, "估計量是昨量幾倍");
SetInputName(4, "買進=1；賣出=0");

settotalbar((10+5)*54);




variable: _prebark(0);
variable: _buyprice(0);
variable: _canbuycheck(0);
variable: _canbuyk(0);
variable: _highestvol(0);
variable: _highestprice(0);
variable: _movehprice(0);
variable: _mainpowerbuycheck(0);
variable: _buyTotal1(0);
variable: _buyTotal2(0);
variable: _buyTotal3(0);
variable: volTotal(0);



_prebark = (maxlist(Length,Length2)+5)*54;


//--------------------------------



if GetFieldDate("主力買賣超張數","D") = Date then

	_buyTotal1 = getfield("主力買賣超張數","D")

else

	_buyTotal1 = getfield("主力買賣超張數","D")[1];


If _mainpowerbuycheck = 1 then ret =1;

Print(file( "C:\alert6\print\" ),"cur time = ",date, FormatTime("HH:mm:ss",time), 
"date",GetFieldDate("主力買賣超張數","D"),
"主力買賣超",GetField("主力買賣超張數","D")[1]
);