自创武功系统

南宫梦

自创武功系统
本代码通过本人正在制作的修改档《再战江湖》测试通过50指令被鱼的改写，完全变成了一门变成语言，对于有编程基础的人来说，可以制作出任何想要的事件，但对于完全不懂变成的人来说，跟天书没什么区别。
今天早上起来一气呵成写了段自创武功的代码，没经过优化，所以很多地方弄得很麻烦，拿出来献丑只是希望给大家点启发，做出更多更好的原游戏没有的功能
功能说明：1。使用武功1，命名为自创武功
          2。触发事件后，用玩家名字替换原武功名，但为了方便，我没弄得太复杂，只是这样：比如玩家“南宫梦”，自创武功后的武功名为“南宫梦功”
          3。判断玩家拳法、剑法、刀法、特殊，那个属性高，创造出的招式就属于哪类
          4。伤害根据玩家属性而定，比如玩家剑法最高，那伤害就按玩家的剑法属性进行计算。我这里只是简单的计算一下，1级＝属性原值，2级＝原值*2，……，10级＝原值*10
          5。攻击移动范围根据玩家内力而定
          6。攻击杀伤范围根据玩家武力而定
使用说明：复制源代码，使用fish7.0修改器的事件、对话修改，然后找到相应事件，点从剪贴板复制就ok。用到自己的修改档中要适当改变武功属性的计算方法，因为每个人的修改档不同。还有记得要设计上一段好玩的情节，执行本代码后要让玩家不能再触发本代码哦
源码如下：
===============
;Kdefnum=1042
  50 0 1 8 0 0 0 0               ;  50(32):变量赋值 [X1]=8
  50 0 2 2 0 0 0 0               ;  50(32):变量赋值 [X2]=2
  50 17 10 0 0 1 2000 0          ;  50(32):读取属性 [X2000]=人物0属性偏移[X1]
;:Label0
  50 16 110 3 1 2 2000 0         ;  50(32):保存属性 武功1属性偏移[X2]=[X2000]
  50 3 0 0 1 1 2 0               ;  50(32):四则运算 [X1]=[X1]+2
  50 3 0 0 2 2 2 0               ;  50(32):四则运算 [X2]=[X2]+2
  50 17 10 0 0 1 2000 0          ;  50(32):读取属性 [X2000]=人物0属性偏移[X1]
  50 4 0 2 2000 0 0 0            ;  50(32):变量判断 If[X2000]=0  then JMP=0 else JMP=1
  36 256 0 -44                   ;  36(24):跳转变量JMP是否为0否则跳转到:Label0
  50 0 3 1 0 0 0 0               ;  50(32):变量赋值 [X3]=1
  50 0 4 100 0 0 0 0             ;  50(32):变量赋值 [X4]=100
;:Label1
  50 17 10 0 0 4 5 0             ;  50(32):读取属性 [X5]=人物0属性偏移[X4]
  50 1 11 0 400 3 5 0            ;  50(32):数组变量赋值 数组400([X3])=[X5](Int)
  50 3 0 0 3 3 1 0               ;  50(32):四则运算 [X3]=[X3]+1
  50 3 0 0 4 4 2 0               ;  50(32):四则运算 [X4]=[X4]+2
  50 4 0 0 3 5 0 0               ;  50(32):变量判断 If[X3]<5 then JMP=0 else JMP=1
  36 256 -44 0                   ;  36(24):跳转变量JMP是否为0是则跳转到:Label1
  50 2 0 0 400 1 8 0             ;  50(32):取数组变量值 [X8]=数组400(1)(Int)
  50 0 6 1 0 0 0 0               ;  50(32):变量赋值 [X6]=1
  50 0 7 2 0 0 0 0               ;  50(32):变量赋值 [X7]=2
;:Label3
  50 2 1 0 400 7 9 0             ;  50(32):取数组变量值 [X9]=数组400([X7])(Int)
  50 4 1 0 8 9 0 0               ;  50(32):变量判断 If[X8]<[X9] then JMP=0 else JMP=1
  36 256 0 16                    ;  36(24):跳转变量JMP是否为0否则跳转到:Label2
  50 3 0 0 8 9 0 0               ;  50(32):四则运算 [X8]=[X9]+0
  50 3 0 0 6 7 0 0               ;  50(32):四则运算 [X6]=[X7]+0
;:Label2
  50 3 0 0 7 7 1 0               ;  50(32):四则运算 [X7]=[X7]+1
  50 4 0 0 7 5 0 0               ;  50(32):变量判断 If[X7]<5 then JMP=0 else JMP=1
  36 256 -56 0                   ;  36(24):跳转变量JMP是否为0是则跳转到:Label3
  50 16 100 3 1 24 6 0           ;  50(32):保存属性 武功1属性偏移24=[X6]
  50 0 10 36 0 0 0 0             ;  50(32):变量赋值 [X10]=36
  50 0 11 1 0 0 0 0              ;  50(32):变量赋值 [X11]=1
;:Label4
  50 3 1 2 101 8 11 0            ;  50(32):四则运算 [X101]=[X8]*[X11]
  50 16 110 3 1 10 101 0         ;  50(32):保存属性 武功1属性偏移[X10]=[X101]
  50 3 0 0 10 10 2 0             ;  50(32):四则运算 [X10]=[X10]+2
  50 3 0 0 11 11 1 0             ;  50(32):四则运算 [X11]=[X11]+1
  50 4 0 0 11 11 0 0             ;  50(32):变量判断 If[X11]<11 then JMP=0 else JMP=1
  36 256 -44 0                   ;  36(24):跳转变量JMP是否为0是则跳转到:Label4
  50 17 0 0 0 82 12 0            ;  50(32):读取属性 [X12]=人物0属性偏移82
  50 3 0 3 12 12 800 0           ;  50(32):四则运算 [X12]=[X12]/800
  50 16 100 3 1 56 12 0          ;  50(32):保存属性 武功1属性偏移56=[X12]
  50 16 100 3 1 58 12 0          ;  50(32):保存属性 武功1属性偏移58=[X12]
  50 16 100 3 1 60 12 0          ;  50(32):保存属性 武功1属性偏移60=[X12]
  50 17 0 0 0 82 12 0            ;  50(32):读取属性 [X12]=人物0属性偏移82
  50 3 0 3 12 12 600 0           ;  50(32):四则运算 [X12]=[X12]/600
  50 16 100 3 1 62 12 0          ;  50(32):保存属性 武功1属性偏移62=[X12]
  50 16 100 3 1 64 12 0          ;  50(32):保存属性 武功1属性偏移64=[X12]
  50 16 100 3 1 66 12 0          ;  50(32):保存属性 武功1属性偏移66=[X12]
  50 17 0 0 0 82 12 0            ;  50(32):读取属性 [X12]=人物0属性偏移82
  50 3 0 3 12 12 400 0           ;  50(32):四则运算 [X12]=[X12]/400
  50 16 100 3 1 68 12 0          ;  50(32):保存属性 武功1属性偏移68=[X12]
  50 16 100 3 1 70 12 0          ;  50(32):保存属性 武功1属性偏移70=[X12]
  50 16 100 3 1 72 12 0          ;  50(32):保存属性 武功1属性偏移72=[X12]
  50 17 0 0 0 82 12 0            ;  50(32):读取属性 [X12]=人物0属性偏移82
  50 3 0 3 12 12 200 0           ;  50(32):四则运算 [X12]=[X12]/200
  50 16 100 3 1 74 12 0          ;  50(32):保存属性 武功1属性偏移74=[X12]
  50 17 0 0 0 86 13 0            ;  50(32):读取属性 [X13]=人物0属性偏移86
  50 3 0 3 13 13 500 0           ;  50(32):四则运算 [X13]=[X13]/500
  50 16 100 3 1 76 13 0          ;  50(32):保存属性 武功1属性偏移76=[X13]
  50 16 100 3 1 78 13 0          ;  50(32):保存属性 武功1属性偏移78=[X13]
  50 17 0 0 0 86 13 0            ;  50(32):读取属性 [X13]=人物0属性偏移86
  50 3 0 3 13 13 400 0           ;  50(32):四则运算 [X13]=[X13]/400
  50 16 100 3 1 80 13 0          ;  50(32):保存属性 武功1属性偏移80=[X13]
  50 16 100 3 1 82 13 0          ;  50(32):保存属性 武功1属性偏移82=[X13]
  50 17 0 0 0 86 13 0            ;  50(32):读取属性 [X13]=人物0属性偏移86
  50 3 0 3 13 13 300 0           ;  50(32):四则运算 [X13]=[X13]/300
  50 16 100 3 1 84 13 0          ;  50(32):保存属性 武功1属性偏移84=[X13]
  50 16 100 3 1 86 13 0          ;  50(32):保存属性 武功1属性偏移86=[X13]
  50 17 0 0 0 86 13 0            ;  50(32):读取属性 [X13]=人物0属性偏移86
  50 3 0 3 13 13 200 0           ;  50(32):四则运算 [X13]=[X13]/200
  50 16 100 3 1 88 13 0          ;  50(32):保存属性 武功1属性偏移88=[X13]
  50 16 100 3 1 90 13 0          ;  50(32):保存属性 武功1属性偏移90=[X13]
  50 17 0 0 0 86 13 0            ;  50(32):读取属性 [X13]=人物0属性偏移86
  50 3 0 3 13 13 100 0           ;  50(32):四则运算 [X13]=[X13]/100
  50 16 100 3 1 92 13 0          ;  50(32):保存属性 武功1属性偏移92=[X13]
  50 16 100 3 1 94 13 0          ;  50(32):保存属性 武功1属性偏移94=[X13]
  0                              ;  0(0)::空语句(清屏)
  33 0 1 0                       ;  33(21):南宫梦学会武功自创武功
  0                              ;  0(0)::空语句(清屏)
  -1                             ;  -1(FFFF):事件结束
=============================

[ Last edited by 南宫梦 on 2006-10-5 at 20:44 ]

小随

感谢南宫老师~期待更多的新指令……嘿嘿
好的老师带我上天堂~~~~~~~~~

游客

好难读懂阿．．．
可行的话注释能否写清楚一点?
或者把AddKedf  V1.0翻译口语一点 , 专业术语太多了...

阿秀

真象看天书一样,眼睛都看花了,都不知道是什么意思!汗!

pshen

建议置顶或精华

路人甲

就是属性满了就强```

shingson

好难读懂阿．．．

NyKroX

我看到头晕=.=

天外草

果然是天书... 没有一点编程基础的人灰溜溜地爬走

jy02584492

强人

lkm_cf

我是编程的，没想到一点看不懂！

八月鹰飞

昨天终于看懂了50的一些代码。

张贝克

我宁愿去学鸟语..............完全看不懂

lkm_cf

楼上的，鸟语应该更老火吧，呵呵

keyang

谢谢老师.~~!

月之子

[s:02]
偶看不懂

飛少爺

不懂就要学习啊。。。

zr1993513

好难啊

_×蕭(-楓楓-']

眼花了,,,也不知怎麼用

zhengjingt

...........晕了

cgr3033

感谢南宫老师~