|  | #include "./modules/dialogue.mod.hsp"
#include "./modules/my_button.mod.hsp"
#include "./modules/keyboard.mod.hsp"
#include "./modules/char.mod.hsp"
#include "./modules/user.mod.hsp"
#ifndef __NAME_DIALOGUE__
#define __NAME_DIALOGUE__
#module \
NameDialogue
#const DIALOGUE_TOP	DIALOGUE_TOP@Dialogue
#const DIALOGUE_BOTTOM	DIALOGUE_BOTTOM@Dialogue
#const DIALOGUE_LEFT	DIALOGUE_LEFT@Dialogue
#const DIALOGUE_RIGHT	DIALOGUE_RIGHT@Dialogue
#deffunc local \
Show
	ButtonOk = New@MyButton (DISPLAY_WIDTH / 2, DIALOGUE_BOTTOM@Dialogue - 132, BUFFER_BUTTON_OK, *Ok)
	Char = New@Char (DIALOGUE_LEFT + 168, DIALOGUE_TOP + 272, "")
	size@Char.Char = 64
	Show@Keyboard
	bufferId@Dialogue = BUFFER_NAME_DIALOGUE
	Show@Dialogue
	Return
#deffunc local \
Hide
	Destroy@MyButton ButtonOk
	Destroy@Char Char
	Hide@Keyboard
	Hide@Dialogue
	Return
#deffunc local \
Interval
	GetChar@Keyboard
	text@Char.Char = text@Keyboard
	Return
#deffunc local \
Draw
	Draw@Dialogue
	Draw@MyButton
	Interval
	Return
*Ok
	Hide
	Create@User text@Keyboard
	Return
#global
#endif	; not __NAME_DIALOGUE__
 |