home *** CD-ROM | disk | FTP | other *** search
/ Electronics Boutique Holiday Catalog 1996 / EB1996Holiday.iso / a3w_data / display.scr < prev    next >
Text File  |  1996-01-17  |  9KB  |  232 lines
  1. # This is the sample display script for Expedite Base/Win
  2. #
  3. # If we are drawing the default picture, add some text to it.
  4. #
  5. PICTURE TEXT(Information)  row(3) column(60);
  6. PICTURE TEXT(  Network  )  row(4) column(60) ;
  7. PICTURE TEXT(Information)  row(7) column(60) ;
  8. PICTURE TEXT( Exchange  )  row(8) column(60) ;
  9. #
  10. # This is the first text we display.  If you are not displaying the picture,
  11. # you may want to clear the display status rows 15 to 24 first.
  12. # If Picture is off, a bitmap may be displayed, so clear screen
  13. # FIRST  CLEARSCREEN(Y) ;
  14. FIRST  TEXT(Expedite Base, for Windows Version %VERSION%) ROW(23) COLUMN(39) FOREGROUND(BRIGHT_WHITE);
  15. FIRST  TEXT(Ctrl+x - Exit) ROW(23) COLUMN(19);
  16. FIRST  TEXT(Network Account:   %INACCOUNT% %INUSERID%) ROW(16) COLUMN(42);
  17. FIRST  TOPLEFTROW(15) TOPLEFTCOL(1) BOTRIGHTROW(24) BOTRIGHTCOL(80)
  18.      FOREGROUND(LIGHT_BLUE);
  19.  
  20. #
  21. # When we start processing the connect script, show the phone number
  22. # and the dialing message.  Clear line 21 in case there was some other
  23. # message there, if we are on a redial.
  24. #
  25. DIALING  TEXT(Ctrl+r - Redial) ROW(23) COLUMN(2);
  26. DIALING  CLEARLENGTH(32) ROW(21) COLUMN(2);
  27. DIALING  TEXT(Dialing the Network             ) ROW(20) COLUMN(2);
  28. DIALING  TEXT(Phone number: %PHONE%  ) ROW(17) COLUMN(42);
  29. #
  30. # For non-dial connections, use the CONNECTING instead of DIALING
  31. #
  32. CONNECTING TEXT(Connecting to the Network       ) ROW(20) COLUMN(2);
  33. #
  34. # Clear the manual dial message and show the successful connection message.
  35. # For asyn, if the GetValue command is used in the connect script to get
  36. # the baud rate from the connect message, then this baud rate will be
  37. # displayed. Otherwise, the profile baud rate is displayed.
  38. #
  39. CONNECTED  CLEARLENGTH(39) ROW(18) COLUMN(2);
  40. CONNECTED  TEXT(Successful %CNNCTYPE% Connection     ) ROW(20) COLUMN(2);
  41. #
  42. # When the welcome message is received, show the terminal ID and the
  43. #    Information Network Customer Assistance phone number.
  44. #
  45. WELCOMEMSG  TEXT(Termid: %TERMID%) ROW(16) COLUMN(2);
  46. WELCOMEMSG  TEXT(Customer Assistance: %HOTLINE%) ROW(17) COLUMN(2);
  47. #
  48. # When we get logged on to the Network, display the successful logon
  49. # message. Take the 'redial key' off the screen
  50. #
  51. INLOGON  TEXT(Successful Network logon        ) ROW(20) COLUMN(2);
  52. INLOGON  CLEARLENGTH(15) ROW(23) COLUMN(2) ;
  53. #
  54. # When we do a session start with IE, show the IE account and userid.
  55. # Show a message to the user that we're starting a session.
  56. # Show the bytes sent and received and the file counter titles.
  57. #
  58. START TEXT(Info Exch Account: %IEACCOUNT% %IEUSERID%) ROW(17) COLUMN(42);
  59. START TEXT(Started session with Info Exch  ) ROW(20) COLUMN(2);
  60. START TOPLEFTROW(18) TOPLEFTCOL(42) BOTRIGHTROW(22) BOTRIGHTCOL(78)
  61.       FOREGROUND(BLUE);
  62. START TEXT(SENT      RECEIVED) ROW(19) COLUMN(55);
  63. START TEXT(BYTES) ROW(20) COLUMN(44);
  64. START TEXT(FILES) ROW(21) COLUMN(44);
  65. #
  66. # When a file is sent or received, show the file name and user class.
  67. # Show the bytes sent and received and the file counters.
  68. # Filenames are 14 characters, class is 8 characters.
  69. #
  70. SEND       TEXT(Sending file:    %FILENAME%   ) ROW(20) COLUMN(2);
  71. SEND       TEXT(Class/File Size: %CLASS% %FILESIZE%) ROW(21) COLUMN(2);
  72. #
  73. RECEIVE    TEXT(Receiving file: %FILENAME%    ) ROW(20) COLUMN(2);
  74. RECEIVE    TEXT(Class:          %CLASS%            ) ROW(21) COLUMN(2);
  75. #
  76. SENDEDI    TEXT(Sending EDI file: %FILENAME%  ) ROW(20) COLUMN(2);
  77. SENDEDI    TEXT(Class:            %CLASS%) ROW(21) COLUMN(2);
  78. #
  79. RECEIVEEDI TEXT(Receiving EDI file: %FILENAME%) ROW(20) COLUMN(2);
  80. RECEIVEEDI TEXT(Class:              %CLASS%   ) ROW(21) COLUMN(2);
  81. #
  82. # If there was a wait specified, show a message, and clear row 20.
  83. # If it is cancelled, let the user know.
  84. #
  85. WAITRCV    CLEARLENGTH(32) ROW(20) COLUMN(2);
  86. WAITRCV    TEXT(Waiting to receive ...        ) ROW(21) COLUMN(2);
  87. CANWAITRCV TEXT(No data received              ) ROW(21) COLUMN(2);
  88. #
  89. # Show number of characters sent and number of characters received
  90. # below the titles.
  91. #
  92. CHARSSNT TEXT(%CHARSSNTCNT%) ROW(20) COLUMN(55);
  93. CHARSRCVD TEXT(%CHARSRCVDCNT%) ROW(20) COLUMN(65);
  94. #
  95. # Show files sent and files received below the titles.
  96. #
  97. FILESSNT  TEXT(%FILESSNTCNT%) ROW(21) COLUMN(55);
  98. FILESRCVD TEXT(%FILESRCVDCNT%) ROW(21) COLUMN(65);
  99. #
  100. # As we end the IE session, show the end of session message.
  101. # Clear the status box first.
  102. #
  103. END CLEARLENGTH(77) ROW(18) COLUMN(2);
  104. END CLEARLENGTH(77) ROW(19) COLUMN(2);
  105. END CLEARLENGTH(77) ROW(20) COLUMN(2);
  106. END CLEARLENGTH(77) ROW(21) COLUMN(2);
  107. END CLEARLENGTH(77) ROW(22) COLUMN(2);
  108. END TEXT(Ending Info Exch Session     ) ROW(20) COLUMN(2);
  109. #
  110. # At disconnect time, clear the display lines 16 to 22 and show the
  111. # disconnect message.  Leave the Network account/userid on the screen.
  112. #
  113. DISCONNECT  CLEARLENGTH(36) ROW(16) COLUMN(2);
  114. DISCONNECT  CLEARLENGTH(77) ROW(17) COLUMN(2);
  115. DISCONNECT  CLEARLENGTH(77) ROW(18) COLUMN(2);
  116. DISCONNECT  CLEARLENGTH(77) ROW(19) COLUMN(2);
  117. DISCONNECT  CLEARLENGTH(77) ROW(20) COLUMN(2);
  118. DISCONNECT  CLEARLENGTH(77) ROW(21) COLUMN(2);
  119. DISCONNECT  CLEARLENGTH(77) ROW(22) COLUMN(2);
  120. DISCONNECT  TEXT(Disconnecting                     ) ROW(20) COLUMN(2);
  121. #
  122. # If the user presses the exit key, show the session terminated message.
  123. # Clear the display from row 16 to 23.
  124. #
  125. EXIT  CLEARLENGTH(77) ROW(16) COLUMN(2);
  126. EXIT  CLEARLENGTH(77) ROW(17) COLUMN(2);
  127. EXIT  CLEARLENGTH(77) ROW(18) COLUMN(2);
  128. EXIT  CLEARLENGTH(77) ROW(19) COLUMN(2);
  129. EXIT  CLEARLENGTH(77) ROW(20) COLUMN(2);
  130. EXIT  CLEARLENGTH(77) ROW(21) COLUMN(2);
  131. EXIT  CLEARLENGTH(77) ROW(22) COLUMN(2);
  132. EXIT  CLEARLENGTH(77) ROW(23) COLUMN(2);
  133. EXIT  TEXT(Terminating Session           ) ROW(20) COLUMN(2);
  134. #
  135. # At the end of the session, clear display lines 16 to 23 and
  136. # show the final return code and message.
  137. #
  138. LAST  CLEARLENGTH(77) ROW(16) COLUMN(2);
  139. LAST  CLEARLENGTH(77) ROW(17) COLUMN(2);
  140. LAST  CLEARLENGTH(77) ROW(18) COLUMN(2);
  141. LAST  CLEARLENGTH(77) ROW(19) COLUMN(2);
  142. LAST  CLEARLENGTH(77) ROW(20) COLUMN(2);
  143. LAST  CLEARLENGTH(77) ROW(21) COLUMN(2);
  144. LAST  CLEARLENGTH(77) ROW(22) COLUMN(2);
  145. LAST  CLEARLENGTH(77) ROW(23) COLUMN(2);
  146. LAST  TEXT(Final Return Code %RETURNCODE%       ) ROW(21) COLUMN(2);
  147. LAST  TEXT(%MESSAGE%) ROW(23) COLUMN(2);
  148. LAST  CLEARSCREEN(Y) WAIT(3);
  149. #
  150. # If we are restarting a session, tell the user.
  151. #
  152. RESTART  CLEARLENGTH(32) ROW(21) COLUMN(2);
  153. RESTART  TEXT(Restarting previous session         ) ROW(20) COLUMN(2);
  154. #
  155. # If we lose carrier, tell the user.  (NEW event)
  156. #
  157. LOSTCONNECT  CLEARLENGTH(32) ROW(21) COLUMN(2);
  158. LOSTCONNECT TEXT(Lost carrier                     )  ROW(20) COLUMN(2);
  159. #
  160. # If we are using cycle/wait, show waiting to redial message.
  161. #
  162. DIALCYCLE   TEXT(Waiting to redial %DIALTIME%     ) ROW(20) COLUMN(2);
  163. DIALCYCLE   TEXT(Time now:         %TIMENOW%      ) ROW(21) COLUMN(2);
  164. #
  165. #  Show time now and time to dial.
  166. #
  167. DELAYSESS  TEXT(Time now:  %TIMENOW%  %DATE%  ) ROW(20) COLUMN(4);
  168. DELAYSESS  TEXT(Dial time: %DELAYTIME%        ) ROW(21) COLUMN(4);
  169. #
  170. # If we are doing manual dial, tell the user to establish the connection.
  171. #
  172. MANUALDIAL  CLEARLENGTH(15) ROW(23) COLUMN(2) ;
  173. MANUALDIAL  CLEARLENGTH(32) ROW(17) COLUMN(42) ;
  174. MANUALDIAL  TEXT(Please Establish Dial Connection) ROW(18) COLUMN(2);
  175. #
  176. # If we put member into a library, show the library and member
  177. # names.
  178. #
  179. PUTMEMBER TEXT(Updating Library:   %LIBRARY%   ) ROW(20) COLUMN(2);
  180. PUTMEMBER TEXT(Member name:        %MEMBER%    ) ROW(21) COLUMN(2);
  181. #
  182. # If we request a member from a library, show the library and member
  183. # names.
  184. #
  185. GETMEMBER TEXT(Requesting:   %MEMBER%          ) ROW(20) COLUMN(2);
  186. GETMEMBER TEXT(From Library: %LIBRARY%         ) ROW(21) COLUMN(2);
  187. #
  188. # If we are listing libraries, tell the user.
  189. #
  190. LISTLIBRARIES CLEARLENGTH(32) ROW(21) COLUMN(2);
  191. LISTLIBRARIES TEXT(Listing libraries on IE         ) ROW(20) COLUMN(2);
  192. #
  193. # If we are listing a library's members, show the library name.
  194. #
  195. LISTMEMBERS TEXT(Listing members from this       ) ROW(20) COLUMN(2);
  196. LISTMEMBERS TEXT(IE library:  %LIBRARY%           ) ROW(21) COLUMN(2);
  197. #
  198. # If we do a query, tell the user.
  199. #
  200. QUERY CLEARLENGTH(32) ROW(21) COLUMN(2);
  201. QUERY   TEXT(Checking the mailbox            ) ROW(20) COLUMN(2);
  202. #
  203. # If we are purging a message from the mailbox, tell the user.
  204. #
  205. PURGE CLEARLENGTH(32) ROW(21) COLUMN(2);
  206. PURGE TEXT(Purging message from the mailbox) ROW(20) COLUMN(2);
  207. #
  208. # If we define an alias table show the name of the table.
  209. #
  210. DEFINEALIAS TEXT(Working with alias table        ) ROW(20) COLUMN(2);
  211. DEFINEALIAS TEXT(Table name: %ALIASTABLE%                ) ROW(21) COLUMN(2);
  212. #
  213. # If we move a file from archive, show the ARCHIVEID.
  214. #
  215. ARCHIVEMOVE  TEXT(Requesting file from archive    )      ROW(20) COLUMN(2);
  216. ARCHIVEMOVE  TEXT(Archive ID:  %ARCHIVEID%           )  ROW(21) COLUMN(2);
  217. #
  218. # If we define a list, show the LISTNAME.
  219. #
  220. LIST  CLEARLENGTH(32) ROW(21) COLUMN(2);
  221. LIST  TEXT(Defining list %LISTNAME%           ) ROW(20) COLUMN(2);
  222. #
  223. # If we request an audit, tell the user.
  224. #
  225. AUDIT  CLEARLENGTH(32) ROW(21) COLUMN(2);
  226. AUDIT  TEXT(Requesting audit               ) ROW(20) COLUMN(2);
  227. #
  228. # If we cancel a file, show the user's account/userid.
  229. #
  230. CANCEL TEXT(Cancelling  file sent to:        ) ROW(20) COLUMN(2);
  231. CANCEL TEXT(%CANCELDEST%           )  ROW(21) COLUMN(2);
  232.