.FILE H:\PROJAVR\ADA-C\ADA-C.pas ; Compiled by E-LAB AVRco PASCAL Compiler Rev 4.37 ; Version : Profi ; ; Licenced to : Redaktion CT P1 ; ; (c)E-LAB Computers, Grombacherstr. 27 e-mail info@e-lab.de ; D-74906 Bad Rappenau Tel. 07268/9124-0 Fax. 07268/9124-24 ; ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ ; Source File : ADA-C.pas ; Compiled : 03. Oktober 2006 15:05:12 ; ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ .SMALL .ROMEND 01FFFh; ; ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ ; Constants and Variables definition ; ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ ; === Internal used memory and constants === FALSE .EQU 000h ; const TRUE .EQU 0FFh ; const NIL .EQU 000h ; const PI .EQU 000h ; const COMPILERREV .EQU 1B5h ; const COMPILERBUILD_Y .EQU 006h ; const COMPILERBUILD_M .EQU 007h ; const COMPILERBUILD_D .EQU 017h ; const COMPILEYEAR .EQU 006h ; const COMPILEMONTH .EQU 00Ah ; const COMPILEDAY .EQU 003h ; const COMPILEHOUR .EQU 00Fh ; const COMPILEMINUTE .EQU 005h ; const PROJECTBUILD .EQU 009h ; const OPTIMISERREV .EQU 000h ; const OPTIMISERBUILD .EQU 000h ; const INTFLAG .EQU 007h ; const _EEPROM .EQU 006h ; const _SIGN .EQU 005h ; const _WAITLCD .EQU 004h ; const _STRCONST .EQU 004h ; const _DEVICE .EQU 003h ; const _NEGATIVE .EQU 002h ; const _ERRFLAG .EQU 001h ; const _I2C2BYTE .EQU 000h ; const _TOGGLE300 .EQU 000h ; const _LCDLOWER .EQU 001h ; const _DSP7RFR .EQU 002h ; const _PWRSAVFLG .EQU 003h ; const _STEPCW .EQU 004h ; const _STEPDEST .EQU 005h ; const _FREQCNTFLAG .EQU 006h ; const _AUTOACK .EQU 007h ; const _ACCGLO .EQU 000h ; var Data byte _ACCGHI .EQU 001h ; var Data byte _ACCHLO .EQU 002h ; var Data byte _ACCHHI .EQU 003h ; var Data byte _ACCB .EQU 010h ; var Data byte _ACCA .EQU 011h ; var Data byte _ACCALO .EQU 012h ; var Data byte _ACCAHI .EQU 013h ; var Data byte _ACCDLO .EQU 014h ; var Data byte _ACCDHI .EQU 015h ; var Data byte _ACCELO .EQU 016h ; var Data byte _ACCEHI .EQU 017h ; var Data byte _ACCFLO .EQU 018h ; var Data byte _ACCFHI .EQU 019h ; var Data byte _ACCBLO .EQU 01Ah ; var Data byte _ACCBHI .EQU 01Bh ; var Data byte _FRAMEPTR .EQU 01Ch ; var Data byte _FPTRHI .EQU 01Dh ; var Data byte _ACCCLO .EQU 01Eh ; var Data byte _ACCCHI .EQU 01Fh ; var Data byte FLAGS .EQU 004h ; var Data byte FLAGS2 .EQU 005h ; var Data byte _SYSTFLAGS .EQU 006h ; var Data byte SYSTICK .EQU 001h ; const PROCCLOCK .EQU 7A1200h ; const DECIMALSEP .EQU 02Eh ; const CPU_ID .EQU 1E9307h ; const ROMconstPage .EQU 0FFFFFFFFFFFFFFFFh ; const STACKSIZE .EQU 080h ; const FRAMESIZE .EQU 100h ; const SERPORT .EQU 2580h ; const _ADCBUFF .EQU 087h ; var iData word SREG .EQU 05Fh ; var pData byte SPH .EQU 05Eh ; var pData byte SPL .EQU 05Dh ; var pData byte GIMSK .EQU 05Bh ; var pData byte GICR .EQU 05Bh ; var pData byte GIFR .EQU 05Ah ; var pData byte TIMSK .EQU 059h ; var pData byte TIFR .EQU 058h ; var pData byte SPMCR .EQU 057h ; var pData byte SPMCSR .EQU 057h ; var pData byte TWCR .EQU 056h ; var pData byte MCUCR .EQU 055h ; var pData byte MCUCSR .EQU 054h ; var pData byte MCUSR .EQU 054h ; var pData byte TCCR0 .EQU 053h ; var pData byte TCNT0 .EQU 052h ; var pData byte OSCCAL .EQU 051h ; var pData byte SFIOR .EQU 050h ; var pData byte TCCR1A .EQU 04Fh ; var pData byte TCCR1B .EQU 04Eh ; var pData byte TCNT1H .EQU 04Dh ; var pData byte TCNT1L .EQU 04Ch ; var pData byte OCR1AH .EQU 04Bh ; var pData byte OCR1AL .EQU 04Ah ; var pData byte OCR1BH .EQU 049h ; var pData byte OCR1BL .EQU 048h ; var pData byte ICR1H .EQU 047h ; var pData byte ICR1L .EQU 046h ; var pData byte TCCR2 .EQU 045h ; var pData byte TCCR2A .EQU 045h ; var pData byte TCNT2 .EQU 044h ; var pData byte OCR2 .EQU 043h ; var pData byte OCR2A .EQU 043h ; var pData byte ASSR .EQU 042h ; var pData byte WDTCR .EQU 041h ; var pData byte UBRR1H .EQU 040h ; var pData byte UBRRH .EQU 040h ; var pData byte UCSRC .EQU 040h ; var pData byte UCSR0C .EQU 040h ; var pData byte EEARH .EQU 03Fh ; var pData byte EEARL .EQU 03Eh ; var pData byte EEDR .EQU 03Dh ; var pData byte EECR .EQU 03Ch ; var pData byte PORTB .EQU 038h ; var pData byte DDRB .EQU 037h ; var pData byte PINB .EQU 036h ; var pData byte MASKB .EQU 03Fh ; var pData byte PORTC .EQU 035h ; var pData byte DDRC .EQU 034h ; var pData byte PINC .EQU 033h ; var pData byte MASKC .EQU 03Fh ; var pData byte PORTD .EQU 032h ; var pData byte DDRD .EQU 031h ; var pData byte PIND .EQU 030h ; var pData byte SPDR .EQU 02Fh ; var pData byte SPSR .EQU 02Eh ; var pData byte SPCR .EQU 02Dh ; var pData byte UDR1 .EQU 02Ch ; var pData byte USR1 .EQU 02Bh ; var pData byte UCSRA .EQU 02Bh ; var pData byte UCR1 .EQU 02Ah ; var pData byte UCSRB .EQU 02Ah ; var pData byte UBRR1 .EQU 029h ; var pData byte UBRRL .EQU 029h ; var pData byte ACSR .EQU 028h ; var pData byte ADMUX .EQU 027h ; var pData byte ADCSR .EQU 026h ; var pData byte ADCSRA .EQU 026h ; var pData byte ADCH .EQU 025h ; var pData byte ADCL .EQU 024h ; var pData byte TWDR .EQU 023h ; var pData byte TWAR .EQU 022h ; var pData byte TWSR .EQU 021h ; var pData byte TWBR .EQU 020h ; var pData byte TCNT1 .EQU 04Ch ; var pData word OCR1A .EQU 04Ah ; var pData word OCR1B .EQU 048h ; var pData word ICR1 .EQU 046h ; var pData word EEAR .EQU 03Eh ; var pData word ADC .EQU 025h ; var pData word _iDataStart .EQU 060h ; const _iDataEnd .EQU 45Fh ; const _EEpromStart .EQU 000h ; const _EEpromEnd .EQU 1FFh ; const _FlashStart .EQU 000h ; const _FlashEnd .EQU 1FFFh ; const parNone .EQU 000h ; const parEven .EQU 001h ; const parOdd .EQU 002h ; const DataBit5 .EQU 000h ; const DataBit6 .EQU 001h ; const DataBit7 .EQU 002h ; const DataBit8 .EQU 003h ; const StopBit1 .EQU 000h ; const StopBit2 .EQU 001h ; const _RXINP .EQU 060h ; var iData byte _RXOUTP .EQU 061h ; var iData byte _RXCOUNT .EQU 062h ; var iData byte _RXBUFF .EQU 063h ; var iData byte _TXINP .EQU 073h ; var iData byte _TXOUTP .EQU 074h ; var iData byte _TXCOUNT .EQU 075h ; var iData byte _TXBUFF .EQU 076h ; var iData byte TWI_BR100 .EQU 020h ; const TWI_BR400 .EQU 00Ah ; const SysTickTime .EQU 086h ; var iData byte RTC_TICKCNT .EQU 089h ; var iData integer RTC_TICKS .EQU 08Bh ; var iData integer RTC_SECOND .EQU 08Dh ; var iData byte RTC_MINUTE .EQU 08Eh ; var iData byte RTC_HOUR .EQU 08Fh ; var iData byte RTC_TIMER_STAT_0 .EQU 090h ; var iData byte RTC_TIMER_0 .EQU 091h ; var iData longword _TWI_TO .EQU 095h ; var iData byte TWI_DevLock .EQU 096h ; var iData DeviceLock EEPROM .EQU 000h ; var EEprom array .RESET 000000h .ORG 0, CODE_START .STARTCODE 000026h .XDATASTART -1 ; ============ user definitions module: ADAC ============ ;SweepFak .EQU '$000'; const String ADAC.DDRBinit .EQU 03Fh ; const byte 63 ADAC.PortBinit .EQU 0EFh ; const byte 239 ADAC.DDRCinit .EQU 00Ch ; const byte 12 ADAC.PortCinit .EQU 0FFh ; const byte 255 ADAC.DDRDinit .EQU 004h ; const byte 4 ADAC.PortDinit .EQU 0FCh ; const byte 252 ADAC.LEDOutPort .EQU 032h ; const byte 50 ADAC.DDSOutPort .EQU 038h ; const byte 56 ADAC.b_SCLK .EQU 000h ; const byte 0 ADAC.b_SDATA .EQU 001h ; const byte 1 ADAC.b_FSYNC .EQU 002h ; const byte 2 ADAC.b_LOADPOT .EQU 003h ; const byte 3 ADAC.b_STROBE .EQU 004h ; const byte 4 ADAC.b_SerAux .EQU 005h ; const byte 5 ;Vers1Str .EQU 'ADA-C V#0.02'; const String ;Vers2Str .EQU 'C.Meyer 09/2006'; const String ;StopStr .EQU 'STOP'; const String ADAC.high .EQU 0FFh ; const boolean true ADAC.low .EQU 000h ; const boolean false ADAC.EEPatchArray .EQU 00000h ; var EEprom array .SYM EEPatchArray, 00000h, 0403Dh, 3 .SYM i, 00007h, 0000Dh, 3 ADAC.i .EQU 007h ; var Data byte .SYM k, 00008h, 0000Dh, 3 ADAC.k .EQU 008h ; var Data byte .SYM m, 00009h, 0000Dh, 3 ADAC.m .EQU 009h ; var Data byte .SYM SweepStarted, 00097h, 00003h, 3 ADAC.SweepStarted .EQU 097h ; var iData boolean .SYM DDSfrequ, 00098h, 00005h, 3 ADAC.DDSfrequ .EQU 098h ; var iData longint .SYM AktuelleFrequenz, 0009Ch, 00005h, 3 ADAC.AktuelleFrequenz .EQU 09Ch ; var iData longint .SYM FrequFak, 000A0h, 00005h, 3 ADAC.FrequFak .EQU 0A0h ; var iData longint .SYM BurstCount, 000A4h, 0000Dh, 3 ADAC.BurstCount .EQU 0A4h ; var iData byte .SYM SweepOnce, 000A5h, 00003h, 3 ADAC.SweepOnce .EQU 0A5h ; var iData boolean .SYM BurstPrime, 000A6h, 00003h, 3 ADAC.BurstPrime .EQU 0A6h ; var iData boolean .SYM Modified, 000A7h, 00003h, 3 ADAC.Modified .EQU 0A7h ; var iData boolean .SYM aBool, 000A8h, 00003h, 3 ADAC.aBool .EQU 0A8h ; var iData boolean .SYM MemoryNum, 000A9h, 0000Dh, 3 ADAC.MemoryNum .EQU 0A9h ; var iData byte .SYM SweepUpper, 000AAh, 00005h, 3 ADAC.SweepUpper .EQU 0AAh ; var iData longint .SYM EditArray, 000AEh, 0003Dh, 3 ADAC.EditArray .EQU 0AEh ; var iData array .SYM Edit1, 000AEh, 0000Dh, 3 ADAC.Edit1 .EQU 0AEh ; var iData byte .SYM Frequenz, 000AEh, 00005h, 3 ADAC.Frequenz .EQU 0AEh ; var iData longint .SYM SweepRange, 000B6h, 0000Dh, 3 ADAC.SweepRange .EQU 0B6h ; var iData byte .SYM SweepTime, 000B7h, 0000Dh, 3 ADAC.SweepTime .EQU 0B7h ; var iData byte .SYM BurstMode, 000B8h, 0000Dh, 3 ADAC.BurstMode .EQU 0B8h ; var iData byte .SYM Wave, 000B9h, 0000Dh, 3 ADAC.Wave .EQU 0B9h ; var iData byte .SYM AttnStep, 000BAh, 0000Dh, 3 ADAC.AttnStep .EQU 0BAh ; var iData byte .SYM SaveArray, 000BEh, 0003Dh, 3 ADAC.SaveArray .EQU 0BEh ; var iData array .SYM Save1, 000BEh, 0000Dh, 3 ADAC.Save1 .EQU 0BEh ; var iData byte ADAC.EditString .EQU 0CEh ; var iData string .SYM EditString, 000CEh, 0303Ch, 3 .SYM EditString1, 000CFh, 0000Ch, 3 ADAC.EditString1 .EQU 0CFh ; var iData char ADAC.SaveEditString .EQU 0DFh ; var iData string .SYM SaveEditString, 000DFh, 0303Ch, 3 ADAC.LevelStr .EQU 0F0h ; var iData string .SYM LevelStr, 000F0h, 0303Ch, 3 ADAC.FreqStr .EQU 0F8h ; var iData string .SYM FreqStr, 000F8h, 0303Ch, 3 ADAC.BurstTimer .EQU 101h ; var iData byte .SYM BurstTimer, 00101h, 0000Dh, 3 ADAC.EditArrayLen .EQU 00Dh ; const byte 13 .FUNC PatchCopyFromEE, 000A8h, 00020h ADAC.PatchCopyFromEE: SBIW _FRAMEPTR, 2 .BLOCK 171 .LINE 172 LDS _ACCA, ADAC.MemoryNum MOV _ACCB, _ACCA CLR _ACCA LDI _ACCBLO, 0000Dh AND 0FFh LDI _ACCBHI, 0000Dh SHRB 8 CLT BLD Flags, _SIGN RCALL SYSTEM.MUL16 STD Y+001h, _ACCA STD Y+000h, _ACCB .LINE 173 LDI _ACCCLO, ADAC.i AND 0FFh LDI _ACCCHI, ADAC.i SHRB 8 ST -Y, _ACCCHI ST -Y, _ACCCLO .FRAME 2 LDI _ACCA, 000h ST Z, _ACCA LDI _ACCA, 00Ch ST -Y, _ACCA .FRAME 3 LD _ACCA, Z ADAC._L0002: LDD _ACCB, Y+000h CP _ACCB, _ACCA LDI _ACCA, 0FFh BRLO ADAC._L0003 CLR _ACCA ADAC._L0003: TST _ACCA .BRANCH 3,ADAC._L0004 BREQ ADAC._L0004 .BRANCH 20,ADAC._L0001 RJMP ADAC._L0001 ADAC._L0004: .BLOCK 174 .LINE 174 MOV _ACCA, ADAC.i PUSH _ACCA LDI _ACCCLO, ADAC.EEPatchArray AND 0FFh LDI _ACCCHI, ADAC.EEPatchArray SHRB 8 PUSH _ACCCLO PUSH _ACCCHI LDD _ACCB, Y+003h LDD _ACCA, Y+004h PUSH _ACCB PUSH _ACCA MOV _ACCA, ADAC.i MOV _ACCB, _ACCA CLR _ACCA POP _ACCAHI POP _ACCALO ADD _ACCB, _ACCALO ADC _ACCA, _ACCAHI POP _ACCCHI POP _ACCCLO ADD _ACCCLO, _ACCB ADC _ACCCHI, _ACCA RCALL SYSTEM.ReadEEp8 LDI _ACCCLO, ADAC.EditArray AND 0FFh LDI _ACCCHI, ADAC.EditArray SHRB 8 POP _ACCBLO ANDI _ACCBLO, 15 CLR _ACCBHI ADD _ACCCLO, _ACCBLO ADC _ACCCHI, _ACCBHI ST Z, _ACCA .ENDBLOCK 175 ADAC._L0000: .LINE 175 LDD _ACCCLO, Y+001h LDD _ACCCHI, Y+002h LD _ACCA, Z INC _ACCA ST Z, _ACCA TST _ACCA .BRANCH 3,ADAC._L0001 BREQ ADAC._L0001 .BRANCH 20,ADAC._L0002 RJMP ADAC._L0002 ADAC._L0001: ADIW _FRAMEPTR, 3 .FRAME 0 .ENDBLOCK 176 ADAC.PatchCopyFromEE_X: .LINE 176 .BRANCH 19 RET .ENDFUNC 176 .FUNC SerCRLF, 000BAh, 00020h ADAC.SerCRLF: .BLOCK 187 .LINE 188 LDI _ACCA, 00Dh .FRAME 0 RCALL SYSTEM.SEROUT .LINE 189 LDI _ACCA, 00Ah .FRAME 0 RCALL SYSTEM.SEROUT .ENDBLOCK 190 ADAC.SerCRLF_X: .LINE 190 .BRANCH 19 RET .ENDFUNC 190 .FUNC serprompt, 000C0h, 00020h ADAC.serprompt: .BLOCK 193 .LINE 194 LDD _ACCA, Y+000h TST _ACCA .BRANCH 4,ADAC._L0007 BRNE ADAC._L0007 .BRANCH 20,ADAC._L0005 RJMP ADAC._L0005 ADAC._L0007: .BLOCK 194 .LINE 195 LDI _ACCA, 03Dh .FRAME 0 RCALL SYSTEM.SEROUT .ENDBLOCK 196 .BRANCH 20,ADAC._L0006 RJMP ADAC._L0006 ADAC._L0005: .BLOCK 196 .LINE 197 LDI _ACCA, 03Fh .FRAME 0 RCALL SYSTEM.SEROUT .ENDBLOCK 198 ADAC._L0006: .LINE 199 LDI _ACCA, 03Eh .FRAME 0 RCALL SYSTEM.SEROUT .LINE 200 .BRANCH 17,ADAC.SERCRLF RCALL ADAC.SERCRLF .LINE 201 LDD _ACCA, Y+000h STS ADAC.ABOOL, _ACCA .ENDBLOCK 202 ADAC.serprompt_X: .LINE 202 .BRANCH 19 RET .ENDFUNC 202 .FUNC BurstGen, 000CDh, 00020h ADAC.BurstGen: .BLOCK 207 .LINE 208 LDS _ACCA, ADAC.BurstMode CPI _ACCA, 000h LDI _ACCA, 0h BREQ ADAC._L0008 SER _ACCA ADAC._L0008: TST _ACCA .BRANCH 4,ADAC._L0011 BRNE ADAC._L0011 .BRANCH 20,ADAC._L0009 RJMP ADAC._L0009 ADAC._L0011: .BLOCK 208 .LINE 209 SER _ACCA LDS _ACCB, ADAC.BurstTimer TST _ACCB BREQ ADAC._L0012 COM _ACCA ADAC._L0012: TST _ACCA .BRANCH 4,ADAC._L0015 BRNE ADAC._L0015 .BRANCH 20,ADAC._L0013 RJMP ADAC._L0013 ADAC._L0015: .BLOCK 209 .LINE 210 LDI _ACCA, 00Ah STS ADAC.BurstTimer, _ACCA .LINE 211 LDS _ACCA, ADAC.BurstCount DEC _ACCA STS ADAC.BurstCount, _ACCA .LINE 212 LDS _ACCA, ADAC.BurstCount CPI _ACCA, 000h LDI _ACCA, 0h BRNE ADAC._L0016 SER _ACCA ADAC._L0016: TST _ACCA .BRANCH 4,ADAC._L0019 BRNE ADAC._L0019 .BRANCH 20,ADAC._L0017 RJMP ADAC._L0017 ADAC._L0019: .BLOCK 212 .LINE 215 LDS _ACCA, ADAC.BurstMode SUBI _ACCA, -001h AND 0FFh STS ADAC.BURSTCOUNT, _ACCA .LINE 216 LDI _ACCA, 0FFh STS ADAC.BURSTPRIME, _ACCA .ENDBLOCK 217 ADAC._L0017: ADAC._L0018: .ENDBLOCK 218 ADAC._L0013: ADAC._L0014: .LINE 219 LDS _ACCA, ADAC.BurstCount CPI _ACCA, 001h LDI _ACCA, 0h BRNE ADAC._L0020 SER _ACCA ADAC._L0020: TST _ACCA .BRANCH 4,ADAC._L0023 BRNE ADAC._L0023 .BRANCH 20,ADAC._L0021 RJMP ADAC._L0021 ADAC._L0023: .BLOCK 219 .LINE 220 LDS _ACCA, ADAC.BurstPrime TST _ACCA .BRANCH 4,ADAC._L0026 BRNE ADAC._L0026 .BRANCH 20,ADAC._L0024 RJMP ADAC._L0024 ADAC._L0026: .BLOCK 220 .LINE 223 LDI _ACCA, 000h STS ADAC.BURSTPRIME, _ACCA .ENDBLOCK 224 ADAC._L0024: ADAC._L0025: .ENDBLOCK 225 ADAC._L0021: ADAC._L0022: .ENDBLOCK 226 ADAC._L0009: ADAC._L0010: .ENDBLOCK 227 ADAC.BurstGen_X: .LINE 227 .BRANCH 19 RET .ENDFUNC 227 .FUNC SerOutFreq, 000E5h, 00020h ADAC.SerOutFreq: SBIW _FRAMEPTR, 2 .BLOCK 233 .LINE 234 LDI _ACCCLO, ADAC.FreqStr AND 0FFh LDI _ACCCHI, ADAC.FreqStr SHRB 8 PUSH _ACCCLO PUSH _ACCCHI ADIW _ACCCLO, 1 ST -Y, _ACCCHI ST -Y, _ACCCLO LDI _ACCA, 008h ST -Y, _ACCA LDI _ACCA, 0FEH ROLB _DEVICE AND Flags, _ACCA LDI _ACCA, 0FEH ROLB _EEPROM AND Flags, _ACCA .FRAME 3 LDD _ACCAHI, Y+008h LDD _ACCALO, Y+007h LDD _ACCA, Y+006h LDD _ACCB, Y+005h PUSH _FRAMEPTR PUSH _FPTRHI ST -Y, _ACCAHI ST -Y, _ACCALO ST -Y, _ACCA ST -Y, _ACCB .FRAME 7 LDI _ACCA, 000h ST -Y, _ACCA LDI _ACCA, 000h ST -Y, _ACCA LDI _ACCA, 020h ST -Y, _ACCA .FRAME 10 SET BLD Flags, _SIGN RCALL SYSTEM.Long2Str .FRAME 3 POP _FPTRHI POP _FRAMEPTR LDI _ACCA, 008h PUSH _ACCA LDD _ACCA, Y+000h POP _ACCB SUB _ACCB, _ACCA MOV _ACCA, _ACCB POP _ACCCHI POP _ACCCLO ST Z, _ACCA ADIW _FRAMEPTR, 3 .FRAME 0 .LINE 235 LDI _ACCCLO, ADAC.FreqStr AND 0FFh LDI _ACCCHI, ADAC.FreqStr SHRB 8 LD _ACCA, Z STD Y+000h, _ACCA .LINE 236 LDI _ACCCLO, ADAC.FreqStr AND 0FFh LDI _ACCCHI, ADAC.FreqStr SHRB 8 PUSH _ACCCLO PUSH _ACCCHI LDD _ACCA, Y+000h POP _ACCCHI POP _ACCCLO MOV _ACCB, _ACCA CLR _ACCA ADD _ACCCLO, _ACCB ADC _ACCCHI, _ACCA LD _ACCA, Z+ STD Y+001h, _ACCA .LINE 237 MOVW _ACCCLO, _FRAMEPTR LD _ACCA, Z DEC _ACCA ST Z, _ACCA .LINE 238 LDI _ACCCLO, ADAC.freqStr AND 0FFh LDI _ACCCHI, ADAC.freqStr SHRB 8 PUSH _ACCCLO PUSH _ACCCHI LDD _ACCA, Y+000h POP _ACCCHI POP _ACCCLO CPI _ACCA, 8 BRCS ADAC._L0027 LDI _ACCA, 8 ADAC._L0027: ST Z+, _ACCA .LINE 239 PUSH _FRAMEPTR PUSH _FPTRHI LDI _ACCA, 1 SHLB _DEVICE OR Flags, _ACCA LDI _ACCB, SYSTEM.serout SHRB 1 LDI _ACCA, SYSTEM.serout SHRB 9 ST -Y, _ACCA ST -Y, _ACCB .FRAME 2 LDI _ACCCLO, ADAC.freqStr AND 0FFh LDI _ACCCHI, ADAC.freqStr SHRB 8 RCALL SYSTEM.StrVar2Str POP _FPTRHI POP _FRAMEPTR .FRAME 0 .LINE 240 LDI _ACCA, 02Eh .FRAME 0 RCALL SYSTEM.SEROUT .LINE 241 LDD _ACCA, Y+001h .FRAME 0 RCALL SYSTEM.SEROUT .ENDBLOCK 242 ADAC.SerOutFreq_X: .LINE 242 .BRANCH 19 RET .ENDFUNC 242 .FUNC SetSweepUpper, 000F4h, 00020h ADAC.SetSweepUpper: .BLOCK 246 .LINE 247 LDS _ACCA, ADAC.SweepRange LDI _ACCCLO, ADAC.SweepFak AND 0FFh LDI _ACCCHI, ADAC.SweepFak SHRB 8 ANDI _ACCA, 15 CLR _ACCB LSL _ACCA ROL _ACCB ADD _ACCCLO, _ACCA ADC _ACCCHI, _ACCB LPM _ACCB, Z+ LPM _ACCA, Z CLR _ACCAHI CLR _ACCALO STS ADAC.SWEEPUPPER, _ACCB STS ADAC.SWEEPUPPER+1, _ACCA STS ADAC.SWEEPUPPER+2, _ACCALO STS ADAC.SWEEPUPPER+3, _ACCAHI .LINE 248 LDS _ACCB, ADAC.SweepUpper LDS _ACCA, ADAC.SweepUpper+1 LDS _ACCALO, ADAC.SweepUpper+2 LDS _ACCAHI, ADAC.SweepUpper+3 PUSH _ACCB PUSH _ACCA PUSH _ACCALO PUSH _ACCAHI LDS _ACCB, ADAC.Frequenz LDS _ACCA, ADAC.Frequenz+1 LDS _ACCALO, ADAC.Frequenz+2 LDS _ACCAHI, ADAC.Frequenz+3 SET BLD Flags, _SIGN RCALL SYSTEM.MUL32 STS ADAC.SWEEPUPPER, _ACCB STS ADAC.SWEEPUPPER+1, _ACCA STS ADAC.SWEEPUPPER+2, _ACCALO STS ADAC.SWEEPUPPER+3, _ACCAHI .LINE 249 LDI _ACCA, 000h STS ADAC.SWEEPSTARTED, _ACCA .ENDBLOCK 250 ADAC.SetSweepUpper_X: .LINE 250 .BRANCH 19 RET .ENDFUNC 250 .FUNC SweepGen, 000FCh, 00020h ADAC.SweepGen: .BLOCK 254 .LINE 255 LDS _ACCA, ADAC.SweepRange CPI _ACCA, 000h LDI _ACCA, 0h BREQ ADAC._L0028 SER _ACCA ADAC._L0028: TST _ACCA .BRANCH 4,ADAC._L0031 BRNE ADAC._L0031 .BRANCH 20,ADAC._L0029 RJMP ADAC._L0029 ADAC._L0031: .BLOCK 255 .LINE 257 LDS _ACCA, ADAC.SweepStarted COM _ACCA TST _ACCA .BRANCH 4,ADAC._L0034 BRNE ADAC._L0034 .BRANCH 20,ADAC._L0032 RJMP ADAC._L0032 ADAC._L0034: .BLOCK 257 .LINE 258 LDS _ACCA, ADAC.SweepTime STS ADAC.BurstTimer, _ACCA .LINE 261 LDI _ACCA, 0FFh STS ADAC.SWEEPSTARTED, _ACCA .ENDBLOCK 262 ADAC._L0032: ADAC._L0033: .LINE 263 SER _ACCA LDS _ACCB, ADAC.BurstTimer TST _ACCB BREQ ADAC._L0035 COM _ACCA ADAC._L0035: TST _ACCA .BRANCH 4,ADAC._L0038 BRNE ADAC._L0038 .BRANCH 20,ADAC._L0036 RJMP ADAC._L0036 ADAC._L0038: .BLOCK 263 .LINE 264 LDS _ACCA, ADAC.SweepTime STS ADAC.BurstTimer, _ACCA .LINE 265 LDS _ACCB, ADAC.AktuelleFrequenz LDS _ACCA, ADAC.AktuelleFrequenz+1 LDS _ACCALO, ADAC.AktuelleFrequenz+2 LDS _ACCAHI, ADAC.AktuelleFrequenz+3 LDI _ACCDLO, 000000065h AND 0FFh LDI _ACCDHI, 000000065h SHRB 8 LDI _ACCELO, 000000065h SHRB 16 LDI _ACCEHI, 000000065h SHRB 24 SET BLD Flags, _SIGN RCALL SYSTEM.MUL32_R MOVW _ACCDLO, _ACCB MOVW _ACCELO, _ACCALO LDI _ACCBLO, 000000064h AND 0FFh LDI _ACCBHI, 000000064h SHRB 8 LDI _ACCCLO, 000000064h SHRB 16 LDI _ACCCHI, 000000064h SHRB 24 SET BLD Flags, _SIGN RCALL SYSTEM.DIV32_R STS ADAC.AKTUELLEFREQUENZ, _ACCB STS ADAC.AKTUELLEFREQUENZ+1, _ACCA STS ADAC.AKTUELLEFREQUENZ+2, _ACCALO STS ADAC.AKTUELLEFREQUENZ+3, _ACCAHI .LINE 267 LDS _ACCB, ADAC.AktuelleFrequenz LDS _ACCA, ADAC.AktuelleFrequenz+1 LDS _ACCALO, ADAC.AktuelleFrequenz+2 LDS _ACCAHI, ADAC.AktuelleFrequenz+3 PUSH _ACCB PUSH _ACCA PUSH _ACCALO PUSH _ACCAHI LDS _ACCB, ADAC.SweepUpper LDS _ACCA, ADAC.SweepUpper+1 LDS _ACCALO, ADAC.SweepUpper+2 LDS _ACCAHI, ADAC.SweepUpper+3 MOVW _ACCBLO, _ACCB MOVW _ACCCLO, _ACCALO POP _ACCAHI POP _ACCALO POP _ACCA POP _ACCB LDI _ACCDLO, 080h EOR _ACCCHI, _ACCDLO EOR _ACCAHI, _ACCDLO CP _ACCAHI, _ACCCHI BRNE ADAC._L0039 CP _ACCALO, _ACCCLO BRNE ADAC._L0039 CP _ACCA, _ACCBHI BRNE ADAC._L0039 CP _ACCB, _ACCBLO ADAC._L0039: LDI _ACCA, 0 BRLO ADAC._L0040 LDI _ACCA, 0FFh ADAC._L0040: TST _ACCA .BRANCH 4,ADAC._L0043 BRNE ADAC._L0043 .BRANCH 20,ADAC._L0041 RJMP ADAC._L0041 ADAC._L0043: .BLOCK 267 .LINE 268 LDI _ACCA, 000h STS ADAC.SWEEPSTARTED, _ACCA .LINE 269 LDS _ACCB, ADAC.Frequenz LDS _ACCA, ADAC.Frequenz+1 LDS _ACCALO, ADAC.Frequenz+2 LDS _ACCAHI, ADAC.Frequenz+3 STS ADAC.AKTUELLEFREQUENZ, _ACCB STS ADAC.AKTUELLEFREQUENZ+1, _ACCA STS ADAC.AKTUELLEFREQUENZ+2, _ACCALO STS ADAC.AKTUELLEFREQUENZ+3, _ACCAHI .LINE 270 LDS _ACCA, ADAC.SweepOnce TST _ACCA .BRANCH 4,ADAC._L0046 BRNE ADAC._L0046 .BRANCH 20,ADAC._L0044 RJMP ADAC._L0044 ADAC._L0046: .BLOCK 270 .LINE 271 LDI _ACCA, 000h STS ADAC.SWEEPRANGE, _ACCA .LINE 272 PUSH _FRAMEPTR PUSH _FPTRHI LDI _ACCA, 1 SHLB _DEVICE OR Flags, _ACCA LDI _ACCB, SYSTEM.serout SHRB 1 LDI _ACCA, SYSTEM.serout SHRB 9 ST -Y, _ACCA ST -Y, _ACCB .FRAME 2 LDI _ACCCLO, ADAC.StopStr AND 0FFh LDI _ACCCHI, ADAC.StopStr SHRB 8 LPM _ACCBHI, Z+ TST _ACCBHI BREQ ADAC._L0047 RCALL SYSTEM.StrConst2Str ADAC._L0047: POP _FPTRHI POP _FRAMEPTR .FRAME 0 .LINE 273 .BRANCH 17,ADAC.SERCRLF RCALL ADAC.SERCRLF .LINE 274 PUSH _FRAMEPTR PUSH _FPTRHI LDI _ACCA, 0FFh ST -Y, _ACCA .FRAME 1 .FRAME 0 .BRANCH 17,ADAC.SERPROMPT RCALL ADAC.SERPROMPT POP _FPTRHI POP _FRAMEPTR .LINE 275 LDI _ACCA, 000h STS ADAC.SWEEPONCE, _ACCA .LINE 276 LDS _ACCB, ADAC.Frequenz LDS _ACCA, ADAC.Frequenz+1 LDS _ACCALO, ADAC.Frequenz+2 LDS _ACCAHI, ADAC.Frequenz+3 STS ADAC.AKTUELLEFREQUENZ, _ACCB STS ADAC.AKTUELLEFREQUENZ+1, _ACCA STS ADAC.AKTUELLEFREQUENZ+2, _ACCALO STS ADAC.AKTUELLEFREQUENZ+3, _ACCAHI .ENDBLOCK 278 ADAC._L0044: ADAC._L0045: .ENDBLOCK 279 ADAC._L0041: ADAC._L0042: .ENDBLOCK 280 ADAC._L0036: ADAC._L0037: .ENDBLOCK 290 .BRANCH 20,ADAC._L0030 RJMP ADAC._L0030 ADAC._L0029: .BLOCK 290 .LINE 291 LDS _ACCB, ADAC.Frequenz LDS _ACCA, ADAC.Frequenz+1 LDS _ACCALO, ADAC.Frequenz+2 LDS _ACCAHI, ADAC.Frequenz+3 STS ADAC.AKTUELLEFREQUENZ, _ACCB STS ADAC.AKTUELLEFREQUENZ+1, _ACCA STS ADAC.AKTUELLEFREQUENZ+2, _ACCALO STS ADAC.AKTUELLEFREQUENZ+3, _ACCAHI .LINE 292 LDS _ACCA, ADAC.SweepOnce TST _ACCA .BRANCH 4,ADAC._L0050 BRNE ADAC._L0050 .BRANCH 20,ADAC._L0048 RJMP ADAC._L0048 ADAC._L0050: .BLOCK 292 .LINE 293 LDI _ACCA, 000h STS ADAC.SWEEPONCE, _ACCA .ENDBLOCK 295 ADAC._L0048: ADAC._L0049: .ENDBLOCK 296 ADAC._L0030: .ENDBLOCK 297 ADAC.SweepGen_X: .LINE 297 .BRANCH 19 RET .ENDFUNC 297 .FUNC ParseCmd, 0012Bh, 00020h ADAC.ParseCmd: LDI _ACCBLO, 89 AND 0FFh LDI _ACCBHI, 89 SHRB 8 SUB _FRAMEPTR, _ACCBLO SBC _FPTRHI, _ACCBHI .BLOCK 309 .LINE 310 MOVW _ACCCLO, _FRAMEPTR ADIW _ACCCLO, 000019h ST -Y, _ACCCHI ST -Y, _ACCCLO ADIW _ACCCLO, 00001h .FRAME 2 LDI _ACCA, 00Dh MOV _ACCDLO, _ACCA LDI _ACCBHI, 03Fh CLT BLD Flags, _ERRFLAG CLR _ACCBLO ADAC._L0052: PUSH _ACCCLO PUSH _ACCCHI PUSH _ACCBLO PUSH _ACCBHI PUSH _ACCDLO PUSH _FRAMEPTR PUSH _FPTRHI RCALL SYSTEM.SerInp POP _FPTRHI POP _FRAMEPTR POP _ACCDLO POP _ACCBHI POP _ACCBLO POP _ACCCHI POP _ACCCLO CP _ACCA, _ACCDLO BRNE ADAC._L0054 CPI _ACCDLO, 10 BREQ ADAC._L0053 LDI _ACCDLO, 10 RJMP ADAC._L0052 ADAC._L0054: ST Z+, _ACCA INC _ACCBLO DEC _ACCBHI BRNE ADAC._L0052 ADAC._L0053: LDD _ACCCLO, Y+000h LDD _ACCCHI, Y+001h ADIW _FRAMEPTR, 2 .FRAME 0 ST Z, _ACCBLO .LINE 311 MOVW _ACCCLO, _FRAMEPTR ADIW _ACCCLO, 000019h PUSH _ACCCLO PUSH _ACCCHI ADIW _ACCCLO, 1 ST -Y, _ACCCHI ST -Y, _ACCCLO LDI _ACCA, 03Fh ST -Y, _ACCA LDI _ACCA, 0FEH ROLB _DEVICE AND Flags, _ACCA LDI _ACCA, 0FEH ROLB _EEPROM AND Flags, _ACCA .FRAME 3 MOVW _ACCCLO, _FRAMEPTR ADIW _ACCCLO, 00001Ch RCALL SYSTEM.UpperCaseStr LDI _ACCA, 03Fh PUSH _ACCA LDD _ACCA, Y+000h POP _ACCB SUB _ACCB, _ACCA MOV _ACCA, _ACCB POP _ACCCHI POP _ACCCLO ST Z, _ACCA ADIW _FRAMEPTR, 3 .FRAME 0 .LINE 312 MOVW _ACCCLO, _FRAMEPTR ADIW _ACCCLO, 000019h LD _ACCA, Z CPI _ACCA, 000h LDI _ACCA, 0h BRNE ADAC._L0056 SER _ACCA ADAC._L0056: TST _ACCA .BRANCH 4,ADAC._L0059 BRNE ADAC._L0059 .BRANCH 20,ADAC._L0057 RJMP ADAC._L0057 ADAC._L0059: .BLOCK 312 .LINE 313 PUSH _FRAMEPTR PUSH _FPTRHI LDI _ACCA, 0FFh ST -Y, _ACCA .FRAME 1 .FRAME 0 .BRANCH 17,ADAC.SERPROMPT RCALL ADAC.SERPROMPT POP _FPTRHI POP _FRAMEPTR .LINE 314 .BRANCH 20,ADAC.ParseCmd_X RJMP ADAC.ParseCmd_X .ENDBLOCK 315 ADAC._L0057: ADAC._L0058: .LINE 317 LDI _ACCA, 020h PUSH _ACCA MOVW _ACCCLO, _FRAMEPTR ADIW _ACCCLO, 000019h PUSH _ACCCLO PUSH _ACCCHI LDI _ACCELO, 001h POP _ACCCHI POP _ACCCLO POP _ACCB RCALL SYSTEM.PosChInVarStr MOV ADAC.I, _ACCA .LINE 318 LDI _ACCA, 03Fh PUSH _ACCA MOVW _ACCCLO, _FRAMEPTR ADIW _ACCCLO, 000019h PUSH _ACCCLO PUSH _ACCCHI LDI _ACCELO, 001h POP _ACCCHI POP _ACCCLO POP _ACCB RCALL SYSTEM.PosChInVarStr CPI _ACCA, 001h LDI _ACCA, 0h BREQ ADAC._L0060 BRLO ADAC._L0060 SER _ACCA ADAC._L0060: STD Y+002h, _ACCA .LINE 319 MOVW _ACCCLO, _FRAMEPTR ADIW _ACCCLO, 000019h ADIW _ACCCLO, 00001h LD _ACCA, Z+ STD Y+001h, _ACCA .LINE 320 MOVW _ACCCLO, _FRAMEPTR ADIW _ACCCLO, 000019h ADIW _ACCCLO, 00002h LD _ACCA, Z+ STD Y+000h, _ACCA .LINE 321 MOVW _ACCCLO, _FRAMEPTR ADIW _ACCCLO, 000009h PUSH _ACCCLO PUSH _ACCCHI ADIW _ACCCLO, 1 ST -Y, _ACCCHI ST -Y, _ACCCLO LDI _ACCA, 00Fh ST -Y, _ACCA LDI _ACCA, 0FEH ROLB _DEVICE AND Flags, _ACCA LDI _ACCA, 0FEH ROLB _EEPROM AND Flags, _ACCA .FRAME 3 MOVW _ACCCLO, _FRAMEPTR ADIW _ACCCLO, 00001Ch PUSH _ACCCLO PUSH _ACCCHI MOV _ACCA, ADAC.i SUBI _ACCA, -001h AND 0FFh PUSH _ACCA LDI _ACCA, 00Fh POP _ACCB POP _ACCCHI POP _ACCCLO RCALL SYSTEM.StrCopyV LDI _ACCA, 00Fh PUSH _ACCA LDD _ACCA, Y+000h POP _ACCB SUB _ACCB, _ACCA MOV _ACCA, _ACCB POP _ACCCHI POP _ACCCLO ST Z, _ACCA ADIW _FRAMEPTR, 3 .FRAME 0 .LINE 322 LDI _ACCA, 02Eh PUSH _ACCA MOVW _ACCCLO, _FRAMEPTR ADIW _ACCCLO, 000009h PUSH _ACCCLO PUSH _ACCCHI LDI _ACCELO, 001h POP _ACCCHI POP _ACCCLO POP _ACCB RCALL SYSTEM.PosChInVarStr MOV ADAC.I, _ACCA .LINE 323 LDI _ACCA, 000h STD Y+003h, _ACCA .LINE 324 MOV _ACCA, ADAC.i CPI _ACCA, 001h LDI _ACCA, 0h BREQ ADAC._L0061 BRLO ADAC._L0061 SER _ACCA ADAC._L0061: TST _ACCA .BRANCH 4,ADAC._L0064 BRNE ADAC._L0064 .BRANCH 20,ADAC._L0062 RJMP ADAC._L0062 ADAC._L0064: .BLOCK 324 .LINE 325 MOVW _ACCCLO, _FRAMEPTR ADIW _ACCCLO, 000009h PUSH _ACCCLO PUSH _ACCCHI ADIW _ACCCLO, 1 ST -Y, _ACCCHI ST -Y, _ACCCLO LDI _ACCA, 00Fh ST -Y, _ACCA LDI _ACCA, 0FEH ROLB _DEVICE AND Flags, _ACCA LDI _ACCA, 0FEH ROLB _EEPROM AND Flags, _ACCA .FRAME 3 MOVW _ACCCLO, _FRAMEPTR ADIW _ACCCLO, 00000Ch PUSH _ACCCLO PUSH _ACCCHI LDI _ACCA, 001h PUSH _ACCA MOV _ACCA, ADAC.i SUBI _ACCA, 001h AND 0FFh POP _ACCB POP _ACCCHI POP _ACCCLO RCALL SYSTEM.StrCopyV LDI _ACCA, 00Fh PUSH _ACCA LDD _ACCA, Y+000h POP _ACCB SUB _ACCB, _ACCA MOV _ACCA, _ACCB POP _ACCCHI POP _ACCCLO ST Z, _ACCA ADIW _FRAMEPTR, 3 .FRAME 0 .LINE 326 MOVW _ACCCLO, _FRAMEPTR ADIW _ACCCLO, 000009h PUSH _ACCCLO PUSH _ACCCHI MOV _ACCA, ADAC.i SUBI _ACCA, -001h AND 0FFh POP _ACCCHI POP _ACCCLO MOV _ACCB, _ACCA CLR _ACCA ADD _ACCCLO, _ACCB ADC _ACCCHI, _ACCA LD _ACCA, Z+ SUBI _ACCA, 030h AND 0FFh STD Y+003h, _ACCA .ENDBLOCK 327 ADAC._L0062: ADAC._L0063: .LINE 328 MOVW _ACCCLO, _FRAMEPTR ADIW _ACCCLO, 000009h LDI _ACCA, 0FEH ROLB _EEPROM AND Flags, _ACCA CLT BLD Flags, _ERRFLAG LDI _ACCB, 000h RCALL SYSTEM.Str2Int STD Y+008h, _ACCAHI STD Y+007h, _ACCALO STD Y+006h, _ACCA STD Y+005h, _ACCB .LINE 329 LDD _ACCAHI, Y+008h LDD _ACCALO, Y+007h LDD _ACCA, Y+006h LDD _ACCB, Y+005h MOV _ACCA, _ACCB STD Y+004h, _ACCA .LINE 330 LDI _ACCA, 0FFh STS ADAC.ABOOL, _ACCA .LINE 332 LDD _ACCA, Y+002h TST _ACCA .BRANCH 4,ADAC._L0067 BRNE ADAC._L0067 .BRANCH 20,ADAC._L0065 RJMP ADAC._L0065 ADAC._L0067: .BLOCK 332 .LINE 333 LDD _ACCA, Y+001h .LINE 334 CPI _ACCA, 42 .BRANCH 3,ADAC._L0071 BREQ ADAC._L0071 .BRANCH 20,ADAC._L0070 RJMP ADAC._L0070 ADAC._L0071: ADAC._L0069: .BLOCK 335 .LINE 335 LDD _ACCA, Y+000h CPI _ACCA, 049h LDI _ACCA, 0h BRNE ADAC._L0072 SER _ACCA ADAC._L0072: TST _ACCA .BRANCH 4,ADAC._L0075 BRNE ADAC._L0075 .BRANCH 20,ADAC._L0073 RJMP ADAC._L0073 ADAC._L0075: .BLOCK 335 .LINE 336 PUSH _FRAMEPTR PUSH _FPTRHI LDI _ACCA, 1 SHLB _DEVICE OR Flags, _ACCA LDI _ACCB, SYSTEM.Serout SHRB 1 LDI _ACCA, SYSTEM.Serout SHRB 9 ST -Y, _ACCA ST -Y, _ACCB .FRAME 2 LDI _ACCCLO, ADAC.Vers1Str AND 0FFh LDI _ACCCHI, ADAC.Vers1Str SHRB 8 LPM _ACCBHI, Z+ TST _ACCBHI BREQ ADAC._L0076 RCALL SYSTEM.StrConst2Str ADAC._L0076: POP _FPTRHI POP _FRAMEPTR .FRAME 0 .LINE 337 .BRANCH 17,ADAC.SERCRLF RCALL ADAC.SERCRLF .ENDBLOCK 338 .BRANCH 20,ADAC._L0074 RJMP ADAC._L0074 ADAC._L0073: .BLOCK 338 .LINE 339 PUSH _FRAMEPTR PUSH _FPTRHI LDI _ACCA, 000h ST -Y, _ACCA .FRAME 1 .FRAME 0 .BRANCH 17,ADAC.SERPROMPT RCALL ADAC.SERPROMPT POP _FPTRHI POP _FRAMEPTR .ENDBLOCK 340 ADAC._L0074: .ENDBLOCK 341 .BRANCH 20,ADAC._L0068 RJMP ADAC._L0068 ADAC._L0070: .LINE 342 CPI _ACCA, 70 .BRANCH 3,ADAC._L0079 BREQ ADAC._L0079 .BRANCH 20,ADAC._L0078 RJMP ADAC._L0078 ADAC._L0079: ADAC._L0077: .BLOCK 343 .LINE 343 PUSH _FRAMEPTR PUSH _FPTRHI LDS _ACCB, ADAC.AktuelleFrequenz LDS _ACCA, ADAC.AktuelleFrequenz+1 LDS _ACCALO, ADAC.AktuelleFrequenz+2 LDS _ACCAHI, ADAC.AktuelleFrequenz+3 ST -Y, _ACCAHI ST -Y, _ACCALO ST -Y, _ACCA ST -Y, _ACCB .FRAME 4 .FRAME 0 .BRANCH 17,ADAC.SEROUTFREQ RCALL ADAC.SEROUTFREQ POP _FPTRHI POP _FRAMEPTR .LINE 344 .BRANCH 17,ADAC.SERCRLF RCALL ADAC.SERCRLF .ENDBLOCK 345 .BRANCH 20,ADAC._L0068 RJMP ADAC._L0068 ADAC._L0078: .LINE 346 CPI _ACCA, 87 .BRANCH 3,ADAC._L0082 BREQ ADAC._L0082 .BRANCH 20,ADAC._L0081 RJMP ADAC._L0081 ADAC._L0082: ADAC._L0080: .BLOCK 347 .LINE 347 PUSH _FRAMEPTR PUSH _FPTRHI LDI _ACCA, 1 SHLB _DEVICE OR Flags, _ACCA LDI _ACCB, SYSTEM.serout SHRB 1 LDI _ACCA, SYSTEM.serout SHRB 9 ST -Y, _ACCA ST -Y, _ACCB .FRAME 2 LDS _ACCA, ADAC.wave PUSH _FRAMEPTR PUSH _FPTRHI ST -Y, _ACCA .FRAME 3 LDI _ACCA, 000h ST -Y, _ACCA LDI _ACCA, 000h ST -Y, _ACCA LDI _ACCA, 020h ST -Y, _ACCA .FRAME 6 RCALL SYSTEM.Byte2Str .FRAME 2 POP _FPTRHI POP _FRAMEPTR POP _FPTRHI POP _FRAMEPTR .FRAME 0 .LINE 348 .BRANCH 17,ADAC.SERCRLF RCALL ADAC.SERCRLF .ENDBLOCK 349 .BRANCH 20,ADAC._L0068 RJMP ADAC._L0068 ADAC._L0081: .LINE 350 CPI _ACCA, 76 .BRANCH 3,ADAC._L0085 BREQ ADAC._L0085 .BRANCH 20,ADAC._L0084 RJMP ADAC._L0084 ADAC._L0085: ADAC._L0083: .BLOCK 351 .LINE 351 PUSH _FRAMEPTR PUSH _FPTRHI LDI _ACCA, 1 SHLB _DEVICE OR Flags, _ACCA LDI _ACCB, SYSTEM.serout SHRB 1 LDI _ACCA, SYSTEM.serout SHRB 9 ST -Y, _ACCA ST -Y, _ACCB .FRAME 2 LDS _ACCA, ADAC.AttnStep PUSH _FRAMEPTR PUSH _FPTRHI ST -Y, _ACCA .FRAME 3 LDI _ACCA, 000h ST -Y, _ACCA LDI _ACCA, 000h ST -Y, _ACCA LDI _ACCA, 020h ST -Y, _ACCA .FRAME 6 RCALL SYSTEM.Byte2Str .FRAME 2 POP _FPTRHI POP _FRAMEPTR POP _FPTRHI POP _FRAMEPTR .FRAME 0 .LINE 352 .BRANCH 17,ADAC.SERCRLF RCALL ADAC.SERCRLF .ENDBLOCK 353 .BRANCH 20,ADAC._L0068 RJMP ADAC._L0068 ADAC._L0084: .LINE 354 CPI _ACCA, 86 .BRANCH 3,ADAC._L0088 BREQ ADAC._L0088 .BRANCH 20,ADAC._L0087 RJMP ADAC._L0087 ADAC._L0088: .BRANCH 20,ADAC._L0086 RJMP ADAC._L0086 ADAC._L0087: CPI _ACCA, 77 .BRANCH 3,ADAC._L0090 BREQ ADAC._L0090 .BRANCH 20,ADAC._L0089 RJMP ADAC._L0089 ADAC._L0090: ADAC._L0086: .BLOCK 355 .LINE 355 PUSH _FRAMEPTR PUSH _FPTRHI LDI _ACCA, 1 SHLB _DEVICE OR Flags, _ACCA LDI _ACCB, SYSTEM.Serout SHRB 1 LDI _ACCA, SYSTEM.Serout SHRB 9 ST -Y, _ACCA ST -Y, _ACCB .FRAME 2 RCALL SYSTEM.GETADC PUSH _FRAMEPTR PUSH _FPTRHI ST -Y, _ACCA ST -Y, _ACCB .FRAME 4 LDI _ACCA, 000h ST -Y, _ACCA LDI _ACCA, 000h ST -Y, _ACCA LDI _ACCA, 020h ST -Y, _ACCA .FRAME 7 CLT BLD Flags, _SIGN RCALL SYSTEM.Int2Str .FRAME 2 POP _FPTRHI POP _FRAMEPTR POP _FPTRHI POP _FRAMEPTR .FRAME 0 .LINE 356 .BRANCH 17,ADAC.SERCRLF RCALL ADAC.SERCRLF .ENDBLOCK 357 .BRANCH 20,ADAC._L0068 RJMP ADAC._L0068 ADAC._L0089: .BLOCK 358 .LINE 359 PUSH _FRAMEPTR PUSH _FPTRHI LDI _ACCA, 000h ST -Y, _ACCA .FRAME 1 .FRAME 0 .BRANCH 17,ADAC.SERPROMPT RCALL ADAC.SERPROMPT POP _FPTRHI POP _FRAMEPTR .ENDBLOCK 360 ADAC._L0068: .ENDBLOCK 362 .BRANCH 20,ADAC._L0066 RJMP ADAC._L0066 ADAC._L0065: .BLOCK 362 .LINE 362 LDD _ACCA, Y+001h .LINE 363 CPI _ACCA, 70 .BRANCH 3,ADAC._L0094 BREQ ADAC._L0094 .BRANCH 20,ADAC._L0093 RJMP ADAC._L0093 ADAC._L0094: ADAC._L0092: .BLOCK 364 .LINE 364 LDD _ACCAHI, Y+008h LDD _ACCALO, Y+007h LDD _ACCA, Y+006h LDD _ACCB, Y+005h LDI _ACCDLO, 00000000Ah AND 0FFh LDI _ACCDHI, 00000000Ah SHRB 8 LDI _ACCELO, 00000000Ah SHRB 16 LDI _ACCEHI, 00000000Ah SHRB 24 SET BLD Flags, _SIGN RCALL SYSTEM.MUL32_R PUSH _ACCB PUSH _ACCA PUSH _ACCALO PUSH _ACCAHI LDD _ACCA, Y+003h MOV _ACCB, _ACCA CLR _ACCA CLR _ACCAHI CLR _ACCALO POP _ACCCHI POP _ACCCLO POP _ACCBHI POP _ACCBLO ADD _ACCB, _ACCBLO ADC _ACCA, _ACCBHI ADC _ACCALO, _ACCCLO ADC _ACCAHI, _ACCCHI STS ADAC.AKTUELLEFREQUENZ, _ACCB STS ADAC.AKTUELLEFREQUENZ+1, _ACCA STS ADAC.AKTUELLEFREQUENZ+2, _ACCALO STS ADAC.AKTUELLEFREQUENZ+3, _ACCAHI .LINE 365 LDS _ACCB, ADAC.AktuelleFrequenz LDS _ACCA, ADAC.AktuelleFrequenz+1 LDS _ACCALO, ADAC.AktuelleFrequenz+2 LDS _ACCAHI, ADAC.AktuelleFrequenz+3 STS ADAC.FREQUENZ, _ACCB STS ADAC.FREQUENZ+1, _ACCA STS ADAC.FREQUENZ+2, _ACCALO STS ADAC.FREQUENZ+3, _ACCAHI .LINE 366 .BRANCH 17,ADAC.SETSWEEPUPPER RCALL ADAC.SETSWEEPUPPER .ENDBLOCK 367 .BRANCH 20,ADAC._L0091 RJMP ADAC._L0091 ADAC._L0093: .LINE 368 CPI _ACCA, 87 .BRANCH 3,ADAC._L0097 BREQ ADAC._L0097 .BRANCH 20,ADAC._L0096 RJMP ADAC._L0096 ADAC._L0097: ADAC._L0095: .BLOCK 369 .LINE 369 LDD _ACCA, Y+004h STS ADAC.WAVE, _ACCA .ENDBLOCK 370 .BRANCH 20,ADAC._L0091 RJMP ADAC._L0091 ADAC._L0096: .LINE 371 CPI _ACCA, 76 .BRANCH 3,ADAC._L0100 BREQ ADAC._L0100 .BRANCH 20,ADAC._L0099 RJMP ADAC._L0099 ADAC._L0100: ADAC._L0098: .BLOCK 372 .LINE 372 LDD _ACCA, Y+004h STS ADAC.ATTNSTEP, _ACCA .ENDBLOCK 373 .BRANCH 20,ADAC._L0091 RJMP ADAC._L0091 ADAC._L0099: .LINE 374 CPI _ACCA, 66 .BRANCH 3,ADAC._L0103 BREQ ADAC._L0103 .BRANCH 20,ADAC._L0102 RJMP ADAC._L0102 ADAC._L0103: ADAC._L0101: .BLOCK 375 .LINE 375 LDD _ACCA, Y+004h STS ADAC.BURSTMODE, _ACCA .ENDBLOCK 376 .BRANCH 20,ADAC._L0091 RJMP ADAC._L0091 ADAC._L0102: .LINE 377 CPI _ACCA, 83 .BRANCH 3,ADAC._L0106 BREQ ADAC._L0106 .BRANCH 20,ADAC._L0105 RJMP ADAC._L0105 ADAC._L0106: ADAC._L0104: .BLOCK 378 .LINE 378 LDD _ACCA, Y+004h STS ADAC.SWEEPRANGE, _ACCA .LINE 379 LDI _ACCA, 0FFh STS ADAC.SWEEPONCE, _ACCA .LINE 380 .BRANCH 17,ADAC.SETSWEEPUPPER RCALL ADAC.SETSWEEPUPPER .LINE 381 PUSH _FRAMEPTR PUSH _FPTRHI LDS _ACCB, ADAC.Frequenz LDS _ACCA, ADAC.Frequenz+1 LDS _ACCALO, ADAC.Frequenz+2 LDS _ACCAHI, ADAC.Frequenz+3 ST -Y, _ACCAHI ST -Y, _ACCALO ST -Y, _ACCA ST -Y, _ACCB .FRAME 4 .FRAME 0 .BRANCH 17,ADAC.SEROUTFREQ RCALL ADAC.SEROUTFREQ POP _FPTRHI POP _FRAMEPTR .LINE 382 LDI _ACCA, 02Ch .FRAME 0 RCALL SYSTEM.SEROUT .LINE 383 LDI _ACCA, 020h .FRAME 0 RCALL SYSTEM.SEROUT .LINE 384 PUSH _FRAMEPTR PUSH _FPTRHI LDS _ACCB, ADAC.SweepUpper LDS _ACCA, ADAC.SweepUpper+1 LDS _ACCALO, ADAC.SweepUpper+2 LDS _ACCAHI, ADAC.SweepUpper+3 ST -Y, _ACCAHI ST -Y, _ACCALO ST -Y, _ACCA ST -Y, _ACCB .FRAME 4 .FRAME 0 .BRANCH 17,ADAC.SEROUTFREQ RCALL ADAC.SEROUTFREQ POP _FPTRHI POP _FRAMEPTR .LINE 385 .BRANCH 17,ADAC.SERCRLF RCALL ADAC.SERCRLF .ENDBLOCK 386 .BRANCH 20,ADAC._L0091 RJMP ADAC._L0091 ADAC._L0105: .LINE 387 CPI _ACCA, 84 .BRANCH 3,ADAC._L0109 BREQ ADAC._L0109 .BRANCH 20,ADAC._L0108 RJMP ADAC._L0108 ADAC._L0109: ADAC._L0107: .BLOCK 388 .LINE 388 LDD _ACCA, Y+004h STS ADAC.SWEEPTIME, _ACCA .ENDBLOCK 389 .BRANCH 20,ADAC._L0091 RJMP ADAC._L0091 ADAC._L0108: .BLOCK 390 .LINE 391 PUSH _FRAMEPTR PUSH _FPTRHI LDI _ACCA, 000h ST -Y, _ACCA .FRAME 1 .FRAME 0 .BRANCH 17,ADAC.SERPROMPT RCALL ADAC.SERPROMPT POP _FPTRHI POP _FRAMEPTR .ENDBLOCK 392 ADAC._L0091: .ENDBLOCK 393 ADAC._L0066: .LINE 395 LDS _ACCA, ADAC.aBool TST _ACCA .BRANCH 4,ADAC._L0112 BRNE ADAC._L0112 .BRANCH 20,ADAC._L0110 RJMP ADAC._L0110 ADAC._L0112: .BLOCK 395 .LINE 396 PUSH _FRAMEPTR PUSH _FPTRHI LDI _ACCA, 0FFh ST -Y, _ACCA .FRAME 1 .FRAME 0 .BRANCH 17,ADAC.SERPROMPT RCALL ADAC.SERPROMPT POP _FPTRHI POP _FRAMEPTR .ENDBLOCK 397 ADAC._L0110: ADAC._L0111: .ENDBLOCK 399 ADAC.ParseCmd_X: .LINE 399 .BRANCH 19 RET .ENDFUNC 399 .FUNC initall, 00195h, 00020h ADAC.initall: .BLOCK 407 .LINE 408 LDI _ACCA, 03Fh OUT DDRB, _ACCA .LINE 409 LDI _ACCA, 0EFh OUT PORTB, _ACCA .LINE 410 LDI _ACCA, 00Ch OUT DDRC, _ACCA .LINE 411 LDI _ACCA, 0FFh OUT PORTC, _ACCA .LINE 412 LDI _ACCA, 004h OUT DDRD, _ACCA .LINE 413 LDI _ACCA, 0FCh OUT PORTD, _ACCA .LINE 415 IN _ACCA, ADMUX ORI _ACCA, 0C0h OUT ADMUX, _ACCA .LINE 418 LDI _ACCA, 000h STS ADAC.MEMORYNUM, _ACCA .LINE 419 PUSH _FRAMEPTR PUSH _FPTRHI .BRANCH 17,ADAC.PATCHCOPYFROMEE RCALL ADAC.PATCHCOPYFROMEE POP _FPTRHI POP _FRAMEPTR .LINE 421 LDI _ACCA, 000h STS ADAC.MODIFIED, _ACCA .LINE 422 LDI _ACCA, 1 SHLB IntFlag OR Flags, _ACCA SEI .LINE 423 LDI _ACCA, 001h STS ADAC.BURSTCOUNT, _ACCA .LINE 424 LDI _ACCA, 001h STS ADAC.BurstTimer, _ACCA .LINE 425 LDS _ACCB, ADAC.Frequenz LDS _ACCA, ADAC.Frequenz+1 LDS _ACCALO, ADAC.Frequenz+2 LDS _ACCAHI, ADAC.Frequenz+3 STS ADAC.AKTUELLEFREQUENZ, _ACCB STS ADAC.AKTUELLEFREQUENZ+1, _ACCA STS ADAC.AKTUELLEFREQUENZ+2, _ACCALO STS ADAC.AKTUELLEFREQUENZ+3, _ACCAHI .ENDBLOCK 427 ADAC.initall_X: .LINE 427 .BRANCH 19 RET .ENDFUNC 427 ; ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ ; Program body ; ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ .FUNC $_Main, 001AFh, 00020h .ENTRYMAIN $ ADAC.$_Main: .BLOCK 431 .LINE 432 .BRANCH 17,ADAC.INITALL RCALL ADAC.INITALL ADAC._L0113: .BLOCK 433 .LINE 434 RCALL SYSTEM.SERSTAT TST _ACCA .BRANCH 4,ADAC._L0117 BRNE ADAC._L0117 .BRANCH 20,ADAC._L0115 RJMP ADAC._L0115 ADAC._L0117: .BLOCK 434 .LINE 435 PUSH _FRAMEPTR PUSH _FPTRHI .BRANCH 17,ADAC.PARSECMD RCALL ADAC.PARSECMD POP _FPTRHI POP _FRAMEPTR .ENDBLOCK 436 ADAC._L0115: ADAC._L0116: .LINE 438 .BRANCH 17,ADAC.SWEEPGEN RCALL ADAC.SWEEPGEN .LINE 439 .BRANCH 17,ADAC.BURSTGEN RCALL ADAC.BURSTGEN .ENDBLOCK 441 .LINE 441 .BRANCH 20,ADAC._L0113 RJMP ADAC._L0113 ADAC._L0114: .ENDBLOCK 442 ADAC.$_MAINEX: .LINE 442 NOP .LINE 442 .BRANCH 20,ADAC.$_MAINEX RJMP ADAC.$_MAINEX .ENDFUNC 442 SYSTEM.$Main_stk .EQU 00102h ; var iData Process stack area SYSTEM.$Main_stk_e .EQU 00181h ; var iData Process stack area SYSTEM.$Main_Frame .EQU 00182h ; var iData Process stack area SYSTEM.$Main_Frame_e .EQU 00281h ; var iData Process stack area ; ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ ; Initialisation and Library Routines ; ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ .ENTRY SYSTEM.RESET: CLI ; >> Stack Init [main process only] << LDI _ACCA, 001h LDI _ACCB, 081h OUT sph, _ACCA OUT spl, _ACCB ; >> Memory Init << CLR _ACCA LDI _ACCCLO, 16 LDI _ACCCHI, 0 LDI _ACCBLO, 0 LDI _ACCBHI, 0 ADIW _ACCCLO, 1 SYSTEM._L0118: SBIW _ACCCLO, 001h BREQ SYSTEM._L0120 SYSTEM._L0119: ST X+, _ACCA RJMP SYSTEM._L0118 SYSTEM._L0120: LDI _ACCBLO, 00060h AND 0FFh LDI _ACCBHI, 00060h SHRB 8 LDI _ACCCLO, 00400h AND 0FFh LDI _ACCCHI, 00400h SHRB 8 ADIW _ACCCLO, 1 SYSTEM._L0121: SBIW _ACCCLO, 001h BREQ SYSTEM._L0123 SYSTEM._L0122: ST X+, _ACCA RJMP SYSTEM._L0121 SYSTEM._L0123: LDI _FRAMEPTR, 00281h AND 0FFh LDI _FPTRHI, 00281h SHRB 8 CLI LDI _ACCA, 0FEH ROLB IntFlag AND Flags, _ACCA ; ============ init structured constants ============ ; >> Hardware Init << ; >> SysTick init: 1msec << ; >> real SysTick (exact): 1.000 msec << LDI _ACCA, 083h STS SysTickTime, _ACCA OUT tcnt0, _ACCA LDI _ACCA, 3 OUT tccr0, _ACCA LDI _ACCA, 001h OUT timsk, _ACCA ; >> ADC Init << LDI _ACCA, 007h OUT admux, _ACCA LDI _ACCA ,0C4h OUT adcsr, _ACCA ; >> SERPORT Init << ; >> Baudrate 9600Baud << ; percent Baudrate error : >> 0.160% << LDI _ACCA, 018h OUT ucr1, _ACCA LDI _ACCA, 033h OUT ubrr1, _ACCA LDI _ACCA, 000h OUT ubrrh, _ACCA LDI _ACCA, 0 STS _RXINP, _ACCA STS _RXOUTP, _ACCA STS _RXCOUNT, _ACCA SBI ucr1, 7 LDI _ACCA, 0 STS _TXINP, _ACCA STS _TXOUTP, _ACCA STS _TXCOUNT, _ACCA LDI _ACCA, 08Eh OUT ucsrc, _ACCA IN _ACCA, UDR1 ; >> TWIPORT Init << LDI _ACCA, 00Ah OUT TWBR, _ACCA LDI _ACCA, 0FFh STS TWI_DevLock, _ACCA CLR Flags CLR Flags2 ; ============ Start User Main Program ============ .DEB MAINENTRY RJMP ADAC.$_Main ; ============ Interrupt Service ============ SYSTEM.$INTERRUPT_TIMER0: .DEB SYSTICKENTRY PUSH _ACCCLO PUSH _ACCCHI PUSH _ACCB PUSH _ACCA IN _ACCA, SREG PUSH _ACCA LDS _ACCA, SysTickTime IN _ACCB, tcnt0 ADD _ACCA, _ACCB OUT tcnt0, _ACCA LDI _ACCA, 0FEH ROLB IntFlag AND Flags, _ACCA IN _ACCB, adcl IN _ACCA, adch LDS _ACCCLO, _ADCBUFF LDS _ACCCHI, _ADCBUFF+1 ADD _ACCB, _ACCCLO; ADC _ACCA, _ACCCHI; LSR _ACCA ROR _ACCB STS _ADCBUFF, _ACCB STS _ADCBUFF+1, _ACCA ; LDS _ACCB, _TWI_TO TST _ACCB BREQ SYSTEM._L0124 DEC _ACCB STS _TWI_TO, _ACCB SYSTEM._L0124: ; >> RTC Timer << ; RealTick : 1 ; SysTickCorrect : 0 ; tickspersecond : 1000 PUSH _ACCBLO PUSH _ACCBHI LDI _ACCCLO, RTC_TICKCNT AND 0FFh LDI _ACCCHI, RTC_TICKCNT SHRB 8 LDD _ACCBLO, Z+0 LDD _ACCBHI, Z+1 ADIW _ACCBLO, 1 STD Z+0, _ACCBLO STD Z+1, _ACCBHI LDD _ACCBLO, Z+2 LDD _ACCBHI, Z+3 ADIW _ACCBLO, 1 LDI _ACCB, 232 LDI _ACCA, 3 CP _ACCBLO, _ACCB CPC _ACCBHI, _ACCA BRCS SYSTEM._L0134 SUB _ACCBLO, _ACCB SUB _ACCBHI, _ACCA STD Z+2, _ACCBLO STD Z+3, _ACCBHI POP _ACCBHI POP _ACCBLO RJMP SYSTEM._L0135 SYSTEM._L0134: STD Z+2, _ACCBLO STD Z+3, _ACCBHI POP _ACCBHI POP _ACCBLO RJMP SYSTEM._L0132 SYSTEM._L0135: PUSH _ACCALO CLR _ACCALO LDI _ACCCLO, RTC_SECOND AND 0FFh LDI _ACCCHI, RTC_SECOND SHRB 8 LD _ACCA, Z LDD _ACCB, Z+1 INC _ACCA CPI _ACCA, 60 BRCC SYSTEM._L0131 RJMP SYSTEM._L0125 SYSTEM._L0131: LDI _ACCA, 00 INC _ACCB ST Z+, _ACCA ORI _ACCALO, 1 LDD _ACCA, Z+1 CPI _ACCB, 60 BRCS SYSTEM._L0126 LDI _ACCB, 00 INC _ACCA ST Z+, _ACCB ORI _ACCALO, 2 LDD _ACCB, Z+1 CPI _ACCA, 24 BRCS SYSTEM._L0125 LDI _ACCA, 00 INC _ACCB ST Z+, _ACCA RJMP SYSTEM._L0127 SYSTEM._L0125: ST Z, _ACCA RJMP SYSTEM._L0127 SYSTEM._L0126: ST Z, _ACCB SYSTEM._L0127: POP _ACCALO LDI _ACCCLO, RTC_TIMER_STAT_0 AND 0FFh LDI _ACCCHI, RTC_TIMER_STAT_0 SHRB 8 SYSTEM._L0138: LD _ACCA, Z TST _ACCA BREQ SYSTEM._L0140 LDD _ACCB, Z+1 LDD _ACCA, Z+2 SUBI _ACCB, 01h SBCI _ACCA, 00h STD Z+1, _ACCB STD Z+2, _ACCA LDD _ACCB, Z+3 LDD _ACCA, Z+4 SBCI _ACCB, 00h SBCI _ACCA, 00h STD Z+3, _ACCB STD Z+4, _ACCA BRCS SYSTEM._L0139 BRNE SYSTEM._L0140 SYSTEM._L0139: CLR _ACCA ST Z, _ACCA STD Z+1, _ACCA STD Z+2, _ACCA STD Z+3, _ACCA STD Z+4, _ACCA SYSTEM._L0140: SYSTEM._L0132: LDS _ACCA, ADAC.BurstTimer TST _ACCA BREQ SYSTEM._L0141 SUBI _ACCA, 1 STS ADAC.BurstTimer, _ACCA SYSTEM._L0141: LDI _ACCA, 1 SHLB IntFlag OR Flags, _ACCA SBI adcsr, 6 ; POP _ACCA OUT SREG, _ACCA POP _ACCA POP _ACCB POP _ACCCHI POP _ACCCLO .DEB SYSTICKEXIT RETI SYSTEM.$INTERRUPT_TXEMPTY: SYSTEM.$INTERRUPT_UDRE: PUSH _ACCCLO PUSH _ACCCHI PUSH _ACCB PUSH _ACCA IN _ACCA, SREG PUSH _ACCA LDS _ACCA, _TXCOUNT TST _ACCA BRNE SYSTEM._L0142 SYSTEM._L0146: CBI ucr1, 5 RJMP SYSTEM._L0144 SYSTEM._L0142: LDS _ACCB, _TXOUTP CLR _ACCA LDI _ACCCLO, _TXBUFF AND 0FFh LDI _ACCCHI, _TXBUFF SHRB 8 ADD _ACCCLO, _ACCB ADC _ACCCHI, _ACCA LD _ACCA, Z OUT UDR1, _ACCA LDS _ACCA, _TXCOUNT DEC _ACCA STS _TXCOUNT, _ACCA BRNE SYSTEM._L0145 CBI ucr1, 5 SYSTEM._L0145: INC _ACCB CPI _ACCB, 16 BRNE SYSTEM._L0143 CLR _ACCB SYSTEM._L0143: STS _TXOUTP, _ACCB SYSTEM._L0144: POP _ACCA OUT SREG, _ACCA POP _ACCA POP _ACCB POP _ACCCHI POP _ACCCLO RETI SYSTEM.$INTERRUPT_RXRDY: PUSH _ACCCLO PUSH _ACCCHI PUSH _ACCB PUSH _ACCA IN _ACCA, SREG PUSH _ACCA SYSTEM._L0152: LDS _ACCA, _RXCOUNT CPI _ACCA, 16 BRNE SYSTEM._L0147 IN _ACCB, UDR1 RJMP SYSTEM._L0149 SYSTEM._L0147: IN _ACCA, UDR1 PUSH _ACCA CLR _ACCA LDS _ACCB, _RXINP LDI _ACCCLO, _RXBUFF AND 0FFh LDI _ACCCHI, _RXBUFF SHRB 8 ADD _ACCCLO, _ACCB ADC _ACCCHI, _ACCA POP _ACCA ST Z, _ACCA LDS _ACCA, _RXCOUNT INC _ACCA STS _RXCOUNT, _ACCA INC _ACCB CPI _ACCB, 16 BRNE SYSTEM._L0148 CLR _ACCB SYSTEM._L0148: STS _RXINP, _ACCB SBIC usr1, 7 RJMP SYSTEM._L0152 SYSTEM._L0149: SYSTEM._L0154: POP _ACCA OUT SREG, _ACCA POP _ACCA POP _ACCB POP _ACCCHI POP _ACCCLO RETI ; ============ Library ============ SYSTEM.TWISTARTB: LDI _ACCA, 0 STS TWI_DevLock, _ACCA IN _ACCA, TWSR ANDI _ACCA, 0FCh CPI _ACCA, 000h BRNE SYSTEM._L0157 LDI _ACCA, 090h OUT TWCR, _ACCA SYSTEM._L0157: LDI _ACCA, 0A4h OUT TWCR, _ACCA LDI _ACCA, 100 STS _TWI_TO, _ACCA SYSTEM._L0155: IN _ACCA, TWCR ANDI _ACCA, 080h BRNE SYSTEM._L0158 LDS _ACCA, _TWI_TO TST _ACCA BRNE SYSTEM._L0155 OUT TWCR, _ACCA RJMP SYSTEM.TWI_ERROR SYSTEM._L0158: IN _ACCA, TWSR ANDI _ACCA, 0FCh CPI _ACCA, 008h BRNE SYSTEM._L0162 RJMP SYSTEM.TWI_ERROR SYSTEM._L0162: RJMP SYSTEM.TWI_OK SYSTEM.TWISTOPB: SYSTEM._L0163: IN _ACCA, TWSR ANDI _ACCA, 0FCh CPI _ACCA, 0F8h BREQ SYSTEM._L0163 CPI _ACCA, 000h BRNE SYSTEM._L0164 LDI _ACCA, 090h OUT TWCR, _ACCA NOP SYSTEM._L0164: LDI _ACCB, 094h OUT TWCR, _ACCB SER _ACCA STS TWI_DevLock, _ACCA RET SYSTEM.TWISENDBYTE: OUT TWDR, _ACCDLO LDI _ACCA, 084h OUT TWCR, _ACCA LDI _ACCA, 100 STS _TWI_TO, _ACCA SYSTEM._L0166: IN _ACCA, TWCR ANDI _ACCA, 080h BRNE SYSTEM._L0167 LDS _ACCA, _TWI_TO TST _ACCA BRNE SYSTEM._L0166 RJMP SYSTEM.TWI_ERROR SYSTEM._L0167: IN _ACCA, TWSR ANDI _ACCA, 0FCh CPI _ACCA, 028h BREQ SYSTEM.TWI_OK CPI _ACCA, 018h BREQ SYSTEM.TWI_OK CPI _ACCA, 040h BREQ SYSTEM.TWI_OK RJMP SYSTEM.TWI_ERROR SYSTEM.TWIRECVBYTE: LDI _ACCA, 0C4h OUT TWCR, _ACCA SBIW _ACCBLO, 1 BRMI SYSTEM.TWISTOPB BRNE SYSTEM._L0168 LDI _ACCA, 084h SYSTEM._L0168: OUT TWCR, _ACCA SYSTEM._L0169: IN _ACCA, TWCR SBRS _ACCA, 7 RJMP SYSTEM._L0169 IN _ACCA, TWSR ANDI _ACCA, 0FCh CPI _ACCA, 058h BREQ SYSTEM._L0171 CPI _ACCA, 050h BRNE SYSTEM.TWI_ERROR SYSTEM._L0171: IN _ACCA, TWDR ST Z+, _ACCA RJMP SYSTEM.TWIRECVBYTE SYSTEM.TWI_OK: LDI _ACCA, true RET SYSTEM.TWI_ERROR: IN _ACCA, TWSR ANDI _ACCA, 0FCh CPI _ACCA, 000h BRNE SYSTEM._L0170 LDI _ACCA, 090h OUT TWCR, _ACCA SYSTEM._L0170: LDI _ACCA, false RET SYSTEM.TWISTAT: MOV _ACCDLO, _ACCA RCALL SYSTEM.TWISTARTB CLC ROL _ACCDLO RCALL SYSTEM.TWISENDBYTE MOV _ACCBHI, _ACCA RCALL SYSTEM.TWISTOPB MOV _ACCA, _ACCBHI RET SYSTEM.SERINP: SYSTEM._L0172: LDS _ACCA, _RXCOUNT TST _ACCA BREQ SYSTEM._L0172 LDS _ACCB, _RXOUTP CLR _ACCA LDI _ACCCLO, _RXBUFF AND 0FFh LDI _ACCCHI, _RXBUFF SHRB 8 ADD _ACCCLO, _ACCB ADC _ACCCHI, _ACCA LD _ACCA, Z CLI LDS _ACCCLO, _RXCOUNT DEC _ACCCLO STS _RXCOUNT, _ACCCLO SBRC Flags, IntFlag SEI LDS _ACCB, _RXOUTP INC _ACCB CPI _ACCB, 16 BRNE SYSTEM._L0173 CLR _ACCB SYSTEM._L0173: STS _RXOUTP, _ACCB RET SYSTEM.SERSTAT: CLR _ACCA LDS _ACCB, _RXCOUNT TST _ACCB BREQ SYSTEM._L0175 COM _ACCA SYSTEM._L0175: RET SYSTEM.SEROUT: SYSTEM._L0176: LDS _ACCB, _TXCOUNT CPI _ACCB, 16 BREQ SYSTEM._L0176 CLI LDS _ACCB, _TXINP LDI _ACCCLO, _TXBUFF AND 0FFh LDI _ACCCHI, _TXBUFF SHRB 8 ADD _ACCCLO, _ACCB CLR _ACCB ADC _ACCCHI, _ACCB ST Z, _ACCA LDS _ACCB, _TXCOUNT INC _ACCB STS _TXCOUNT, _ACCB LDS _ACCB, _TXINP INC _ACCB CPI _ACCB, 16 BRNE SYSTEM._L0177 CLR _ACCB SYSTEM._L0177: STS _TXINP, _ACCB SBI ucr1, 5 SBRC Flags, IntFlag SEI RET SYSTEM.RTCTIMER_START: LDI _ACCA, 01 STS RTC_TIMER_STAT_0, _ACCA RET SYSTEM.RTCTIMER_STOP: LDI _ACCA, 00 STS RTC_TIMER_STAT_0, _ACCA RET SYSTEM.RTCTIMER_LOAD: LDI _ACCCLO, RTC_TIMER_STAT_0 AND 0FFh LDI _ACCCHI, RTC_TIMER_STAT_0 SHRB 8 CLI STD Z+1, _ACCB STD Z+2, _ACCA STD Z+3, _ACCALO STD Z+4, _ACCAHI LDI _ACCA, 00h ST Z, _ACCA SBRC Flags, IntFlag SEI RET SYSTEM.RTCGETSECOND: LDS _ACCA, RTC_SECOND RET SYSTEM.RTCSETSECOND: CPI _ACCA, 60 BRCS SYSTEM._L0178 LDI _ACCA, 00 SYSTEM._L0178: CLI LDI _ACCCLO, RTC_TICKCNT AND 0FFh LDI _ACCCHI, RTC_TICKCNT SHRB 8 STD Z+4, _ACCA LDI _ACCA, 00 ST Z+, _ACCA ST Z+, _ACCA ST Z+, _ACCA ST Z+, _ACCA SBRC Flags, IntFlag SEI RET SYSTEM.RTCGETMINUTE: LDS _ACCA, RTC_MINUTE RET SYSTEM.RTCSETMINUTE: CPI _ACCA, 60 BRCS SYSTEM._L0179 LDI _ACCA, 00 SYSTEM._L0179: STS RTC_MINUTE, _ACCA RET SYSTEM.RTCGETHOUR: LDS _ACCA, RTC_HOUR RET SYSTEM.RTCSETHOUR: CPI _ACCA, 24 BRCS SYSTEM._L0180 LDI _ACCA, 00 SYSTEM._L0180: STS RTC_HOUR, _ACCA RET SYSTEM.BlockCopyC: SYSTEM._L0181: SUBI _ACCALO, 001h SBCI _ACCAHI, 000h BRCS SYSTEM._L0182 LD _ACCA, Z+ ST X+, _ACCA RJMP SYSTEM._L0181 SYSTEM._L0182: RET SYSTEM._EEpWaitReady: SBRC Flags, IntFlag SEI SBIC eecr, 1 RJMP SYSTEM._EEpWaitReady CLI SBIC eecr, 1 RJMP SYSTEM._EEpWaitReady RET SYSTEM.ReadEEp8: RCALL SYSTEM._EEpWaitReady OUT eearl, _ACCCLO OUT eearh, _ACCCHI SBI eecr, 0 NOP IN _ACCA, eedr SBRC Flags, IntFlag SEI RET SYSTEM.Str2Int: CLR _ACCAHI CLR _ACCALO CLR _ACCBHI CLR _ACCBLO BST Flags, _EEPROM BRTC SYSTEM._L0187 RCALL SYSTEM.ReadEEp8 ADIW _ACCCLO, 01h RJMP SYSTEM._L0188 SYSTEM._L0187: LD _ACCA, Z+ SYSTEM._L0188: TST _ACCA BRNE SYSTEM._L0184 SYSTEM._L0183: CLR _ACCA CLR _ACCB RET SYSTEM._L0184: MOV _ACCDHI, _ACCA TST _ACCB BREQ SYSTEM._L0189 INC _ACCDHI RJMP SYSTEM.Hex2Int SYSTEM._L0189: BST Flags, _EEPROM BRTC SYSTEM._L0190 RCALL SYSTEM.ReadEEp8 ADIW _ACCCLO, 01h RJMP SYSTEM._L0191 SYSTEM._L0190: LD _ACCA, Z+ SYSTEM._L0191: CLT BLD Flags, _NEGATIVE CPI _ACCA, 02Dh BRNE SYSTEM._L0185 DEC _ACCDHI BREQ SYSTEM._L0183 SET BLD Flags, _NEGATIVE BST Flags, _EEPROM BRTC SYSTEM._L0192 RCALL SYSTEM.ReadEEp8 ADIW _ACCCLO, 01h RJMP SYSTEM._L0193 SYSTEM._L0192: LD _ACCA, Z+ SYSTEM._L0193: RJMP SYSTEM.Dec2Int SYSTEM._L0185: CPI _ACCA, 02Bh BRNE SYSTEM._L0186 DEC _ACCDHI BREQ SYSTEM._L0183 CLT BLD Flags, _NEGATIVE BST Flags, _EEPROM BRTC SYSTEM._L0194 RCALL SYSTEM.ReadEEp8 ADIW _ACCCLO, 01h RJMP SYSTEM._L0195 SYSTEM._L0194: LD _ACCA, Z+ SYSTEM._L0195: RJMP SYSTEM.Dec2Int SYSTEM._L0186: CPI _ACCA, 024h BRNE SYSTEM.Dec2Int RJMP SYSTEM.Hex2Int SYSTEM.Dec2Int: MOV _ACCB, _ACCDHI DEC _ACCB BRMI SYSTEM._L0183 CLR _ACCDHI CLR _ACCEHI CLR _ACCFHI CLR _ACCFLO PUSH _ACCB RJMP SYSTEM.Dec2Int1 SYSTEM._L0196: PUSH _ACCB BST Flags, _EEPROM BRTC SYSTEM._L0199 RCALL SYSTEM.ReadEEp8 ADIW _ACCCLO, 01h RJMP SYSTEM._L0200 SYSTEM._L0199: LD _ACCA, Z+ SYSTEM._L0200: SYSTEM.Dec2Int1: CPI _ACCA, 030h BRCS SYSTEM.Str2Ierr1 CPI _ACCA, 03Ah BRCC SYSTEM.Str2Ierr1 SUBI _ACCA, 030h MOV _ACCDLO, _ACCA MOVW _ACCB, _ACCBLO LSL _ACCB ROL _ACCA ROL _ACCEHI ROL _ACCFHI LSL _ACCB ROL _ACCA ROL _ACCEHI ROL _ACCFHI ADD _ACCB, _ACCBLO ADC _ACCA, _ACCBHI ADC _ACCEHI, _ACCFLO ADC _ACCFHI, _ACCFLO ADD _ACCEHI, _ACCALO ADC _ACCFHI, _ACCAHI LSL _ACCB ROL _ACCA ROL _ACCEHI ROL _ACCFHI ADD _ACCB, _ACCDLO ADC _ACCA, _ACCDHI ADC _ACCEHI, _ACCFLO ADC _ACCFHI, _ACCFLO MOVW _ACCBLO, _ACCB MOV _ACCALO, _ACCEHI MOV _ACCAHI, _ACCFHI POP _ACCB DEC _ACCB BRMI SYSTEM.Str2Iex RJMP SYSTEM._L0196 SYSTEM.Str2Ierr1: POP _ACCB SYSTEM.Str2Ierr: SET BLD Flags, _ERRFLAG CLR _ACCA CLR _ACCB CLR _ACCAHI CLR _ACCALO RET SYSTEM.Str2Iex: MOVW _ACCB, _ACCBLO BST Flags, _NEGATIVE BRTC SYSTEM._L0201 SUBI _ACCB, 01h SBCI _ACCA, 00h SBCI _ACCALO, 00h SBCI _ACCAHI, 00h COM _ACCALO COM _ACCAHI COM _ACCA COM _ACCB SYSTEM._L0201: RET SYSTEM.Hex2Int: CLT BLD Flags, _NEGATIVE DEC _ACCDHI BREQ SYSTEM._L0201 CPI _ACCDHI, 009h BRSH SYSTEM.Str2Ierr SYSTEM._L0202: BST Flags, _EEPROM BRTC SYSTEM._L0206 RCALL SYSTEM.ReadEEp8 ADIW _ACCCLO, 01h RJMP SYSTEM._L0207 SYSTEM._L0206: LD _ACCA, Z+ SYSTEM._L0207: CPI _ACCA, 061h BRLO SYSTEM._L0203 SUBI _ACCA, 020h SYSTEM._L0203: CPI _ACCA, 030h BRLO SYSTEM.Str2Ierr CPI _ACCA, 03Ah BRLO SYSTEM._L0204 CPI _ACCA, 041h BRLO SYSTEM.Str2Ierr CPI _ACCA, 047h BRSH SYSTEM.Str2Ierr SUBI _ACCA, -9 AND 0FFh SYSTEM._L0204: ANDI _ACCA, 00Fh LDI _ACCB, 4 SYSTEM._L0205: LSL _ACCBLO ROL _ACCBHI ROL _ACCALO ROL _ACCAHI DEC _ACCB BRNE SYSTEM._L0205 OR _ACCBLO, _ACCA DEC _ACCDHI BRNE SYSTEM._L0202 RJMP SYSTEM.Str2Iex SYSTEM.PosChInVarStr: CLR _ACCA LD _ACCBHI, Z TST _ACCBHI BREQ SYSTEM._L0209 TST _ACCELO BRNE SYSTEM._L0208 INC _ACCELO SYSTEM._L0208: CP _ACCBHI, _ACCELO BRCS SYSTEM._L0209 ADD _ACCCLO, _ACCELO ADC _ACCCHI, _ACCA DEC _ACCELO SUB _ACCBHI, _ACCELO MOV _ACCA, _ACCELO SYSTEM._L0210: INC _ACCA LD _ACCBLO, Z+ CP _ACCB, _ACCBLO BREQ SYSTEM._L0209 DEC _ACCBHI BRNE SYSTEM._L0210 CLR _ACCA SYSTEM._L0209: RET SYSTEM.UpperCaseStr: LD _ACCA, Z+ TST _ACCA BREQ SYSTEM._L0212 MOV _ACCBHI, _ACCA SYSTEM._L0211: LD _ACCA, Z+ CPI _ACCA, 061h BRCS SYSTEM._L0213 CPI _ACCA, 07Bh BRCC SYSTEM._L0213 ANDI _ACCA, 0DFh SYSTEM._L0213: RCALL SYSTEM.Char2Str DEC _ACCBHI BRNE SYSTEM._L0211 SYSTEM._L0212: RET SYSTEM.StrCopyV: TST _ACCA BREQ SYSTEM._L0216 LD _ACCBHI, Z TST _ACCBHI BREQ SYSTEM._L0216 SUB _ACCBHI, _ACCB BRCS SYSTEM._L0216 INC _ACCBHI CLR _ACCBLO ADD _ACCCLO, _ACCB ADC _ACCCHI, _ACCBLO CP _ACCBHI, _ACCA BRCS SYSTEM._L0215 MOV _ACCBHI, _ACCA SYSTEM._L0215: LD _ACCA, Z+ RCALL SYSTEM.Char2Str DEC _ACCBHI BRNE SYSTEM._L0215 SYSTEM._L0216: RET SYSTEM.StrConst2Str: SYSTEM._L0217: LPM _ACCA, Z+ RCALL SYSTEM.Char2Str DEC _ACCBHI BRNE SYSTEM._L0217 RET SYSTEM.StrVar2Str: LD _ACCA, Z+ TST _ACCA BREQ SYSTEM._L0219 MOV _ACCBHI, _ACCA SYSTEM._L0218: LD _ACCA, Z+ RCALL SYSTEM.Char2Str DEC _ACCBHI BRNE SYSTEM._L0218 SYSTEM._L0219: RET SYSTEM.Byte2Str: PUSH _FRAMEPTR PUSH _FPTRHI SBIW _FRAMEPTR, 6 LDD _ACCB, Y+9 CLR _ACCA MOVW _ACCALO, _ACCB ANDI _ACCB, 0Fh SWAP _ACCALO ANDI _ACCALO, 0Fh MOVW _ACCELO, _ACCALO LSL _ACCELO ROL _ACCEHI LSL _ACCELO ROL _ACCEHI MOVW _ACCDLO, _ACCB SUB _ACCDLO, _ACCELO SBC _ACCDHI, _ACCEHI SUBI _ACCDLO, 20 AND 0FFh SBCI _ACCDHI, 0 STD Y+0, _ACCDLO STD Y+1, _ACCDHI MOVW _ACCDLO, _ACCALO LSL _ACCDLO ROL _ACCDHI SUBI _ACCDLO, 38 AND 0FFh SBCI _ACCDHI, 0 STD Y+2, _ACCDLO STD Y+3, _ACCDHI LDI _ACCDLO, 4 STD Y+4, _ACCDLO STD Y+5, _ACCA MOVW _ACCCLO, _FRAMEPTR LDI _ACCA, 2 LDD R24, Z+0 LDD R25, Z+1 LDD R26, Z+2 LDD R27, Z+3 SYSTEM._cv8_1: TST R25 BRPL SYSTEM._cv8_2 ADIW R24, 10 SBIW R26, 1 RJMP SYSTEM._cv8_1 SYSTEM._cv8_2: ST Z+, R24 ST Z+, R25 MOVW R24, R26 DEC _ACCA BREQ SYSTEM._cv8_X LDD R26, Z+2 LDD R27, Z+3 RJMP SYSTEM._cv8_1 SYSTEM._cv8_X: ST Z+, R24 ST Z+, R25 LDD _ACCALO, Y+8 LDD _ACCAHI, Y+7 LDD _ACCDLO, Y+6 LDI _ACCDHI, 3 LDI _ACCFLO, 0 MOVW _ACCCLO, _FRAMEPTR MOVW _ACCBLO, _FRAMEPTR ADIW XL, 10 RCALL SYSTEM._B2STR POP _FPTRHI POP _FRAMEPTR RET SYSTEM.Long2Str: PUSH _FRAMEPTR PUSH _FPTRHI SBIW _FRAMEPTR, 28 MOVW _ACCBLO, _FRAMEPTR ADIW XL, 20 MOVW _ACCCLO, _FRAMEPTR ADIW ZL, 31 CLR _ACCFLO BST Flags, _SIGN BRTC SYSTEM._cv32_0 LDD _ACCAHI, Z+3 TST _ACCAHI BRPL SYSTEM._cv32_0 LDI _ACCFLO, 2Dh LDD _ACCALO, Z+2 LDD _ACCA, Z+1 LDD _ACCB, Z+0 SUBI _ACCB, 01h SBCI _ACCA, 00h SBCI _ACCALO, 00h SBCI _ACCAHI, 00h COM _ACCB COM _ACCA COM _ACCALO COM _ACCAHI STD Z+0, _ACCB STD Z+1, _ACCA STD Z+2, _ACCALO STD Z+3, _ACCAHI SYSTEM._cv32_0: LDI _ACCALO, 4 PUSH _ACCFLO SYSTEM._cv32_LP: LDD _ACCB, Z+000h ANDI _ACCB, 0fh ST X+, _ACCB LD _ACCB, Z+ SWAP _ACCB ANDI _ACCB, 0fh ST X+, _ACCB DEC _ACCALO BRNE SYSTEM._cv32_LP LDI _ACCBHI, 0 MOVW _ACCCLO, _FRAMEPTR ADIW ZL, 20 LDD _ACCELO, Z+1 LDI _ACCEHI, 0 LDD _ACCDLO, Z+2 ADD _ACCELO, _ACCDLO ADC _ACCEHI, _ACCBHI LDD _ACCDLO, Z+3 ADD _ACCELO, _ACCDLO ADC _ACCEHI, _ACCBHI LDD _ACCDLO, Z+4 ADD _ACCELO, _ACCDLO ADC _ACCEHI, _ACCBHI LDD _ACCDLO, Z+5 ADD _ACCELO, _ACCDLO ADC _ACCEHI, _ACCBHI LDD _ACCDLO, Z+6 ADD _ACCELO, _ACCDLO ADC _ACCEHI, _ACCBHI LDD _ACCDLO, Z+7 ADD _ACCELO, _ACCDLO ADC _ACCEHI, _ACCBHI LSL _ACCELO ROL _ACCEHI LSL _ACCELO ROL _ACCEHI LDD _ACCDLO, Z+0 CLR _ACCDHI SUB _ACCDLO, _ACCELO SBC _ACCDHI, _ACCEHI SUBI _ACCDLO, 20 AND 0FFh SBCI _ACCDHI, 0 STD Y+0, _ACCDLO STD Y+1, _ACCDHI LDD _ACCELO, Z+1 CLR _ACCEHI LDD _ACCDLO, Z+6 ADD _ACCELO, _ACCDLO ADC _ACCEHI, _ACCBHI LSL _ACCELO ROL _ACCEHI LDD _ACCALO, Z+2 LDD _ACCB, Z+7 CLR _ACCA ADD _ACCB, _ACCALO ADC _ACCA, _ACCBHI RCALL SYSTEM._MUL6 ADD _ACCELO, _ACCB ADC _ACCEHI, _ACCA LDD _ACCDLO, Z+4 CLR _ACCDHI LSL _ACCDLO ROL _ACCDHI LSL _ACCDLO ROL _ACCDHI ADD _ACCELO, _ACCDLO ADC _ACCEHI, _ACCDHI LDD _ACCB, Z+5 CLR _ACCA RCALL SYSTEM._MUL8 ADD _ACCELO, _ACCB ADC _ACCEHI, _ACCA SUBI _ACCELO, 428 AND 0FFh SBCI _ACCEHI, 428 SHRB 8 STD Y+2, _ACCELO STD Y+3, _ACCEHI LDD _ACCELO, Z+2 CLR _ACCEHI LDD _ACCDLO, Z+6 ADD _ACCELO, _ACCDLO ADC _ACCEHI, _ACCBHI LSL _ACCELO ROL _ACCEHI LDD _ACCDLO, Z+3 ADD _ACCELO, _ACCDLO ADC _ACCEHI, _ACCBHI LDD _ACCB, Z+4 CLR _ACCA LDD _ACCDLO, Z+5 ADD _ACCB, _ACCDLO ADC _ACCA, _ACCBHI RCALL SYSTEM._MUL5 ADD _ACCELO, _ACCB ADC _ACCEHI, _ACCA LDD _ACCDLO, Z+7 CLR _ACCDHI LSL _ACCDLO ROL _ACCDHI LSL _ACCDLO ROL _ACCDHI ADD _ACCELO, _ACCDLO ADC _ACCEHI, _ACCDHI SUBI _ACCELO, 287 AND 0FFh SBCI _ACCEHI, 287 SHRB 8 STD Y+4, _ACCELO STD Y+5, _ACCEHI LDD _ACCELO, Z+3 CLR _ACCEHI LSL _ACCELO ROL _ACCEHI LSL _ACCELO ROL _ACCEHI LDD _ACCB, Z+4 CLR _ACCA LDD _ACCDLO, Z+7 ADD _ACCB, _ACCDLO ADC _ACCA, _ACCBHI RCALL SYSTEM._MUL5 ADD _ACCELO, _ACCB ADC _ACCEHI, _ACCA LDD _ACCB, Z+5 CLR _ACCA RCALL SYSTEM._MUL8 ADD _ACCELO, _ACCB ADC _ACCEHI, _ACCA LDD _ACCB, Z+6 CLR _ACCA RCALL SYSTEM._MUL7 ADD _ACCELO, _ACCB ADC _ACCEHI, _ACCA SUBI _ACCELO, 437 AND 0FFh SBCI _ACCEHI, 437 SHRB 8 STD Y+6, _ACCELO STD Y+7, _ACCEHI LDD _ACCELO, Z+5 CLR _ACCEHI LSL _ACCELO ROL _ACCEHI LSL _ACCELO ROL _ACCEHI LDD _ACCB, Z+4 CLR _ACCA RCALL SYSTEM._MUL6 ADD _ACCELO, _ACCB ADC _ACCEHI, _ACCA LDD _ACCB, Z+6 CLR _ACCA RCALL SYSTEM._MUL7 ADD _ACCELO, _ACCB ADC _ACCEHI, _ACCA LDD _ACCB, Z+7 CLR _ACCA RCALL SYSTEM._MUL3 ADD _ACCELO, _ACCB ADC _ACCEHI, _ACCA SUBI _ACCELO, 303 AND 0FFh SBCI _ACCEHI, 303 SHRB 8 STD Y+8, _ACCELO STD Y+9, _ACCEHI LDD _ACCELO, Z+7 CLR _ACCEHI LSL _ACCELO ROL _ACCEHI LSL _ACCELO ROL _ACCEHI LDD _ACCB, Z+6 CLR _ACCA RCALL SYSTEM._MUL7 ADD _ACCELO, _ACCB ADC _ACCEHI, _ACCA SUBI _ACCELO, 165 AND 0FFh SBCI _ACCEHI, 165 SHRB 8 STD Y+10, _ACCELO STD Y+11, _ACCEHI LDD _ACCELO, Z+5 CLR _ACCEHI LDD _ACCB, Z+6 CLR _ACCA RCALL SYSTEM._MUL6 ADD _ACCELO, _ACCB ADC _ACCEHI, _ACCA LDD _ACCB, Z+7 CLR _ACCA RCALL SYSTEM._MUL8 ADD _ACCELO, _ACCB ADC _ACCEHI, _ACCA SUBI _ACCELO, 230 AND 0FFh SBCI _ACCEHI, 230 SHRB 8 STD Y+12, _ACCELO STD Y+13, _ACCEHI LDD _ACCELO, Z+6 CLR _ACCEHI LDD _ACCB, Z+7 CLR _ACCA RCALL SYSTEM._MUL6 ADD _ACCELO, _ACCB ADC _ACCEHI, _ACCA SUBI _ACCELO, 105 AND 0FFh SBCI _ACCEHI, 105 SHRB 8 STD Y+14, _ACCELO STD Y+15, _ACCEHI LDD _ACCELO, Z+7 CLR _ACCEHI LSL _ACCELO ROL _ACCEHI SUBI _ACCELO, 37 AND 0FFh SBCI _ACCEHI, 37 SHRB 8 STD Y+16, _ACCELO STD Y+17, _ACCEHI LDI _ACCELO, 5 LDI _ACCEHI, 0 STD Y+18, _ACCELO STD Y+19, _ACCEHI MOVW _ACCCLO, _FRAMEPTR LDI _ACCA, 9 LDD R24, Z+0 LDD R25, Z+1 LDD R26, Z+2 LDD R27, Z+3 SYSTEM._cv32_1: TST R25 BRPL SYSTEM._cv32_2 ADIW R24, 10 SBIW R26, 1 RJMP SYSTEM._cv32_1 SYSTEM._cv32_2: ST Z+, R24 ST Z+, R25 MOVW R24, R26 DEC _ACCA BREQ SYSTEM._cv32_X LDD R26, Z+2 LDD R27, Z+3 RJMP SYSTEM._cv32_1 SYSTEM._cv32_X: ST Z+, R24 ST Z+, R25 POP _ACCFLO LDD _ACCALO, Y+30 LDD _ACCAHI, Y+29 LDD _ACCDLO, Y+28 LDI _ACCDHI, 10 MOVW _ACCCLO, _FRAMEPTR MOVW _ACCBLO, _FRAMEPTR ADIW XL, 35 RCALL SYSTEM._B2STR POP _FPTRHI POP _FRAMEPTR RET SYSTEM._B2STR: PUSH _ACCBLO PUSH _ACCBHI LD _ACCA, X+ LD _ACCB, X+ LD _ACCELO, X+ ST -Y, _ACCELO ST -Y, _ACCB ST -Y, _ACCA TST _ACCFLO BREQ SYSTEM._B2STR_NM TST _ACCALO BREQ SYSTEM._B2STR_NM DEC _ACCALO SYSTEM._B2STR_NM: MOV _ACCELO, _ACCDHI MOV _ACCEHI, _ACCDHI LSL _ACCEHI DEC _ACCEHI MOVW _ACCBLO, _ACCCLO CLR _ACCB ADD XL, _ACCEHI ADC XH, _ACCB SYSTEM._B2STR_0: LD _ACCA, -X TST _ACCA BRNE SYSTEM._B2STR_1 SBIW XL, 1 DEC _ACCELO BRNE SYSTEM._B2STR_0 SYSTEM._B2STR_1: TST _ACCELO BRNE SYSTEM._B2STR_2 ADIW XL, 1 INC _ACCELO SYSTEM._B2STR_2: ADIW XL, 2 TST _ACCAHI BRNE SYSTEM._B2STR_PNT TST _ACCALO BREQ SYSTEM._B2STR_3 RJMP SYSTEM._B2STR_FILL SYSTEM._B2STR_3: RJMP SYSTEM._B2STR_WR SYSTEM._B2STR_PNT: TST _ACCALO BREQ SYSTEM._B2STR_PNTE0 DEC _ACCALO SYSTEM._B2STR_PNTE0: CLR _ACCB MOVW _ACCBLO, _ACCCLO CP _ACCAHI, _ACCDHI BRCC SYSTEM._B2STR_PNTGT MOV _ACCEHI, _ACCAHI LSL _ACCEHI ADD XL, _ACCEHI ADC XH, _ACCB LDI _ACCA, 2Eh ST -X, _ACCA CP _ACCAHI, _ACCELO BRCS SYSTEM._B2STR_PNTE1 MOV _ACCELO, _ACCAHI INC _ACCELO SYSTEM._B2STR_PNTE1: MOV _ACCEHI, _ACCELO LSL _ACCEHI MOVW _ACCBLO, _ACCCLO ADD XL, _ACCEHI ADC XH, _ACCB RJMP SYSTEM._B2STR_FILL SYSTEM._B2STR_PNTGT: ADD XL, _ACCEHI ADC XH, _ACCB ADIW XL, 1 MOV _ACCEHI, _ACCAHI ADDI _ACCEHI, 2 CP _ACCALO, _ACCEHI BRCS SYSTEM._B2STR_PNTG0 MOV _ACCB, _ACCALO SUB _ACCB, _ACCEHI INC _ACCB RJMP SYSTEM._B2STR_PNTG1 SYSTEM._B2STR_PNTG0: CLR _ACCB SYSTEM._B2STR_PNTG1: MOV _ACCALO, _ACCB SYSTEM._B2STR_PNTG2: TST _ACCB BREQ SYSTEM._B2STR_PNTG3 MOV _ACCA, _ACCDLO RCALL SYSTEM.Char2Str DEC _ACCB RJMP SYSTEM._B2STR_PNTG2 SYSTEM._B2STR_PNTG3: MOV _ACCEHI, _ACCAHI SUB _ACCEHI, _ACCDHI MOV _ACCELO, _ACCDHI ADD _ACCALO, _ACCEHI TST _ACCFLO BREQ SYSTEM._B2STR_PNTG4 MOV _ACCA, _ACCFLO RCALL SYSTEM.Char2Str CLR _ACCFLO INC _ACCALO SYSTEM._B2STR_PNTG4: ADDI _ACCALO, 2 LDI _ACCA, 30h RCALL SYSTEM.Char2Str LDI _ACCA, 2Eh RCALL SYSTEM.Char2Str LDI _ACCA, 30h SYSTEM._B2STR_PNTG5: TST _ACCEHI BREQ SYSTEM._B2STR_WR RCALL SYSTEM.Char2Str DEC _ACCEHI RJMP SYSTEM._B2STR_PNTG5 SYSTEM._B2STR_FILL: CP _ACCELO, _ACCALO BRCS SYSTEM._B2STR_F0 CLR _ACCALO RJMP SYSTEM._B2STR_WR SYSTEM._B2STR_F0: SUB _ACCALO, _ACCELO MOV _ACCB, _ACCALO SYSTEM._B2STR_F1: MOV _ACCA, _ACCDLO RCALL SYSTEM.Char2Str DEC _ACCB BRNE SYSTEM._B2STR_F1 SYSTEM._B2STR_WR: TST _ACCFLO BREQ SYSTEM._B2STR_WR0 MOV _ACCA, _ACCFLO RCALL SYSTEM.Char2Str SYSTEM._B2STR_WR0: LD _ACCA, -X TST _ACCA BREQ SYSTEM._B2STR_WR1 RCALL SYSTEM.Char2Str SYSTEM._B2STR_WR1: LD _ACCA, -X ORI _ACCA, 30h RCALL SYSTEM.Char2Str DEC _ACCELO BRNE SYSTEM._B2STR_WR0 POP _ACCBHI POP _ACCBLO LDD _ACCA, Y+0 ST X+, _ACCA LDD _ACCA, Y+1 ST X+, _ACCA LDD _ACCA, Y+2 ST X+, _ACCA RET SYSTEM._MUL3: MOVW _ACCALO, _ACCB LSL _ACCB ROL _ACCA ADD _ACCB, _ACCALO ADC _ACCA, _ACCAHI RET SYSTEM._MUL5: MOVW _ACCALO, _ACCB LSL _ACCB ROL _ACCA LSL _ACCB ROL _ACCA ADD _ACCB, _ACCALO ADC _ACCA, _ACCAHI RET SYSTEM._MUL6: LSL _ACCB ROL _ACCA MOVW _ACCALO, _ACCB LSL _ACCB ROL _ACCA ADD _ACCB, _ACCALO ADC _ACCA, _ACCAHI RET SYSTEM._MUL7: MOVW _ACCALO, _ACCB MOVW _ACCDLO, _ACCB LSL _ACCB ROL _ACCA LSL _ACCB ROL _ACCA LSL _ACCALO ROL _ACCAHI ADD _ACCB, _ACCALO ADC _ACCA, _ACCAHI ADD _ACCB, _ACCDLO ADC _ACCA, _ACCDHI RET SYSTEM._MUL8: LSL _ACCB ROL _ACCA LSL _ACCB ROL _ACCA LSL _ACCB ROL _ACCA RET SYSTEM.Int2Str: PUSH _FRAMEPTR PUSH _FPTRHI SBIW _FRAMEPTR, 10 LDD XL, Y+13 LDD XH, Y+14 CLR _ACCFLO BST Flags, _SIGN BRTC SYSTEM._cv16_0 TST XH BRPL SYSTEM._cv16_0 LDI _ACCFLO, 2Dh SUBI XL, 01h SBCI XH, 00h COM XL COM XH SYSTEM._cv16_0: PUSH _ACCFLO mov r24, XH swap r24 andi r24, 0Fh subi r24, -0F0h and 0FFh mov r19, r24 add r19, r24 subi r24, -0E2h and 0ffh mov r18, r24 subi r24, -32h and 0ffh mov r16, r24 mov r24, XH andi r24, 0Fh add r18, r24 add r18, r24 add r16, r24 subi r24, -0E9h and $ff mov r17, r24 add r17, r24 add r17, r24 mov r24, XL swap r24 andi r24, 0Fh add r17, r24 add r16, r24 rol r17 rol r16 com r16 clc rol r16 mov r24, XL andi r24, 0Fh add r16, r24 rol r19 ldi r24, 07h mov r20, r24 ldi r24, 0Ah SYSTEM._cv16_1: add r16,r24 dec r17 brcc SYSTEM._cv16_1 SYSTEM._cv16_2: add r17, r24 dec r18 brcc SYSTEM._cv16_2 SYSTEM._cv16_3: add r18, r24 dec r19 brcc SYSTEM._cv16_3 SYSTEM._cv16_4: add r19, r24 dec r20 brcc SYSTEM._cv16_4 SYSTEM._cv16_5: MOVW _ACCBLO, _FRAMEPTR clr ZH ldi ZL, 16 ldi r25, 5 ldi r23, 0 SYSTEM._cv16_6: ld r24, Z+ st X+, r24 st X+, r23 dec r25 brne SYSTEM._cv16_6 LDD _ACCALO, Y+12 LDD _ACCAHI, Y+11 LDD _ACCDLO, Y+10 LDI _ACCDHI, 5 POP _ACCFLO MOVW _ACCCLO, _FRAMEPTR MOVW _ACCBLO, _FRAMEPTR ADIW XL, 15 RCALL SYSTEM._B2STR POP _FPTRHI POP _FRAMEPTR RET SYSTEM.Char2Str: PUSH _ACCCLO PUSH _ACCCHI BST Flags, _DEVICE BRTS SYSTEM._L0223 PUSH _ACCA LDD _ACCCLO, Y+001h LDD _ACCCHI, Y+002h LDD _ACCA, Y+000h TST _ACCA BRNE SYSTEM._L0220 POP _ACCA SET BLD Flags, _ERRFLAG POP _ACCCHI POP _ACCCLO RET SYSTEM._L0220: DEC _ACCA STD Y+000h, _ACCA POP _ACCA ST Z+, _ACCA STD Y+002h, _ACCCHI STD Y+001h, _ACCCLO POP _ACCCHI POP _ACCCLO RET SYSTEM._L0223: LDD _ACCCLO, Y+000h LDD _ACCCHI, Y+001h PUSH _ACCA PUSH _ACCB PUSH _ACCALO PUSH _ACCAHI PUSH _ACCBLO PUSH _ACCBHI PUSH _ACCELO PUSH _ACCEHI PUSH _ACCDLO PUSH _ACCDHI PUSH _ACCFLO PUSH _ACCFHI ICALL POP _ACCFHI POP _ACCFLO POP _ACCDHI POP _ACCDLO POP _ACCEHI POP _ACCELO POP _ACCBHI POP _ACCBLO POP _ACCAHI POP _ACCALO POP _ACCB POP _ACCA POP _ACCCHI POP _ACCCLO RET SYSTEM.MUL16: MOVW _ACCALO, _ACCB CLR _ACCDLO BST Flags, _SIGN BRTC SYSTEM.MUL16_G MOVW _ACCELO, _ACCBLO MULS _ACCAHI, _ACCEHI MOVW _ACCCLO, _ACCGLO MUL _ACCALO, _ACCELO MOVW _ACCB, _ACCGLO MULSU _ACCAHI, _ACCELO SBC _ACCCHI, _ACCDLO ADD _ACCA, _ACCGLO ADC _ACCCLO, _ACCGHI ADC _ACCCHI, _ACCDLO MULSU _ACCEHI, _ACCALO SBC _ACCCHI, _ACCDLO ADD _ACCA, _ACCGLO ADC _ACCCLO, _ACCGHI ADC _ACCCHI, _ACCDLO RET SYSTEM.MUL16_G: MUL _ACCAHI, _ACCBHI MOVW _ACCCLO, _ACCGLO MUL _ACCALO, _ACCBLO MOVW _ACCB, _ACCGLO MUL _ACCAHI, _ACCBLO ADD _ACCA, _ACCGLO ADC _ACCCLO, _ACCGHI ADC _ACCCHI, _ACCDLO MUL _ACCALO, _ACCBHI ADD _ACCA, _ACCGLO ADC _ACCCLO, _ACCGHI ADC _ACCCHI, _ACCDLO RET SYSTEM.MUL32: MOVW _ACCBLO, _ACCB MOVW _ACCCLO, _ACCALO POP _ACCA POP _ACCB POP _ACCEHI POP _ACCELO POP _ACCDHI POP _ACCDLO PUSH _ACCB PUSH _ACCA RJMP SYSTEM._L0225 SYSTEM.MUL32_R: MOVW _ACCBLO, _ACCB MOVW _ACCCLO, _ACCALO SYSTEM._L0225: BST Flags, _SIGN BRTC SYSTEM._L0226 MOV _ACCFLO, _ACCCHI EOR _ACCFLO, _ACCEHI CLT SBRS _ACCFLO, 7 BLD Flags, _SIGN SBRS _ACCCHI, 7 RJMP SYSTEM._L0228 COM _ACCBLO COM _ACCBHI COM _ACCCLO COM _ACCCHI SUBI _ACCBLO, 0FFh SBCI _ACCBHI, 0FFh SBCI _ACCCLO, 0FFh SBCI _ACCCHI, 0FFh SYSTEM._L0228: SBRS _ACCEHI, 7 RJMP SYSTEM._L0226 COM _ACCDLO COM _ACCDHI COM _ACCELO COM _ACCEHI SUBI _ACCDLO, 0FFh SBCI _ACCDHI, 0FFh SBCI _ACCELO, 0FFh SBCI _ACCEHI, 0FFh SYSTEM._L0226: CLR _ACCFHI CLR _ACCFLO CLR _ACCGHI CLR _ACCGLO LDI _ACCA, 32 LSR _ACCEHI ROR _ACCELO ROR _ACCDHI ROR _ACCDLO SYSTEM._L0230: BRCC SYSTEM._L0229 ADD _ACCFLO, _ACCBLO ADC _ACCFHI, _ACCBHI ADC _ACCGLO, _ACCCLO ADC _ACCGHI, _ACCCHI SYSTEM._L0229: ROR _ACCGHI ROR _ACCGLO ROR _ACCFHI ROR _ACCFLO ROR _ACCEHI ROR _ACCELO ROR _ACCDHI ROR _ACCDLO DEC _ACCA BRNE SYSTEM._L0230 MOVW _ACCB, _ACCDLO MOVW _ACCALO, _ACCELO BST Flags, _SIGN BRTC SYSTEM._L0227 SUBI _ACCB, 01h SBCI _ACCA, 00h SBCI _ACCALO, 00h SBCI _ACCAHI, 00h COM _ACCALO COM _ACCAHI COM _ACCA COM _ACCB SYSTEM._L0227: RET SYSTEM.DIV32: MOVW _ACCBLO, _ACCB MOVW _ACCCLO, _ACCALO POP _ACCA POP _ACCB POP _ACCEHI POP _ACCELO POP _ACCDHI POP _ACCDLO PUSH _ACCB PUSH _ACCA SYSTEM.DIV32_R: CLR _ACCA BST Flags, _SIGN BRTC SYSTEM.DIV32_U MOV _ACCA, _ACCEHI MOV _ACCFLO, _ACCCHI EOR _ACCFLO, _ACCEHI CLT SBRS _ACCFLO, 7 BLD Flags, _SIGN SBRS _ACCCHI, 7 RJMP SYSTEM._L0231 COM _ACCBLO COM _ACCBHI COM _ACCCLO COM _ACCCHI SUBI _ACCBLO, 0FFh SBCI _ACCBHI, 0FFh SBCI _ACCCLO, 0FFh SBCI _ACCCHI, 0FFh SYSTEM._L0231: SBRS _ACCEHI, 7 RJMP SYSTEM.DIV32_U COM _ACCDLO COM _ACCDHI COM _ACCELO COM _ACCEHI SUBI _ACCDLO, 0FFh SBCI _ACCDHI, 0FFh SBCI _ACCELO, 0FFh SBCI _ACCEHI, 0FFh SYSTEM.DIV32_U: PUSH _ACCA CLR _ACCFLO CLR _ACCFHI CLR _ACCGLO CLR _ACCGHI LDI _ACCA, 33 SYSTEM._L0233: ROL _ACCDLO ROL _ACCDHI ROL _ACCELO ROL _ACCEHI DEC _ACCA BRNE SYSTEM._L0232 MOVW _ACCB, _ACCDLO MOVW _ACCALO, _ACCELO BST Flags, _SIGN BRTC SYSTEM._L0235 SUBI _ACCB, 01h SBCI _ACCA, 00h SBCI _ACCALO, 00h SBCI _ACCAHI, 00h COM _ACCALO COM _ACCAHI COM _ACCA COM _ACCB SYSTEM._L0235: POP _ACCDHI RET SYSTEM._L0232: ROL _ACCFLO ROL _ACCFHI ROL _ACCGLO ROL _ACCGHI SUB _ACCFLO, _ACCBLO SBC _ACCFHI, _ACCBHI SBC _ACCGLO, _ACCCLO SBC _ACCGHI, _ACCCHI BRCC SYSTEM._L0234 ADD _ACCFLO, _ACCBLO ADC _ACCFHI, _ACCBHI ADC _ACCGLO, _ACCCLO ADC _ACCGHI, _ACCCHI CLC RJMP SYSTEM._L0233 SYSTEM._L0234: SEC RJMP SYSTEM._L0233 SYSTEM.GETADC: CLI LDS _ACCB, _ADCBUFF LDS _ACCA, _ADCBUFF +1 SBRC Flags, IntFlag SEI RET SYSTEM.SETADCFIXED: RET SYSTEM.DefIntErr: RETI .ROMCONST $ ; ============ String-constant tables ============ .SYM ADAC.Vers1Str ADAC.Vers1Str: .BYTE 12 .ASCII "ADA-C V#0.02" .SYM ADAC.StopStr ADAC.StopStr: .BYTE 4 .ASCII "STOP" ; ============ array-constant tables ============ .SYM ADAC.SweepFak ADAC.SweepFak: .WORD 00001h .WORD 00002h .WORD 00005h .WORD 0000Ah .WORD 00014h .WORD 00032h .WORD 00064h .WORD 000C8h .WORD 001F4h .WORD 003E8h .WORD 007D0h .WORD 01388h .WORD 02710h .WORD 04E20h .WORD 0C350h .WORD 00000h ; ============ Fixed addr String-constant tables ============ ; ============ fixed addr array-constant tables ============ ; ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ ; Reset and Interrupt vectors ; ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ .ENDCODE SYSTEM.ENDCODE: .ORG 0, VECTTAB .VECTTAB SYSTEM.VectTab: RJMP SYSTEM.RESET RJMP SYSTEM.DefIntErr RJMP SYSTEM.DefIntErr RJMP SYSTEM.DefIntErr RJMP SYSTEM.DefIntErr RJMP SYSTEM.DefIntErr RJMP SYSTEM.DefIntErr RJMP SYSTEM.DefIntErr RJMP SYSTEM.DefIntErr RJMP SYSTEM.$INTERRUPT_TIMER0 RJMP SYSTEM.DefIntErr RJMP SYSTEM.$INTERRUPT_RXRDY RJMP SYSTEM.$INTERRUPT_TXEMPTY RJMP SYSTEM.DefIntErr RJMP SYSTEM.DefIntErr RJMP SYSTEM.DefIntErr RJMP SYSTEM.DefIntErr RJMP SYSTEM.DefIntErr RJMP SYSTEM.DefIntErr .VECTTABE SYSTEM.ENDPROG: .END ; ============ End of Program ============ ; System uses registers ; from bottom = 00000h ; upto = 00006h ; and ; from = 00010h ; upto = 0001Fh ; ; Stackframe at = ...00181h ; ===== Current top of User Vars in Data is 00009h ===== ; ===== Current top of User Vars in IData is 00281h ===== ; ===== Current top of User Vars in EEprom is 0000Ch ===== ; ===== Imported Library Routines ===== ; Multiply word MUL16 ; LongWord and LongInt types ; Multiply long MUL32 ; Divide long DIV32 ; Convert byte to string ; Convert int to string ; Convert long to string ; Convert string to int ; Copy partial String ; EEprom read ; Pascal Statements : 124 ; Assembler Lines : 8012 ; Optimizer removed : 120 lines = 240Bytes ; >> real SysTick (exact): 1.000 msec << ; Linker removed the following functions and procedures ; ; Module/Unit Function/Procedure ; ------------------------------------------ ;