Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- /*
- * Termometr0.asm
- *
- * Created: 2015-05-21 23:51:59
- * Author: D K K M P
- */
- ldi r16,0b11111111 //włączamy cały port do sterowania Dekoderami
- sts portc_dir,r16
- ldi r16,0b00001100 //ustawiamy ADC w rozdzielczosci 8bit oraz trybie FREEMODE
- sts adca_ctrlb,r16
- ldi r16,0b0010000 // zwiekszamy napiecie ADC na 1,6V
- sts adca_refctrl,r16
- ldi r16,0b00000001 // ustawiamy tryb bezposredni single-ended
- sts adca_ch0_ctrl,r16
- ldi r16,0b00001001
- sts adca_ch0_muxctrl,r16 // ustawiamy port z ktorego bedziemy kożystac/podłączony jest termistor
- ldi r16,0b00000001 //tryb ADC bez kalibracjii
- sts adca_ctrla,r16
- start:
- ldi r16,0b00000101
- sts adca_ctrla,r16 //pojedyncza konwersja
- sprawdzanie:
- lds r17,adca_ch0_res //pobieranie wyniku i przypisywanie go do rejesru R17
- cpi r17,0b11000011
- brsh _17_st
- cpi r17,0b10111011
- brsh _18_st
- cpi r17,0b10110101
- brsh _19_st
- cpi r17,0b10101110 // pętla porowwnojaca wartosci rejestru R17
- brsh _20_st
- cpi r17,0b10100111
- brsh _21_st
- cpi r17,0b10100001
- brsh _22_st
- cpi r17,0b10011011
- brsh _23_st
- cpi r17,0b10010101
- brsh _24_st
- cpi r17,0b10001111
- brsh _25_st
- cpi r17,0b10001010
- brsh _26_st
- cpi r17,0b10000100
- brsh _27_st
- cpi r17,0b10000000
- brsh _28_st
- cpi r17,0b01111011
- brsh _29_st
- jmp sprawdzanie
- _17_st:
- ldi r16,0b00010111
- sts portc_out,r16
- call delay
- _18_st:
- ldi r16,0b00011000
- sts portc_out,r16
- call delay
- /
- _19_st:
- ldi r16,0b00011001
- sts portc_out,r16
- call delay
- _20_st: //liczby w kodzie BCD do sterowania dekoderami
- ldi r16,0b00100000
- sts portc_out,r16
- call delay
- _21_st:
- ldi r16,0b00100001
- sts portc_out,r16
- call delay
- _22_st:
- ldi r16,0b00100010
- sts portc_out,r16
- call delay
- _23_st:
- ldi r16,0b00100011
- sts portc_out,r16
- call delay
- _24_st:
- ldi r16,0b00100100
- sts portc_out,r16
- call delay
- _25_st:
- ldi r16,0b00100101
- sts portc_out,r16
- call delay
- _26_st:
- ldi r16,0b00100110
- sts portc_out,r16
- call delay
- _27_st:
- ldi r16,0b00100111
- sts portc_out,r16
- call delay
- _28_st:
- ldi r16,0b00101000
- sts portc_out,r16
- call delay
- _29_st:
- ldi r16,0b00101001
- sts portc_out,r16
- call delay
- delay: // petla opoznien
- clr r20
- clr r21
- delay_loop1:
- delay_loop2:
- inc r21
- cpi r21,0b00111111
- brne delay_loop2
- clr r21
- inc r20
- cpi r20,0b00111111
- brne delay_loop1
- jmp start
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement