简单3D引擎图形使用

易语言 2020-10-08 18:02:50

.计次循环首 (三维信息 [模型号].面数量, 循环容器)
临时文本 = 读入一行 (临时文件号)
文本数组 = 分割文本 (临时文本, “,”, )
临时数 = 取数组成员数 (文本数组)
.如果 (临时数 > 0 且 临时数 < 16)
三维信息 [模型号].边缘数量 [循环容器] = 到短整数 (文本数组 [1])
.如果 (三维信息 [模型号].边缘数量 [循环容器] = 临时数 - 1)
.变量循环首 (2, 临时数, 1, 循环次数)
三维信息 [模型号].面 [循环容器] [循环次数 - 1] = 到短整数 (文本数组 [循环次数]) + 1
.变量循环尾 ()
.否则
返回 (假)
.如果结束

.否则
返回 (假)
.如果结束

.计次循环尾 ()