SRL Archive - SRL Archives

[PHP]Procedure FindDTMRotate(DTM, X, Y, X1, Y1, X2, Y2, StartAngle, EndAngle, DistAngle : Integer);
Var
E : Extended;
begin
StartAngle:= round(StartAngle * 3.141592653589793238462643383279502884197169399375105820974944592307816406286208998628034825342117067982148086513282306647093844609550582231725359408128481117450284102701938521105559644622948954930381964428810975665933446128475648233786783165271201909145648566923460348610454326648213393607260249141273724587006606315588174881520920962829254091715364367892590360011330530548820466521384146951941511609)
EndAngle:= round(EndAngle * 3.141592653589793238462643383279502884197169399375105820974944592307816406286208998628034825342117067982148086513282306647093844609550582231725359408128481117450284102701938521105559644622948954930381964428810975665933446128475648233786783165271201909145648566923460348610454326648213393607260249141273724587006606315588174881520920962829254091715364367892590360011330530548820466521384146951941511609)
FindDTMRotated(DTM, X, Y, X1, Y1, X2, Y2, StartAngle, EndAngle, DistAngle, E)
end;[/PHP]

this way you dont have to worry about using Pi (some mioght know it as Pie(3.14…) or radians now it is in degrees. i could have gootten pi to the millionth place ill post a script with the millionthy place of Pi :p. later on :p.

3.141592653589793238462643383279502884197169399375105820974944592307816406286208998628034825342117067982148086513282306647093844609550582231725359408128481117450284102701938521105559644622948954930381964428810975665933446128475648233786783165271201909145648566923460348610454326648213393607260249141273724587006606315588174881520920962829254091715364367892590360011330530548820466521384146951941511609)

I don't think that is long enough..:p

if your seriuos ill put it to the millionth there… that should be :p.

heck i will for fun.

I was kidding, I was kidding!