NEW
PREFIX /A2OSX.BUILD
AUTO 4,1
*--------------------------------------
MENU.New		>STYA ZPPtr1			
				

				lda #2					1px Border
				sta DX
				sta DY
				stz DX+1
				stz DY+1
				
				lda ZPPtr1
				clc
				adc #S.MENU
				sta ZPPtr2
				
				lda ZPPtr1+1
				adc /S.MENU
				sta ZPPtr2+1
				
.1				lda (ZPPtr2)
*--------------------------------------
MENU.SysMenu
*--------------------------------------
MENU.MenuEditor	.AZ "File"
					.DA #02				ID
					.DA #S.MITEM.HOTKEY.CTRL
					.DA #'N'
					.AZ "New"
					.DA #04				ID
					.DA #S.MITEM.HOTKEY.CTRL
					.DA #'O'
					.AZ "Open..."
					.DA #06				ID
					.DA #S.MITEM.HOTKEY.CTRL
					.DA #'S'
					.AZ "Save"
					.DA #08				ID
					.DA #S.MITEM.HOTKEY.OA+S.MITEM.HOTKEY.CTRL
					.DA #'S'
					.AZ "Save As..."
					.DA #10				ID
					.DA #S.MITEM.HOTKEY.CTRL
					.DA #'Q'
					.AZ "Quit"
					.DA #0
				.AZ "Edit"
					.DA #12				ID
					.DA #S.MITEM.HOTKEY.OA
					.DA #'X'
					.AZ "Cut"
					.DA #14				ID
					.DA #S.MITEM.HOTKEY.OA
					.DA #'C'
					.AZ "Copy"
					.DA #16				ID
					.DA #S.MITEM.HOTKEY.OA
					.DA #'V'
					.AZ "Paste"
					.DA #0
				.AZ "Options"
					.DA #18				ID
					.DA #0
					.DA #0
					.AZ "Check Me"
					
					
					.DA #0
				.DA #0
*--------------------------------------
MAN
SAVE /A2OSX.SRC/LIB/LIBGUI.S.MENU
LOAD /A2OSX.SRC/LIB/LIBGUI.S
ASM