Туторијал за програмирање во MikroBasic (7 сегментен дисплеј)

[Devil]

Главна страна (дискусии, прашања)
http://elektronika-mk.net/index.php?topic=4291.msg39377#msg39377

шема


код

Code: [Select]

'******** Makedonski Forum za Elektronika *************
'******** http://elektronika-mk.net    *************
'************** Devil *******************
'*** PIC16F628A @ 4MHz, Razvoen sistem MFE_01, Simulator ISIS 7
'**** Tutorijal III, 7 segmentni displei

program segment

main:               'Od tuka nadolu zapocnuva glavnata programa
TRISB = 0           'Namesti porta B kako izlez
PORTB = 0           'Pocetna sostojba na porta  B e 0
Delay_ms(10)
'********* Od tuka nadolu e programata
'********* Broenje od 0 do 9, zgolemuvanje na brojot na sekoja 1sekunda *******
PORTB = $3F      'Kombinacija za 0
Delay_ms(1000)
PORTB = $06      'Kombinacija za 1
Delay_ms(1000)
PORTB = $5B      'Kombinacija za 2
Delay_ms(1000)
PORTB = $4F      'Kombinacija za 3
Delay_ms(1000)
PORTB = $66      'Kombinacija za 4
Delay_ms(1000)
PORTB = $6D      'Kombinacija za 5
Delay_ms(1000)
PORTB = $7D      'Kombinacija za 6
Delay_ms(1000)
PORTB = $07      'Kombinacija za 7
Delay_ms(1000)
PORTB = $7F      'Kombinacija za 8
Delay_ms(1000)
PORTB = $6F      'Kombinacija za 9
Delay_ms(990)
goto main        'Vrati se na pocetok
end.
Видео
7segment 1