改进了一点点:- ;Kdefnum=1018
- 50 5 0 0 0 0 0 0 ; 50(32):全部变量清零
- 50 26 0 0 10590 29 0 0 ; 50(32):读取给定地址数据 [X0]=[1D-295E+0](Int)
- 50 26 0 0 17650 5 1 0 ; 50(32):读取给定地址数据 [X1]=[5-44F2+0](Int)
- 50 26 0 0 10588 29 2 0 ; 50(32):读取给定地址数据 [X2]=[1D-295C+0](Int)
- 50 26 0 0 10586 29 3 0 ; 50(32):读取给定地址数据 [X3]=[1D-295A+0](Int)
- 50 4 0 2 1 0 0 0 ; 50(32):变量判断 If[X1]=0 then JMP=0 else JMP=1
- 36 256 0 81 ; 36(24):跳转变量JMP是否为0否则跳转到:Label0
- ;:Label2
- 50 3 0 1 3 3 1 0 ; 50(32):四则运算 [X3]=[X3]-1
- 50 3 0 1 12 3 10 0 ; 50(32):四则运算 [X12]=[X3]-10
- 50 24 13 0 1 2 3 4 ; 50(32):读取S*数据 [X4]=场景[X0]层1坐标([X2],[X3])
- 50 4 0 1 4 0 0 0 ; 50(32):变量判断 If[X4]<=0 then JMP=0 else JMP=1
- 36 256 0 36 ; 36(24):跳转变量JMP是否为0否则跳转到:Label1
- 50 25 1 0 10586 29 3 0 ; 50(32):保存给定地址数据 [1D-295A+0]=[X3](Int)
- 50 25 1 0 10582 29 11 0 ; 50(32):保存给定地址数据 [1D-2956+0]=[X11](Int)
- 50 37 0 20 0 0 0 0 ; 50(32):延时 延时20
- 50 4 0 6 0 0 0 0 ; 50(32):变量判断 JMP=0
- 36 256 -72 0 ; 36(24):跳转变量JMP是否为0是则跳转到:Label2
- ;:Label1
- 50 43 0 1019 0 0 0 0 ; 50(32):调用其它事件 Call Sub1019(0,0,0,0)
- -1 ; -1(FFFF):事件结束
- ;:Label0
- 50 4 0 2 1 1 0 0 ; 50(32):变量判断 If[X1]=1 then JMP=0 else JMP=1
- 36 256 0 73 ; 36(24):跳转变量JMP是否为0否则跳转到:Label3
- ;:Label5
- 50 3 0 0 2 2 1 0 ; 50(32):四则运算 [X2]=[X2]+1
- 50 3 0 1 11 2 12 0 ; 50(32):四则运算 [X11]=[X2]-12
- 50 24 13 0 1 2 3 4 ; 50(32):读取S*数据 [X4]=场景[X0]层1坐标([X2],[X3])
- 50 4 0 5 4 0 0 0 ; 50(32):变量判断 If[X4]>0 then JMP=0 else JMP=1
- 36 256 28 0 ; 36(24):跳转变量JMP是否为0是则跳转到:Label4
- 50 25 1 0 10588 29 2 0 ; 50(32):保存给定地址数据 [1D-295C+0]=[X2](Int)
- 50 25 1 0 10584 29 11 0 ; 50(32):保存给定地址数据 [1D-2958+0]=[X11](Int)
- 50 4 0 6 0 0 0 0 ; 50(32):变量判断 JMP=0
- 36 256 -64 0 ; 36(24):跳转变量JMP是否为0是则跳转到:Label5
- ;:Label4
- 50 43 0 1019 0 0 0 0 ; 50(32):调用其它事件 Call Sub1019(0,0,0,0)
- -1 ; -1(FFFF):事件结束
- ;:Label3
- 50 4 0 2 1 2 0 0 ; 50(32):变量判断 If[X1]=2 then JMP=0 else JMP=1
- 36 256 0 73 ; 36(24):跳转变量JMP是否为0否则跳转到:Label6
- ;:Label8
- 50 3 0 1 2 2 1 0 ; 50(32):四则运算 [X2]=[X2]-1
- 50 3 0 1 11 2 12 0 ; 50(32):四则运算 [X11]=[X2]-12
- 50 24 13 0 1 2 3 4 ; 50(32):读取S*数据 [X4]=场景[X0]层1坐标([X2],[X3])
- 50 4 0 5 4 0 0 0 ; 50(32):变量判断 If[X4]>0 then JMP=0 else JMP=1
- 36 256 28 0 ; 36(24):跳转变量JMP是否为0是则跳转到:Label7
- 50 25 1 0 10588 29 2 0 ; 50(32):保存给定地址数据 [1D-295C+0]=[X2](Int)
- 50 25 1 0 10584 29 11 0 ; 50(32):保存给定地址数据 [1D-2958+0]=[X11](Int)
- 50 4 0 6 0 0 0 0 ; 50(32):变量判断 JMP=0
- 36 256 -64 0 ; 36(24):跳转变量JMP是否为0是则跳转到:Label8
- ;:Label7
- 50 43 0 1019 0 0 0 0 ; 50(32):调用其它事件 Call Sub1019(0,0,0,0)
- 7 ; 7(7):无条件返回
- ;:Label6
- ;:Label10
- 50 3 0 0 3 3 1 0 ; 50(32):四则运算 [X3]=[X3]+1
- 50 3 0 1 12 3 10 0 ; 50(32):四则运算 [X12]=[X3]-10
- 50 24 13 0 1 2 3 4 ; 50(32):读取S*数据 [X4]=场景[X0]层1坐标([X2],[X3])
- 50 4 0 5 4 0 0 0 ; 50(32):变量判断 If[X4]>0 then JMP=0 else JMP=1
- 36 256 28 0 ; 36(24):跳转变量JMP是否为0是则跳转到:Label9
- 50 25 1 0 10586 29 3 0 ; 50(32):保存给定地址数据 [1D-295A+0]=[X3](Int)
- 50 25 1 0 10582 29 12 0 ; 50(32):保存给定地址数据 [1D-2956+0]=[X12](Int)
- 50 4 0 6 0 0 0 0 ; 50(32):变量判断 JMP=0
- 36 256 -64 0 ; 36(24):跳转变量JMP是否为0是则跳转到:Label10
- ;:Label9
- 50 43 0 1019 0 0 0 0 ; 50(32):调用其它事件 Call Sub1019(0,0,0,0)
- -1 ; -1(FFFF):事件结束
复制代码- ;Kdefnum=1019
- 50 0 9003 0 0 0 0 0 ; 50(32):变量赋值 [X9003]=0
- ;:Label4
- 50 26 0 0 10590 29 9000 0 ; 50(32):读取给定地址数据 [X9000]=[1D-295E+0](Int)
- 50 26 0 0 10588 29 9001 0 ; 50(32):读取给定地址数据 [X9001]=[1D-295C+0](Int)
- 50 26 0 0 10586 29 9002 0 ; 50(32):读取给定地址数据 [X9002]=[1D-295A+0](Int)
- 50 4 0 2 9003 0 0 0 ; 50(32):变量判断 If[X9003]=0 then JMP=0 else JMP=1
- 36 256 0 8 ; 36(24):跳转变量JMP是否为0否则跳转到:Label0
- 50 3 0 1 9002 9002 1 0 ; 50(32):四则运算 [X9002]=[X9002]-1
- ;:Label0
- 50 4 0 2 9003 1 0 0 ; 50(32):变量判断 If[X9003]=1 then JMP=0 else JMP=1
- 36 256 0 8 ; 36(24):跳转变量JMP是否为0否则跳转到:Label1
- 50 3 0 0 9002 9002 1 0 ; 50(32):四则运算 [X9002]=[X9002]+1
- ;:Label1
- 50 4 0 2 9003 2 0 0 ; 50(32):变量判断 If[X9003]=2 then JMP=0 else JMP=1
- 36 256 0 8 ; 36(24):跳转变量JMP是否为0否则跳转到:Label2
- 50 3 0 1 9001 9001 1 0 ; 50(32):四则运算 [X9001]=[X9001]-1
- ;:Label2
- 50 4 0 2 9003 3 0 0 ; 50(32):变量判断 If[X9003]=3 then JMP=0 else JMP=1
- 36 256 0 8 ; 36(24):跳转变量JMP是否为0否则跳转到:Label3
- 50 3 0 0 9001 9001 1 0 ; 50(32):四则运算 [X9001]=[X9001]+1
- ;:Label3
- 50 23 29 9000 3 9001 9002 9003 ; 50(32):保存S*数据 场景[X9000]层3坐标([X9001],[X9002])=[X9003]
- 50 21 3 9000 9003 4 1018 0 ; 50(32):保存D*数据 场景[X9000]场景事件[X9003]属性4=1018
- 50 21 11 9000 9003 9 9001 0 ; 50(32):保存D*数据 场景[X9000]场景事件[X9003]属性9=[X9001]
- 50 21 11 9000 9003 10 9002 0 ; 50(32):保存D*数据 场景[X9000]场景事件[X9003]属性10=[X9002]
- 50 3 0 0 9003 9003 1 0 ; 50(32):四则运算 [X9003]=[X9003]+1
- 50 4 0 0 9003 4 0 0 ; 50(32):变量判断 If[X9003]<4 then JMP=0 else JMP=1
- 36 256 -156 0 ; 36(24):跳转变量JMP是否为0是则跳转到:Label4
- 0 ; 0(0)::空语句(清屏)
- -1 ; -1(FFFF):事件结束
复制代码
|