變數紀錄創新高價格, 但要使用時卻變為0

Input:intime(090300, "進場時間時間, 最大不能超過132450");

value1=GetField("最高價", "D");

if Position =0 and currenttime > intime then

begin

    SetPosition(-1, Market);

todayhigh = value1; {進場時記錄當下高點}

         print("datryede.txt", "In", todayhigh);

end;

if Position <> 0 then

begin

if closeD(0) > todayhigh then {過今日高點並寫下log}

begin

setposition(0,Market);

print("datryede.txt", "out", closeD(0), todayhigh, HighD(0));{<----此行顯示todayhigh是0.0}

end;

end;

求解該行 print("datryede.txt", "out", closeD(0), todayhigh, HighD(0));  

為什麼取得的是0.0?  或是我該怎麼調整?