;====================================================
;
;	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>	checkbox.asm
;	> This is a simple example of checkbox use.
;====================================================


;--------------------- Includes ---------------------

	include "tios.h"
	include	"api92.h"
	include "api92cst.h"

;#ifdef TIPLUS
;#ifdef TI89
	xdef	_ti89
;#else
	xdef	_ti92plus
;#endif
;#endif


;------------ Start of assembly program -------------

	xdef	_main
	xdef	_comment

_main:	moveq.w	#1,d0
	jsr	api92::SetFont

	lea	win(PC),a0
	jsr	api92::draw_sAnimedWindow2

	lea	cb_1(PC),a0
	jsr	api92::CheckBoxComponent

	lea	cb_2(PC),a0
	jsr	api92::CheckBoxComponent

	lea	cb_3(PC),a0
	jsr	api92::CheckBoxComponent

	lea	cb_4(PC),a0
	jsr	api92::CheckBoxComponent

	jsr	api92::WaitKey
	rts



;------------------- Program Data -------------------

cb_1:	dc.b	1,0,10,20,"Style 1",0
cb_2:	dc.b	1,1,10,30,"Style 2",0
cb_3:	dc.b	1,2,10,40,"Style 3",0
cb_4:	dc.b	1,3,10,50,"Style 4",0

win	dc.b	50,5,7,90,65,"CheckBox Example",0

_comment dc.b	"CheckBoxes Examples",0

;-------------------- End of program ------------------

	end