31023

31023



crc

cnt, cntl, cnt2 ;liczniki

endc

orgO

goto start


;rejestr crc


start

banki

movlwb'00101000'    ;niewykorzystane linie procesora (GPO, GP1, GP4) =

wyjścia

movwftrisio    ;GP3 - zerowanie procesora przyciskiem

bankO


przygotowanie linii procesora

Bcf

out

; zeruj out

Bcf

dq

;0 -> dq

banki

;bank 1

Bsf

dq

;1 -> tris5

Bcf

out

;0 -> tris2

bankO

;bank 0

clrf State


program główny

loop    pętla główna

cali reset btfss pr_ok goto wait_ls movlw h'33’ cali sd_cmd cali read_frame

; cali podstaw do pamięci ram

cali test_crc


;sekwencja inicjalizacji ;sprawdz presence

;nie ma presence, czekaj 1 sek ;jest, wpisz do w kod rozkazu 33h - czytaj ROM ;wyslij rozkaz ;odczytaj dane

procedura testowa - zapis znanego nr seryjnego


;oblicz crc




Wyszukiwarka

Podobne podstrony:
Image146 Wyjścia Na rysunku 4.98 przedstawiono schemat ideowy układu licznika Johnsona mod. 16 zbudo
SP?194 f licznik doliczy do wartości podanej w rejestrze cst przerwanie obsługiwane przez funkcję ri
bsf tlcon, tmrlon ;jest zbocze +, zalacz licznik 1 ed_2 ;czeka na zbocze - na we_x btfsc we_x goto e
f1 10 j i w j Change Vendor: Inilial Screen Vendor Edit Goto Extras Erwironment System Help (S^l I
f1 25 E^jj Dictionary: Table/Structure: Display Fields 000 Table Edit Goto Extras Utilities Environ
f1 7 QChange Vendor: Initial Screen Vendor Edit Goto Extras Erwironment System Help P «l o ^ xl
f1 8 Change Vendor: Address Vendor Edit Goto Extras Erwironment System Help ✓ lii_Iw <5 <H&a
f1 9 m Change Vendor: Address Vendor Edit Goto Extras Erwironment System Help ✓ lii_Iw 4 <H&
f13 5 ABAP/4 Short Dump List Short dump Edit Goto System Help G^
f14 2 j no j Dictionary: Display Domain ZTXLIFNR Domain Edit Goto Extras Utilities System Helpnam
f15 1 B3 Sams Teach Yourself: Chapter 15. Listing 15.1 List Edit Goto System Help m HI j <f=
f15 2 E3 Sams Teach Yourself: Chapter 15. Listing 15.2 H0E List Edit Goto System Help fi HI iJ
f15 3 B3 Sams Teach Yourself: Chapter 15. Listing 15.3 List Edit Goto System Help m HI j <f=
f15 6 E3ABAP/4 Texl Elements: Change Tille and Headers Jext elements Edit Goto System Help &
f15 7 E3ABAP/4 Texl Elements: Change Tille and Headers Jext elements Edit Goto System Help

więcej podobnych podstron