极客工坊

 找回密码
 注册

QQ登录

只需一步,快速开始

查看: 9262|回复: 6

看到了一个有趣的制作,哪位大神知道详细的制作方法

[复制链接]
发表于 2014-3-1 08:41:56 | 显示全部楼层 |阅读模式
本帖最后由 luqimaster 于 2014-3-1 08:50 编辑


回复

使用道具 举报

发表于 2014-3-1 09:50:54 | 显示全部楼层
图片有问题,楼主再发一次
回复 支持 反对

使用道具 举报

发表于 2014-3-1 09:55:36 | 显示全部楼层
机械臂+三轴+如果要看是否擦干净害得加上图像识别
回复 支持 反对

使用道具 举报

发表于 2014-3-2 00:40:10 | 显示全部楼层
hi55234 发表于 2014-3-1 09:55
机械臂+三轴+如果要看是否擦干净害得加上图像识别

复制图片地址后可以看到gif动画。就是最近总能看到的,写字时钟。

擦除的部分,就不需要图像识别了,换个好点的笔擦就解决了。图像识别有点太劳师动众了。

很简单,笔的位置已知,两只4节摆臂的长度已知,摆臂末端电机轴心的距离已知,笔位置变换,就能计算出摆臂末端的角度了。然后然两个舵机转动就是了。不需要落笔的时候让第3只舵机抬起摆臂总成就是了。现在要做的事情就是找到初中几何再复习一下就可以了。
回复 支持 反对

使用道具 举报

发表于 2014-3-3 14:13:18 | 显示全部楼层
用这个可以做一个教小朋友学写字的玩具
回复 支持 反对

使用道具 举报

发表于 2014-3-5 20:18:55 | 显示全部楼层
算法代码,


Dim L3N As Double = (Math.Sqrt((X.Text - XL.Text) ^ 2 + (Y.Text - YL.Text) ^ 2))
        Dim R3N As Double = (Math.Sqrt((X.Text - XR.Text) ^ 2 + (Y.Text - YR.Text) ^ 2))
        Dim CL = Math.Acos((L1N ^ 2 + L3N ^ 2 - L2N ^ 2) / 2 / L1.Text / L3N) * 180 / Math.PI + Math.Atan((Y.Text - YL.Text) / (X.Text - XL.Text)) * 180 / Math.PI
        Dim CR = Math.Acos((R1N ^ 2 + R3N ^ 2 - R2N ^ 2) / 2 / R1.Text / R3N) * 180 / Math.PI + Math.Atan((Y.Text - YR.Text) / (XR.Text - X.Text)) * 180 / Math.PI


      

本帖子中包含更多资源

您需要 登录 才可以下载或查看,没有帐号?注册

x
回复 支持 反对

使用道具 举报

 楼主| 发表于 2014-3-21 16:25:37 | 显示全部楼层
Damn_intuition 发表于 2014-3-5 20:18
算法代码,

看来还要补数学了。。。。
回复 支持 反对

使用道具 举报

您需要登录后才可以回帖 登录 | 注册

本版积分规则 需要先绑定手机号

Archiver|联系我们|极客工坊

GMT+8, 2024-3-29 14:31 , Processed in 0.063556 second(s), 23 queries .

Powered by Discuz! X3.4 Licensed

Copyright © 2001-2021, Tencent Cloud.

快速回复 返回顶部 返回列表