home *** CD-ROM | disk | FTP | other *** search
/ 8bitfiles.net/archives / archives.tar / archives / canada-remote-systems / geos / utils / db-edit.seq (.txt) < prev    next >
Encoding:
GEOS ConVerT  |  2019-04-13  |  8.6 KB  |  147 lines
  1. DB_Editor
  2. SEQ formatted GEOS file V1.0
  3. Eps EX-800.64
  4. SNCDirections
  5. GetDirectory.doc
  6. 2    GetDirectory
  7. MusicBox manual
  8. BoxEditor   V1.0
  9. Stephen Van Egmond
  10. This program allows you to create dialog boxes for your programs.
  11. Dialog Box Editor
  12. Box Editor Info
  13. Change Shadow
  14. Add Icon
  15. Add Text
  16.   Get String
  17.   GetFiles Box
  18.   Quit on click
  19.   Routine on click
  20.   Routine on draw
  21. Re-initialize
  22. Change Size
  23. 0 User Icon
  24. System Icon
  25.   Cancel
  26.   Yes
  27.   OPEN
  28.   DISK
  29. In Plain Text
  30. Underline
  31. Outline
  32. Italics
  33. Save Text Scrap
  34. Quit to Desktop
  35. Dialog:    .byte    $80 | $01
  36. Please select where the text prompt will be.
  37. Please select where the GetFiles box will be.
  38. Select the top-left corner for the new position.
  39. Please select the position of the bottom-right corner.
  40. Please select the location of the user Icon.
  41.  =# =#
  42.  +"` 
  43. Select the position for your text.
  44.  =# =#
  45. Please select the position for your icon.
  46.  +"`    .byte    14    ;Quit on Click
  47.     .byte    13    ;GetString
  48.     .byte    
  49.     ;XOffset
  50.     .byte    
  51.     ;YOffset
  52.     .byte    r_    ;gives r# to contain pntr to text buffer. 5-10
  53.     .byte    _    ;maximum # of chars to accept.
  54.     .byte    16    ;getFiles
  55.     .byte    
  56.     ;XOffset
  57.     .byte    
  58.     ;YOffset
  59. ;note: r7L needs the search file type
  60. ;r5 should contain a pointer to where filename goes.
  61. ;r10 is an optional pointer to a permanent name.
  62.     .byte    17    ;Routine on Click
  63.     .word    _    ;routine to execute on otherPress
  64.     .byte    19    ;Routine on draw
  65.     .word    _    ;routine to execute when DB is drawn
  66. Dialog:    .byte    $00 | 01    ;user position
  67.     .byte    
  68.     ;top
  69.     .byte    
  70.     ;bottom
  71.     .word    
  72.     ;left
  73.     .word    
  74.     ;right
  75.     .byte    0    ;end of defintion
  76.     .byte    
  77.     ;OK icon
  78.     ;Cancel icon
  79.     ;Yes icon
  80.     ;No icon
  81.     ;OPEN icon
  82.     ;DISK icon
  83.     .byte    18    ;user icon
  84.     .byte    
  85.     .word    UIconT
  86. UIconT
  87.     .word    UIconG
  88.     ;graphic location
  89.     .word    0    ;leave this at 0
  90.     .byte    UIconW
  91.     ;width, set below
  92.     .byte    UIconH
  93.     ;height, set below
  94.     .word    _    ;location of action routine
  95. UIconG
  96. PLACE USER ICON IMAGE HERE.
  97.     UIconW
  98.     =picW
  99.     UIconH
  100.     =picH
  101.     .byte    11    ;add text
  102.     .byte    
  103.     .word    DBText
  104. DBText
  105. :    .byte    
  106. ,27,0
  107. Dialog Box Editor V1.0
  108.  Stephen Van Egmond
  109. If satisfied, send $2 to:
  110.  360 Front Road
  111.  LaSalle, Ontario, Canada
  112.  N9J 1Z5
  113. Please select the new pattern:
  114.  WARNING: This command is
  115. already active.
  116.  That position would put the
  117. GetFiles box outside the
  118. Dialog Box.
  119. Command cancelled.
  120.  Only one of 'Routine on Click'
  121. and 'Quit on click' may be
  122. active at a time.
  123. Please select dialog box position:
  124. defined position
  125. position
  126.  Warning: This command erases
  127. the dialog box definition:
  128. Are you sure?
  129. That system icon is already
  130. active in this Dialog Box.
  131. How would you like to proceed?
  132. a new dialog box
  133. on editing this one
  134. to the desktop
  135.  Warning: A maximum of eight
  136. User Icons may be active in a
  137. Dialog Box.
  138.  Please enter your text string.
  139.  WARNING: Your text string is
  140.  too long for this Dialog Box.
  141.  A maximum of 26 text
  142. strings can be in a Dialog Box
  143. Text  Scrap
  144. Text  Scrap V1.1
  145. $ =#hHJJJJ m#h)
  146. i&i0 =#`
  147.