at89c55wd-dip-060915.asm

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

  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,#0668h
  lcall  l_2228
  nop
  nop
  nop
  nop
  mov    dptr,#066dh
  mov    a,#04h
  movx   @dptr,a
  ljmp   l_1988
l_04ba:
  ljmp   l_2761
l_04bd:
  mov    dptr,#006dh
  movx   a,@dptr
  jb     acc.1,l_04c7
  ljmp   l_0705
l_04c7:
  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
l_04e7:
  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,#006dh
  movx   a,@dptr
  jnb    acc.4,l_0504
  lcall  l_1211
l_0504:
  mov    dptr,#0018h
  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
  clr    c
  lcall  l_21f8
  jnc    l_0529
  ljmp   l_069e
l_0529:
  mov    dptr,#0064h
  movx   a,@dptr
  mov    r4,a
  inc    dptr
  movx   a,@dptr
  mov    r5,a
l_0531:
  inc    dptr
  movx   a,@dptr
  mov    r6,a
l_0534:
  inc    dptr
  movx   a,@dptr
  mov    r7,a
  mov    dptr,#0014h
l_053a:
  lcall  l_221c
  mov    dptr,#006eh
  movx   a,@dptr
  mov    r7,a
  inc    dptr
  movx   a,@dptr
  mov    dptr,#0028h
  xch    a,r7
  movx   @dptr,a
  inc    dptr
  mov    a,r7
  movx   @dptr,a
  mov    dptr,#002ch
  mov    a,#02h
  movx   @dptr,a
  inc    dptr
  mov    a,#30h
  movx   @dptr,a
  mov    dptr,#006ch
l_0559:
  movx   a,@dptr
l_055a:
  setb   c
  subb   a,#14h
  jc     l_057e
  mov    dptr,#0074h
  movx   a,@dptr
  cjne   a,#02h,l_057e
  inc    dptr
  movx   a,@dptr
  cjne   a,#04h,l_057e
  inc    dptr
  movx   a,@dptr
  mov    r6,a
  inc    dptr
  movx   a,@dptr
  mov    r4,#00h
  add    a,#00h
l_0574:
  mov    r7,a
  mov    a,r4
  addc   a,r6
  mov    dptr,#002ch
  movx   @dptr,a
  inc    dptr
  mov    a,r7
  movx   @dptr,a
l_057e:
  mov    dptr,#0038h
  mov    a,#03h
  movx   @dptr,a
  setb   20h.3
  clr    a
  mov    43h,a
l_0589:
  mov    a,43h
  add    a,acc
  add    a,#0eh
  mov    dpl,a
  clr    a
  addc   a,#00h
  mov    dph,a
  movx   a,@dptr
  mov    r6,a
  inc    dptr
  movx   a,@dptr
l_059a:
  mov    r7,a
  mov    b,#02h
  mov    a,43h
  mul    ab
l_05a1:
  add    a,#3eh
  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    43h
  mov    a,43h
  cjne   a,#03h,l_0589
  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_05fc:
  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
  inc    dptr
  mov    a,#10h
  movx   @dptr,a
  mov    dptr,#002ah
  movx   a,@dptr
  mov    r7,a
  inc    dptr
  movx   a,@dptr
  mov    dptr,#066eh
l_061a:
  xch    a,r7
  movx   @dptr,a
  inc    dptr
  mov    a,r7
  movx   @dptr,a
  clr    a
  mov    dptr,#0672h
  movx   @dptr,a
  inc    dptr
  movx   @dptr,a
  mov    dptr,#0670h
  movx   @dptr,a
  inc    dptr
  movx   @dptr,a
  mov    dptr,#000ah
  movx   a,@dptr
  mov    r7,a
  inc    dptr
  movx   a,@dptr
  mov    dptr,#065ch
  xch    a,r7
  movx   @dptr,a
  inc    dptr
  mov    a,r7
  movx   @dptr,a
  mov    dptr,#000ch
  movx   a,@dptr
  mov    r7,a
  inc    dptr
  movx   a,@dptr
  mov    dptr,#065eh
  xch    a,r7
  movx   @dptr,a
  inc    dptr
  mov    a,r7
  movx   @dptr,a
  mov    dptr,#6cb4h
  movx   a,@dptr
l_064e:
  mov    r7,a
  inc    dptr
  movx   a,@dptr
  mov    dptr,#0658h
  xch    a,r7
  movx   @dptr,a
  inc    dptr
  mov    a,r7
  movx   @dptr,a
  mov    dptr,#6cb6h
  movx   a,@dptr
l_065d:
  mov    r7,a
  inc    dptr
  movx   a,@dptr
  mov    dptr,#065ah
  xch    a,r7
  movx   @dptr,a
  inc    dptr
  mov    a,r7
  movx   @dptr,a
  clr    a
  mov    dptr,#0654h
  movx   @dptr,a
l_066d:
  inc    dptr
  mov    a,#06h
  movx   @dptr,a
  inc    dptr
  clr    a
  movx   @dptr,a
  inc    dptr
  mov    a,#14h
  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,#14h
  mov    r6,#00h
  lcall  l_1f37
  setb   20h.3
  ret
l_069e:
  mov    dptr,#0038h
  mov    a,#01h
  movx   @dptr,a
  clr    a
  mov    43h,a
l_06a7:
  mov    a,43h
  add    a,acc
  add    a,#0eh
  mov    dpl,a
  clr    a
  addc   a,#00h
  mov    dph,a
  movx   a,@dptr
  mov    r6,a
  inc    dptr
  movx   a,@dptr
l_06b8:
  mov    r7,a
  mov    b,#02h
  mov    a,43h
  mul    ab
  add    a,#3eh
  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    43h
  mov    a,43h
  cjne   a,#03h,l_06a7
  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
  lcall  l_1a67
  lcall  l_1f1a
l_0705:
  ret
l_0706:
  clr    20h.1
  lcall  l_1225
  mov    dptr,#0038h
  movx   a,@dptr
  mov    r7,a
  xrl    a,#03h
  jz     l_071c
  mov    a,r7
  xrl    a,#07h
  jz     l_071c
  ljmp   l_081c
l_071c:
  lcall  l_2b11
  mov    a,r7
  jnz    l_0725
  ljmp   l_081c
l_0725:
  mov    a,26h
  xrl    a,32h
  jnz    l_072f
  mov    a,25h
  xrl    a,31h
l_072f:
  jnz    l_0734
  ljmp   l_081c
l_0734:
  clr    a
  mov    43h,a
l_0737:
  mov    a,43h
  add    a,acc
  add    a,#0eh
  mov    dpl,a
  clr    a
  addc   a,#00h
  mov    dph,a
  movx   a,@dptr
  mov    r6,a
  inc    dptr
  movx   a,@dptr
l_0748:
  mov    r7,a
  mov    b,#02h
  mov    a,43h
  mul    ab
  add    a,#3eh
  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    43h
  mov    a,43h
  cjne   a,#03h,l_0737
  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_07aa:
  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,#18h
  lcall  l_2124
  mov    54h,r6
  mov    55h,r7
  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
  inc    dptr
  movx   a,@dptr
  mov    r3,a
  clr    a
  mov    r4,a
  mov    r5,a
  mov    a,r3
  add    a,r7
  mov    r7,a
  mov    a,r2
  addc   a,r6
  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,55h
  mov    55h,a
  clr    a
  addc   a,54h
  mov    54h,a
  mov    dptr,#0656h
  movx   @dptr,a
  inc    dptr
  mov    a,55h
  movx   @dptr,a
  lcall  l_1b25
  mov    dptr,#0670h
  mov    a,r6
  movx   @dptr,a
l_0801:
  inc    dptr
  mov    a,r7
l_0803:
  movx   @dptr,a
  mov    dptr,#000ah
l_0807:
  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
l_081c:
  mov    dptr,#0038h
  movx   a,@dptr
  cjne   a,#0ah,l_0826
  lcall  l_2761
l_0826:
  mov    dptr,#0038h
  movx   a,@dptr
  xrl    a,#07h
  jz     l_0831
  ljmp   l_0952
l_0831:
  mov    43h,a
l_0833:
  mov    a,43h
  add    a,acc
  add    a,#0eh
  mov    dpl,a
  clr    a
  addc   a,#00h
  mov    dph,a
  movx   a,@dptr
  mov    r6,a
  inc    dptr
  movx   a,@dptr
l_0844:
  mov    r7,a
  mov    b,#02h
  mov    a,43h
  mul    ab
  add    a,#3eh
  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    43h
  mov    a,43h
  cjne   a,#03h,l_0833
  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
l_0870:
  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
l_0880:
  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_08a6:
  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
  inc    dptr
  mov    a,#11h
  movx   @dptr,a
  mov    dptr,#002ah
  movx   a,@dptr
  mov    r7,a
  inc    dptr
  movx   a,@dptr
  mov    dptr,#066eh
l_08c4:
  xch    a,r7
  movx   @dptr,a
  inc    dptr
  mov    a,r7
  movx   @dptr,a
  clr    a
  mov    dptr,#0672h
  movx   @dptr,a
  inc    dptr
  movx   @dptr,a
  mov    dptr,#0670h
l_08d3:
  movx   @dptr,a
  inc    dptr
  movx   @dptr,a
  mov    dptr,#000ah
  movx   a,@dptr
  mov    r7,a
  inc    dptr
  movx   a,@dptr
  mov    dptr,#065ch
  xch    a,r7
  movx   @dptr,a
  inc    dptr
  mov    a,r7
  movx   @dptr,a
  mov    dptr,#000ch
  movx   a,@dptr
  mov    r7,a
  inc    dptr
  movx   a,@dptr
  mov    dptr,#065eh
  xch    a,r7
l_08f0:
  movx   @dptr,a
  inc    dptr
  mov    a,r7
  movx   @dptr,a
  mov    dptr,#6cb4h
  movx   a,@dptr
l_08f8:
  mov    r7,a
  inc    dptr
  movx   a,@dptr
  mov    dptr,#0658h
  xch    a,r7
l_08ff:
  movx   @dptr,a
  inc    dptr
  mov    a,r7
  movx   @dptr,a
  mov    dptr,#6cb6h
  movx   a,@dptr
l_0907:
  mov    r7,a
  inc    dptr
  movx   a,@dptr
  mov    dptr,#065ah
  xch    a,r7
  movx   @dptr,a
  inc    dptr
  mov    a,r7
  movx   @dptr,a
  clr    a
  mov    dptr,#0654h
  movx   @dptr,a
  inc    dptr
  mov    a,#06h
  movx   @dptr,a
  mov    54h,#00h
l_091e:
  mov    55h,#14h
  inc    dptr
  mov    a,54h
l_0924: