PWM_PA0-Uvergl.-Einfach-15.2.12.asm


1
;ausgangsspannungsregelung nach stepdown
2
;pwm an atmega16 für 3,906 khz
3
;bei 4mhz taktfrequenz
4
;mit timer0 im fast pwm mode, 8 bit aufloesung
5
;pwm-signal liegt auf pb3 oc0
6
;adc takt mittels OVF1addr
7
;14.2.12
8
.include "m16def.inc"
9
10
.def v_panel = r14    ;Messwert PV-Spannung PA0
11
.def v_akku = r12    ;Messwert Akku-Spannung PA1
12
.def i_panel = r10    ;Messwert PV-Strom PA2 
13
.def temp1 = r16    ;temporäre Variable
14
.def temp2 = r17    ;Zähler
15
;.def wait2 = r18    ;Zähler
16
.def v_akkupwm = r19  ;ermittellter Vorladewert ocr0 für 13.4v
17
.def v_store = r20    ;gespeicherte Wunschspannung am PWM-Ausgang
18
19
20
21
.org  0x000     
22
  rjmp RESET    ;External Pin, Power-on Reset, Brown-out
23
.org  INT0addr    
24
  reti      ;External Interrupt Request 0
25
.org  INT1    
26
  reti        ;External Interrupt Request 1
27
.org  OC2addr  
28
  reti        ;Timer/Counter2 Compare Match
29
.org  OVF2addr  
30
  reti        ;Timer/Counter2 Overflow
31
.org  ICP1addr  
32
  reti         ;Timer/Counter1 Capture Event
33
.org  OC1Aaddr  
34
  reti         ;Timer/Counter1 Compare Match A
35
.org  OC1Baddr  
36
  reti         ;Timer/Counter1 Compare Match B
37
.org  OVF1addr  
38
  reti        ;TIMER1 OVF ;Timer/Counter1 Overflow  
39
.org  OVF0addr     
40
  reti       ;Timer/Counter0 Overflow  
41
.org  SPIaddr    
42
  reti        ;Serial Transfer Complete
43
.org  URXCaddr  
44
  reti         ;USART, Rx Complete
45
.org  UDREaddr  
46
  reti       ;USART Data Register Empty
47
.org  UTXCaddr  
48
  reti         ;USART, Tx Complete
49
.org  ADCCaddr      
50
  reti       ;ADC Conversion Complete  
51
.org  ERDYaddr    
52
  reti        ;EEPROM Ready
53
.org  ACIaddr  
54
  reti        ;Analog Comparator
55
.org  TWIaddr  
56
  reti         ;Two-wire Serial Interface
57
.org  INT2addr    
58
  reti        ;External Interrupt Request 2
59
.org  OC0addr  
60
  reti        ;Timer/Counter0 Compare Match
61
.org  SPMRaddr    
62
  reti         ;Store Program Memory Ready
63
64
.org 0x30             ;programm ab flashadresse 30h speichern
65
66
;=============== stackpointer ini ===========================
67
reset:
68
  
69
      ldi temp1, high (RAMEND)
70
      out SPH, temp1  ;SPH am Ende phys. SRAM
71
      ldi temp1, low (RAMEND)
72
      out SPL, temp1  ;SPL am Ende phys. SRAM  
73
      ldi temp1,0b11111000  
74
      out DDRA, temp1    ;pa0-2 analoge eingaenge
75
      ldi temp1,0b11111111   
76
      out DDRD, temp1    ;pd2-7 ausgabe
77
      ldi temp1, 0b11111111      
78
      out DDRC, temp1    ;pc0-7 ausgabe
79
      ldi temp1, 0b00001111
80
      out DDRb, temp1    ;pb0-3 ausgabe
81
      
82
      ;ldi r21, 50  ;verstärkungsfaktor fuer ad ergebniss
83
      ldi v_store,139  ;max.ladespannung rechner.139
84
      rcall timer0ini ;Timer 0  initialisieren
85
      rcall adini     ;A-D Wandler AD0 initialisieren
86
      
87
      sei        ;Interrupts global aktivieren?????????
88
;============== hauptprogramm ====================================
89
main:  
90
    rcall adwand
91
    rcall auswahl
92
    rcall warte
93
94
95
jmp main
96
;============== auswahl+pwm ausgabe ====================================
97
auswahl:
98
       mov v_akkupwm, v_akku
99
      cp v_store, v_akku  ;vergleiche gespeicherte mit gemessener
100
      brsh up      ;akkuspannung, wähle aus ob höher oder niedriger
101
      brlo down    ;und springe zu up oder down
102
      
103
down:      
104
      dec v_akkupwm      ;akkuspannung zu hoch, zaehle runter  ;
105
      jmp sichern      ;sprung zum sichern/ausgabe ocr0
106
      
107
up:      
108
      inc v_akkupwm    ;akkuspannung zu niedrig, zaehle hoch
109
      
110
      jmp sichern      ;sprung zum sichern/ausgabe ocr0
111
      
112
sichern:
113
        
114
      
115
      sts vakkupwm, v_akkupwm     ;wert im sram gesichert, fuer spaeter
116
      ;mul r19,r21        ;ergebnis mit r20 verstaerken
117
      ;mov r19, r0        ;und in r19 verschieben
118
      out ocr0, v_akkupwm      ;als vorladewert nach ocr0
119
      
120
      ;out ocr0,r19     ;und ins vorladeregister von tc0 gespeichert
121
                  ; lt. simulation klappt das nicht, ich weis
122
ret                  ;mir keinen rat warum???  
123
      
124
;======================== timer0ini =====================    
125
timer0ini:
126
  
127
  in temp1, tccr0
128
  ori temp1, 0b01101010    ;tccr0, fast pwm, prescaler 8, lösche oc0 bei gleichstand
129
  out  tccr0, temp1
130
  in temp1, timsk
131
  ori temp1, 0b00000000
132
  out timsk, temp1      ;ohne irq
133
134
  ;ldi temp1, 28      ; vorladewert
135
  out ocr0, v_store      ;pwm
136
    
137
  ret
138
;====================== ad-wandler ini =================
139
adini:  
140
    
141
    ldi  temp1,(1<<ADEN)|(1<<ADPS2)|(1<<ADPS1)  
142
    out  ADCSRA,temp1         ;adcen,
143
        ldi temp1,(1<<REFS0)|(1<<ADLAR)  ;AVcc,linksbuendig,pa0
144
      out ADMUX,temp1
145
ret
146
;======================== adwandlung pa0 ==================
147
adwand:
148
;pa0     
149
      
150
      
151
      sbi  ADCSRA,ADSC    ;Wandlung pa0 starten    
152
fertig:      
153
      sbic ADCSRA,ADSC      ;warten bis wandlung
154
        rjmp fertig        ;beendet    
155
156
      in v_akku, ADCH    ;highbyte auslesen
157
158
ret
159
;================== warte 5ms ===================
160
warte:
161
162
                                 
163
           ldi  temp1, $21
164
WGLOOP0:   ldi  temp2, $C9
165
WGLOOP1:   dec  temp2        ; 5ms Pause (bei 4 MHz)
166
           brne WGLOOP1
167
           dec  temp1
168
           brne WGLOOP0
169
           ret            
170
171
;=============== sram ==============
172
.DSEG                       ; das Folgende kommt ins SRAM
173
 
174
vakkupwm: .BYTE   1                   ; wert v_akkupwm im sram