fox32rom/rom.asm

    ; entry point
    ; fox32 starts here on reset
    org 0xF0000000

const system_stack:     0x01FFF800
const background_color: 0xFF414C50

    ; initialization code
entry:
    mov rsp, system_stack
    mov [event_stack_pointer], event_stack

    mov [0x000003FC], system_vsync_handler

    ; disable all overlays
    mov r31, 0x1F
    mov r0, 0x02000300
disable_all_overlays_loop:
    out r0, 0
    inc r0
    loop disable_all_overlays_loop

    ; write the cursor bitmap to the overlay framebuffer
    mov r0, [overlay_31_framebuffer_ptr]
    mov r1, mouse_cursor
    mov r31, 96 ; 8x12
cursor_overlay_loop:
    mov [r0], [r1]
    add r0, 4
    add r1, 4
    loop cursor_overlay_loop

cursor_enable:
    ; set properties of overlay 31
    mov r0, 0x0200011F ; overlay 31: size
    mov.16 r1, [overlay_31_height]
    sla r1, 16
    mov.16 r1, [overlay_31_width]
    out r0, r1
    mov r0, 0x0200021F ; overlay 31: framebuffer pointer
    mov r1, [overlay_31_framebuffer_ptr]
    out r0, r1

    ; enable overlay 31 (cursor)
    mov r0, 0x0200031F
    out r0, 1

    mov r0, background_color
    call fill_background

menu_bar_enable:
    ; set properties of overlay 30
    mov r0, 0x0200001E ; overlay 30: position
    mov.16 r1, [overlay_30_position_y]
    sla r1, 16
    mov.16 r1, [overlay_30_position_x]
    out r0, r1
    mov r0, 0x0200011E ; overlay 30: size
    mov.16 r1, [overlay_30_height]
    sla r1, 16
    mov.16 r1, [overlay_30_width]
    out r0, r1
    mov r0, 0x0200021E ; overlay 30: framebuffer pointer
    mov r1, [overlay_30_framebuffer_ptr]
    out r0, r1

    ; enable overlay 30 (menu bar)
    mov r0, 0x0200031E
    out r0, 1

    call clear_menu_bar
    mov r0, menu_items_root
    mov r1, 0xFFFFFFFF
    call draw_menu_bar_root_items

draw_startup_text:
    mov r0, 252
    mov r1, 229
    mov r2, 136
    mov r3, 40
    mov r4, 0xFF505C60
    ;mov r4, 0xFFFFFFFF
    call draw_filled_rectangle_to_background
    mov r0, 253
    mov r1, 230
    mov r2, 134
    mov r3, 38
    mov r4, 0xFFFFFFFF
    ;mov r4, 0xFF000000
    call draw_filled_rectangle_to_background
    mov r0, 254
    mov r1, 231
    mov r2, 132
    mov r3, 36
    mov r4, 0xFF505C60
    ;mov r4, 0xFFFFFFFF
    call draw_filled_rectangle_to_background

    mov r0, startup_str_1
    mov r1, 256
    mov r2, 232
    mov r3, 0xFFFFFFFF
    mov r4, 0x00000000
    call draw_str_to_background

    mov r0, startup_str_2
    mov r1, 256
    mov r2, 248
    call draw_str_to_background

    ise
event_loop:
    call wait_for_event

    ; was the mouse clicked?
    cmp r0, mouse_click_event_type
    ;ifz call mouse_click_event

    ; did the user click the menu bar?
    cmp r0, menu_bar_click_event_type
    ifz mov r0, menu_items_root
    ifz call menu_bar_click_event

    ; is the user in a submenu?
    cmp r0, submenu_update_event_type
    ifz call submenu_update_event

    ; did the user click a submenu item?
    cmp r0, submenu_click_event_type
    ifz call submenu_click_event

    jmp event_loop

submenu_click_event:
    ; r3 contains the clicked submenu item

    ; about
    cmp r3, 0
    ;

    ; halt
    cmp r3, 3
    ifz icl
    ifz halt

    ret

    ; code
    #include "background.asm"
    #include "overlay.asm"
    #include "menu.asm"
    #include "submenu.asm"
    #include "event.asm"
    #include "mouse.asm"
    #include "vsync.asm"





    ; data

    ; system jump table
    org.pad 0xF1000000
    def.32 system_vsync_handler
    def.32 get_mouse_position
    def.32 push_event
    def.32 wait_for_event

    ; background jump table
    org.pad 0xF1001000
    def.32 draw_str_to_background
    def.32 draw_font_tile_to_background
    def.32 fill_background

    ; overlay jump table
    org.pad 0xF1002000
    def.32 draw_str_to_overlay
    def.32 draw_font_tile_to_overlay
    def.32 fill_overlay
    def.32 find_overlay_covering_position
    def.32 check_if_overlay_covers_position
    def.32 check_if_enabled_overlay_covers_position

    ; menu bar jump table
    org.pad 0xF1003000
    def.32 menu_bar_click_event
    def.32 clear_menu_bar
    def.32 draw_menu_bar_root_items
    def.32 draw_submenu_items
    def.32 close_submenu

    org.pad 0xF1F00000
font:
    #include_bin "../font/unifont-thin.raw"

mouse_cursor:
    #include_bin "../font/cursor2.raw"

; cursor overlay struct:
overlay_31_width:           def.16 8
overlay_31_height:          def.16 12
overlay_31_position_x:      def.16 0
overlay_31_position_y:      def.16 0
overlay_31_framebuffer_ptr: def.32 0x0212D000

; menu bar overlay struct:
overlay_30_width:           def.16 640
overlay_30_height:          def.16 16
overlay_30_position_x:      def.16 0
overlay_30_position_y:      def.16 0
overlay_30_framebuffer_ptr: def.32 0x0212D180

; submenu overlay struct:
; this struct must be writable, so these are hard-coded addresses in shared memory
const overlay_29_width:           0x02137180 ; 2 bytes
const overlay_29_height:          0x02137182 ; 2 bytes
const overlay_29_position_x:      0x02137184 ; 2 bytes
const overlay_29_position_y:      0x02137186 ; 2 bytes
const overlay_29_framebuffer_ptr: 0x0213718A ; 4 bytes
const overlay_29_framebuffer:     0x0213718E

startup_str_1: def.str "Welcome to fox32" def.8 0
startup_str_2: def.str "Insert boot disk" def.8 0

menu_items_root:
    def.8 1                                                     ; number of submenus
    def.32 menu_items_system_list def.32 menu_items_system_name ; pointer to submenu list, pointer to submenu name
menu_items_system_name:
    def.8 6 def.str "System" def.8 0x00                ; text length, text, null-terminator
menu_items_system_list:
    def.8 4                                            ; number of items
    def.8 22                                           ; submenu width (usually longest item + 2)
    def.8 5  def.str "About"                def.8 0x00 ; text length, text, null-terminator
    def.8 20 def.str "Mount Floppy Disk..." def.8 0x00 ; text length, text, null-terminator
    def.8 18 def.str "Mount Hard Disk..."   def.8 0x00 ; text length, text, null-terminator
    def.8 4  def.str "Halt"                 def.8 0x00 ; text length, text, null-terminator

    ; pad out to 32 MiB
    org.pad 0xF2000000

    ; TODO: ideas:
    ;       rectangle drawing routine
    ;       fill background/overlay routine
    ;       seperators in submenus