at90pwm1.pp 24 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345346347348349350351352353354355356357358359360361362363364365366367368369370371372373374375376377378379380381382383384385386387388389390391392393394395396397398399400401402403404405406407408409410411412413414415416417418419420421422423424425426427428429430431432433434435436437438439440441442443444445446447448449450451452453454455456457458459460461462463464465466467468469470471472473474475476477478479480481482483484485486487488489490491492493494495496497498499500501502503504505506507508509510511512513514515516517518519520521522523524525526527528529530531532533534535536537538539540541542543544545546547548549550551552553554555556557558559560561562563564565566567568569570571572573574575576577578579580581582583584585586587588589590591592
  1. unit AT90PWM1;
  2. {$goto on}
  3. interface
  4. var
  5. // PORTB
  6. PORTB : byte absolute $00+$25; // Port B Data Register
  7. DDRB : byte absolute $00+$24; // Port B Data Direction Register
  8. PINB : byte absolute $00+$23; // Port B Input Pins
  9. // PORTD
  10. PORTD : byte absolute $00+$2B; // Port D Data Register
  11. DDRD : byte absolute $00+$2A; // Port D Data Direction Register
  12. PIND : byte absolute $00+$29; // Port D Input Pins
  13. // BOOT_LOAD
  14. SPMCSR : byte absolute $00+$57; // Store Program Memory Control Register
  15. // PSC0
  16. PICR0 : word absolute $00+$DE; // PSC 0 Input Capture Register
  17. PICR0L : byte absolute $00+$DE; // PSC 0 Input Capture Register
  18. PICR0H : byte absolute $00+$DE+1; // PSC 0 Input Capture Register
  19. PFRC0B : byte absolute $00+$DD; // PSC 0 Input B Control
  20. PFRC0A : byte absolute $00+$DC; // PSC 0 Input A Control
  21. PCTL0 : byte absolute $00+$DB; // PSC 0 Control Register
  22. PCNF0 : byte absolute $00+$DA; // PSC 0 Configuration Register
  23. OCR0RB : word absolute $00+$D8; // Output Compare RB Register
  24. OCR0RBL : byte absolute $00+$D8; // Output Compare RB Register
  25. OCR0RBH : byte absolute $00+$D8+1; // Output Compare RB Register
  26. OCR0SB : word absolute $00+$D6; // Output Compare SB Register
  27. OCR0SBL : byte absolute $00+$D6; // Output Compare SB Register
  28. OCR0SBH : byte absolute $00+$D6+1; // Output Compare SB Register
  29. OCR0RA : word absolute $00+$D4; // Output Compare RA Register
  30. OCR0RAL : byte absolute $00+$D4; // Output Compare RA Register
  31. OCR0RAH : byte absolute $00+$D4+1; // Output Compare RA Register
  32. OCR0SA : word absolute $00+$D2; // Output Compare SA Register
  33. OCR0SAL : byte absolute $00+$D2; // Output Compare SA Register
  34. OCR0SAH : byte absolute $00+$D2+1; // Output Compare SA Register
  35. PSOC0 : byte absolute $00+$D0; // PSC0 Synchro and Output Configuration
  36. PIM0 : byte absolute $00+$A1; // PSC0 Interrupt Mask Register
  37. PIFR0 : byte absolute $00+$A0; // PSC0 Interrupt Flag Register
  38. // PSC2
  39. PICR2 : word absolute $00+$FE; // PSC 2 Input Capture Register
  40. PICR2L : byte absolute $00+$FE; // PSC 2 Input Capture Register
  41. PICR2H : byte absolute $00+$FE+1; // PSC 2 Input Capture Register
  42. PFRC2B : byte absolute $00+$FD; // PSC 2 Input B Control
  43. PFRC2A : byte absolute $00+$FC; // PSC 2 Input B Control
  44. PCTL2 : byte absolute $00+$FB; // PSC 2 Control Register
  45. PCNF2 : byte absolute $00+$FA; // PSC 2 Configuration Register
  46. OCR2RB : word absolute $00+$F8; // Output Compare RB Register
  47. OCR2RBL : byte absolute $00+$F8; // Output Compare RB Register
  48. OCR2RBH : byte absolute $00+$F8+1; // Output Compare RB Register
  49. OCR2SB : word absolute $00+$F6; // Output Compare SB Register
  50. OCR2SBL : byte absolute $00+$F6; // Output Compare SB Register
  51. OCR2SBH : byte absolute $00+$F6+1; // Output Compare SB Register
  52. OCR2RA : word absolute $00+$F4; // Output Compare RA Register
  53. OCR2RAL : byte absolute $00+$F4; // Output Compare RA Register
  54. OCR2RAH : byte absolute $00+$F4+1; // Output Compare RA Register
  55. OCR2SA : word absolute $00+$F2; // Output Compare SA Register
  56. OCR2SAL : byte absolute $00+$F2; // Output Compare SA Register
  57. OCR2SAH : byte absolute $00+$F2+1; // Output Compare SA Register
  58. POM2 : byte absolute $00+$F1; // PSC 2 Output Matrix
  59. PSOC2 : byte absolute $00+$F0; // PSC2 Synchro and Output Configuration
  60. PIM2 : byte absolute $00+$A5; // PSC2 Interrupt Mask Register
  61. PIFR2 : byte absolute $00+$A4; // PSC2 Interrupt Flag Register
  62. // CPU
  63. SREG : byte absolute $00+$5F; // Status Register
  64. SP : word absolute $00+$5D; // Stack Pointer
  65. SPL : byte absolute $00+$5D; // Stack Pointer
  66. SPH : byte absolute $00+$5D+1; // Stack Pointer
  67. MCUCR : byte absolute $00+$55; // MCU Control Register
  68. MCUSR : byte absolute $00+$54; // MCU Status Register
  69. OSCCAL : byte absolute $00+$66; // Oscillator Calibration Value
  70. CLKPR : byte absolute $00+$61; //
  71. SMCR : byte absolute $00+$53; // Sleep Mode Control Register
  72. GPIOR3 : byte absolute $00+$3B; // General Purpose IO Register 3
  73. GPIOR2 : byte absolute $00+$3A; // General Purpose IO Register 2
  74. GPIOR1 : byte absolute $00+$39; // General Purpose IO Register 1
  75. GPIOR0 : byte absolute $00+$3E; // General Purpose IO Register 0
  76. PLLCSR : byte absolute $00+$49; // PLL Control And Status Register
  77. PRR : byte absolute $00+$64; // Power Reduction Register
  78. // PORTE
  79. PORTE : byte absolute $00+$2E; // Port E Data Register
  80. DDRE : byte absolute $00+$2D; // Port E Data Direction Register
  81. PINE : byte absolute $00+$2C; // Port E Input Pins
  82. // TIMER_COUNTER_0
  83. TIMSK0 : byte absolute $00+$6E; // Timer/Counter0 Interrupt Mask Register
  84. TIFR0 : byte absolute $00+$35; // Timer/Counter0 Interrupt Flag register
  85. TCCR0A : byte absolute $00+$44; // Timer/Counter Control Register A
  86. TCCR0B : byte absolute $00+$45; // Timer/Counter Control Register B
  87. TCNT0 : byte absolute $00+$46; // Timer/Counter0
  88. OCR0A : byte absolute $00+$47; // Timer/Counter0 Output Compare Register
  89. OCR0B : byte absolute $00+$48; // Timer/Counter0 Output Compare Register
  90. GTCCR : byte absolute $00+$43; // General Timer/Counter Control Register
  91. // TIMER_COUNTER_1
  92. TIMSK1 : byte absolute $00+$6F; // Timer/Counter Interrupt Mask Register
  93. TIFR1 : byte absolute $00+$36; // Timer/Counter Interrupt Flag register
  94. TCCR1A : byte absolute $00+$80; // Timer/Counter1 Control Register A
  95. TCCR1B : byte absolute $00+$81; // Timer/Counter1 Control Register B
  96. TCCR1C : byte absolute $00+$82; // Timer/Counter1 Control Register C
  97. TCNT1 : word absolute $00+$84; // Timer/Counter1 Bytes
  98. TCNT1L : byte absolute $00+$84; // Timer/Counter1 Bytes
  99. TCNT1H : byte absolute $00+$84+1; // Timer/Counter1 Bytes
  100. OCR1A : word absolute $00+$88; // Timer/Counter1 Output Compare Register Bytes
  101. OCR1AL : byte absolute $00+$88; // Timer/Counter1 Output Compare Register Bytes
  102. OCR1AH : byte absolute $00+$88+1; // Timer/Counter1 Output Compare Register Bytes
  103. OCR1B : word absolute $00+$8A; // Timer/Counter1 Output Compare Register Bytes
  104. OCR1BL : byte absolute $00+$8A; // Timer/Counter1 Output Compare Register Bytes
  105. OCR1BH : byte absolute $00+$8A+1; // Timer/Counter1 Output Compare Register Bytes
  106. ICR1 : word absolute $00+$86; // Timer/Counter1 Input Capture Register Bytes
  107. ICR1L : byte absolute $00+$86; // Timer/Counter1 Input Capture Register Bytes
  108. ICR1H : byte absolute $00+$86+1; // Timer/Counter1 Input Capture Register Bytes
  109. // AD_CONVERTER
  110. ADMUX : byte absolute $00+$7C; // The ADC multiplexer Selection Register
  111. ADCSRA : byte absolute $00+$7A; // The ADC Control and Status register
  112. ADC : word absolute $00+$78; // ADC Data Register Bytes
  113. ADCL : byte absolute $00+$78; // ADC Data Register Bytes
  114. ADCH : byte absolute $00+$78+1; // ADC Data Register Bytes
  115. ADCSRB : byte absolute $00+$7B; // ADC Control and Status Register B
  116. DIDR0 : byte absolute $00+$7E; // Digital Input Disable Register 0
  117. DIDR1 : byte absolute $00+$7F; // Digital Input Disable Register 0
  118. AMP0CSR : byte absolute $00+$76; //
  119. AMP1CSR : byte absolute $00+$77; //
  120. // SPI
  121. SPCR : byte absolute $00+$4C; // SPI Control Register
  122. SPSR : byte absolute $00+$4D; // SPI Status Register
  123. SPDR : byte absolute $00+$4E; // SPI Data Register
  124. // WATCHDOG
  125. WDTCSR : byte absolute $00+$60; // Watchdog Timer Control Register
  126. // EXTERNAL_INTERRUPT
  127. EICRA : byte absolute $00+$69; // External Interrupt Control Register A
  128. EIMSK : byte absolute $00+$3D; // External Interrupt Mask Register
  129. EIFR : byte absolute $00+$3C; // External Interrupt Flag Register
  130. // EEPROM
  131. EEAR : word absolute $00+$41; // EEPROM Read/Write Access Bytes
  132. EEARL : byte absolute $00+$41; // EEPROM Read/Write Access Bytes
  133. EEARH : byte absolute $00+$41+1; // EEPROM Read/Write Access Bytes
  134. EEDR : byte absolute $00+$40; // EEPROM Data Register
  135. EECR : byte absolute $00+$3F; // EEPROM Control Register
  136. // ANALOG_COMPARATOR
  137. AC0CON : byte absolute $00+$AD; // Analog Comparator 0 Control Register
  138. AC2CON : byte absolute $00+$AF; // Analog Comparator 2 Control Register
  139. ACSR : byte absolute $00+$50; // Analog Comparator Status Register
  140. // PSC1
  141. PICR1 : word absolute $00+$EE; // PSC 1 Input Capture Register
  142. PICR1L : byte absolute $00+$EE; // PSC 1 Input Capture Register
  143. PICR1H : byte absolute $00+$EE+1; // PSC 1 Input Capture Register
  144. PFRC1B : byte absolute $00+$ED; // PSC 1 Input B Control
  145. PFRC1A : byte absolute $00+$EC; // PSC 1 Input B Control
  146. PCTL1 : byte absolute $00+$EB; // PSC 1 Control Register
  147. PSOC1 : byte absolute $00+$E0; // PSC1 Synchro and Output Configuration
  148. const
  149. // SPMCSR
  150. SPMIE = 7; // SPM Interrupt Enable
  151. RWWSB = 6; // Read While Write Section Busy
  152. RWWSRE = 4; // Read While Write section read enable
  153. BLBSET = 3; // Boot Lock Bit Set
  154. PGWRT = 2; // Page Write
  155. PGERS = 1; // Page Erase
  156. SPMEN = 0; // Store Program Memory Enable
  157. // PFRC0B
  158. PCAE0B = 7; // PSC 0 Capture Enable Input Part B
  159. PISEL0B = 6; // PSC 0 Input Select for Part B
  160. PELEV0B = 5; // PSC 0 Edge Level Selector on Input Part B
  161. PFLTE0B = 4; // PSC 0 Filter Enable on Input Part B
  162. PRFM0B = 0; // PSC 0 Retrigger and Fault Mode for Part B
  163. // PFRC0A
  164. PCAE0A = 7; // PSC 0 Capture Enable Input Part A
  165. PISEL0A = 6; // PSC 0 Input Select for Part A
  166. PELEV0A = 5; // PSC 0 Edge Level Selector on Input Part A
  167. PFLTE0A = 4; // PSC 0 Filter Enable on Input Part A
  168. PRFM0A = 0; // PSC 0 Retrigger and Fault Mode for Part A
  169. // PCTL0
  170. PPRE0 = 6; // PSC 0 Prescaler Selects
  171. PBFM0 = 5; // PSC 0 Balance Flank Width Modulation
  172. PAOC0B = 4; // PSC 0 Asynchronous Output Control B
  173. PAOC0A = 3; // PSC 0 Asynchronous Output Control A
  174. PARUN0 = 2; // PSC0 Auto Run
  175. PCCYC0 = 1; // PSC0 Complete Cycle
  176. PRUN0 = 0; // PSC 0 Run
  177. // PCNF0
  178. PFIFTY0 = 7; // PSC 0 Fifty
  179. PALOCK0 = 6; // PSC 0 Autolock
  180. PLOCK0 = 5; // PSC 0 Lock
  181. PMODE0 = 3; // PSC 0 Mode
  182. POP0 = 2; // PSC 0 Output Polarity
  183. PCLKSEL0 = 1; // PSC 0 Input Clock Select
  184. // PSOC0
  185. PSYNC0 = 4; // Synchronization Out for ADC Selection
  186. POEN0B = 2; // PSCOUT01 Output Enable
  187. POEN0A = 0; // PSCOUT00 Output Enable
  188. // PIM0
  189. PSEIE0 = 5; // PSC 0 Synchro Error Interrupt Enable
  190. PEVE0B = 4; // External Event B Interrupt Enable
  191. PEVE0A = 3; // External Event A Interrupt Enable
  192. PEOPE0 = 0; // End of Cycle Interrupt Enable
  193. // PIFR0
  194. PSEI0 = 5; // PSC 0 Synchro Error Interrupt
  195. PEV0B = 4; // External Event B Interrupt
  196. PEV0A = 3; // External Event A Interrupt
  197. PRN0 = 1; // Ramp Number
  198. PEOP0 = 0; // End of PSC0 Interrupt
  199. // PFRC2B
  200. PCAE2B = 7; // PSC 2 Capture Enable Input Part B
  201. PISEL2B = 6; // PSC 2 Input Select for Part B
  202. PELEV2B = 5; // PSC 2 Edge Level Selector on Input Part B
  203. PFLTE2B = 4; // PSC 2 Filter Enable on Input Part B
  204. PRFM2B = 0; // PSC 2 Retrigger and Fault Mode for Part B
  205. // PFRC2A
  206. PCAE2A = 7; // PSC 2 Capture Enable Input Part A
  207. PISEL2A = 6; // PSC 2 Input Select for Part A
  208. PELEV2A = 5; // PSC 2 Edge Level Selector on Input Part A
  209. PFLTE2A = 4; // PSC 2 Filter Enable on Input Part A
  210. PRFM2A = 0; // PSC 2 Retrigger and Fault Mode for Part A
  211. // PCTL2
  212. PPRE2 = 6; // PSC 2 Prescaler Selects
  213. PBFM2 = 5; // Balance Flank Width Modulation
  214. PAOC2B = 4; // PSC 2 Asynchronous Output Control B
  215. PAOC2A = 3; // PSC 2 Asynchronous Output Control A
  216. PARUN2 = 2; // PSC2 Auto Run
  217. PCCYC2 = 1; // PSC2 Complete Cycle
  218. PRUN2 = 0; // PSC 2 Run
  219. // PCNF2
  220. PFIFTY2 = 7; // PSC 2 Fifty
  221. PALOCK2 = 6; // PSC 2 Autolock
  222. PLOCK2 = 5; // PSC 2 Lock
  223. PMODE2 = 3; // PSC 2 Mode
  224. POP2 = 2; // PSC 2 Output Polarity
  225. PCLKSEL2 = 1; // PSC 2 Input Clock Select
  226. POME2 = 0; // PSC 2 Output Matrix Enable
  227. // POM2
  228. POMV2B = 4; // Output Matrix Output B Ramps
  229. POMV2A = 0; // Output Matrix Output A Ramps
  230. // PSOC2
  231. POS2 = 6; // PSC 2 Output 23 Select
  232. PSYNC2_ = 4; // Synchronization Out for ADC Selection
  233. POEN2D = 3; // PSCOUT23 Output Enable
  234. POEN2B = 2; // PSCOUT21 Output Enable
  235. POEN2C = 1; // PSCOUT22 Output Enable
  236. POEN2A = 0; // PSCOUT20 Output Enable
  237. // PIM2
  238. PSEIE2 = 5; // PSC 2 Synchro Error Interrupt Enable
  239. PEVE2B = 4; // External Event B Interrupt Enable
  240. PEVE2A = 3; // External Event A Interrupt Enable
  241. PEOPE2 = 0; // End of Cycle Interrupt Enable
  242. // PIFR2
  243. PSEI2 = 5; // PSC 2 Synchro Error Interrupt
  244. PEV2B = 4; // External Event B Interrupt
  245. PEV2A = 3; // External Event A Interrupt
  246. PRN2 = 1; // Ramp Number
  247. PEOP2 = 0; // End of PSC2 Interrupt
  248. // SREG
  249. I = 7; // Global Interrupt Enable
  250. T = 6; // Bit Copy Storage
  251. H = 5; // Half Carry Flag
  252. S = 4; // Sign Bit
  253. V = 3; // Two's Complement Overflow Flag
  254. N = 2; // Negative Flag
  255. Z = 1; // Zero Flag
  256. C = 0; // Carry Flag
  257. // MCUCR
  258. SPIPS = 7; // SPI Pin Select
  259. PUD = 4; // Pull-up disable
  260. IVSEL = 1; // Interrupt Vector Select
  261. IVCE = 0; // Interrupt Vector Change Enable
  262. // MCUSR
  263. WDRF = 3; // Watchdog Reset Flag
  264. BORF = 2; // Brown-out Reset Flag
  265. EXTRF = 1; // External Reset Flag
  266. PORF = 0; // Power-on reset flag
  267. // CLKPR
  268. CLKPCE = 7; //
  269. CLKPS = 0; //
  270. // SMCR
  271. SM = 1; // Sleep Mode Select bits
  272. SE = 0; // Sleep Enable
  273. // GPIOR3
  274. GPIOR = 0; // General Purpose IO Register 3 bis
  275. // GPIOR2
  276. // GPIOR1
  277. // GPIOR0
  278. GPIOR07 = 7; // General Purpose IO Register 0 bit 7
  279. GPIOR06 = 6; // General Purpose IO Register 0 bit 6
  280. GPIOR05 = 5; // General Purpose IO Register 0 bit 5
  281. GPIOR04 = 4; // General Purpose IO Register 0 bit 4
  282. GPIOR03 = 3; // General Purpose IO Register 0 bit 3
  283. GPIOR02 = 2; // General Purpose IO Register 0 bit 2
  284. GPIOR01 = 1; // General Purpose IO Register 0 bit 1
  285. GPIOR00 = 0; // General Purpose IO Register 0 bit 0
  286. // PLLCSR
  287. PLLF = 2; // PLL Factor
  288. PLLE = 1; // PLL Enable
  289. PLOCK = 0; // PLL Lock Detector
  290. // PRR
  291. PRPSC = 5; // Power Reduction PSC2
  292. PRTIM1 = 4; // Power Reduction Timer/Counter1
  293. PRTIM0 = 3; // Power Reduction Timer/Counter0
  294. PRSPI = 2; // Power Reduction Serial Peripheral Interface
  295. PRUSART0 = 1; // Power Reduction USART
  296. PRADC = 0; // Power Reduction ADC
  297. // TIMSK0
  298. OCIE0B = 2; // Timer/Counter0 Output Compare Match B Interrupt Enable
  299. OCIE0A = 1; // Timer/Counter0 Output Compare Match A Interrupt Enable
  300. TOIE0 = 0; // Timer/Counter0 Overflow Interrupt Enable
  301. // TIFR0
  302. OCF0B = 2; // Timer/Counter0 Output Compare Flag 0B
  303. OCF0A = 1; // Timer/Counter0 Output Compare Flag 0A
  304. TOV0 = 0; // Timer/Counter0 Overflow Flag
  305. // TCCR0A
  306. COM0A = 6; // Compare Output Mode, Phase Correct PWM Mode
  307. COM0B = 4; // Compare Output Mode, Fast PWm
  308. WGM0 = 0; // Waveform Generation Mode
  309. // TCCR0B
  310. FOC0A = 7; // Force Output Compare A
  311. FOC0B = 6; // Force Output Compare B
  312. WGM02 = 3; //
  313. CS0 = 0; // Clock Select
  314. // GTCCR
  315. TSM = 7; // Timer/Counter Synchronization Mode
  316. ICPSEL1 = 6; // Timer1 Input Capture Selection Bit
  317. PSR10 = 0; // Prescaler Reset Timer/Counter1 and Timer/Counter0
  318. // TIMSK1
  319. ICIE1 = 5; // Timer/Counter1 Input Capture Interrupt Enable
  320. OCIE1B = 2; // Timer/Counter1 Output CompareB Match Interrupt Enable
  321. OCIE1A = 1; // Timer/Counter1 Output CompareA Match Interrupt Enable
  322. TOIE1 = 0; // Timer/Counter1 Overflow Interrupt Enable
  323. // TIFR1
  324. ICF1 = 5; // Input Capture Flag 1
  325. OCF1B = 2; // Output Compare Flag 1B
  326. OCF1A = 1; // Output Compare Flag 1A
  327. TOV1 = 0; // Timer/Counter1 Overflow Flag
  328. // TCCR1A
  329. COM1A = 6; // Compare Output Mode 1A, bits
  330. COM1B = 4; // Compare Output Mode 1B, bits
  331. WGM1 = 0; // Waveform Generation Mode
  332. // TCCR1B
  333. ICNC1 = 7; // Input Capture 1 Noise Canceler
  334. ICES1 = 6; // Input Capture 1 Edge Select
  335. CS1 = 0; // Prescaler source of Timer/Counter 1
  336. // TCCR1C
  337. FOC1A = 7; //
  338. FOC1B = 6; //
  339. // GTCCR
  340. PSRSYNC = 0; // Prescaler Reset Timer/Counter1 and Timer/Counter0
  341. // ADMUX
  342. REFS = 6; // Reference Selection Bits
  343. ADLAR = 5; // Left Adjust Result
  344. MUX = 0; // Analog Channel and Gain Selection Bits
  345. // ADCSRA
  346. ADEN = 7; // ADC Enable
  347. ADSC = 6; // ADC Start Conversion
  348. ADATE = 5; // ADC Auto Trigger Enable
  349. ADIF = 4; // ADC Interrupt Flag
  350. ADIE = 3; // ADC Interrupt Enable
  351. ADPS = 0; // ADC Prescaler Select Bits
  352. // DIDR1
  353. ACMP0D = 5; //
  354. AMP0PD = 4; //
  355. AMP0ND = 3; //
  356. ADC10D = 2; //
  357. ADC9D = 1; //
  358. ADC8D = 0; //
  359. // AMP0CSR
  360. AMP0EN = 7; //
  361. AMP0IS = 6; //
  362. AMP0G = 4; //
  363. AMP0TS = 0; //
  364. // AMP1CSR
  365. AMP1EN = 7; //
  366. AMP1IS = 6; //
  367. AMP1G = 4; //
  368. AMP1TS = 0; //
  369. // SPCR
  370. SPIE = 7; // SPI Interrupt Enable
  371. SPE = 6; // SPI Enable
  372. DORD = 5; // Data Order
  373. MSTR = 4; // Master/Slave Select
  374. CPOL = 3; // Clock polarity
  375. CPHA = 2; // Clock Phase
  376. SPR = 0; // SPI Clock Rate Selects
  377. // SPSR
  378. SPIF = 7; // SPI Interrupt Flag
  379. WCOL = 6; // Write Collision Flag
  380. SPI2X = 0; // Double SPI Speed Bit
  381. // WDTCSR
  382. WDIF = 7; // Watchdog Timeout Interrupt Flag
  383. WDIE = 6; // Watchdog Timeout Interrupt Enable
  384. WDP = 0; // Watchdog Timer Prescaler Bits
  385. WDCE = 4; // Watchdog Change Enable
  386. WDE = 3; // Watch Dog Enable
  387. // EICRA
  388. ISC2 = 4; // External Interrupt Sense Control Bit
  389. ISC1 = 2; // External Interrupt Sense Control Bit
  390. ISC0 = 0; // External Interrupt Sense Control Bit
  391. // EIMSK
  392. INT = 0; // External Interrupt Request 2 Enable
  393. // EIFR
  394. INTF = 0; // External Interrupt Flags
  395. // EECR
  396. EERIE = 3; // EEPROM Ready Interrupt Enable
  397. EEMWE = 2; // EEPROM Master Write Enable
  398. EEWE = 1; // EEPROM Write Enable
  399. EERE = 0; // EEPROM Read Enable
  400. // AC0CON
  401. AC0EN = 7; // Analog Comparator 0 Enable Bit
  402. AC0IE = 6; // Analog Comparator 0 Interrupt Enable Bit
  403. AC0IS = 4; // Analog Comparator 0 Interrupt Select Bit
  404. AC0M = 0; // Analog Comparator 0 Multiplexer Register
  405. // AC2CON
  406. AC2EN = 7; // Analog Comparator 2 Enable Bit
  407. AC2IE = 6; // Analog Comparator 2 Interrupt Enable Bit
  408. AC2IS = 4; // Analog Comparator 2 Interrupt Select Bit
  409. AC2M = 0; // Analog Comparator 2 Multiplexer Register
  410. // ACSR
  411. ACCKDIV = 7; // Analog Comparator Clock Divider
  412. AC2IF = 6; // Analog Comparator 2 Interrupt Flag Bit
  413. AC1IF = 5; // Analog Comparator 1 Interrupt Flag Bit
  414. AC0IF = 4; // Analog Comparator 0 Interrupt Flag Bit
  415. AC2O = 2; // Analog Comparator 2 Output Bit
  416. AC1O = 1; // Analog Comparator 1 Output Bit
  417. AC0O = 0; // Analog Comparator 0 Output Bit
  418. // PFRC1B
  419. PCAE1B = 7; // PSC 1 Capture Enable Input Part B
  420. PISEL1B = 6; // PSC 1 Input Select for Part B
  421. PELEV1B = 5; // PSC 1 Edge Level Selector on Input Part B
  422. PFLTE1B = 4; // PSC 1 Filter Enable on Input Part B
  423. PRFM1B = 0; // PSC 1 Retrigger and Fault Mode for Part B
  424. // PFRC1A
  425. PCAE1A = 7; // PSC 1 Capture Enable Input Part A
  426. PISEL1A = 6; // PSC 1 Input Select for Part A
  427. PELEV1A = 5; // PSC 1 Edge Level Selector on Input Part A
  428. PFLTE1A = 4; // PSC 1 Filter Enable on Input Part A
  429. PRFM1A = 0; // PSC 1 Retrigger and Fault Mode for Part A
  430. // PCTL1
  431. PPRE1 = 6; // PSC 1 Prescaler Selects
  432. PBFM1 = 5; // Balance Flank Width Modulation
  433. PAOC1B = 4; // PSC 1 Asynchronous Output Control B
  434. PAOC1A = 3; // PSC 1 Asynchronous Output Control A
  435. PARUN1 = 2; // PSC1 Auto Run
  436. PCCYC1 = 1; // PSC1 Complete Cycle
  437. PRUN1 = 0; // PSC 1 Run
  438. // PSOC1
  439. PSYNC1_ = 4; // Synchronization Out for ADC Selection
  440. POEN1B = 2; // PSCOUT11 Output Enable
  441. POEN1A = 0; // PSCOUT10 Output Enable
  442. implementation
  443. {$define RELBRANCHES}
  444. {$i avrcommon.inc}
  445. procedure PSC2_CAPT_ISR; external name 'PSC2_CAPT_ISR'; // Interrupt 1 PSC2 Capture Event
  446. procedure PSC2_EC_ISR; external name 'PSC2_EC_ISR'; // Interrupt 2 PSC2 End Cycle
  447. procedure PSC1_CAPT_ISR; external name 'PSC1_CAPT_ISR'; // Interrupt 3 PSC1 Capture Event
  448. procedure PSC1_EC_ISR; external name 'PSC1_EC_ISR'; // Interrupt 4 PSC1 End Cycle
  449. procedure PSC0_CAPT_ISR; external name 'PSC0_CAPT_ISR'; // Interrupt 5 PSC0 Capture Event
  450. procedure PSC0_EC_ISR; external name 'PSC0_EC_ISR'; // Interrupt 6 PSC0 End Cycle
  451. procedure ANALOG_COMP_0_ISR; external name 'ANALOG_COMP_0_ISR'; // Interrupt 7 Analog Comparator 0
  452. procedure ANALOG_COMP_1_ISR; external name 'ANALOG_COMP_1_ISR'; // Interrupt 8 Analog Comparator 1
  453. procedure ANALOG_COMP_2_ISR; external name 'ANALOG_COMP_2_ISR'; // Interrupt 9 Analog Comparator 2
  454. procedure INT0_ISR; external name 'INT0_ISR'; // Interrupt 10 External Interrupt Request 0
  455. procedure TIMER1_CAPT_ISR; external name 'TIMER1_CAPT_ISR'; // Interrupt 11 Timer/Counter1 Capture Event
  456. procedure TIMER1_COMPA_ISR; external name 'TIMER1_COMPA_ISR'; // Interrupt 12 Timer/Counter1 Compare Match A
  457. procedure TIMER1_COMPB_ISR; external name 'TIMER1_COMPB_ISR'; // Interrupt 13 Timer/Counter Compare Match B
  458. procedure RESERVED15_ISR; external name 'RESERVED15_ISR'; // Interrupt 14
  459. procedure TIMER1_OVF_ISR; external name 'TIMER1_OVF_ISR'; // Interrupt 15 Timer/Counter1 Overflow
  460. procedure TIMER0_COMP_A_ISR; external name 'TIMER0_COMP_A_ISR'; // Interrupt 16 Timer/Counter0 Compare Match A
  461. procedure TIMER0_OVF_ISR; external name 'TIMER0_OVF_ISR'; // Interrupt 17 Timer/Counter0 Overflow
  462. procedure ADC_ISR; external name 'ADC_ISR'; // Interrupt 18 ADC Conversion Complete
  463. procedure INT1_ISR; external name 'INT1_ISR'; // Interrupt 19 External Interrupt Request 1
  464. procedure SPI__STC_ISR; external name 'SPI__STC_ISR'; // Interrupt 20 SPI Serial Transfer Complete
  465. procedure USART__RX_ISR; external name 'USART__RX_ISR'; // Interrupt 21 USART, Rx Complete
  466. procedure USART__UDRE_ISR; external name 'USART__UDRE_ISR'; // Interrupt 22 USART Data Register Empty
  467. procedure USART__TX_ISR; external name 'USART__TX_ISR'; // Interrupt 23 USART, Tx Complete
  468. procedure INT2_ISR; external name 'INT2_ISR'; // Interrupt 24 External Interrupt Request 2
  469. procedure WDT_ISR; external name 'WDT_ISR'; // Interrupt 25 Watchdog Timeout Interrupt
  470. procedure EE_READY_ISR; external name 'EE_READY_ISR'; // Interrupt 26 EEPROM Ready
  471. procedure TIMER0_COMPB_ISR; external name 'TIMER0_COMPB_ISR'; // Interrupt 27 Timer Counter 0 Compare Match B
  472. procedure INT3_ISR; external name 'INT3_ISR'; // Interrupt 28 External Interrupt Request 3
  473. procedure RESERVED30_ISR; external name 'RESERVED30_ISR'; // Interrupt 29
  474. procedure RESERVED31_ISR; external name 'RESERVED31_ISR'; // Interrupt 30
  475. procedure SPM_READY_ISR; external name 'SPM_READY_ISR'; // Interrupt 31 Store Program Memory Read
  476. procedure _FPC_start; assembler; nostackframe;
  477. label
  478. _start;
  479. asm
  480. .init
  481. .globl _start
  482. rjmp _start
  483. rjmp PSC2_CAPT_ISR
  484. rjmp PSC2_EC_ISR
  485. rjmp PSC1_CAPT_ISR
  486. rjmp PSC1_EC_ISR
  487. rjmp PSC0_CAPT_ISR
  488. rjmp PSC0_EC_ISR
  489. rjmp ANALOG_COMP_0_ISR
  490. rjmp ANALOG_COMP_1_ISR
  491. rjmp ANALOG_COMP_2_ISR
  492. rjmp INT0_ISR
  493. rjmp TIMER1_CAPT_ISR
  494. rjmp TIMER1_COMPA_ISR
  495. rjmp TIMER1_COMPB_ISR
  496. rjmp RESERVED15_ISR
  497. rjmp TIMER1_OVF_ISR
  498. rjmp TIMER0_COMP_A_ISR
  499. rjmp TIMER0_OVF_ISR
  500. rjmp ADC_ISR
  501. rjmp INT1_ISR
  502. rjmp SPI__STC_ISR
  503. rjmp USART__RX_ISR
  504. rjmp USART__UDRE_ISR
  505. rjmp USART__TX_ISR
  506. rjmp INT2_ISR
  507. rjmp WDT_ISR
  508. rjmp EE_READY_ISR
  509. rjmp TIMER0_COMPB_ISR
  510. rjmp INT3_ISR
  511. rjmp RESERVED30_ISR
  512. rjmp RESERVED31_ISR
  513. rjmp SPM_READY_ISR
  514. {$i start.inc}
  515. .weak PSC2_CAPT_ISR
  516. .weak PSC2_EC_ISR
  517. .weak PSC1_CAPT_ISR
  518. .weak PSC1_EC_ISR
  519. .weak PSC0_CAPT_ISR
  520. .weak PSC0_EC_ISR
  521. .weak ANALOG_COMP_0_ISR
  522. .weak ANALOG_COMP_1_ISR
  523. .weak ANALOG_COMP_2_ISR
  524. .weak INT0_ISR
  525. .weak TIMER1_CAPT_ISR
  526. .weak TIMER1_COMPA_ISR
  527. .weak TIMER1_COMPB_ISR
  528. .weak RESERVED15_ISR
  529. .weak TIMER1_OVF_ISR
  530. .weak TIMER0_COMP_A_ISR
  531. .weak TIMER0_OVF_ISR
  532. .weak ADC_ISR
  533. .weak INT1_ISR
  534. .weak SPI__STC_ISR
  535. .weak USART__RX_ISR
  536. .weak USART__UDRE_ISR
  537. .weak USART__TX_ISR
  538. .weak INT2_ISR
  539. .weak WDT_ISR
  540. .weak EE_READY_ISR
  541. .weak TIMER0_COMPB_ISR
  542. .weak INT3_ISR
  543. .weak RESERVED30_ISR
  544. .weak RESERVED31_ISR
  545. .weak SPM_READY_ISR
  546. .set PSC2_CAPT_ISR, Default_IRQ_handler
  547. .set PSC2_EC_ISR, Default_IRQ_handler
  548. .set PSC1_CAPT_ISR, Default_IRQ_handler
  549. .set PSC1_EC_ISR, Default_IRQ_handler
  550. .set PSC0_CAPT_ISR, Default_IRQ_handler
  551. .set PSC0_EC_ISR, Default_IRQ_handler
  552. .set ANALOG_COMP_0_ISR, Default_IRQ_handler
  553. .set ANALOG_COMP_1_ISR, Default_IRQ_handler
  554. .set ANALOG_COMP_2_ISR, Default_IRQ_handler
  555. .set INT0_ISR, Default_IRQ_handler
  556. .set TIMER1_CAPT_ISR, Default_IRQ_handler
  557. .set TIMER1_COMPA_ISR, Default_IRQ_handler
  558. .set TIMER1_COMPB_ISR, Default_IRQ_handler
  559. .set RESERVED15_ISR, Default_IRQ_handler
  560. .set TIMER1_OVF_ISR, Default_IRQ_handler
  561. .set TIMER0_COMP_A_ISR, Default_IRQ_handler
  562. .set TIMER0_OVF_ISR, Default_IRQ_handler
  563. .set ADC_ISR, Default_IRQ_handler
  564. .set INT1_ISR, Default_IRQ_handler
  565. .set SPI__STC_ISR, Default_IRQ_handler
  566. .set USART__RX_ISR, Default_IRQ_handler
  567. .set USART__UDRE_ISR, Default_IRQ_handler
  568. .set USART__TX_ISR, Default_IRQ_handler
  569. .set INT2_ISR, Default_IRQ_handler
  570. .set WDT_ISR, Default_IRQ_handler
  571. .set EE_READY_ISR, Default_IRQ_handler
  572. .set TIMER0_COMPB_ISR, Default_IRQ_handler
  573. .set INT3_ISR, Default_IRQ_handler
  574. .set RESERVED30_ISR, Default_IRQ_handler
  575. .set RESERVED31_ISR, Default_IRQ_handler
  576. .set SPM_READY_ISR, Default_IRQ_handler
  577. end;
  578. end.