; Vysilac bezdratoveho teplomeru ATtiny13A / 13 / 13V ; verze s kontrolou paritnim bitem a inverzi ; CPU = 1,2 MHz (9,6/8) ; DANYK ; http://danyk.cz/avr_btep.html .NOLIST .INCLUDE "tn13def.inc" .LIST .DEF POS3=R13 ;posuvne .DEF POS1=R14 ;posuvne .DEF POS2=R15 ;posuvne .DEF REG=R16 ;pracovni registr .DEF REG2=R17 ;pracovni registr 2 .DEF CYKLY=R18 ;pocitadlo vysilacich cyklu .DEF BITY=R19 ;pocitadlo odeslanych bitu .DEF SOUCETL=R20 .DEF SOUCETH=R21 .DEF PRUMREG=R22 .DEF SPUSTENI=R23 .DEF DATA1=R24 ;data .DEF DATA2=R25 ;data .DEF DATA3=R26 ;data .EQU SMER=DDRB ;smer portu .EQU PORT=PORTB ;port .EQU PINY=PINB ;vstupy .CSEG ;kodovy segment .ORG 0 RJMP START .ORG PCI0addr ;preruseni testovacim tlacitkem RJMP TLACITKA .ORG WDTaddr ;preruseni psem RJMP CASOVANI .ORG ADCCaddr ;preruseni pri dokonceni AD konverze RJMP HOTOVO START: LDI REG,LOW(RAMEND) OUT SPL,REG ;nastavi portB LDI REG,0b00100 OUT SMER,REG LDI REG,0b00011 OUT PORT,REG CLR SOUCETL CLR SOUCETH LDI PRUMREG,38 CLR SPUSTENI LDI REG,0b00100000 ; povoli preruseni PCINT OUT GIMSK,REG ; LDI REG,0b00000011 ; ktere vstupy maji PCINT - testovaci tlac. OUT PCMSK,REG ; ;NASTAVENI ADC LDI REG,0b01000010 ; int. ref, zarovna vpravo, zvoli vstup ADC2 OUT ADMUX,REG ; ;vypne analog. komparator - neni nikdy vyuzit (setri energii) LDI REG,0b10000000 OUT ACSR,REG ;vypne digitalni vstup u ADC2 LDI REG,0b00010000 OUT DIDR0,REG WDR LDI REG, (1<