Qokelate 发表于 2012-3-15 13:53:15

问一下 30的阅读权限多发多少帖？

如题   字数补丁字数补丁

afan 发表于 2012-3-15 14:52:23

$1 = jf(1, '请输入发帖数量')
$2 = jf(2, '请输入精华帖数', 0)
$3 = jf(3, '请输入威望值', 0)
$4 = jf(4, '请输入贡献值', 0)
MsgBox(64, '蛋疼结果', '你的积分为：' & Round($1 * 0.5 + $2 * 10 + $3 * 2 + $4) & '')

Func jf($bz, $tip, $mr = '')
      While 1
                $z = InputBox($bz, $tip, $mr, ' m', 180, 120)
                If @error Then Exit
                If StringIsDigit($z) Then Return $z
      WEnd
EndFunc   ;==>jf

afan 发表于 2012-3-15 14:53:51

http://www.autoitx.com/faq.php?action=credits

Qokelate 发表于 2012-3-15 22:27:34

回复 2# afan


    185积分。。。

还要继续努力呵呵

whitehead 发表于 2012-3-24 10:29:56

要继续努力

alice607 发表于 2012-4-3 20:48:51

一叠一跌。。

续缘8003 发表于 2013-10-19 20:06:26

谢谢了，知道了继续努力

lczhjun 发表于 2015-5-17 11:51:01

继续坚持，继续autoit

hufanrong123 发表于 2015-5-17 12:07:25

感觉升级好慢呀

zghwelcome 发表于 2016-3-1 15:35:43

同感，权限让人无奈

11ww22 发表于 2016-3-1 21:19:02

看看我有多少？？

11ww22 发表于 2016-3-1 21:19:14

收藏备用啦，谢谢楼主

maotou2010 发表于 2016-3-27 07:47:18

看看，新人

lovelongpeng 发表于 2023-8-3 16:14:43

我X这么多吗
页: [1]
查看完整版本: 问一下 30的阅读权限多发多少帖？