If Position <> lastPos Then Begin
print("=== 倉位變化偵測 ===");
print("時間=", NumToStr(date,0),NumToStr(Time,0), "倉位=", Position, ", 平均成交價=", NumToStr(FilledAvgPrice, 2));
lastPos = Position;
End;
if filled > 0 and stopgain[1] <> stopgain then begin
stopgain = filledAvgPrice+100;
setposition(0,stopgain);
print ("stopgain price =", stopgain,stopgain[1] );
end;
if filled < 0 and stopgain[1] <> stopgain then begin
stopgain = filledAvgPrice-100;
setposition(0,stopgain);
print ("stopgain price =", stopgain,stopgain[1]);
end;
下面的stop gain 有時無法打印
6 評論