mirror of
https://github.com/A2osX/A2osX.git
synced 2024-11-16 23:21:24 +00:00
44 lines
749 B
Plaintext
44 lines
749 B
Plaintext
NEW
|
||
AUTO 3,1
|
||
*--------------------------------------
|
||
* Y,A = ptr to menu definition
|
||
*--------------------------------------
|
||
MENU.New >STYA ZPPtr1
|
||
|
||
lda #2 1px Border
|
||
sta DX
|
||
sta DY
|
||
stz DX+1
|
||
stz DY+1
|
||
clc
|
||
rts
|
||
*--------------------------------------
|
||
MENU.Paint
|
||
MENU.Close
|
||
*--------------------------------------
|
||
MENU.MenubarInit
|
||
>STYA ZPPtr1
|
||
|
||
|
||
|
||
|
||
clc
|
||
rts
|
||
*--------------------------------------
|
||
MENUBAR.New
|
||
MENUBAR.Paint
|
||
MENUBAR.Close
|
||
|
||
*--------------------------------------
|
||
MENUITEM.New
|
||
MENUITEM.Paint
|
||
MENUITEM.Close
|
||
|
||
clc
|
||
rts
|
||
*--------------------------------------
|
||
MAN
|
||
SAVE usr/src/lib/libgui.s.menu
|
||
LOAD usr/src/lib/libgui.s
|
||
ASM
|