IFND	RC12_I
RC12_I	SET	1

MR	EQUR	A4	;mui base register

GUI_CALL	EQU	0
REXX_CALL	EQU	-1

ID_CRYPT	EQU	500	;return id's
ID_ABOUT	EQU	501
ID_DECRYPT	EQU	502
ID_ICONIFY	EQU	503
ID_ABOUTMUI	EQU	504
ID_SSAVE	EQU	505
ID_STRIP	EQU	506
ID_SEM	EQU	507
ID_PREFS	EQU	508
ID_SETTINGS	EQU	509
ID_QUIT	EQU	510
ID_CHECK	EQU	511
ID_EQUAL	EQU	512


CY_RANDOM	EQU	0	;cycle ids (crypt)
CY_PASSWORD	EQU	1
CY_JN25	EQU	2
CY_NONE	EQU	3

CY_NOPACK	EQU	0	;cycle ids (crunch)
CY_PACK	EQU	1

LF	EQU	10
TAB	EQU	9
custom	EQU	$dff000
OS204	EQU	37
SysBase	EQU	4
stcSecurityLen	EQU	4

CALLINT	MACRO
	jsr	_LVO\1(a6)
	ENDM
CALL	MACRO
	CALLINT	\1
	ENDM
JUMP	MACRO
	jmp	_LVO\1(a6)
	ENDM

GET	MACRO
	move.l	#\2,d0
	move.l	\1(pc),a0
	lea	\3(pc),a1
	CALL	GetAttr
	ENDM


StrLabel	MACRO
	clr.l	-(sp)
	clr.l	-(sp)
	pea	\1-VBase(a5)
	moveq	#MUIO_Label,d0
	move.l	sp,a0
	CALL	MUI_MakeObjectA
	lea	3*4(sp),sp
TAG_SPACE	SET	TAG_SPACE+4
	move.l	d0,(MR)+
	ENDM

BarLabel	MACRO
	clr.l	-(sp)
	clr.l	-(sp)
	moveq	#NM_BARLABEL,d7
	move.l	d7,-(sp)
	moveq	#MUIO_Menuitem,d0
	move.l	sp,a0
	CALL	MUI_MakeObjectA
	lea	3*4(sp),sp
TAG_SPACE	SET	TAG_SPACE+4
	move.l	d0,(MR)+
	ENDM

MakeImage	MACRO
	move.l	a0,-(sp)
	clr.l	-(sp)
	moveq	#\1,d7
	move.l	d7,-(sp)
	moveq	#MUIO_PopButton,d0
	move.l	sp,a0
	CALL	MUI_MakeObjectA
	addq.w	#2*4,sp
	move.l	(sp)+,a0
TAG_SPACE	SET	TAG_SPACE+4
	move.l	d0,(MR)+
	ENDM

	INCDIR	"INCLUDE:"
	INCLUDE	"exec/execbase.i"
	INCLUDE	"exec/memory.i"
	INCLUDE	"dos/dosextens.i"
	INCLUDE	"dos/dos.i"
	INCLUDE	"dos/doshunks.i"
	INCLUDE	"libraries/mui_a5.i"
	INCLUDE	"libraries/gadtools.i"
	INCLUDE	"libraries/asl.i"
	INCLUDE	"libraries/stc.i"
	INCLUDE	"hardware/custom.i"
	INCLUDE	"hardware/intbits.i"
	INCLUDE	"hardware/sr.i"
	INCLUDE	"rexx/rxslib.i"
	INCLUDE	"workbench/startup.i"
	INCLUDE	"graphics/gfx.i"
	INCLUDE	"lvo/mui.i"
	INCLUDE	"lvo/intuition.i"
	INCLUDE	"lvo/dos.i"
	INCLUDE	"lvo/exec.i"
	INCLUDE	"lvo/stc.i"
	INCLUDE	"lvo/rexxsyslib.i"
	INCLUDE	"lvo/icon.i"
	INCLUDE	"lvo/utility.i"
	ENDC