请帮我看看源程序

来源：21ic　作者：husq7926　栏目：单片机

请帮我看看源程序
    我只会  51的语言。可是51系列没有8脚的。下面是我在2051上的程序。有谁能给改成PIC 12C508A  的。采用片内振荡或RC。多谢了。

      org 0000h
              mov a,#087h
              mov p1,a
              clr a
              clr a
              mov a,#0ffh
              mov p3,a
     start:   clr p1.3
              acall loop
              jb p1.7,start
              jb p3.5,start
     huan:    jnb p3.4,shun
              jb p3.5,start
              clr p1.4
              acall delay
              setb p1.3
     huan1:   jb p3.5,start
              jb p3.4,huan1
              jnb p3.4,tt
     tt:      acall loop
     shun:    jb p3.5,start
              setb p1.4
              acall delay
              setb p1.3
     shun1:   jb p3.5,start
              jnb p3.4, shun1
              jb p3.4,dd
     dd:      acall loop
              ajmp huan
     loop:    jb p1.7,loop1
              ajmp done
     loop1:   clr p1.3
              clr p1.3
              acall delay
     loop4:   setb p1.5
              jb p1.7,loop4
     done:    clr p1.5
              clr p1.5
              acall delay
              ret
     delay:   mov r5,#0fah

     loop2:   mov r4,#0f9h
     loop3:   nop
              nop
              djnz r4,loop3
              djnz r5,loop2
              ret
              end

1楼：	>>参与讨论
作者： badboy7903 于 2003-8-27 9:40:00 发布：同志，汇编我看不懂

2楼：	>>参与讨论
作者： wjf07 于 2003-8-27 9:56:00 发布：你是做什么的？把你的程序给我发来，我帮你看看我的email:alanhotmail@sohu.com 你们公司的主要业务是什么？

3楼：	>>参与讨论
作者： wfl1979 于 2003-8-27 10:21:00 发布：能不能搞一点注释！没有注释的程序是不完整的。能不能把你的程序增加注释后发给我，我可以把你做。我的E_mail:wfl1979@etang.com

4楼：	>>参与讨论
作者： fxmxh 于 2003-8-27 19:57:00 发布：改这个51程序还不如重新用PIC编

参与讨论

相关帖子

请教 mcc18 中 bit 型变量怎么用？

和大家共享单片机抗干扰设计的好文献

张工:请问一个PIC通信的问题?

在线调试时，B口中断是否受影响？

单步执行初始化程序时，发现INTCON莫名其妙的变化