;====================================================
;
;	Api92/Api89 Example Source Code
;
;	(c) NeXO Software, Ibrahim - Benoit SCHERRER
;	e-mail : p.c.scherrer@wanadoo.fr
;	web : http://perso.wanadoo.fr/scherrer/ben/
;
;	File>	iengine.asm
;	> It is an example of the very powerful
;	InterfaceEngine function of Api92/Api89
;====================================================
;--------------------- Includes ---------------------
	include "tios.h"
	include	"api92.h"
	include "api92cst.h"
	xdef	_ti89
OX	equ	-40
OY	equ	-20
;------------ Start of assembly program -------------
	xdef	_main
	xdef	_comment
_main
	lea	ie_Data(PC),a0
	jsr	api92::InterfaceEngine
	rts
;------------------- Program Data -------------------
ie_Data:
	dc.b	IE_ANIMEDWIN2,50,50+OX,30+OY,189+OX,90+OY,"IE Example",0
	dc.b	IE_SETFONT,0
	dc.b	IE_STRING,54+OX,45+OY,"Here is a small example of",0
	dc.b	IE_STRING,54+OX,51+OY,"the Interface Engine",0
	dc.b	IE_SETFONT,1
	dc.b	IE_STRING,60,60,"Useful !",0
	dc.b	IE_WAITKEY
	dc.b	IE_END
_comment dc.b	"InterfaceEngine Demo",0
;-------------------- End of program ------------------
	end