S
sasuke_ninchan
Guest
Ahoj priateľovi
Vlastne aj veľmi nové pre tento PIC.Teraz chcem postaviť 1 projekt LED blikať.Tak toto je môj kód.Ale keď som ju program.LED nebude blikať.Ako?Prosím pomôžte.
Potom som tiež nerozuměl používať okamžite.Prosím pomôžte
Děkuji & zreteľom
Sasuke;======= 8PIN1.ASM =========================== 7/23/02 ==
list p = 12f675
__config h'3fc4 '
radix Hex
;------------------------------------------------- ---
; Cpu rovná (pamäť map)
Statut EQU 0x03
GPIO EQU 0x05
cmcon EQU 0x19
trisio EQU 0x85
osccal EQU 0x90
Ansel EQU 9f
;
d1 EQU 0x86
d2 EQU 0x87
d3 EQU 0x88
;------------------------------------------------- ---
; Bit zodpovedá
rp0 EQU 5
;------------------------------------------------- ---
org 0x000
;
start BSF stave, rp0; banky 1
call 3ffh; dostať OSCAL hodnoty
movwf osccal; zkalibrovat vnútorné hodiny oscilátor
BCF stave, rp0; bankový 0
movlw b'00000111 '; vypnúť komparátor
movwf cmcon
BSF stave, rp0; banky 1
clrf Ansel; vypnúť A / D
movlw b'00000000 '; vstupy
proti výstupu
movwf trisio
BCF stave, rp0; bankový 0
BCF GPIO, 0; výstup 0
BCF GPIO, 1; výstup 0
BCF GPIO, 2; výstup 0
BCF GPIO, 4; výstup 0
BCF GPIO, 5; výstup 0
; Pripravený btfsc GPIO, 3; test pripravený switch
; Goto pripravený, zatiaľ
BSF GPIO, 0; výstup 1
BSF GPIO, 1; výstup 0
BSF GPIO, 2; výstup 1
BSF GPIO, 4; výstup 0
BSF GPIO, 5, 1 výstup
; Kruhu goto kruh, udělal
;
; Oneskorenie
movlw b'00110010 '
movwf d3
movlw b'00110010 '
movwf d2
movlw b'00110010 '
movwf d1
decfsz d1
goto $ -1
decfsz d2
goto $ -5
decfsz d3
goto-9dolar
; Späť
;
BCF GPIO, 0
BCF GPIO, 1; výstup 0
BCF GPIO, 2; výstup 1
BCF GPIO, 4; výstup 0
BCF GPIO, 5
;
koniec
Vlastne aj veľmi nové pre tento PIC.Teraz chcem postaviť 1 projekt LED blikať.Tak toto je môj kód.Ale keď som ju program.LED nebude blikať.Ako?Prosím pomôžte.
Potom som tiež nerozuměl používať okamžite.Prosím pomôžte
Děkuji & zreteľom
Sasuke;======= 8PIN1.ASM =========================== 7/23/02 ==
list p = 12f675
__config h'3fc4 '
radix Hex
;------------------------------------------------- ---
; Cpu rovná (pamäť map)
Statut EQU 0x03
GPIO EQU 0x05
cmcon EQU 0x19
trisio EQU 0x85
osccal EQU 0x90
Ansel EQU 9f
;
d1 EQU 0x86
d2 EQU 0x87
d3 EQU 0x88
;------------------------------------------------- ---
; Bit zodpovedá
rp0 EQU 5
;------------------------------------------------- ---
org 0x000
;
start BSF stave, rp0; banky 1
call 3ffh; dostať OSCAL hodnoty
movwf osccal; zkalibrovat vnútorné hodiny oscilátor
BCF stave, rp0; bankový 0
movlw b'00000111 '; vypnúť komparátor
movwf cmcon
BSF stave, rp0; banky 1
clrf Ansel; vypnúť A / D
movlw b'00000000 '; vstupy
proti výstupu
movwf trisio
BCF stave, rp0; bankový 0
BCF GPIO, 0; výstup 0
BCF GPIO, 1; výstup 0
BCF GPIO, 2; výstup 0
BCF GPIO, 4; výstup 0
BCF GPIO, 5; výstup 0
; Pripravený btfsc GPIO, 3; test pripravený switch
; Goto pripravený, zatiaľ
BSF GPIO, 0; výstup 1
BSF GPIO, 1; výstup 0
BSF GPIO, 2; výstup 1
BSF GPIO, 4; výstup 0
BSF GPIO, 5, 1 výstup
; Kruhu goto kruh, udělal
;
; Oneskorenie
movlw b'00110010 '
movwf d3
movlw b'00110010 '
movwf d2
movlw b'00110010 '
movwf d1
decfsz d1
goto $ -1
decfsz d2
goto $ -5
decfsz d3
goto-9dolar
; Späť
;
BCF GPIO, 0
BCF GPIO, 1; výstup 0
BCF GPIO, 2; výstup 1
BCF GPIO, 4; výstup 0
BCF GPIO, 5
;
koniec