atmega128a.pp 23 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345346347348349350351352353354355356357358359360361362363364365366367368369370371372373374375376377378379380381382383384385386387388389390391392393394395396397398399400401402403404405406407408409410411412413414415416417418419420421422423424425426427428429430431432433434435436437438439440441442443444445446447448449450451452453454455456457458459460461462463464465466467468469470471472473474475476477478479480481482483484485486487488489490491492493494495496497498499500501502503504505506507508509510511512513514515516517518519520521522523524525526527528529530531532533534535536537538539540541542543544545546547548549550551552553554555556557558
  1. unit ATmega128A;
  2. {$goto on}
  3. interface
  4. var
  5. // ANALOG_COMPARATOR
  6. SFIOR : byte absolute $00+$40; // Special Function IO Register
  7. ACSR : byte absolute $00+$28; // Analog Comparator Control And Status Register
  8. // SPI
  9. SPDR : byte absolute $00+$2F; // SPI Data Register
  10. SPSR : byte absolute $00+$2E; // SPI Status Register
  11. SPCR : byte absolute $00+$2D; // SPI Control Register
  12. // TWI
  13. TWBR : byte absolute $00+$70; // TWI Bit Rate register
  14. TWCR : byte absolute $00+$74; // TWI Control Register
  15. TWSR : byte absolute $00+$71; // TWI Status Register
  16. TWDR : byte absolute $00+$73; // TWI Data register
  17. TWAR : byte absolute $00+$72; // TWI (Slave) Address register
  18. // USART0
  19. UDR0 : byte absolute $00+$2C; // USART I/O Data Register
  20. UCSR0A : byte absolute $00+$2B; // USART Control and Status Register A
  21. UCSR0B : byte absolute $00+$2A; // USART Control and Status Register B
  22. UCSR0C : byte absolute $00+$95; // USART Control and Status Register C
  23. UBRR0H : byte absolute $00+$90; // USART Baud Rate Register Hight Byte
  24. UBRR0L : byte absolute $00+$29; // USART Baud Rate Register Low Byte
  25. // USART1
  26. UDR1 : byte absolute $00+$9C; // USART I/O Data Register
  27. UCSR1A : byte absolute $00+$9B; // USART Control and Status Register A
  28. UCSR1B : byte absolute $00+$9A; // USART Control and Status Register B
  29. UCSR1C : byte absolute $00+$9D; // USART Control and Status Register C
  30. UBRR1H : byte absolute $00+$98; // USART Baud Rate Register Hight Byte
  31. UBRR1L : byte absolute $00+$99; // USART Baud Rate Register Low Byte
  32. // CPU
  33. SREG : byte absolute $00+$5F; // Status Register
  34. SP : word absolute $00+$5D; // Stack Pointer
  35. SPL : byte absolute $00+$5D; // Stack Pointer
  36. SPH : byte absolute $00+$5D+1; // Stack Pointer
  37. MCUCR : byte absolute $00+$55; // MCU Control Register
  38. MCUCSR : byte absolute $00+$54; // MCU Control And Status Register
  39. XMCRA : byte absolute $00+$6D; // External Memory Control Register A
  40. XMCRB : byte absolute $00+$6C; // External Memory Control Register B
  41. OSCCAL : byte absolute $00+$6F; // Oscillator Calibration Value
  42. XDIV : byte absolute $00+$5C; // XTAL Divide Control Register
  43. RAMPZ : byte absolute $00+$5B; // RAM Page Z Select Register
  44. // BOOT_LOAD
  45. SPMCSR : byte absolute $00+$68; // Store Program Memory Control Register
  46. // JTAG
  47. OCDR : byte absolute $00+$42; // On-Chip Debug Related Register in I/O Memory
  48. // MISC
  49. // EXTERNAL_INTERRUPT
  50. EICRA : byte absolute $00+$6A; // External Interrupt Control Register A
  51. EICRB : byte absolute $00+$5A; // External Interrupt Control Register B
  52. EIMSK : byte absolute $00+$59; // External Interrupt Mask Register
  53. EIFR : byte absolute $00+$58; // External Interrupt Flag Register
  54. // EEPROM
  55. EEAR : word absolute $00+$3E; // EEPROM Read/Write Access Bytes
  56. EEARL : byte absolute $00+$3E; // EEPROM Read/Write Access Bytes
  57. EEARH : byte absolute $00+$3E+1; // EEPROM Read/Write Access Bytes
  58. EEDR : byte absolute $00+$3D; // EEPROM Data Register
  59. EECR : byte absolute $00+$3C; // EEPROM Control Register
  60. // PORTA
  61. PORTA : byte absolute $00+$3B; // Port A Data Register
  62. DDRA : byte absolute $00+$3A; // Port A Data Direction Register
  63. PINA : byte absolute $00+$39; // Port A Input Pins
  64. // PORTB
  65. PORTB : byte absolute $00+$38; // Port B Data Register
  66. DDRB : byte absolute $00+$37; // Port B Data Direction Register
  67. PINB : byte absolute $00+$36; // Port B Input Pins
  68. // PORTC
  69. PORTC : byte absolute $00+$35; // Port C Data Register
  70. DDRC : byte absolute $00+$34; // Port C Data Direction Register
  71. PINC : byte absolute $00+$33; // Port C Input Pins
  72. // PORTD
  73. PORTD : byte absolute $00+$32; // Port D Data Register
  74. DDRD : byte absolute $00+$31; // Port D Data Direction Register
  75. PIND : byte absolute $00+$30; // Port D Input Pins
  76. // PORTE
  77. PORTE : byte absolute $00+$23; // Data Register, Port E
  78. DDRE : byte absolute $00+$22; // Data Direction Register, Port E
  79. PINE : byte absolute $00+$21; // Input Pins, Port E
  80. // PORTF
  81. PORTF : byte absolute $00+$62; // Data Register, Port F
  82. DDRF : byte absolute $00+$61; // Data Direction Register, Port F
  83. PINF : byte absolute $00+$20; // Input Pins, Port F
  84. // PORTG
  85. PORTG : byte absolute $00+$65; // Data Register, Port G
  86. DDRG : byte absolute $00+$64; // Data Direction Register, Port G
  87. PING : byte absolute $00+$63; // Input Pins, Port G
  88. // TIMER_COUNTER_0
  89. TCCR0 : byte absolute $00+$53; // Timer/Counter Control Register
  90. TCNT0 : byte absolute $00+$52; // Timer/Counter Register
  91. OCR0 : byte absolute $00+$51; // Output Compare Register
  92. ASSR : byte absolute $00+$50; // Asynchronus Status Register
  93. TIMSK : byte absolute $00+$57; // Timer/Counter Interrupt Mask Register
  94. TIFR : byte absolute $00+$56; // Timer/Counter Interrupt Flag register
  95. // TIMER_COUNTER_1
  96. ETIMSK : byte absolute $00+$7D; // Extended Timer/Counter Interrupt Mask Register
  97. ETIFR : byte absolute $00+$7C; // Extended Timer/Counter Interrupt Flag register
  98. TCCR1A : byte absolute $00+$4F; // Timer/Counter1 Control Register A
  99. TCCR1B : byte absolute $00+$4E; // Timer/Counter1 Control Register B
  100. TCCR1C : byte absolute $00+$7A; // Timer/Counter1 Control Register C
  101. TCNT1 : word absolute $00+$4C; // Timer/Counter1 Bytes
  102. TCNT1L : byte absolute $00+$4C; // Timer/Counter1 Bytes
  103. TCNT1H : byte absolute $00+$4C+1; // Timer/Counter1 Bytes
  104. OCR1A : word absolute $00+$4A; // Timer/Counter1 Output Compare Register Bytes
  105. OCR1AL : byte absolute $00+$4A; // Timer/Counter1 Output Compare Register Bytes
  106. OCR1AH : byte absolute $00+$4A+1; // Timer/Counter1 Output Compare Register Bytes
  107. OCR1B : word absolute $00+$48; // Timer/Counter1 Output Compare Register Bytes
  108. OCR1BL : byte absolute $00+$48; // Timer/Counter1 Output Compare Register Bytes
  109. OCR1BH : byte absolute $00+$48+1; // Timer/Counter1 Output Compare Register Bytes
  110. OCR1C : word absolute $00+$78; // Timer/Counter1 Output Compare Register Bytes
  111. OCR1CL : byte absolute $00+$78; // Timer/Counter1 Output Compare Register Bytes
  112. OCR1CH : byte absolute $00+$78+1; // Timer/Counter1 Output Compare Register Bytes
  113. ICR1 : word absolute $00+$46; // Timer/Counter1 Input Capture Register Bytes
  114. ICR1L : byte absolute $00+$46; // Timer/Counter1 Input Capture Register Bytes
  115. ICR1H : byte absolute $00+$46+1; // Timer/Counter1 Input Capture Register Bytes
  116. // TIMER_COUNTER_2
  117. TCCR2 : byte absolute $00+$45; // Timer/Counter Control Register
  118. TCNT2 : byte absolute $00+$44; // Timer/Counter Register
  119. OCR2 : byte absolute $00+$43; // Output Compare Register
  120. // TIMER_COUNTER_3
  121. TCCR3A : byte absolute $00+$8B; // Timer/Counter3 Control Register A
  122. TCCR3B : byte absolute $00+$8A; // Timer/Counter3 Control Register B
  123. TCCR3C : byte absolute $00+$8C; // Timer/Counter3 Control Register C
  124. TCNT3 : word absolute $00+$88; // Timer/Counter3 Bytes
  125. TCNT3L : byte absolute $00+$88; // Timer/Counter3 Bytes
  126. TCNT3H : byte absolute $00+$88+1; // Timer/Counter3 Bytes
  127. OCR3A : word absolute $00+$86; // Timer/Counter3 Output Compare Register A Bytes
  128. OCR3AL : byte absolute $00+$86; // Timer/Counter3 Output Compare Register A Bytes
  129. OCR3AH : byte absolute $00+$86+1; // Timer/Counter3 Output Compare Register A Bytes
  130. OCR3B : word absolute $00+$84; // Timer/Counter3 Output Compare Register B Bytes
  131. OCR3BL : byte absolute $00+$84; // Timer/Counter3 Output Compare Register B Bytes
  132. OCR3BH : byte absolute $00+$84+1; // Timer/Counter3 Output Compare Register B Bytes
  133. OCR3C : word absolute $00+$82; // Timer/Counter3 Output compare Register C Bytes
  134. OCR3CL : byte absolute $00+$82; // Timer/Counter3 Output compare Register C Bytes
  135. OCR3CH : byte absolute $00+$82+1; // Timer/Counter3 Output compare Register C Bytes
  136. ICR3 : word absolute $00+$80; // Timer/Counter3 Input Capture Register Bytes
  137. ICR3L : byte absolute $00+$80; // Timer/Counter3 Input Capture Register Bytes
  138. ICR3H : byte absolute $00+$80+1; // Timer/Counter3 Input Capture Register Bytes
  139. // WATCHDOG
  140. WDTCR : byte absolute $00+$41; // Watchdog Timer Control Register
  141. // AD_CONVERTER
  142. ADMUX : byte absolute $00+$27; // The ADC multiplexer Selection Register
  143. ADCSRA : byte absolute $00+$26; // The ADC Control and Status register
  144. ADC : word absolute $00+$24; // ADC Data Register Bytes
  145. ADCL : byte absolute $00+$24; // ADC Data Register Bytes
  146. ADCH : byte absolute $00+$24+1; // ADC Data Register Bytes
  147. const
  148. // SFIOR
  149. ACME = 3; // Analog Comparator Multiplexer Enable
  150. // ACSR
  151. ACD = 7; // Analog Comparator Disable
  152. ACBG = 6; // Analog Comparator Bandgap Select
  153. ACO = 5; // Analog Compare Output
  154. ACI = 4; // Analog Comparator Interrupt Flag
  155. ACIE = 3; // Analog Comparator Interrupt Enable
  156. ACIC = 2; // Analog Comparator Input Capture Enable
  157. ACIS = 0; // Analog Comparator Interrupt Mode Select bits
  158. // SPSR
  159. SPIF = 7; // SPI Interrupt Flag
  160. WCOL = 6; // Write Collision Flag
  161. SPI2X = 0; // Double SPI Speed Bit
  162. // SPCR
  163. SPIE = 7; // SPI Interrupt Enable
  164. SPE = 6; // SPI Enable
  165. DORD = 5; // Data Order
  166. MSTR = 4; // Master/Slave Select
  167. CPOL = 3; // Clock polarity
  168. CPHA = 2; // Clock Phase
  169. SPR = 0; // SPI Clock Rate Selects
  170. // TWCR
  171. TWINT = 7; // TWI Interrupt Flag
  172. TWEA = 6; // TWI Enable Acknowledge Bit
  173. TWSTA = 5; // TWI Start Condition Bit
  174. TWSTO = 4; // TWI Stop Condition Bit
  175. TWWC = 3; // TWI Write Collition Flag
  176. TWEN = 2; // TWI Enable Bit
  177. TWIE = 0; // TWI Interrupt Enable
  178. // TWSR
  179. TWS = 3; // TWI Status
  180. TWPS = 0; // TWI Prescaler
  181. // TWAR
  182. TWA = 1; // TWI (Slave) Address register Bits
  183. TWGCE = 0; // TWI General Call Recognition Enable Bit
  184. // UCSR0A
  185. RXC0 = 7; // USART Receive Complete
  186. TXC0 = 6; // USART Transmitt Complete
  187. UDRE0 = 5; // USART Data Register Empty
  188. FE0 = 4; // Framing Error
  189. DOR0 = 3; // Data overRun
  190. UPE0 = 2; // Parity Error
  191. U2X0 = 1; // Double the USART transmission speed
  192. MPCM0 = 0; // Multi-processor Communication Mode
  193. // UCSR0B
  194. RXCIE0 = 7; // RX Complete Interrupt Enable
  195. TXCIE0 = 6; // TX Complete Interrupt Enable
  196. UDRIE0 = 5; // USART Data register Empty Interrupt Enable
  197. RXEN0 = 4; // Receiver Enable
  198. TXEN0 = 3; // Transmitter Enable
  199. UCSZ02 = 2; // Character Size
  200. RXB80 = 1; // Receive Data Bit 8
  201. TXB80 = 0; // Transmit Data Bit 8
  202. // UCSR0C
  203. UMSEL0 = 6; // USART Mode Select
  204. UPM0 = 4; // Parity Mode Bits
  205. USBS0 = 3; // Stop Bit Select
  206. UCSZ0 = 1; // Character Size
  207. UCPOL0 = 0; // Clock Polarity
  208. // UCSR1A
  209. RXC1 = 7; // USART Receive Complete
  210. TXC1 = 6; // USART Transmitt Complete
  211. UDRE1 = 5; // USART Data Register Empty
  212. FE1 = 4; // Framing Error
  213. DOR1 = 3; // Data overRun
  214. UPE1 = 2; // Parity Error
  215. U2X1 = 1; // Double the USART transmission speed
  216. MPCM1 = 0; // Multi-processor Communication Mode
  217. // UCSR1B
  218. RXCIE1 = 7; // RX Complete Interrupt Enable
  219. TXCIE1 = 6; // TX Complete Interrupt Enable
  220. UDRIE1 = 5; // USART Data register Empty Interrupt Enable
  221. RXEN1 = 4; // Receiver Enable
  222. TXEN1 = 3; // Transmitter Enable
  223. UCSZ12 = 2; // Character Size
  224. RXB81 = 1; // Receive Data Bit 8
  225. TXB81 = 0; // Transmit Data Bit 8
  226. // UCSR1C
  227. UMSEL1 = 6; // USART Mode Select
  228. UPM1 = 4; // Parity Mode Bits
  229. USBS1 = 3; // Stop Bit Select
  230. UCSZ1 = 1; // Character Size
  231. UCPOL1 = 0; // Clock Polarity
  232. // SREG
  233. I = 7; // Global Interrupt Enable
  234. T = 6; // Bit Copy Storage
  235. H = 5; // Half Carry Flag
  236. S = 4; // Sign Bit
  237. V = 3; // Two's Complement Overflow Flag
  238. N = 2; // Negative Flag
  239. Z = 1; // Zero Flag
  240. C = 0; // Carry Flag
  241. // MCUCR
  242. SRE = 7; // External SRAM Enable
  243. SRW10 = 6; // External SRAM Wait State Select
  244. SE = 5; // Sleep Enable
  245. SM = 3; // Sleep Mode Select
  246. SM2 = 2; // Sleep Mode Select
  247. IVSEL = 1; // Interrupt Vector Select
  248. IVCE = 0; // Interrupt Vector Change Enable
  249. // MCUCSR
  250. JTD = 7; // JTAG Interface Disable
  251. JTRF = 4; // JTAG Reset Flag
  252. WDRF = 3; // Watchdog Reset Flag
  253. BORF = 2; // Brown-out Reset Flag
  254. EXTRF = 1; // External Reset Flag
  255. PORF = 0; // Power-on reset flag
  256. // XMCRA
  257. SRL = 4; // Wait state page limit
  258. SRW0 = 2; // Wait state select bit lower page
  259. SRW11 = 1; // Wait state select bit upper page
  260. // XMCRB
  261. XMBK = 7; // External Memory Bus Keeper Enable
  262. XMM = 0; // External Memory High Mask
  263. // RAMPZ
  264. RAMPZ0 = 0; // RAM Page Z Select Register Bit 0
  265. // SPMCSR
  266. SPMIE = 7; // SPM Interrupt Enable
  267. RWWSB = 6; // Read While Write Section Busy
  268. RWWSRE = 4; // Read While Write section read enable
  269. BLBSET = 3; // Boot Lock Bit Set
  270. PGWRT = 2; // Page Write
  271. PGERS = 1; // Page Erase
  272. SPMEN = 0; // Store Program Memory Enable
  273. // OCDR
  274. // MCUCSR
  275. // SFIOR
  276. TSM = 7; // Timer/Counter Synchronization Mode
  277. PUD = 2; // Pull Up Disable
  278. PSR0 = 1; // Prescaler Reset Timer/Counter0
  279. PSR321 = 0; // Prescaler Reset Timer/Counter3, Timer/Counter2, and Timer/Counter1
  280. // EICRA
  281. ISC3 = 6; // External Interrupt Sense Control Bit
  282. ISC2 = 4; // External Interrupt Sense Control Bit
  283. ISC1 = 2; // External Interrupt Sense Control Bit
  284. ISC0 = 0; // External Interrupt Sense Control Bit
  285. // EICRB
  286. ISC7 = 6; // External Interrupt 7-4 Sense Control Bit
  287. ISC6 = 4; // External Interrupt 7-4 Sense Control Bit
  288. ISC5 = 2; // External Interrupt 7-4 Sense Control Bit
  289. ISC4 = 0; // External Interrupt 7-4 Sense Control Bit
  290. // EIMSK
  291. INT = 0; // External Interrupt Request 7 Enable
  292. // EIFR
  293. INTF = 0; // External Interrupt Flags
  294. // EECR
  295. EERIE = 3; // EEPROM Ready Interrupt Enable
  296. EEMWE = 2; // EEPROM Master Write Enable
  297. EEWE = 1; // EEPROM Write Enable
  298. EERE = 0; // EEPROM Read Enable
  299. // TCCR0
  300. FOC0 = 7; // Force Output Compare
  301. WGM00 = 6; // Waveform Generation Mode 0
  302. COM0 = 4; // Compare Match Output Modes
  303. WGM01 = 3; // Waveform Generation Mode 1
  304. CS0 = 0; // Clock Selects
  305. // ASSR
  306. AS0 = 3; // Asynchronus Timer/Counter 0
  307. TCN0UB = 2; // Timer/Counter0 Update Busy
  308. OCR0UB = 1; // Output Compare register 0 Busy
  309. TCR0UB = 0; // Timer/Counter Control Register 0 Update Busy
  310. // TIMSK
  311. OCIE0 = 1; // Timer/Counter0 Output Compare Match Interrupt register
  312. TOIE0 = 0; // Timer/Counter0 Overflow Interrupt Enable
  313. // TIFR
  314. OCF0 = 1; // Output Compare Flag 0
  315. TOV0 = 0; // Timer/Counter0 Overflow Flag
  316. // SFIOR
  317. // TIMSK
  318. TICIE1 = 5; // Timer/Counter1 Input Capture Interrupt Enable
  319. OCIE1A = 4; // Timer/Counter1 Output CompareA Match Interrupt Enable
  320. OCIE1B = 3; // Timer/Counter1 Output CompareB Match Interrupt Enable
  321. TOIE1 = 2; // Timer/Counter1 Overflow Interrupt Enable
  322. // ETIMSK
  323. OCIE1C = 0; // Timer/Counter 1, Output Compare Match C Interrupt Enable
  324. // TIFR
  325. ICF1 = 5; // Input Capture Flag 1
  326. OCF1A = 4; // Output Compare Flag 1A
  327. OCF1B = 3; // Output Compare Flag 1B
  328. TOV1 = 2; // Timer/Counter1 Overflow Flag
  329. // ETIFR
  330. OCF1C = 0; // Timer/Counter 1, Output Compare C Match Flag
  331. // SFIOR
  332. // TCCR1A
  333. COM1A = 6; // Compare Output Mode 1A, bits
  334. COM1B = 4; // Compare Output Mode 1B, bits
  335. COM1C = 2; // Compare Output Mode 1C, bits
  336. WGM1 = 0; // Waveform Generation Mode Bits
  337. // TCCR1B
  338. ICNC1 = 7; // Input Capture 1 Noise Canceler
  339. ICES1 = 6; // Input Capture 1 Edge Select
  340. CS1 = 0; // Clock Select1 bits
  341. // TCCR1C
  342. FOC1A = 7; // Force Output Compare for channel A
  343. FOC1B = 6; // Force Output Compare for channel B
  344. FOC1C = 5; // Force Output Compare for channel C
  345. // TCCR2
  346. FOC2 = 7; // Force Output Compare
  347. WGM20 = 6; // Wafeform Generation Mode
  348. COM2 = 4; // Compare Match Output Mode
  349. WGM21 = 3; // Waveform Generation Mode
  350. CS2 = 0; // Clock Select
  351. // TIFR
  352. OCF2 = 7; // Output Compare Flag 2
  353. TOV2 = 6; // Timer/Counter2 Overflow Flag
  354. // TIMSK
  355. OCIE2 = 7; //
  356. TOIE2 = 6; //
  357. // ETIMSK
  358. TICIE3 = 5; // Timer/Counter3 Input Capture Interrupt Enable
  359. OCIE3A = 4; // Timer/Counter3 Output CompareA Match Interrupt Enable
  360. OCIE3B = 3; // Timer/Counter3 Output CompareB Match Interrupt Enable
  361. TOIE3 = 2; // Timer/Counter3 Overflow Interrupt Enable
  362. OCIE3C = 1; // Timer/Counter3, Output Compare Match Interrupt Enable
  363. // ETIFR
  364. ICF3 = 5; // Input Capture Flag 1
  365. OCF3A = 4; // Output Compare Flag 1A
  366. OCF3B = 3; // Output Compare Flag 1B
  367. TOV3 = 2; // Timer/Counter3 Overflow Flag
  368. OCF3C = 1; // Timer/Counter3 Output Compare C Match Flag
  369. // SFIOR
  370. // TCCR3A
  371. COM3A = 6; // Compare Output Mode 3A, bits
  372. COM3B = 4; // Compare Output Mode 3B, bits
  373. COM3C = 2; // Compare Output Mode 3C, bits
  374. WGM3 = 0; // Waveform Generation Mode Bits
  375. // TCCR3B
  376. ICNC3 = 7; // Input Capture 3 Noise Canceler
  377. ICES3 = 6; // Input Capture 3 Edge Select
  378. CS3 = 0; // Clock Select3 bits
  379. // TCCR3C
  380. FOC3A = 7; // Force Output Compare for channel A
  381. FOC3B = 6; // Force Output Compare for channel B
  382. FOC3C = 5; // Force Output Compare for channel C
  383. // WDTCR
  384. WDCE = 4; // Watchdog Change Enable
  385. WDE = 3; // Watch Dog Enable
  386. WDP = 0; // Watch Dog Timer Prescaler bits
  387. // ADMUX
  388. REFS = 6; // Reference Selection Bits
  389. ADLAR = 5; // Left Adjust Result
  390. MUX = 0; // Analog Channel and Gain Selection Bits
  391. // ADCSRA
  392. ADEN = 7; // ADC Enable
  393. ADSC = 6; // ADC Start Conversion
  394. ADFR = 5; // ADC Free Running Select
  395. ADIF = 4; // ADC Interrupt Flag
  396. ADIE = 3; // ADC Interrupt Enable
  397. ADPS = 0; // ADC Prescaler Select Bits
  398. implementation
  399. {$i avrcommon.inc}
  400. procedure INT0_ISR; external name 'INT0_ISR'; // Interrupt 1 External Interrupt Request 0
  401. procedure INT1_ISR; external name 'INT1_ISR'; // Interrupt 2 External Interrupt Request 1
  402. procedure INT2_ISR; external name 'INT2_ISR'; // Interrupt 3 External Interrupt Request 2
  403. procedure INT3_ISR; external name 'INT3_ISR'; // Interrupt 4 External Interrupt Request 3
  404. procedure INT4_ISR; external name 'INT4_ISR'; // Interrupt 5 External Interrupt Request 4
  405. procedure INT5_ISR; external name 'INT5_ISR'; // Interrupt 6 External Interrupt Request 5
  406. procedure INT6_ISR; external name 'INT6_ISR'; // Interrupt 7 External Interrupt Request 6
  407. procedure INT7_ISR; external name 'INT7_ISR'; // Interrupt 8 External Interrupt Request 7
  408. procedure TIMER2_COMP_ISR; external name 'TIMER2_COMP_ISR'; // Interrupt 9 Timer/Counter2 Compare Match
  409. procedure TIMER2_OVF_ISR; external name 'TIMER2_OVF_ISR'; // Interrupt 10 Timer/Counter2 Overflow
  410. procedure TIMER1_CAPT_ISR; external name 'TIMER1_CAPT_ISR'; // Interrupt 11 Timer/Counter1 Capture Event
  411. procedure TIMER1_COMPA_ISR; external name 'TIMER1_COMPA_ISR'; // Interrupt 12 Timer/Counter1 Compare Match A
  412. procedure TIMER1_COMPB_ISR; external name 'TIMER1_COMPB_ISR'; // Interrupt 13 Timer/Counter Compare Match B
  413. procedure TIMER1_OVF_ISR; external name 'TIMER1_OVF_ISR'; // Interrupt 14 Timer/Counter1 Overflow
  414. procedure TIMER0_COMP_ISR; external name 'TIMER0_COMP_ISR'; // Interrupt 15 Timer/Counter0 Compare Match
  415. procedure TIMER0_OVF_ISR; external name 'TIMER0_OVF_ISR'; // Interrupt 16 Timer/Counter0 Overflow
  416. procedure SPI__STC_ISR; external name 'SPI__STC_ISR'; // Interrupt 17 SPI Serial Transfer Complete
  417. procedure USART0__RX_ISR; external name 'USART0__RX_ISR'; // Interrupt 18 USART0, Rx Complete
  418. procedure USART0__UDRE_ISR; external name 'USART0__UDRE_ISR'; // Interrupt 19 USART0 Data Register Empty
  419. procedure USART0__TX_ISR; external name 'USART0__TX_ISR'; // Interrupt 20 USART0, Tx Complete
  420. procedure ADC_ISR; external name 'ADC_ISR'; // Interrupt 21 ADC Conversion Complete
  421. procedure EE_READY_ISR; external name 'EE_READY_ISR'; // Interrupt 22 EEPROM Ready
  422. procedure ANALOG_COMP_ISR; external name 'ANALOG_COMP_ISR'; // Interrupt 23 Analog Comparator
  423. procedure TIMER1_COMPC_ISR; external name 'TIMER1_COMPC_ISR'; // Interrupt 24 Timer/Counter1 Compare Match C
  424. procedure TIMER3_CAPT_ISR; external name 'TIMER3_CAPT_ISR'; // Interrupt 25 Timer/Counter3 Capture Event
  425. procedure TIMER3_COMPA_ISR; external name 'TIMER3_COMPA_ISR'; // Interrupt 26 Timer/Counter3 Compare Match A
  426. procedure TIMER3_COMPB_ISR; external name 'TIMER3_COMPB_ISR'; // Interrupt 27 Timer/Counter3 Compare Match B
  427. procedure TIMER3_COMPC_ISR; external name 'TIMER3_COMPC_ISR'; // Interrupt 28 Timer/Counter3 Compare Match C
  428. procedure TIMER3_OVF_ISR; external name 'TIMER3_OVF_ISR'; // Interrupt 29 Timer/Counter3 Overflow
  429. procedure USART1__RX_ISR; external name 'USART1__RX_ISR'; // Interrupt 30 USART1, Rx Complete
  430. procedure USART1__UDRE_ISR; external name 'USART1__UDRE_ISR'; // Interrupt 31 USART1, Data Register Empty
  431. procedure USART1__TX_ISR; external name 'USART1__TX_ISR'; // Interrupt 32 USART1, Tx Complete
  432. procedure TWI_ISR; external name 'TWI_ISR'; // Interrupt 33 2-wire Serial Interface
  433. procedure SPM_READY_ISR; external name 'SPM_READY_ISR'; // Interrupt 34 Store Program Memory Read
  434. procedure _FPC_start; assembler; nostackframe;
  435. label
  436. _start;
  437. asm
  438. .init
  439. .globl _start
  440. jmp _start
  441. jmp INT0_ISR
  442. jmp INT1_ISR
  443. jmp INT2_ISR
  444. jmp INT3_ISR
  445. jmp INT4_ISR
  446. jmp INT5_ISR
  447. jmp INT6_ISR
  448. jmp INT7_ISR
  449. jmp TIMER2_COMP_ISR
  450. jmp TIMER2_OVF_ISR
  451. jmp TIMER1_CAPT_ISR
  452. jmp TIMER1_COMPA_ISR
  453. jmp TIMER1_COMPB_ISR
  454. jmp TIMER1_OVF_ISR
  455. jmp TIMER0_COMP_ISR
  456. jmp TIMER0_OVF_ISR
  457. jmp SPI__STC_ISR
  458. jmp USART0__RX_ISR
  459. jmp USART0__UDRE_ISR
  460. jmp USART0__TX_ISR
  461. jmp ADC_ISR
  462. jmp EE_READY_ISR
  463. jmp ANALOG_COMP_ISR
  464. jmp TIMER1_COMPC_ISR
  465. jmp TIMER3_CAPT_ISR
  466. jmp TIMER3_COMPA_ISR
  467. jmp TIMER3_COMPB_ISR
  468. jmp TIMER3_COMPC_ISR
  469. jmp TIMER3_OVF_ISR
  470. jmp USART1__RX_ISR
  471. jmp USART1__UDRE_ISR
  472. jmp USART1__TX_ISR
  473. jmp TWI_ISR
  474. jmp SPM_READY_ISR
  475. {$i start.inc}
  476. .weak INT0_ISR
  477. .weak INT1_ISR
  478. .weak INT2_ISR
  479. .weak INT3_ISR
  480. .weak INT4_ISR
  481. .weak INT5_ISR
  482. .weak INT6_ISR
  483. .weak INT7_ISR
  484. .weak TIMER2_COMP_ISR
  485. .weak TIMER2_OVF_ISR
  486. .weak TIMER1_CAPT_ISR
  487. .weak TIMER1_COMPA_ISR
  488. .weak TIMER1_COMPB_ISR
  489. .weak TIMER1_OVF_ISR
  490. .weak TIMER0_COMP_ISR
  491. .weak TIMER0_OVF_ISR
  492. .weak SPI__STC_ISR
  493. .weak USART0__RX_ISR
  494. .weak USART0__UDRE_ISR
  495. .weak USART0__TX_ISR
  496. .weak ADC_ISR
  497. .weak EE_READY_ISR
  498. .weak ANALOG_COMP_ISR
  499. .weak TIMER1_COMPC_ISR
  500. .weak TIMER3_CAPT_ISR
  501. .weak TIMER3_COMPA_ISR
  502. .weak TIMER3_COMPB_ISR
  503. .weak TIMER3_COMPC_ISR
  504. .weak TIMER3_OVF_ISR
  505. .weak USART1__RX_ISR
  506. .weak USART1__UDRE_ISR
  507. .weak USART1__TX_ISR
  508. .weak TWI_ISR
  509. .weak SPM_READY_ISR
  510. .set INT0_ISR, Default_IRQ_handler
  511. .set INT1_ISR, Default_IRQ_handler
  512. .set INT2_ISR, Default_IRQ_handler
  513. .set INT3_ISR, Default_IRQ_handler
  514. .set INT4_ISR, Default_IRQ_handler
  515. .set INT5_ISR, Default_IRQ_handler
  516. .set INT6_ISR, Default_IRQ_handler
  517. .set INT7_ISR, Default_IRQ_handler
  518. .set TIMER2_COMP_ISR, Default_IRQ_handler
  519. .set TIMER2_OVF_ISR, Default_IRQ_handler
  520. .set TIMER1_CAPT_ISR, Default_IRQ_handler
  521. .set TIMER1_COMPA_ISR, Default_IRQ_handler
  522. .set TIMER1_COMPB_ISR, Default_IRQ_handler
  523. .set TIMER1_OVF_ISR, Default_IRQ_handler
  524. .set TIMER0_COMP_ISR, Default_IRQ_handler
  525. .set TIMER0_OVF_ISR, Default_IRQ_handler
  526. .set SPI__STC_ISR, Default_IRQ_handler
  527. .set USART0__RX_ISR, Default_IRQ_handler
  528. .set USART0__UDRE_ISR, Default_IRQ_handler
  529. .set USART0__TX_ISR, Default_IRQ_handler
  530. .set ADC_ISR, Default_IRQ_handler
  531. .set EE_READY_ISR, Default_IRQ_handler
  532. .set ANALOG_COMP_ISR, Default_IRQ_handler
  533. .set TIMER1_COMPC_ISR, Default_IRQ_handler
  534. .set TIMER3_CAPT_ISR, Default_IRQ_handler
  535. .set TIMER3_COMPA_ISR, Default_IRQ_handler
  536. .set TIMER3_COMPB_ISR, Default_IRQ_handler
  537. .set TIMER3_COMPC_ISR, Default_IRQ_handler
  538. .set TIMER3_OVF_ISR, Default_IRQ_handler
  539. .set USART1__RX_ISR, Default_IRQ_handler
  540. .set USART1__UDRE_ISR, Default_IRQ_handler
  541. .set USART1__TX_ISR, Default_IRQ_handler
  542. .set TWI_ISR, Default_IRQ_handler
  543. .set SPM_READY_ISR, Default_IRQ_handler
  544. end;
  545. end.