513 lines
14 KiB
NASM
513 lines
14 KiB
NASM
; ***************************************************************************
|
|
; copyright : (C) 2026 by Martin Preuss
|
|
; email : martin@libchipcard.de
|
|
;
|
|
; ***************************************************************************
|
|
; * This file is part of the project "AqHome". *
|
|
; * Please see toplevel file COPYING of that project for license details. *
|
|
; ***************************************************************************
|
|
|
|
;.equ clock=1000000 ; Define the clock frequency
|
|
.equ clock=8000000 ; Define the clock frequency
|
|
|
|
|
|
|
|
.nolist
|
|
.include "include/m644Pdef.inc" ; Define device ATmega644P
|
|
.list
|
|
|
|
.include "version.asm"
|
|
.include "../defs.asm"
|
|
|
|
.include "devices/all/defs.asm"
|
|
.include "common/calls.asm"
|
|
.include "common/utils_wait.asm"
|
|
.include "common/utils_io.asm"
|
|
|
|
|
|
|
|
; ***************************************************************************
|
|
; defines
|
|
|
|
; ---------------------------------------------------------------------------
|
|
; generic
|
|
|
|
.equ STACK_SIZE = 256
|
|
|
|
.equ NET_BUFFERS_NUM = 8
|
|
.equ NET_MSGNUMINBUF_SIZE = 8 ; max buffer nums in ringbuffer (global incoming)
|
|
.equ NET_IFACE_OUTMSGBUF_SIZE = 8 ; max buffer nums in ringbuffer (per interface outbound)
|
|
|
|
|
|
|
|
; ---------------------------------------------------------------------------
|
|
; firmware settings including list of modules used
|
|
|
|
; #define MODULES_TIMER
|
|
#define MODULES_CLOCK
|
|
;#define MODULES_XRAM
|
|
#define MODULES_HEAP
|
|
#define MODULES_BEEPER_SIMPLE
|
|
#define MODULES_LED_SIMPLE
|
|
#define MODULES_NETWORK
|
|
;#define MODULES_COMONUART0
|
|
;#define MODULES_UART_HW
|
|
;#define MODULES_UART_BITBANG
|
|
#define MODULES_COM2W
|
|
#define MODULES_SPI_HW
|
|
#define MODULES_ILI9341
|
|
#define MODULES_XPT2046
|
|
#define MODULES_FONT
|
|
;#define MODULES_GUI
|
|
;#define MODULES_TWI_MASTER
|
|
;#define MODULES_LCD
|
|
;#define LCD_MINIMAL_FONT
|
|
;#define MODULES_SI7021
|
|
;#define MODULES_SGP30
|
|
;#define MODULES_SGP40
|
|
;#define MODULES_STATS
|
|
;#define MODULES_OWI_MASTER
|
|
;#define MODULES_DS18B20
|
|
;#define MODULES_MOTION
|
|
;#define MODULES_CCS811
|
|
|
|
#define APPS_NETWORK
|
|
;#define APPS_MOTION
|
|
;#define APPS_REPORTSENSORS
|
|
#define APPS_STATS
|
|
|
|
|
|
|
|
; ---------------------------------------------------------------------------
|
|
; defines for values
|
|
|
|
.equ VALUE_ID_SI7021_TEMP = 0x01
|
|
.equ VALUE_ID_SI7021_HUM = 0x02
|
|
|
|
.equ VALUE_ID_ADC = 0x03
|
|
;.equ VALUE_ID_DS18B20_TEMP = 0x06
|
|
.equ VALUE_ID_MOTION = 0x07
|
|
|
|
.equ VALUE_ID_SGP40_TVOC = 0x08
|
|
|
|
.equ VALUE_ID_SGP30_TVOC = 0x09
|
|
.equ VALUE_ID_SGP30_CO2 = 0x0a
|
|
|
|
;.equ VALUE_ID_REED_CONF = 0x81
|
|
|
|
.equ VALUE_ID_DEBUG = 0x7f
|
|
|
|
.equ VALUE_ID_LEDSIMPLE_TIMING = 0x88
|
|
.equ VALUE_ID_BEEPERSIMPLE_TIMING = 0x89
|
|
|
|
.equ VALUE_ID_SENSOR_CO2_BASE = 0x90
|
|
.equ VALUE_ID_SENSOR_CO2_SOURCE = 0x90
|
|
.equ VALUE_ID_SENSOR_CO2_LIMWARN = 0x91
|
|
.equ VALUE_ID_SENSOR_CO2_LIMCRIT = 0x92
|
|
|
|
.equ VALUE_ID_SENSOR_TEMP_BASE = 0x93
|
|
.equ VALUE_ID_SENSOR_TEMP_SOURCE = 0x93
|
|
.equ VALUE_ID_SENSOR_TEMP_LIMWARN = 0x94
|
|
.equ VALUE_ID_SENSOR_TEMP_LIMCRIT = 0x95
|
|
|
|
.equ VALUE_ID_SENSOR_HUM_BASE = 0x96
|
|
.equ VALUE_ID_SENSOR_HUM_SOURCE = 0x96
|
|
.equ VALUE_ID_SENSOR_HUM_LIMWARN = 0x97
|
|
.equ VALUE_ID_SENSOR_HUM_LIMCRIT = 0x98
|
|
|
|
.equ VALUE_ID_SCREENSAVER_SETSOURCE1 = 0x9a
|
|
.equ VALUE_ID_SCREENSAVER_SETSOURCE2 = 0x9b
|
|
|
|
|
|
|
|
; ***************************************************************************
|
|
; code segment
|
|
|
|
.cseg
|
|
.org 000000
|
|
|
|
|
|
|
|
; ---------------------------------------------------------------------------
|
|
; Reset and interrupt vectors
|
|
jmp BOOTLOADER_ADDR ; 1: Reset vector RESET
|
|
jmp irqNotSet ; 2: INT0 External Interrupt Request 0
|
|
jmp irqNotSet ; 3: INT1 External Interrupt Request 1
|
|
jmp irqNotSet ; 4: INT2 External Interrupt Request 2
|
|
jmp com2wPcintIsr ; 5: PCINT0 Pin Change Interrupt Request 0
|
|
jmp irqNotSet ; 6: PCINT1 Pin Change Interrupt Request 1
|
|
jmp irqNotSet ; 7: PCINT2 Pin Change Interrupt Request 2
|
|
jmp irqNotSet ; 8: PCINT3 Pin Change Interrupt Request 3
|
|
jmp irqNotSet ; 9: WDT Watchdog Time-out Interrupt
|
|
jmp irqNotSet ; 10: TIMER2_COMPA Timer/Counter2 Compare Match A
|
|
jmp irqNotSet ; 11: TIMER2_COMPB Timer/Counter2 Compare Match B
|
|
jmp irqNotSet ; 12: TIMER2_OVF Timer/Counter2 Overflow
|
|
jmp irqNotSet ; 13: TIMER1_CAPT Timer/Counter1 Capture Event
|
|
jmp irqNotSet ; 14: TIMER1_COMPA Timer/Counter1 Compare Match A
|
|
jmp irqNotSet ; 15: TIMER1_COMPB Timer/Counter1 Compare Match B
|
|
jmp irqNotSet ; 16: TIMER1_OVF Timer/Counter1 Overflow
|
|
jmp baseTimerIrqOC0A ; 17: TIMER0_COMPA Timer/Counter0 Compare Match A
|
|
jmp irqNotSet ; 18: TIMER0_COMPB Timer/Counter0 Compare Match B
|
|
jmp irqNotSet ; 19: TIMER0_OVF Timer/Counter0 Overflow
|
|
jmp irqNotSet ; 20: SPI_STC Serial Transfer Complete
|
|
jmp irqNotSet ; 21: USART0_RXC USART0 Rx Complete
|
|
jmp irqNotSet ; 22: USART0_UDRE USART0 Data Register Empty
|
|
jmp irqNotSet ; 23: USART0_TXC USART0 Tx Complete
|
|
jmp irqNotSet ; 24: ANA_COMP Analog Comparator
|
|
jmp irqNotSet ; 25: ADC ADC Conversion Complete
|
|
jmp irqNotSet ; 26: EE_RDY EEPROM Ready
|
|
jmp irqNotSet ; 27: TWI 2-Wire Interface
|
|
jmp irqNotSet ; 28: SPM_RDY Store Program Memory Ready
|
|
|
|
|
|
|
|
devInfoBlock: ; 12 bytes
|
|
devInfoManufacturer: .db 'A', 'Q', 'U', 'A'
|
|
devInfoId: .db DEVICEINFO_ID, 0
|
|
devInfoVersion: .db DEVICEINFO_VERSION, DEVICEINFO_REVISION ; version, revision
|
|
firmwareVersion: .db FIRMWARE_VARIANT_TEMP_WINDOW, FIRMWARE_VERSION_MAJOR
|
|
.db FIRMWARE_VERSION_MINOR, FIRMWARE_VERSION_PATCHLEVEL
|
|
|
|
|
|
|
|
; ---------------------------------------------------------------------------
|
|
; @routine firmwareStart @global
|
|
|
|
firmwareStart:
|
|
rjmp main
|
|
; @end
|
|
|
|
|
|
irqNotSet:
|
|
reti
|
|
|
|
|
|
|
|
; ---------------------------------------------------------------------------
|
|
; @routine onSystemStart
|
|
|
|
onSystemStart:
|
|
bigcall test
|
|
ret
|
|
; @end
|
|
|
|
|
|
|
|
; ---------------------------------------------------------------------------
|
|
; @routine onMessageReceived
|
|
;
|
|
; Called on every message received
|
|
|
|
onMessageReceived:
|
|
lds yl, guiApp
|
|
lds yh, guiApp+1
|
|
bigcall GuiApp_MsgReceived
|
|
clc
|
|
ret
|
|
; @end
|
|
|
|
|
|
|
|
; ---------------------------------------------------------------------------
|
|
; @routine onEvery100ms
|
|
;
|
|
; Called every 100ms. Add your routine calls here. No arguments, no results.
|
|
|
|
onEvery100ms:
|
|
lds yl, guiApp
|
|
lds yh, guiApp+1
|
|
bigcall GuiApp_Every100ms
|
|
ret
|
|
|
|
onEveryMinute:
|
|
onEveryHour:
|
|
onEveryDay:
|
|
ret
|
|
; @end
|
|
|
|
|
|
onEverySecond:
|
|
ret
|
|
|
|
|
|
|
|
; ---------------------------------------------------------------------------
|
|
; @routine onEveryLoop
|
|
;
|
|
; Called on every loop (i.e. after awakening from sleep).
|
|
;
|
|
onEveryLoop:
|
|
ret
|
|
; @end
|
|
|
|
|
|
|
|
test:
|
|
clr r16
|
|
sts guiApp, r16
|
|
sts guiApp+1, r16
|
|
|
|
ldi r16, 0
|
|
ldi r17, 0
|
|
bigcall GuiApp_new
|
|
sts guiApp, yl
|
|
sts guiApp+1, yh
|
|
|
|
push yl
|
|
push yh
|
|
bigcall ClimateWin_new
|
|
; rcall mkTestWindow
|
|
mov xl, yl
|
|
mov xh, yh
|
|
pop yh
|
|
pop yl
|
|
brcc DEBUG_STOP2
|
|
|
|
push xl
|
|
push xh
|
|
bigcall GuiApp_EnterWindow
|
|
pop xh
|
|
pop xl
|
|
brcc DEBUG_STOP3
|
|
|
|
push yl
|
|
push yh
|
|
mov yl, xl
|
|
mov yh, xh
|
|
ldi r16, (1<<WIDGET_FLAGS_VISIBLE_BIT) | (1<<WIDGET_FLAGS_DIRTY_BIT) | (1<<WIDGET_FLAGS_LAYOUT_BIT)
|
|
bigcall OBJ_AddFlagsUp
|
|
pop yh
|
|
pop yl
|
|
|
|
ret
|
|
|
|
|
|
; ; debug
|
|
; ldi r16, LOW(Debug_Style*2)
|
|
; std Y+WIDGET_OFFS_STYLE_LO, r16
|
|
; ldi r16, HIGH(Debug_Style*2)
|
|
; std Y+WIDGET_OFFS_STYLE_HI, r16
|
|
|
|
DEBUG_STOP:
|
|
bigjmp DEBUG1
|
|
|
|
|
|
DEBUG_STOP2:
|
|
bigjmp DEBUG2
|
|
|
|
DEBUG_STOP3:
|
|
bigjmp DEBUG3
|
|
|
|
|
|
|
|
Debug_Style:
|
|
.dw DISPLAY_COLOR_BLACK ; frontCol_norm
|
|
.dw DISPLAY_COLOR_GREEN ; backCol_norm
|
|
.dw DISPLAY_COLOR_BLACK ; borderCol_norm
|
|
.dw DISPLAY_COLOR_WHITE ; shadowCol_norm
|
|
|
|
.dw DISPLAY_COLOR_WHITE ; frontCol_activated
|
|
.dw DISPLAY_COLOR_NAVY ; backCol_activated
|
|
.dw DISPLAY_COLOR_BLACK ; borderCol_activated
|
|
.dw DISPLAY_COLOR_WHITE ; shadowCol_activated
|
|
|
|
.db 2, 1 ; outerBorderSize, innerBorderSize
|
|
.dw ili9341Font12x16_1*2 ; font
|
|
.db 12, 16 ; charWidth, charHeight
|
|
|
|
|
|
|
|
mkTestWindow:
|
|
bigcall GuiApp_GetRootWindow
|
|
brcc mkTestWindow_ret
|
|
mov xl, r18 ; use root window as parent for main window
|
|
mov xh, r19
|
|
ldi r16, 0 ; OPTS
|
|
ldi r17, (WIDGET_PACK_FILLED<<WIDGET_PACK_HSELF0_BIT) | (WIDGET_PACK_FILLED<<WIDGET_PACK_VSELF0_BIT) ; PACK
|
|
ldi r20, LOW(RESSSOURCE_TXT_LIVINGROOM) ; TODO: use "Room Climate"
|
|
ldi r21, HIGH(RESSSOURCE_TXT_LIVINGROOM)
|
|
bigcall MainWindow_new
|
|
brcc mkTestWindow_ret
|
|
|
|
; Y=MainWindow
|
|
push yl
|
|
push yh
|
|
bigcall MainWindow_GetContentWidget ; r19:r18=content window
|
|
brcc mkTestWindow_popRet
|
|
mov xl, r18 ; use content window as parent
|
|
mov xh, r19
|
|
|
|
push xl ; content window
|
|
push xh
|
|
rcall mkTestWidgets
|
|
; rcall mkSimpleTestWidgets
|
|
pop xh
|
|
pop xl
|
|
mkTestWindow_popRet:
|
|
pop yh
|
|
pop yl
|
|
mkTestWindow_ret:
|
|
ret
|
|
; @end
|
|
|
|
|
|
|
|
; ---------------------------------------------------------------------------
|
|
; @routine mkTestWidgets
|
|
;
|
|
; @param X pointer to MainWindow content window (becomes parent)
|
|
; @return CFLAG set of okay, cleared otherwise
|
|
; @return Y address of newly created object
|
|
|
|
mkTestWidgets:
|
|
ldi r16, 0 ; OPTS
|
|
ldi r17, (WIDGET_PACK_FILLED<<WIDGET_PACK_HSELF0_BIT) | (WIDGET_PACK_FILLED<<WIDGET_PACK_VSELF0_BIT) ; PACK
|
|
; ldi r20, HLAYOUT_MODE_SPREAD
|
|
ldi r20, VLAYOUT_MODE_EXPAND
|
|
bigcall VLayout_new
|
|
brcc mkTestWidgets_ret
|
|
|
|
push yl
|
|
push yh
|
|
mov xl, yl ; use HLayout as parent
|
|
mov xh, yh
|
|
|
|
push xl ; HLayout
|
|
push xh
|
|
ldi r16, 0
|
|
ldi r17, (WIDGET_PACK_BEGIN<<WIDGET_PACK_HSELF0_BIT) | (WIDGET_PACK_BEGIN<<WIDGET_PACK_VSELF0_BIT) ; PACK
|
|
ldi r20, LOW(RESSSOURCE_IMG_HUMIDITY96)
|
|
ldi r21, HIGH(RESSSOURCE_IMG_HUMIDITY96)
|
|
bigcall ImageView_new
|
|
pop xh
|
|
pop xl
|
|
brcc mkTestWidgets_popRet
|
|
|
|
push xl ; HLayout
|
|
push xh
|
|
ldi r16, 0
|
|
ldi r17, (WIDGET_PACK_BEGIN<<WIDGET_PACK_HSELF0_BIT) | (WIDGET_PACK_BEGIN<<WIDGET_PACK_VSELF0_BIT) ; PACK
|
|
ldi r20, LOW(RESSSOURCE_IMG_CLOUD96)
|
|
ldi r21, HIGH(RESSSOURCE_IMG_CLOUD96)
|
|
bigcall ImageView_new
|
|
pop xh
|
|
pop xl
|
|
brcc mkTestWidgets_popRet
|
|
|
|
mkTestWidgets_popRet:
|
|
pop yh
|
|
pop yl
|
|
mkTestWidgets_ret:
|
|
ret
|
|
; @end
|
|
|
|
|
|
|
|
mkSimpleTestWidgets:
|
|
push xl ; Contentwindow
|
|
push xh
|
|
ldi r16, 0
|
|
ldi r17, (WIDGET_PACK_BEGIN<<WIDGET_PACK_HSELF0_BIT) | (WIDGET_PACK_BEGIN<<WIDGET_PACK_VSELF0_BIT) ; PACK
|
|
ldi r20, LOW(RESSSOURCE_IMG_HUMIDITY96)
|
|
ldi r21, HIGH(RESSSOURCE_IMG_HUMIDITY96)
|
|
bigcall ImageView_new
|
|
pop xh
|
|
pop xl
|
|
brcc mkSimpleTestWidgets_ret
|
|
|
|
push xl ; HLayout
|
|
push xh
|
|
ldi r16, 0
|
|
ldi r17, (WIDGET_PACK_BEGIN<<WIDGET_PACK_HSELF0_BIT) | (WIDGET_PACK_BEGIN<<WIDGET_PACK_VSELF0_BIT) ; PACK
|
|
ldi r20, LOW(RESSSOURCE_IMG_CLOUD96)
|
|
ldi r21, HIGH(RESSSOURCE_IMG_CLOUD96)
|
|
bigcall ImageView_new
|
|
pop xh
|
|
pop xl
|
|
brcc mkSimpleTestWidgets_ret
|
|
|
|
mkSimpleTestWidgets_ret:
|
|
ret
|
|
; @end
|
|
|
|
|
|
|
|
|
|
; ***************************************************************************
|
|
; includes
|
|
|
|
.include "devices/all/hw_m644p.asm"
|
|
.include "devices/all/includes.asm"
|
|
|
|
.include "devices/all/handlevaluemsg.asm"
|
|
|
|
.include "common/debug.asm"
|
|
|
|
.include "modules/lcd2/ili9341/font12x16.asm"
|
|
.include "modules/lcd2/ili9341/font12x16_1.asm"
|
|
|
|
.include "modules/lcd2/ili9341/font6x8.asm"
|
|
.include "modules/lcd2/ili9341/font6x8_1.asm"
|
|
|
|
;.include "modules/lcd2/ili9341/font12x20.asm"
|
|
;.include "modules/lcd2/ili9341/font12x20_1.asm"
|
|
;.include "common/list_t.asm"
|
|
;.include "common/tree_t.asm"
|
|
|
|
.include "common/eeprom_tlv.asm"
|
|
|
|
.include "common/divide.asm"
|
|
;.include "common/multiply.asm"
|
|
.include "common/itoa.asm"
|
|
.include "common/ressource.asm"
|
|
|
|
.include "style.asm"
|
|
|
|
|
|
GUI2_MODULE_BEGIN:
|
|
.include "modules/lcd2/gui2/base/object.asm"
|
|
.include "modules/lcd2/gui2/base/widget.asm"
|
|
.include "modules/lcd2/gui2/base/layout.asm"
|
|
.include "modules/lcd2/gui2/base/hlayout.asm"
|
|
.include "modules/lcd2/gui2/base/vlayout.asm"
|
|
.include "modules/lcd2/gui2/base/guiapp.asm"
|
|
.include "modules/lcd2/gui2/base/mainwindow.asm"
|
|
.include "modules/lcd2/gui2/base/rootwindow.asm"
|
|
.include "modules/lcd2/gui2/base/label.asm"
|
|
.include "modules/lcd2/gui2/base/button.asm"
|
|
.include "modules/lcd2/gui2/base/imageview.asm"
|
|
.include "modules/lcd2/gui2/base/valuelabel.asm"
|
|
.include "modules/lcd2/gui2/aqhome/sensorwatch.asm"
|
|
GUI2_MODULE_END:
|
|
.equ MODULE_SIZE_GUI2 = GUI2_MODULE_END-GUI2_MODULE_BEGIN
|
|
|
|
.include "w_climate.asm"
|
|
|
|
|
|
.include "ressources.inc"
|
|
|
|
|
|
; ---------------------------------------------------------------------------
|
|
; defines for network interface
|
|
|
|
;.equ netInterfaceData = netUartIface
|
|
;.equ netInterfaceData = uart_bitbang_iface
|
|
.equ netInterfaceData = com2w_iface
|
|
|
|
|
|
|
|
|
|
.dseg
|
|
|
|
guiApp: .byte 2
|
|
; debug
|
|
rootWindow: .byte 2
|
|
mainWin1: .byte 2
|
|
|
|
heapStart:
|
|
|
|
.equ HEAP_START = heapStart
|
|
.equ HEAP_SIZE = (SRAM_SIZE-STACK_SIZE)-HEAP_START
|
|
|
|
|