4 * [Generated from writable, 25 September 1996]
7 #if !defined(__CC_NORCROFT) || !defined(__arm)
8 #error You must use the Norcroft ARM Compiler for Sapphire programs
11 #pragma include_only_once
12 #pragma force_top_level
21 /*----- Overview ----------------------------------------------------------*
35 * On entry: R0 == pointer to writable dialogue block
36 * R1 == pointer to default string to display, or 0 for null
37 * R2 == pointer to routine to call when string set
38 * R3 == value to pass to routine in R10
39 * R4 == value to pass to routine in R12
41 * On exit: R0 == dialogue handle of created dialogue box
44 * Use: Displays a writable dialogue box, i.e. one with a writable
45 * icon and OK button, used instead of writable menu items,
46 * for reasons to do with caret blinking and pointer changing.
48 * The writable dialogue block consists of:
53 * n Validation string to use, may be null
54 * m Title string (message tag) to display
60 * 0-7 Maximum string length
61 * 8 Right align text in writable icon
62 * 9-31 Reserved; must be 0
64 * The routine returns a dialogue handle because you may want
65 * to attach a numWrite control to the writable icon, which
68 * The handler routine is passed:
70 * R0 == pointer to string typed in
71 * R1 == dialogue box handle (for numWrite again)
72 * R10, R12 as set up here
74 * It must preserve all registers. If the carry flag is set
75 * on exit, the dialogue box will not be closed. If it is
76 * clear, the dialogue may be closed depending on the button
79 * Note that this routine does *not* require a template --
80 * a suitable window is generated at run-time.
83 extern routine writable;
91 * Use: Initialises the writable dialogue box for use.
94 extern routine wrt_init;
96 /* --- Useful constants --- */
98 #define wrtFlag_rAlign ((1<<8))
100 /* --- Macro: WRTABLE --- *
102 * Arguments: len == maximum string length to allow
103 * flagsĀ == other flags to set
104 * valid == (optional) validation string
105 * title == title message tag string
107 * Use: Builds a writable definition block.
110 /*----- That's all, folks -------------------------------------------------*/