| 我在2007-2-2发表了我的第一个指令飞机场系统,现在看起来绝对是小儿科了  ,所以今天下午趁着论坛关闭就搞了一个新飞机场系统,以纪念我的老版的飞机场系统.... 
 新飞机场系统:
 
 请仔细阅读说明,特别是红色粗体部分。
 
 说明:
 1、这是新飞机场系统。
 2、用法:系统将会自动算出你应该付出的价钱,故此指令可以用在任何一个先前没有跳转窗口的场景
 请仔细阅读红色字体的注释
 将TXT里的指令码复制,然后在FISHEDIT0.72事件修改中选择“从剪贴板复制”制作为事件
 3、调用方式:直接运行事件
 4、如有问题,请与本人联系
 
 
 
 
 
 ;Kdefnum=16
 0                              ;  0(0)::空语句(清屏)
 1 3024 119 0                   ;  1(1):[???]说: 这里是传说中的飞机场,你*们可以去任何一个客栈。
 0                              ;  0(0)::空语句(清屏)
 50 8 0 3161 140 0 0 0          ;  50(32):读对话到字符串  Str[X140]=talk(3161)
 50 26 0 0 2952 28 15 0         ;  50(32):读取给定地址数据 [X15]=[1C-B88+0](Int)--目前大地图X
 50 26 0 0 2956 28 16 0         ;  50(32):读取给定地址数据 [X16]=[1C-B8C+0](Int)--目前大地图Y
 50 26 0 0 10588 29 70 0        ;  50(32):读取给定地址数据 [X70]=[1D-295C+0](Int)--目前场景编号
 50 26 0 0 10586 29 71 0        ;  50(32):读取给定地址数据 [X71]=[1D-295A+0](Int)--目前场景X
 50 26 0 0 10590 29 72 0        ;  50(32):读取给定地址数据 [X72]=[1D-295E+0](Int)--目前场景Y
 50 0 5 0 0 0 0 0               ;  50(32):变量赋值 [X5]=0
 50 0 9 75 0 0 0 0              ;  50(32):变量赋值 [X9]=75
 50 0 10 1 0 0 0 0              ;  50(32):变量赋值 [X10]=1---------------------------------第一个场景编号
 50 0 11 3 0 0 0 0              ;  50(32):变量赋值 [X11]=3---------------------------------第二个场景编号
 50 0 12 40 0 0 0 0             ;  50(32):变量赋值 [X12]=40-------------------------------第三个场景编号
 50 0 13 60 0 0 0 0             ;  50(32):变量赋值 [X13]=60-------------------------------第四个场景编号
 50 0 14 61 0 0 0 0             ;  50(32):变量赋值 [X14]=61-------------------------------第五个场景编号
 50 0 1000 0 0 0 0 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 1000 5 0 0            ;  50(32):变量判断 If[X1000]<5 then JMP=0 else JMP=1
 36 256 -44 0                   ;  36(24):跳转变量JMP是否为0是则跳转到:Label0
 50 8 0 3022 400 0 0 0          ;  50(32):读对话到字符串  Str[X400]=talk(3022)
 50 34 0 15 35 285 27 0         ;  50(32):处理背景 位置(15,35) Width=285 Height=27
 50 33 0 400 20 40 1797 0       ;  50(32):显示字符串 显示字符串400 (20,40)Color1797
 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 10 0 0 0 0              ;  50(32):变量赋值 [X1]=10
 50 0 26 30 0 0 0 0             ;  50(32):变量赋值 [X26]=30
 ;:Label3
 50 32 0 1 5 0 0 0              ;  50(32):修改下一条指令参数 下一条指令参数5=[X1]
 50 3 0 0 2 10 0 0              ;  50(32):四则运算 [X2]=[X10]+0
 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 2 2 400 0 0            ;  50(32):取属性名称 Str400=场景[X2]
 50 17 1 2 2 24 17 0            ;  50(32):读取属性 [X17]=场景[X2]属性偏移24
 50 17 1 2 2 26 18 0            ;  50(32):读取属性 [X18]=场景[X2]属性偏移26
 50 3 1 1 19 17 15 0            ;  50(32):四则运算 [X19]=[X17]-[X15]
 50 4 0 1 19 0 0 0              ;  50(32):变量判断 If[X19]<=0 then JMP=0 else JMP=1
 36 256 0 8                     ;  36(24):跳转变量JMP是否为0否则跳转到:Label1
 50 3 1 1 19 5 19 0             ;  50(32):四则运算 [X19]=[X5]-[X19]
 ;:Label1
 50 3 1 1 0 18 16 0             ;  50(32):四则运算 [X0]=[X18]-[X16]
 50 4 0 1 0 0 0 0               ;  50(32):变量判断 If[X0]<=0 then JMP=0 else JMP=1
 36 256 0 8                     ;  36(24):跳转变量JMP是否为0否则跳转到:Label2
 50 3 1 1 0 5 0 0               ;  50(32):四则运算 [X0]=[X5]-[X0]
 ;:Label2
 50 3 1 0 3 19 0 0              ;  50(32):四则运算 [X3]=[X19]+[X0]
 50 3 0 3 4 3 1 0               ;  50(32):四则运算 [X4]=[X3]/1
 50 32 0 9 4 0 0 0              ;  50(32):修改下一条指令参数 下一条指令参数4=[X9]
 50 3 0 0 9 4 0 0               ;  50(32):四则运算 [X9]=[X4]+0
 50 9 1 120 140 4 0 0           ;  50(32):Sprintf  Str[X120]=CStr([X4]) FORMAT=Str[X140]
 50 32 0 1005 4 0 0 0           ;  50(32):修改下一条指令参数 下一条指令参数4=[X1005]
 50 9 0 800 1400 0 0 0          ;  50(32):Sprintf  Str[X800]=CStr(0) FORMAT=Str[X1400]
 50 12 0 600 3 0 0 0            ;  50(32):空格字符串 Str[X600]=3个空格
 50 32 0 1005 4 0 0 0           ;  50(32):修改下一条指令参数 下一条指令参数4=[X1005]
 50 9 0 800 1400 0 0 0          ;  50(32):Sprintf  Str[X800]=CStr(0) FORMAT=Str[X1400]
 50 32 0 1005 2 0 0 0           ;  50(32):修改下一条指令参数 下一条指令参数2=[X1005]
 50 11 1004 800 600 0 0 0       ;  50(32):字符串合并 Str[X1004]=Str[X800]+Str[X600]
 50 32 0 1005 4 0 0 0           ;  50(32):修改下一条指令参数 下一条指令参数4=[X1005]
 50 9 0 800 1400 0 0 0          ;  50(32):Sprintf  Str[X800]=CStr(0) FORMAT=Str[X1400]
 50 32 0 1005 2 0 0 0           ;  50(32):修改下一条指令参数 下一条指令参数2=[X1005]
 50 11 1004 800 120 0 0 0       ;  50(32):字符串合并 Str[X1004]=Str[X800]+Str[X120]
 50 3 0 0 9 9 1 0               ;  50(32):四则运算 [X9]=[X9]+1
 50 3 0 0 1 1 1 0               ;  50(32):四则运算 [X1]=[X1]+1
 50 3 0 0 26 26 1 0             ;  50(32):四则运算 [X26]=[X26]+1
 50 3 0 0 1002 1002 1 0         ;  50(32):四则运算 [X1002]=[X1002]+1
 50 4 0 0 1002 5 0 0            ;  50(32):变量判断 If[X1002]<5 then JMP=0 else JMP=1
 36 256 -292 0                  ;  36(24):跳转变量JMP是否为0是则跳转到:Label3
 50 34 0 95 75 120 100 0        ;  50(32):处理背景 位置(95,75) Width=120 Height=100
 50 39 0 5 1100 100 100 80      ;  50(32):菜单选择 菜单个数5[X1100]()返回=[X100]显示位置(100,80)
 50 4 0 2 100 1 0 0             ;  50(32):变量判断 If[X100]=1  then JMP=0 else JMP=1
 36 256 0 133                   ;  36(24):跳转变量JMP是否为0否则跳转到:Label4
 50 32 0 75 1 0 0 0             ;  50(32):修改下一条指令参数 下一条指令参数1=[X75]
 31 999 7 0                     ;  31(1F):判断银子是否够999是则跳转到:Label5
 0                              ;  0(0)::空语句(清屏)
 1 3215 119 0                   ;  1(1):[???]说: 没钱就快滚!
 0                              ;  0(0)::空语句(清屏)
 -1                             ;  -1(FFFF):事件结束
 ;:Label5
 0                              ;  0(0)::空语句(清屏)
 1 3025 117 0                   ;  1(1):[???]说: 请查收你的飞机票。
 0                              ;  0(0)::空语句(清屏)
 50 3 1 1 75 5 75 0             ;  50(32):四则运算 [X75]=[X5]-[X75]
 50 32 0 75 2 0 0 0             ;  50(32):修改下一条指令参数 下一条指令参数2=[X75]
 32 174 99                      ;  32(20):物品[银两]+[99]
 50 16 5 2 72 16 10 0           ;  50(32):保存属性 场景[X72]属性偏移16=[X10]
 50 16 5 2 72 44 70 0           ;  50(32):保存属性 场景[X72]属性偏移44=[X70]
 50 16 5 2 72 46 71 0           ;  50(32):保存属性 场景[X72]属性偏移46=[X71]
 50 16 5 2 72 48 70 0           ;  50(32):保存属性 场景[X72]属性偏移48=[X70]
 50 16 5 2 72 50 71 0           ;  50(32):保存属性 场景[X72]属性偏移50=[X71]
 50 17 1 2 10 24 73 0           ;  50(32):读取属性 [X73]=场景[X10]属性偏移24
 50 17 1 2 10 26 74 0           ;  50(32):读取属性 [X74]=场景[X10]属性偏移26
 50 42 3 73 74 0 0 0            ;  50(32):改变主地图坐标 ([X73],[X74])
 50 24 13 10 3 17 18 80         ;  50(32):读取S*数据 [X80]=场景[X10]层3坐标([X17],[X18])
 50 22 3 10 80 4 81 0           ;  50(32):读取D*数据 [X81]=场景[X10]场景事件[X80]属性4
 50 21 3 10 80 4 17 0           ;  50(32):保存D*数据 场景[X10]场景事件[X80]属性4=17
 -1                             ;  -1(FFFF):事件结束
 ;:Label4
 50 4 0 2 100 2 0 0             ;  50(32):变量判断 If[X100]=2  then JMP=0 else JMP=1
 36 256 0 133                   ;  36(24):跳转变量JMP是否为0否则跳转到:Label6
 50 32 0 76 1 0 0 0             ;  50(32):修改下一条指令参数 下一条指令参数1=[X76]
 31 0 7 0                       ;  31(1F):判断银子是否够0是则跳转到:Label7
 0                              ;  0(0)::空语句(清屏)
 1 3215 119 0                   ;  1(1):[???]说: 没钱就快滚!
 0                              ;  0(0)::空语句(清屏)
 -1                             ;  -1(FFFF):事件结束
 ;:Label7
 0                              ;  0(0)::空语句(清屏)
 1 3025 117 0                   ;  1(1):[???]说: 请查收你的飞机票。
 0                              ;  0(0)::空语句(清屏)
 50 3 1 1 76 5 76 0             ;  50(32):四则运算 [X76]=[X5]-[X76]
 50 32 0 76 2 0 0 0             ;  50(32):修改下一条指令参数 下一条指令参数2=[X76]
 32 174 99                      ;  32(20):物品[银两]+[99]
 50 16 5 2 72 16 11 0           ;  50(32):保存属性 场景[X72]属性偏移16=[X11]
 50 16 5 2 72 44 70 0           ;  50(32):保存属性 场景[X72]属性偏移44=[X70]
 50 16 5 2 72 46 71 0           ;  50(32):保存属性 场景[X72]属性偏移46=[X71]
 50 16 5 2 72 48 70 0           ;  50(32):保存属性 场景[X72]属性偏移48=[X70]
 50 16 5 2 72 50 71 0           ;  50(32):保存属性 场景[X72]属性偏移50=[X71]
 50 17 1 2 11 24 73 0           ;  50(32):读取属性 [X73]=场景[X11]属性偏移24
 50 17 1 2 11 26 74 0           ;  50(32):读取属性 [X74]=场景[X11]属性偏移26
 50 42 3 73 74 0 0 0            ;  50(32):改变主地图坐标 ([X73],[X74])
 50 24 13 11 3 17 18 80         ;  50(32):读取S*数据 [X80]=场景[X11]层3坐标([X17],[X18])
 50 22 3 11 80 4 81 0           ;  50(32):读取D*数据 [X81]=场景[X11]场景事件[X80]属性4
 50 21 3 11 80 4 17 0           ;  50(32):保存D*数据 场景[X11]场景事件[X80]属性4=17
 -1                             ;  -1(FFFF):事件结束
 ;:Label6
 50 4 0 2 100 3 0 0             ;  50(32):变量判断 If[X100]=3  then JMP=0 else JMP=1
 36 256 0 133                   ;  36(24):跳转变量JMP是否为0否则跳转到:Label8
 50 32 0 77 1 0 0 0             ;  50(32):修改下一条指令参数 下一条指令参数1=[X77]
 31 0 7 0                       ;  31(1F):判断银子是否够0是则跳转到:Label9
 0                              ;  0(0)::空语句(清屏)
 1 3215 119 0                   ;  1(1):[???]说: 没钱就快滚!
 0                              ;  0(0)::空语句(清屏)
 -1                             ;  -1(FFFF):事件结束
 ;:Label9
 0                              ;  0(0)::空语句(清屏)
 1 3025 117 0                   ;  1(1):[???]说: 请查收你的飞机票。
 0                              ;  0(0)::空语句(清屏)
 50 3 1 1 77 5 77 0             ;  50(32):四则运算 [X77]=[X5]-[X77]
 50 32 0 77 2 0 0 0             ;  50(32):修改下一条指令参数 下一条指令参数2=[X77]
 32 174 99                      ;  32(20):物品[银两]+[99]
 50 16 5 2 72 16 12 0           ;  50(32):保存属性 场景[X72]属性偏移16=[X12]
 50 16 5 2 72 44 70 0           ;  50(32):保存属性 场景[X72]属性偏移44=[X70]
 50 16 5 2 72 46 71 0           ;  50(32):保存属性 场景[X72]属性偏移46=[X71]
 50 16 5 2 72 48 70 0           ;  50(32):保存属性 场景[X72]属性偏移48=[X70]
 50 16 5 2 72 50 71 0           ;  50(32):保存属性 场景[X72]属性偏移50=[X71]
 50 17 1 2 12 24 73 0           ;  50(32):读取属性 [X73]=场景[X12]属性偏移24
 50 17 1 2 12 26 74 0           ;  50(32):读取属性 [X74]=场景[X12]属性偏移26
 50 42 3 73 74 0 0 0            ;  50(32):改变主地图坐标 ([X73],[X74])
 50 24 13 12 3 17 18 80         ;  50(32):读取S*数据 [X80]=场景[X12]层3坐标([X17],[X18])
 50 22 3 12 80 4 81 0           ;  50(32):读取D*数据 [X81]=场景[X12]场景事件[X80]属性4
 50 21 3 12 80 4 17 0           ;  50(32):保存D*数据 场景[X12]场景事件[X80]属性4=17
 -1                             ;  -1(FFFF):事件结束
 ;:Label8
 50 4 0 2 100 4 0 0             ;  50(32):变量判断 If[X100]=4  then JMP=0 else JMP=1
 36 256 0 133                   ;  36(24):跳转变量JMP是否为0否则跳转到:Label10
 50 32 0 78 1 0 0 0             ;  50(32):修改下一条指令参数 下一条指令参数1=[X78]
 31 0 7 0                       ;  31(1F):判断银子是否够0是则跳转到:Label11
 0                              ;  0(0)::空语句(清屏)
 1 3215 119 0                   ;  1(1):[???]说: 没钱就快滚!
 0                              ;  0(0)::空语句(清屏)
 -1                             ;  -1(FFFF):事件结束
 ;:Label11
 0                              ;  0(0)::空语句(清屏)
 1 3025 117 0                   ;  1(1):[???]说: 请查收你的飞机票。
 0                              ;  0(0)::空语句(清屏)
 50 3 1 1 78 5 78 0             ;  50(32):四则运算 [X78]=[X5]-[X78]
 50 32 0 78 2 0 0 0             ;  50(32):修改下一条指令参数 下一条指令参数2=[X78]
 32 174 99                      ;  32(20):物品[银两]+[99]
 50 16 5 2 72 16 13 0           ;  50(32):保存属性 场景[X72]属性偏移16=[X13]
 50 16 5 2 72 44 70 0           ;  50(32):保存属性 场景[X72]属性偏移44=[X70]
 50 16 5 2 72 46 71 0           ;  50(32):保存属性 场景[X72]属性偏移46=[X71]
 50 16 5 2 72 48 70 0           ;  50(32):保存属性 场景[X72]属性偏移48=[X70]
 50 16 5 2 72 50 71 0           ;  50(32):保存属性 场景[X72]属性偏移50=[X71]
 50 17 1 2 13 24 73 0           ;  50(32):读取属性 [X73]=场景[X13]属性偏移24
 50 17 1 2 13 26 74 0           ;  50(32):读取属性 [X74]=场景[X13]属性偏移26
 50 42 3 73 74 0 0 0            ;  50(32):改变主地图坐标 ([X73],[X74])
 50 24 13 13 3 17 18 80         ;  50(32):读取S*数据 [X80]=场景[X13]层3坐标([X17],[X18])
 50 22 3 13 80 4 81 0           ;  50(32):读取D*数据 [X81]=场景[X13]场景事件[X80]属性4
 50 21 3 13 80 4 17 0           ;  50(32):保存D*数据 场景[X13]场景事件[X80]属性4=17
 -1                             ;  -1(FFFF):事件结束
 ;:Label10
 50 4 0 2 100 5 0 0             ;  50(32):变量判断 If[X100]=5  then JMP=0 else JMP=1
 36 256 0 109                   ;  36(24):跳转变量JMP是否为0否则跳转到:Label12
 50 32 0 79 1 0 0 0             ;  50(32):修改下一条指令参数 下一条指令参数1=[X79]
 31 0 7 0                       ;  31(1F):判断银子是否够0是则跳转到:Label13
 0                              ;  0(0)::空语句(清屏)
 1 3215 119 0                   ;  1(1):[???]说: 没钱就快滚!
 0                              ;  0(0)::空语句(清屏)
 -1                             ;  -1(FFFF):事件结束
 ;:Label13
 0                              ;  0(0)::空语句(清屏)
 1 3025 117 0                   ;  1(1):[???]说: 请查收你的飞机票。
 0                              ;  0(0)::空语句(清屏)
 50 3 1 1 79 5 79 0             ;  50(32):四则运算 [X79]=[X5]-[X79]
 50 32 0 79 2 0 0 0             ;  50(32):修改下一条指令参数 下一条指令参数2=[X79]
 32 174 99                      ;  32(20):物品[银两]+[99]
 50 16 5 2 72 16 14 0           ;  50(32):保存属性 场景[X72]属性偏移16=[X14]
 50 16 5 2 72 44 70 0           ;  50(32):保存属性 场景[X72]属性偏移44=[X70]
 50 16 5 2 72 46 71 0           ;  50(32):保存属性 场景[X72]属性偏移46=[X71]
 50 16 5 2 72 48 70 0           ;  50(32):保存属性 场景[X72]属性偏移48=[X70]
 50 16 5 2 72 50 71 0           ;  50(32):保存属性 场景[X72]属性偏移50=[X71]
 50 17 1 2 14 24 73 0           ;  50(32):读取属性 [X73]=场景[X14]属性偏移24
 50 17 1 2 14 26 74 0           ;  50(32):读取属性 [X74]=场景[X14]属性偏移26
 50 42 3 73 74 0 0 0            ;  50(32):改变主地图坐标 ([X73],[X74])
 -1                             ;  -1(FFFF):事件结束
 ;:Label12
 0                              ;  0(0)::空语句(清屏)
 1 3023 0 0                     ;  1(1):[魏征]说: 走错路了,再见。
 0                              ;  0(0)::空语句(清屏)
 -1                             ;  -1(FFFF):事件结束
 ===========================================================================================
 
   
 [ 本帖最后由 黄顺坤 于 2008-7-23 01:52 编辑 ]
 |