POST A WORKING HANKKEEN TÄSTÄ ^ _ ^

[glenndr_15]

Lähetä toimiva hanke only.Post että kaavio ja lähdekoodia.Kiitos!

 

[wizpic]

here you go
Code:

/ / include file

# include <pic.h>/ / 16F84 kokoonpanoasetuksia

__CONFIG (0x3FF1);# define PORTBIT (adr, bit) ((unsigned) (& adr) * 8 (bit))staattinen bittinen LED0 @ PORTBIT (PORTB, 0);

staattinen bittinen LED1 @ PORTBIT (PORTB, 1);

staattinen bittinen LED2 @ PORTBIT (PORTB, 2);

staattinen bittinen LED3 @ PORTBIT (PORTB, 3);

staattinen bittinen LED4 @ PORTBIT (PORTB, 4);

staattinen bittinen LED5 @ PORTBIT (PORTB, 5);

staattinen bittinen LED6 @ PORTBIT (PORTB, 6);

staattinen bittinen LED7 @ PORTBIT (PORTB, 7);unsigned int i; / / for loop tauko

unsigned int c; / / for loop tapauksessa loop/ / keskeyttää toiminnot

mitätön pause_1 ();

mitätön pause_2 ();/ / tärkein ominaisuus

mitätön main (void)

(TRISB = 0x00;

PORTB = 0b00000000;kun taas (1)

(for (c = 0, c <10 c )

(/ / eteenpäin

LED0 = 1;

pause_1 ();LED0 = 0;

LED1 = 1;

pause_1 ();LED1 = 0;

LED2 = 1;

pause_1 ();LED2 = 0;

LED3 = 1;

pause_1 ();LED3 = 0;

LED4 = 1;

pause_1 ();LED4 = 0;

LED5 = 1;

pause_1 ();LED5 = 0;

LED6 = 1;

pause_1 ();LED6 = 0;

LED7 = 1;

pause_1 ();LED7 = 0;/ / taaksepäin

LED6 = 1;

pause_1 ();LED6 = 0;

LED5 = 1;

pause_1 ();LED5 = 0;

LED4 = 1;

pause_1 ();LED4 = 0;

LED3 = 1;

pause_1 ();LED3 = 0;

LED2 = 1;

pause_1 ();LED2 = 0;

LED1 = 1;

pause_1 ();LED1 = 0;

LED0 = 1;

pause_1 ();/ / uudelleen initalize PORTB

PORTB = 0b00000000;for (c = 0, c <10 c )

(PORTB = 0b10101010;

pause_2 ();PORTB = 0b01010101;

pause_2 ();for (c = 0, c <10 c )

(PORTB = 0b11110000;

pause_2 ();PORTB = 0b00001111;

pause_2 ();for (c = 0, c <10 c )

(PORTB = 0b11001100;

pause_2 ();PORTB = 0b00110011;

pause_2 ();for (c = 0, c <10 c )

(PORTB = 0b10000001;

pause_1 ();PORTB = 0b01000010;

pause_1 ();PORTB = 0b00100100;

pause_1 ();PORTB = 0b00011000;

pause_1 ();PORTB = 0b00100100;

pause_1 ();PORTB = 0b01000010;

pause_1 ())mitätön pause_1 ()

(for (i = 0; i <4000; i );

for (i = 0; i <4000; i );mitätön pause_2 ()

(for (i = 0; i <4000; i );

for (i = 0; i <4000; i );

for (i = 0; i <4000; i );

for (i = 0; i <4000; i );

for (i = 0; i <4000; i );

for (i = 0; i <4000; i );

 

[pranam77]

Tässä on työ-sovellus muistio mikrosiru.Se on toimiva hanke.Onnea.
Anteeksi, mutta sinun on kirjautumistunnuksen nähdäksesi tämän liitäntävaatimuksia