python绘制蝴蝶曲线_如何编程实现蝴蝶函数曲线
双击commmand1进行代码区域,在代码区域中过程选择click,对象选择commmand1,输入绘图代码:
Picture1.Scale (-10, 10)-(10, -10)
Picture1.Line (-10, 0)-(10, 0), RGB(255, 255, 255)
Picture1.Line (0, -10)-(0, 10), RGB(255, 255, 255)
Picture1.Line (0, 10)-(-0.125, 9.5), RGB(255, 255, 255)
Picture1.Line (0, 10)-(0.125, 9.5), RGB(255, 255, 255)
Picture1.Line (10, 0)-(9.5, 0.125), RGB(255, 255, 255)
Picture1.Line (10, 0)-(9.5, -0.125), RGB(255, 255, 255)
For i = -720 To 720 Step 0.01
x = Sin(i) * (Exp(Cos(i)) - 2 * Cos(4 * i) - Sin(i / 12) ^ 5)
y = Cos(i) * (Exp(Cos(i)) - 2 * Cos(4 * i) - Sin(i / 12) ^ 5)
Picture1.PSet (x, y), RGB(255, 0, 0)
Next i
双击commmand1进行代码区域,在代码区域中过程选择click,对象选择commmand1,输入绘图代码: Picture1.Scale (-10, 10)-(10, -10) Picture1.Line (-10, 0)-(10, 0), RGB(255, 255, 255) Picture1.Line (0, -10)-(0, 10), RGB(255, 255, 255) Picture1.Line (0, 10)-(-0.125, 9.5), RGB(255, 255, 255) Picture1.Line (0, 10)-(0.125, 9.5), RGB(255, 255, 255) Picture1.Line (10, 0)-(9.5, 0.125), RGB(255, 255, 255) Picture1.Line (10, 0)-(9.5, -0.125), RGB(255, 255, 255) For i = -720 To 720 Step 0.01 x = Sin(i) * (Exp(Cos(i)) - 2 * Cos(4 * i) - Sin(i / 12) ^ 5) y = Cos(i) * (Exp(Cos(i)) - 2 * Cos(4 * i) - Sin(i / 12) ^ 5) Picture1.PSet (x, y), RGB(255, 0, 0) Next i