关于阿基米德螺旋线的

stxuhong

请能给个TC4.028 Bate版本能用的阿基米德螺旋线的代码呢，麻烦大家了，之前3.0放去4.0不能用了

Sky_Pro

回复 3楼stxuhong的帖子

1. 功能 开始运行()
   
2. //*********绘制阿基米德螺旋线*********
   
3. //*阿基米德螺旋线的标准极坐标方程为
   
4. //ρ=at+P0
   
5. //式中：
   
6. //a—阿基米德螺旋线系数，mm/°，表示每旋转1度时极径的增加（或减小）量；
   
7. //t—极角，单位为度，表示阿基米德螺旋线转过的总度数；
   
8. //p0—当t=0°时的极径，mm。
   
9. //***p0为初始极径
   
10. 初始极径 = 1 // 这个的值是控制初始的内圈大小，值越大，内圈越大
    
11. 倍数 = 2 //放大倍数,这里也可以根据情况做调整
    
12. 系数=1 //阿基米德螺旋线系数
    
13. 圆周率 = 3.1415926
    
14. 半径,极角
    
15. ////画线的起始点坐标(起始x,起始y)
    
16. // 表示的是要从那一点开始为基准点，逐渐向外扫描
    
17. 起始x=670,起始y=400
    
18. 终点x,终点y
    
19. 极角=圆周率/2
    
20. ///////移动到起点
    
21. 鼠标.移动(起始x,起始y+倍数*初始极径+系数*极角)
    
22. 辅助.等待(2)
    
23. // 按下鼠标左键开始准备画线。具体在游戏里使用的时候，这句要去掉
    
24. // 因为这里是要在画板里画线看执行效果才加的鼠标按下命令
    
25. 鼠标.左键按下()
    
26. 遍历(i=0;i<3000;i++) // 这里表示一共执行3000次。 具体要执行多少次。根据不同情况调整
    
27. 半径 = 初始极径+系数*极角 //表示的是圆的半径
    
28. // 计算鼠标移动的下一点坐标位置
    
29. 终点x = 起始x+类型.转整型(倍数*半径*数学.余弦值(极角))
    
30. 终点y = 起始y+类型.转整型(倍数*半径*数学.正弦值(极角))
    
31. // 极角的增加值越大，跨的角度就越大。这个值的大小，可以自我调整达到理想状态
    
32. // 比如增加量可以用以下的值 0.02 0.03 0.05 0.07 0.08 0.1 ……
    
33. // 值越大，跨的角度越大，误差越大，但是消耗的时间短
    
34. // 值越小，跨的角度越小，误差越小，但是消耗的时间长
    
35. 极角 = 极角 + 0.01 // 极角 = 极角 + 0.05
    
36. // 鼠标移动到下一点的位置，完成一次画线操作
    
37. 鼠标.移动(终点x,终点y)
    
38. // 此处的延时可以根据情况是否添加。
    
39. 辅助.等待(2)
    
40. //**************************************************
    
41. // 此处可以加入判断鼠标特征码 颜色值等等是否与目标的一致，不一致的话就不管，继续执行
    
42. // 一致的话，那么就进入判断语句，执行相应的功能，之后返回 真
    
43. //**************************************************
    
44. 遍历结束
    
45. 鼠标.左键弹起()
    
46. 功能结束

复制代码

实例里不是有么。。。望采纳。。。

molunshang

示例里面有例子的

stxuhong

回复 2楼molunshang的帖子

能发给我吗，我找到的都是旧版本，不能改成新版本

stxuhong

回复 4楼Sky_Pro的帖子

已采纳