|

窗口程序集名 | 保 留 | 保 留 | 备 注 | 大数运算窗口程序集 | | | | 变量名 | 类 型 | 数组 | 备 注 | 程_参数1 | 文本型 | | 程_参数2 | 文本型 | | 程_弧度 | 逻辑型 | | 程_第一次按下 | 逻辑型 | | 程_运算符 | 文本型 | | 程_正负 | 逻辑型 | | 程_当前进制 | 整数型 | |
_启动窗口.位置 = 2 _启动窗口. 销毁 ()变量名 | 类 型 | 静态 | 数组 | 备 注 | 结果 | 文本型 | | | 局_小数位数 | 整数型 | | |
结果 = 子程序_求余切 (显示编辑框.内容 ) 判断 (寻找文本 (结果, “.”, , 假) = -1 ) 显示编辑框.内容 = 结果    局_小数位数 = 取文本长度 (结果 ) - 寻找文本 (结果, “.”, , 假) 如果真 (局_小数位数 > 到数值 (全_小数保留精度 )) 结果 = 取文本左边 (结果, 取文本长度 (结果 ) (局_小数位数 - 到数值 (全_小数保留精度 )) )  显示编辑框.内容 = 结果 显示编辑框.获取焦点 ()显示编辑框.起始选择位置 = -1 变量名 | 类 型 | 静态 | 数组 | 备 注 | 结果 | 文本型 | | | 局_小数位数 | 整数型 | | |
结果 = 子程序_平方 (显示编辑框.内容 ) 判断 (寻找文本 (结果, “.”, , 假) = -1 ) 显示编辑框.内容 = 结果    局_小数位数 = 取文本长度 (结果 ) - 寻找文本 (结果, “.”, , 假) 如果真 (局_小数位数 > 到数值 (全_小数保留精度 )) 结果 = 取文本左边 (结果, 取文本长度 (结果 ) (局_小数位数 - 到数值 (全_小数保留精度 )) )  显示编辑框.内容 = 结果  显示编辑框. 获取焦点 ()显示编辑框.起始选择位置 = -1 变量名 | 类 型 | 静态 | 数组 | 备 注 | 结果 | 文本型 | | | 局_小数位数 | 整数型 | | |
结果 = 子程序_立方 (显示编辑框.内容 ) 判断 (寻找文本 (结果, “.”, , 假) = -1 ) 显示编辑框.内容 = 结果    局_小数位数 = 取文本长度 (结果 ) - 寻找文本 (结果, “.”, , 假) 如果真 (局_小数位数 > 到数值 (全_小数保留精度 )) 结果 = 取文本左边 (结果, 取文本长度 (结果 ) (局_小数位数 - 到数值 (全_小数保留精度 )) )  显示编辑框.内容 = 结果 显示编辑框.获取焦点 ()显示编辑框.起始选择位置 = -1 程_参数1 = 显示编辑框.内容 显示编辑框.内容 = “0”程_第一次按下 = 假 程_运算符 = “N次方”显示编辑框. 获取焦点 ()显示编辑框.起始选择位置 = -1 判断 (程_弧度 = 假) 显示编辑框.内容 = 到文本 (到数值 (显示编辑框.内容 ) × 180 ÷ #pi )    显示编辑框.内容 = 到文本 (到数值 (显示编辑框.内容 ) × #pi ÷ 180 ) 程_弧度 = 取反 (程_弧度 )显示编辑框. 获取焦点 ()显示编辑框.起始选择位置 = -1 如果真 (寻找文本 (显示编辑框.内容, “-”, , 假) = -1 )程_正负 = 真  判断 (程_正负 = 假) 如果真 (显示编辑框.内容 ≠ “0”)显示编辑框.内容 = 子程序_取正 (显示编辑框.内容 )程_正负 = 取反 (程_正负 )    判断 (寻找文本 (显示编辑框.内容, “-”, , 假) = -1 ) 如果真 (显示编辑框.内容 ≠ “0”)显示编辑框.内容 = 子程序_取负 (显示编辑框.内容 )程_正负 = 取反 (程_正负 )        如果真 (显示编辑框.内容 ≠ “0”)显示编辑框.内容 = 子程序_取正 (显示编辑框.内容 )      显示编辑框. 获取焦点 ()显示编辑框.起始选择位置 = -1 判断 (程_第一次按下 = 假) 显示编辑框.内容 = “7”程_第一次按下 = 真   判断 (显示编辑框.内容 = “0”)显示编辑框.内容 = “7”  显示编辑框. 加入文本 (“7”)  显示编辑框. 获取焦点 ()显示编辑框.起始选择位置 = -1 判断 (程_第一次按下 = 假) 显示编辑框.内容 = “8”程_第一次按下 = 真   判断 (显示编辑框.内容 = “0”)显示编辑框.内容 = “8”  显示编辑框. 加入文本 (“8”)  显示编辑框. 获取焦点 ()显示编辑框.起始选择位置 = -1 判断 (程_第一次按下 = 假) 显示编辑框.内容 = “9”程_第一次按下 = 真   判断 (显示编辑框.内容 = “0”)显示编辑框.内容 = “9”  显示编辑框. 加入文本 (“9”) 显示编辑框.获取焦点 ()显示编辑框.起始选择位置 = -1 判断 (程_第一次按下 = 假) 显示编辑框.内容 = “4”程_第一次按下 = 真   判断 (显示编辑框.内容 = “0”)显示编辑框.内容 = “4”  显示编辑框. 加入文本 (“4”) 显示编辑框.获取焦点 ()显示编辑框.起始选择位置 = -1 判断 (程_第一次按下 = 假) 显示编辑框.内容 = “5”程_第一次按下 = 真   判断 (显示编辑框.内容 = “0”)显示编辑框.内容 = “5”  显示编辑框. 加入文本 (“5”)  显示编辑框. 获取焦点 ()显示编辑框.起始选择位置 = -1 判断 (程_第一次按下 = 假) 显示编辑框.内容 = “6”程_第一次按下 = 真   判断 (显示编辑框.内容 = “0”)显示编辑框.内容 = “6”  显示编辑框. 加入文本 (“6”) 显示编辑框.获取焦点 ()显示编辑框.起始选择位置 = -1 判断 (程_第一次按下 = 假) 显示编辑框.内容 = “1”程_第一次按下 = 真   判断 (显示编辑框.内容 = “0”)显示编辑框.内容 = “1”  显示编辑框. 加入文本 (“1”) 显示编辑框.获取焦点 ()显示编辑框.起始选择位置 = -1 判断 (程_第一次按下 = 假) 显示编辑框.内容 = “2”程_第一次按下 = 真   判断 (显示编辑框.内容 = “0”)显示编辑框.内容 = “2”  显示编辑框. 加入文本 (“2”)  显示编辑框. 获取焦点 ()显示编辑框.起始选择位置 = -1 判断 (程_第一次按下 = 假) 显示编辑框.内容 = “3”程_第一次按下 = 真   判断 (显示编辑框.内容 = “0”)显示编辑框.内容 = “3”  显示编辑框. 加入文本 (“3”)  显示编辑框. 获取焦点 ()显示编辑框.起始选择位置 = -1 如果真 (寻找文件 (取运行目录 () + “\配置.ini”, ) = “”)写到文件 (取运行目录 () + “\配置.ini”, { })写配置项 (取运行目录 () + “\配置.ini”, “配置”, “计算精度”, “3”)写配置项 (取运行目录 () + “\配置.ini”, “配置”, “小数保留位数”, “5”) 全_计算精度 = 读配置项 (取运行目录 () + “\配置.ini”, “配置”, “计算精度”, )全_小数保留精度 = 读配置项 (取运行目录 () + “\配置.ini”, “配置”, “小数保留位数”, )程_当前进制 = 10 十进制单选框.选中 = 真 程_正负 = 真 显示编辑框.内容 = “0”程_参数1 = 显示编辑框.内容 连续赋值 (真, 数字A按钮.禁止, 数字B按钮.禁止, 数字C按钮.禁止, 数字D按钮.禁止, 数字E按钮.禁止, 数字F按钮.禁止 )显示编辑框. 获取焦点 ()显示编辑框.起始选择位置 = -1 判断 (程_第一次按下 = 假) 显示编辑框.内容 = “0”程_第一次按下 = 真  如果真 (显示编辑框.内容 ≠ “0”)显示编辑框. 加入文本 (“0”) 显示编辑框.获取焦点 ()显示编辑框.起始选择位置 = -1 如果真 (寻找文本 (显示编辑框.内容, “.”, , 假) = -1 )显示编辑框. 加入文本 (“.”)程_第一次按下 = 真  显示编辑框. 获取焦点 ()显示编辑框.起始选择位置 = -1 程_参数1 = 显示编辑框.内容 显示编辑框.内容 = “0”程_第一次按下 = 假 程_运算符 = “除”显示编辑框. 获取焦点 ()显示编辑框.起始选择位置 = -1 程_参数1 = 显示编辑框.内容 显示编辑框.内容 = “0”程_第一次按下 = 假 程_运算符 = “乘”显示编辑框. 获取焦点 ()显示编辑框.起始选择位置 = -1 程_参数1 = 显示编辑框.内容 显示编辑框.内容 = “0”程_第一次按下 = 假 程_运算符 = “减”显示编辑框. 获取焦点 ()显示编辑框.起始选择位置 = -1 程_参数1 = 显示编辑框.内容 显示编辑框.内容 = “0”程_第一次按下 = 假 程_运算符 = “加”显示编辑框. 获取焦点 ()显示编辑框.起始选择位置 = -1 程_参数1 = 显示编辑框.内容 显示编辑框.内容 = “0”程_第一次按下 = 假 程_运算符 = “整除”显示编辑框. 获取焦点 ()显示编辑框.起始选择位置 = -1 程_参数1 = 显示编辑框.内容 显示编辑框.内容 = “0”程_第一次按下 = 假 程_运算符 = “求余”显示编辑框. 获取焦点 ()显示编辑框.起始选择位置 = -1 结果 = 子程序_取整数 (显示编辑框.内容 )显示编辑框.内容 = 结果 显示编辑框. 获取焦点 ()显示编辑框.起始选择位置 = -1 载入 (傅立叶变换窗口, , 真)显示编辑框.内容 = “0”程_参数1 = “”程_参数2 = “”程_运算符 = “”程_第一次按下 = 假 程_正负 = 真 显示编辑框. 获取焦点 ()显示编辑框.起始选择位置 = -1 判断 (程_参数2 ≠ “”)程_参数2 = “”显示编辑框.内容 = “0” 判断 (程_参数1 ≠ “”)程_参数1 = “”显示编辑框.内容 = “0”程_第一次按下 = 假   显示编辑框.内容 = “0”  显示编辑框. 获取焦点 ()显示编辑框.起始选择位置 = -1 变量名 | 类 型 | 静态 | 数组 | 备 注 | 局_变量 | 文本型 | | | 局_文本数量 | 整数型 | | |
判断 (显示编辑框.内容 = “0”) 判断 (取文本长度 (显示编辑框.内容 ) = 1 )显示编辑框.内容 = “0” 局_变量 = 显示编辑框.内容 局_文本数量 = 取文本长度 (局_变量 )显示编辑框.内容 = 取文本左边 (局_变量, 局_文本数量 - 1 )显示编辑框.获取焦点 ()显示编辑框.起始选择位置 = -1 变量名 | 类 型 | 静态 | 数组 | 备 注 | 结果 | 文本型 | | | 局_小数位数 | 整数型 | | | 局_转换方式 | 整数型 | | |
如果真 (程_参数1 ≠ “”) 如果真 (程_运算符 ≠ “”)程_参数2 = 显示编辑框.内容 如果真 (寻找文本 (程_参数1, “.”, , 假) = -1 且 寻找文本 (程_参数1, “-”, , 假) = -1 )程_参数1 = 进制转换 (程_参数1, 程_当前进制, 10 ) 如果真 (寻找文本 (程_参数2, “.”, , 假) = -1 且 寻找文本 (程_参数2, “-”, , 假) = -1 )程_参数2 = 进制转换 (程_  |
-
-
计算器.zip
79.91 KB, 下载次数: 77, 下载积分: 精币 -2 枚
简单的科学计算器
|