经脉冲穴系统的LUA版实现

夏海

本程序是根据游客大的《深谈平衡 下篇》思想

一．变量
（1）人物的“声望”属性作为“冲穴程度”变量
（2）秘籍的“加品德”属性作为“加冲穴”变量
（3）秘籍的“练出物品需经验”属性作为“需冲穴”变量
可用fishedit0.72修改
数据如下：
　＜内功ｖｓ加冲穴表＞
﹍﹍﹍﹍﹍﹍﹍﹍﹍﹍﹍﹍﹍﹍﹍﹍﹍﹍﹍﹍﹍﹍﹍﹍﹍﹍﹍﹍﹍﹍﹍﹍
︱冲穴　　︱手手手︱手手手︱足足足︱足足足︱任︱冲︱阳︱阴︱十︱
﹉﹉﹉﹉﹉︱太少阳︱太少厥︱太少阳︱太少厥︱督︱带︱维︱维︱进︱
﹍﹍﹍﹍﹍︱阳阳明︱阴阴阴︱阳阳明︱阴阴阴︱　︱　︱阳︱阴︱位︱
︱内功　　︱　　　︱　　　︱　　　︱　　　︱　︱　︱蹻︱蹻︱　︱
︱﹉﹉﹉﹉︱﹉﹉﹉︱﹉﹉﹉︱﹉﹉﹉︱﹉﹉﹉︱﹉︱﹉︱﹉︱﹉︱﹉﹉
︱易筋经　︱　　　︱　　　︱　　　︱　　　︱◎︱◎︱　︱　︱12
︱十八泥偶︱　　　︱　　　︱　　　︱　　　︱　︱　︱◎︱◎︱3
︱化功大法︱　　　︱　　　︱　　　︱　　　︱　︱　︱　︱　︱0
︱————︱———︱———︱———︱———︱—︱—︱—︱—︱——
︱九阳真经︱◎　　︱　◎　︱　　◎︱　　　︱　︱　︱◎︱　︱34946
︱神照经　︱◎　　︱　◎　︱　　◎︱　　　︱　︱　︱　︱　︱34944
︱龙象般若︱　　◎︱　　　︱◎　　︱　◎　︱　︱　︱　︱　︱8736
︱先天功　︱　　◎︱　　　︱◎　　︱　◎　︱　︱　︱　︱　︱8736
︱纯阳无极︱　◎◎︱◎　　︱　　　︱　　　︱　︱　︱　︱　︱28672
︱混元功　︱　　　︱　　　︱　◎◎︱◎　　︱　︱　︱　︱　︱448
︱紫霞秘笈︱　　　︱　　　︱　◎◎︱◎　　︱　︱　︱　︱　︱448
︱————︱———︱———︱———︱———︱—︱—︱—︱—︱——
︱九阴真经︱　◎　︱◎　　︱　　　︱　　◎︱　︱　︱　︱◎︱20497
︱小无相功︱　◎　︱◎　　︱　　　︱　　◎︱　︱　︱　︱　︱20496
︱太玄经　︱　　　︱　　◎︱　◎　︱◎　　︱　︱　︱　︱　︱1344
︱逆运真经︱　　　︱　　◎︱　◎　︱◎　　︱　︱　︱　︱　︱1344
︱蛤蟆功　︱◎　　︱　◎◎︱　　　︱　　　︱　︱　︱　︱　︱35840
︱玉女心经︱　　　︱　　　︱◎　　︱　◎◎︱　︱　︱　︱　︱560
︱寒冰真气︱　　　︱　　　︱◎　　︱　◎◎︱　︱　︱　︱　︱560
︱————︱———︱———︱———︱———︱—︱—︱—︱—︱——
︱葵花宝典︱　　　︱　　　︱◎◎◎︱◎◎◎︱　︱　︱　︱　︱1008
︱北冥神功︱　　　︱　　　︱　　　︱　　　︱　︱　︱　︱　︱0
︱吸星大法︱　　　︱　　　︱　　　︱　　　︱　︱　︱　︱　︱0
————————————————————————————————

二．代码段
以显示已冲穴位的代码为例，添加位置在“--page 显示页数，目前共两页”后部：
i=i+1;
local tmp0;
DrawString(x1,y1+h*i,"已冲穴位：",C_ORANGE,size);
if p["声望"] >=1 then tmp0=string.format("%s","阴维、阴蹻");
end
if p["声望"] >=2 then tmp0=string.format("%s","阳维、阳蹻");
end
if p["声望"] >=4 then tmp0=string.format("%s","冲、带");
end                                                                           
if p["声望"] >=8 then tmp0=string.format("%s","任、督");
end
if p["声望"] >=16 then tmp0=string.format("%s","足厥阴");
end
if p["声望"] >=32 then tmp0=string.format("%s","足少阴");
end
if p["声望"] >=64 then tmp0=string.format("%s","足太阴");
end
if p["声望"] >=128 then tmp0=string.format("%s","足阳明");
end
if p["声望"] >=256 then tmp0=string.format("%s","足少阳");
end
if p["声望"] >=512 then tmp0=string.format("%s","足太阳");
end
if p["声望"] >=1024 then tmp0=string.format("%s","手厥阴");
end
if p["声望"] >=2048 then tmp0=string.format("%s","手少阴");
end
if p["声望"] >=4096 then tmp0=string.format("%s","手太阴");
end
if p["声望"] >=8192 then tmp0=string.format("%s","手阳明");
end
if p["声望"] >=16384 then tmp0=string.format("%s","手少阳");
end
if p["声望"] >=32768 then tmp0=string.format("%s","手太阳");
end
DrawString(x1+size*6,y1+h*i,tmp0,C_GOLD,size);

三．存在问题
每个内功一级加冲穴的具体数值分别是多少？

四．效果图
如下图：

请大家多指导！

[发帖际遇]: 竟然敢用假玄铁令求谢烟客办事！夏海被谢烟客痛殴一顿，丢失银子银两28两。

[ 本帖最后由 夏海 于 2010-1-30 23:41 编辑 ]

killer_zingy

饿，冲脉我不懂， 但是如果要先冲别的穴怎么办？
比如我要冲手阳明， 那不是连其他前面的都冲上去了？

[发帖际遇]: killer_zingy帮助周伯通脱离桃花岛，名动江湖，被全真教视为知己，增加声望2。

winson7891

看懂你的意思，但肯定的是，你的代码写错了~~

或者你有别的代码~

但就凭这串代码，肯定不能识别多学位

另外，为什么不写成2进制，好看多了~

TO KZ
事实上，你说对了，数字无论怎么叠加，都是不会重复的~~

[发帖际遇]: winson7891在海边沙滩上捡到一支圣火令，当废铜卖了，获得银两9。

killer_zingy

难道说我们中国中医的原理是要冲这个先得冲那个？
像金3那样就是随便冲哪个都行的~~~

[发帖际遇]: killer_zingy偷得祖千秋八杯卖与丹青生，卖得银两15两。

夏海

楼上两位，我是这么理解游大的意思的：
从高到低：最低位是“阴维、阴蹻”，最高位是“手太阳”
如果声望值超过了“手太阳”，自然已冲破低位的所有穴位
其他的代码是内功每级加声望（OR），和修炼内功时判断穴位是否已通（AND）

killer_zingy

意思就是说要冲这个必须先冲前面的~
顺序都是定死的~
不怎么人性化诶

[发帖际遇]: killer_zingy跟韦小宝赌钱，被韦小宝出千骗去银两5两。

killer_zingy

还有一个问题， 你那框似乎太小，如果所有的穴位都冲开了话会不会位置不够写字？

[发帖际遇]: killer_zingy竟然敢跟轩辕三光赌博！没想到今天手气好，赢了银两14两。

夏海

只写最高位的穴

游大的原话是：“经脉大致分为正经十二脉、奇经八脉以及经外奇穴，这些林林总总加起来共三百多个穴位，游戏不可能用到那么多，势必要有所简化，故笔者决定将经外奇穴省略。正经十二脉分别为：手太阳、手少阳、手阳明、手太阴、手少阴、手厥阴、足太阳、足少阳、足阳明、足太阴、足少阴、足厥阴；奇经八脉分别为：任脉、督脉、冲脉、带脉、阳维脉、阳蹻脉、阴维脉、阴蹻脉”

具体我也不懂

[发帖际遇]: 夏海相助张召重对抗陈家洛，不料落入红花会埋伏，被打得落荒而逃，损失银两20。

jy02785317

没详细看，感觉代码是有问题的
主要是判断位的方法不正确

给出一个函数，获取某一位的值

1. function getbit(num,a)
   
2.     --num,欲获取位的数
   
3.     --a,欲获取的位，从0开始.表示最低位
   
4.     num=math.modf(num/(2^a))
   
5.     return math.fmod(num,2)
   
6. end

复制代码

[ 本帖最后由 jy02785317 于 2010-1-31 00:11 编辑 ]

夏海

很感谢楼上的宝贵建议
代码确实是能通过的，用的是苍龙lua
当然您的更好

[发帖际遇]: 夏海竟然敢跟轩辕三光赌博！没想到今天手气好，赢了银两14两。

jy02785317

额，看了八楼
原来是只考虑最高的位
那就不存在问题了
(开始恢复的时候，八楼还不存在...)

陸青緣

不会代碼的路過...
(什麼不会代碼??我会html的!! )
lz框框怪怪的...
kz...去弄框框...

凶神恶煞

游戏使用的有符号16位数范围是-32768～+32767
你用的35840应该减65536，实际上在游戏里应该是-29696

winson7891

如果从低到高的话，那20个穴位直接用数字1到20表示不就好了~~

为什么要2进制这样子

游客

挖~~~还真的做出来了
其实我当初写没有考虑很周到...实际应用还不平衡，
不过系统雏形做出来就代表有发展空间！

另可能那篇的意思理解有误，其实１６条经脉可以自由选择冲穴，
不是冲到最高位「手太阳」就表示其他位都冲满，例如
1000 0000 0000 0001 =32768
表示只冲开「手太阳」「阴维、阴蹻」；
而夏海大误解为经脉全冲开，
所以正确显示到状态列应为：

已冲穴位：
◎手太阳　　＊足太阳　　　＊任督
＊手少阳　　＊足少阳　　　＊冲带
＊手阳明　　＊足阳明　　　＊阳维阳蹻
＊手太阴　　＊足太阴　　　◎阴维阴蹻
＊手少阴　　＊足少阴
＊手厥阴　　＊足厥阴

[发帖际遇]: 游客跑江湖卖艺，施展特技“胡说八道”，结果卖出无名草药若干，得款银两11。

夏海

TO凶大：谢谢指导！深受启发

TOw大：如15当家所示，需要表示16个穴位的目前情况

TO游大：还有4个问题：
(1)是否改用物品偏移22或偏移2的字符串，来表示16个穴位的情况例如“1000 0000 0000 0001 ”。偏移22或偏移2都表示物品名。字符串比数字容易操作，省去加减或溢出

(2)自由选择冲穴，那是否要增加一个量：每个穴位被充开需要的点数

(3)是否增加一个画面，穴位的分布和状态，并让用户操作选择充穴

(4)您对《真倚天屠龙记》的穴位系统有什么高见？

[发帖际遇]: 在盟主争夺战中，李文秀施展“我见犹怜”，结果夏海败给李文秀，损失报名费银两14。

游客

(1)啥意思？物品名与经脉名称的关系是？
(2)不用，内功修练成功马上就冲开了，剩下九级只作为提升属性。
若要增加需要点数的变量，还不如直接新增１６个变量当作１６条经脉，
当然资料结构可能就要大变动了。
(3)看你的意思吧
(4)太复杂了，其实不用这么喧宾夺主，有涉及皮毛就好。

[发帖际遇]: 游客偷得祖千秋八杯，被老头子祖千秋追杀打伤，医疗费银两12两。

夏海

34明白了

（1）苍龙lua的物品偏移2和物品偏移22都是物品名称，重复了。取其中一个来作为字符串，表示该秘笈需要的穴位情况。如“1000 0000 0000 0001 ”表示需要手太阳和阴维、阴蹻

（2）“内功修练成功马上就冲开”内功与冲穴是什么对应关系？比如九阴冲手太阳，九阳冲阴维？
那么10种武功不够用，把16个穴位冲开需要16种内功。
“加冲穴”表示能冲开哪个穴位？

[发帖际遇]: 韦小宝得知夏海擒获了冯锡范，大喜过望，奖励银两27两。

游客

(1) 秘笈的「需冲穴」直接写十进制的数值就好啦，
判断是否达到修练条件只要和人物的「冲穴程度」ａｎｄ运算就能得到，
若是要显示「需冲穴」给玩家看，那就每个bit依序取出处理...
做成字串比较快，不过「需冲穴」若很多，物品名偏移就不够了！
(2)内功不一定只能冲开一种呀，
像神照经的「加冲穴」=34944=1000 1000 1000 0000，
表示能冲开「手太阳」「手少阴」「足阳明」，
而目前人物的「冲穴程度」=61440=1111 0000 0000 0000，
则修练成功后ｏｒ运算=63616=1111 1000 1000 0000，
如此已冲开的经脉不会被归零，又能不照顺序冲开经脉。

[发帖际遇]: 游客联手任我行和向问天等人打败东方不败，为任我行夺得教主之位，增加声望3。

[ 本帖最后由 游客 于 2010-1-31 21:25 编辑 ]

killer_zingy

能不能用一个变量就代表所有的穴位

轩辕夏禹

用变量的话，就要用50指令的求余数了。

[发帖际遇]: 轩辕夏禹冒充青木堂主向反清份子征收活动经费，结果：骗得银两14。

KA

lz的代码效率太差了吧…再改改

[发帖际遇]: 黄顺坤卖下一个mod的制作人绝密采访稿，狂赚银两16。

潜龙勿用

楼主可以参考网游侠义道，里面的经脉系统应该是比较齐全的，但建议选择部分，不然工作量会很大的。

夏海

谢谢楼上所有人的指导

经脉冲穴V2.0
一．变量
（1）人物的“声望”属性作为“冲穴程度”变量
（2）秘籍的“加品德”属性作为“加冲穴”变量
（3）秘籍的“练出物品需经验”属性作为“需冲穴”变量
其中“声望”和“加品德”分别要减去10000，以防溢出
“需冲穴”的含义如下：
设需要三个穴位x(1),x(2),x(3)，范围均为[0,15]，对应的“需冲穴”为S
则S=x(1)+x(2)*16+x(3)*256
x(1)=S mod 16
x(2)=(S/16)mod 16
x(3)=S mod 256
冲的穴位应该不多，因为根据平衡和取舍的思想，像拳/刀/剑/特，穴位只能在阴/阳/内/外中选择其中一种。而且总共才10种武功，能留给冲穴的最多两三种。

二．代码段
(1)判断需冲穴的代码：
在函数function CanUseThing(id,personid)的后部加入：

if JY.Thing[id]["练出物品需经验"] >= 0 then
       local i=0;
       i=math.fmod(JY.Thing[id]["练出物品需经验"],16)           
       if math.fmod((JY.Person[personid]["声望"]+10000)/(2^i),2)==0 then  
                       return false;
       end
       i=math.fmod(JY.Thing[id]["练出物品需经验"]/16,16)           
       if math.fmod((JY.Person[personid]["声望"]+10000)/(2^i),2)==0 then  
                       return false;
       end   
       i=math.fmod(JY.Thing[id]["练出物品需经验"],256)           
       if math.fmod((JY.Person[personid]["声望"]+10000)/(2^i),2)==0 then  
                       return false;
       end   
end

(2)加冲穴代码：

在函数function War_PersonTrainBook(pid)中加入：

AddPersonAttrib(pid,"声望",JY.Thing[thingid]["加品德"]+10000);

三．存在问题

代码的体力活我写好了，设计平衡数据属性的脑力活，就交给游大你了。

[ 本帖最后由 夏海 于 2010-2-1 12:17 编辑 ]

游客

夏海大的作法好像是再简化成三条经脉？
这样的好处是冲穴有［０～１５］阶段，
不过应该能做四条经脉吧，怎么有４ｂｉｔ被放弃了。。。

另x(3)=(S/256) mod 16 <-------好像是这个算法

[发帖际遇]: 游客找冯默风打造兵器，得到了一把大剪刀，见到岳老三，高价卖给他，赚了银两37。