Programma per PIC

[effedue]

Devo provare un pic16f84a e mi servirebbe un programma veloce per testarlo tipo che appena acceso il circuito fa lampeggiare 2 led fino a quando non si spegne o qualcosa di simile.

Per la lunghezza del programma non ho limiti, basta che però per provarlo non mi servano troppo componenti. Grazie

[aduri]

Prova questo lampeggiatore:
Devi solo fare questo circuito che ti allego in fidocad (programma free in rete lo trovi) e dopo c'e' il codice in Mikrobasic (free anche questo per codice inferiore a 2K)

N.B. Attento Il circuito e' visto dal lato componenti

Codice: Seleziona tutto

[FIDOCAD ]
PA 215 135 20 8 4 1 1
PA 275 135 20 8 4 2 1
PA 215 155 20 8 4 2 1
PA 275 155 20 8 4 2 1
PA 215 175 20 8 4 2 1
PA 275 175 20 8 4 2 1
PA 215 195 20 8 4 2 1
PA 275 195 20 8 4 2 1
PA 215 215 20 8 4 2 1
PA 275 215 20 8 4 2 1
PA 215 235 20 8 4 2 1
PA 275 235 20 8 4 2 1
PA 215 255 20 8 4 2 1
PA 275 255 20 8 4 2 1
PA 215 275 20 8 4 2 1
PA 275 275 20 8 4 2 1
PA 215 295 20 8 4 2 1
PA 275 295 20 8 4 2 1
RV 217 123 273 307 3
BE 235 123 236 136 254 136 255 123 3
PA 315 175 12 12 4 0 1
PA 315 195 12 12 4 0 1
EV 325 165 305 205 3
LI 320 195 315 195
PA 345 195 12 12 4 0 1
PA 365 195 12 12 4 0 1
EV 335 185 375 205 3
PA 345 175 12 12 4 0 1
PA 365 175 12 12 4 0 1
EV 335 165 375 185 3
PL 280 175 345 175 4
PL 280 195 345 195 4
PL 180 215 215 215 4
PL 275 215 280 215 4
PL 275 235 325 235 4
PL 275 255 325 255 4
PL 275 275 325 275 4
PL 275 295 325 295 4
PA 325 235 18 18 4 0
PA 325 255 18 18 4 0
PA 325 275 18 18 4 0
PA 325 295 18 18 4 0
PL 185 215 135 215 4
PL 335 50 195 50 4
PL 195 50 110 50 4
PL 110 50 110 110 4
PL 110 110 110 215 4
TY 380 170 11 3 0 0 0 * 28 pF
TY 380 190 11 3 0 0 0 * 28 pF
TY 260 110 11 3 0 0 0 * PIC16F84A
PA 315 165 18 18 4 0
TY 305 145 11 3 0 0 0 * XTAL 4MHz
PL 365 175 365 195 4
PL 335 50 365 70 4
PL 365 70 365 175 4
PL 225 215 235 215 4
PL 235 215 235 225 4
PL 235 225 310 225 4
PL 310 225 310 210 4
PL 310 210 365 210 4
PL 365 200 365 210 4
PL 215 255 170 255 4
LI 56 29 64 29 3
LI 64 29 64 34 3
LI 56 29 56 34 3
LI 73 57 69 55 3
LI 44 51 47 57 3
LI 47 57 51 55 3
LI 44 51 48 49 3
EV 47 33 73 59 3
RV 30 16 90 100 3
EV 42 28 78 64 3
LI 76 51 73 57 3
LI 76 51 72 49 3
PA 60 140 12 20 6 2 1
PA 80 140 12 20 6 2 1
PA 40 140 12 20 6 2 1
RP 37 140 43 100 3
RP 77 140 83 100 3
RP 57 140 63 100 3
PA 60 46 36 36 28 0 1
PL 80 140 80 145 4
PL 80 145 80 195 4
PA 80 195 18 18 4 0
PA 40 330 12 12 4 2 1
PA 67 330 12 12 4 0 1
EV 6 378 102 282 3
TY 0 381 20 12 90 1 3 * +
PL 40 140 40 330 4
PL 60 295 65 305 4
PL 65 305 65 325 4
PA 40 205 18 18 4 0
PL 135 215 115 215 4
PL 120 215 110 215 4
PL 60 145 60 155 4
PL 60 155 60 300 4
PL 110 215 110 230 4
PL 110 230 60 230 4
PA 60 230 18 18 4 0
PL 130 195 150 195 4
PA 130 195 18 18 4 0
PL 170 205 170 195 4
PL 170 195 150 195 4
PA 170 195 12 12 4 2 1
PA 170 215 12 12 4 0 1
EV 150 185 190 225 3
TY 152 175 15 9 0 1 3 * +
TY 120 170 11 3 0 0 0 * ponticello
PL 15 180 30 180 4
PL 20 170 20 190 4
PL 20 180 10 180 4
PL 75 240 85 240 4
TY 50 75 11 3 0 0 0 * uA7805
PL 215 275 175 275 4
PL 175 275 175 355 4
PL 175 355 320 355 4
PL 175 255 150 255 4
PL 150 255 150 375 4
PL 150 375 320 375 4
PL 190 335 320 335 4
PL 190 295 190 335 4
PL 190 295 210 295 4
PA 325 315 18 18 4 0
PA 325 335 18 18 4 0
PA 325 355 18 18 4 0
PA 325 375 18 18 4 0
PL 250 205 170 205 4
PL 250 215 275 215 4
PL 250 205 250 215 4
PL 365 210 365 245 4
SA 365 245
PA 365 245 18 18 4 0
PL 365 285 365 295 4
PA 365 295 18 18 4 0
PA 365 375 12 12 4 0 1
RV 375 325 355 365 3
RP 367 315 363 325 3
RP 367 365 363 375 3
PA 365 315 12 12 4 0 1
PL 330 375 360 375 4
PL 365 305 365 310 4
LI 377 238 353 238 3
BE 377 238 393 251 383 274 365 274 3
BE 353 238 337 251 347 274 365 274 3
PA 365 245 12 12 4 2 1
PA 365 265 12 12 4 0 1
PL 365 285 365 270 4
TY 385 340 11 3 0 0 0 * 330ohm
TY 390 250 11 3 0 0 0 * Led

Codice: Seleziona tutto

program led_seq
' * Description:
'     Blinking of diodes connected on portb.
'     Diodes go on and off each second.
' * Test configuration:
'     MCU:             PIC16F84A
'     Oscillator:      HS, 4.000 MHz
'     Ext. Modules:    None
'     SW:              mikroBasic v5.0 or higher
' * NOTES:
'     None
' *)

main:
  TRISB = 0           ' configure pins of portb as output
  PORTB = %11111111   ' turn ON diodes on portb
  delay_ms(1000)      ' wait for 1 second
  PORTB = %00000000   ' turn OFF diodes on portb
  delay_ms(1000)      ' wait for 1 second
  goto main           ' endless loop
end.

Ciao
Antonio