TA的每日心情 | 开心 2023-5-17 15:19 |
---|
签到天数: 1 天 [LV.1]初来乍到
|
EDA365欢迎您登录!
您需要 登录 才可以下载或查看,没有帐号?注册
x
#include <STC12C5A60S2.H>. G' Y$ m+ b0 [# o0 b
#include <intrins.h>
7 y; g5 t0 W; U! X& d( ]$ P#define uint unsigned int ?9 F4 m" r5 X: M3 o# D
sbit aj=P3^5;. W5 w& E5 A: e
void delay(uint k)# { h0 v8 {' {# S( U! Y3 o# p/ F
{
1 C/ [( v+ Z. z* m7 a0 t1 c' d" t uint i,j;3 W4 U3 q# M/ C+ S; l P$ ~7 S! O
for(i=0;i<k;i++)& g# a1 m' V9 N' {
for(j=0;j<121;j++)
: n0 z* @7 O0 B; S q, U {;}9 t! }: n M! s; [9 j7 J
}2 `7 |( D6 j( a
int main(void)
8 y: Q* Y5 D/ C, ?{
4 q; I( k4 J9 ^0 A" \ unsigned int i;
c. M2 I3 ~8 }2 I if(aj==0)
' V. [, K. ]* n# [ { H5 t2 f, x v! i/ u
P1=0xfe;, C% {* Y" ~% ~4 C& _
for(i=0;i<41;i++) a9 {" w- }) Y7 I) H
{& x0 s+ v$ ^5 a# c7 f: \
delay(500);
7 t+ E# Q( C! G& Z P1=_crol_(P1,1);5 q& g, E! K: d4 [9 n) o4 O
}& c8 c- k$ K, R5 j1 F# U
P1=0x7f;. Y2 k, j# a( a, B: M) q" t
for(i=0;i<41;i++)% V2 @ [# L% O# ]6 c
{' f' G& E1 U2 n1 v4 T- M
delay(500);
: U# h$ ]4 e' k6 C& `( K P1=_cror_(P1,1);$ b5 n. }+ X' c1 }/ U7 A
}
- A% O1 J h- [' g P1=0xe7;5 P& f2 e, ? h' p) T
for(i=0;i<24;i++)
; d: s4 d2 b+ U# p( H& q Y: g4 Y3 v {
5 ~1 H& a9 F# Z4 ]3 ?9 k: ~ delay(1000);% J6 t4 S$ R( s5 d9 A8 W
P1=_cror_(P1,3); }+ }$ n9 q# ~3 u- K7 Y, g7 h" V
}* O) i& C2 L( y8 M5 K4 l2 n
P1=0xf0;
. T; S/ I$ R) y# x1 I5 X for(i=0;i<41;i++)$ i, v& O. t9 J' ~* M8 }( w( m
{! y5 I( H1 X" q8 ?
delay(500); l9 `2 u+ m# S Z7 f% o+ p
P1=_crol_(P1,1);
& d/ O/ T4 j/ o' N2 I6 Y }
( x% r' f8 ]' z; z( x P1=0xf0;
2 g) k& r# W; o( D3 m Z2 b2 ^ for(i=0;i<41;i++)
$ B/ V6 @6 P/ t! s# C {
( j* L8 a8 ]1 i! [/ a+ Y delay(500);
" p) W: Z3 D: o/ ]8 \+ U% h) \ P1=_cror_(P1,1);
0 n: z! I8 m/ ^/ f+ z$ @7 U }
/ q0 H. N3 f/ m1 M$ x/ I P1=0xf0ff;
5 C0 a" A6 W& {2 R9 T for(i=0;i<1;i++)
& u) Z" E2 v4 ]. u+ ` while(1);' F. n8 V9 Q* ]$ `
}# I |+ {2 j9 @- w5 M1 C. p! {
}5 q# R' o" v4 M h ?- a* C/ x
|
|