ArcPixel lX, lY, lTempX, lTempY, dStart, dEnd ArcPixel lX, lY, -lTempX, lTempY, dStart, dEnd ArcPixel lX, lY, lTempX, -lTempY, dStart, dEnd ArcPixel lX, lY, -lTempX, -lTempY, dStart, dEnd
Do If S < 0 Then S = S + 2 * lBeta * (2 * lTempX + 3) T = T + 4 * lBeta * (lTempX + 1) lTempX = lTempX + 1 ElseIf T < 0 Then S = S + 2 * lBeta * (2 * lTempX + 3) - 4 * lAlpha * (lTempY - 1) T = T + 4 * lBeta * (lTempX + 1) - 2 * lAlpha * (2 * lTempY - 3) lTempX = lTempX + 1 lTempY = lTempY - 1 Else S = S - 4 * lAlpha * (lTempY - 1) T = T - 2 * lAlpha * (2 * lTempY - 3) lTempY = lTempY - 1 End If
ArcPixel lX, lY, lTempX, lTempY, dStart, dEnd ArcPixel lX, lY, -lTempX, lTempY, dStart, dEnd ArcPixel lX, lY, lTempX, -lTempY, dStart, dEnd
上一篇:取汉字拼音首字母的存储过程
下一篇:ASP防止网页频繁刷新的方法介绍
|