at89c55wd-dip-060915.asm

一个串口转ＴＣＰ／ＩＰ的原码

  movx   @dptr,a
  inc    dptr
  mov    a,55h
  movx   @dptr,a
  lcall  l_1b25
  mov    dptr,#0670h
  mov    a,r6
  movx   @dptr,a
  inc    dptr
  mov    a,r7
  movx   @dptr,a
  mov    dptr,#000ah
  movx   a,@dptr
  mov    r4,a
  inc    dptr
  movx   a,@dptr
  mov    r5,a
  inc    dptr
  movx   a,@dptr
  mov    r2,a
  inc    dptr
  movx   a,@dptr
  mov    r3,a
  mov    62h,#06h
  mov    r7,55h
  mov    r6,54h
  lcall  l_1f37
  mov    dptr,#0038h
  mov    a,#08h
  movx   @dptr,a
l_0952:
  ret
l_0953:
  mov    r7,#0ah
  lcall  l_2c94
  lcall  l_2cd3
  lcall  l_26be
  lcall  l_2c4f
  lcall  l_1cd9
  lcall  l_0003
  mov    r7,#0ah
  lcall  l_2bd3
  mov    r3,#00h
  mov    r2,#00h
  mov    r1,#4eh
  mov    4bh,r3
  mov    4ch,r2
  mov    4dh,r1
  clr    a
  mov    63h,a
  mov    64h,a
  lcall  l_1e62
  mov    a,4eh
  cjne   a,#0aah,l_0990
  mov    a,53h
  cjne   a,#0aah,l_0990
  mov    r6,#00h
l_098c:
  mov    r7,#01h
  sjmp   l_0994
l_0990:
  mov    r6,#00h
  mov    r7,#00h
l_0994:
  mov    c,p1.0
  clr    a
  rlc    a
  mov    r5,a
  mov    a,r7
  anl    a,r5
  jz     l_09bd
  clr    a
  mov    4ah,a
l_09a0:
  mov    a,#4fh
  add    a,4ah
  mov    r0,a
  mov    a,@r0
  mov    r7,a
  mov    a,#0b4h
  add    a,4ah
  mov    dpl,a
  clr    a
  addc   a,#6ch
  mov    dph,a
  mov    a,r7
  movx   @dptr,a
  inc    4ah
  mov    a,4ah
  cjne   a,#04h,l_09a0
  sjmp   l_09c7
l_09bd:
  mov    dptr,#6cb4h
  lcall  l_2228
  push   ie
  ajmp   l_0803
l_09c7:
  mov    r3,#00h
  mov    r2,#00h
  mov    r1,#4eh
  mov    4bh,r3
  mov    4ch,r2
  mov    4dh,r1
  mov    63h,#00h
  mov    64h,#06h
  lcall  l_1e62
  mov    a,4eh
  cjne   a,#0aah,l_0a06
  mov    a,53h
  cjne   a,#0aah,l_0a06
  clr    a
  mov    4ah,a
l_09e9:
  mov    a,#4fh
  add    a,4ah
  mov    r0,a
  mov    a,@r0
  mov    r7,a
  mov    a,#0beh
  add    a,4ah
  mov    dpl,a
  clr    a
  addc   a,#6ch
  mov    dph,a
  mov    a,r7
  movx   @dptr,a
  inc    4ah
  mov    a,4ah
  cjne   a,#04h,l_09e9
  sjmp   l_0a10
l_0a06:
  mov    dptr,#6cbeh
  lcall  l_2228
  push   ie
  ajmp   l_0801
l_0a10:
  mov    r3,#00h
  mov    r2,#00h
  mov    r1,#4eh
  mov    4bh,r3
  mov    4ch,r2
  mov    4dh,r1
  mov    63h,#00h
  mov    64h,#0ch
  lcall  l_1e62
  mov    a,4eh
  cjne   a,#0aah,l_0a4f
  mov    a,53h
  cjne   a,#0aah,l_0a4f
  clr    a
  mov    4ah,a
l_0a32:
  mov    a,#4fh
  add    a,4ah
  mov    r0,a
  mov    a,@r0
  mov    r7,a
  mov    a,#3ah
  add    a,4ah
  mov    dpl,a
  clr    a
  addc   a,#2ah
  mov    dph,a
  mov    a,r7
  movx   @dptr,a
  inc    4ah
  mov    a,4ah
  cjne   a,#04h,l_0a32
  sjmp   l_0a59
l_0a4f:
  mov    dptr,#2a3ah
  lcall  l_2228
  mov    r7,a
  mov    r7,a
  mov    r7,a
  nop
l_0a59:
  mov    dptr,#2a3eh
  lcall  l_2228
  nop
  nop
  nop
  nop
  mov    r7,#0ah
  lcall  l_2bd3
  clr    a
  mov    4ah,a
l_0a6b:
  mov    a,4ah
  add    a,acc
  add    a,#0b8h
  mov    dpl,a
  clr    a
  addc   a,#6ch
  mov    dph,a
  movx   a,@dptr
  mov    r6,a
  inc    dptr
  movx   a,@dptr
  mov    r7,a
  mov    b,#02h
  mov    a,4ah
  mul    ab
  add    a,#44h
  mov    dpl,a
  mov    a,b
  addc   a,#06h
  mov    dph,a
  mov    a,r6
  movx   @dptr,a
  inc    dptr
  mov    a,r7
  movx   @dptr,a
  inc    4ah
  mov    a,4ah
  cjne   a,#03h,l_0a6b
  lcall  l_2a2f
l_0a9c:
  jnb    20h.1,l_0aa2
  lcall  l_0706
l_0aa2:
  jnb    20h.4,l_0abc
  clr    20h.4
  mov    dptr,#0038h
  movx   a,@dptr
  jnz    l_0ab0
  lcall  l_0026
l_0ab0:
  lcall  l_27fb
  lcall  l_254f
  lcall  l_25b2
  lcall  l_2b38
l_0abc:
  mov    a,36h
  setb   c
  subb   a,#14h
  jc     l_0acc
  jnb    20h.3,l_0acc
  clr    a
  mov    36h,a
l_0ac9:
  lcall  l_29fb
l_0acc:
  clr    a
  mov    4ah,a
l_0acf:
  mov    a,4ah
  clr    c
  subb   a,#05h
  jnc    l_0a9c
  lcall  l_10a6
  mov    a,r7
  jz     l_0b55
  mov    dptr,#004ah
  movx   a,@dptr
  cjne   a,#08h,l_0b0a
  inc    dptr
  movx   a,@dptr
  cjne   a,#06h,l_0b0a
  mov    dptr,#0052h
  movx   a,@dptr
  jnz    l_0af2
  inc    dptr
  movx   a,@dptr
  xrl    a,#01h
l_0af2:
  jnz    l_0af9
  lcall  l_1486
  sjmp   l_0b55
l_0af9:
  mov    dptr,#0052h
  movx   a,@dptr
  jnz    l_0b03
  inc    dptr
  movx   a,@dptr
  xrl    a,#02h
l_0b03:
  jnz    l_0b55
  lcall  l_1fcd
  sjmp   l_0b55
l_0b0a:
  mov    dptr,#004ah
  movx   a,@dptr
  xrl    a,#08h
  jnz    l_0b14
  inc    dptr
  movx   a,@dptr
l_0b14:
  jnz    l_0b55
  mov    dptr,#004ch
  movx   a,@dptr
l_0b1a:
  anl    a,#0f0h
  xrl    a,#40h
  jnz    l_0b55
  lcall  l_2b9b
  mov    a,r7
  jz     l_0b55
l_0b26:
  mov    dptr,#0055h
  movx   a,@dptr
  add    a,#0fah
  jz     l_0b4d
  add    a,#0f5h
  jz     l_0b52
  add    a,#10h
  jnz    l_0b55
  mov    dptr,#0060h
  movx   a,@dptr
  cjne   a,#08h,l_0b42
  lcall  l_18a9
  sjmp   l_0b55
l_0b42:
  mov    dptr,#0060h
  movx   a,@dptr
  jnz    l_0b55
  lcall  l_0008
  sjmp   l_0b55
l_0b4d:
  lcall  l_24e8
  sjmp   l_0b55
l_0b52:
  lcall  l_290b
l_0b55:
  inc    4ah
  ljmp   l_0acf
l_0b5a:
  mov    dptr,#006dh
  movx   a,@dptr
  anl    a,#06h
  jz     l_0b65
  lcall  l_2761
l_0b65:
  mov    dptr,#006dh
  movx   a,@dptr
  jnb    acc.0,l_0ba5
  mov    dptr,#0008h
  movx   a,@dptr
  mov    r6,a
  inc    dptr
  movx   a,@dptr
  mov    r7,a
  mov    dptr,#0060h
  movx   a,@dptr
  cjne   a,06h,l_0ba5
  inc    dptr
  movx   a,@dptr
  cjne   a,07h,l_0ba5
  mov    dptr,#0038h
  mov    a,#07h
  movx   @dptr,a
  mov    dptr,#001ch
  movx   a,@dptr
  mov    r4,a
  inc    dptr
  movx   a,@dptr
  mov    r5,a
  inc    dptr
l_0b8f:
  movx   a,@dptr
l_0b90:
  mov    r6,a
  inc    dptr
  movx   a,@dptr
  add    a,#01h
  mov    r7,a
  clr    a
  addc   a,r6
  mov    r6,a
  clr    a
  addc   a,r5
  mov    r5,a
  clr    a
  addc   a,r4
  mov    r4,a
  mov    dptr,#001ch
  lcall  l_221c
l_0ba5:
  mov    dptr,#006ch
  movx   a,@dptr
  mov    r7,a
  swap   a
  anl    a,#0fh
  mov    54h,#00h
  mov    55h,a
  mov    r6,54h
  mov    r0,#02h
l_0bb6:
  clr    c
  rlc    a
  xch    a,r6
  rlc    a
  xch    a,r6
  djnz   r0,l_0bb6
  add    a,#14h
  mov    55h,a
  clr    a
  addc   a,r6
  mov    54h,a
  clr    c
  mov    dptr,#004fh
  movx   a,@dptr
  subb   a,55h
  mov    55h,a
  mov    dptr,#004eh
  movx   a,@dptr
  subb   a,54h
  mov    54h,a
  setb   c
  mov    a,55h
  subb   a,#00h
  mov    a,54h
  subb   a,#00h
  jc     l_0be8
  mov    r7,55h
  mov    r6,54h
  lcall  l_15b9
l_0be8:
  mov    dptr,#006dh
  movx   a,@dptr
  jb     acc.4,l_0bf2
  ljmp   l_0d45
l_0bf2:
  setb   20h.3
  mov    dptr,#0068h
  movx   a,@dptr
  mov    r4,a
  inc    dptr
  movx   a,@dptr
  mov    r5,a
  inc    dptr
  movx   a,@dptr
  mov    r6,a
  inc    dptr
  movx   a,@dptr
  mov    r7,a
  mov    dptr,#0024h
  movx   a,@dptr
  mov    r0,a
  inc    dptr
  movx   a,@dptr
  mov    r1,a
  inc    dptr
  movx   a,@dptr
  mov    r2,a
  inc    dptr
  movx   a,@dptr
  mov    r3,a
  setb   c
  lcall  l_21f8
  jnc    l_0c3a
  mov    dptr,#0020h
  movx   a,@dptr
  mov    r4,a
  inc    dptr
  movx   a,@dptr
  mov    r5,a
  inc    dptr
  movx   a,@dptr
  mov    r6,a
  inc    dptr
  movx   a,@dptr
  mov    r7,a
  mov    dptr,#0068h
  movx   a,@dptr
  mov    r0,a
  inc    dptr
  movx   a,@dptr
  mov    r1,a
  inc    dptr
  movx   a,@dptr
  mov    r2,a
  inc    dptr
  movx   a,@dptr
  mov    r3,a
  lcall  l_21f8
  jnc    l_0c3a
  lcall  l_1211
l_0c3a:
  setb   c
  mov    a,55h
  subb   a,#00h
  mov    a,54h
  subb   a,#00h
  jnc    l_0c50
  mov    dptr,#0038h
  movx   a,@dptr
  xrl    a,#07h
  jz     l_0c50
  ljmp   l_0d45
l_0c50:
  clr    a
  mov    r7,a
l_0c52:
  mov    a,r7
  add    a,acc
  add    a,#0eh
  mov    dpl,a
  clr    a
  addc   a,#00h
  mov    dph,a
l_0c5e:
  movx   a,@dptr
  mov    r4,a
  inc    dptr
  movx   a,@dptr
  mov    r5,a
  mov    b,#02h
  mov    a,r7
  mul    ab
  add    a,#3eh
  mov    dpl,a
  mov    a,b
  addc   a,#06h
  mov    dph,a
  mov    a,r4
  movx   @dptr,a
  inc    dptr
  mov    a,r5
  movx   @dptr,a
  inc    r7
  cjne   r7,#03h,l_0c52
  mov    dptr,#064ah
  mov    a,#08h
  movx   @dptr,a
  inc    dptr
  clr    a
  movx   @dptr,a
  mov    dptr,#0006h
  movx   a,@dptr
  mov    r7,a
  inc    dptr
  movx   a,@dptr
  mov    dptr,#0660h
  xch    a,r7
  movx   @dptr,a
  inc    dptr
  mov    a,r7
  movx   @dptr,a
  mov    dptr,#0008h
  movx   a,@dptr
  mov    r7,a
  inc    dptr
  movx   a,@dptr
  mov    dptr,#0662h
  xch    a,r7
  movx   @dptr,a
  inc    dptr
  mov    a,r7
  movx   @dptr,a
  mov    dptr,#0020h
  movx   a,@dptr
  mov    r4,a
  inc    dptr
  movx   a,@dptr
  mov    r5,a
  inc    dptr
  movx   a,@dptr
  mov    r6,a
  inc    dptr
  movx   a,@dptr
  mov    r7,a
  mov    dptr,#0664h
  lcall  l_221c
  mov    dptr,#001ch
  movx   a,@dptr
  mov    r4,a
  inc    dptr
  movx   a,@dptr
  mov    r5,a
  inc    dptr
  movx   a,@dptr
l_0cc0:
  mov    r6,a
  inc    dptr
  movx   a,@dptr
  mov    r7,a
  mov    dptr,#0668h
  lcall  l_221c
  mov    dptr,#066ch
  mov    a,#50h
  movx   @dptr,a
  mov    a,#10h
  lcall  l_2124
  mov    56h,r6
  mov    57h,r7
  setb   c
  mov    a,57h
  subb   a,#00h
  mov    a,56h
  subb   a,#00h
  jc     l_0cea
  mov    dptr,#066dh
l_0ce7:
  mov    a,#18h
  movx   @dptr,a
l_0cea:
  mov    dptr,#0020h
  movx   a,@dptr
  mov    r0,a
  inc    dptr
  movx   a,@dptr
  mov    r1,a
  inc    dptr
  movx   a,@dptr
  mov    r2,a
l_0cf5:
  inc    dptr
  movx   a,@dptr
  mov    r3,a
  clr    a
  mov    r4,a
  mov    r5,a
  mov    a,r3
  add    a,57h
  mov    r7,a
  mov    a,r2
  addc   a,56h
  mov    r6,a
  mov    a,r5
  addc   a,r1
  mov    r5,a
  mov    a,r4
  addc   a,r0
  mov    r4,a
  mov    dptr,#0020h
  lcall  l_221c
  mov    a,#14h
  add    a,57h
  mov    57h,a
  clr    a
  addc   a,56h
  mov    56h,a
  mov    dptr,#0656h
  movx   @dptr,a
  inc    dptr
  mov    a,57h
  movx   @dptr,a
  lcall  l_1b25
  mov    dptr,#0670h
  mov    a,r6
  movx   @dptr,a
  inc    dptr
  mov    a,r7
  movx   @dptr,a
  mov    dptr,#000ah
l_0d30:
  movx   a,@dptr
  mov    r4,a
  inc    dptr
  movx   a,@dptr
  mov    r5,a
  inc    dptr
  movx   a,@dptr
  mov    r2,a
  inc    dptr
  movx   a,@dptr
  mov    r3,a
  mov    62h,#06h
  mov    r7,57h
  mov    r6,56h
  lcall  l_1f37
l_0d45:
  ret
l_0d46:
  mov    dptr,#006dh
  movx   a,@dptr
  jnb    acc.0,l_0d50
  ljmp   l_1988
l_0d50:
  mov    dptr,#006dh
  movx   a,@dptr
  jb     acc.1,l_0d5a
  ljmp   l_0f1b
l_0d5a:
  clr    a
  mov    r3,a
l_0d5c:
  mov    b,#02h
  mov    a,r3
  mul    ab
  add    a,#58h
  mov    dpl,a
  mov    a,b
  addc   a,#00h
  mov    dph,a
  movx   a,@dptr
  mov    r6,a
  inc    dptr
  movx   a,@dptr
  mov    r7,a
  mov    a,r3
  add    a,acc
  add    a,#0ah
  mov    dpl,a
  clr    a
  addc   a,#00h
  mov    dph,a
  mov    a,r6
  movx   @dptr,a
  inc    dptr
  mov    a,r7
  movx   @dptr,a
  inc    r3
  cjne   r3,#02h,l_0d5c
  clr    a
  mov    r3,a
l_0d87:
  mov    b,#02h
  mov    a,r3
  mul    ab
  add    a,#44h
  mov    dpl,a
  mov    a,b
  addc   a,#00h
  mov    dph,a
  movx   a,@dptr
  mov    r6,a
  inc    dptr
  movx   a,@dptr
  mov    r7,a
  mov    a,r3
  add    a,acc
  add    a,#0eh
  mov    dpl,a
  clr    a
  addc   a,#00h
  mov    dph,a
  mov    a,r6
  movx   @dptr,a
  inc    dptr
  mov    a,r7
  movx   @dptr,a
  inc    r3
  cjne   r3,#03h,l_0d87
  mov    dptr,#0006h
  mov    a,#04h
  movx   @dptr,a
  inc    dptr
  clr    a
  movx   @dptr,a
  mov    dptr,#0060h
  movx   a,@dptr
  mov    r7,a
  inc    dptr
  movx   a,@dptr
  mov    dptr,#0008h
  xch    a,r7
  movx   @dptr,a
  inc    dptr
  mov    a,r7
  movx   @dptr,a
  mov    dptr,#0064h
  movx   a,@dptr
  mov    r4,a
  inc    dptr
  movx   a,@dptr
  mov    r5,a
  inc    dptr
  movx   a,@dptr
  mov    r6,a
  inc    dptr
  movx   a,@dptr
  mov    r7,a
  mov    dptr,#0014h
  lcall  l_221c
  mov    dptr,#0064h
  movx   a,@dptr
  mov    r4,a
  inc    dptr
  movx   a,@dptr
  mov    r5,a
  inc    dptr
  movx   a,@dptr
  mov    r6,a
  inc    dptr
  movx   a,@dptr
  add    a,#01h
  mov    r7,a
  clr    a
  addc   a,r6
  mov    r6,a
  clr    a
  addc   a,r5
  mov    r5,a
  clr    a
  addc   a,r4
  mov    r4,a
  mov    dptr,#001ch
  lcall  l_221c
  mov    dptr,#0020h
  movx   a,@dptr
  mov    r4,a
  inc    dptr
  movx   a,@dptr
  mov    r5,a
  inc    dptr
  movx   a,@dptr
  mov    r6,a
  inc    dptr
  movx   a,@dptr
  mov    r7,a
  mov    dptr,#0018h
  lcall  l_221c
  mov    dptr,#0018h
  movx   a,@dptr
  mov    r4,a
  inc    dptr
  movx   a,@dptr
  mov    r5,a
  inc    dptr
  movx   a,@dptr
l_0e19:
  mov    r6,a
  inc    dptr
  movx   a,@dptr
  mov    r7,a
  mov    dptr,#0024h