2018-05-04 16:55:29 +02:00
|
|
|
|
NEW
|
2019-07-30 10:57:25 +02:00
|
|
|
|
AUTO 3,1
|
2018-05-04 16:55:29 +02:00
|
|
|
|
*--------------------------------------
|
2019-01-08 16:29:26 +00:00
|
|
|
|
* Y,A = ptr to menu definition
|
|
|
|
|
|
*--------------------------------------
|
2018-05-09 16:57:05 +02:00
|
|
|
|
MENU.New >STYA ZPPtr1
|
2018-05-04 16:55:29 +02:00
|
|
|
|
|
|
|
|
|
|
lda #2 1px Border
|
|
|
|
|
|
sta DX
|
|
|
|
|
|
sta DY
|
|
|
|
|
|
stz DX+1
|
|
|
|
|
|
stz DY+1
|
|
|
|
|
|
clc
|
2019-01-08 16:29:26 +00:00
|
|
|
|
rts
|
2018-05-04 16:55:29 +02:00
|
|
|
|
*--------------------------------------
|
2020-09-07 22:40:50 +02:00
|
|
|
|
MENU.Paint
|
|
|
|
|
|
MENU.Close
|
|
|
|
|
|
*--------------------------------------
|
2020-09-15 16:48:35 +02:00
|
|
|
|
MENU.MenubarInit
|
|
|
|
|
|
>STYA ZPPtr1
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
clc
|
|
|
|
|
|
rts
|
|
|
|
|
|
*--------------------------------------
|
2020-09-07 22:40:50 +02:00
|
|
|
|
MENUBAR.New
|
|
|
|
|
|
MENUBAR.Paint
|
|
|
|
|
|
MENUBAR.Close
|
|
|
|
|
|
|
|
|
|
|
|
*--------------------------------------
|
|
|
|
|
|
MENUITEM.New
|
|
|
|
|
|
MENUITEM.Paint
|
|
|
|
|
|
MENUITEM.Close
|
|
|
|
|
|
|
|
|
|
|
|
clc
|
|
|
|
|
|
rts
|
2018-05-09 16:57:05 +02:00
|
|
|
|
*--------------------------------------
|
2018-05-04 16:55:29 +02:00
|
|
|
|
MAN
|
2020-06-30 17:32:23 +02:00
|
|
|
|
SAVE usr/src/lib/libgui.s.menu
|
|
|
|
|
|
LOAD usr/src/lib/libgui.s
|
2018-05-04 16:55:29 +02:00
|
|
|
|
ASM
|
