68 行
1.1 KiB
Plaintext
68 行
1.1 KiB
Plaintext
#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__
|
|
|