diff options
-rw-r--r-- | ROM.lps | 72 | ||||
-rw-r--r-- | romunit.pas | 2 |
2 files changed, 37 insertions, 37 deletions
@@ -17,9 +17,9 @@ <IsPartOfProject Value="True"/> <IsVisibleTab Value="True"/> <EditorIndex Value="1"/> - <TopLine Value="286"/> - <CursorPos Y="306"/> - <FoldState Value=" T3iC04043 pidqc0A1I"/> + <TopLine Value="775"/> + <CursorPos X="20" Y="800"/> + <FoldState Value=" T3iC04043T"/> <UsageCount Value="110"/> <Loaded Value="True"/> </Unit1> @@ -59,121 +59,121 @@ <JumpHistory Count="30" HistoryIndex="29"> <Position1> <Filename Value="ROM.lpr"/> - <Caret Line="320" Column="33" TopLine="298"/> + <Caret Line="16" Column="42"/> </Position1> <Position2> <Filename Value="ROM.lpr"/> - <Caret Line="322" Column="33" TopLine="298"/> + <Caret Line="243" Column="9" TopLine="242"/> </Position2> <Position3> <Filename Value="ROM.lpr"/> + <Caret Line="16" Column="42"/> </Position3> <Position4> <Filename Value="ROM.lpr"/> - <Caret Line="16" Column="42"/> + <Caret Line="238" Column="45" TopLine="209"/> </Position4> <Position5> <Filename Value="ROM.lpr"/> - <Caret Line="243" Column="9" TopLine="242"/> + <Caret Line="241" Column="15" TopLine="212"/> </Position5> <Position6> <Filename Value="ROM.lpr"/> - <Caret Line="16" Column="42"/> + <Caret Line="225" Column="3" TopLine="204"/> </Position6> <Position7> <Filename Value="ROM.lpr"/> - <Caret Line="238" Column="45" TopLine="209"/> </Position7> <Position8> <Filename Value="ROM.lpr"/> - <Caret Line="241" Column="15" TopLine="212"/> + <Caret Line="284" Column="42" TopLine="257"/> </Position8> <Position9> <Filename Value="ROM.lpr"/> - <Caret Line="225" Column="3" TopLine="204"/> + <Caret Line="19" Column="58" TopLine="3"/> </Position9> <Position10> <Filename Value="ROM.lpr"/> + <Caret Line="40" TopLine="22"/> </Position10> <Position11> <Filename Value="ROM.lpr"/> - <Caret Line="284" Column="42" TopLine="257"/> + <Caret Line="117" TopLine="100"/> </Position11> <Position12> <Filename Value="ROM.lpr"/> - <Caret Line="19" Column="58" TopLine="3"/> + <Caret Line="216" Column="56" TopLine="198"/> </Position12> <Position13> <Filename Value="ROM.lpr"/> - <Caret Line="40" TopLine="22"/> + <Caret Line="250" Column="22" TopLine="219"/> </Position13> <Position14> - <Filename Value="ROM.lpr"/> - <Caret Line="117" TopLine="100"/> + <Filename Value="romunit.pas"/> + <Caret Line="30" TopLine="28"/> </Position14> <Position15> <Filename Value="ROM.lpr"/> - <Caret Line="216" Column="56" TopLine="198"/> + <Caret Line="19" Column="58"/> </Position15> <Position16> <Filename Value="ROM.lpr"/> - <Caret Line="250" Column="22" TopLine="219"/> + <Caret Line="37" TopLine="19"/> </Position16> <Position17> - <Filename Value="romunit.pas"/> - <Caret Line="30" TopLine="28"/> + <Filename Value="ROM.lpr"/> + <Caret Line="99" TopLine="83"/> </Position17> <Position18> <Filename Value="ROM.lpr"/> - <Caret Line="19" Column="58"/> + <Caret Line="19" Column="7"/> </Position18> <Position19> <Filename Value="ROM.lpr"/> - <Caret Line="37" TopLine="19"/> + <Caret Line="36" Column="7" TopLine="7"/> </Position19> <Position20> <Filename Value="ROM.lpr"/> - <Caret Line="99" TopLine="83"/> + <Caret Line="95" Column="26" TopLine="66"/> </Position20> <Position21> <Filename Value="ROM.lpr"/> - <Caret Line="19" Column="7"/> + <Caret Line="96" Column="11" TopLine="67"/> </Position21> <Position22> <Filename Value="ROM.lpr"/> - <Caret Line="36" Column="7" TopLine="7"/> + <Caret Line="205" Column="18" TopLine="176"/> </Position22> <Position23> - <Filename Value="ROM.lpr"/> - <Caret Line="95" Column="26" TopLine="66"/> + <Filename Value="romunit.pas"/> + <Caret Line="30"/> </Position23> <Position24> - <Filename Value="ROM.lpr"/> - <Caret Line="96" Column="11" TopLine="67"/> + <Filename Value="romunit.pas"/> + <Caret Line="888" Column="63" TopLine="871"/> </Position24> <Position25> - <Filename Value="ROM.lpr"/> - <Caret Line="205" Column="18" TopLine="176"/> + <Filename Value="romunit.pas"/> + <Caret Line="1009" TopLine="975"/> </Position25> <Position26> <Filename Value="romunit.pas"/> - <Caret Line="30"/> + <Caret Line="13" Column="64"/> </Position26> <Position27> <Filename Value="romunit.pas"/> - <Caret Line="888" Column="63" TopLine="871"/> + <Caret Line="272" Column="22" TopLine="243"/> </Position27> <Position28> <Filename Value="romunit.pas"/> - <Caret Line="1009" TopLine="975"/> + <Caret Line="276" Column="47" TopLine="265"/> </Position28> <Position29> <Filename Value="romunit.pas"/> - <Caret Line="13" Column="64"/> </Position29> <Position30> <Filename Value="romunit.pas"/> - <Caret Line="272" Column="22" TopLine="243"/> + <Caret Line="30" Column="23"/> </Position30> </JumpHistory> </ProjectSession> diff --git a/romunit.pas b/romunit.pas index 761bd68..cc2a2ef 100644 --- a/romunit.pas +++ b/romunit.pas @@ -797,7 +797,7 @@ begin setlength(tdat,length(dat)); for i:=0 to length(dat)-1 do tdat[i]:=dat[i]; - setlength(dat,round(xLen/tmp+1)); + setlength(dat,min(3*length(dat),round(xLen/tmp+1))); j:=0; for i:=0 to length(dat)-1 do begin dat[i]['x']:=tdat[0]['x'] + xLen*i/(length(dat)-1); |