单片机电感电容表程序.docVIP

单片机电感电容表程序 ;Stazeno z www.HW.cz ; Autorem tohoto SW je Jiri Recek - j_recek@del.cz ; uprava proti nedokonalemu nulovani s indikaci OK2TEJ ; Program pro LC meter kurzof equ 0Ch ; Prikaz pro displej CAL bit P1.4 CX bit P1.3 OSCOUT bit P3.5 LCD_E bit P3.4 LCD_RS bit P1.2 D4_R1 bit P3.3 D5_R2 bit P3.2 D6_R3 bit P3.1 D7_R4 bit P3.0 citca data 14 ; d靗en?kmito鑤u pro 鑑sova鑕 citc1s data 15 ; deleni pro 1Hz MeziVysledek1 data 18 ; 6 byt? ; 19..23 MeziVysledek2 data 24 ; 6 byt? ; 25..29 ; Bitov?oblast Sign bit 3 ; Znam韓ko nulovano bit 4 ; priznak OK nulovani zmereno bit 6 ; frekvence p鴈鑤ena zkalibrovano bit 7 RozCas data 39 ; roz?眸?n?鑑sova鑕 frekvb data 40 ; 3byty zm禅en?frekvence M1real data 44 ; meziv齭ledek pro v齪o鑤y M2real data 48 ; meziv齭ledek pro v齪o鑤y M3real data 52 ; meziv齭ledek pro v齪o鑤y F2real data 56 ; frekvence po zm禅en? ; Kalibra鑞?konstanty: F1real data 60 ; frekvence napr醶dno C2real data 64 ; kapacita kalibra鑞韍o kondenz醫oru C1real data 72 ; kapacita kondenz醫oru C1 L1real data 76 ; Induk鑞ost c韛ky L1 kalnum data 80 ; pocet pruchodu pri kalibraci (1. neni pouzitelny) ; *********** za栳tek programu ; Reset org 0h AJMP start ; P鴈ru?en?od 鑑sova鑕 0 org 0Bh ajmp intt0 ; P鴈ru?en?od 鑑sova鑕 1 org 1Bh inc RozCas reti org 30h start: CLR EA MOV SP,#88 acall init ; inicializace po zapnut? ; ***** Za栳tek cyklu ; program b??st醠e dokola. cykl: ; zapamatovat frekvenci kalibra鑞? ; pokud je stisknuto tla桧tko S2 mov c,CAL ; tla桧tko S2 cpl c anl c,/zkalibrovano ; Pouze jednou v okam?iku sepnut? jnc cykl03 clr nulovano mov kalnum,#0 mov r0,#F2real ; Zkop韗ovat hodnotu mov r1,#F1real acall movreal cykl03: mov c,CAL cpl c orl c,zkalibrovano mov zkalibrovano,c ; zapamatovat stav tla桧tka ; Bit韐 je nahozen v programu p鴈ru?en? ; po zm禅en?frekvence. jnb zmereno,cykl01 acall frekvence ; p鴈vod frekvence do F2real jb CAL,cykl02 acall kalibrace ; V齪o鑕t kalibra鑞韈h hodnot mov a,kalnum jz cykl04 setb n