我是刚刚接触单片机的 是个新手

何华建

我是刚刚接触单片机的 是个新手 [复制链接]

我想向各位高手求一流水灯的程序       用51单片机的

skyflysgs

ORG        0000H       
        LJMP        START       
        ORG        0100H       
START:        MOV        SP,#60H       
        MOV        A,#0FFH       
        CLR        C       
START1:        RLC        A       
        MOV        P1,A               
        ACALL        Delay       
        SJMP        START1       
                       
Delay:        MOV        R5,#2        ;延时
Delay1:        MOV        R6,#0       
Delay2:        MOV        R7,#0       
        DJNZ        R7,$       
        DJNZ        R6,Delay2       
        DJNZ        R5,Delay1
       
        RET
                     END

skyflysgs

#include "reg51.h"
        #define uchar unsigned char
        uchar a = 0xfe,b,c;
        void msec()   /*延迟函数*/
        {        uchar x=125,j;
                        while(x--)
                        {
        for(j=0;j<125;j++)
                                {;}
                        }
         }
        main()
        {
                        while(1)      /*实现循环右移的功能*/
                        {
                            b=a<<7;
                                c=a>>1;
                                a=c|b;
                                P1=a;
                                msec();
        }
        }