我在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 编辑 ] |