This is my menu code:
how can I get it so when the application menu is selected in OSX and  
quit is selected
my application quits?

Brian

local fn DoMenu
dim as long menuID, itemID

menuID = menu(_menuID)
itemID = menu(_itemID)

select case( menuID )
case _applemenu
select( itemID )
case 1
def fn aboutbox
fn aboutbox

end select
case 1
select( itemID )
case 1
window close #_Window1Wnd
delay 300
SetRect(r, 0, 0, 640, 480)// Optional FB auto-centre
//SetRect(r, 0, 44, 640, 524)// w: 640 h: 480
appearance window _Window1Wnd,¬
                   m$, @r,¬
                   _kDocumentWindowClass, wa
def SetWindowBackground(_kThemeActiveDialogBackgroundBrush, _zTrue)
'~'<
SetRect(r,0,0, 640, 480)
s = ""
text deffont$,defsize%,defstyle%
color defcolor
edit field _cXeditT, s, @r, _framed_noDrawFocus, _leftJust

SetRect(r, 640,-116, 655, 481)
//scroll button -_cXeditT,0,0,0,0, @r, _scrollVert
Scroll Button -1,1,1,1,1,,_scrollVert

dim alxstr$,t$

end select
end select
menu

end fn