incdir "asm:include/"
;	IFND	INTUITION_INTUITIONBASE_I
;INTUITION_INTUITIONBASE_I	SET	1
;	IFND	EXEC_TYPES_I
;	INCLUDE	"exec/types.i"
;	ENDC
;	IFND	EXEC_LIBRARIES_I
;	INCLUDE	"exec/libraries.i"
;	ENDC
;	IFND	GRAPHICS_VIEW_I
;	INCLUDE	"graphics/view.i"
;	ENDC
;	ENDC
	include "intuition/intuition.i"
	include	"misc/Measystart.i"
;	rsreset
;IntuitionBase	rs.b	0
;ib_LibNode	rs.b	LIB_SIZE
;ib_ViewLord	rs.b	v_SIZEOF
;ib_ActiveWindow	rs.l	1
;ib_ActiveScreen	rs.l	1
;ib_FirstScreen	rs.l	0
	move.l	4,a6
	move.l	#iname,a1
	jsr	-408(a6)
	tst.l	d0
	beq	quit
	move.l	d0,ibase
	move.l	d0,a6
	move.l	ib_firstscreen(a6),a6
	move.l	sc_firstwindow(a6),a6
ggg	move.l	wd_menustrip(a6),firstmenu
	move.l	firstmenu,d0
	tst.l	d0
	beq	nextwindow
	move.l	d0,a6
	move.l	mu_nextmenu(a6),secmenu
	move.l	secmenu,a6
	move.l	mu_firstitem(a6),a6
	move.l	mi_nextitem(a6),a6
	move.l	mi_nextitem(a6),a6
	move.l	mi_nextitem(a6),a6
	move.b	#"T",mi_command(a6)
	ori.w	#4,mi_flags(a6)
	move.l	mi_nextitem(a6),a6
	move.l	mi_nextitem(a6),a6
	move.b	#"F",mi_command(a6)
	ori.w	#4,mi_flags(a6)
	move.l	mi_nextitem(a6),a6
	move.l	mi_nextitem(a6),a6
	move.l	a6,a5
	move.l	mi_subitem(a6),a6
	addi.w	#35,mi_width(a6)
	move.b	#"W",mi_command(a6)
	ori.w	#4,mi_flags(a6)
	move.l	mi_nextitem(a6),a6
	addi.w	#35,mi_width(a6)
	move.b	#"V",mi_command(a6)
	ori.w	#4,mi_flags(a6)
	move.l	a5,a6
	move.l	mi_nextitem(a6),a6
	move.l	mi_subitem(a6),a6
	addi.w	#35,mi_width(a6)
	move.b	#"G",mi_command(a6)
	ori.w	#4,mi_flags(a6)
	move.l	mi_nextitem(a6),a6
	addi.w	#35,mi_width(a6)
	move.b	#"H",mi_command(a6)
	ori.w	#4,mi_flags(a6)
	move.l	mi_nextitem(a6),a6
	addi.w	#35,mi_width(a6)
	move.b	#"J",mi_command(a6)
	ori.w	#4,mi_flags(a6)
	move.l	mi_nextitem(a6),a6
	addi.w	#35,mi_width(a6)
	move.b	#"M",mi_command(a6)
	ori.w	#4,mi_flags(a6)
	move.l	secmenu,a6
	move.l	mu_nextmenu(a6),thirdmenu
	move.l	thirdmenu,a6
	move.l	mu_firstitem(a6),a6	open
	move.l	mi_nextitem(a6),a6	copy
	move.l	mi_nextitem(a6),a6	rename
	move.l	mi_nextitem(a6),a6	info
	move.l	mi_nextitem(a6),a6	snapshot
	move.l	mi_nextitem(a6),a6	unsnapshot
	move.l	mi_nextitem(a6),a6	leave out
	move.l	mi_nextitem(a6),a6	put away
	move.l	mi_nextitem(a6),a6	~~~
	move.l	mi_nextitem(a6),a6	delete
	move.b	#'D',mi_command(a6)
	ori.w	#4,mi_flags(a6)
nomenus	move.l	ibase,a1
	move.l	4,a6
	jsr	-414(a6)
quit	rts
nextwindow
	move.l	wd_nextwindow(a6),d0
	tst.l	d0
	beq	nomenus
	move.l	d0,a6
	jmp	ggg
ibase 	dc.l	0
firstmenu	dc.l	0
secmenu	dc.l	0
thirdmenu	dc.l	0
iname	dc.b	"intuition.library",0