All pastes #203340 Raw Edit

Anonymous

public text v1 · immutable
#203340 ·published 2006-10-15 02:22 UTC
rendered paste body
Local sCoordFromX:Int = Int(Left(sCoordFrom,Instr(sCoordFrom,",")-1))-iSize/2-1
Local sCoordFromY:Int = Int(Right(sCoordFrom,Len(sCoordFrom)-Instr(sCoordFrom,",")))-iSize/2-1
Local sCoordToX:Int = Int(Left(sCoordTo,Instr(sCoordTo,",")-1))-iSize/2-1
Local sCoordToY:Int = Int(Right(sCoordTo,Len(sCoordTo)-Instr(sCoordTo,",")))-iSize/2-1

Local FromAngle:Double = ATan(sCoordFromY/sCoordFromX) + iRotate
Local ToAngle:Double = ATan(sCoordToY/sCoordToX) + iRotate
Local FromDistance:Double = Sqr(sCoordFromX^2 + sCoordFromY^2)
Local ToDistance:Double = Sqr(sCoordToX^2 + sCoordToY^2)

Local newFromX:Int=FromDistance*Cos(FromAngle)
Local newFromY:Int=FromDistance*Sin(FromAngle)
Local newToX:Int=ToDistance*Cos(ToAngle)
Local newToY:Int=ToDistance*Cos(ToAngle)

DrawLine newFromX, newFromY, newToX, newToY