配药系统

南宫梦 · 发表于 2006-9-30 16:15

配药系统
交流之做，供大家参考，本代码可开发的地方还很多
功能说明：此系统很简单，按药方，使用10种药材中的5种进行搭配，可配出相应药品。配药是有成功率的，根据医疗能力及药品等级而定而定。比如同样医疗能力，配出玉珍散的几率比配出生生造化丹的几率高
声明：本代码未经过优化，但在《再战江湖》中测试通过

;Kdefnum=1043
;创造配药菜单。使用菜单之前要先定义一个数组，数组中元素的值为菜单存放选项字符串的变量名
  50 0 1000 0 0 0 1 0          ;  50(32):变量赋值 [X1000]=0
;:Label0
  50 3 0 2 1001 1000 100 0    ;  50(32):四则运算 [X1001]=[X1000]*100
  50 3 0 0 1001 1001 2000 0    ;  50(32):四则运算 [X1001]=[X1001]+2000
  50 1 3 0 1100 1000 1001 0    ;  50(32):数组变量赋值数组1100([X1000])=[X1001](Int)
  50 3 0 0 1000 1000 1 0       ;  50(32):四则运算 [X1000]=[X1000]+1
  50 4 0 0 9 10 0 0             ;  50(32):变量判断 If[X9]<10 then JMP=0 else JMP=1
  36 256 -44 0                ;  36(24):跳转变量JMP是否为0是则跳转到:Label0
  50 0 1002 0 0 0 0 0          ;  50(32):变量赋值 [X1002]=0
  50 0 1005 0 0 0 0 0          ;  50(32):变量赋值 [X1005]=0
  50 0 1 11 0 0 0 0             ;  50(32):变量赋值 [X1]=11
;:Label1
  50 3 0 2 1005 1002 100 0    ;  50(32):四则运算 [X1005]=[X1002]*100
  50 3 0 0 1005 1005 2000 0    ;  50(32):四则运算 [X1005]=[X1005]+2000
  50 32 0 1005 5 0 0 0          ;  50(32):修改下一条指令参数下一条指令参数5=[X1005]
  50 27 1 1 1 400 0 0          ;  50(32):取属性名称 Str400=物品[X1]
  50 3 0 0 1 1 1 0             ;  50(32):四则运算 [X1]=[X1]+1
  50 3 0 0 1002 1002 1 0       ;  50(32):四则运算 [X1002]=[X1002]+1
  50 4 0 0 1002 9 0 0          ;  50(32):变量判断 If[X1002]<9 then JMP=0 else JMP=1
  36 256 -60 0                ;  36(24):跳转变量JMP是否为0是则跳转到:Label1
  50 34 0 95 10 100 170 0       ;  50(32):处理背景位置(95,10) Width=100 Height=170
  50 39 0 9 1100 100 100 15    ;  50(32):菜单选择菜单个数9Str1100()返回=[X100]显示位置(100,15)
;出现菜单后，如果选择了菜单项则在屏幕上出现此药品所需原料。原料单在对话中，对话7197～7205
  50 4 0 5 100 0 0 0          ;  50(32):变量判断 If[X100]>0 then JMP=0 else JMP=1
  36 256 0 987                ;  36(24):跳转变量JMP是否为0否则跳转到:Label2
  0                            ;  0(0)::空语句(清屏)
  50 3 0 0 20 100 7196 0       ;  50(32):四则运算 [X20]=[X100]+7196
  50 8 1 20 3000 0 0 0          ;  50(32):读对话到字符串  Str3000=talk([X20])
  50 36 0 3000 60 30 1797 0    ;  50(32):显示字符串并等待击键显示字符串3000 (60,30)Color1797
  36 256 7 0                   ;  36(24):跳转变量JMP是否为0是则跳转到:Label3
  0                            ;  0(0)::空语句(清屏)
  1 7206 0 1                   ;  1(1):[南宫梦]说: 不用了！
  0                            ;  0(0)::空语句(清屏)
  7                            ;  7(7):无条件返回
;:Label3
;一下为选择说要配的药品后的事件，使用的是原游戏指令
  0                            ;  0(0)::空语句(清屏)
  50 4 0 2 100 1 0 0          ;  50(32):变量判断 If[X100]=1  then JMP=0 else JMP=1
  36 256 0 93                   ;  36(24):跳转变量JMP是否为0否则跳转到:Label4
  18 9 0 82                   ;  18(12):是否有物品[甘草]否则跳转到:Label5
  18 10 0 78                   ;  18(12):是否有物品[羌活]否则跳转到:Label6
  18 1 0 74                   ;  18(12):是否有物品[麦冬]否则跳转到:Label7
  18 8 0 70                   ;  18(12):是否有物品[白术]否则跳转到:Label8
  18 6 0 66                   ;  18(12):是否有物品[熟地黄]否则跳转到:Label9
  0                            ;  0(0)::空语句(清屏)
  32 6 -1                      ;  32(20):物品[熟地黄]+[-1]
  32 9 -1                      ;  32(20):物品[甘草]+[-1]
  32 10 -1                      ;  32(20):物品[羌活]+[-1]
  32 1 -1                      ;  32(20):物品[麦冬]+[-1]
  32 8 -1                      ;  32(20):物品[白术]+[-1]
  0                            ;  0(0)::空语句(清屏)
;下4句为判断配药是否成功。首先读取玩家医疗能力值，然后将起除以10，比如玩家医疗能力100，除以10后为10，将10这个数存到变量X50中，然后随机产生一个小于40-1的数，放到变量X51中，判断，

如果X51小于等于x50，则配药成功。也就是说，医疗为100的人配出天王保命丹的几率为10/39（再战江湖中，天王保命丹是高级药品，所以配出的几率小）
  50 17 0 0 0 92 50 0          ;  50(32):读取属性 [X50]=人物0属性偏移92
  50 3 0 3 50 50 10 0          ;  50(32):四则运算 [X50]=[X50]/10
  50 38 0 40 51 0 0 0          ;  50(32):随机数 [X51]=Random(40)
  50 4 1 1 51 50 0 0          ;  50(32):变量判断 If[X51]<=[X50] then JMP=0 else JMP=1
  36 256 0 6                   ;  36(24):跳转变量JMP是否为0否则跳转到:Label10
  0                            ;  0(0)::空语句(清屏)
  2 11 1                      ;  2(2):得到物品[天王保命丹][1]
  0                            ;  0(0)::空语句(清屏)
  7                            ;  7(7):无条件返回
;:Label10
  0                            ;  0(0)::空语句(清屏)
  1 7208 0 1                   ;  1(1):[南宫梦]说: ．．．．．．*失败了．．．*看来我还得加强医疗能力啊
  0                            ;  0(0)::空语句(清屏)
  7                            ;  7(7):无条件返回
;:Label9
;:Label8
;:Label7
;:Label6
;:Label5
  0                            ;  0(0)::空语句(清屏)
  1 7207 0 1                   ;  1(1):[南宫梦]说: 药材好像不够．
  0                            ;  0(0)::空语句(清屏)
  7                            ;  7(7):无条件返回
;:Label4
  0                            ;  0(0)::空语句(清屏)
  50 4 0 2 100 2 0 0          ;  50(32):变量判断 If[X100]=2  then JMP=0 else JMP=1
  36 256 0 93                   ;  36(24):跳转变量JMP是否为0否则跳转到:Label11
  18 9 0 82                   ;  18(12):是否有物品[甘草]否则跳转到:Label12
  18 0 0 78                   ;  18(12):是否有物品[半夏]否则跳转到:Label13
  18 3 0 74                   ;  18(12):是否有物品[当归]否则跳转到:Label14
  18 7 0 70                   ;  18(12):是否有物品[防风]否则跳转到:Label15
  18 6 0 66                   ;  18(12):是否有物品[熟地黄]否则跳转到:Label16
  0                            ;  0(0)::空语句(清屏)
  32 6 -1                      ;  32(20):物品[熟地黄]+[-1]
  32 9 -1                      ;  32(20):物品[甘草]+[-1]
  32 0 -1                      ;  32(20):物品[半夏]+[-1]
  32 3 -1                      ;  32(20):物品[当归]+[-1]
  32 7 -1                      ;  32(20):物品[防风]+[-1]
  0                            ;  0(0)::空语句(清屏)
  50 17 0 0 0 92 50 0          ;  50(32):读取属性 [X50]=人物0属性偏移92
  50 3 0 3 50 50 10 0          ;  50(32):四则运算 [X50]=[X50]/10
  50 38 0 30 51 0 0 0          ;  50(32):随机数 [X51]=Random(30)
  50 4 1 1 51 50 0 0          ;  50(32):变量判断 If[X51]<=[X50] then JMP=0 else JMP=1
  36 256 0 6                   ;  36(24):跳转变量JMP是否为0否则跳转到:Label17
  0                            ;  0(0)::空语句(清屏)
  2 12 1                      ;  2(2):得到物品[六阳正气丹][1]
  0                            ;  0(0)::空语句(清屏)
  7                            ;  7(7):无条件返回
;:Label17
  0                            ;  0(0)::空语句(清屏)
  1 7208 0 1                   ;  1(1):[南宫梦]说: ．．．．．．*失败了．．．*看来我还得加强医疗能力啊
  0                            ;  0(0)::空语句(清屏)
  7                            ;  7(7):无条件返回
;:Label16
;:Label15
;:Label14
;:Label13
;:Label12
  0                            ;  0(0)::空语句(清屏)
  1 7207 0 1                   ;  1(1):[南宫梦]说: 药材好像不够．
  0                            ;  0(0)::空语句(清屏)
  7                            ;  7(7):无条件返回
;:Label11
  50 4 0 2 100 3 0 0          ;  50(32):变量判断 If[X100]=3  then JMP=0 else JMP=1
  36 256 0 93                   ;  36(24):跳转变量JMP是否为0否则跳转到:Label18
  18 5 0 82                   ;  18(12):是否有物品[茯苓]否则跳转到:Label19
  18 7 0 78                   ;  18(12):是否有物品[防风]否则跳转到:Label20
  18 3 0 74                   ;  18(12):是否有物品[当归]否则跳转到:Label21
  18 8 0 70                   ;  18(12):是否有物品[白术]否则跳转到:Label22
  18 6 0 66                   ;  18(12):是否有物品[熟地黄]否则跳转到:Label23
  0                            ;  0(0)::空语句(清屏)
  32 5 -1                      ;  32(20):物品[茯苓]+[-1]
  32 7 -1                      ;  32(20):物品[防风]+[-1]
  32 8 -1                      ;  32(20):物品[白术]+[-1]
  32 3 -1                      ;  32(20):物品[当归]+[-1]
  32 6 -1                      ;  32(20):物品[熟地黄]+[-1]
  0                            ;  0(0)::空语句(清屏)
  50 17 0 0 0 92 50 0          ;  50(32):读取属性 [X50]=人物0属性偏移92
  50 3 0 3 50 50 10 0          ;  50(32):四则运算 [X50]=[X50]/10
  50 38 0 20 51 0 0 0          ;  50(32):随机数 [X51]=Random(20)
  50 4 1 1 51 50 0 0          ;  50(32):变量判断 If[X51]<=[X50] then JMP=0 else JMP=1
  36 256 0 6                   ;  36(24):跳转变量JMP是否为0否则跳转到:Label24
  0                            ;  0(0)::空语句(清屏)
  2 13 1                      ;  2(2):得到物品[九花玉露丸][1]
  0                            ;  0(0)::空语句(清屏)
  7                            ;  7(7):无条件返回
;:Label24
  0                            ;  0(0)::空语句(清屏)
  1 7208 0 1                   ;  1(1):[南宫梦]说: ．．．．．．*失败了．．．*看来我还得加强医疗能力啊
  0                            ;  0(0)::空语句(清屏)
  7                            ;  7(7):无条件返回
;:Label23
;:Label22
;:Label21
;:Label20
;:Label19
  0                            ;  0(0)::空语句(清屏)
  1 7207 0 1                   ;  1(1):[南宫梦]说: 药材好像不够．
  0                            ;  0(0)::空语句(清屏)
  7                            ;  7(7):无条件返回
;:Label18
  0                            ;  0(0)::空语句(清屏)
  50 4 0 2 100 4 0 0          ;  50(32):变量判断 If[X100]=4  then JMP=0 else JMP=1
  36 256 0 93                   ;  36(24):跳转变量JMP是否为0否则跳转到:Label25
  18 0 0 82                   ;  18(12):是否有物品[半夏]否则跳转到:Label26
  18 1 0 78                   ;  18(12):是否有物品[麦冬]否则跳转到:Label27
  18 2 0 74                   ;  18(12):是否有物品[瓜蒌]否则跳转到:Label28
  18 3 0 70                   ;  18(12):是否有物品[当归]否则跳转到:Label29
  18 4 0 66                   ;  18(12):是否有物品[生地黄]否则跳转到:Label30
  0                            ;  0(0)::空语句(清屏)
  32 0 -1                      ;  32(20):物品[半夏]+[-1]
  32 1 -1                      ;  32(20):物品[麦冬]+[-1]
  32 3 -1                      ;  32(20):物品[当归]+[-1]
  32 2 -1                      ;  32(20):物品[瓜蒌]+[-1]
  32 4 -1                      ;  32(20):物品[生地黄]+[-1]
  0                            ;  0(0)::空语句(清屏)
  50 17 0 0 0 92 50 0          ;  50(32):读取属性 [X50]=人物0属性偏移92
  50 3 0 3 50 50 10 0          ;  50(32):四则运算 [X50]=[X50]/10
  50 38 0 10 51 0 0 0          ;  50(32):随机数 [X51]=Random(10)
  50 4 1 1 51 50 0 0          ;  50(32):变量判断 If[X51]<=[X50] then JMP=0 else JMP=1
  36 256 0 6                   ;  36(24):跳转变量JMP是否为0否则跳转到:Label31
  0                            ;  0(0)::空语句(清屏)
  2 14 1                      ;  2(2):得到物品[玉灵散][1]
  0                            ;  0(0)::空语句(清屏)
  7                            ;  7(7):无条件返回
;:Label31
  0                            ;  0(0)::空语句(清屏)
  1 7208 0 1                   ;  1(1):[南宫梦]说: ．．．．．．*失败了．．．*看来我还得加强医疗能力啊
  0                            ;  0(0)::空语句(清屏)
  7                            ;  7(7):无条件返回
;:Label30
;:Label29
;:Label28
;:Label27
;:Label26
  0                            ;  0(0)::空语句(清屏)
  1 7207 0 1                   ;  1(1):[南宫梦]说: 药材好像不够．
  0                            ;  0(0)::空语句(清屏)
  7                            ;  7(7):无条件返回
;:Label25
  0                            ;  0(0)::空语句(清屏)
  50 4 0 2 100 5 0 0          ;  50(32):变量判断 If[X100]=5  then JMP=0 else JMP=1
  36 256 0 93                   ;  36(24):跳转变量JMP是否为0否则跳转到:Label32
  18 9 0 82                   ;  18(12):是否有物品[甘草]否则跳转到:Label33
  18 1 0 78                   ;  18(12):是否有物品[麦冬]否则跳转到:Label34
  18 10 0 74                   ;  18(12):是否有物品[羌活]否则跳转到:Label35
  18 3 0 70                   ;  18(12):是否有物品[当归]否则跳转到:Label36
  18 6 0 66                   ;  18(12):是否有物品[熟地黄]否则跳转到:Label37
  0                            ;  0(0)::空语句(清屏)
  32 9 -1                      ;  32(20):物品[甘草]+[-1]
  32 1 -1                      ;  32(20):物品[麦冬]+[-1]
  32 3 -1                      ;  32(20):物品[当归]+[-1]
  32 10 -1                      ;  32(20):物品[羌活]+[-1]
  32 6 -1                      ;  32(20):物品[熟地黄]+[-1]
  0                            ;  0(0)::空语句(清屏)
  50 17 0 0 0 92 50 0          ;  50(32):读取属性 [X50]=人物0属性偏移92
  50 3 0 3 50 50 10 0          ;  50(32):四则运算 [X50]=[X50]/10
  50 38 0 40 51 0 0 0          ;  50(32):随机数 [X51]=Random(40)
  50 4 1 1 51 50 0 0          ;  50(32):变量判断 If[X51]<=[X50] then JMP=0 else JMP=1
  36 256 0 6                   ;  36(24):跳转变量JMP是否为0否则跳转到:Label38
  0                            ;  0(0)::空语句(清屏)
  2 15 1                      ;  2(2):得到物品[生生造化丹][1]
  0                            ;  0(0)::空语句(清屏)
  7                            ;  7(7):无条件返回
;:Label38
  0                            ;  0(0)::空语句(清屏)
  1 7208 0 1                   ;  1(1):[南宫梦]说: ．．．．．．*失败了．．．*看来我还得加强医疗能力啊
  0                            ;  0(0)::空语句(清屏)
  7                            ;  7(7):无条件返回
;:Label37
;:Label36
;:Label35
;:Label34
;:Label33
  0                            ;  0(0)::空语句(清屏)
  1 7207 0 1                   ;  1(1):[南宫梦]说: 药材好像不够．
  0                            ;  0(0)::空语句(清屏)
  7                            ;  7(7):无条件返回
;:Label32
  0                            ;  0(0)::空语句(清屏)
  50 4 0 2 100 6 0 0          ;  50(32):变量判断 If[X100]=6  then JMP=0 else JMP=1
  36 256 0 93                   ;  36(24):跳转变量JMP是否为0否则跳转到:Label39
  18 7 0 82                   ;  18(12):是否有物品[防风]否则跳转到:Label40
  18 8 0 78                   ;  18(12):是否有物品[白术]否则跳转到:Label41
  18 9 0 74                   ;  18(12):是否有物品[甘草]否则跳转到:Label42
  18 10 0 70                   ;  18(12):是否有物品[羌活]否则跳转到:Label43
  18 6 0 66                   ;  18(12):是否有物品[熟地黄]否则跳转到:Label44
  0                            ;  0(0)::空语句(清屏)
  32 7 -1                      ;  32(20):物品[防风]+[-1]
  32 8 -1                      ;  32(20):物品[白术]+[-1]
  32 9 -1                      ;  32(20):物品[甘草]+[-1]
  32 10 -1                      ;  32(20):物品[羌活]+[-1]
  32 6 -1                      ;  32(20):物品[熟地黄]+[-1]
  0                            ;  0(0)::空语句(清屏)
  50 17 0 0 0 92 50 0          ;  50(32):读取属性 [X50]=人物0属性偏移92
  50 3 0 3 50 50 10 0          ;  50(32):四则运算 [X50]=[X50]/10
  50 38 0 30 51 0 0 0          ;  50(32):随机数 [X51]=Random(30)
  50 4 1 1 51 50 0 0          ;  50(32):变量判断 If[X51]<=[X50] then JMP=0 else JMP=1
  36 256 0 6                   ;  36(24):跳转变量JMP是否为0否则跳转到:Label45
  0                            ;  0(0)::空语句(清屏)
  2 16 1                      ;  2(2):得到物品[九转熊蛇丸][1]
  0                            ;  0(0)::空语句(清屏)
  7                            ;  7(7):无条件返回
;:Label45
  0                            ;  0(0)::空语句(清屏)
  1 7208 0 1                   ;  1(1):[南宫梦]说: ．．．．．．*失败了．．．*看来我还得加强医疗能力啊
  0                            ;  0(0)::空语句(清屏)
  7                            ;  7(7):无条件返回
;:Label44
;:Label43
;:Label42
;:Label41
;:Label40
  0                            ;  0(0)::空语句(清屏)
  1 7207 0 1                   ;  1(1):[南宫梦]说: 药材好像不够．
  0                            ;  0(0)::空语句(清屏)
  7                            ;  7(7):无条件返回
;:Label39
  50 4 0 2 100 7 0 0          ;  50(32):变量判断 If[X100]=7  then JMP=0 else JMP=1
  36 256 0 93                   ;  36(24):跳转变量JMP是否为0否则跳转到:Label46
  18 1 0 82                   ;  18(12):是否有物品[麦冬]否则跳转到:Label47
  18 3 0 78                   ;  18(12):是否有物品[当归]否则跳转到:Label48
  18 5 0 74                   ;  18(12):是否有物品[茯苓]否则跳转到:Label49
  18 9 0 70                   ;  18(12):是否有物品[甘草]否则跳转到:Label50
  18 10 0 66                   ;  18(12):是否有物品[羌活]否则跳转到:Label51
  0                            ;  0(0)::空语句(清屏)
  32 1 -1                      ;  32(20):物品[麦冬]+[-1]
  32 3 -1                      ;  32(20):物品[当归]+[-1]
  32 5 -1                      ;  32(20):物品[茯苓]+[-1]
  32 9 -1                      ;  32(20):物品[甘草]+[-1]
  32 10 -1                      ;  32(20):物品[羌活]+[-1]
  0                            ;  0(0)::空语句(清屏)
  50 17 0 0 0 92 50 0          ;  50(32):读取属性 [X50]=人物0属性偏移92
  50 3 0 3 50 50 10 0          ;  50(32):四则运算 [X50]=[X50]/10
  50 38 0 20 51 0 0 0          ;  50(32):随机数 [X51]=Random(20)
  50 4 1 1 51 50 0 0          ;  50(32):变量判断 If[X51]<=[X50] then JMP=0 else JMP=1
  36 256 0 6                   ;  36(24):跳转变量JMP是否为0否则跳转到:Label52
  0                            ;  0(0)::空语句(清屏)
  2 17 1                      ;  2(2):得到物品[镇心理气丸][1]
  0                            ;  0(0)::空语句(清屏)
  7                            ;  7(7):无条件返回
;:Label52
  0                            ;  0(0)::空语句(清屏)
  1 7208 0 1                   ;  1(1):[南宫梦]说: ．．．．．．*失败了．．．*看来我还得加强医疗能力啊
  0                            ;  0(0)::空语句(清屏)
  7                            ;  7(7):无条件返回
;:Label51
;:Label50
;:Label49
;:Label48
;:Label47
  0                            ;  0(0)::空语句(清屏)
  1 7207 0 1                   ;  1(1):[南宫梦]说: 药材好像不够．
  0                            ;  0(0)::空语句(清屏)
  7                            ;  7(7):无条件返回
;:Label46
  50 4 0 2 100 8 0 0          ;  50(32):变量判断 If[X100]=8  then JMP=0 else JMP=1
  36 256 0 93                   ;  36(24):跳转变量JMP是否为0否则跳转到:Label53
  18 0 0 82                   ;  18(12):是否有物品[半夏]否则跳转到:Label54
  18 2 0 78                   ;  18(12):是否有物品[瓜蒌]否则跳转到:Label55
  18 7 0 74                   ;  18(12):是否有物品[防风]否则跳转到:Label56
  18 8 0 70                   ;  18(12):是否有物品[白术]否则跳转到:Label57
  18 4 0 66                   ;  18(12):是否有物品[生地黄]否则跳转到:Label58
  0                            ;  0(0)::空语句(清屏)
  32 0 -1                      ;  32(20):物品[半夏]+[-1]
  32 2 -1                      ;  32(20):物品[瓜蒌]+[-1]
  32 7 -1                      ;  32(20):物品[防风]+[-1]
  32 8 -1                      ;  32(20):物品[白术]+[-1]
  32 4 -1                      ;  32(20):物品[生地黄]+[-1]
  0                            ;  0(0)::空语句(清屏)
  50 17 0 0 0 92 50 0          ;  50(32):读取属性 [X50]=人物0属性偏移92
  50 3 0 3 50 50 10 0          ;  50(32):四则运算 [X50]=[X50]/10
  50 38 0 10 51 0 0 0          ;  50(32):随机数 [X51]=Random(10)
  50 4 1 1 51 50 0 0          ;  50(32):变量判断 If[X51]<=[X50] then JMP=0 else JMP=1
  36 256 0 6                   ;  36(24):跳转变量JMP是否为0否则跳转到:Label59
  0                            ;  0(0)::空语句(清屏)
  2 18 1                      ;  2(2):得到物品[无常丹][1]
  0                            ;  0(0)::空语句(清屏)
  7                            ;  7(7):无条件返回
;:Label59
  0                            ;  0(0)::空语句(清屏)
  1 7208 0 1                   ;  1(1):[南宫梦]说: ．．．．．．*失败了．．．*看来我还得加强医疗能力啊
  0                            ;  0(0)::空语句(清屏)
  7                            ;  7(7):无条件返回
;:Label58
;:Label57
;:Label56
;:Label55
;:Label54
  0                            ;  0(0)::空语句(清屏)
  1 7207 0 1                   ;  1(1):[南宫梦]说: 药材好像不够．
  0                            ;  0(0)::空语句(清屏)
  7                            ;  7(7):无条件返回
;:Label53
  0                            ;  0(0)::空语句(清屏)
  50 4 0 2 100 9 0 0          ;  50(32):变量判断 If[X100]=9  then JMP=0 else JMP=1
  36 256 0 93                   ;  36(24):跳转变量JMP是否为0否则跳转到:Label60
  18 3 0 82                   ;  18(12):是否有物品[当归]否则跳转到:Label61
  18 5 0 78                   ;  18(12):是否有物品[茯苓]否则跳转到:Label62
  18 7 0 74                   ;  18(12):是否有物品[防风]否则跳转到:Label63
  18 6 0 70                   ;  18(12):是否有物品[熟地黄]否则跳转到:Label64
  18 4 0 66                   ;  18(12):是否有物品[生地黄]否则跳转到:Label65
  0                            ;  0(0)::空语句(清屏)
  32 3 -1                      ;  32(20):物品[当归]+[-1]
  32 5 -1                      ;  32(20):物品[茯苓]+[-1]
  32 7 -1                      ;  32(20):物品[防风]+[-1]
  32 6 -1                      ;  32(20):物品[熟地黄]+[-1]
  32 4 -1                      ;  32(20):物品[生地黄]+[-1]
  0                            ;  0(0)::空语句(清屏)
  50 17 0 0 0 92 50 0          ;  50(32):读取属性 [X50]=人物0属性偏移92
  50 3 0 3 50 50 10 0          ;  50(32):四则运算 [X50]=[X50]/10
  50 38 0 15 51 0 0 0          ;  50(32):随机数 [X51]=Random(15)
  50 4 1 1 51 50 0 0          ;  50(32):变量判断 If[X51]<=[X50] then JMP=0 else JMP=1
  36 256 0 6                   ;  36(24):跳转变量JMP是否为0否则跳转到:Label66
  0                            ;  0(0)::空语句(清屏)
  2 19 1                      ;  2(2):得到物品[天心解毒丹][1]
  0                            ;  0(0)::空语句(清屏)
  7                            ;  7(7):无条件返回
;:Label66
  0                            ;  0(0)::空语句(清屏)
  1 7208 0 1                   ;  1(1):[南宫梦]说: ．．．．．．*失败了．．．*看来我还得加强医疗能力啊
  0                            ;  0(0)::空语句(清屏)
  7                            ;  7(7):无条件返回
;:Label65
;:Label64
;:Label63
;:Label62
;:Label61
  0                            ;  0(0)::空语句(清屏)
  1 7207 0 1                   ;  1(1):[南宫梦]说: 药材好像不够．
  0                            ;  0(0)::空语句(清屏)
  7                            ;  7(7):无条件返回
;:Label60
;:Label2
  0                            ;  0(0)::空语句(清屏)
  -1                            ;  -1(FFFF):事件结束

南宫梦 · 发表于 2006-9-30 16:17

;Kdefnum=1043
  50 0 1000 0 0 0 1 0          ;  50(32):变量赋值 [X1000]=0
;:Label0
  50 3 0 2 1001 1000 100 0    ;  50(32):四则运算 [X1001]=[X1000]*100
  50 3 0 0 1001 1001 2000 0    ;  50(32):四则运算 [X1001]=[X1001]+2000
  50 1 3 0 1100 1000 1001 0    ;  50(32):数组变量赋值数组1100([X1000])=[X1001](Int)
  50 3 0 0 1000 1000 1 0       ;  50(32):四则运算 [X1000]=[X1000]+1
  50 4 0 0 9 10 0 0             ;  50(32):变量判断 If[X9]<10 then JMP=0 else JMP=1
  36 256 -44 0                ;  36(24):跳转变量JMP是否为0是则跳转到:Label0
  50 0 1002 0 0 0 0 0          ;  50(32):变量赋值 [X1002]=0
  50 0 1005 0 0 0 0 0          ;  50(32):变量赋值 [X1005]=0
  50 0 1 11 0 0 0 0             ;  50(32):变量赋值 [X1]=11
;:Label1
  50 3 0 2 1005 1002 100 0    ;  50(32):四则运算 [X1005]=[X1002]*100
  50 3 0 0 1005 1005 2000 0    ;  50(32):四则运算 [X1005]=[X1005]+2000
  50 32 0 1005 5 0 0 0          ;  50(32):修改下一条指令参数下一条指令参数5=[X1005]
  50 27 1 1 1 400 0 0          ;  50(32):取属性名称 Str400=物品[X1]
  50 3 0 0 1 1 1 0             ;  50(32):四则运算 [X1]=[X1]+1
  50 3 0 0 1002 1002 1 0       ;  50(32):四则运算 [X1002]=[X1002]+1
  50 4 0 0 1002 9 0 0          ;  50(32):变量判断 If[X1002]<9 then JMP=0 else JMP=1
  36 256 -60 0                ;  36(24):跳转变量JMP是否为0是则跳转到:Label1
  50 34 0 95 10 100 170 0       ;  50(32):处理背景位置(95,10) Width=100 Height=170
  50 39 0 9 1100 100 100 15    ;  50(32):菜单选择菜单个数9Str1100()返回=[X100]显示位置(100,15)
  50 4 0 5 100 0 0 0          ;  50(32):变量判断 If[X100]>0 then JMP=0 else JMP=1
  36 256 0 987                ;  36(24):跳转变量JMP是否为0否则跳转到:Label2
  0                            ;  0(0)::空语句(清屏)
  50 3 0 0 20 100 7196 0       ;  50(32):四则运算 [X20]=[X100]+7196
  50 8 1 20 3000 0 0 0          ;  50(32):读对话到字符串  Str3000=talk([X20])
  50 36 0 3000 60 30 1797 0    ;  50(32):显示字符串并等待击键显示字符串3000 (60,30)Color1797
  36 256 7 0                   ;  36(24):跳转变量JMP是否为0是则跳转到:Label3
  0                            ;  0(0)::空语句(清屏)
  1 7206 0 1                   ;  1(1):[南宫梦]说: 不用了！
  0                            ;  0(0)::空语句(清屏)
  7                            ;  7(7):无条件返回
;:Label3
  0                            ;  0(0)::空语句(清屏)
  50 4 0 2 100 1 0 0          ;  50(32):变量判断 If[X100]=1  then JMP=0 else JMP=1
  36 256 0 93                   ;  36(24):跳转变量JMP是否为0否则跳转到:Label4
  18 9 0 82                   ;  18(12):是否有物品[甘草]否则跳转到:Label5
  18 10 0 78                   ;  18(12):是否有物品[羌活]否则跳转到:Label6
  18 1 0 74                   ;  18(12):是否有物品[麦冬]否则跳转到:Label7
  18 8 0 70                   ;  18(12):是否有物品[白术]否则跳转到:Label8
  18 6 0 66                   ;  18(12):是否有物品[熟地黄]否则跳转到:Label9
  0                            ;  0(0)::空语句(清屏)
  32 6 -1                      ;  32(20):物品[熟地黄]+[-1]
  32 9 -1                      ;  32(20):物品[甘草]+[-1]
  32 10 -1                      ;  32(20):物品[羌活]+[-1]
  32 1 -1                      ;  32(20):物品[麦冬]+[-1]
  32 8 -1                      ;  32(20):物品[白术]+[-1]
  0                            ;  0(0)::空语句(清屏)
  50 17 0 0 0 92 50 0          ;  50(32):读取属性 [X50]=人物0属性偏移92
  50 3 0 3 50 50 10 0          ;  50(32):四则运算 [X50]=[X50]/10
  50 38 0 40 51 0 0 0          ;  50(32):随机数 [X51]=Random(40)
  50 4 1 1 51 50 0 0          ;  50(32):变量判断 If[X51]<=[X50] then JMP=0 else JMP=1
  36 256 0 6                   ;  36(24):跳转变量JMP是否为0否则跳转到:Label10
  0                            ;  0(0)::空语句(清屏)
  2 11 1                      ;  2(2):得到物品[天王保命丹][1]
  0                            ;  0(0)::空语句(清屏)
  7                            ;  7(7):无条件返回
;:Label10
  0                            ;  0(0)::空语句(清屏)
  1 7208 0 1                   ;  1(1):[南宫梦]说: ．．．．．．*失败了．．．*看来我还得加强医疗能力啊
  0                            ;  0(0)::空语句(清屏)
  7                            ;  7(7):无条件返回
;:Label9
;:Label8
;:Label7
;:Label6
;:Label5
  0                            ;  0(0)::空语句(清屏)
  1 7207 0 1                   ;  1(1):[南宫梦]说: 药材好像不够．
  0                            ;  0(0)::空语句(清屏)
  7                            ;  7(7):无条件返回
;:Label4
  0                            ;  0(0)::空语句(清屏)
  50 4 0 2 100 2 0 0          ;  50(32):变量判断 If[X100]=2  then JMP=0 else JMP=1
  36 256 0 93                   ;  36(24):跳转变量JMP是否为0否则跳转到:Label11
  18 9 0 82                   ;  18(12):是否有物品[甘草]否则跳转到:Label12
  18 0 0 78                   ;  18(12):是否有物品[半夏]否则跳转到:Label13
  18 3 0 74                   ;  18(12):是否有物品[当归]否则跳转到:Label14
  18 7 0 70                   ;  18(12):是否有物品[防风]否则跳转到:Label15
  18 6 0 66                   ;  18(12):是否有物品[熟地黄]否则跳转到:Label16
  0                            ;  0(0)::空语句(清屏)
  32 6 -1                      ;  32(20):物品[熟地黄]+[-1]
  32 9 -1                      ;  32(20):物品[甘草]+[-1]
  32 0 -1                      ;  32(20):物品[半夏]+[-1]
  32 3 -1                      ;  32(20):物品[当归]+[-1]
  32 7 -1                      ;  32(20):物品[防风]+[-1]
  0                            ;  0(0)::空语句(清屏)
  50 17 0 0 0 92 50 0          ;  50(32):读取属性 [X50]=人物0属性偏移92
  50 3 0 3 50 50 10 0          ;  50(32):四则运算 [X50]=[X50]/10
  50 38 0 30 51 0 0 0          ;  50(32):随机数 [X51]=Random(30)
  50 4 1 1 51 50 0 0          ;  50(32):变量判断 If[X51]<=[X50] then JMP=0 else JMP=1
  36 256 0 6                   ;  36(24):跳转变量JMP是否为0否则跳转到:Label17
  0                            ;  0(0)::空语句(清屏)
  2 12 1                      ;  2(2):得到物品[六阳正气丹][1]
  0                            ;  0(0)::空语句(清屏)
  7                            ;  7(7):无条件返回
;:Label17
  0                            ;  0(0)::空语句(清屏)
  1 7208 0 1                   ;  1(1):[南宫梦]说: ．．．．．．*失败了．．．*看来我还得加强医疗能力啊
  0                            ;  0(0)::空语句(清屏)
  7                            ;  7(7):无条件返回
;:Label16
;:Label15
;:Label14
;:Label13
;:Label12
  0                            ;  0(0)::空语句(清屏)
  1 7207 0 1                   ;  1(1):[南宫梦]说: 药材好像不够．
  0                            ;  0(0)::空语句(清屏)
  7                            ;  7(7):无条件返回
;:Label11
  50 4 0 2 100 3 0 0          ;  50(32):变量判断 If[X100]=3  then JMP=0 else JMP=1
  36 256 0 93                   ;  36(24):跳转变量JMP是否为0否则跳转到:Label18
  18 5 0 82                   ;  18(12):是否有物品[茯苓]否则跳转到:Label19
  18 7 0 78                   ;  18(12):是否有物品[防风]否则跳转到:Label20
  18 3 0 74                   ;  18(12):是否有物品[当归]否则跳转到:Label21
  18 8 0 70                   ;  18(12):是否有物品[白术]否则跳转到:Label22
  18 6 0 66                   ;  18(12):是否有物品[熟地黄]否则跳转到:Label23
  0                            ;  0(0)::空语句(清屏)
  32 5 -1                      ;  32(20):物品[茯苓]+[-1]
  32 7 -1                      ;  32(20):物品[防风]+[-1]
  32 8 -1                      ;  32(20):物品[白术]+[-1]
  32 3 -1                      ;  32(20):物品[当归]+[-1]
  32 6 -1                      ;  32(20):物品[熟地黄]+[-1]
  0                            ;  0(0)::空语句(清屏)
  50 17 0 0 0 92 50 0          ;  50(32):读取属性 [X50]=人物0属性偏移92
  50 3 0 3 50 50 10 0          ;  50(32):四则运算 [X50]=[X50]/10
  50 38 0 20 51 0 0 0          ;  50(32):随机数 [X51]=Random(20)
  50 4 1 1 51 50 0 0          ;  50(32):变量判断 If[X51]<=[X50] then JMP=0 else JMP=1
  36 256 0 6                   ;  36(24):跳转变量JMP是否为0否则跳转到:Label24
  0                            ;  0(0)::空语句(清屏)
  2 13 1                      ;  2(2):得到物品[九花玉露丸][1]
  0                            ;  0(0)::空语句(清屏)
  7                            ;  7(7):无条件返回
;:Label24
  0                            ;  0(0)::空语句(清屏)
  1 7208 0 1                   ;  1(1):[南宫梦]说: ．．．．．．*失败了．．．*看来我还得加强医疗能力啊
  0                            ;  0(0)::空语句(清屏)
  7                            ;  7(7):无条件返回
;:Label23
;:Label22
;:Label21
;:Label20
;:Label19
  0                            ;  0(0)::空语句(清屏)
  1 7207 0 1                   ;  1(1):[南宫梦]说: 药材好像不够．
  0                            ;  0(0)::空语句(清屏)
  7                            ;  7(7):无条件返回
;:Label18
  0                            ;  0(0)::空语句(清屏)
  50 4 0 2 100 4 0 0          ;  50(32):变量判断 If[X100]=4  then JMP=0 else JMP=1
  36 256 0 93                   ;  36(24):跳转变量JMP是否为0否则跳转到:Label25
  18 0 0 82                   ;  18(12):是否有物品[半夏]否则跳转到:Label26
  18 1 0 78                   ;  18(12):是否有物品[麦冬]否则跳转到:Label27
  18 2 0 74                   ;  18(12):是否有物品[瓜蒌]否则跳转到:Label28
  18 3 0 70                   ;  18(12):是否有物品[当归]否则跳转到:Label29
  18 4 0 66                   ;  18(12):是否有物品[生地黄]否则跳转到:Label30
  0                            ;  0(0)::空语句(清屏)
  32 0 -1                      ;  32(20):物品[半夏]+[-1]
  32 1 -1                      ;  32(20):物品[麦冬]+[-1]
  32 3 -1                      ;  32(20):物品[当归]+[-1]
  32 2 -1                      ;  32(20):物品[瓜蒌]+[-1]
  32 4 -1                      ;  32(20):物品[生地黄]+[-1]
  0                            ;  0(0)::空语句(清屏)
  50 17 0 0 0 92 50 0          ;  50(32):读取属性 [X50]=人物0属性偏移92
  50 3 0 3 50 50 10 0          ;  50(32):四则运算 [X50]=[X50]/10
  50 38 0 10 51 0 0 0          ;  50(32):随机数 [X51]=Random(10)
  50 4 1 1 51 50 0 0          ;  50(32):变量判断 If[X51]<=[X50] then JMP=0 else JMP=1
  36 256 0 6                   ;  36(24):跳转变量JMP是否为0否则跳转到:Label31
  0                            ;  0(0)::空语句(清屏)
  2 14 1                      ;  2(2):得到物品[玉灵散][1]
  0                            ;  0(0)::空语句(清屏)
  7                            ;  7(7):无条件返回
;:Label31
  0                            ;  0(0)::空语句(清屏)
  1 7208 0 1                   ;  1(1):[南宫梦]说: ．．．．．．*失败了．．．*看来我还得加强医疗能力啊
  0                            ;  0(0)::空语句(清屏)
  7                            ;  7(7):无条件返回
;:Label30
;:Label29
;:Label28
;:Label27
;:Label26
  0                            ;  0(0)::空语句(清屏)
  1 7207 0 1                   ;  1(1):[南宫梦]说: 药材好像不够．
  0                            ;  0(0)::空语句(清屏)
  7                            ;  7(7):无条件返回
;:Label25
  0                            ;  0(0)::空语句(清屏)
  50 4 0 2 100 5 0 0          ;  50(32):变量判断 If[X100]=5  then JMP=0 else JMP=1
  36 256 0 93                   ;  36(24):跳转变量JMP是否为0否则跳转到:Label32
  18 9 0 82                   ;  18(12):是否有物品[甘草]否则跳转到:Label33
  18 1 0 78                   ;  18(12):是否有物品[麦冬]否则跳转到:Label34
  18 10 0 74                   ;  18(12):是否有物品[羌活]否则跳转到:Label35
  18 3 0 70                   ;  18(12):是否有物品[当归]否则跳转到:Label36
  18 6 0 66                   ;  18(12):是否有物品[熟地黄]否则跳转到:Label37
  0                            ;  0(0)::空语句(清屏)
  32 9 -1                      ;  32(20):物品[甘草]+[-1]
  32 1 -1                      ;  32(20):物品[麦冬]+[-1]
  32 3 -1                      ;  32(20):物品[当归]+[-1]
  32 10 -1                      ;  32(20):物品[羌活]+[-1]
  32 6 -1                      ;  32(20):物品[熟地黄]+[-1]
  0                            ;  0(0)::空语句(清屏)
  50 17 0 0 0 92 50 0          ;  50(32):读取属性 [X50]=人物0属性偏移92
  50 3 0 3 50 50 10 0          ;  50(32):四则运算 [X50]=[X50]/10
  50 38 0 40 51 0 0 0          ;  50(32):随机数 [X51]=Random(40)
  50 4 1 1 51 50 0 0          ;  50(32):变量判断 If[X51]<=[X50] then JMP=0 else JMP=1
  36 256 0 6                   ;  36(24):跳转变量JMP是否为0否则跳转到:Label38
  0                            ;  0(0)::空语句(清屏)
  2 15 1                      ;  2(2):得到物品[生生造化丹][1]
  0                            ;  0(0)::空语句(清屏)
  7                            ;  7(7):无条件返回
;:Label38
  0                            ;  0(0)::空语句(清屏)
  1 7208 0 1                   ;  1(1):[南宫梦]说: ．．．．．．*失败了．．．*看来我还得加强医疗能力啊
  0                            ;  0(0)::空语句(清屏)
  7                            ;  7(7):无条件返回
;:Label37
;:Label36
;:Label35
;:Label34
;:Label33
  0                            ;  0(0)::空语句(清屏)
  1 7207 0 1                   ;  1(1):[南宫梦]说: 药材好像不够．
  0                            ;  0(0)::空语句(清屏)
  7                            ;  7(7):无条件返回
;:Label32
  0                            ;  0(0)::空语句(清屏)
  50 4 0 2 100 6 0 0          ;  50(32):变量判断 If[X100]=6  then JMP=0 else JMP=1
  36 256 0 93                   ;  36(24):跳转变量JMP是否为0否则跳转到:Label39
  18 7 0 82                   ;  18(12):是否有物品[防风]否则跳转到:Label40
  18 8 0 78                   ;  18(12):是否有物品[白术]否则跳转到:Label41
  18 9 0 74                   ;  18(12):是否有物品[甘草]否则跳转到:Label42
  18 10 0 70                   ;  18(12):是否有物品[羌活]否则跳转到:Label43
  18 6 0 66                   ;  18(12):是否有物品[熟地黄]否则跳转到:Label44
  0                            ;  0(0)::空语句(清屏)
  32 7 -1                      ;  32(20):物品[防风]+[-1]
  32 8 -1                      ;  32(20):物品[白术]+[-1]
  32 9 -1                      ;  32(20):物品[甘草]+[-1]
  32 10 -1                      ;  32(20):物品[羌活]+[-1]
  32 6 -1                      ;  32(20):物品[熟地黄]+[-1]
  0                            ;  0(0)::空语句(清屏)
  50 17 0 0 0 92 50 0          ;  50(32):读取属性 [X50]=人物0属性偏移92
  50 3 0 3 50 50 10 0          ;  50(32):四则运算 [X50]=[X50]/10
  50 38 0 30 51 0 0 0          ;  50(32):随机数 [X51]=Random(30)
  50 4 1 1 51 50 0 0          ;  50(32):变量判断 If[X51]<=[X50] then JMP=0 else JMP=1
  36 256 0 6                   ;  36(24):跳转变量JMP是否为0否则跳转到:Label45
  0                            ;  0(0)::空语句(清屏)
  2 16 1                      ;  2(2):得到物品[九转熊蛇丸][1]
  0                            ;  0(0)::空语句(清屏)
  7                            ;  7(7):无条件返回
;:Label45
  0                            ;  0(0)::空语句(清屏)
  1 7208 0 1                   ;  1(1):[南宫梦]说: ．．．．．．*失败了．．．*看来我还得加强医疗能力啊
  0                            ;  0(0)::空语句(清屏)
  7                            ;  7(7):无条件返回
;:Label44
;:Label43
;:Label42
;:Label41
;:Label40
  0                            ;  0(0)::空语句(清屏)
  1 7207 0 1                   ;  1(1):[南宫梦]说: 药材好像不够．
  0                            ;  0(0)::空语句(清屏)
  7                            ;  7(7):无条件返回
;:Label39
  50 4 0 2 100 7 0 0          ;  50(32):变量判断 If[X100]=7  then JMP=0 else JMP=1
  36 256 0 93                   ;  36(24):跳转变量JMP是否为0否则跳转到:Label46
  18 1 0 82                   ;  18(12):是否有物品[麦冬]否则跳转到:Label47
  18 3 0 78                   ;  18(12):是否有物品[当归]否则跳转到:Label48
  18 5 0 74                   ;  18(12):是否有物品[茯苓]否则跳转到:Label49
  18 9 0 70                   ;  18(12):是否有物品[甘草]否则跳转到:Label50
  18 10 0 66                   ;  18(12):是否有物品[羌活]否则跳转到:Label51
  0                            ;  0(0)::空语句(清屏)
  32 1 -1                      ;  32(20):物品[麦冬]+[-1]
  32 3 -1                      ;  32(20):物品[当归]+[-1]
  32 5 -1                      ;  32(20):物品[茯苓]+[-1]
  32 9 -1                      ;  32(20):物品[甘草]+[-1]
  32 10 -1                      ;  32(20):物品[羌活]+[-1]
  0                            ;  0(0)::空语句(清屏)
  50 17 0 0 0 92 50 0          ;  50(32):读取属性 [X50]=人物0属性偏移92
  50 3 0 3 50 50 10 0          ;  50(32):四则运算 [X50]=[X50]/10
  50 38 0 20 51 0 0 0          ;  50(32):随机数 [X51]=Random(20)
  50 4 1 1 51 50 0 0          ;  50(32):变量判断 If[X51]<=[X50] then JMP=0 else JMP=1
  36 256 0 6                   ;  36(24):跳转变量JMP是否为0否则跳转到:Label52
  0                            ;  0(0)::空语句(清屏)
  2 17 1                      ;  2(2):得到物品[镇心理气丸][1]
  0                            ;  0(0)::空语句(清屏)
  7                            ;  7(7):无条件返回
;:Label52
  0                            ;  0(0)::空语句(清屏)
  1 7208 0 1                   ;  1(1):[南宫梦]说: ．．．．．．*失败了．．．*看来我还得加强医疗能力啊
  0                            ;  0(0)::空语句(清屏)
  7                            ;  7(7):无条件返回
;:Label51
;:Label50
;:Label49
;:Label48
;:Label47
  0                            ;  0(0)::空语句(清屏)
  1 7207 0 1                   ;  1(1):[南宫梦]说: 药材好像不够．
  0                            ;  0(0)::空语句(清屏)
  7                            ;  7(7):无条件返回
;:Label46
  50 4 0 2 100 8 0 0          ;  50(32):变量判断 If[X100]=8  then JMP=0 else JMP=1
  36 256 0 93                   ;  36(24):跳转变量JMP是否为0否则跳转到:Label53
  18 0 0 82                   ;  18(12):是否有物品[半夏]否则跳转到:Label54
  18 2 0 78                   ;  18(12):是否有物品[瓜蒌]否则跳转到:Label55
  18 7 0 74                   ;  18(12):是否有物品[防风]否则跳转到:Label56
  18 8 0 70                   ;  18(12):是否有物品[白术]否则跳转到:Label57
  18 4 0 66                   ;  18(12):是否有物品[生地黄]否则跳转到:Label58
  0                            ;  0(0)::空语句(清屏)
  32 0 -1                      ;  32(20):物品[半夏]+[-1]
  32 2 -1                      ;  32(20):物品[瓜蒌]+[-1]
  32 7 -1                      ;  32(20):物品[防风]+[-1]
  32 8 -1                      ;  32(20):物品[白术]+[-1]
  32 4 -1                      ;  32(20):物品[生地黄]+[-1]
  0                            ;  0(0)::空语句(清屏)
  50 17 0 0 0 92 50 0          ;  50(32):读取属性 [X50]=人物0属性偏移92
  50 3 0 3 50 50 10 0          ;  50(32):四则运算 [X50]=[X50]/10
  50 38 0 10 51 0 0 0          ;  50(32):随机数 [X51]=Random(10)
  50 4 1 1 51 50 0 0          ;  50(32):变量判断 If[X51]<=[X50] then JMP=0 else JMP=1
  36 256 0 6                   ;  36(24):跳转变量JMP是否为0否则跳转到:Label59
  0                            ;  0(0)::空语句(清屏)
  2 18 1                      ;  2(2):得到物品[无常丹][1]
  0                            ;  0(0)::空语句(清屏)
  7                            ;  7(7):无条件返回
;:Label59
  0                            ;  0(0)::空语句(清屏)
  1 7208 0 1                   ;  1(1):[南宫梦]说: ．．．．．．*失败了．．．*看来我还得加强医疗能力啊
  0                            ;  0(0)::空语句(清屏)
  7                            ;  7(7):无条件返回
;:Label58
;:Label57
;:Label56
;:Label55
;:Label54
  0                            ;  0(0)::空语句(清屏)
  1 7207 0 1                   ;  1(1):[南宫梦]说: 药材好像不够．
  0                            ;  0(0)::空语句(清屏)
  7                            ;  7(7):无条件返回
;:Label53
  0                            ;  0(0)::空语句(清屏)
  50 4 0 2 100 9 0 0          ;  50(32):变量判断 If[X100]=9  then JMP=0 else JMP=1
  36 256 0 93                   ;  36(24):跳转变量JMP是否为0否则跳转到:Label60
  18 3 0 82                   ;  18(12):是否有物品[当归]否则跳转到:Label61
  18 5 0 78                   ;  18(12):是否有物品[茯苓]否则跳转到:Label62
  18 7 0 74                   ;  18(12):是否有物品[防风]否则跳转到:Label63
  18 6 0 70                   ;  18(12):是否有物品[熟地黄]否则跳转到:Label64
  18 4 0 66                   ;  18(12):是否有物品[生地黄]否则跳转到:Label65
  0                            ;  0(0)::空语句(清屏)
  32 3 -1                      ;  32(20):物品[当归]+[-1]
  32 5 -1                      ;  32(20):物品[茯苓]+[-1]
  32 7 -1                      ;  32(20):物品[防风]+[-1]
  32 6 -1                      ;  32(20):物品[熟地黄]+[-1]
  32 4 -1                      ;  32(20):物品[生地黄]+[-1]
  0                            ;  0(0)::空语句(清屏)
  50 17 0 0 0 92 50 0          ;  50(32):读取属性 [X50]=人物0属性偏移92
  50 3 0 3 50 50 10 0          ;  50(32):四则运算 [X50]=[X50]/10
  50 38 0 15 51 0 0 0          ;  50(32):随机数 [X51]=Random(15)
  50 4 1 1 51 50 0 0          ;  50(32):变量判断 If[X51]<=[X50] then JMP=0 else JMP=1
  36 256 0 6                   ;  36(24):跳转变量JMP是否为0否则跳转到:Label66
  0                            ;  0(0)::空语句(清屏)
  2 19 1                      ;  2(2):得到物品[天心解毒丹][1]
  0                            ;  0(0)::空语句(清屏)
  7                            ;  7(7):无条件返回
;:Label66
  0                            ;  0(0)::空语句(清屏)
  1 7208 0 1                   ;  1(1):[南宫梦]说: ．．．．．．*失败了．．．*看来我还得加强医疗能力啊
  0                            ;  0(0)::空语句(清屏)
  7                            ;  7(7):无条件返回
;:Label65
;:Label64
;:Label63
;:Label62
;:Label61
  0                            ;  0(0)::空语句(清屏)
  1 7207 0 1                   ;  1(1):[南宫梦]说: 药材好像不够．
  0                            ;  0(0)::空语句(清屏)
  7                            ;  7(7):无条件返回
;:Label60
;:Label2
  0                            ;  0(0)::空语句(清屏)
  -1                            ;  -1(FFFF):事件结束

南宫梦 · 发表于 2006-9-30 16:19

1楼那个复制过去好像会出错，所以我又在2楼重新弄了一个，大家使用的时候直接复制2楼的所有内容就ok

hardtzh · 发表于 2006-9-30 16:46

强就一个字，我要说N次

abbacada · 发表于 2006-10-4 12:19

提示: 作者被禁止或删除内容自动屏蔽

pshen · 发表于 2006-10-5 16:53

建议置顶或精华

鸠摩智 · 发表于 2006-10-6 18:56

太复杂了...

账号		自动登录	找回密码
密码			我要成为铁血侠客

abbacada abbacada 当前离线积分 923 头像被屏蔽	发表于 2006-10-4 12:19 \| 显示全部楼层提示: 作者被禁止或删除内容自动屏蔽
abbacada abbacada 当前离线积分 923 头像被屏蔽	【武侠.中国】铁血丹心论坛（大武侠）：致力于推广和发展武侠文化，让我们一起努力，做全球最大的武侠社区。可能是目前为止最好的金庸群侠传MOD游戏交流论坛，各种经典武侠游戏等你来玩，各种开源制作工具等你来实现你的游戏开发之梦。
	回复支持反对举报