本人寫的單片機左移到頭接著右移,右移到頭再左移的花樣流水燈程序,求大師指點疑問

ID:467178 · 發(fā)表于 2019-2-9 20:19

本人純屬自學單片機一下程序是我自己寫
寫了一個左移到頭接著右移，右移到頭再左移的花樣流水燈程序
以下程序運行完好，但是如果把此句”delay(100);“延時函數(shù)放在P1=~(0x01<<k);的后邊然后燒到板子上8個led燈從右移動到左第八位全亮，但是從左移動到右就好像哪種電流很小的樣子led等很暗很暗，這是為什么？
板子是郭天祥的TX1C
我的程序哪里有錯誤請高手指點或者還有什么更簡潔的方法？

單片機源碼如下:
----------------------------------------------------------------------
#include <reg52.h>
#define uint unsigned int
#define uchar unsigned char
uint i,j,k,ms,m;//定義變量
void delay(ms)//延時函數(shù)
{
for(i=ms;i>0;i--)
for(j=110;j>0;j--);
}
void main() //主函數(shù)
{
while(1)//死循環(huán)
{

delay(100);//調(diào)用延時函數(shù)并賦值100
P1=~(0x01<<k);//P1口賦初值0x01左移k位
k++; //k值自加1
if(k>=8) //如果左移程序中k值大于等于8則運行右移程序，如果右移程
            //序中的m值大于等于8則k，m值歸0.
      {
      P1=~(0x80>>m);
         m++;
      if(m>=8)
         {
            k=0;
            m=0;
         }
      }
}
}

ID:94031 · 發(fā)表于 2019-2-10 10:17

差別在于沒改前，每執(zhí)行一次P1= --- 后都有 delay(100);延時；改了后，P1=~(0x01<<k);后有延時，P1=~(0x80>>m);后就沒了延時。

ID:475444 · 發(fā)表于 2019-2-10 10:43

自己再調(diào)調(diào)看,太基礎(chǔ)的東西

ID:287259 · 發(fā)表于 2019-2-10 17:14

改了之后，當執(zhí)行過P1=~(0x80>>m);之后，程序回到死循環(huán)開始，會執(zhí)行先P1=~(0x01<<k);這相當于沒有進行延時就又把P1口的信號改變了

ID:213173 · 發(fā)表于 2019-2-11 15:56

//利用循環(huán)左移和循環(huán)右移函數(shù)完成的花樣流水燈程序
#include <reg52.h>
#include <intrins.h>
#define uint unsigned int
#define uchar unsigned char
//uint i,j,k,ms,m;//定義變量
uchar num;
void delay(uint ms)//延時函數(shù)
{
uint i,j;
for(i=ms;i>0;i--)
for(j=110;j>0;j--);
}
void main() //主函數(shù)
{
num=1;
P1=0xfe;
delay(500);
while(1)//死循環(huán)
{
if(num==1)
{
P1=_crol_(P1,1);//循環(huán)左移
delay(500);
if(P1==0x7f)
num=0;
}
else
{
P1=_cror_(P1,1);//循環(huán)右移
delay(500);
if(P1==0xfe)
num=1;
}
}
}

ID:472268 · 發(fā)表于 2019-2-12 01:29

當執(zhí)行過P1=~(0x80>>m);之后，程序回到死循環(huán)開始，會執(zhí)行先P1=~(0x01<<k);這相當于沒有進行延時就又把P1口的信號改變了

ID:467178 · 發(fā)表于 2019-2-13 15:58

wulin 發(fā)表于 2019-2-11 15:56
//利用循環(huán)左移和循環(huán)右移函數(shù)完成的花樣流水燈程序
#include
#include

這個程序比我的要完美，我的那個程序運行一個來回要停頓一小會雖然時間很短但是看著總有些別扭，這個很連續(xù)，再弱弱的問一哈#include <intrins.h>這個頭文件是干嘛用的

ID:467178 · 發(fā)表于 2019-2-13 15:58

xuyaqi 發(fā)表于 2019-2-10 10:17
差別在于沒改前，每執(zhí)行一次P1= --- 后都有 delay(100);延時；改了后，P1=~(0x01m);后就沒了延時。

感謝啦

ID:213173 · 發(fā)表于 2019-2-13 17:56

zhhdok 發(fā)表于 2019-2-13 15:58
這個程序比我的要完美，我的那個程序運行一個來回要停頓一小會雖然時間很短但是看著總有些別扭，這個很連 ...

#include <intrins.h>這個頭文件包含循環(huán)左移和循環(huán)右移函數(shù)，不用自己寫了。
/*--------------------------------------------------------------------------
INTRINS.H

Intrinsic functions for C51.
Copyright (c) 1988-2001 Keil Elektronik GmbH and Keil Software, Inc.
All rights reserved.
--------------------------------------------------------------------------*/

extern void       _nop_    (void);
extern bit          _testbit_ (bit);
extern unsigned char _cror_ (unsigned char, unsigned char);
extern unsigned int  _iror_ (unsigned int,  unsigned char);
extern unsigned long _lror_ (unsigned long, unsigned char);
extern unsigned char _crol_ (unsigned char, unsigned char);
extern unsigned int  _irol_ (unsigned int,  unsigned char);
extern unsigned long _lrol_ (unsigned long, unsigned char);
extern unsigned char _chkfloat_(float);

ID:476375 · 發(fā)表于 2019-2-14 11:30

這個程序有問題，左移的操作一直在執(zhí)行，不管你的k>=8的時候；全亮就是因為delay(100)停頓下，讓你看到了1左移了9位，那么P1=0了，當然全亮

ID:474677 · 發(fā)表于 2019-2-16 16:24

zhhdok 發(fā)表于 2019-2-13 15:58
這個程序比我的要完美，我的那個程序運行一個來回要停頓一小會雖然時間很短但是看著總有些別扭，這個很連 ...

intrins.h包含幾個很有用的KEILC內(nèi)部函數(shù)，有點匯編語言的意思：
_crol_ 字符循環(huán)左移
_cror_ 字符循環(huán)右移
_irol_ 整數(shù)循環(huán)左移
_iror_ 整數(shù)循環(huán)右移
_lrol_ 長整數(shù)循環(huán)左移
_lror_ 長整數(shù)循環(huán)右移
_nop_ 空操作（相當于8051 NOP 指令）
_testbit_ 測試并清零位（相當于8051 JBC 指令）

帳號		自動登錄	找回密碼
密碼			立即注冊

本人寫的單片機左移到頭接著右移,右移到頭再左移的花樣流水燈程序,求大師指點疑問

評分

評分