辅助自动充值系统源代码

.如果 (查找 (读 (3) ＝ 数组 [4]) ＝ 假) ' 这里是用户直接冲值，要将用户没有使用完的次数相加起来，所以要判断
服务器1.发送数据 (服务器1.取回客户 (), “没有用户”, 5)
返回 ()
.否则

.如果结束
到首记录 ()
.如果 (查找 (读 (1) ＝ 数组 [2]) ＝ 假) ' 查找卡号是否正确
服务器1.发送数据 (服务器1.取回客户 (), “错误卡号”, 5)
返回 ()
.否则
.如果 (读 (2) ≠ 数组 [3]) ' 检查密码是否正确
服务器1.发送数据 (服务器1.取回客户 (), “错误密码”, 5)
返回 ()
.否则
.如果 (读 (5) ≠ “假”) ' 检查此冲值卡是否使用过
服务器1.发送数据 (服务器1.取回客户 (), “已冲值”, )
返回 ()
.否则
服务器1.发送数据 (服务器1.取回客户 (), “搞定@” ＋ 到文本 (读 (6)), ) ' 次数发送给客户，这里的次数是变化的
写 (5, “真”) ' 写入数据库是否冲值=真,这里不需要讲帐号密码写入数据库
.如果结束
到首记录 ()
查找 (读 (3) ＝ 数组 [4]) ' 将数据库指针移动到用户名数据
写 (6, 读 (6) ＋ 30) ' 将用户的次数+30