zmud之潜能武学技能计算器（作者归去来兮xelite)

[sohu]

#tri {归去来兮机器狗}
{

#say 技能需要潜能计算器格式：10to20for30count4，即表示从4项技能从10级升级到20级按30悟性需要的潜能数目。将得到提示：从10级升级4项技能到20级,以30的悟性，需要660点潜能，685点武学。


#say 潜能支持技能计算器格式：qn1000from20for30count2,即表示以1000的潜能，30的悟性从20能够学习2项技能到多少级别。将得到提示：1000点潜能以30的悟性，可以将2项技能从20级升级到30级,需要2438点武学支持，剩余128点潜能.


#say 武学支持技能计算器格式：武学10000，将计算能支持的最大技能数，将得到提示：10000点武学最大支持技能47级


#say 技能需要武学计算器格式：skills200，将计算200级技能需要的武学，将得到提示：200的技能需要788059点武学。
}



#tri {(%d)to(%d)for(%d)count(%d)} {#var aux_sk_l %1;#var aux_sk_h %2;#var aux_int %3;#var aux_sk_count %4;#read cmd_qn_wx.txt}



#tri {qn(%d)from(%d)for(%d)count(%d)} {#var aux_qn %1;#var aux_int %3;#var aux_sk_l %2;#var aux_sk_count %4;#read cmd_qn_sk.txt}



#tri {skills(%d)} {#var aux_wx [(%1-1)*(%1-1)*(%1-1)/10];#say %1级的技能需要@aux_wx点武学。}



#tri {武学(%d)} {#var hp_wx %1;#var max_sk @maxlevel(1,@hp_wx);#say %1点武学最大支持技能@max_sk级}
自定义一个函数计算武学最大支持的技能：
#func maxlevel {%if((%1*%1*%1/10)<%2,@maxlevel(%eval(%1+1),%2),%1)}

cmd_qn_wx.txt的内容为：


#var aux_str 0
#if (@aux_int<10) {#var aux_str "悟性太低了，不如自杀算了."}
#if (@aux_sk_l>=@aux_sk_h) {#say 2;#var aux_str "越练越回去了，佩服佩服."}
#if (@aux_sk_l>=1000|@aux_sk_h>=1000|@aux_sk_l<0|@aux_sk_h<0) {#var aux_str "超出范围(0-1000)"}
#var aux_wx [(@aux_sk_h-1)*(@aux_sk_h-1)*(@aux_sk_h-1)/10]

#var aux_temp_sk @aux_sk_h
#var aux_qn 0

#WHILE (@aux_temp_sk > @aux_sk_l) {#var aux_qn_xishu 2;#if ((@aux_temp_sk<=450) & (@aux_temp_sk>=0)) {aux_qn_xishu=2};#if ((@aux_temp_sk<=700) & (@aux_temp_sk>450)) {aux_qn_xishu=4};#if (@aux_temp_sk<=750 & @aux_temp_sk>700) {aux_qn_xishu=5};#if (@aux_temp_sk<=800 & @aux_temp_sk>750) {aux_qn_xishu=6};#if (@aux_temp_sk<=850 & @aux_temp_sk>800) {aux_qn_xishu=8};#if (@aux_temp_sk<=900 & @aux_temp_sk>850) {aux_qn_xishu=10};#if (@aux_temp_sk<=950 & @aux_temp_sk>900) {aux_qn_xishu=12};#if (@aux_temp_sk<=1000 & @aux_temp_sk>950) {aux_qn_xishu=14};#add aux_qn (@aux_temp_sk*@aux_temp_sk*@aux_qn_xishu/2);#add aux_temp_sk -1;}


#math aux_qn (@aux_qn*2/@aux_int*@aux_sk_count)


#if (%isnumber(@aux_str)) {#say 从@aux_sk_l级升级@aux_sk_count项技能到@aux_sk_h级,以@aux_int的悟性，需要@aux_qn点潜能，@aux_wx点武学} {#say @aux_str}


cmd_qn_sk.txt的内容为：


#var aux_temp_qn 0
#var aux_temp_sk @aux_sk_l
#var aux_saved_qn @aux_qn
#WHILE (@aux_qn > @aux_temp_qn) {#var aux_qn_xishu 2;#if ((@aux_temp_sk<=450) & (@aux_temp_sk>=0)) {aux_qn_xishu=2};#if ((@aux_temp_sk<=700) & (@aux_temp_sk>450)) {aux_qn_xishu=4};#if (@aux_temp_sk<=750 & @aux_temp_sk>700) {aux_qn_xishu=5};#if (@aux_temp_sk<=800 & @aux_temp_sk>750) {aux_qn_xishu=6};#if (@aux_temp_sk<=850 & @aux_temp_sk>800) {aux_qn_xishu=8};#if (@aux_temp_sk<=900 & @aux_temp_sk>850) {aux_qn_xishu=10};#if (@aux_temp_sk<=950 & @aux_temp_sk>900) {aux_qn_xishu=12};#if (@aux_temp_sk<=1000 & @aux_temp_sk>950) {aux_qn_xishu=14};#add aux_qn -@aux_temp_qn;#add aux_temp_sk 1;#math aux_temp_qn (@aux_temp_sk*@aux_temp_sk*@aux_qn_xishu/@aux_int*@aux_sk_count);}

#add aux_temp_sk -1
#if (@aux_temp_sk=@aux_sk_l) {#var aux_qn 0}
#if (@aux_sk_>=1000|@aux_sk_l<0) {#var aux_qn "skills超出范围(0-1000)"}
#var aux_wx [(@aux_temp_sk-1)*(@aux_temp_sk-1)*(@aux_temp_sk-1)/10]

#if (%isnumber(@aux_qn)) {#say @aux_saved_qn点潜能以@aux_int的悟性，可以将@aux_sk_count项技能从@aux_sk_l级升级到@aux_temp_sk级,需要@aux_wx点武学支持，剩余@aux_qn点潜能.} {#say @aux_qn}


补充：
1。至于4倍潜能只需要在得出需要潜能基础上乘上4即可，这里没有列出。
2。skill需要的道行数目，是通过道行的点数转换的，定义如下函数即可：
#func convertdh {[%1/1000]年[(%1-(%1/1000)*1000)/4]天[((%1-(%1/1000)*1000)-(%1-(%1/1000)*1000)/4*4)*3]时辰}

如200的技能需要788059点武学，对应的道行值是%eval(@convertdh(788059))

[xelite]

给我加点声望吧，虽然不知道啥时候要用，呵呵

[chensr1981]

有点乱.能不能直接说一下升级所需要的潜能与悟性算法(公式)

[xelite]

请参考文中cmd_qn_sk.txt的内容，由于支持zmud4.62版本，语句不能断行（我没有找到断行怎么执行这些语句的办法），所以只能揉在一起了，无非就是几个if语句。感兴趣的话可以把这部分语句copy下来自己断行再阅读。

[titita]

这个比较有用,起码告诉我了计算方法

[longsan8174]

很有用的资料。谢谢了。辛苦了。。