*文本读取 生成 文件夹
*2.加载的方法
*清空文件夹
*输入 input
open_file ('POSE.txt', 'input', FileHandleIn)
*IsEOF1判断是否是末尾 不是末尾 赋值为0,如果是末尾 赋值为1 。 是1的话 跳出while循环。
*第一行判断个数
** 注意这个时候已经读取一行了
fread_line (FileHandleIn, OutLine, IsEOF1)
tuple_split (OutLine, '\n', Substring)
tuple_number(Substring, Number)
*循环读取Number回
** 实际是从文本文件的第二行开始读的,因为fread_line函数的IsEOF1关键字
** 这里要特别注意
for I := 0 to Number by 1
fread_line (FileHandleIn, OutLine, IsEOF1)
if(I = 0)
continue
endif
** 按 '\n' 回车键分割
tuple_split (OutLine, '\n', Substring1)
** 按 ',' 英文的逗号分割
tuple_split (Substring1, ',', Sub1)
tuple_number(Sub1, Sub)
** 得到的sub数据内容[1.1,2.2,3.3,4.4,5.5,6.6]
P:=[Sub[0],Sub[1],Sub[2],Sub[5],Sub[4],Sub[3],0]
ins:=I
write_pose(P,'./gui/PoseAA'+ins$'01d'+'.dat')
endfor
close_file (FileHandleIn)
stop ()
我们有整套的三维点云搭配机械手的视觉匹配、定位、轨迹引导的解决方案,并每年平均有五套三维视觉项目落地。
优势的项目是:三维轨迹涂胶、四米以上长度物体的精确定位和装配(重复定位安装精度可达0.2mm)、三维多面抓取、自制线激光相机和双目结构光相机(有多套应用在项目中)。
我们公司专攻三维视觉领域长达十二年,本账号可以看到我们往期的项目视频(是经过项目甲方允许可以拍摄的部分)。
交流QQ号 297624569,欢迎咨询。