我顺手写了一个中文程序,要么题主看看容易懂么?
清空变量; 添加路径(路径('D:/程序/库')); 添加路径(路径('D:/程序/晶体/源')); %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% 路径入='D:/数据/钙钛矿/'; 路径出='./出/洞_'; 路径出空='./出/无洞_'; 名字表格="D:/数据/钙钛矿.表格"; 康模数尔名字='立方.康模数尔'; 康模数尔空名字='立方空.康模数尔'; [名字列表,相列表,性质] = 常数导入(名字表格); 插值数=60; 角=3:180/插值数:180; 角0=零矩阵(1,插值数); 甲=[角,角0,角0]; 乙=[角0,角,角0]; 丙=[角0,角0,角]; 循环 一=1:1:长度(密度列表) 名字=名字列表(一); 相=相列表(一); 密度临时=性质.密度(一); 名字入=字符串合并(路径入,名字,'_',相,'.纯文本'); 新建(字符串合并(路径出,名字,'_',相)); 新建(字符串合并(路径出空,名字,'_',相)); 循环 二=1:1:长度(甲) 刚度=导入(名字入); 刚度=旋转(刚度,甲(二),乙(二),丙(二)); 柔性=逆矩阵(刚度); 名字出=字符串合并(路径出,名字,'_',相,'/',数转字符串(甲(二)),',',数转字符串(乙(二)),',',数转字符串(丙(二))); 名字出空=字符串合并(路径出空,名字,'_',相,'/',数转字符串(甲(二)),',',数转字符串(乙(二)),',',数转字符串(丙(二))); 高度=0.1; 孔隙率=0.5; 丁=0; %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% 如果 存在(字符串合并(名字出,'.纯文本'),'文件')==0 打印('序号=%整数,当前时间是%字符串换行',一,时间(现在)); 打印('%字符串换行',名字出); 康模数尔.刚度(康模数尔名字,名字出,刚度,密度临时,高度,孔隙率,丁); 结束 如果 存在(字符串合并(名字出空,'.纯文本'),'文件')==0 打印('序号=%整数,当前时间是%字符串换行',一,时间(现在)); 打印('%字符串换行',名字出空); 康模数尔.刚度(康模数尔空名字,名字出空,刚度,密度临时,高度,孔隙率,丁); 结束 结束 结束
给您介绍最新中文编程语言:
GitHub - flaneur2020/pua-lang: a dialect of The Monkey Programming Language