易语言队列源码附加模块

qq2518

感谢分享，学习一下

兰色的夜晚

xdj123 发表于 2021-7-6 18:14
你厉害我就数组操作

我没说啥啊,我这个也是数组操作的,...

  

窗口程序集名	保 留	保 留	备 注
新类_节点, , 公开, 多线程不安全,自行加许可证
变量名	类 型	数组	备 注
私有_节点	新_节点	0

子程序名	返回值类型	公开	备 注
_初始化			当基于本类的对象被创建后，此方法会被自动调用

清除数组 (私有_节点)

子程序名	返回值类型	公开	备 注
_销毁			当基于本类的对象被销毁前，此方法会被自动调用

清除数组 (私有_节点)

子程序名	返回值类型	公开	备 注
加入属性	逻辑型		如果已经存在返回假    否则返回真
参数名	类 型	参考	可空	数组	备 注
属性名称	文本型				“加入属性”方法中欲加入的新的属性名称。
属性值	文本型				“加入属性”方法中欲加入的新的属性值。
属性值2	文本型				“加入属性”方法中欲加入的新的属性值。
属性值3	文本型				“加入属性”方法中欲加入的新的属性值。
属性值4	整数型				“加入属性”方法中欲加入的新的属性值。
属性值5	整数型				“加入属性”方法中欲加入的新的属性值。
容量	整数型				设置节点容量,防止无限增加,默认无限制~

变量名	类 型	静态	数组	备 注
i	整数型
x	新_节点

计次循环首 (取数组成员数 (私有_节点), i)
如果真 (属性名称 ＝ 私有_节点 [i].属性名称)
返回 (假)

计次循环尾 ()
x.属性名称 ＝ 属性名称
x.文本1 ＝ 属性值
x.文本2 ＝ 属性值2
x.文本3 ＝ 属性值3
x.整数4 ＝ 属性值4
x.整数5 ＝ 属性值5
插入成员 (私有_节点, 1, x)
如果真 (是否为空 (容量) ＝ 假)
如果真 (取数组成员数 (私有_节点) ＞ 容量)
重定义数组 (私有_节点, 真, 容量)

返回 (真)

子程序名	返回值类型	公开	备 注
取出属性	逻辑型		找不到返回假  否则返回真
参数名	类 型	参考	可空	数组	备 注
属性名称	文本型				“加入属性”方法中欲加入的新的属性名称。
属性值	文本型
属性值2	文本型
属性值3	文本型
属性值4	整数型				这里一定要是 整数类型 ,小数等都返回0,如果小数,请传送文本
属性值5	整数型				这里一定要是 整数类型 ,小数等都返回0,如果小数,请传送文本

变量名	类 型	静态	数组	备 注
i	整数型

计次循环首 (取数组成员数 (私有_节点), i)
如果真 (属性名称 ＝ 私有_节点 [i].属性名称)
属性值 ＝ 私有_节点 [i].文本1
属性值2 ＝ 私有_节点 [i].文本2
属性值3 ＝ 私有_节点 [i].文本3
属性值4 ＝ 私有_节点 [i].整数4
属性值5 ＝ 私有_节点 [i].整数5
返回 (真)

计次循环尾 ()
连续赋值 (“”, 属性值, 属性值2, 属性值3)
连续赋值 (0, 属性值4, 属性值5)
返回 (假)

子程序名	返回值类型	公开	备 注
取出属性_I取出	逻辑型		计次循环首形式 取出  找不到返回假  否则返回真  返回内部数组的I  如果I>总量  返回假
参数名	类 型	参考	可空	数组	备 注
I形式	整数型
属性名称	文本型				“加入属性”方法中欲加入的新的属性名称。
属性值	文本型
属性值2	文本型
属性值3	文本型
属性值4	整数型				这里一定要是 整数类型 ,小数等都返回0,如果小数,请传送文本
属性值5	整数型				这里一定要是 整数类型 ,小数等都返回0,如果小数,请传送文本

如果真 (取数组成员数 (私有_节点) ＜ I形式)
返回 (假)
属性名称 ＝ 私有_节点 [I形式].属性名称
属性值 ＝ 私有_节点 [I形式].文本1
属性值2 ＝ 私有_节点 [I形式].文本2
属性值3 ＝ 私有_节点 [I形式].文本3
属性值4 ＝ 私有_节点 [I形式].整数4
属性值5 ＝ 私有_节点 [I形式].整数5
返回 (真)

子程序名	返回值类型	公开	备 注
删除属性	逻辑型		找不到返回假  否则返回真
参数名	类 型	参考	可空	数组	备 注
属性名称	文本型				“加入属性”方法中欲加入的新的属性名称。

变量名	类 型	静态	数组	备 注
i	整数型
zd	整数型

计次循环首 (取数组成员数 (私有_节点), i)
如果真 (属性名称 ＝ 私有_节点 [i].属性名称)
删除成员 (私有_节点, i, 1)
返回 (真)

计次循环尾 ()
返回 (假)

子程序名	返回值类型	公开	备 注
属性是否存在	逻辑型
参数名	类 型	参考	可空	数组	备 注
属性名称	文本型				“加入属性”方法中欲加入的新的属性名称。

变量名	类 型	静态	数组	备 注
i	整数型
zd	整数型

计次循环首 (取数组成员数 (私有_节点), i)
如果真 (属性名称 ＝ 私有_节点 [i].属性名称)
返回 (真)

计次循环尾 ()
返回 (假)

子程序名	返回值类型	公开	备 注
清空			清空数组

清除数组 (私有_节点)

子程序名	返回值类型	公开	备 注
取全部属性名
参数名	类 型	参考	可空	数组	备 注
属性名称数组	文本型

变量名	类 型	静态	数组	备 注
i	整数型

清除数组 (属性名称数组)
计次循环首 (取数组成员数 (私有_节点), i)
加入成员 (属性名称数组, 私有_节点 [i].属性名称)
计次循环尾 ()
返回 ()

子程序名	返回值类型	公开	备 注
加入修改属性	整数型		首先尝试查找,查找失败后插入  0=插入  1=修改
参数名	类 型	参考	可空	数组	备 注
属性名称	文本型
属性值	文本型				为空不修改信息
属性值2	文本型				为空不修改信息
属性值3	文本型				为空不修改信息
属性值4	整数型				为空不修改信息
属性值5	整数型				为空不修改信息
容量	整数型

变量名	类 型	静态	数组	备 注
i	整数型
x	新_节点

计次循环首 (取数组成员数 (私有_节点), i)
如果真 (属性名称 ＝ 私有_节点 [i].属性名称)
如果真 (取反 (是否为空 (属性值)))
私有_节点 [i].文本1 ＝ 属性值

如果真 (取反 (是否为空 (属性值2)))
私有_节点 [i].文本2 ＝ 属性值2

如果真 (取反 (是否为空 (属性值3)))
私有_节点 [i].文本3 ＝ 属性值3

如果真 (取反 (是否为空 (属性值4)))
私有_节点 [i].整数4 ＝ 属性值4

如果真 (取反 (是否为空 (属性值5)))
私有_节点 [i].整数5 ＝ 属性值5
返回 (1)

计次循环尾 ()
x.属性名称 ＝ 属性名称
x.文本1 ＝ 属性值
x.文本2 ＝ 属性值2
x.文本2 ＝ 属性值3
x.整数4 ＝ 属性值4
x.整数5 ＝ 属性值5
插入成员 (私有_节点, 1, x)
如果真 (容量 ≠ 0 且 取数组成员数 (私有_节点) ＞ 容量)
重定义数组 (私有_节点, 真, 容量)
返回 (0)

子程序名	返回值类型	公开	备 注
修改属性	逻辑型		找不到返回假   要修改哪个 属性值 输入哪个否则留空  不然会被修改
参数名	类 型	参考	可空	数组	备 注
属性名称	文本型
属性值	文本型				为空不修改信息
属性值2	文本型				为空不修改信息
属性值3	文本型				为空不修改信息
属性值4	整数型				为空不修改信息
属性值5	整数型				为空不修改信息

变量名	类 型	静态	数组	备 注
i	整数型

计次循环首 (取数组成员数 (私有_节点), i)
如果真 (属性名称 ＝ 私有_节点 [i].属性名称)
如果真 (取反 (是否为空 (属性值)))
私有_节点 [i].文本1 ＝ 属性值

如果真 (取反 (是否为空 (属性值2)))
私有_节点 [i].文本2 ＝ 属性值2

如果真 (取反 (是否为空 (属性值3)))
私有_节点 [i].文本3 ＝ 属性值3

如果真 (取反 (是否为空 (属性值4)))
私有_节点 [i].整数4 ＝ 属性值4

如果真 (取反 (是否为空 (属性值5)))
私有_节点 [i].整数5 ＝ 属性值5
返回 (真)

计次循环尾 ()
返回 (假)

子程序名	返回值类型	公开	备 注
取属性总量	整数型

返回 (取数组成员数 (私有_节点))

子程序名	返回值类型	公开	备 注
取出节点组	整数型		返回节点成员数
参数名	类 型	参考	可空	数组	备 注
返回节点数组	新_节点				返回  新_节点  完整数组

返回节点数组 ＝ 私有_节点
返回 (取数组成员数 (私有_节点))

.版本 2<br /> <br /> .程序集 新类_节点, , 公开, 多线程不安全,自行加许可证<br /> .程序集变量 私有_节点, 新_节点, , "0"<br /> <br /> .子程序 _初始化, , , 当基于本类的对象被创建后，此方法会被自动调用<br /> <br /> 清除数组 (私有_节点)<br /> <br /> .子程序 _销毁, , , 当基于本类的对象被销毁前，此方法会被自动调用<br /> <br /> 清除数组 (私有_节点)<br /> <br /> .子程序 加入属性, 逻辑型, 公开, 如果已经存在返回假    否则返回真<br /> .参数 属性名称, 文本型, , “加入属性”方法中欲加入的新的属性名称。<br /> .参数 属性值, 文本型, 可空, “加入属性”方法中欲加入的新的属性值。<br /> .参数 属性值2, 文本型, 可空, “加入属性”方法中欲加入的新的属性值。<br /> .参数 属性值3, 文本型, 可空, “加入属性”方法中欲加入的新的属性值。<br /> .参数 属性值4, 整数型, 可空, “加入属性”方法中欲加入的新的属性值。<br /> .参数 属性值5, 整数型, 可空, “加入属性”方法中欲加入的新的属性值。<br /> .参数 容量, 整数型, 可空, 设置节点容量,防止无限增加,默认无限制~<br /> .局部变量 i, 整数型<br /> .局部变量 x, 新_节点<br /> <br /> .计次循环首 (取数组成员数 (私有_节点), i)<br />     .如果真 (属性名称 ＝ 私有_节点 <i>.属性名称)<br />         返回 (假)<br />     .如果真结束<br /> <br /> .计次循环尾 ()<br /> x.属性名称 ＝ 属性名称<br /> x.文本1 ＝ 属性值<br /> x.文本2 ＝ 属性值2<br /> x.文本3 ＝ 属性值3<br /> x.整数4 ＝ 属性值4<br /> x.整数5 ＝ 属性值5<br /> 插入成员 (私有_节点, 1, x)<br /> .如果真 (是否为空 (容量) ＝ 假)<br />     .如果真 (取数组成员数 (私有_节点) ＞ 容量)<br />         重定义数组 (私有_节点, 真, 容量)<br />     .如果真结束<br /> <br /> .如果真结束<br /> 返回 (真)<br /> <br /> .子程序 取出属性, 逻辑型, 公开, 找不到返回假  否则返回真<br /> .参数 属性名称, 文本型, , “加入属性”方法中欲加入的新的属性名称。<br /> .参数 属性值, 文本型, 参考 可空<br /> .参数 属性值2, 文本型, 参考 可空<br /> .参数 属性值3, 文本型, 参考 可空<br /> .参数 属性值4, 整数型, 参考 可空, 这里一定要是 整数类型 ,小数等都返回0,如果小数,请传送文本<br /> .参数 属性值5, 整数型, 参考 可空, 这里一定要是 整数类型 ,小数等都返回0,如果小数,请传送文本<br /> .局部变量 i, 整数型<br /> <br /> .计次循环首 (取数组成员数 (私有_节点), i)<br />     .如果真 (属性名称 ＝ 私有_节点 <i>.属性名称)<br />         属性值 ＝ 私有_节点 <i>.文本1<br />         属性值2 ＝ 私有_节点 <i>.文本2<br />         属性值3 ＝ 私有_节点 <i>.文本3<br />         属性值4 ＝ 私有_节点 <i>.整数4<br />         属性值5 ＝ 私有_节点 <i>.整数5<br />         返回 (真)<br />     .如果真结束<br /> <br /> .计次循环尾 ()<br /> 连续赋值 (“”, 属性值, 属性值2, 属性值3)<br /> 连续赋值 (0, 属性值4, 属性值5)<br /> 返回 (假)<br /> <br /> .子程序 取出属性_I取出, 逻辑型, 公开, 计次循环首形式 取出  找不到返回假  否则返回真  返回内部数组的I  如果I>总量  返回假<br /> .参数 I形式, 整数型<br /> .参数 属性名称, 文本型, 参考 可空, “加入属性”方法中欲加入的新的属性名称。<br /> .参数 属性值, 文本型, 参考 可空<br /> .参数 属性值2, 文本型, 参考 可空<br /> .参数 属性值3, 文本型, 参考 可空<br /> .参数 属性值4, 整数型, 参考 可空, 这里一定要是 整数类型 ,小数等都返回0,如果小数,请传送文本<br /> .参数 属性值5, 整数型, 参考 可空, 这里一定要是 整数类型 ,小数等都返回0,如果小数,请传送文本<br /> <br /> .如果真 (取数组成员数 (私有_节点) ＜ I形式)<br />     返回 (假)<br /> .如果真结束<br /> 属性名称 ＝ 私有_节点 [I形式].属性名称<br /> 属性值 ＝ 私有_节点 [I形式].文本1<br /> 属性值2 ＝ 私有_节点 [I形式].文本2<br /> 属性值3 ＝ 私有_节点 [I形式].文本3<br /> 属性值4 ＝ 私有_节点 [I形式].整数4<br /> 属性值5 ＝ 私有_节点 [I形式].整数5<br /> 返回 (真)<br /> <br /> .子程序 删除属性, 逻辑型, 公开, 找不到返回假  否则返回真<br /> .参数 属性名称, 文本型, , “加入属性”方法中欲加入的新的属性名称。<br /> .局部变量 i, 整数型<br /> .局部变量 zd, 整数型<br /> <br /> .计次循环首 (取数组成员数 (私有_节点), i)<br />     .如果真 (属性名称 ＝ 私有_节点 <i>.属性名称)<br />         删除成员 (私有_节点, i, 1)<br />         返回 (真)<br />     .如果真结束<br /> <br /> .计次循环尾 ()<br /> 返回 (假)<br /> <br /> .子程序 属性是否存在, 逻辑型, 公开<br /> .参数 属性名称, 文本型, , “加入属性”方法中欲加入的新的属性名称。<br /> .局部变量 i, 整数型<br /> .局部变量 zd, 整数型<br /> <br /> .计次循环首 (取数组成员数 (私有_节点), i)<br />     .如果真 (属性名称 ＝ 私有_节点 <i>.属性名称)<br />         返回 (真)<br />     .如果真结束<br /> <br /> .计次循环尾 ()<br /> 返回 (假)<br /> <br /> .子程序 清空, , 公开, 清空数组<br /> <br /> 清除数组 (私有_节点)<br /> <br /> .子程序 取全部属性名, , 公开<br /> .参数 属性名称数组, 文本型, 参考 数组<br /> .局部变量 i, 整数型<br /> <br /> 清除数组 (属性名称数组)<br /> .计次循环首 (取数组成员数 (私有_节点), i)<br />     加入成员 (属性名称数组, 私有_节点 <i>.属性名称)<br /> .计次循环尾 ()<br /> 返回 ()<br /> <br /> .子程序 加入修改属性, 整数型, 公开, 首先尝试查找,查找失败后插入  0=插入  1=修改<br /> .参数 属性名称, 文本型<br /> .参数 属性值, 文本型, 可空, 为空不修改信息<br /> .参数 属性值2, 文本型, 可空, 为空不修改信息<br /> .参数 属性值3, 文本型, 可空, 为空不修改信息<br /> .参数 属性值4, 整数型, 可空, 为空不修改信息<br /> .参数 属性值5, 整数型, 可空, 为空不修改信息<br /> .参数 容量, 整数型, 可空<br /> .局部变量 i, 整数型<br /> .局部变量 x, 新_节点<br /> <br /> .计次循环首 (取数组成员数 (私有_节点), i)<br />     .如果真 (属性名称 ＝ 私有_节点 <i>.属性名称)<br />         .如果真 (取反 (是否为空 (属性值)))<br />             私有_节点 <i>.文本1 ＝ 属性值<br />         .如果真结束<br /> <br />         .如果真 (取反 (是否为空 (属性值2)))<br />             私有_节点 <i>.文本2 ＝ 属性值2<br />         .如果真结束<br /> <br />         .如果真 (取反 (是否为空 (属性值3)))<br />             私有_节点 <i>.文本3 ＝ 属性值3<br />         .如果真结束<br /> <br />         .如果真 (取反 (是否为空 (属性值4)))<br />             私有_节点 <i>.整数4 ＝ 属性值4<br />         .如果真结束<br /> <br />         .如果真 (取反 (是否为空 (属性值5)))<br />             私有_节点 <i>.整数5 ＝ 属性值5<br />         .如果真结束<br />         返回 (1)<br />     .如果真结束<br /> <br /> .计次循环尾 ()<br /> x.属性名称 ＝ 属性名称<br /> x.文本1 ＝ 属性值<br /> x.文本2 ＝ 属性值2<br /> x.文本2 ＝ 属性值3<br /> x.整数4 ＝ 属性值4<br /> x.整数5 ＝ 属性值5<br /> 插入成员 (私有_节点, 1, x)<br /> .如果真 (容量 ≠ 0 且 取数组成员数 (私有_节点) ＞ 容量)<br />     重定义数组 (私有_节点, 真, 容量)<br /> .如果真结束<br /> 返回 (0)<br /> <br /> .子程序 修改属性, 逻辑型, 公开, 找不到返回假   要修改哪个 属性值 输入哪个否则留空  不然会被修改<br /> .参数 属性名称, 文本型<br /> .参数 属性值, 文本型, 可空, 为空不修改信息<br /> .参数 属性值2, 文本型, 可空, 为空不修改信息<br /> .参数 属性值3, 文本型, 可空, 为空不修改信息<br /> .参数 属性值4, 整数型, 可空, 为空不修改信息<br /> .参数 属性值5, 整数型, 可空, 为空不修改信息<br /> .局部变量 i, 整数型<br /> <br /> .计次循环首 (取数组成员数 (私有_节点), i)<br />     .如果真 (属性名称 ＝ 私有_节点 <i>.属性名称)<br />         .如果真 (取反 (是否为空 (属性值)))<br />             私有_节点 <i>.文本1 ＝ 属性值<br />         .如果真结束<br /> <br />         .如果真 (取反 (是否为空 (属性值2)))<br />             私有_节点 <i>.文本2 ＝ 属性值2<br />         .如果真结束<br /> <br />         .如果真 (取反 (是否为空 (属性值3)))<br />             私有_节点 <i>.文本3 ＝ 属性值3<br />         .如果真结束<br /> <br />         .如果真 (取反 (是否为空 (属性值4)))<br />             私有_节点 <i>.整数4 ＝ 属性值4<br />         .如果真结束<br /> <br />         .如果真 (取反 (是否为空 (属性值5)))<br />             私有_节点 <i>.整数5 ＝ 属性值5<br />         .如果真结束<br />         返回 (真)<br />     .如果真结束<br /> <br /> .计次循环尾 ()<br /> 返回 (假)<br /> <br /> .子程序 取属性总量, 整数型, 公开<br /> <br /> 返回 (取数组成员数 (私有_节点))<br /> <br /> .子程序 取出节点组, 整数型, 公开, 返回节点成员数<br /> .参数 返回节点数组, 新_节点, 参考 可空 数组, 返回  新_节点  完整数组<br /> <br /> 返回节点数组 ＝ 私有_节点<br /> 返回 (取数组成员数 (私有_节点))

xdj123

兰色的夜晚 发表于 2021-7-6 18:08
我用  数组  做了个节点   成员少的话   还可以  成员多了  速度也不快...
就是用这简便一点    比较省事,, ...

你厉害我就数组操作

兰色的夜晚

我用  数组  做了个节点   成员少的话   还可以  成员多了  速度也不快...
就是用这简便一点    比较省事,,,,但是你这个是单独一个操作,不用再次封装了呀

兰色的夜晚

晕了  这不就是   数组操作???  为什么还要做成队列?

喵帕斯和艾希

xdj123

小秋秋呀 发表于 2021-7-6 17:50
看了之后我觉得，我好像踏入易语言门槛了

易语言数据结构好像梅教程

xdj123

sinewtec 发表于 2021-7-6 17:43
你这不又把数组封装一遍嘛

确实是这样

小秋秋呀

看了之后我觉得，我好像踏入易语言门槛了

sinewtec

你这不又把数组封装一遍嘛