|
- #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__
|