89 lines
2.0 KiB
NASM
89 lines
2.0 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. *
|
|
; ***************************************************************************
|
|
|
|
#ifndef AQH_AVR_GUI2_MAINWINDOW_ASM
|
|
#define AQH_AVR_GUI2_MAINWINDOW_ASM
|
|
|
|
|
|
; ***************************************************************************
|
|
; defines
|
|
|
|
.equ MAINWINDOW_OFFS_BEGIN = WIDGET_SIZE
|
|
; no data for now
|
|
.equ MAINWINDOW_SIZE = MAINWINDOW_OFFS_BEGIN+0
|
|
|
|
|
|
|
|
; ***************************************************************************
|
|
; code
|
|
|
|
.cseg
|
|
|
|
|
|
|
|
; ---------------------------------------------------------------------------
|
|
; @routine MainWindow_new @global
|
|
;
|
|
; @return CFLAG set of okay, cleared otherwise
|
|
; @return Y address of newly created object
|
|
; @param r16 value for OBJECT_OFFS_OPTS_LO
|
|
; @param r17 value for OBJECT_OFFS_OPTS_HI
|
|
; @clobbers any
|
|
|
|
MainWindow_new:
|
|
ldi r24, LOW(MAINWINDOW_SIZE)
|
|
ldi r25, HIGH(MAINWINDOW_SIZE)
|
|
bigcall Object_Alloc ; (!r16, !r17)
|
|
brcc MainWindow_new_ret
|
|
rcall MainWindow_Init ; (r16, r17, X)
|
|
sec
|
|
MainWindow_new_ret:
|
|
ret
|
|
; @end
|
|
|
|
|
|
|
|
; ---------------------------------------------------------------------------
|
|
; @routine MainWindow_Init @global
|
|
;
|
|
; @param Y address of widget
|
|
; @clobbers r16, r17, X
|
|
|
|
MainWindow_Init:
|
|
; call base class
|
|
bigcall Widget_Init ; (r16, r17, X)
|
|
|
|
; move widget
|
|
clr r4
|
|
clr r5
|
|
clr r6
|
|
clr r7
|
|
bigcall Widget_Move ; (R16)
|
|
ldi r16, LOW(DISPLAY_WIDTH)
|
|
mov r8, r16
|
|
ldi r16, HIGH(DISPLAY_WIDTH)
|
|
mov r9, r16
|
|
|
|
; resize widget
|
|
ldi r16, LOW(DISPLAY_HEIGHT)
|
|
mov r10, r16
|
|
ldi r16, HIGH(DISPLAY_HEIGHT)
|
|
mov r11, r16
|
|
bigcall Widget_Resize ; (R16)
|
|
|
|
ret
|
|
; @end
|
|
|
|
|
|
|
|
|
|
|
|
#endif
|
|
|