易语言公式计算器源码.版本 2
.支持库 script
.程序集 窗口程序集1
.程序集变量 X, 整数型
.子程序 __启动窗口_创建完毕
.局部变量 A, 文本型, , "0"
.局部变量 Btn, 按钮, , "20"
.局部变量 b, 整数型
.局部变量 c, 整数型
'
A = 分割文本 (“2 3 ( 4 5 6 - ) 7 8 9 * C . 0 / = E”, “ ”, )
.计次循环首 (取数组成员数 (A), X)
复制窗口组件 (按钮1, Btn [X])
b = X % 5
c = 取整 (X ÷ 5