✅汇编_原子锁 - 精易论坛

子程序名	返回值类型	公开	备注
原子_判断赋值_汇编版	整数型		原子CAS，相等才赋值，返回旧值
参数名	类型	参考	可空	数组	备注
被运算的整数型变量	整数型
被赋值的值	整数型
被对比的值	整数型

置入代码 ({ 139, 77, 8, 139, 85, 12, 139, 69, 16, 240, 15, 177, 17, 201, 194, 12, 0 })
返回 (0)

子程序名	返回值类型	公开	备注
原子_赋值_汇编版	整数型		原子赋值，返回旧值
参数名	类型	参考	可空	数组	备注
被赋值的整数型变量	整数型
赋值的值	整数型

置入代码 ({ 139, 77, 8, 139, 69, 12, 240, 135, 1, 201, 194, 8, 0 })
返回 (0)

子程序名	返回值类型	公开	备注
原子_递减_汇编版	整数型		原子递减，返回新值
参数名	类型	参考	可空	数组	备注
被递减的变量	整数型

置入代码 ({ 139, 77, 8, 184, 255, 255, 255, 255, 240, 15, 193, 1, 72, 201, 194, 4, 0 })
返回 (0)

子程序名	返回值类型	公开	备注
原子_递增_汇编版	整数型		原子递增，返回新值
参数名	类型	参考	可空	数组	备注
被递增的变量	整数型

置入代码 ({ 139, 77, 8, 184, 1, 0, 0, 0, 240, 15, 193, 1, 64, 201, 194, 4, 0 })
返回 (0)

子程序名	返回值类型	公开	备注
原子_运算_汇编版	整数型		原子加减，返回旧值
参数名	类型	参考	可空	数组	备注
被运算的整数型变量	整数型
被运算的值	整数型

置入代码 ({ 139, 77, 8, 139, 69, 12, 240, 15, 193, 1, 201, 194, 8, 0 })
返回 (0)

窗口程序集名	保留	保留	备注
窗口程序集_启动窗口

子程序名	返回值类型	公开	备注
__启动窗口_创建完毕

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

' ========== 1. 测试递增 ==========
变量＝ 10
旧值＝原子_递增_汇编版 (变量)
调试输出 (“递增前变量=10, 返回新值=”, 旧值, “ 变量现在=”, 变量)  ' 预期：返回11，变量=11
变量＝ 10
原子_递增_汇编版 (变量)  ' 不接收返回值也能用
调试输出 (“递增后(不接收返回值) 变量=”, 变量)  ' 预期：11
' ========== 2. 测试递减 ==========
变量＝ 10
旧值＝原子_递减_汇编版 (变量)
调试输出 (“递减前变量=10, 返回新值=”, 旧值, “ 变量现在=”, 变量)  ' 预期：返回9，变量=9
' ========== 3. 测试赋值 ==========
变量＝ 100
旧值＝原子_赋值_汇编版 (变量, 200)
调试输出 (“赋值前变量=100, 返回旧值=”, 旧值, “ 变量现在=”, 变量)  ' 预期：返回100，变量=200
' ========== 4. 测试运算(加) ==========
变量＝ 50
旧值＝原子_运算_汇编版 (变量, 30)
调试输出 (“运算前变量=50, 加30, 返回旧值=”, 旧值, “ 变量现在=”, 变量)  ' 预期：返回50，变量=80
' ========== 5. 测试运算(减) ==========
变量＝ 50
旧值＝原子_运算_汇编版 (变量, -20)
调试输出 (“运算前变量=50, 加-20, 返回旧值=”, 旧值, “ 变量现在=”, 变量)  ' 预期：返回50，变量=30
' ========== 6. 测试判断赋值(条件成立) ==========
变量＝ 999
旧值＝原子_判断赋值_汇编版 (变量, 888, 999)  ' 变量==999，所以赋值为888
调试输出 (“CAS: 变量=999, 对比=999(相等), 赋值为888, 返回旧值=”, 旧值, “ 变量现在=”, 变量)  ' 预期：返回999，变量=888
' ========== 7. 测试判断赋值(条件不成立) ==========
变量＝ 777
旧值＝原子_判断赋值_汇编版 (变量, 111, 999)  ' 变量=777，不等于999，不赋值
调试输出 (“CAS: 变量=777, 对比=999(不等), 赋值为111, 返回旧值=”, 旧值, “ 变量现在=”, 变量)  ' 预期：返回777，变量还是777

i支持库列表	支持库注释
spec	特殊功能支持库

.版本 2<br />
.支持库 spec<br />
<br />
.程序集 窗口程序集_启动窗口<br />
<br />
.子程序 __启动窗口_创建完毕<br />
.局部变量 变量, 整数型<br />
.局部变量 旧值, 整数型<br />
<br />
' ========== 1. 测试递增 ==========<br />
变量 ＝ 10<br />
旧值 ＝ 原子_递增_汇编版 (变量)<br />
调试输出 (“递增前变量=10, 返回新值=”, 旧值, “ 变量现在=”, 变量)  ' 预期：返回11，变量=11<br />
<br />
变量 ＝ 10<br />
原子_递增_汇编版 (变量)  ' 不接收返回值也能用<br />
调试输出 (“递增后(不接收返回值) 变量=”, 变量)  ' 预期：11<br />
<br />
' ========== 2. 测试递减 ==========<br />
变量 ＝ 10<br />
旧值 ＝ 原子_递减_汇编版 (变量)<br />
调试输出 (“递减前变量=10, 返回新值=”, 旧值, “ 变量现在=”, 变量)  ' 预期：返回9，变量=9<br />
<br />
' ========== 3. 测试赋值 ==========<br />
变量 ＝ 100<br />
旧值 ＝ 原子_赋值_汇编版 (变量, 200)<br />
调试输出 (“赋值前变量=100, 返回旧值=”, 旧值, “ 变量现在=”, 变量)  ' 预期：返回100，变量=200<br />
<br />
' ========== 4. 测试运算(加) ==========<br />
变量 ＝ 50<br />
旧值 ＝ 原子_运算_汇编版 (变量, 30)<br />
调试输出 (“运算前变量=50, 加30, 返回旧值=”, 旧值, “ 变量现在=”, 变量)  ' 预期：返回50，变量=80<br />
<br />
' ========== 5. 测试运算(减) ==========<br />
变量 ＝ 50<br />
旧值 ＝ 原子_运算_汇编版 (变量, -20)<br />
调试输出 (“运算前变量=50, 加-20, 返回旧值=”, 旧值, “ 变量现在=”, 变量)  ' 预期：返回50，变量=30<br />
<br />
' ========== 6. 测试判断赋值(条件成立) ==========<br />
变量 ＝ 999<br />
旧值 ＝ 原子_判断赋值_汇编版 (变量, 888, 999)  ' 变量==999，所以赋值为888<br />
调试输出 (“CAS: 变量=999, 对比=999(相等), 赋值为888, 返回旧值=”, 旧值, “ 变量现在=”, 变量)  ' 预期：返回999，变量=888<br />
<br />
' ========== 7. 测试判断赋值(条件不成立) ==========<br />
变量 ＝ 777<br />
旧值 ＝ 原子_判断赋值_汇编版 (变量, 111, 999)  ' 变量=777，不等于999，不赋值<br />
调试输出 (“CAS: 变量=777, 对比=999(不等), 赋值为111, 返回旧值=”, 旧值, “ 变量现在=”, 变量)  ' 预期：返回777，变量还是777