guest 

 编译时出错,请帮忙修改>发E: GXjishu@263.net  谢谢!
loop: setb p0.0 ;清除p1.0，使其=0，LED1点亮
      setb p0.1
      acall delay          ;调用0.1秒延时子程序，等待0.1秒
  clr  p0.0
  setb p0.2
      acall delay          ;调用0.1秒延时子程序，等待0.1秒
  clr  p0.1
  setb p0.3
      acall delay          ;调用0.1秒延时子程序，等待0.1秒
  clr  p0.2
  setb p0.4
      acall delay          ;调用0.1秒延时子程序，等待0.1秒
  clr  p0.3
      setb p0.5            ;置高p1.0，使其=1，LED1熄灭
      acall delay           
      clr  p0.4
  setb p0.6
      acall delay          ;调用0.1秒延时子程序，等待0.1秒
  clr  p0.5
  setb p0.7
      acall delay          ;调用0.1秒延时子程序，等待0.1秒
  clr  p0.6
  setb p0.8
      acall delay
  clr  p0.8
      ljmp loop            ;8个LED流六了一遍后返回到标号LOOP处再循环

;延时子程序
delay: mov r0,#255          ;
dlo1: mov r1,#195
      djnz r1,$
      djnz r0,dlo1
      ret 
     end

发表时间:2003年6月21日12:02:13