R@ B25MDM-1/1@ {`O=hOB @ D 4> . 89|P^GW_ O6Ver 10/20/93-11:16                              LR.... .( .( .( ..;;;;;;; ; ;( ;0 ;0 ;0 ;0 ;0 ;0 ;;HHHHHHHHHHHHHHHHH;;;; ,$*$ "*"(F8$ "4  8CWgѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣѣ``00000000000000000000000JMeAttachToModemServiceeDetachFromModemServiceeGetModemServiceEventeRetrieveModSrvStatuseGetControlInformationAcceptModemCall AddModemLineCloseModemLineDisconnectModemCallEditLineInitiateModemCall OpenModemLineQueryModemServerStatus ReadInputLine ReadModemBytes ReleaseModemLine ResetModemServer SetLineParameter WriteModemBytesAbortModemUserChangeUserNumModem SwapModemUserTerminateModemUserѣѣѣѣѣѣѣѣѣD DeInstall Modem ServiceInstall Modem ServiceModem Service Status00#>#ys]DeInstallModemService.runDeInstall the Modem Service00H#.[Sys]ModemService.RunInstall the Modem Service as a system service.[Modem Service Configuration File] 00 O /[Sys]ModemServiceStatus.RunDisplay the current status of the Modem Server. Release Notes Page 1 of 34 CTOS Modem Service s5.3 May 1995 CONTENTS PAGE Product Interdependencies..................................... 2 Restrictions and Known Limitations............................ 7 Product Improvements.......................................... 8 Migration Guidelines.......................................... 13 Support....................................................... 14 Product Information Updates................................... 18 Release Notes Page 2 of 34 PRODUCT INTERDEPENDENCIES The following workstations and shared resource processors can run Modem Service 5.3: - Workstations (186, 286, 386, 486) - XE-520 shared resource processor (CP, channels 1-3; TP, channels 1-4) - XE-530 shared resource processors (GP, channels 1-8) - Workstations equipped with the B25-IDS or B25-ID2 Intelligent Data Communications slice modules - Workstations with B25-DCX, or XC002 port expansion modules, SG400-P, SG410-P, SG430-P or SG450-P IOP cards, or an SG400-C expansion card - SuperGen Series 1000 through 7000 workstations Release Notes Page 3 of 34 PRODUCT INTERDEPENDENCIES (continued) One of the following operating system levels is required to run the CTOS Modem Service 5.3: - CTOS II 3.3, or higher, for workstations - CTOS III 1.0, or higher, for workstations - XEBTOS 7.0, or higher, for XE520 shared resource processors - CTOS/XE 3.0, or higher, for shared resource processors - IDMSS 5.0, or higher, for Intelligent Data Communications modules - Anderson-Jacobsen AJ2412 - BIZCOMP 1012 1200/300 Intelligent Modem - Convergent DC 2400 - Hayes Stack Smartmodem 1200 Release Notes Page 4 of 34 PRODUCT INTERDEPENDENCIES (continued) CTOS Modem Service 5.3 is qualified for use with the following modems: - Hayes Smartmodem 2400 - Hayes Optima 144 - Microcom AX/9624c - Racal-Milgo RMD 3222 - Racal-Vadic Auto Dial VA212 - Sematrans 9696 - Ven-Tel MC1200-31 Release Notes Page 5 of 34 PRODUCT INTERDEPENDENCIES (continued) The following additional modems offer support for industry-standard error correction and data compression: - Microcom AX/2400c - SupraFax V.32bis - Telebit WorldBlazer - US Robotics Courier HST Dual Standard Release Notes Page 6 of 34 PRODUCT INTERDEPENDENCIES (continued) CTOS Modem Service can coexist with the following products: - OFIS Mail 1.0, or higher - BNet II 1.0, or higher - RAF 2.0, or higher Note: Use of CTOS Modem Service with some hardware/modem combinations may require later releases of the products listed here. Release Notes Page 7 of 34 RESTRICTIONS AND KNOWN LIMITATIONS - Modem Service can control communications on supported modems at speeds up to 9600 baud. - Because of limitations in the XC002 service, DTR dialing and the DCI interface are not supported on the XC002. These limitations do not apply to the DCX module. - The time the DTR signal is lowered between making a call and handing control to a DCI user program has been much reduced. - Subsequently declared lines no longer use the wrong data rate if one line is declared to use Speed_Adjust. Release Notes Page 8 of 34 PRODUCT IMPROVEMENTS - Clarification is made regarding possible modification of standard modem scripts for outgoing calls. See the Product Information Update provided in this Release Notes file for page 9-4 of the CTOS Modem Service Operations and Programming Guide. - New modem definition samples are included in the additional. modems file. - Maximum length of dial string has been increased to 50. - Product now installs from disk drives other than F0. - On B39, DTR dial now works correctly when DMA is enabled. Release Notes Page 9 of 34 PRODUCT IMPROVEMENTS (continued) - DTR control now works correctly for DCI clients using the 82530 chip. - Modem did not always reset after a CLEAR CALL. Incoming calls could cause the ClosePort procedure to fail. The ClosePort procedure will now automatically clear any existing call before closing the port, however, only PORT CLOSED is reported to the client. - Modem Service would deinstall while DCI clients were active, causing a GP fault when those clients later attempted to access Modem Service procedures. The code will now check for attached clients and, if any exist, will return a "Cannot Deinstall with Active Clients" message. Release Notes Page 10 of 34 PRODUCT IMPROVEMENTS (continued) - For compatibility with multi-board systems, request SRPROUTING has been changed to rLocal, forcing client services to reside on same board as Modem Service. - Support is now included for the following modems: Hayes Optima 144, USR Courier HST DUAL Standard, UDS V.3227, Telebit Worldblazer, and SupraFaxModem V.32bis. (Refer to page 19 for details.) - Support is now included for the synchronous and asynchronous ports on the SuperGen series machines. Release Notes Page 11 of 34 PRODUCT IMPROVEMENTS (continued) - Internal buffer sizes have been increased to allow for larger message sizes and higher-speed lines. The maximum message-size/line-speed combination is extremely hardware and application dependent. However, message sizes greater than 2048 bytes should be carefully tested before deployment. Applications that push the combined limit will detect numerous 2346 errors, and should be carefully examined for possible redesign. - The Wait for Signal script commands now function properly for DCI clients (s5.3.01) - Modem Service now provides improved recovery for DCI Clients when WAITing for incoming calls. (s5.3.01) The Modemservice.config parameter :DCIWaitTime: is now available on a per line basis to permit setting of the maximum time Modem Service will allow for an INCOMING call before it resets the modem. This value is given in seconds, and defaults to 600, after which Modem Service will transparently reset the modem and return to the Wait_For_Call state. Release Notes Page 12 of 34 PRODUCT IMPROVEMENTS (continued) When configuring :DCIWaitTime: you must balance the time it takes to RESET the modem and enter Data the Transfer state on a normal call with the time you find acceptable to delay recovery in the case of a "bad" call. Remember that while processing a RESET, the line will not be available to take incoming calls, so a 30 second RESET combined with a 30 second :DCIWaitTime: will mean you reject over 50% of the incoming calls. Error Code 10706 has been added to indicate an invalid entry for this parameter. - Random crashes have been eliminated. (s5.3.03) - AddModemLine with unknown modem name no longer causes Modem Service to deinstall. (s5.3.03) - DCD is now detected properly after a DTRDial call. (s5.3.03) - DTR no longer remains HIGH after failed outgoing DTRDial Call. (s5.3.03) - The Modem Script commands :SetParity: and :SetDataBits: no longer cause an invalid bswa error if placed early in the RESET script. (s5.3.04) - Modem Service now works correctly when both comm ports on SG hardware are in use. (s5.3.06) - RS232 IOP crash on SG hardware has been eliminated. (s5.3.06) - Release/Activate line functionality has been corrected to eliminate deadly embrace requiring to re-install modem service (s5.3.06) Release Notes Page 13 of 34 MIGRATION GUIDELINES To use CTOS Modem Service 5.3 with a configuration file customized for the previous product (called Modem Server), specify the name of the configuration file during installation when prompted to do so. Details will appear during installation. Release Notes Page 14 of 34 SUPPORT Modem Service 5.3 is a warranted Unisys software product. Unisys warrants that Modem Service 5.3, in its unaltered form, will substantially conform to Unisys current published functional specifications when used in Unisys supported configurations. The customer is responsible for reporting suspected deviations using the User Communication Form (UCF) process within ninety (90) days following delivery. The product is neither field repairable nor field modifiable. Corrections to reported deviations are provided to the user via updated code files. This standard warranty is not a substitute for Unisys Service Agreement offerings. Release Notes Page 15 of 34 SUPPORT (continued) Support Category Modem Service 5.3 is fully supported by Unisys. Support services for Modem Service 5.3 are offered under the SURETY (United States) or A la Carte (International) support programs and are consistent with the support services offered for the entire CTOS Hardware and Software family of products. Release Notes Page 16 of 34 SUPPORT (continued) Unisys SureNet is an electronic bulletin board service, providing customers in the United States access to technical information seven days a week, 24 hours a day. SureNet Technical Information Services are available at no additional cost to customers with a current Unisys service agreement or software license and include access to system alerts, customer technical bulletins and online UCF entry. Registration is required. SureNet Support Services are available on an annual subscription basis. For more information, contact Unisys Direct at 1-800-448-1424, prompt 5. You may register for Technical Information Services and/or Support Services either online by dialing 1-800-828-8796 (8 data bits, 1 stop bit, no parity, asynchronous, VT100 emulation) or by calling Unisys Direct. Release Notes Page 17 of 34 SUPPORT (continued) If you need further assistance or information regarding support services, please contact your Unisys representative or your local Unisys office. Support Discontinuance Unisys supports the current release level and one level back. Prior levels are not supported. Release Notes Page 18 of 34 PRODUCT INFORMATION UPDATES CTOS Modem Service Operations and Programming Guide 3912 6107-000 *** Page 2-1 *** Under the last bullet item in the subsection add the following bullet: - SuperGen Series 1000 through 7000 workstations. Release Notes Page 19 of 34 PRODUCT INFORMATION UPDATES (continued) *** Page 2-3 *** Under "Supported Modems" add the following: CTOS Modem Service is qualified for use with these modems. - Anderson -Jacobsen AJ2412 - BIZCOMP 1012 1200/300 Intelligent Modem - Convergent DC 2400 - Hayes Stack Smartmodem 1200 - Hayes Smartmodem 2400 - Microcom AX/9624c - Racal-Milgo RMD 3222 (continued) Release Notes Page 20 of 34 PRODUCT INFORMATION UPDATES (continued) - Racal-Vadic Auto Dial VA212 - Sematrans 9696 - Ven-Tel MC1200-31 The following additional modems offer support for industry- standard error correction and data compression schemes. - Microcom AX/2400c - SupraFax V.32bis - Telebit WorldBlazer - US Robotics Courier HST Dual Standard The scripts provided enable these features and will provide the (continued) Release Notes Page 21 of 34 PRODUCT INFORMATION UPDATES (continued) best possible communications to modems with similar capabilities. However, the nature of these schemes can cause connection difficulties with older style modems. Refer to the comments at the beginning of each script for warnings and possible workarounds when installing in a mixed modem environment. *** Page 2-5 *** Under "Software" replace the "BTOS II or CTOS/VM" entries with the following: CTOS II 3.3 or higher CTOS III 1.0 or higher Release Notes Page 22 of 34 PRODUCT INFORMATION UPDATES (continued) Under "RAM and Disk Usage" replace the table with the following: Disk Size Disk Size File (Bytes) (Sectors) ModemService.run 105708 207 ModemServiceStatus.form 1351 3 ModemServiceStatus.run 46384 91 DeinstallModemService.run 10476 21 Sys.Modems 75015 147 Additional.Modems 44119 87 ModemMsg.Bin 3440 7 ModemService.Config 2319 7 RqLablModem.lib (optional) 3584 7 Release Notes Page 23 of 34 PRODUCT INFORMATION UPDATES (continued) *** Page 5-3 *** Replace the last bullet item in the subsection "Additional Modems" with this paragraph: A way to ignore DTR for 0.5 seconds if it is used for DCI interface data transmission, unless it uses DTR dial. In Hayes modems, register S25 provides this function. On some modems, register S25 has a different resolution depending on whether the mode is synchronous or asynchronous. Release Notes Page 24 of 34 PRODUCT INFORMATION UPDATES (continued) *** Page 5-3 *** Add the following bullet after the last bullet in the subsection "Additional Modems:" If you are using a modem with built-in data compression or error correction, using these options may not be advisable with some protocols. Modems with data compression or error correction perform some level of flow control themselves, and sometimes direct the user program to stop sending. This can create problems. The Data Compression/Error Correction parameters should first be set to FALSE for these modems when attempting to isolate any problems that occur. Release Notes Page 25 of 34 PRODUCT INFORMATION UPDATES (continued) *** Page 5-8 *** Replace the first bullet item in "Modem-Gen Commands" with the following sentence: n represents a positive integer. *** Page 5-14 *** Add the following two commands and descriptions after the WaitForCarrier description: :WaitforConnectMSGandIgnore:xx..x Release Notes Page 26 of 34 PRODUCT INFORMATION UPDATES (continued) *** Page 5-14 (continued)*** This command is used in place of WaitStringReturn or WaitNoStringReturn for modems which do not raise the carrier detect as soon as an incoming call is detected. The string specified is the string which the modem sends to indicate an incoming call (for example, "CONNECT 2400"). :WaitforConnectMSGandSave:xx..x This command is similar to the WaitForConnectMSGandIgnore, except that the connect message received from the modem is saved. This string can then be examined using a ComparedWithSavedString command. Release Notes Page 27 of 34 PRODUCT INFORMATION UPDATES (continued) *** Page 8-1 Figure 8-1 *** Add the following note to page 8-1 just under Figure 8-1: NOTE: When using a port expansion module the CHANNEL indicated on the status screen will still list A through D not "1a" as illustrated. The port expander number will be shown in the TYPE field as [COMM]1 for the first expander and [COMM]2 for the second. Release Notes Page 28 of 34 PRODUCT INFORMATION UPDATES (continued) *** Page 9-4 *** Add the following note to page 9-4: General Programming Cautions When creating or modifying client applications, keep in mind that modems will operate at a much slower rate than the calling system. Be sure to include delays in your applications which will allow the modem(s) sufficient time to respond to calls. Alternatively, modem scripts may be modified to DELAY before returning from Make_A_Call to allow remote end time to properly initialize. Release Notes Page 29 of 34 PRODUCT INFORMATION UPDATES (continued) *** Page 10-16 *** Replace the description of the bChannel parameter with the following text: Value returned is Channel A for 1 Channel B for 2 Channel C for 3 Channel D for 4 (0 is not used) Release Notes Page 30 of 34 PRODUCT INFORMATION UPDATES (continued) *** Page 10-24 *** Replace the last sentence in the description of ParamType with the following: There are no parameter values for Send Break. Add the following text to the description for pbParam: When ParamType is 3, a value of 0FFh will cause all subsequent ReadModemBytes commands to return currently buffered data or the first received character, rather than wait for timeout or a full buffer. A value of 0 will turn off this function. Release Notes Page 31 of 34 PRODUCT INFORMATION UPDATES (continued) *** Section 10 *** Add the following introductory note to Section 10: On the Series 1000 through 7000 workstations, the API described in Section 10 is supported on the asynchronous ports. *** Section 11 *** Add the following introductory note to Section 11: The Data Communications Interface (DCI) described in Section 11 is not supported on the Series 1000 through 7000 workstations asynchronous-only ports. However, it is supported on synchronous/asynchronous ports. Release Notes Page 32 of 34 PRODUCT INFORMATION UPDATES (continued) *** Page 11-18 *** Add the following: Note: In releases prior to 5.3, ClosePort would return an erc if a call existed. ClosePort will now automatically clear any existing call. The only event reported will be Port Closed. *** Page C-1 *** Add the following sentence to the end of the first paragraph: A direct-connect cable is used when you want to connect two or more workstations without using a modem. Release Notes Page 33 of 34 PRODUCT INFORMATION UPDATES (continued) *** Page C-1 (continued) *** In Figure C-1, two workstations should be shown instead of a workstation and a modem. Cross-out the label "Modem" and write in the label "Workstation". Add the following sentence after Figure C-1: The physical connection on each end is a standard DB-25 connector. Release Notes Page 34 of 34 PRODUCT INFORMATION UPDATES (continued) *** Page D-2 *** Add the following notes to the note appearing on page D-2: NOTE: The pin 12 to 16 crossover may vary depending upon your modem. Pin 12 on the DTE side must connect to whichever pin the modem uses to provide RS-232 signal CI (V.24 112). Often this is pin 23 not 16. The physical connection on each end is usually a standard DB-25 connector. When using the :WaitForSignal:1 command the cable must also include connection between pins 21 (RI - Ring Indicator). * Page 8-1 Figure 8-1 *** Add the following note to page 8-1 just under Figure 8-1: NOTE: When using a port expansion module the CHANNEL indicated on the status screen will still list A through D not "1a" as illustrated. The port expander number will be shown in the TYPE field as [COMM]1 for the first expander and [COMM]2 for the second. Release Notes Page 28 of 34 PRODUCT INFORMA $Job MdSInstall $RestartLabel ; this is a floppy install of Modem Service ; Modified 930802 s5.2.03 Aaron Coleman UCF 17426729 / PLE 15990546 ; Assorted references to F0 replace by DeviceFrom ; suppress video pause $PauseOff ; nationalizable strings DefPrt = '[SPL]' CheckMsg = 'Checking configuration file ...' CommandMsg = 'Creating commands ...' cnfgmsg1 = ' ' cnfgmsg2 = ' ' cnfgmsg3 = ' If Modem Service has been previously installed on this system, ' cnfgmsg4 = ' there may be a user customized configuration file already ' cnfgmsg5 = ' in existance. If you wish to continue to use this file as ' cnfgmsg6 = ' the default file, please type the name of the file and its ' cnfgmsg7 = ' path in the space provided. Press GO to continue. ' cnfgmsg8 = ' ' cnfgmsg9 = ' ' Cnfgquest = 'Configuration File Name' CnfgMsg = 'Updating previous configuration file name ... ' DevMsg = 'Copying development library ... ' DevYesNoMsg = 'Do you wish to use the Modem Services development library?' DoneMsg = ' done.' FloppyMsg = 'Copying files from floppy ...' FLoppyMsg2 = 'Copying Configuration file from floppy ... ' InstDoneMsg = 'When installation is completed, please reboot your system.' MergeMsg = 'Updating system files ...' PtrNameMsg = 'Enter your printer name and Press GO.' RifViewMsg = 'Do you wish to view the Release Notes at this time?' RifPrintMsg = 'Do you wish to print the Release Notes at this time?' RemovingMsg = 'Removing Old Files ...' Removing2Msg = 'Removing Old Commands ...' ; initialize variables TRUE = 1 FALSE = 0 CLSTRLFS = 2 ;notify users of installation ;$Sendmail(admin, 'Installation of Modem Services','Version 5.3') ;$BroadcastMessage('Installation of Modem Services', 'Version 5.3') $RestartLabel $If VideoLevel>0 VidLev = 1 $EndIf RIFView = UserSelectYesNo(RIFViewMsg,Yes) ;----------------------------------------------------------------------------- ; The command "Copy" must be translated to the local language. ;----------------------------------------------------------------------------- $If RIFView $PauseOn ; $EchoOn Relnotes = ConcatStrings(DeviceFrom,'ReLeaseNotes.doc') $Command Copy,Relnotes,[VID], $If VidLev>0 ; $EchoOff $PauseOff i = 0 $While i < 20 i = i + 1 $DisplayLine $EndWhile $EndIf $PauseOff $EndIf RIFPrint = UserSelectYesNo(RIFPrintMsg) $If RIFPrint PrintName = $UserEnterValue(PtrNameMsg,DefPtr) ;----------------------------------------------------------------------------- ; The command "Copy" must be translated to the local language. ;----------------------------------------------------------------------------- RelNotes = ConcatStrings(DeviceFrom,'ReleaseNotes.doc') $Command copy,RelNotes,PrintName $EndIf $RestartLabel $If Public MasterSpec = '[!Sys]' DestPath = MasterSpec DefVol = '[!Sys]' $Else LocalSpec = '[Sys]' DestPath = LocalSpec DefVol = '[Sys]' $EndIf $If Public CmdFileTo = '[!Sys]Cluster.cmds' $EndIf ; see if the user wants the development library InstallLib = UserSelectYesNo(DevYesNoMsg) ; scroll twentyfive lines on the screen i = 0 $While (i < 25) i = i + 1 $DisplayLine $EndWhile $DisplayLine (cnfgmsg1) ; $DisplayLine (cnfgmsg2) $DisplayLine (cnfgmsg3) $DisplayLine (cnfgmsg4) $DisplayLine (cnfgmsg5) $DisplayLine (cnfgmsg6) $DisplayLine (cnfgmsg7) ; $DisplayLine (cnfgmsg8) $DisplayLine (cnfgmsg9) $RestartLabel OverConfig = UserEnterValue(Cnfgquest,' ') $Path ,DeviceFrom, Sys ; copy files from floppy ; scroll twelve lines on the screen i = 0 $While (i < 12) i = i + 1 $DisplayLine $EndWhile $Display (FloppyMsg) $Run [Sys]LCopy.run,*.run,,DestPath,,y,,no $DisplayLine (DoneMsg) $If Public $Run [Sys]LCopy.run,(Request.Modem.sys, *bin, *.modems, *.form),,[!Sys],,y,,no $Else $Run [Sys]LCopy.run,(Request.Modem.sys, *bin, *.modems, *.form),,[Sys],,y,,no $EndIf $Dump $Display (CheckMsg) $If OverConfig <> ' ' $DisplayLine (DoneMsg) $Display (CnfgMsg) CnfgSpec = $ConcatStrings(DestPath,'ModemService.config') ; ;Nationalize the word 'save' in the following command ; SaveSpec = $ConcatStrings(DestPath,'save.') ; ;Nationalize the following copy command ; $Command Copy,overconfig,CnfgSpec,y,n $Run [Sys]Lcopy.run,ModemService.config,,SaveSpec,,y,,no $DisplayLine (DoneMsg) $Else $DisplayLine (DoneMsg) $Display (FLoppyMsg2) $Run [Sys]Lcopy.run,ModemService.config,,DestPath,,y,,no $DisplayLine (DoneMsg) $EndIf ; removing old modemserver run files and commands $Display (RemovingMsg) ;Nationalize the following Delete commands $Command Delete,[Sys]ModemServer.Run,no $Command Delete,[Sys]ModemServerStatus.Run,no $Command Delete,[Sys]DeInstallModemServer.Run,no $DisplayLine (DoneMsg) $Display (Removing2Msg) $Run ([Sys]CmdFileEditor.run, 'Remove Command', 'RC'), & 'Modem Server Status', CmdFileTo $Run ([Sys]CmdFileEditor.run, 'Remove Command', 'RC'), & 'Install Modem Server', CmdFileTo $Run ([Sys]CmdFileEditor.run, 'Remove Command', 'RC'), & 'Deinstall Modem Server', CmdFileTo $DisplayLine (DoneMsg) ; merge request files with local request file $RestartLabel $Display (MergeMsg) $Run [Sys]ListRqSet.run,([sys]request.sys, & [Sys]Request.Modem.sys), [scr]<$>-x $Run [Sys]MakeRqset.run, [scr]<$>-x, [Sys]request.sys $DisplayLine (DoneMsg) ; if the user wants the library, copy it local $If InstallLib $Display (DevMsg) $Run [Sys]LCopy.run, RqLablModem.Lib,,LocalSpec,,y,,no $DisplayLine (DoneMsg) $EndIf ; merge Modem Service command file with user selected command file $RestartLabel $Display (CommandMsg) Mdm = ConcatStrings(DeviceFrom,'mdm.cmds') $Run ([Sys]CmdFileEditor.run, 'Merge Command Files', 'MC'), & Mdm, CmdFileTo, yes, DefVol $DisplayLine (DoneMsg) i = 0 $While (i < 20) i = i + 1 $DisplayLine $EndWhile $Displayline (InstDoneMsg) i = 0 $While (i < 10) i = i + 1 $DisplayLine $EndWhile $Path ,Sys, Sys $PauseOn $END $While i < 20 i = i + 1 $DisplayLine $EndWhile $EndIf $PauseOff $EndIf RIFPrint = UserSelectYesNo(RIFPrintMsg) $If RIFPrint PrintName = $UserEnterValue(PtrNameMsg,DefPtr) ;---------------------------------------------------:PackageName:Modem Service :Version:s5.3.06 :RequiredMemory:120 :RequiredDiskSpace:350 :Commands:'Install Modem Service' 'Modem Service Status' 'DeInstall Modem Service' :ProductFiles:Deinstallmodemservice.run ModemMsg.bin ModemMsg.Txt ModemService.Config modemservice.run modemservicestatus.run RqLablModem.lib Sys.Modems [!Sys],,y,,no $Else $Run [Sys]LCopy.run,(Request.Modem.sys, *bin, *.modems, *.form),,[Sys],,y,,no $E%' Screen Setup No Yes NoCOPY [kbd] [VID] CEF To Display the Release Notes (ReleaseNotes.Doc) PRESS AEGOAA, Otherwise PRESS AECANCEL-GOAA Type [B25MDM]ReleaseNotes.Doc 1 COPY [kbd] [VID] CEF To Print the Release Notes (ReleaseNotes.Doc) Enter your Printer Name in Square Brackets and PRESS AEGOAA If you do not wish to print, PRESS AECANCEL-GOAA  Copy [B25MDM]ReleaseNotes.Doc 1COPY [kbd] [VID] CEF If you wish to view the Release Notes Information later, enter: COPY then PRESS AERETURNAA enter: [B25MDM]ReleaseNotes.Doc then PRESS AERETURNAA enter: your printer name to print the Release Notes or [VID] to display it on your B20. then PRESS AEGOAA AF** Display of Release Information File Complete **AA AF** PRESS AEGOAF TO CONTINUE SOFTWARE INSTALLATION...**AA1%' Screen Setup %'[Reverse video?] ' %'[Large characters?] 'yes %'[Screen length (default = full screen)] ' %'[Suppress character attributes?] ' %'[Suppress pause between pages?] 'yes %'[Color (e.g., Green)] ' %'[Screen timeout (in minutes)] ' %'[Blinking cursor?] ' %'[Block for cursor shape?] ' %'[Background color (e.g., Blue)] ' %'mJ8ǎ !@Wu! !  # $ 3#S&v.56#Sv) &+<'g  8!!"'#%.$0S%)&'(,)* +8,S-o.$4:P Q* R1 S%%' Copy %'File from*'[kbd] %'File to*'[vid] PF The Volume Status command will show you the number of free sectors available on your hard disk. Please note that number. After Volume Status has executed, please Press GO. Press AEGOAA to continue. PN 1Volume Status %'[Volume or device name]'!Sys %'[Details?]' %'[Print file]' %'[Directory spec]*' %'[Include temporary directories?]' 1Copy %'File from*'[kbd] %'File to*'[vid] PF The installation of CTOS Modem Service requires approximately 350 sectors of disk space. If you do not have adequate free sectors of disk space, Press AEActionAF FinishAA. Otherwise, Press AEGOAA. 1Submit [B25MDM]ReleaseNotes.sub LCopy %'File list' [B25MDM]*.run %'[File prefix(s) from]' %'[File prefix(s) to]' [!Sys] %'[File suffix(s)]' %'[Overwrite OK?]'yes %'[Confirm each?]' %'[Continue on error?]' %'[Verify copy?]'Copy [!Sys]Sys.modems [!Sys]Sys.modems-saveCopy [!Sys]ModemService.config [!Sys]ModemService.config-saveCopy [kbd] [Scr]<$>desc.Tmp Yes25MDM]Deinstallmodemservice.run [B25MDM]ModemMsg.Bin [B25MDM]modemservicestatus.run [B25MDM]modemservice.run [B25MDM]RqLablModem.lib [B25MDM]Sys.Modems [B25MDM]Additional.modems [B25MDM]ModemServiceStatus.Form LCopy %'File list' @[Scr]<$>desc.Tmp %'[File prefix(s) from]' %'[File prefix(s) to]' [!Sys] %'[File suffix(s)]' %'[Overwrite OK?]'yes %'[Confirm each?]' %'[Continue on error?]' %'[Verify copy?]' Copy %'File from*'[kbd] %'File to*'[vid] PF If Modem Service has been previously installed on this system, there may be a user customized configuration file already in existance. To continue to use this file as a default, please type the name of the configuration file at the 'File from' parameter and Press AEGOAA. If you wish to install a new configuration file, or if this is the this is first installation of Modem Service , please Press AECANCEL AFGOAA.  Copy %'File from*'[!Sys]ModemServer.config %'File to*'[!Sys]ModemService.config.tmp %'[Overwrite ok?]' yes %'[Confirm each?]' no 1Copy %'File from*'[B25MDM]ModemService.config %'File to*'[!Sys]ModemService.config %'[Overwrite ok?]' yes %'[Confirm each?]' noCopy %'File from*' [!Sys]ModemService.config.tmp %'File to*' [!Sys]ModemService.config %'[Overwrite ok?]' yes %'[Confirm each?]' noCopy [kbd] [Scr]<$>desc.Tmp Yesys]ModemServer.Run [Sys]ModemServerStatus.Run [Sys]DeinstallModemServer.Run Delete %'File list' @[Scr]<$>desc.tmp %'[Confirm each?]'Remove Command %'Old command name' 'Deinstall Modem Server' %'[Command file]' Remove Command %'Old command name' 'Install Modem Server' %'[Command file]' Remove Command %'Old command name' 'Modem Server Status' %'[Command file]' Copy [kbd] [Scr]<$>desc.Tmp Yes'DeInstall the Modem Service' New Command 'DeInstall Modem Service' [!Sys]DeInstallModemService.run @[Scr]<$>desc.Tmp Yes Copy [kbd] [Scr]<$>args.Tmp Yes '[Modem Service Configuration File]'Copy [kbd] [Scr]<$>desc.Tmp Yes 'Install the Modem Service as a system service.'New Command 'Install Modem Service' [!Sys]ModemService.Run @[Scr]<$>args.Tmp @[Scr]<$>desc.Tmp Yes Copy [kbd] [Scr]<$>desc.Tmp Yes'Display the current status of the Modem Service.'New Command 'Modem Service Status' [!Sys]ModemServiceStatus.Run @[Scr]<$>desc.Tmp Yes  Install New Requests [B25MDM]Request.Modem.Sys [!Sys]Delete %'File list' [!Sys]ModemService.tmp %'[Confirm each?]'Copy %'File from*'[kbd] %'File to*'[vid] Installation of Modem Service is Complete. Please reboot the system. The library RqLablModem.lib may be copied from this diskette for your programming needs at any time. ror?]' %'[Verify copy?]'Copy [!Sys]Sys.modems [!Sys]Sys.modems-saveCopy [!Sys]ModemService.config [!Sys]ModemService.con%' Copy %'File from*'[kbd] %'File to*'[vid] PF The Volume Status command will show you the number of free sectors available on your hard disk. Please note that number. After Volume Status has executed, please Press GO. Press AEGOAA to continue. PN 1Volume Status %'[Volume or device name]'Sys %'[Details?]' %'[Print file]' %'[Directory spec]*' %'[Include temporary directories?]' 1Copy %'File from*'[kbd] %'File to*'[vid] PF The installation of CTOS Modem Service requires approximately 350 sectors of disk space. If you do not have adequate free sectors of disk space, Press AEActionAF FinishAA. Otherwise, Press AEGOAA. 1Submit [B25MDM]ReleaseNotes.sub LCopy %'File list' [B25MDM]*.run %'[File prefix(s) from]' %'[File prefix(s) to]' %1 %'[File suffix(s)]' %'[Overwrite OK?]'yes %'[Confirm each?]' %'[Continue on error?]' %'[Verify copy?]'Copy Sys.modems Sys.modems-saveCopy ModemService.config ModemService.config-saveCopy [kbd] [Scr]<$>desc.Tmp Yes25MDM]Deinstallmodemservice.run [B25MDM]ModemMsg.Bin [B25MDM]modemservicestatus.run [B25MDM]modemservice.run [B25MDM]RqLablModem.lib [B25MDM]Sys.Modems [B25MDM]Additional.Modems [B25MDM]ModemServiceStatus.Form LCopy %'File list' @[Scr]<$>desc.Tmp %'[File prefix(s) from]' %'[File prefix(s) to]' [Sys] %'[File suffix(s)]' %'[Overwrite OK?]'yes %'[Confirm each?]' %'[Continue on error?]' %'[Verify copy?]' Copy %'File from*'[kbd] %'File to*'[vid] PF If Modem Service has been previously installed on this system, there may be a user customized configuration file already in existance. To continue to use this file as a default, please type the name of the configuration file at the 'File from' parameter and Press AEGOAA. If you wish to install a new configuration file, or if this is the this is first installation of Modem Service , please Press AECANCEL AFGOAA.  Copy %'File from*'%1ModemServer.config %'File to*'%1ModemService.config.tmp %'[Overwrite ok?]' yes %'[Confirm each?]' no 1Copy %'File from*'[B25MDM]ModemService.config %'File to*'%1ModemService.config %'[Overwrite ok?]' yes %'[Confirm each?]' noCopy %'File from*' %1ModemService.config.tmp %'File to*' %1ModemService.config %'[Overwrite ok?]' yes %'[Confirm each?]' noCopy [kbd] [Scr]<$>desc.Tmp Yesys]ModemServer.Run [Sys]ModemServerStatus.Run [Sys]DeinstallModemServer.Run Delete %'File list' @[Scr]<$>desc.tmp %'[Confirm each?]'Remove Command %'Old command name' 'Deinstall Modem Server' %'[Command file]' %0 Remove Command %'Old command name' 'Install Modem Server' %'[Command file]' %0 Remove Command %'Old command name' 'Modem Server Status' %'[Command file]' %0 Copy [kbd] [Scr]<$>desc.Tmp Yes'DeInstall the Modem Service' New Command 'DeInstall Modem Service' [Sys]DeInstallModemService.run @[Scr]<$>desc.Tmp Yes %0 Copy [kbd] [Scr]<$>args.Tmp Yes '[Modem Service Configuration File]'Copy [kbd] [Scr]<$>desc.Tmp Yes 'Install the Modem Service as a system service.'New Command 'Install Modem Service' [Sys]ModemService.Run @[Scr]<$>args.Tmp @[Scr]<$>desc.Tmp Yes %0Copy [kbd] [Scr]<$>desc.Tmp Yes'Display the current status of the Modem Service.'New Command 'Modem Service Status' [Sys]ModemServiceStatus.Run @[Scr]<$>desc.Tmp Yes %0Install New Requests [B25MDM]Request.Modem.SysDelete %'File list' %1ModemService.tmp %'[Confirm each?]'Copy %'File from*'[kbd] %'File to*'[vid] Installation of Modem Service is Complete. Please reboot the system. The library RqLablModem.lib may be copied from this diskette for your programming needs at any time. le prefix(s) to]' %1 %'[File suffix(s)]' %'[Overwrite OK?]'yes %'[Confirm each?]' %'[Continue on error?]' %'[Verify copy?]'Copy Sys.modems Sys.modems-saveCopy ModemService.config ModemService.config-saveCopy [kbd] [Scr]<$>desc.Tmp Yes25MDM]%' Copy %'File from*'[kbd] %'File to*'[vid] PF The Volume Status command will show you the number of free sectors available on your hard disk. Please note that number. After Volume Status has executed, please Press GO. Press AEGOAA to continue. PN 1Volume Status %'[Volume or device name]'Sys %'[Details?]' %'[Print file]' %'[Directory spec]*' %'[Include temporary directories?]' 1Copy %'File from*'[kbd] %'File to*'[vid] PF The installation of CTOS Modem Service requires approximately 350 sectors of disk space. If you do not have adequate free sectors of disk space, Press AEActionAF FinishAA. Otherwise, Press AEGOAA. 1Submit [B25MDM]ReleaseNotes.sub LCopy %'File list' [B25MDM]*.run %'[File prefix(s) from]' %'[File prefix(s) to]' %1 %'[File suffix(s)]' %'[Overwrite OK?]'yes %'[Confirm each?]' %'[Continue on error?]' %'[Verify copy?]'Copy Sys.modems Sys.modems-saveCopy ModemService.config ModemService.config-saveCopy [kbd] [Scr]<$>desc.Tmp Yes25MDM]Deinstallmodemservice.run [B25MDM]ModemMsg.Bin [B25MDM]modemservicestatus.run [B25MDM]modemservice.run [B25MDM]RqLablModem.lib [B25MDM]Sys.Modems [B25MDM]Additional.modems [B25MDM]ModemServiceStatus.Form LCopy %'File list' @[Scr]<$>desc.Tmp %'[File prefix(s) from]' %'[File prefix(s) to]' [Sys] %'[File suffix(s)]' %'[Overwrite OK?]'yes %'[Confirm each?]' %'[Continue on error?]' %'[Verify copy?]' Copy %'File from*'[kbd] %'File to*'[vid] PF If Modem Service has been previously installed on this system, there may be a user customized configuration file already in existance. To continue to use this file as a default, please type the name of the configuration file at the 'File from' parameter and Press AEGOAA. If you wish to install a new configuration file, or if this is the this is first installation of Modem Service , please Press AECANCEL AFGOAA.  Copy %'File from*'%1ModemServer.config %'File to*'%1ModemService.config.tmp %'[Overwrite ok?]' yes %'[Confirm each?]' no 1Copy %'File from*'[B25MDM]ModemService.config %'File to*'%1ModemService.config %'[Overwrite ok?]' yes %'[Confirm each?]' noCopy %'File from*' %1ModemService.config.tmp %'File to*' %1ModemService.config %'[Overwrite ok?]' yes %'[Confirm each?]' noCopy [kbd] [Scr]<$>desc.Tmp Yesys]ModemServer.Run [Sys]ModemServerStatus.Run [Sys]DeinstallModemServer.RunDelete %'File list' @[Scr]<$>desc.tmp %'[Confirm each?]'Remove Command %'Old command name' 'Deinstall Modem Server' %'[Command file]' %0 Remove Command %'Old command name' 'Install Modem Server' %'[Command file]' %0 Remove Command %'Old command name' 'Modem Server Status' %'[Command file]' %0 Copy [kbd] [Scr]<$>desc.Tmp Yes'DeInstall the Modem Service' New Command 'DeInstall Modem Service' [Sys]DeInstallModemService.run @[Scr]<$>desc.Tmp Yes %0Copy [kbd] [Scr]<$>args.Tmp Yes '[Modem Service Configuration File]'Copy [kbd] [Scr]<$>desc.Tmp Yes 'Install the Modem Service as a system service.'New Command 'Install Modem Service' [Sys]ModemService.Run @[Scr]<$>args.Tmp @[Scr]<$>desc.Tmp Yes %0 Copy [kbd] [Scr]<$>desc.Tmp Yes'Display the current status of the Modem Service.'New Command 'Modem Service Status' [Sys]ModemServiceStatus.Run @[Scr]<$>desc.Tmp Yes %0Copy [kbd] [Scr]<$>desc.Tmp Yesys]Request.sys [B25MDM]Request.Modem.Sys List Request Set %'Request.n.Sys file(s)' @[scr]<$>desc.tmp %'[Output file]' [Sys]Request.txt %'[Include padded requests?]'Make Request Set %'Text file(s)' [Sys]Request.txt %'Binary request file' [Sys]Request.sys %'[Error file]' %'[Version]' %'[Type (WS, SRP, Current) default = Current]'Delete %'File list' %1ModemService.tmp %'[Confirm each?]'Copy %'File from*'[kbd] %'File to*'[vid] Installation of Modem Service is Complete. Please reboot the system. The library RqLablModem.lib may be copied from this diskette for your programming needs at any time. n [B25MDM]modemservice.run [B25MDM]RqLablModem.lib [B25MDM]Sys.Modems [B25MDM]Additional.modems [B25MDM]ModemServiceStatus.Form LCopy %'File list' @[Scr]<$>desc.Tmp %'[File prefix(s) from]' %'[File prefix(s) to]' [Sys] %'[File suffix(s)]' %'[Overwrite OK?]'yes %'[Confirm each?]' %'[Continue on error?]' %'[Verify copy?]' Copy %'File from*'[kbd] %'File to*'[vid] PF GWb`|K@n&i{bCopyright 1992 Unisys Corporation. All rights reserved.Ver s5.3.06/aUS Linker 12.2.0p__pІ0 P? /@?pO ? O0_ ?` /@p`&&'?,,.O.0=PACE@GOH`HHpJoJ_ `R[O]0`?`aa/PbcdOehilm@oppq_rtuOvp@0h67-8'0(&/."  )*3  +,"$d1/m2,N45 !\1Qqx}'@    3 W |      0zFz_ztzz+` r` ` -   E ; $; '; ;  ` z     B  + =3 3 3 U3 3 3 43 A%A%A%B%B%B%B% B%(B%0B%8B%@B%HB%PB%XB%`B%hB%j     I I -xux x q {  TgN\NNNN`A`nnFntn n) nY n n< nr n n= n n n n nSSS?]qG}*6'M ''/'F'X'%/$///I/X/h///////<<^G^_y0Cc-h+Ff84A]v  S  R,:YGjGGG2T`TTTTTTTp zzE  `  7 ;  " 3 x xtwJN`nS'/<^IYt/:GTs)/Mbh07 y   ' C d      X a      v   % T f    p&pa^K"bX x    / @  z     26:>BFJNRVZ^bfjnrvz~zzz1zz\ !-RLlZt%6`iUfJ!         5 = F          K T ^  /Vk (\qyNe D>JuFl!,gjPkE 2E E E E E #E JE cE E E E E ?E oE E E E E E E E jE E E fE E E 4E qE E E dE E E E c E E E  E d E E E Y E a         @ O ^ h r |          m g >   F      ` .` R` e` ` ` ` B` n` ` ` ` ` 6` u` ` ` ` ` I` \` ` @` ` ` L` ` ` B` ` ` ` ` `  ` % ` h ` | ` ` `  ` * ` * `      ; ; ; @; e; ; ; ^; }; ?; x; ; ; ; ; h; ; ; + !        F m       K _      " * =   P  # e  q    & @  z     W ~            f  z     -   X d     =" " 3 63 l3 3 3 3 3 3 3 B3 3 3 3 A%A%A%A%x A%=x A%kx A%x B%x B%x B%#x B%Qx &B%x .B%x 6B%x >B% x FB%7x NB%ex VB%x ^B%x fB%x qB%uB%yB%}B%B%B%B%B%B%B%B%B%B%B%B%B%B%B%B%B%B%B%B%B%B%B% ) 5 H T s   . S       I  ,        |   t p             2 = r     E  $ : fxxxxxxxzxxxdxxxKxxxxx"x|xxxx,x;xxxxxkxxxxx/xxx xL xa xp x x xx x x x x x- x x x x{ x x x xR x x xxxx;xTxxxxFxxxxxx:x]xx[5F$k$_         & t     D%D%D%D%ww(V?#Q ~v`:znn4n^nnnnPnqnnnnln}nnn! n/ nk ny n n n' n n n n n n n n n n n ny nJnGSuSSSSSSS SX>ggE%E%////'// /^///]/1y,p (D`; <<<%^N^^^I^#3 3z9kF<@3n :IY[YYYFYoYYt4u<3zE'3zc p`I`QQ\      %    9   B,y+GT  eeeee$J$1m # y 4b$ $$ C<)<$<V < <@s      [sys]ModemMsg.bin[!sys]ModemMsg.binLCannot access message file [sys]ModemMsg.bin or [!sys]ModemMsg.bin [KBD][VID]h[PTR]& $ % * - II021B02II120A00SYSSYS8251Config.sysCommPtr&II120A00[scr]<$>BsFilter.tmpVNVFMASTERSERVERLOCAL{}[][]{}[]<>^<>{}Error 2624: msg= %0N maxlen= %1N^ s5.3.06/aUSBizComp [Comm]l[SysIn][SysOut]>3;T teT"$&DPT+,- T.T T/L041 2${4LP T5T T6\l|,,, |\,,,, \l\,,,, |`|||| |{|||   dddddd Error opening translation file: !>*>DXUPPFP/P^&G ʴ&G$ʹFF v/ذʈvvʱʺƬNڬʈڶ䶈ʈʈʈlj&(֫ثSءpNP[SCpvxޭ୉.0VX~^ʈʓ ذҴXFQذ ˋFذ6κډ FH^xғ%%剄np_FⓍ毌诋^҈ғⓍDžү^ғⓍS牔"$JF2؍牄^`^҈҉°҈҈҈҈҈҈ҵְDžDžFtFF'wLLJFv.Nj~‰6^LjFuz{}墁墄墅dFFVw ƇFuƴ]UQQFF rN;vW؍P*F t:^ЉF^;vP㍇ήP*F tY^ЉήЮF^;vP㍇P*F t^ЉF<]UQQF F thHF؃tĿWP+F^ヿЮtĿήWP+F^ヿtĿWP+FN둋]U~tv]UdvFP~uvLPFPFPt]UQQF~'u^Z|rQF~u'vRPP^GPPFPF~u F^^F]UP64FPPF uFԃ t tF)F tPPPFPF u^&W~WGPv FPF u~u^ FFFFuFrF)~uV^v &1^^?uF)0^.^^^F] U~ v\)FFF>дtaFrZдF;vM ؊ҴF;u->W~ WӴQPFPF u ~uFFrF럊Fs\^S^^ĄĄޭޭĄĄ..0ĄVVXĄ~~^ Svv F~tF ؍Ӵv NFF ؊FҴ>WӴPGPPFPF u~u ^ƇNSF ؍ӴPGPPFPF u~u ^ƇNSF ؍ӴPGPPFPF u~u ^ƇF]U^ SvFPFPFPF uvFFFF u+J^^u):>дt?^дȋ^:r+;Fu:Fu)FY^uNj^Fҋ^F^؍Uv NF^؊FTF]UF^&G HF(s'^㋇F^&;Gu^^ヿuF)~u^uF)^LJF]UQQFFHF(rF)^ヿFuF)~u8^^nuF)^uF)^LJF]UF؊TF0FFFv^ &F~]uF0FvFv؊UF~]uF0F;Fu)]U^&F^&FPPF t^ &^&GF^&^ &~ u ^&[F~uFFr?F^PFP-FF^.]FNF봊F^&^&^ &F]UFFꚏF uR^ vPF^PFPFPF u!F@F uFW)Fs ]F uUFFs^SuF=U)tF~u^ S^SF ~uF)6갚 Fv8 F] UQ]U^ćFF^ƇuFFFs&^SPPRQP,F=, tF^SPP,F^S,F]U^ćFFPFP(,]U6^ćFFćήFFćFFF؊TT~Fg؍hΉF^Vsr^&^&G^&G^&G^&G^&G^&G ^&G ^&G d^&G ^Ns ^&G<^㋇2^&G^㊇ȴF^SFPF˴PmmPFg؍hP^SP^SPPP.,F uKF ؍ӴR©RҴPu^SPP,F^SP,FF]U ^ćFF^ʈNPPv FP~W6ԩĿNWFdP,F t;=$ r=' r1~- u/F<t#<t<t<u ^t F< tuFF t=- u^&v~ ^YF] U^ ćFF^ ㋏NNF^ ʈVPF+PPFPFP6ԩĿNWF dP,F t;=$ r=' r1~- ubF<t#<t<t<u ^ t F< tu8~& u ~tNFNF+;Nw>^8vFY~- tNF+;NvH^8vI^v8vNFYFFFFFFs^ ʈF~WNF+QQFPFP6ԩĿNWF dP,F t;=$ r=' r1~- u(F<t#<t<t<u ^ t F< tu\~& u ~tNFNF+;Nw^8vFY)^v8vNFYFF&~- uFF~+ u^ F^v8vNFY^ LJ~u ^ LJF]U ^ ćFF^ ㋏ڬNFP^PF+PPFP6ԩ^ ĿvWF ȴP,F u^ LJڬ~+ uFF^ ㉇ڬF]UF^ćFF^ .]cjqF FF^Sv^&7p,F] U ^ ćFF^ .FF FFF^&^SvFPV,F~u^&F]U]U]UQ|F u(SP+F uSP+F]UQPP*F u]PP*F uHѧPЧPRPPSPSPCF=uF'F u|]U(PPPF uN(QF uFHN;rmQRPPPPFPF uJ+FH9v'5NF^㡎鉇FuF]U ^NsFF<'w؊:NuFFu^sFPFPc#^ćFFPPFPV,F~tFFF]U ^NsFF<'w؊:NuFFu^s_ğ^F&Gtu^&w\F"^&wP\^&w\FtFFvPFPFF]U^Ns|FF<'w؊:NuFFu^sPFPc#^ćFFPPFPV,F~tFFF]UF^tantZ^8ڶu F,S^ڶu7FSPFPF uFrvPNQP5FF]UQFFdPFU^S^vƇʈʴ^ڬщ&(^҈҈҂uʈ]UF^uFFFsDFg؍hΉ^^vPGPP5F^ns,SP:D FPW؍PP5F^みְtFPQְPQ5F^ƇF]UЉFVFFFFF6ԩFPF t^SȴPs56ƴDFFtPKDF@ 1ƴRF^SPs,bFF:дspNri^SĿNWsHF^<t<u^ğ^F& u ^Ƈ똊^ƇF뇊FrVFF:дsINrB^SĿvWs!F^<t<u^ƇF뮊Fs vl \Fs vpKFrG^&G nsd;r+P^&G =s;r +PP ^SFF tPvvP̴s̴6ϴF t P6ϴUQQvPv`Њ^"Y rヿs^ntD^ćė^;u$:u^ЉF^ćė&^;u$:u^Љ&(FP)P^ć tЉ(^ć& t$Љ&(FP)P^ć֫ toЉ֫ثFP)PIF(u+JVڊr%PPD^ ^LJ]UQQFF;کw؊:NuFFu^㋇ꉇ^Ƈ̴FϴƇ]U詉F詂>дteFд:FrXFFH;Fr/^ヿƬtƬ^㋇ t tFuȊ^ヿuvFu>дuFдȊ^:suヿƬu!^ƇS^uヿƬt^FuFvvF uaFs:^NsMÿ(u+JVt/PPڍ6FPW؍PP5F~uvtPvvv&FFt>дuFд:FsFF;کv؊F8uw؊rudҀt tuQ^uFFFs4FFH;Fr&^ヿ6tS^nYr6FuFtjFtP>дuFдȊ^:sucunrVSsJ^suƇe^ƇY^ƇSF tBvP&FEvs9^uƇS^ƇSP:DvtPv^rutFF;کv؊:Nu ǀtu|^ヿ6up^nrcƇvZP^Љ^Ƈ^u )Pz^uƇS FvFtWFtj>дuBFдȊ^:s/ʷ.H ` ^ X ` ` X X X ` ^ns`ÿ(u+JVڊQP`Y"s/vPD"^㋇H uvPF^u㋇H uvPF^tAQSY"^みZuA"s8^uƇ ^ƇvtPvvFt]U^ćFFFFF^ʷ. oo L%Losoo^ćFF^uS&_S^&w&_SNv^&_S^&wF~+ tEvFPFFs%^u$vFPFFr vtFn^ćFF~udvFPPF uFvv^&wPFP3 F uNs_^ćFF~ubvFPPF uFvvSPFP3 F uÊNs^щ^ƇSP}~+ u FsF~ti^<t<uFPvv@^u Sv)^ƇЉFPvF]UکAFu+JVFLJZ^<t <tub^nrGFZuF6)FPv^ʈSv PvfvZP"D^tuT^nr:SZPv Pvv^t̴ϴyvvDlFs$^ć&Љ&(-^ćЉvF^ƇSZPF]U^<t<t<tć&^ćFF uXFv^&_S^&wF=+ uF)^Љ&(^ƇSvF]U F^&G F" u+JVt"^&G^ćPFF^S^F]UFF^ʷ.vFPvFP vFPF~uFs*^uvv&FF t ~uFF]UFF^F tSFrO^ʷ.f|t^ʈF쀿uOs&s)F u^Ƈ v F^ƇSvj^u:LJvFPF u֊^tFsÊ^Ƈ@^uLJvFPF u^r tƇFsF^ƇFFF;کw&؊:Nuǀtu^ƇFuъ^nsSs vF^sqFF^(+ˍFu+JӉVڋ uF@F(v¸)"vvvP^Ƈ7~uYFP؍PPF u܊FPNQ}svvvP^Ƈ~+ uFFF^nsSs vFFPv^v㋟^Ƈ^ʰSPóg؍vPP5F^みְt@FPQְPQ5F'F(u+JVPR<FFF~u^nr<t<u3^uF̩BFPv^ʈ#FPv^t ̴ϴv FvF tFF tO^nsBu̩6F=8)t vP"D#کAFu+JVPRDF]U^ğ^F^v&D^ƇvFF;کw؊:Nu uƇFuۊ^F^ƇʋupuʋFgPF[؍hFg؍^^vPGPP5F uvP^OQP5F^みְtFPQְPQ5F]U ^FF~t^svFPPF uFf~uŊ^ʷ.%5F$^:JFQ؊ ˈNV NPuFFQ؊F ˊF$^:u^^sYS FN^nr2SFPv}s*vvvP^Ƈ )Pz^~+ uFF]UQQFFFF;کwU؊F8uEu>˴nrĿWFF@PRPFP DFuF]UF ؊F7Ƈ6^FFFsiکA^F u+J^^?uFF@F;کvF븋^F^.tҊ/:Fuɰ]UQ^SFP7sZ)F]UQQv F^&G^㉇Ƭ^Ƈ tF+ FF]U F^u~ğ^F&Gtu^&w P\O^& u&u^PP^&wP\^&wP\Fe^ćFFPPP,F= u;F^uFvvF u^SPP,FF]U^8nt8tğ^FF&Gtu^&w P\R^& u"&u^PP^&wP\^&wP\F^ğ^F^u^&7F u ^Ƈ^ćFFPPP,F= u8F^uFvvF u^SPP,FF]UQ^&G^㉇Ƭ^Ƈ tF+ FF]U@^ć^FFFF^㋇HN;rQ^&F<=u ^&G+~~u^&?u%&GF< t<-t<(t<)t FvBFFuvFPvF u vFF]UQv^GP^&PF u vFF]UF~u5FvFPPFPNF u؃~tҊN:Nu~+ uF^ƇF]UFF~uSvFPPF uF$FN^ &FF;FuFF^&F:Fu~+ uF^ƇF]UQQF ;Fr;N F+ȉN S^Q^SPFPF u ~u] UQQ^ &G^&]UQQ^&r^&G^ &] UQQ^&s^&G^ &] UQ^uFFFsD^ns7<t/Ƈ<t<t<uvv(P:D^Ƈ^ƇƇƇ+ ]UQ^uFFFsD^ns7<t/Ƈ<t<t<uvv(P:D^Ƈ^ƇƇ+ ]UQQF^s)S^GP^&PF u vFF]U FF^uFFFs~F(u+JV;t]NPPFPP5F^ns7<t/Ƈ<t<t<uvv(P:D^Ƈ~u^vFPPF uF$FN^ &FF;FuFF^&F:Fuv F ~+ uF^ƇƇF]U F^uFFFs~F(u+JV;t]NPPFPP5F^ns7<t/Ƈ<t<t<uvv(P:D^Ƈ~u/vFPPF uF$:Fuv F ~+ uF^ƇƇF]U^uFFFsD^ns7<t/Ƈ<t<t<uvv(P:D^Ƈ^ƇƇƇ+ ]U ^ćFFF^&GFw r&?tY)T^Svvp,F= u9F^uFvvF u^Svvp,FF]U ^ćFFN^&GFwW&8uR^SQPp,F= u9F^uFvvF u^Svvp,FFY)]U ^&GFtt tY)^uFFF^Ҋns_8tWt ;uLFsE^ҊҀt1Ҁt tuvv(P:D^Ƈ^Ƈ+ ]U^&G^㉇ְ<v]UT)]UQF^.YeDSblv^ SaFQ؍ R ˴P^ GP^ &P^&j^ Svk^ Sv'\^ &wvz^ S^S*^ S^S^S]^ S^S^S9^ SvsFQƇ v &tPW R PvEs^ Sv^ Svvvvnvq븊FQƇ v &tPW R Pvd^ &wvSv I^ Sv :^ Sv% +^ Sv ^ Svx v ]UQQF^F^^ &tB t=vR&p^PFPvF^F t=+ u4F^'^^^ &8u Fr^F]UFF^ ㋏N^^. &^ ćFFćޭ0^ ćFFć.^ ćVFFć~FF~u%~uv ^S^SFPFP#FՃ~u^^.^ F:^ LJ^%^.F6) F7)F8)F]U]U]U ^ćFFćnFF^uyヿtm^uF u ^Ƈ^nsnrtF^&&_^&G&O4 ^&G&W ^&G &O4^&G&W^&G^&G^&G^&G` ^&O^&O^&G^&G!^LJ LJү^u|ñURTP~W~WүF uk^v&^Ƈ&Dt#t^&wP\^&wP\^ヿtꉇvvP]UvvP]UvvP]UQQF9u?6갹QP66첍FP#F u.^&𲊇^&F]UQFIيN찋]UQQFPF~u~:uF]UF WOQNQPFPF u~uF^&FFuT)]U^&F^&NQPF uI^ &^&GF^&^ &~u ^&{F<t<t< t <t<t<ulF~uFFr?F^PFP-FF^.FNF봊F^&^&^ &F]UFFꚏF uu^ vPF^PFPFP F uDF@F=rFW)F=rFX)FsFF]F upUFFF~ ~u~{tFPF~u2~}t,FPFFFBF< vF\)ȃ~u8S^GPFP^&PFPF u~t])vNFF]U(FFF~ٹ ~u~[tFPF~u2~]t,FPFFFBًF< vFU)ȃ~u8S^GPFP^&PFPF u ~tFU)vٿNFF]UFP^ GP^ &PRPPrmPF t[첣~uFs^SF=])tF~uF[)~uQSuF u?^6򲍄"Ӊ"㉇ޭĿWPF~uQSuF u?^6򲍄"Ӊ"㉇.0ĿWPF~uQSuF u?^6򲍄"ӉVX"㉇~ĿVWPF6갚 Fv8 F] UFF~v FSFPvBF tSFPvBFF]U F~t>uF=T)s=h)vF-T)F.y >6 ."&$&(*,򤊆FF=W)t&=X)t!=[)t~vPPt]UQQ^ć tΩuΩ]U ^ SvFPFPFPF ucFFFFFF^Fsi~uc^д:wVPZ*ʵFu+JVu)F:^F^:FuF뗋^됊Fs ~uF)F]U ^&_ S^&wFPF u^rF)~u@^&_S^&wvF u! u^r SPF~t^LJvFPF uHFr2^ƇƇF^ƇvLJ ^ʈʃ~uFs6^sF u^Ƈ v F~uFsF^&G^S<ʩ]U^&GFFF^&GFF^&_ S^&wFPF u^&_ S^&wvF^nuF)-^NstF)^sF)~tI^<vF)V^&_^F^v&D92t tF)*(u+J^&^&?uF)^&7F숄&g^&w؍F^&7~&EF^&7Ƅ&;کvک^^&v&F^&GF :vN^& ^w؍oȊNF^& F툄nȊ^Ƈn^&^FF^&G^S<ʩ]U^SF t^&G HF^㋏&;Ouv)Pv)PZ^㋇ tv)P^Ƈ^ʋvƄDŽFF ƄnuS F^Ƈ^uS^sƇ F^&G^S<ʩ]UFʹrF)~u^&_ S^&wFPF~u^sF)~u1FP)P^Ƈ ƇʈS FF^&G^S<ʩ]UF^&G HFN˴rgPF uY^&GF^uF)<~u ^Ƈ*~vF)v^&_SvsF)~t^tr SPF~u0^LJvFPF=6)uvFPF~t^ƇFs2vFPF u^uƇ~t^ƇvƄȈvLJ ˴rWF^&L6^ʋF&t؍/NjNFF؊F.˴/^ƇrS F tF v FF t(NQPv^ʈʴFe^Ƈv&D6^㉷^Ƈ^ʋF&t؍/NjNFF؊F.NjF t˴r^&G^S<ʩ˴]U^SF u5^&G HF^Nrd&_^F&uF;)W^&2vF9)F^v&LtĿ^^Y^v&D ^LJ~ur^Ƈvt^<t<uF)I^u=S FFF;کw&؊:Nuǀtu^ƇFuу~tfFgPF[؍h^r SPF~t ^&_^FvPGPP5F^v&DLJvFPF=6)uvFPF~u2FsvFPF u*^Ƈ^Ƈv F tF~uY^ƇvƄƄF^㉷&LS^Ƈv&\^F&G[~t^Ƈʢ̴ϴF t^&G^S<ʩ]U F^SF u8^&G HF؊N9tF)^ uF)^ć uPĿWs^Љ^ĿWĿ&Ws^Љ&(^ĿW^SsFv)P^ć t5щP^SsFv)P^ć& t5щ&(P^SsFv)P^ć֫ t P^SsFv)PZv F^ƇvFƇ.^t ̴ϴFsF^&G^S<ʩ]UFF;کwQ؊:N uA.ǵV;r->W/P^SRFPF u ~uFu]U^SF uY^&G HF؊N9u ^vuF)&vsF)^ uF)F]U ^S F uW^&G HFN&uF)4^㋇ t$ث ֫uF֫ثF+ F)^F^uS&_S^&w&_SN@^&GFF^&O&^LJv^&_S^&wF~+ u(^ƇLJ ^F^ЉF=+ t^&G^S<ʩ]U ^S F u.^&G HFN&ONF^&uF)|^&G^&^v&D121@S^㉷[LJڬv&\S^&wF=+ u^ƇF&(^ЉF=+ t^&G^S<ʩ]U^&GFF^&GFF^S F uR^&G HFN&uF)/^㋇ tث ֫u F֫ثF)-F ؋* tAv&FLJ*v& ,~^ƇS^S^&7F~u^&G^S^&G[F^LJ ~uYFP؍PPF u܊FP^&wPFP3 F uNsNQPX~+ u ^ƇFF^ЉF t^&G^S<ʩ]U ^S F u_^&G HFN&O NF^&uF)/^㋇ tث ֫u F֫ثF)^F^LJ &O&w~&}^Y^&~uUFP؍PPF u܊FPPPFP3 F uNsNQPX~+ u ^Ƈ FF^ЉF t^&G^S<ʩ]UF^&INFFF LJ*^ F&.v*:r?v FsNFF< uΰFFĊFuȰ ~FF:FwvPPFFuvFPFPFFF^&+ȈNF ^ V0؍,FF ؊F*F^&F] Uv^F݊^ğ^FFsH&GF&GF&GFF^&GFF^&G FF^&G&FF^&GB^&GF&GFF^&GFF^&GFF^&G$FF^&GFFF < r7F.0 0 0 Hf0 0 0 0 0 0 0 @ 0 0 0 0 0  0 0 0 0 0 0 0 0 0 0 0 vPPF^&^&?t0vPPFvPPFvTv(^&?u^<t<u^&?u^&vFsq^&;FuvPPFPvv&4^PPF u0^&(Fs!vPPF^& ^FF^r)F9Fv!^&:F u^F ^&F΃~uM^rDFr=^&;FuF rvF;FuFsv§PPF^8u SN Q^uSPPF~uFs+v&4N+^V0_^y^NOYF^&7F ^&^&^&;Fu=F s6v^S^S FvçPPF^& ^Fs F^&GF] U^S F uu^&G HF^&|u&L&tF?^&u^ĿW,v^&w&_S^&w5FF^&G^S<ʩ]U$^&GFF^&GFF^&GFF^&GFF^&GFF:дrF)^& vF)x^&_ .upFݱ ؊Ҵ^&;GvFݱ ؊ҴҴ^&"^&^&9Gr^&^&Щ9^&s^&^ݷ㊇@^&^ݷҷ.",6^&G^&G^&GFݱ ؊ҴҴ^^ݷ㋇2^&G^&AsF)y^ݷ^&FFF;کwP؊:Nu@^v&@F ^@FFF؊nn~FFu^&@^&^ݷʴ^&^ݷt ^&^ݷ㋇^&G^&G^&G^&G^&G^ݷt < tu!^&G^&G^&G^&GFF;کw؊:NuFکFFuފ^ݷrğ^ތF&Gtu`^&G^&w\Fܨt ^&G^&GF t ^&G^&GF܀t ^&G^&G^&wP\^&w\F t ^&G^&GFt ^&G^&G^ݷPFPcF~t ^&G^&G^&GEvݸP^GPFvݸP^GPFvݸP^GPFF^&G^S<ʩ]UF ;Fu F ;Fu]UQQS^ S^SvFPF u ~u] U^ &^&:t^ GP^GP^ &P]UF ;Fvv ~N^v ~N^NOY] UF ;Fvv ~N^v ~N^NNOOY] UFF;کvFFFдȊ^:r㋇^&;GuFFFuFF;کw؋F^&;GuFFFuۋFu؋ t ^ƇvPFذ.Nj^LJFF ذnȋ^щ~u^^t uʊ^tF^ƇFдt]FдȊ^:r㋇v&;D u&DFuFF;کw!^㋇Fv&;D u&DFFu^&G^S<ʩ]U^&G)^S<ʩ]UF>дt*FF;کw؋F^&;GuFFFuۋFt؊Fr ^S$^&G^S<ʩ]U ^&GFF>дtuFдȊ^:reFns'Fr ^xuFv P:Dي^tS Fv)P^ƇFuF H^;r"cFFu^SlF^&G^S<ʩ]U^SP  u].X s].T]U^"S3P  u].` s].\] U^S P  u].h s].d]U^S"P  u].p s].l]U^S$P  u].x s].t]U^S&P  u]. s].|]U^S+P  u]. s].]U^ S,P  u]. s].] U^ S-P  u]. s].]U^ S.P  u]. s].]U^S/P  u]. s].]U^S0P  u]. s].]U^ S1P  u]. s].]U^ S2P  u]. s].] U^ S4P  u]. s].]U^S5P  u]. s].]U^S6P  u]. s].]U].HU]U]U]U]U]U] U]U]U]U]U]0>3˰>3Uv vvCD]Uv v vvD]Uvvvvv v vvD]Uv v vvD]Uvv v vv D] Uv vv D]UػҋFH8uv v \^& ^&)] UػҋFH8uv\^ &^& ^&)] Uvvvvv v ^&]Uvvv v ^&] Uvv v ^&] Uvvv v c^&] Uvvv v d^&] U^uF uK^Ƈ^Sv^Sv^ SvF uЊ^Ƈ^ &G t tx^v &&Dt#t^ &wP\^ &wP\^snr#^ &7F tF) ^ƇF]U F^sS F u^uF~uRF؍URTP^ĿnW^^ĿW^үFF t vP"D^Ƈğ^F^v&&Dtu^&w P\>^&wP\^&wP\^&wP\^&wP\^S^^FS^v^NƅʰʈʈʈƇDŽSP:D]U^ uW^ ğ毉^F&^&^ F^ ҴN;rvN^&&Fuָ]U^&GFF^&GFF^ &^&^&GF t&]U^&G4FFF^&G"FF^&G@FF^&D6sF)^&_S^&wFPF u^&_S^&wvF^tF)^nrF)^sF)~t^v&D92t tF)&(u+J^&uF)^&_S^&w&_S^&w &_:S^&w>v<F u^&F䈇g؍hεzFg؍hΉ^^^㋇2^G^&7V~&EF[Ƈ;کvک^^&Gv&F^&GF :vN^& ^w؍oȊNF^& P؊F切n^&G^㉇v&D4^&&W40&G&W4z&G&W 4O&G &W4&G&W4&G&W4&G&W4&G&W4N&G &W"4y&G$&W&4&G(&W*4&G,&W.4&G0&W2X&G4v䚒^҈xJv&4ƄS^щ FHv&L _&T>үS^Ƈ&t_Ľn^Y^v&D F&L&t؍UFF^&O؈T^&@&^&G4^FF^&GS<ʩ]U^&G FPfFNINيV ut=t P  ]U~u]^&GFĴ.GFF'FFFF&5^ćFFğl^Fv &F^&NFFu-#ȋ^H^&Z&Wv#^& F^&Z&W ^&G^&t  $^&t  ^SPPhFPv ^SvPTF u^&G :uShhv ^Svh,aF uF^&G8 @F^&srF F~u'~thFN^SdF~t,UFPvQPQeT]U^&G :eu:fu :gt^Sq,]^&G :u:u:bu ]^&G$&G ^&G,^&G(^&G2^&G3^&G0]^&G :fu:eu :gt^Sh,^&G :uF:u=:u4:bu+:du":eu:fu:gu ^Sh TF u^&v#&wxh\^&wx&GpP\K^&u t1^&FFv&|^^F&7^&Gn@P\hF^&v&wxh\^&wx&wp\,^&u t^&7^&wn\FU^ &G :du:fu:eu :gt^ S^S{,]^ &G :uF:u=:u4:bu+:du":eu:fu:gu ]^ &G|^&^ &G|]UFV>]UV>]U^.]U^.&]ˋ0UPSQRVW^0u x@Ƈ0_^ZY[X]Uv ~N< wt< t< t < t<t+~] U^x.>> >%]?U.>><Ŀ&UB>"u$&U>tt u Ƈ3LJ@@H ; w3ǁFıV&t&u#&t&DŽ&DŽBřN tƇ23Uw(>Ƈ0U ;$t6ķ&&,&FA +;$r3,z>ULJ@Hu HU ;$t2uLJ@LJ@U"!#!!!!!.!?!!!!!*!+!!!!!.!?!!!!!U&.>>>ȋz>рp "t 2.#twx0>t ."t,<t<u$t\UƇ2@uLJ@td+w"+fw u8 t>Ft;wtt x>u3Ut2 2t'Ƈ2;$t@uLJ@0uS-dƇ|UQ"+t Ŀ&EY3퉯&^UUpu51u.<t&<t".t5u < u Ƈ5 Ƈ5< t]苗d;r"~;w,pt@t;t2.ht :iu PĿ&E&&&rd;r"~;vLJ>0Ŀ&CV;"v;dr$drV;"w(V;"vXLJ>0V;"vU`u`+^^&Ŀ&S&cFtLJFUd;t&r"~;v ;drdrLJ>%tĿV&&UƇ4tBRP.x>p$p>Ŀ&U >XZtLJ@0uS-dU>ȋ=w>=wW=wQĿ&U>t3t t3t$Ƈ3Ƈ0LJ@Ƈ3Ƈ0LJ@tVz>Ƈ|"tA&d;w2";w';^s^]V;"vFu33˥'ssU^S^Sv^Svv ^Svj,]U^S^Sv^Svv ^Svj,]UFPjv^ S^SQFPQ,] vFP,F uqv~N^Y~u ЉFVsjjj ^SvN4F,jjFP/F uF^&G Z&W F&GF^SvtFv ^&G :^tSv^ S^Sg|<^SFPF u'^Sv^ S^Sg|F^^&G F^ &&W^&^&O :Gv^&zVnjޱ;u$:u0r)PNPjRPQhrmRPQF u(^&G :u FF^S|u ^&G s<&G s4~u ^&"^&G ^G ^ &Z&W^&}^&G&;Gr$Sv^ S^S9F uX^&?uL^&G&O+;FsFF^&^&FFv&t^^ &Z&W^F&G FFN F;vS~uMF^S+QFPFP|FF t!^ v8vFYFF멃~tF^&F^&G :^tRS^ Sv ^S|FRsmpVnjޱ;u$:uH^SF9^SFPF u'^S^ Sv ^S|F^^&G F ^&^&O :Gv ^&pVnjޱ;u$:u7r0Rr)pPSPjRPQhwmRPQF u(^&G :2u FF^S|u FFN F;w~t^&W&;WrS^ R+QFPFT^&G&+GFV N+;sV^&FF^ v0~&}^9N^Y^F&GFFcF^&FU^&G :Gv ]U^&G :Gv ^&G ]U^&]U^&]U]U^& t^&G :\u &G& u]Uv&D FFv^"&@Fv^"&x"ti&Gwub@JP(F u,vZ^F&^&G ^S1F tvF^"&@VZ&PX^&GFth~%^"&Gwt^FFF FF$FF(FFFFFF^"&OsN&OqN^&OcNNNNN&tFFFFFPFP tFF s u~r ЈFQ~ u?~uЈFF>ЈFF$~r)FFsF~ u~ r F$F~^SvFPvFPvF tlFƒwu{F^"&GF^"&GxF^"&GzF^"&^"&tu|FV^;u$:uF^"&Z&WF^"&G+؍^"&&_^"&G@%^"&G^"&G^"&tuB^"&FFv"&t^^FF&F^&GF^&GF^&GFsZFƒtu^"S^SPRQP^"S^Sv^Sv͚F t^"S FF^"&G}^"&s &_ ^"&_\F^"&wcF&_v˷`F^"&vF&wxj\^"&wxj\F@F^"&Go^"&wx&wo\^"&wxj\^"&G :t:bu^"&G tu ^"&wxj ^"&wxj\^"&wxj\^"&G :t@^"&G :u&G tu1Fֹ@@2^"&u&Gn(^"&u Fֹ@@Fֹ@@ ^"&Gn^"&wx&wn\^"&wxj\Fֹ  ^"&Gp^"&wx&wp\^"&tu^"&G# F&s&G&Ov ^"&G+&Wv"Ѷ &Gn^"&u&On^"&u&On^"&wxj`\^&7^"&wn\^&wj\^&wj \^&wv\^"&GpsjFPhFFsvv$jF$PPF uc^"&GFF^"&G& GtvjFPPF u3^"&GFF^"&G& GtvjFPPF u F^&u2&9w&wxP\^&wxj6^&tu)^&FFv&t^^F&wj\^&Ltb&GZ tXFF&G^&wLFP| t^&^&GL^&G^&G^&wLFPF^&w &gp}^&wxj\^&wx&wp^&tu^&wj\^&Gwu&wF tF^&G FF;w|^&x"tf&Owu?&HJ tQ)F tFv^&@V t4P2F t&F!v^&XV^F&^&GFtzs}jFPhFFsgvjQF uY^&GFF^&G& GtvjQF u.^&GFF^&G& GtvjQF uFU^&G :t/:t):t#:bt:dt:et:ft :gt ^S ]^&F^&&W^&G :dt:fu^Sv^S^S!,^&G :t :t z^&FtSjF u^&Gb;FsFF^&O*&Od^&`tN&9Os-SP^&+Qv ^SvhZaF uF^^&G^&Z&W^&G*^&^F&9Gw^&G^&^&^&)G^&^&G*^&G*&G^j^&G^&Z&W^&G*^&^&GFF^&G`F^&FN;s#&)^F&)G^F&G*F^&^F&)GF^&^&_㋇nF u^&G*~u&F ^&^&G*^&G*&;G"r&G*^&G^F&G`^&GFF^F&9G*tC u&G"FvN^&8uvv^FF^&w`^&)FFs ^&G4sSFPlF u8s,jFPhFFs^&wvGPdFU^ &G :t :t Q^ &G^&^ &G^ &G&^ &G*^ &Gd^ &G^^ &G`^ &G4sS]^&G"&;Gw&4t^&Gte&w &wxj\^&Op^&wx&wp8^&tu+^&&G&OFN؎&WRR\ P\^&Gt jd^&G@^&G0rS-d^&G4U*PFP t> u ~r > s#^Sv^Sv ^SvPe> svN FF^FFFFFFFFFFFF FFFFFFFPd]U(> sF uv vvP'FڈFFF FFFFFFP ]U(> sFuvP FڈFFFFFP]U> sF uv v ^S$8> rv v ^S7FFv v ^S^S]UQQ> sF uv vv01> rv vv8$FFv vvP]U^&&GFPDF uFF^&G&GSF u(vFPF uF;Ft ^&G]^ &G :dt:ft :et:gu^ &G :t-:t':t!:bt:dt:et:ft :gt~ wc^ .p+A\e}^ &G~^ &Gu^ &G :u$&Gs&;Gqt'^ &su$^ &qu^ &G :uFFv^ &@q3^ &Gv@^ &G :tB^ &G8^ &G :t,^ &G6v^ &G :t^ &G.^^ &G :u ]^ &G/C^ &G<^ &Gh&Oi$^ &Gq^ &Gs^ &Gl^ &GjFF^& Uv&D ~&] ~&] Y] ~ v$N~ uFPlF tF F~u.^SvFPF uF;Fua"\sj vj^SvN4F7vPNQPF uF^&GvFYFUj ]Uj ]Uj ]Uj ]Uj ]U] U+Zr tH]j&j^S/ u ^& +ZrHU3 &L&;Wt]U#tH3&GtH] 6r"^&&W&G&G;F s Wv X^F&F&GFFF;FsN ;Nv&@FFڋF;Fr ,v@^&Z&WS&_[&GU|s]&G@] ar &G;FsGvX^F&F&GFFF;Fs&@FFFU>uP u>t&G>u]ð]UQQPD2,P uJF6P u84=u0P u!F6P u =t=!t3]JRP$s%jjFP,,F tK~`t@JJs^&GF<wu^.ouF:wZF F<wNFF< w>FF;FsG~ t ~r^F팇~v@FN ^㉇l퉏nH Fu-JsFFFPFP*F uF؍lnFFprJsF "F tvFP^GP^&GPRPjhrmF t?^&Ow,F^&Gv,QPtv^ĿWhjjFP#F u3FFv^ĿlWPvvFP#F tv F) v F u ^&G}hjFP/F^&G F A:r&Go$&_v˷ ^ &Go^ &wxj\^ &wx&woA^ &tub^&7\F^ &vufN^&7v#^ &G :tRF^ &G86^ &G :t9F^ &G6^ &G :t ~w8F^ &G.Z^ &G :u K~wF^ &G/)~vF^ &G^ &G :u&Gt tFF^ &G :t&Gtt ^ &gn^ &On ^ &9we&wxP\^ &wxF$P\^ &wxj\^ &wx&wn\'Ft jDF~uv&<tF~to~tEv&<u<^&?\F u5FPF PFPjX\F uF;F vdS~ vH(~^vNFY^vx)FF^&F F t~u5^&~u^S^Sv^ Sv|FF^SvFPFPj{j}\F uF;F vdP~ vE*~^vNFY^vx+F^&F F t~u5^&~u^S^Sv^ SvFFUFF F u4vvvjjFPj j{j}jDF#t F#t)Fv^@‰FVvvvjjFPj j[j]jDF#tF#t)Fv^@‰FV~t~u v&<jDF#ukF#t)Fv^@‰FVvvvvv v vj2jj^jDF#u$v&<uvvvj2vv VDF~uFF F FuFFPFPFPjj^X\F uF F;FvdbF F2vRF t$N t~^Y^vFFv~N ^YFFF ^&F Ft~uF F t~u=^&~u'^S^Sv^Sv^ SvFFUFF F uRvvvjjFPj j{j}jDF#t)F#t)Fv^@‰FVvvvjjFPj j[j]jDF#tF#t)Fv^@‰FVvvvjjFPj jjDF#tF#t)Fv^@‰FVvvvjjFPj2jj^jDF#uWF;Fs v&8^uFF#t)FF~tv~vvvj vv v vDF~uFFU`Pj<]~F^ &^SMPvFPF uFt^ &FFF~NuV~u ^&P ~u^&7P^ S~u8^&w&7P^ SF^~Hu2Ft tuS^SvP^ SF^~Du_~uFPF~u^&&WFV, PRPvvvPj ^ SFF^^S^ &7^Svv^SFU`Pj&Q6DT ; ; = backspace = 08h ; ; When being CALLED by a modem not supporting these protocols: ; Have the REMOTE site wait at least 5 seconds after getting CONNECT message ; before sending user data. ; In Modem Service this typically means adding :DELAY:5 ; before the :OnLine: command in the Make_A_Call script. ; ; :JumpIfCompareNotEqual:1 becomes :JumpIfCompareNotEqual:2 ; :OnLine: :Delay:5 ; :Finish: :OnLine: ; :Finish: [Reset_Modem] :DropAndRaiseDTR:2 ; drops DTR wait 2 sec then raise DTR again :SendString:'AT&F',0Dh ; Load factory configuration ; Async with V.42 bis ; Contains: ; B16 Initiate Calls use 103 at 300bps ; N1 Use highest common line speed ; Q0 Return Result Codes ; V1 Use Word Result Codes ; W0 Do NOT return progress messages ; Y0 Do NOT respond to longspace disconnect ; &A0 Connect as Answering modem in auto answer ; &G0 No guard tones ; &J0 RJ-11/41S/45S telco jacks ; &K3 Enable RTS/CTS flow control ; &Q5 Use Error Correction ; &R0 Track CTS to RTS ; &S0 DSR always ON ; &T4 Grant request from remote for digital loopback (TEST MODE) ; &U0 Enable trellis coding ; &X0 Use Modem clock ; &Y0 User config 0 (ATZ0) as power up default ; ; ; It also sets the following values which will be reprogrammed below ; ; B1 Initiate Calls in 212A at 1200bps ; E1 Echo characters ; L2 Speaker Volume Medium ; M1 Speaker on until CD ; X4 Return Connection speed ; &C0 Assume presence of CD ; &D0 Ignore status o DTR :Delay:2 ; Ignore the 'OK' :IgnoreStringEndingWithCharacter:0Ah :IgnoreStringEndingWithCharacter:0Ah ; ;Many of those options cause problems so here we set them the way ;we want them. Actually we'll reset the important ones so we ;aren't impacted by possible factory changes and script may work ;for other modems as well ; First a couple of registers :SendString:'ATS0=0S2=128S25=50',0Dh ; ; S0=0 Don't answer if DTR up for now. ; S2=128 Disable escape sequence so we can read data which might ; contain it ; S25=50 Set DTR drop detect to .5 seconds. Required if DCI ; applications are to be supported ; :Delay:2 ; Ignore the 'OK' :IgnoreStringEndingWithCharacter:0Ah :IgnoreStringEndingWithCharacter:0Ah ; Now reset those options we don't want from the &F ; and set up the rest of the main environment :SendString:'ATB0E0X0&C1&D2&S',0Dh ; ; B0 Use V.22 at 1200bps(NOTE U.S. user may want to delete this) ; E0 Echo OFF ; X0 Simple CONNECT message (no speed indicated) ; &C1 DCD follows carrier ; &D2 DTR drop causes disconnect ; &S DSR always ON ; :Delay:2 ; Ignore the 'OK' :IgnoreStringEndingWithCharacter:0Ah :IgnoreStringEndingWithCharacter:0Ah ; Now just a couple things people may have personnal preference on :SendString:'ATM0L1',0Dh ; ; M0 Turn off speaker or M1 to turn on for testing ; L1 or at least set the volume LOW ; :Delay:2 ; Ignore the 'OK' :IgnoreStringEndingWithCharacter:0Ah :IgnoreStringEndingWithCharacter:0Ah ; :SetLineControl:2 ; Set up bytestream flow control to RTS/CTS to match ; the \Q3 above. This allows us to talk to the modem ; at a constant rate even if the connection rate ; is lower. :DropDTR: ;Extra precaution against accidental answer :Finish: ;reset modem completed [Wait_For_Call] :DropAndRaiseDTR:2 :SendString:'ATS0=2',0Dh ; ; S0=2 Answer on Ring 2 (required in some countries) :Delay:2 ; Ignore the 'OK' :IgnoreStringEndingWithCharacter:0Ah :IgnoreStringEndingWithCharacter:0Ah :WaitForCarrier: ; Wait for CD to go high ; ignore the Ring message :IgnoreStringEndingWithCharacter:0Ah :IgnoreStringEndingWithCharacter:0Ah ; ignore second Ring message :IgnoreStringEndingWithCharacter:0Ah :IgnoreStringEndingWithCharacter:0Ah :IgnoreStringEndingWithCharacter:0Ah :SaveStringEndingWithCharacter:0Ah :CompareWithSavedString:'CONNECT',0Dh,0Ah ; compare saved string with CR :JumpIfCompareNotEqual:1 :OnLine: :Finish: [Make_A_Call] :DropAndRaiseDTR:2 :SendString:'ATS0=0',0Dh ; ; S0=0 Disable Autoanswer to avoid call conflict :Delay:2 ; Ignore the 'OK' :IgnoreStringEndingWithCharacter:0Ah :IgnoreStringEndingWithCharacter:0Ah :SendString:'ATDT' ; initiate dialing :Delay:1 :MapPhoneNumberAndDial:'W,' ; The W is the tandem dial (equals) ; or wait for second dial tone character ; The comma is the pause (tilde) S8 seconds before next character :Delay:1 :SendString:0Dh ; starts dialing process :IgnoreStringEndingWithCharacter:0Ah :SaveStringEndingWithCharacter:0Ah :CompareWithSavedString:'CONNECT',0Dh,0Ah :JumpIfCompareNotEqual:1 :OnLine: :Finish: ;----------------------------------------------------------------- {Microcom} ; Microcom AX/9624c 9600 bps AX/2400 2400 bps ; A/S button position - A ; Switch settings - FRONT - 4, 7 Down, all others UP ; BACK - 6,7,8 Down, all others UP (AX/9624) ; 6,8 Down, all others UP (AX/2400) [Reset_Modem] :DropAndRaiseDTR:2 ; drops DTR wait 2 sec then raise DTR again :SendString:'45',0Dh ; for sync with modem :IgnoreStringEndingWithCharacter:21h :SendString:'INIT',0Dh ; Set the modem to initial state and read current switches :IgnoreStringEndingWithCharacter:29h :IgnoreStringEndingWithCharacter:20h :SendString:'Y',0Dh ; modem asks 'are you sure' - we say yes :Delay:2 :SendString:'SCEOFF',0Dh ; echo off :IgnoreStringEndingWithCharacter:21h :SendString:'SA0',0Dh ; speaker on until CD :IgnoreStringEndingWithCharacter:21h :SendString:'S0=1',0Dh ; answer after 1 ring :IgnoreStringEndingWithCharacter:21h :SendString:'S1C1',0Dh ; CD follows modem carrier :IgnoreStringEndingWithCharacter:21h :SendString:'S7=50',0Dh ; Carrier wait before disc = 50 sec :IgnoreStringEndingWithCharacter:21h :SendString:'PBX0',0Dh ; equalization in reliable mode = long :IgnoreStringEndingWithCharacter:21h :SendString:'SBRK1',0Dh ; type of break = 1 :IgnoreStringEndingWithCharacter:21h :SendString:'SB9600',0Dh ; baud rate 9600 :IgnoreStringEndingWithCharacter:21h :SendString:'BAOFF',0Dh ; adjust serial port to connect speed = OFF :IgnoreStringEndingWithCharacter:21h :SendString:'BLOFF',0Dh ; :IgnoreStringEndingWithCharacter:21h :SendString:'SMAUT',0Dh :IgnoreStringEndingWithCharacter:21h ; set mode to auto-reliable :Finish: ;reset modem completed [Wait_For_Call] :WaitForCarrier: :IgnoreStringEndingWithCharacter:07h :OnLine: :Finish: [Make_A_Call] :SendString:'D' ; initiate dialing :Delay:1 :MapPhoneNumberAndDial:',' ; The comma is the pause character ; There is no delay character :Delay:1 :SendString:0Dh :WaitForCarrier: :IgnoreStringEndingWithCharacter:07h :OnLine: :Finish: ;--------------------------------------------------------------- {Milgo} ; Async Racal-Milgo ; Use quick set up for 2-W Dial (Hayes) [Reset_Modem] :DropAndRaiseDTR:2 ; drops DTR wait 2 sec then raise DTR again :Delay:2 :SendString:'AT&F',0Dh ; Reset the modem :IgnoreStringEndingWithCharacter:0Ah :IgnoreStringEndingWithCharacter:0Ah ; Ignore the 'OK' :SendString:'AT\Q1,1',0Dh ; RTS/CTS flow control :IgnoreStringEndingWithCharacter:0Ah :IgnoreStringEndingWithCharacter:0Ah :SendString:'ATE0M0S0=1S2=128',0Dh ; Set echo off; speaker off ; Answer after 1 ring. ; Disable escape sequence so we can ; read data which might contain the ; escape sequence. :IgnoreStringEndingWithCharacter:0Ah :IgnoreStringEndingWithCharacter:0Ah :SendString:'ATX0=1',0Dh ; basic result codes only. ; Disable long space disconnect :IgnoreStringEndingWithCharacter:0Ah :IgnoreStringEndingWithCharacter:0Ah :SendString:'AT\V0',0Dh ; NO MNP result codes :IgnoreStringEndingWithCharacter:0Ah :IgnoreStringEndingWithCharacter:0Ah ; :SendString:'AT&D2',0Dh ; ; Hang up and enter command state after reset ; :IgnoreStringEndingWithCharacter:0Ah ; :IgnoreStringEndingWithCharacter:0Ah ; ; Ignore the 'OK' :SetLineControl:2 :Finish: ;reset modem completed [Wait_For_Call] :WaitStringReturn: ; WAIT FOR THE PHONE TO RING :Delay:2 :IgnoreStringEndingWithCharacter:0Ah :IgnoreStringEndingWithCharacter:0Ah ; Ignore the first 'Ring' echo :IgnoreStringEndingWithCharacter:0Ah :IgnoreStringEndingWithCharacter:0Ah ; Ignore the 'Connect' response :OnLine: :Finish: [Make_A_Call] :SendString:'ATDT' ; initiate dialing :Delay:1 :MapPhoneNumberAndDial:',' ; The comma is the pause character ; There is no delay character :Delay:1 :SendString:0Dh ; starts dialing process :WaitForConnectMsgAndIgnore:0Ah :SaveStringEndingWithCharacter:0Ah :CompareWithSavedString:'CONNECT',0Dh,0Ah ; compare saved string with 1,CR :JumpIfCompareNotEqual:2 ; :IgnoreStringEndingWithCharacter:0Ah ; :IgnoreStringEndingWithCharacter:0Ah :Delay:3 :OnLine: :Finish: ;--------------------------------------------------------------- {Sema} ; Sematrans 9696 by Phillips 9600 Baud, in Hayes format Async [Reset_Modem] ; :Delay:2 :DropAndRaiseDTR:2 ; drops DTR wait 2 sec then raise DTR again :IgnoreStringEndingWithCharacter:0Ah :IgnoreStringEndingWithCharacter:0Ah :IgnoreStringEndingWithCharacter:0Ah ; :Delay:5 ; :SendString:0Dh ; ; Send a CR ; :IgnoreStringEndingWithCharacter:0Ah ; :Delay:5 ; ; :SendString:'A' ; ; For sync ; :Delay:1 ; :SendString:'A' ; ; For sync ; :Delay:1 ; :SendString:'A' ; ; For sync ; :Delay:1 ; :SendString:'A' ; ; For sync ; :Delay:1 ; :SendString:'AA' ; ; For sync ; :Delay:1 ; :SendString:'AAA' ; ; For sync ; :Delay:1 ; :SendString:'AAAA' ; ; For sync ; :Delay:1 ; :SendString:0Dh ; :IgnoreStringEndingWithCharacter:0Ah ; ; Ignore the CR response ; :SendString:'AT&F',0Dh ; ; Go into V.25 Bis mode ; :IgnoreStringEndingWithCharacter:3Eh ; ; Ignore response ending with greater than ; :SendString:'RCS',0Dh ; ; Recall factory configuration ; :IgnoreStringEndingWithCharacter:20h ; :SetDataBits:7 ; :SetParity:1 ; ; Ignore response ending with spacebar ; :SendString:'PRR P2',3Bh,' 01110000',0Dh ; ; Pulse dial, V.25 bis mode, No display of tel. no. ; :IgnoreStringEndingWithCharacter:3Eh ; ; Ignore response ending with greater than ; :SendString:'PRR P0',3Bh,' 00000000',0Dh ; ; 9600 / 4800 bits/s, No auto fallback ; :IgnoreStringEndingWithCharacter:3Eh ; ; Ignore response ending with greater than ; :SendString:'PRR P1',3Bh,' 10100000',0Dh ; ; Asynchronous, 10 bits ; :IgnoreStringEndingWithCharacter:3Eh ; ; Ignore response ending with greater than ; :SendString:'PRR P3',3Bh,' 01000000',0Dh ; ; 2-wire ; :IgnoreStringEndingWithCharacter:3Eh ; ; Ignore response ending with greater than ; :SendString:'PRR P4',3Bh,' 11000100',0Dh ; ; RTS normal, DTR normal, TxC by modem, Full duplex ; :IgnoreStringEndingWithCharacter:3Eh ; ; Ignore response ending with greater than ; :SendString:'PRR P5',3Bh,' 00000000',0Dh ; ; No test ; :IgnoreStringEndingWithCharacter:3Eh ; ; Ignore response ending with greater than ; :SendString:'PRR P6',3Bh,' 00100000',0Dh ; :IgnoreStringEndingWithCharacter:3Eh ; ; Ignore response ending with greater than ; :SendString:'PRR P7',3Bh,' 00000000',0Dh ; :IgnoreStringEndingWithCharacter:3Eh ; ; Ignore response ending with greater than ; :SendString:'PRR P8',3Bh,' 01010000',0Dh ; ; Echo by modem, 8 data bits, No parity, 1 stop bit ; :IgnoreStringEndingWithCharacter:3Eh ; ; Ignore response ending with greater than ; :SendString:'PRR P2',3Bh,' 01111000',0Dh ; ; Pulse dial, AT mode, No display of tel. no. ; :IgnoreStringEndingWithCharacter:0Ah ; ; Ignore response ending with LF - remember this is a Hayes response ; :SetDataBits:8 ; :SetParity:0 ; ; :Delay:2 ; :IgnoreStringEndingWithCharacter:0Ah ; :IgnoreStringEndingWithCharacter:0Ah ; :IgnoreStringEndingWithCharacter:0Ah :SendString:'ATX0',0Dh ; Basic result codes :IgnoreStringEndingWithCharacter:0Ah :IgnoreStringEndingWithCharacter:0Ah :SendString:'ATS0=1',0Dh ; Answer after 1 ring :IgnoreStringEndingWithCharacter:0Ah :IgnoreStringEndingWithCharacter:0Ah ; ignore the OK response :SetLineControl:2 :Delay:2 :Finish: ;reset modem completed [Wait_For_Call] :WaitForCarrier: ; Wait for CD to go up :IgnoreStringEndingWithCharacter:0Ah :IgnoreStringEndingWithCharacter:0Ah ; ignore the RING message :OnLine: :Finish: [Make_A_Call] :SendString:'ATDT' ; initiate dialing :Delay:1 :MapPhoneNumberAndDial:',' ; The comma is the pause character ; There is no delay character :Delay:1 :SendString:0Dh ; starts dialing process :IgnoreStringEndingWithCharacter:0Ah :SaveStringEndingWithCharacter:0Ah ; Engage string ending with LF :CompareWithSavedString:'CONNECT',0Dh,0Ah ; Compare that string with 'CONNECT',CR,LF :JumpIfCompareNotEqual:1 :WaitForCarrier: ; Wait for CD to go up :OnLine: :Finish: ;--------------------------------------------------------------- {SupraFAX} ;--------------------------------------------------------------- ; SupraFaxModem V.32 bis ; lGlamb R5.3 930924 Version 2.1 ;--------------------------------------------------------------- ; NOTE: This script is specifically keyed to running these modems at 19.2 kbps. ; This speed is not sustainable on all hardware/software combinations ; and may have to be adjusted downward (requiring script changes). ; WARNING ; This script intializes the modem to use error correction and data ; compression protocols (both MNP and V.42). ; This may cause problems when attempting to establish a link with ; modems not supporting these protocols. ; This script is also set to use TONE dial only. ; ; The following guidlines will work with many older non MNP or V.42 modems ; ; When CALLING a modem known to not support these protocols: ; Add the following before the number to dial ; ; &Q6DT ; ; = backspace = 08h ; ; When being CALLED by a modem not supporting these protocols: ; Have the REMOTE site wait at least 6 to 10 seconds after getting ; the CONNECT message before sending user data. ; In Modem Service this typically means adding :DELAY:6 ; before the :OnLine: command in the Make_A_Call script. ; ; :JumpIfCompareNotEqual:1 becomes :JumpIfCompareNotEqual:2 ; :OnLine: :Delay:6 ; :Finish: :OnLine: ; :Finish: [Reset_Modem] :DropAndRaiseDTR:2 ; drops DTR wait 2 sec then raise DTR again :SendString:'AT&F2',0Dh ; Load factory configuration ; &F2 contains ; \N3 Auto Reliable Connection ; &K3 RTS/CTS flow control (see below) ; W0 DO NOT report err correction ; CONNECT reports DTE rate NOT line rate. ; This means Modem Services does NOT have to ; speed adjust. ; &Q5 ASYNC ; &D2 Auto Answer disabled when DTR OFF ; &C1 DCD indicates Carrier :Delay:2 ; Ignore the 'OK' :IgnoreStringEndingWithCharacter:0Ah :IgnoreStringEndingWithCharacter:0Ah :SetLineControl:2 ; Set up bytestream flow control to RTS/CTS to match ; the &K3 above. This allows us to talk to the modem ; at a constant rate even if the connection rate ; is lower. :SendString:'ATE0M0',0Dh ; E0 Echo OFF ; M0 Speaker OFF (for test you might change to M1) ; ; Ignore the 'OK' :IgnoreStringEndingWithCharacter:0Ah :IgnoreStringEndingWithCharacter:0Ah :SendString:'ATS0=0S2=128',0Dh ; S0=0 Disable Auto Answer ; S2=128 Disable escape sequence so we can ; read data which might contain the ; escape sequence. ; Ignore the 'OK' :IgnoreStringEndingWithCharacter:0Ah :IgnoreStringEndingWithCharacter:0Ah :DropDTR: :Finish: ;reset modem completed [Wait_For_Call] :DropAndRaiseDTR:2 :SendString:'ATS0=2',0Dh ; S0=2 Auto Answer after 2 rings ; Ignore the 'OK' :IgnoreStringEndingWithCharacter:0Ah :IgnoreStringEndingWithCharacter:0Ah :WaitForCarrier: ; Wait for CD to go high ; ignore the Ring message :IgnoreStringEndingWithCharacter:0Ah :IgnoreStringEndingWithCharacter:0Ah ; ignore second Ring message :IgnoreStringEndingWithCharacter:0Ah :IgnoreStringEndingWithCharacter:0Ah ; NOTE: This method of connection assumes the line speed in ; ModemService.config is 19.2 kbps. If this is changed then ; the following compare must be changed to meet the new ; text exactly. ; Alternatively, one could have script ignore the CONNECT ; message and assume the upper layers will properly ; detect a false connection and reset after appropriate ; interval. ; ignore the CONNECT message OPTION ; :IgnoreStringEndingWithCharacter:0Ah ; :IgnoreStringEndingWithCharacter:0Ah ; :OnLine: ; :Finish: :IgnoreStringEndingWithCharacter:0Ah :SaveStringEndingWithCharacter:0Ah :CompareWithSavedString:'CONNECT 19200',0Dh,0Ah ; compare saved string with CR :JumpIfCompareNotEqual:1 :OnLine: :Finish: [Make_A_Call] :DropAndRaiseDTR:2 :SendString:'ATS0=0',0Dh ; S0= Disable Auto Answer ; Ignore the 'OK' :IgnoreStringEndingWithCharacter:0Ah :IgnoreStringEndingWithCharacter:0Ah :SendString:'ATDT' ; initiate dialing :Delay:1 :MapPhoneNumberAndDial:'W,' ; The W is the tandem dial (equals) ; or wait for second dial tone character ; The comma is the pause (tilde) S8 seconds before next character :Delay:1 :SendString:0Dh ; starts dialing process :IgnoreStringEndingWithCharacter:0Ah :SaveStringEndingWithCharacter:0Ah ; As Noted above, this CONNECT message must reflect the line speed ; indicated in the config file. The alternative of ignoring this ; message on the outgoing call is NOT recommended. :CompareWithSavedString:'CONNECT 19200',0Dh,0Ah :JumpIfCompareNotEqual:1 :OnLine: :Finish: ;--------------------------------------------------------------- {SyncDC2400} ; Convergent DC2400 Synchronous 2400 baud ; Switch settings: Front panel(SW1) - 2 On; 1, 3 thru 6 Off ; Rear (SW2) - 1, 2 On; 3 thru 7 Off [Reset_Modem] :DropAndRaiseDTR:2 :SendString:'AT&F',0Dh ; Reset the modem :IgnoreStringEndingWithCharacter:0Ah :IgnoreStringEndingWithCharacter:0Ah ; Ignore the 'OK' :SendString:'ATM0',0Dh ; Set speaker off :IgnoreStringEndingWithCharacter:0Ah :IgnoreStringEndingWithCharacter:0Ah :SendString:'ATE0',0Dh ; echo off :IgnoreStringEndingWithCharacter:0Ah :IgnoreStringEndingWithCharacter:0Ah :SendString:'AT&C1',0Dh ; Make CD follow true line carrier condition :IgnoreStringEndingWithCharacter:0Ah :IgnoreStringEndingWithCharacter:0Ah :SendString:'AT&D2',0Dh ; DTR off makes Modem go ON HOOK, assume idle state :IgnoreStringEndingWithCharacter:0Ah :IgnoreStringEndingWithCharacter:0Ah :SendString:'ATX0',0Dh ; Basic result codes, CONNECT, not CONNECT 2400 :IgnoreStringEndingWithCharacter:0Ah :IgnoreStringEndingWithCharacter:0Ah :SendString:'AT&M1',0Dh ; Synchronous mode #1 :IgnoreStringEndingWithCharacter:0Ah :IgnoreStringEndingWithCharacter:0Ah :Finish: ;reset modem completed [Wait_For_Call] :SendString:'ATS0=1',0Dh ; Answer after 1 ring :IgnoreStringEndingWithCharacter:0Ah :IgnoreStringEndingWithCharacter:0Ah ; Ignore the 'OK' :WaitStringReturn: ; Wait for the phone to ring ; :IgnoreStringEndingWithCharacter:0Ah ; :IgnoreStringEndingWithCharacter:0Ah ; ; Ignore the first 'Ring' echo ; :Delay:5 ; :IgnoreStringEndingWithCharacter:0Ah ; :SaveStringEndingWithCharacter:0Ah ; :CompareWithSavedString:'CONNECT',0Dh,0Ah ; ; compare saved string with CONNECT,CR,LF ; :JumpIfCompareNotEqual:1 :OnLine: :Finish: [Make_A_Call] :SendString:'ATDT' ; initiate dialing :Delay:1 :MapPhoneNumberAndDial:',' ; The comma is the pause character ; There is no delay character :Delay:1 :SendString:0Dh ; starts dialing process :IgnoreStringEndingWithCharacter:0Ah :SaveStringEndingWithCharacter:0Ah ; Engage string ending with LF :CompareWithSavedString:'CONNECT',0Dh,0Ah ; Compare that string with 'CONNECT',CR,LF :JumpIfCompareNotEqual:1 ; :Delay:5 :OnLine: :Finish: ;--------------------------------------------------------------- {SyncMicro} ; Microcom AX/9624c AX/2400c 2400 bps ; A/S button position - A ; Switch settings - FRONT - 4, 7 Down, all others UP : BACK - 6, 8 Down, all others UP [Reset_Modem] :DropAndRaiseDTR:2 ; drops DTR wait 2 sec then raise DTR again :Delay:2 :SendString:'45',0Dh ; for sync with modem :IgnoreStringEndingWithCharacter:21h :SendString:'INIT',0Dh ; Set the modem to initial state and read current switches :IgnoreStringEndingWithCharacter:29h :IgnoreStringEndingWithCharacter:20h :SendString:'Y',0Dh ; modem asks 'are you sure' - we say yes :Delay:2 :SendString:'RESET',0Dh ; Reset the modem :IgnoreStringEndingWithCharacter:21h :SendString:'SCEOFF',0Dh ; echo off :IgnoreStringEndingWithCharacter:21h :SendString:'SA0',0Dh ; speaker on until CD :IgnoreStringEndingWithCharacter:21h :SendString:'SNC1',0Dh ;Set to synchronous mode 1 - async dial, sync data :IgnoreStringEndingWithCharacter:21h :SendString:'S0=1',0Dh ; answer after 1 ring :IgnoreStringEndingWithCharacter:21h :SendString:'VMODE0',0Dh ; Synchronous modulation mode 0 :IgnoreStringEndingWithCharacter:21h :SendString:'SB2400',0Dh ; baud rate 2400 :IgnoreStringEndingWithCharacter:21h :SendString:'S1C1',0Dh ; CD follows modem carrier :IgnoreStringEndingWithCharacter:21h :SendString:'S1D2',0Dh ; DSR and CTS both follow CDsetting :IgnoreStringEndingWithCharacter:21h :SendString:'SLLOFF',0Dh ; Disable leased line :IgnoreStringEndingWithCharacter:21h :SendString:'PBX1',0Dh ; PBX equalizer - SHRT ; Direct line connection or PBX to PBX connection ; Auto-PBX disabled :IgnoreStringEndingWithCharacter:21h :SendString:'CRTS1',0Dh ; CTS ignores RTS in Synchronous mode :IgnoreStringEndingWithCharacter:21h :SendString:'S25=5',0Dh ; Delay to DTR = 5 seconds :IgnoreStringEndingWithCharacter:21h :Finish: ;reset modem completed [Wait_For_Call] :WaitForConnectMsgAndIgnore:07h :OnLine: :Finish: [Make_A_Call] :SendString:'D' ; initiate dialing :Delay:1 :MapPhoneNumberAndDial:',' ; The comma is the pause character ; There is no delay character :Delay:1 :SendString:0Dh :WaitForConnectMsgAndSave:07h :CompareWithSavedString:'CONNECT 2400',0Dh,0Ah,07h ; compare saved string with CONNECT 2400,Cr,Lf,Bl :JumpIfCompareNotEqual:1 :OnLine: :Finish: ;--------------------------------------------------------------- {SyncHayes} ; Hayes 2400 Baud, in Hayes format [Reset_Modem] :DropAndRaiseDTR:2 ; drops DTR wait 1 sec then raise DTR again :SendString:'AT&F',0Dh ; Load factory configuration :Delay:2 :IgnoreStringEndingWithCharacter:0Ah :IgnoreStringEndingWithCharacter:0Ah ; Ignore the 'OK' :SendString:'ATE0M0X0',0Dh ; Echo Off, speaker off, basic result codes :IgnoreStringEndingWithCharacter:0Ah :IgnoreStringEndingWithCharacter:0Ah ; Ignore the 'OK' :SendString:'ATS0=1S2=128S25=5',0Dh ; Answer after 1 ring, ; Disable escape sequence so we can ; read data which might contain the ; escape sequence, ; Delay to DTR 5 seconds after connection establishment :IgnoreStringEndingWithCharacter:0Ah :IgnoreStringEndingWithCharacter:0Ah ; Ignore the 'OK' :SendString:'AT&C1&D2&M1&R1&S1',0Dh ; DCD on when carrier detected, ; Hang up and enter command state after reset, ; CTS always ON - modem ignores RTS ; Synchronous mode 1, ; DSR operates according to RS232C specifications, :IgnoreStringEndingWithCharacter:0Ah :IgnoreStringEndingWithCharacter:0Ah ; Ignore the 'OK' :Finish: ;reset modem completed [Wait_For_Call] :WaitForCarrier: ; Wait for CD to go high :IgnoreStringEndingWithCharacter:0Ah :IgnoreStringEndingWithCharacter:0Ah ; ignore the Ring message :IgnoreStringEndingWithCharacter:0Ah :SaveStringEndingWithCharacter:0Ah :CompareWithSavedString:'CONNECT',0Dh,0Ah ; compare saved string with CR :JumpIfCompareNotEqual:1 :OnLine: :Finish: [Make_A_Call] :SendString:'ATDT' ; initiate dialing :Delay:1 :MapPhoneNumberAndDial:',' ; The comma is the pause character ; There is no delay character :Delay:1 :SendString:0Dh ; starts dialing process :IgnoreStringEndingWithCharacter:0Ah :SaveStringEndingWithCharacter:0Ah :CompareWithSavedString:'CONNECT',0Dh,0Ah ; compare saved string with CR :JumpIfCompareNotEqual:1 :OnLine: :Finish: ;--------------------------------------------------------------- {TelebitWB} ;--------------------------------------------------------------- ; Telebit WorldBlazer ; lGlamb R5.3 930924 Version 1.1 ;--------------------------------------------------------------- ; WARNING ; This script intializes the modem to use error correction and data ; compression protocols (both MNP and V.42). ; This may cause problems when attempting to establish a link with ; modems not supporting these protocols. ; This script is also set to use TONE dial only. ; ; The following guidlines will work with many older non MNP or V.42 modems ; ; When CALLING a modem known to not support these protocols: ; Add the following before the number to dial ; ; S180=0S190=0DT ; ; = backspace = 08h ; ; NOTE: Use of this technique will also require modification of the ; Make_A_Call script to allow passing of the = sign normally ; used to indicate Wait For Second Dial Tone (or tandem calling). ; So all numbers stored for this modem will need to include the W ; instead of expecting Modem Service to map it. ; See MapPhoneNumberAnd Dial below. ; ; ; When being CALLED by a modem not supporting these protocols: ; Have the REMOTE site wait at least 5 seconds after getting the ; CONNECT message before sending user data. ; In Modem Service this typically means adding :DELAY:5 ; before the :OnLine: command in the Make_A_Call script. ; ; :JumpIfCompareNotEqual:1 becomes :JumpIfCompareNotEqual:2 ; :OnLine: :Delay:5 ; :Finish: :OnLine: ; :Finish: [Reset_Modem] :DropAndRaiseDTR:2 ; drops DTR wait 2 sec then raise DTR again :SendString:'ATs254=255',0Dh ; Set &F to point at factory defaults :SendString:'AT&F',0Dh ; Load factory configuration ; ;Not the best option selection for Modem Service but it does get ;us to a known state. Important setting that do default properly ;are: ; V1 Response messages not codes ; &S0 DSR always ON ; &Q0 Async Mode ; &R3 CTS Flow control ; negotiation with some modems ; :Delay:2 ; Ignore the 'OK' :IgnoreStringEndingWithCharacter:0Ah :IgnoreStringEndingWithCharacter:0Ah ; ;Many of the default options cause problems so here we set them the way ;we want them. Actually we'll reset the important ones so we ;aren't impacted by possible factory changes and script may work ;for other modem models as well ; First a couple of registers :SendString:'ATS0=0S2=128S25=50',0Dh ; ; S0=0 Disable Auto Answer for now ; S2=128 Disable escape sequence so we can read data which might ; contain it ; S25=50 Set DTR drop detect to .5 seconds. Required if DCI ; applications are to be supported ; :Delay:2 ; Ignore the 'OK' :IgnoreStringEndingWithCharacter:0Ah :IgnoreStringEndingWithCharacter:0Ah ; Following are all factory defaults but set for safty :SendString:'ATS51=252S59=0S180=2S190=1S191=7',0Dh ; ; S51=252 Autobaud detect on every AT ; S59=0 No protocol suffixes used on CONNECT msg ; S180=2 Use V.42 with MNP fallback error correction ; S190=1 Data Compression Enabled ; S191=7 Use Telebit LZ compression or V.42bis ; NOTE: you may need to set S191=6 to disable LZ ; :Delay:2 ; Ignore the 'OK' :IgnoreStringEndingWithCharacter:0Ah :IgnoreStringEndingWithCharacter:0Ah ; Now set the main environment :SendString:'ATE0&C1&D2B0X0S58=2S68=2',0Dh ; ; ; E0 Echo OFF ; &C1 DCD follows carrier ; &D2 DTR drop causes disconnect ; B0 Use CCITT standard at 300/1200 bps ; NOTE: Use B1 to connect with Bell Standard modems ; X0 Simple result codes (CONNECT) ; S58=2 Use RTS/CTS DTE flow control ; S68=2 Use RTS/CTS DCE flow control ; :Delay:2 ; Ignore the 'OK' :IgnoreStringEndingWithCharacter:0Ah :IgnoreStringEndingWithCharacter:0Ah ; Now just a couple things people may have personnal preference on :SendString:'ATM0L1',0Dh ; ; M0 Turn off speaker or M1 to turn on for testing ; L1 or at least set the volume LOW ; :Delay:2 ; Ignore the 'OK' :IgnoreStringEndingWithCharacter:0Ah :IgnoreStringEndingWithCharacter:0Ah ; :SetLineControl:2 ; Set up bytestream flow control to RTS/CTS to match ; the &H3 above. This allows us to talk to the modem ; at a constant rate even if the connection rate ; is lower. :DropDTR: :Finish: ;reset modem completed [Wait_For_Call] :DropAndRaiseDTR:2 :SendString:'ATS0=2',0Dh ; ; S0=2 Answer on Ring 2 (required in some countries) ; :Delay:2 ; Ignore the 'OK' :IgnoreStringEndingWithCharacter:0Ah :IgnoreStringEndingWithCharacter:0Ah :WaitForCarrier: ; Wait for CD to go high ; ignore the Ring message :IgnoreStringEndingWithCharacter:0Ah :IgnoreStringEndingWithCharacter:0Ah ; ignore second Ring message :IgnoreStringEndingWithCharacter:0Ah :IgnoreStringEndingWithCharacter:0Ah :IgnoreStringEndingWithCharacter:0Ah :SaveStringEndingWithCharacter:0Ah :CompareWithSavedString:'CONNECT',0Dh,0Ah ; compare saved string with CR :JumpIfCompareNotEqual:1 :OnLine: :Finish: [Make_A_Call] :DropAndRaiseDTR:2 :SendString:'ATS0=0',0Dh ; ; S0= Disable Auto Answer ; :Delay:2 ; Ignore the 'OK' :IgnoreStringEndingWithCharacter:0Ah :IgnoreStringEndingWithCharacter:0Ah :SendString:'ATDT' ; initiate dialing :Delay:1 ; For use with non error correcting modems, the following should be ; replaced with ; :MapPhoneNumberAndDial:'=,' :MapPhoneNumberAndDial:'W,' ; The W is the tandem dial (equals) ; or wait for second dial tone character ; The comma is the pause (tilde) S8 seconds before next character :Delay:1 :SendString:0Dh ; starts dialing process :IgnoreStringEndingWithCharacter:0Ah :SaveStringEndingWithCharacter:0Ah :CompareWithSavedString:'CONNECT',0Dh,0Ah :JumpIfCompareNotEqual:1 :OnLine: :Finish: ;--------------------------------------------------------------- {UDS-V3227} ;--------------------------------------------------------------- ; UDS V.3227 ; lGlamb R5.3 930924 Version 1.4 ;--------------------------------------------------------------- ; WARNING ; This script intializes the modem to use error correction and data ; compression protocols (both MNP and V.42). ; This may cause problems when attempting to establish a link with ; modems not supporting these protocols. ; This script is also set to use TONE dial only. ; ; The following guidlines will work with many older non MNP or V.42 modems ; ; When CALLING a modem known to not support these protocols: ; Add the following before the number to dial ; ; \N0DT ; ; = backspace = 08h ; ; When being CALLED by a modem not supporting these protocols: ; Have the REMOTE site wait at least 5 seconds after getting CONNECT message ; before sending user data. ; In Modem Service this typically means adding :DELAY:5 ; before the :OnLine: command in the Make_A_Call script. ; ; :JumpIfCompareNotEqual:1 becomes :JumpIfCompareNotEqual:2 ; :OnLine: :Delay:5 ; :Finish: :OnLine: ; :Finish: [Reset_Modem] :DropAndRaiseDTR:2 ; drops DTR wait 2 sec then raise DTR again :SendString:'AT&F',0Dh ; Load factory configuration #1 ; Async with V.42 bis ; Contains ; LAPM and MNP Enabled ; Data Compression Normal ; Constant speed DTE ; No Protocol response codes ; XON/XOFF flow control ; 8/N/1 ; IGNORE DTR ; DCD HIGH ; CTS HIGH ; DSR HIGH ; Answer on 1 Ring ; Call Timeout 30 sec ; Speaker on MED until CD ; ;Not the best option selection for Modem Service but it does get ;us to a known state. ; :Delay:2 ; Ignore the 'OK' :IgnoreStringEndingWithCharacter:0Ah :IgnoreStringEndingWithCharacter:0Ah ; ;Many of those options cause problems so here we set them the way ;we want them. Actually we'll reset the important ones so we ;aren't impacted by possible factory changes and script may work ;for other modems as well ; First a couple of registers :SendString:'ATS0=0S2=128S25=50',0Dh ; ; S0=0 Don't answer if DTR up for now. ; S2=128 Disable escape sequence so we can read data which might ; contain it ; S25=50 Set DTR drop detect to .5 seconds. Required if DCI ; applications are to be supported ; :Delay:2 ; Ignore the 'OK' :IgnoreStringEndingWithCharacter:0Ah :IgnoreStringEndingWithCharacter:0Ah ; Now set the main environment :SendString:'ATE0V1X0&C1&D2&S%C1\C1\J\N7\V\Q3',0Dh ; ; ; E0 Echo OFF ; V1 Response messages not codes ; X0 Simple CONNECT message (no speed indicated) ; &C1 DCD follows carrier ; &D2 DTR drop causes disconnect ; &S DSR always ON ; %C1 Enable Data Compression (MNP5 or V.42vis) ; \C1 Buffer Data ; NOTE: the \C1 option is critical if modem ; is to talk with non V.42 modems ; \J Constant Speed DTE ; \N7 LAPM, MNP or NORMAL mode ; NOTE: the \N7 option may vary with other modem ; styles. ; \V1 Disable Protocol Response Codes ; \Q3 RTS/CTS flow control (see below) ; :Delay:2 ; Ignore the 'OK' :IgnoreStringEndingWithCharacter:0Ah :IgnoreStringEndingWithCharacter:0Ah ; Now just a couple things people may have personnal preference on :SendString:'ATM0L1',0Dh ; ; M0 Turn off speaker or M1 to turn on for testing ; L1 or at least set the volume LOW ; :Delay:2 ; Ignore the 'OK' :IgnoreStringEndingWithCharacter:0Ah :IgnoreStringEndingWithCharacter:0Ah ; :SetLineControl:2 ; Set up bytestream flow control to RTS/CTS to match ; the \Q3 above. This allows us to talk to the modem ; at a constant rate even if the connection rate ; is lower. :DropDTR: ;Extra precaution against accidental answer :Finish: ;reset modem completed [Wait_For_Call] :DropAndRaiseDTR:2 :SendString:'ATS0=2',0Dh ; ; S0=2 Answer on Ring 2 (required in some countries) :Delay:2 ; Ignore the 'OK' :IgnoreStringEndingWithCharacter:0Ah :IgnoreStringEndingWithCharacter:0Ah :WaitForCarrier: ; Wait for CD to go high ; ignore the Ring message :IgnoreStringEndingWithCharacter:0Ah :IgnoreStringEndingWithCharacter:0Ah ; ignore second Ring message :IgnoreStringEndingWithCharacter:0Ah :IgnoreStringEndingWithCharacter:0Ah :IgnoreStringEndingWithCharacter:0Ah :SaveStringEndingWithCharacter:0Ah :CompareWithSavedString:'CONNECT',0Dh,0Ah ; compare saved string with CR :JumpIfCompareNotEqual:1 :OnLine: :Finish: [Make_A_Call] :DropAndRaiseDTR:2 :SendString:'ATS0=0',0Dh ; ; S0=0 Disable Autoanswer to avoid call conflict :Delay:2 ; Ignore the 'OK' :IgnoreStringEndingWithCharacter:0Ah :IgnoreStringEndingWithCharacter:0Ah :SendString:'ATDT' ; initiate dialing :Delay:1 :MapPhoneNumberAndDial:'W,' ; The W is the tandem dial (equals) ; or wait for second dial tone character ; The comma is the pause (tilde) S8 seconds before next character :Delay:1 :SendString:0Dh ; starts dialing process :IgnoreStringEndingWithCharacter:0Ah :SaveStringEndingWithCharacter:0Ah :CompareWithSavedString:'CONNECT',0Dh,0Ah :JumpIfCompareNotEqual:1 :OnLine: :Finish: ;--------------------------------------------------------------- {USR-DUAL} ;--------------------------------------------------------------- ; USR Courier HST DUAL ; lGlamb R5.3 930924 Version 1.3 ;--------------------------------------------------------------- ; WARNING ; This script intializes the modem to use error correction and data ; compression protocols (both MNP and V.42). ; This may cause problems when attempting to establish a link with ; modems not supporting these protocols. ; This script is also set to use TONE dial only. ; ; The following guidlines will work with many older non MNP or V.42 modems ; ; When CALLING a modem known to not support these protocols: ; Add the following before the number to dial ; ; &M0DT ; ; = backspace = 08h ; ; When being CALLED by a modem not supporting these protocols: ; Have the REMOTE site wait at least 5 seconds after getting the ; CONNECT message before sending user data. ; In Modem Service this typically means adding :DELAY:5 ; before the :OnLine: command in the Make_A_Call script. ; ; :JumpIfCompareNotEqual:1 becomes :JumpIfCompareNotEqual:2 ; :OnLine: :Delay:5 ; :Finish: :OnLine: ; :Finish: [Reset_Modem] :DropAndRaiseDTR:2 ; drops DTR wait 2 sec then raise DTR again :SendString:'AT&F',0Dh ; Load factory configuration ; ;Not the best option selection for Modem Service but it does get ;us to a known state. ; :Delay:2 ; Ignore the 'OK' :IgnoreStringEndingWithCharacter:0Ah :IgnoreStringEndingWithCharacter:0Ah ; ;Many of those options cause problems so here we set them the way ;we want them. Actually we'll reset the important ones so we ;aren't impacted by possible factory changes and script may work ;for other modems as well ; First a couple of registers :SendString:'ATS0=0S2=128',0Dh ; ; S0=0 Disbable Auto Answer for now ; S2=128 Disable escape sequence so we can read data which might ; contain it ; NOTE the following register is NOT supported so use of this modem ; with DCI application is questionable ; S25=50 Set DTR drop detect to .5 seconds. Required if DCI ; applications are to be supported ; :Delay:2 ; Ignore the 'OK' :IgnoreStringEndingWithCharacter:0Ah :IgnoreStringEndingWithCharacter:0Ah ; Now set the main environment :SendString:'ATE0V1&C1&D2&S&B1&K1X0&A0&H1&M4',0Dh ; ; ; E0 Echo OFF ; V1 Response messages not codes ; &C1 DCD follows carrier ; &D2 DTR drop causes disconnect ; &S DSR always ON ; &B1 Fixed DTE speed ; &K1 Enable Data Compression if DTE rate higher than line ; X0 Simple result codes (CONNECT) ; &A0 No ARQ codes ; &H1 RTS/CTS flow control (see below) ; &M4 ARQ or NORMAL mode ; :Delay:2 ; Ignore the 'OK' :IgnoreStringEndingWithCharacter:0Ah :IgnoreStringEndingWithCharacter:0Ah ; Now just a couple things people may have personnal preference on :SendString:'ATM0L1',0Dh ; ; M0 Turn off speaker or M1 to turn on for testing ; L1 or at least set the volume LOW ; :Delay:2 ; Ignore the 'OK' :IgnoreStringEndingWithCharacter:0Ah :IgnoreStringEndingWithCharacter:0Ah ; :SetLineControl:2 ; Set up bytestream flow control to RTS/CTS to match ; the &H3 above. This allows us to talk to the modem ; at a constant rate even if the connection rate ; is lower. :DropDTR: :Finish: ;reset modem completed [Wait_For_Call] :DropAndRaiseDTR:2 :SendString:'ATS0=2',0Dh ; ; S0=2 Answer on Ring 2 (required in some countries) ; :Delay:2 ; Ignore the 'OK' :IgnoreStringEndingWithCharacter:0Ah :IgnoreStringEndingWithCharacter:0Ah :WaitForCarrier: ; Wait for CD to go high ; ignore the Ring message :IgnoreStringEndingWithCharacter:0Ah :IgnoreStringEndingWithCharacter:0Ah ; ignore second Ring message :IgnoreStringEndingWithCharacter:0Ah :IgnoreStringEndingWithCharacter:0Ah :IgnoreStringEndingWithCharacter:0Ah :SaveStringEndingWithCharacter:0Ah :CompareWithSavedString:'CONNECT',0Dh,0Ah ; compare saved string with CR :JumpIfCompareNotEqual:1 :OnLine: :Finish: [Make_A_Call] :DropAndRaiseDTR:2 :SendString:'ATS0=0',0Dh ; ; S0= Disable Auto Answer ; :Delay:2 ; Ignore the 'OK' :IgnoreStringEndingWithCharacter:0Ah :IgnoreStringEndingWithCharacter:0Ah :SendString:'ATDT' ; initiate dialing :Delay:1 :MapPhoneNumberAndDial:'W,' ; The W is the tandem dial (equals) ; or wait for second dial tone character ; The comma is the pause (tilde) 2 seconds before next character :Delay:1 :SendString:0Dh ; starts dialing process :IgnoreStringEndingWithCharacter:0Ah :SaveStringEndingWithCharacter:0Ah :CompareWithSavedString:'CONNECT',0Dh,0Ah :JumpIfCompareNotEqual:1 :OnLine: :Finish: ;--------------------------------------------------------------- {Vadic} ; Racal-Vadic VA212 ; Async 1200 [Reset_Modem] :DropAndRaiseDTR:2 :SendString:05,0DH ; sends Cntrl-E CR to get attention :Delay:1 :IgnoreStringEndingWithCharacter:0AH :SaveStringEndingWithCharacter:0AH :CompareWithSavedString:'DY' ; check if it is READY :JumpIfCompareNotEqual:3 :SendString:'I',0DH :Delay:2 :SendString:05,0DH :IgnoreStringEndingWithCharacter:'*' :SendString:'O',0DH ; the following programs the needed options ; such as transperant mode etc. :IgnoreStringEndingWithCharacter:0AH :IgnoreStringEndingWithCharacter:0AH :SendString:'1',0Dh ; selects standard options :IgnoreStringEndingWithCharacter:0AH :IgnoreStringEndingWithCharacter:0AH :SendString:'3',0DH ; options are set to default values :IgnoreStringEndingWithCharacter:0AH :IgnoreStringEndingWithCharacter:0AH :SendString:0DH ; send CR to program it in :IgnoreStringEndingWithCharacter:'*' :SendString:'O',0DH ; now we are going to program needed options :IgnoreStringEndingWithCharacter:0AH :IgnoreStringEndingWithCharacter:0AH :SendString:'24',0Dh ; selects call progress detect :IgnoreStringEndingWithCharacter:0AH :IgnoreStringEndingWithCharacter:0AH :SendString:'2',0DH ; call progress dectect is disabled :IgnoreStringEndingWithCharacter:0AH :IgnoreStringEndingWithCharacter:0AH :SendString:'25',0DH ; failed call delay select :IgnoreStringEndingWithCharacter:0AH :IgnoreStringEndingWithCharacter:0AH :SendString:'1',0DH ; program it to 30 seconds :IgnoreStringEndingWithCharacter:0AH :IgnoreStringEndingWithCharacter:0AH :SendString:'16',0DH ; carrier detect :IgnoreStringEndingWithCharacter:0AH :IgnoreStringEndingWithCharacter:0AH :SendString:'2',0DH ; program it to normal :IgnoreStringEndingWithCharacter:0AH :IgnoreStringEndingWithCharacter:0AH :SendString:'1',0DH ; disable options :IgnoreStringEndingWithCharacter:0AH :IgnoreStringEndingWithCharacter:0AH :SendString:'2',0DH :IgnoreStringEndingWithCharacter:0AH :IgnoreStringEndingWithCharacter:0AH :SendString:0DH ; send CR to program it in :IgnoreStringEndingWithCharacter:'*' :SendString:'I',0DH ; sends IDLE command to modem :IgnoreStringEndingWithCharacter:0AH :SaveStringEndingWithCharacter:0AH :CompareWithSavedString:'LE ',0DH,0AH ; look for response (IDLE CR,LF) :Finish: [Wait_For_Call] :WaitNoStringReturn: :OnLine: :Finish: [Make_A_Call] :Delay:3 :SendString:05,0DH ; sends Cntrl-E, CR to get attention :Delay:1 :IgnoreStringEndingWithCharacter:0AH :IgnoreStringEndingWithCharacter:'*' :SendString:'D',0DH ; sends D to initiate dialing :IgnoreStringEndingWithCharacter:0AH :IgnoreStringEndingWithCharacter:0AH :MapPhoneNumberAndDial:'K' ; map phone number, pause character is K :SendString:0DH,0DH ; here we are just ignoring strings ; returned from modem :IgnoreStringEndingWithCharacter:0AH :IgnoreStringEndingWithCharacter:0AH :IgnoreStringEndingWithCharacter:0AH :SaveStringEndingWithCharacter:0AH :CompareWithSavedString:'...',0DH,00,00,0AH ; compare with (Dialing ......) :JumpIfCompareNotEqual:1 :IgnoreStringEndingWithCharacter:0AH ; ignoring the response (Answer Tone, etc.) :SaveStringEndingWithCharacter:0AH :CompareWithSavedString:'LINE ',0DH,0AH ; finally we are going to compare with ; ONLINE CR,LF :JumpIfCompareNotEqual:3 ; if not equal then jumps 2 commands :IgnoreStringEndingWithCharacter:07h ; ignore bell char :Delay:2 :OnLine: :IgnoreStringEndingWithCharacter:'*' ; here we have to make the modem IDLE again ; as the modem is not connected :SendString:'I',0DH :IgnoreStringEndingWithCharacter:0AH :IgnoreStringEndingWithCharacter:0AH :Finish: ;--------------------------------------------------------------- {Ventel31} ; Ventel MC1200-31 [Reset_Modem] :DropAndRaiseDTR:3 :SendString:0DH :Delay:1 :SendString:0DH ; sends CR, CR to get attention ; same as Bizcomp :IgnoreStringEndingWithCharacter:'$' :SendString:'L' :IgnoreStringEndingWithCharacter:'?' :SendString:'S' :IgnoreStringEndingWithCharacter:':' :SendString:0Dh :IgnoreStringEndingWithCharacter:'$' :Finish: [Wait_For_Call] :SendString:'Q' ; sends Q for QUIT :IgnoreStringEndingWithCharacter:'T' ; gets the response from modem back :WaitNoStringReturn: ; same as cermetek :OnLine: :Finish: [Make_A_Call] :SendString:'K' :Delay:2 :MapPhoneNumberAndDial:'&%' :SendString:0DH, ; dialing process by sending ; K... phone number.., CR ; e.g. :IgnoreStringEndingWithCharacter:0AH :IgnoreStringEndingWithCharacter:0AH :IgnoreStringEndingWithCharacter:0AH ; here we ignore response strings from ; the modem :SaveStringEndingWithCharacter:0AH :CompareWithSavedString:'!',0DH,0AH ; now we compare with ONLINE ! :JumpIfCompareNotEqual:2 :Delay:2 :OnLine: :Finish: ;--------------------------------------------------------------- {V25BisMilgo} ; Racal-Milgo V.25 Bis mode [Reset_Modem] :DropAndRaiseDTR:2 :Delay:2 :SetDataBits:7 :SetParity:1 :SendString:'DIC',0Dh ; Disregard Incoming Call :IgnoreStringEndingWithCharacter:0Ah :IgnoreStringEndingWithCharacter:0Ah ; :Delay:2 :Finish: [Wait_For_Call] :SendString:'CIC',0Dh ; Connect Incoming Call :IgnoreStringEndingWithCharacter:0Ah :IgnoreStringEndingWithCharacter:0Ah :WaitForConnectMsgAndIgnore:0Ah :SaveStringEndingWithCharacter:0Ah :CompareWithSavedString:'INC',0Dh,0Ah ; compare saved string with INC,CR,LF :JumpIfCompareNotEqual:5 :WaitNoStringReturn: ; Wait for CD :SetLineControl:2 :SetDataBits:8 :SetParity:0 :OnLine: :Finish: [Make_A_Call] :SendString:'CRN T' ; Call Request Tone dial :Delay:1 :MapPhoneNumberAndDial:'<:' ; < is the pause character ; colon is the delay character :Delay:1 :SendString:0Dh ; starts dialing process :IgnoreStringEndingWithCharacter:0Ah :SaveStringEndingWithCharacter:0Ah ; Save response :SetLineControl:2 :SetDataBits:8 :SetParity:0 :Delay:1 :WaitForCarrier: ; Wait for CD to go up ; :Delay:2 :OnLine: :Finish: ;--------------------------------------------------------------- {V25BisSema} ; Sematrans 9696 by Phillips 9600 Baud, in V.25Bis format Async [Reset_Modem] ; :Delay:5 :DropAndRaiseDTR:2 ; drops DTR wait 2 sec then raise DTR again ; :Delay:5 :IgnoreStringEndingWithCharacter:20h ; ; Ignore the '> ' prompt ; :SendString:0Dh ; ; Send a CR ; :Delay:5 ; ; :SetDataBits:7 ; :SetParity:1 ; :SendString:'A' ; ; For sync ; :Delay:1 ; :SendString:'A' ; ; For sync ; :Delay:1 ; :SendString:'A' ; ; For sync ; :Delay:1 ; :SendString:'A' ; ; For sync ; :Delay:1 ; :SendString:'AA' ; ; For sync ; :Delay:1 ; :SendString:'AAA' ; ; For sync ; :Delay:1 ; :SendString:'AAAA' ; ; For sync ; :Delay:1 ; :SendString:0Dh ; :IgnoreStringEndingWithCharacter:0Dh ; ; Ignore the CR response ; :SendString:'AT&F',0Dh ; ; Go into V.25 Bis mode ; :IgnoreStringEndingWithCharacter:3Eh ; ; Ignore response ending with greater than ; :SendString:'RCS',0Dh ; ; Recall factory configuration ; :IgnoreStringEndingWithCharacter:3Eh ; ; Ignore response ending with greater than ; :SendString:'PRR P2',3Bh,' 01110000',0Dh ; ; Pulse dial, V.25 bis mode, No display of tel. no. ; :IgnoreStringEndingWithCharacter:3Eh ; ; Ignore response ending with greater than ; :SendString:'PRR P0',3Bh,' 00000000',0Dh ; ; 9600 / 4800 bits/s, No auto fallback ; :IgnoreStringEndingWithCharacter:3Eh ; ; Ignore response ending with greater than ; :SendString:'PRR P1',3Bh,' 10100000',0Dh ; ; Asynchronous, 10 bits ; :IgnoreStringEndingWithCharacter:3Eh ; ; Ignore response ending with greater than ; :SendString:'PRR P3',3Bh,' 01000000',0Dh ; ; 2-wire ; :IgnoreStringEndingWithCharacter:3Eh ; ; Ignore response ending with greater than ; :SendString:'PRR P4',3Bh,' 11000100',0Dh ; ; RTS normal, DTR normal, TxC by modem, Full duplex ; :IgnoreStringEndingWithCharacter:3Eh ; ; Ignore response ending with greater than ; :SendString:'PRR P5',3Bh,' 00000000',0Dh ; ; No test ; :IgnoreStringEndingWithCharacter:3Eh ; ; Ignore response ending with greater than ; :SendString:'PRR P6',3Bh,' 00100000',0Dh ; :IgnoreStringEndingWithCharacter:3Eh ; ; Ignore response ending with greater than ; :SendString:'PRR P7',3Bh,' 00000000',0Dh ; :IgnoreStringEndingWithCharacter:3Eh ; ; Ignore response ending with greater than ; :SendString:'PRR P8',3Bh,' 01010000',0Dh ; ; Echo by modem, 8 data bits, No parity, 1 stop bit ; :IgnoreStringEndingWithCharacter:3Eh ; ; Ignore response ending with greater than ; :SendString:'PRR P2',3Bh,' 01110000',0Dh ; ; Pulse dial, V.25 bis mode, No display of tel. no. ; :IgnoreStringEndingWithCharacter:3Eh ; ; Ignore response ending with greater than ; :SetDataBits:8 ; :SetParity:0 ; :Delay:2 :SetLineControl:2 :Finish: ;reset modem completed [Wait_For_Call] ; :Delay:5 :WaitForConnectMsgAndIgnore:0Ah ; Ignore CR,LF :WaitForConnectMsgAndSave:20h :CompareWithSavedString:'INC',0Dh,0Ah,3Eh,20h ; compare saved string with INC,>, :JumpIfCompareNotEqual:2 :WaitForCarrier: ; Wait for the CD to rise :OnLine: :Finish: [Make_A_Call] ; :Delay:5 :SendString:'CRN ' ; initiate dialing :Delay:1 :MapPhoneNumberAndDial:',' ; The comma is the pause character ; There is no delay character :Delay:1 :SendString:0Dh ; starts dialing process :IgnoreStringEndingWithCharacter:0Ah ; Ignore CR,LF ; :Delay:5 :WaitForCarrier: ; Wait for the CD to rise :Delay:2 :OnLine: :Finish: ;--------------------------------------------------------------- {Direct} ; Direct RS-232 connection (no modem) [Reset_Modem] :DropAndRaiseDTR:1 ; drops DTR wait 1 sec then raise DTR again :Finish: ; oompleted [Wait_For_Call] :OnLine: :Finish: [Make_A_Call] :OnLine: :Finish: ;--------------------------------------------------------------- {DirectCTS} ; Direct RS-232 connection (no modem) with CTS flow control [Reset_Modem] :DropAndRaiseDTR:1 ; drops DTR wait 1 sec then raise DTR again :SetLineControl:2 ; Set CTS flow control :Finish: ; oompleted [Wait_For_Call] :OnLine: :Finish: [Make_A_Call] :OnLine: :Finish: ;--------------------------------------------------------------- {DTRDial} ; Any modem DTR Dial mode [Reset_Modem] :DropDTR: :Delay:2 :Finish: ;reset modem completed [Wait_For_Call] :WaitForSignal:1 ; Wait for Ring Indicator :RaiseDTR: :WaitForCarrier: ; Wait for the CD to rise :OnLine: :Finish: [Make_A_Call] :RaiseDTR: :WaitForCarrier: ; Wait for the CD to rise :Delay:2 :OnLine: :Finish: ;--------------------------------------------------------------- gEndingWithCharacter:3Eh ; ; Ignore response ending with greater than ; :SendString:'RCS',0Dh ; ; Recall factory configuration ; :IgnoreStringEndingWithCharacter:3Eh ; ; Ignore response ending with greater than ; :SendString:'PRR PModemServiceStatusObjIO version X2.4~DATAFH5ModemServiceStatus M  K                                                               DTRDSR             CTSDCD             MKK       1      2      3      4            B K@@@@@@@@@K@TitleChannelNameTypeBaudStateStatusClient ClientNames܊tter than ; :SendString:'RCS',0Dh ; ; Recall factory configuration ; :IgnoreStringEndingWithCharacter:3Eh ; ; Ignore response ending with greater than ; :SendString:'PRR PGW=@_U0 p* &x&i{0Copyright 1992 Unisys Corporation. All rights reserved.Ver s5.3.06/aUS Linker 12.2.0` p ?@O"?##$p%  /Nvffff/fzfffff0F_t Tg'84A]v S  R/0 C c  ff MfSfff7fBf1?g p`I`QQ\ % 9 B,y+# @s[sys]ModemMsg.bin[!sys]ModemMsg.binLCannot access message file [sys]ModemMsg.bin or [!sys]ModemMsg.binError 2624: msg= %0N maxlen= %1N^ s5.3.06/aUSD` uPGP`=$uPGPP 6`(UDP(FF̃ w?WPbPAPFPF u>btPGPPFuPPFP/F u^&GF&G F~uDPPFP/F u+@PPFP/F uFF^&N܉Fރ~uGPPFPF u~F%FаFF΋FHN;rT^܋&@%;Fu7PFP F u PFFι^&HFFuFrF)~u!vҸPNQPF u^&G~uvҚF u vҚFF]U]U]UQF u(SP+F uSP+F]UQPP*F u]PP*F uHPPRPPSPSPCF=uF'F u]U(PPPF uN(QF uFHN;rmQRPPPPFPF uJ+FH9v'5NF^㡮FuF]UF>t=t P  ]U~u] vFP,F uqv~N^Y~u ЉFVsjjj ^SvN$F,jjFP/F uF^&G Z&W F&GF^SvFv U+Zr tH]j&j^S/ u ^& +ZrHU3 &L&;Wt]U#tH3&GtH]U츢Pj<]~F^ &^SMPvFPF uFt^ &FFF~NuV~u ^&P ~u^&7P^ S~u8^&w&7P^ SF^~Hu2Ft tuS^SvP^ SF^~Du_~uFPF~u^&&WFV, PRPvvvPj ^ SFF^^S^ &7^Svv^SFU츢PjLZ%+ &* ,P6)"|)1)0)0)1/)/`)@ABC D EFG"H*I?JUK XLeM kN vOPQRS TUVWXYZ[\ ] ^ _ `ab-c2dAeGffgjh|ijkl mnop q r s0 tJ u X v c w l xy y z { | } ~      , 2> 7p    % 8 G N U \ c j q :x              " !< <] +   ,  3 J K L M $N Reboot the system before installing.System services must be installed before the Context Manager. Access denied in reading file.Not enough memory (Error 400). No free exchanges (Error 410). Not enough memory (Error 430). Modem is not responding (Error 602). Modem is not responding (Error 2347). Communications line is in use (Error 8401). Cannot reset modem (Error 10550). Modem name missing in config file (Error 10675). Line spec missing in config file (Error 10676). Baud rate missing in config file (Error 10677). Telephone Server is not installed (Error 10695). Modem Service already installed (Error 10696). Cannot connect (Error 10751). Modem Service InstalledModem Service deinstalled.Modem Service is not installed.ModemServiceModemNameLineSpecToneDialBaudRate300/1200_Speed_Adjust1200/2400_Speed_AdjustDciAsyncDSRCheckFinishDCIWaitTimeReserved1[sys]ModemService.configLine_1yesDirect~Switched[COMM][COMM]0[COMM]1[COMM]2012DTRDialReserved4Reset_ModemWait_For_CallMake_A_CallAbortWithErrorCodeCompareWithSavedStringDelayDropAndRaiseDTRFinishIgnoreStringEndingWithCharacterJumpJumpIfCompareEqualJumpIfCompareNotEqualMapPhoneNumberAndDialOnLineSaveStringEndingWithCharacterSendStringSendStringIfToneDialWaitNoStringReturnWaitStringReturnDropDTRRaiseDTRWaitForConnectMsgAndSaveWaitForConnectMsgAndIgnoreWaitForCarrierSetDataBitsSetParityWaitForSignalSetLineControlReserved5Reserved6Reserved7Reserved8Reserved9Reserved10Reserved11Reserved12[!sys]sys.modems[sys]sys.modemsWrong command string ==> Wrong Header string ==> Quote Missing ==> Modem file allows upto 64 entries for each sectionModem file allows upto 1024 characters for each sectionBad Number format ==> Bad error code ==> No such modem name in fileModem name exceeds 12 characters ==> M O D E M S E R V I C E S T A T U SCHANNELNAME TYPE RATE STATE STATUS CLIENTS N A M E S O F C U R R E N T C L I E N T SNONEIDLERECEIVINGRESETWAITINGCALLINGSENDINGINPUT LINEWAITINGEDIT LINERELEASEDIDLEWAITINGCALLINGON LINEOK[!sys]ModemServiceStatus.form[sys]ModemServiceStatus.formPress MARK to select, or NEXT PAGE to view more Modem Lines.Press A to activate or R to release a line.Line already activated.Line already released.Cannot release line for Single Partition OS.Releasing the line ...Activating the line ...ARarCannot DeInstall with active Clientsv^S^ &7vFP^S)F u)^ F&DFs^ &7^&^ &bFF^FNN^FFPj ,Pj!FPjPFP; ------------------------------------------------------------- ; | This configuration file is used by the Modem Service at the | ; | time of installation. The information necessary for each | ; | line is grouped under a line number name enclosed in square | ; | brackets. The lines must be ordered sequentially, starting | ; | with [Line_1]. Any text after a semicolon (;) on a line is | ; | considered to be a comment, and is ignored. | ; | | ; | This sample configuration file contains "commented out" | ; | configurations for three lines. The first is a modem line | ; | using a Hayes 2400 modem. The second is a direct connection | ; | using a crossed RS-232 cable. The third is a modem line | ; | using any modem that does DTR dialing. This file should be | ; | edited to conform to your system requirements. | ; | Note: "Direct" and "DTRDial" are reserved modem names. | ; ------------------------------------------------------------- ; ;[Line_1] ; ; :ModemName: 'Hayes2400' ; ; Name of the modem being used with this line. Must ; ; be one of the names in the sys.modems file. ; ; :LineSpec: '[Comm]b' ; ; The Line Specification consists of two parts. The ; ; first is the line type. [Comm] is default, it need ; ; not be specified. The second is the channel ; ; indicator (a, b, 1, 2, etc.). ; ; :ToneDial: 'yes' ; ; If your phone system accepts only pulse (rotary) ; ; dial, enter 'no' here. Entry not required for ; ; Direct and DTRDial type. ; ; :1200/2400_Speed_Adjust: 'no' ; ; If 'yes', then Modem Service will adjust to the ; ; baud rate of an incoming call. Requires special ; ; cable. Do not enter 'yes' unless you have this ; ; cable. Entry not required for Direct or Phone type. ; ; This parameter is optional, if not specified Modem ; ; Service defaults to value No. ; ; :BaudRate: '2400' ; ; This is the baud rate the comm channel will be ; ; running at. Should be 300, 1200, 2400, 4800, or ; ; 9600 for modems, 150-19200 for Direct. ; ; :Dci: 'No' ; ; If 'yes' then the Modem Service client on this line ; ; must use the Direct Communications Interface. This ; ; parameter is optional, if not specified Modem Service ; ; defaults to value No. ; ; :AsyncDSRCheck: 'No' ; ; If 'yes' it indicates that the modem normally leaves ; ; CD On, and uses DSR to indicate presence or absence of ; ; of carrier. This should be 'yes' for most V.25bis ; ; modems. This parameter is optional, if not specified ; ; Modem Service defaults to value No. ; ; :Finish: ; ; Each line must be terminated with Finish. ; ; ;[Line_2] ; ; :ModemName: 'Direct' ; :LineSpec: '[Comm]A' ; :BaudRate: '4800' ; :Finish: ; ; ;[Line_3] ; ; :ModemName: 'DTRDial' ; :LineSpec: '[Comm]1A' ; :BaudRate: '9600' ; :Dci: 'yes' ; :Finish: ; Lines.Press A to activate or R to release a line.Line already activated.Line already released.Cannot release line for Single Partition OS.Releasing the line ...Activating the line ...ARarCannot DeInstall with active Clientsv^S^ &7vFP^S)F u)^ F&DFs^ &7^&^ &bFF^FNN^FFPj ,Pj!FPjPFPGWY F 4` Pt&i{FCopyright 1992 Unisys Corporation. All rights reserved.Ver s5.3.06/aUS Linker 12.2.0 %() :O 0;OD]b?d ep@t_tP?@?PPoO`p G1E  F0 /5,0F_tWO{A" T    .  Yq9^a qbBozoooo>N%NaD   %KUKK)KfKKKKKKK;jq \    ' _   '/0Cc}n$T5fIQT0    < s   * f    K a  {8 4 A ] v      S      R 6 ,R oK 6 G R _ &11A~(Fh|nlX r    / \    @ Z     D q    Ou$)/4:?EJPU[`fy~="t:Ii/Ot!3Aguby 1 <\8&Kk1BawH  m     i   Pj1-d*0ty]j-Ajooho0FBS&5:~[ L b      KKKK1KKKKK KCbhrdjTy-3dy\b< B   ! P V      / g     #gY[-LcB gnya    p  `  I `   Q   Q    \       %     9        B    , y     + 6 @sCharacter:2. TitleChannelNameTypeBaudStateStatusClientClientNamesTitleChannelNameTypeBaudStateStatusClientClientNames[sys]ModemMsg.bin[!sys]ModemMsg.binLCannot access message file [sys]ModemMsg.bin or [!sys]ModemMsg.bin060D01DATAABCDEFGHIJKLMNOPQRSTUVWXYZ0abcdefghijklmnopqrstuvwxyzPMandatory fieldInvalid cursor movementField overflowIllegal function keyReserved characterText characters onlyAlphanumeric characters onlyAlphabetic characters onlyNumeric characters onlySign cannot be inside a number No such valueNo help message No list of values for this field Invalid dataYesNo062A01060A01Character.060A01.   060A01062F01062C01060A01062F01 Binary CharacterRFlagB060A01060A01062F01Error 2624: msg= %0N maxlen= %1N^ s5.3.06/aUS060A01  ?*<0@A061A01060A01 UQQF~t FF;FrF FFuF]U^&F^ &F^ v&8 u 9vrFF;FsFF^ v&8 t 9vrFF;FsF^ vP^ GPF+PF+F^ &^ &?w!F^ &N;r&<0r<9vBFuF^ &ȴN;r%&+&,0PQY^&Fuʰ]UF 1VF 11VF d11VF 11VF '11VtF(~tF~tF~tFFFȈFFF:FwNJ0^&NFuيF^&]U]U]UQhDF u(tSP+F upSP+F]UQPpP*F u]PtP*F uHPPRPPtSPpSPCDF=uF'F uh]U(PPxPF uNx(zQF uFHN;rmQRPPPPFPDF uJz+FHz9xv'5zNFz^zꉇFuF]U F FjFFFsFFFw"WvFPFP PtFFu֋F]UN ~KPPPFPKPFPPP^GP^&PF]UQPSlF]UQRSlF]U T+FF ؍^^G<t<u^&o^&_˷^㋟^F~^&N^&F^&]U&F؍F^\SlFPFvFPFPFڴP^GP^&GPF=)u"TSlF4FPFF]U*F؍F^ZSlFvFPFPFִP F tG=)uV ~)u X^^v( ^SlF4F PF PFF]UQQF 9N r v ~^/ ~ N +@1F^8v FYF] U^ sF P FXFjNNF^&GsFPvvFPPFF^&GsFPvvFPPFF^&GsFPvvFPPFF^&GsFPvvFPPF]U ^SvFPFPv vFP PF] U4T+FFF<vJ؍F،^ڿWVRPQFPF tFұ FjF^&Fӊ^ҷƇ^&G<t<un^ҷƇvvFPPF^&G<t<u^&o^&_˷^㋟^֋FPvGPPFF@Pv^؍GP^&GPF^&wFP>FPvFPF̴PFF t =)uFFtF]U4FF<vWPFPPFPFFӴ FjF~tFԃ v..DWj}vv,GPJvv.GPvv0GPvv2GPvv4GPpvv6GP]vv8GPJvv:GP7vvGPvv@GPPF~u0^ӷs>vSƇLF@PvJGP,^ӷƇv֍FP>F@PvFPFʹPFvӍFPA~)uFȴ@F!t&PFP>F@PvFPFʹPFF u FtF]UpFF<v7WPFPAPFPF tF FjNjVV0VQPFPPFF~w6vv P PFPvvP PtFFFuġjF~tvFFȴN;rc Z^Ԍ^vvGPPFvzvPvvP PtFFFu ~)u FtF]UQnPPF un<t<t <tllF]UFFw ƇFuPPlPPPFPJF u PPlAQPWWPPPPPKF~uRPvLFF]UFPNGPPRPPrmPF tvNG PPPPF uPPPPF~t}P*PPPGPPPsFP/PPPGPPPsFP6PPPGPPPsFP:PPP GPPPsFP>PPP"GPPPsFPBPPP$GPPPsFPGPPP&GPPPsFPMPPP(GPPPsFPSFPLGPPRPPrmPF tvLG PPPPF uPPPPF~tP^PPPGPPPsFPcPPPGPPPsFPjPPPGPPPsFPnPPP GPPPsFPrPPP"GPPPsFPvPPP$GPPPsFP{PPP&GPPPsFPPPP(GPPPsFPP PP*GPPPsFv F~uFF]U^G`GbGdGFPFP6F u=~uso~uPPFmF< t<t+;w>u+FF<wƇFuN~u6PFp~u8s-PPF0~u0H;wrQPFPgF:t:u 6uUF:t:u 6;~u86PF;t<u6PFF u~v FF~u PFFF u=]UQQP( F P(  P(  P( NP( P( P( PPMP( FP ]UF ;Fu F ;Fu]UQQ~S^ S^SvFPLF u ~u] U^ &^&:t^ GP^GP^ &P]UF ;Fvv ~N^v ~N^NOY] UF ;Fvv ~N^v ~N^NNOOY] UvFPN Q#RPQ^SvB u^&;Fvv]UNdždždžPu^PF8Fu]UQ^ PPF^ v&>uP^SFPsFFѰ]U^ PDFFFF:Fw>t^ PDFNs N^;st^&V*uF&>jFnu+JVt J&F>jFnu+JVt J&FF:FtFFLFFF^;s^&8*u& Fs F^F]UQQF>uV^ PP^ PD:F u3^ PF^ PD:Fu^ PD:FuFF룰]U>t^PFuP^SFPF^PFNr"^PDF뷀~utn] UQQ>us^PFuPDFVN;w^ ;v +ʋ^ &FË] U^ G F^GWFVvFPFPFPFP^ PFY$FVRP^ PDFF~%sg^v&8u &%tT1^v&ÉFPv!s^F@F؋]FFFF%;r)N듋FFFN;w)NGU^FNFFFFF~tP^ F^ NV´3ЉVVŠ^3ӉVV3ӉVV3‰FNFN몋F16^ F%1^F16^ F1^^ ?u^?u] U^ G^ GN~+^ O]UQQ^^:t^FFuȈF^@>jnu+JVtSJ&[@^F@>jnu+JVtSJ&[@^FH^:Hun]UQ>tT^tP ^G ^PDF^P^G~u^P ^GF]U>t}^G FGF;r>OW^7G PQwwFP#uu^GF^vFFv^w^O^FG F]UQ^PDF^PDFF]UQ^t>u PDF"s^G t >uu]U<,t .:t^ &GF&GFv FPFPF ue~uF:FwSF*F1F~uF:Fw2F*F1FFFFNNN8Fr8Nsw^ Sz^ &GFFFF:Fs0FFF:Fw^ v^F&$F&N&WVtiFs 8Nv FPFPvFPtFv FPFP^GPFPFFNq^&GĞ&0Ğ&@u ~N] U~.u+JVt2~:Nu+JVuFFF^^&?tdF@NFN&^;uQP~WStNF;v.^PR@+QFPPFPPF tpF^&FNFNFsFNFN^Sv^Sv^ Sv^&S^&FNFN!z]U~ t{~"Nt+JVuFFFF9Fv8^&:"t*0rJ9wEF ^v&0FFN+N^v8"t+JVt|F^&^&]U^&G &G PF^FF&|^^FFFFN&V^&8GsNNF:Fv}FF@FH^&FFF~uF%FF8Ft^&G:FsF8Fu]F^&FF@FH^&FNF;r^vQ^ SPF~U ^ &G &G PF^FF&t^ ^FF&NFF:FvFF@F^&FF܋FFNFN؎]U^&"^ &^&"O^&] UF#^ &#N^ &O]ULEFP,PP( ~u ~uEFsEFHsB FPPP( EsF^&G FF;Fr.^&G FFذ&8u&8Gt Fv&D &D ^&gȋ^FFFFw^&H?0Fu^&G"&W "ѱ&W "ѱ´&G "±&_ "ڱ^&"W´ Gs,0PP@PQRPQRPQd4P( .0PP@QQ#RP+PQd4P( G]FU cF^&G FF&GtMv&D &D ^&gȋ^FF&Ot^FFJPccrJbPc]U"F ^ &G FF^ &G &G v&dȋ^ FF^ &GF&Gv&F^ &G&DF&GF&GF&G u&O ^&G $^&GF&GFF%ĈFt^&G^&GFPPPlP( FFs:^&Gt^GPPP3 8FFPFPFPF% FPFPtP( FFFꢉKFsFFP5F tbs>s7cr0F^߷t":u SP 4P( FNrsF:Ft:F;~u8^&G#t tv&|u ^߷^ Sv ~uТWP8P( ^߷豉":uF:FuF%F ^߷豊":u~uFN^߷tNu^&Nߵ^&O^&GF^&GF^&GF^&GF|tF:ue^߷tP LFF^ S^&wFPPvᚦFFF9Fv.NQNQN Q^PF uFʸ] UFPFP,F u~ sUPPFP/F um^&G :Fw\F^X ^F&G^ &^&G(FPFPFPGF uF^ &F^&] U~u8vv vlPvF uvv vlPvF] UFt~ uFt<,t .:tZ\XN RTN VFua>Vta<uR6X&` u<uia`Fu(,t.uFFt@Z@Zw4F$^-`<-t<+u >Xt>Zu\@\;^vaXVc>at2!>Vt)R6X&`Fu XVи] UQQ^S^SvvF^SP^ S^Sf]UQQ4P( FP5F u ~u޸]U^&uxFt ^&O I;syoF^&G FF^&G &G v&dȋ^FFF^&Gt&^&tF^Sv^SFfFs ^&G&Gv&^&G&D&G&GFd^v&t 0dFF%ĢtD^&G^&GFꠗȊ^:rdt < t ^&GFuظ$u@s;^&G &G ^0FFFs:^&Gt^GPPP3 8FPPPF% FPPtP( N@ ɱuAN ɱuANFP7P( F$u@^& u&O @^&G u&O ^&G $袟&O "ʈu&"W V^ &FFPFPv>t.qw>uw8u`^&O N*ʈʈNs~tFFF(>uȴ+FFFF蠐rrPPPlF t+ȢQPPlF tP5F t]Fbszs.cr'Ft":tH4P( E8t2<t.<t*<t&u8^&G#t tv&|u ^S ^Sv Fr.NT:u<t<u,>u}:u^>u>t:S>u>uXl>u>tlK<ttguq:u>u tltހ>u<+t<-u>u4b>tV>u >wꢉ:u<tu<t<uU>u:u >uP(>uȢ|tltU>u<+t<-u ^S ma>u>vNF:uru G<t<uX:r5Fsr Pl^&G^&GQrr>ukJ>uP>u G>uPP^S砝<tuТWP8P( ?t ^S&u P P^S8ux8bu SPs#PPP6PP( s ^S=:tr1>t'^&G &G ^9򤠔PPPdPPP( ^Sv^&G^&Gr.FȊ^:rPdt < t ^&GFu2FꠕȊ^:rt < t ^&GFuԠFs&PPPF%8 PPPF%PPtP( PPPlP( ]UbPPQPPtFlPPPlPPF^&8w^&k^&?tbPP,P( > r1PPPP1P؍RPEP( 1>&?u, 9>9Js 4P( FsPPP8 PPPPPtFPk*1PP^GPQFcJ r s1]U츮PP,P(  s s0PPP/P( PPP/P( &G"ȢrGO &O &&T&G"ȢrF&OO &O &&G#s> r/PP6P1P؍RPFP( 16F&?uT&G&G 0F60F]UFF9Fw^ &N^&F:td>jnu+JVtJ&F+>jFnu+JVtJ&FF:FtF Fs] UQs~uHQQQPPP( ss~t:vcPPPQ*ȵQAP( 8wPPPPP( >up<tu PmsƇ # PPP6PP( ~ u :t~ u:us ^S=~ u tȢ ~ u[PPPdPPP( dOuIA:uXȊ:rPPQPPP( >t$tȢ:vu]UQ~ t[s:8wu:v^S=PPPPP( t>u< t>uQȊ:vDs $PPPPP( <+t<-u*ȈNFs*ȈNFPFPPPFPAP( s$F:r^Fu᠈s:rs>uU<+t<-uJr$PPPPP( :t<+t<-usPȴPPPP( >tU:uU>uNs ؊"PPPPP( <+t<-u 4P|PPPQ*ɵQAP( s?*FFF:r^˷S^XFu]Uusn)PPPnPPP( Ȋ:r,nu+JuuǠr t @ut >up!豉":t 豊":u rP+>bu SP^&G^&G]UF.U[u>tsO:s@;s:w+u:u܈N%s:wFȈF~u)PFPPPP( >tusl)PPPlPPP( Ȋ:r,lu+JuuǠs pP^&G^&G]U^. P]U>unrYPPPPP( :u<PPQlPPP( .:tCl*lt+JVu ȴ3ȴl+t-u!ȴllƂl0*ɵmu+JV ulɈsEl؍򤠕Ȋ:rltƂl#uݠPPQlPPP( ]Usj)PPPjPPP( jt+JVuvj<+t<-t}ȴN;v(+HkȰt+JVuGs^򪠔PFPPPPP( ]U젔PPPPP( >uSȊ:ws $PPPPP( <+tO<-uWI8s)QȴPPPP( >uss:t 4P P^S]UQQȢsQPPPP( >t;<+t<-u68s'QȴPPPPAP( F0F~򪠔PPPFtT<+t<-uG8s3ȴQSP#PPP( Ƈ0#~򪠔PPPFPPP( ]UQ>u-^ &?r^&^ &F3^&*F,<t<u$^ &?r&ȈF^ &;s&] U.>u*F,**A*^&^&@,s^&u**^&]UQF tCv ~^YFF HN;r!^&<,t<.u ^v&Fuԋ] U&>JNu+J&>JNu+J>u&>jnu+J>u&>jnu+J]UQQr~"Nt+JVt_^v&F&8t%&:Ft8J6F&8t j&8uF$J6F&8t j&8uF|F~N F ^&]U^&sFF FFFF;FsFv~N^YF^&]UQFFN ;sNv~N^YN F;v+^8"F^&]UQF FN;sNv~N^YF^&]UQQ~ t{~v~N FFFF t4~u9Fu)FHFF 10^v&F1FŋF t N+^0FYF)FF^&]UF>t=t P  ]U~u]U]X[YZSPt tcRQRQS[YZU+Zr tH]j&j^S/ u ^& +ZrHU3 &L&;Wt]U#tH3&GtH]U u. t!;v 33@33.P 3 ҃+@sH]U؋]UN~F V u. t!;v 33@33.P 3 ҃+@sH]UN~F V ؋]U^ S^S,]FFFFFPFFFFPFFFF^FFPFuFF u)vFPFF^&F^ &UF]F%P2FF%P"FF%PFFVU~u~uF]FPF urFFFFNNNNFFMFFFF6FP F u*vFPF u^& Mt^&GFPF u v^S$4 v~Fv FPjRPQRPQRPQ4FF@vWv FPPNQPNQNAQNQP4FFvBv FPFVNQQPQFPQ4FFPF uvvvb4 FPF u vv4FFFFFsFFvRPQ^SjRPQRPQ4FFPF u(v^Sv^Sv^Sv ^Sv4,>u =4F uFFPF tF= r= rF= t = t= ts*v^Sv^Sv^Sv ^SvvZEs'^Sv^Sv^Sv ^Svv*jvv^Sv^Sv^Sv ^Sv\4F hFPjF up~tjEs-hv^Sv^Sv^Sv ^Sv\4(v^Sv^Sv^Sv ^SvF~uCF!> tF tt !tF*~ v~v~v ~vv~ڋNFv~ՋNF~ r'vRPQRPQqPjlPjF~tFF9FvJtlFF t Ⱦq~F t ȍvڿq~u~tI~ r)vqPvlPvRPQRPQFvqPlP44F u,FPF umFڈF۰F܈F݋FFދF؉FF FFFFFFFFFFFFFFF FFFFFFFPF u,v؍FPF u^&G ;F t^&GF~ uN~uNP~uN F Pj@F t˸hPjP,F t˃>h u>js>h v>uf> t_FF~uy>urjvP,F u)=8t =9t=9uFHP@X`F믂>u'> t%`'dfbb&>u =4F ucFP|F u^&G^&uvjP/>u :Fu vQhFFvjhF ue> t[>uv^ S^S4>uv^ S^S4F u#>uv^ S^S 4F u &s6^&uFFFPPNQjRQPRQP5 ^&u<<df "^&7&w&w&w&wtF^&tFF<wH FFߠsRPQ^SjRPQRPQ5 F^ F&@FuFF<wF FFߠsRPQ^SjRPQRPQ5 F^ F&@FuFF<w< FFߠsRPQ^SjRPQRPQ5 Fİ FuF FߠsRPQ^SjRPQRPQ5 FİFF<w: FFߠsRPQ^SjRPQRPQ5 Fİ FuFFߠsRPQ^SjRPQRPQ5 Fİ̊F FߠsRPQ^SjRPQRPQ5 F^ &GȊF FߠsRPQ^SjRPQRPQ5 F^ &GȊF FߠsRPQ^SjRPQRPQ5 F^ &GȊF Fߠs RPSvVQRPSRPS5 F^ &GȊF FߠsRPQ^SjRPQRPQ5 F^ &GȊF FߠsRPQ^SjRPQRPQ5 F^ &GȊF FߠsRPQ^SjRPQRPQ5 F^ &GȊFFߠsRPQ^SjRPQRPQ5 F^ &ȠsRPQ^SjRPQRPQ5 Fhj\P/F uF\& &s#FRPQ^SjRPQRPQ5 ^&8GtB>9t&u"F݊F<wаFu^&^ 0~޵FFF<wB޴PNݵBFuFF<wNЋBFu4^&u,FF<wаFuj^&^ 0~޵FFF<wB޴P@NݵBFuFF<w:ЋBFu FF<wаFu>9u,FF<wаFu>8ud^&u\~v FFF<wB޴P{NݵBFuFF<w>ЋBFu'FF<wаFu FPF u vv4~tvFFFNNF NFF F?F*Fh r>h u>jrHrsv RPQRPQFPjFPj4F uH~u~~vNFv FPjRPQRPQRPQ4F uFPF uv^Sv4UP3P%<]UPP%<]Ub#t4df`&F#t N#N&f3&]U츐Pj<D]~F^ &^S]PvFPTF uFt^ &FFF~NuV~u ^&P ~u^&7P^ SD~u8^&w&7P^ SDF^~Hu2Ft tuS^SvP^ SDF^~Du_~uFPF~u^&&WFV, PRPvvvPj ^ SFF^^S^ &7^Svv^SDFU츐Pj'-5HPInitiateModemCallSetLineParameterEditLine OpenModemLineGetControlInfoReleaseModemLine ReadInputLine)5>ReadModemBytesQueryModemServerStatusAttachToModemServiceAcceptModemCallF4Z'fQ>nRetreiveModemStatusWriteModemBytesDetachFromModemServiceResetModemServer AddModemLineDisconnectModemCallCloseModemLineGetModemServiceEvent RqLablModem!; ;ADDITIONAL MODEM ENTRIES ; ; This appendix contains a source listing of entries for additional modems ; that are not supported. They can be added to your active Sys.Modems ; file as needed. Entries for additional modems are not kept as current with ; manufacturers' changes as are those of the supported modems.) These ; additional modems have been configured by using the ModemGen feature of ; the Modem Service. ; ;Additional Modems (not supported): ;---------------------------------- ; Cermetek InfoMate 212A ; Codex: 2232 or 224 with ACU ; Concord 224 (Answer only) ; Concord 224 (Autodial) ; Dataplex DPX224 (added R5.2) ; NEC N212BR ; Okidata 1200 ; Paradyne 2612 ; RacalVadic 3451 ; RacalVadic VI1222 ; Rixon R212A ; TELiNDUS ASTER 3 (revised R5.3) ; TELiNDUS ASTER 4 (revised R5.3) ; Universal Data Systems 212A/D ; VenTel MDC2123L (with WECO option) ; VenTel MD212 PLUS II ; ; __________________________________________________ ; Cermetek InfoMate 212A (Additional) ; __________________________________________________ {Cermetek} ; Cermetek Info-Mate 212A [Reset_Modem] :DropAndRaiseDTR:2 :SendString:' ' :Delay:1 :SendString:' ' :Delay:1 :SendString:'XY' ; here we send 2 space characters and XY to ; train the modem for right parity.In ; Bizcomp this is done by sending two CR. :Delay:1 ; delay 1 second :SendString:0Eh,'U' ; send unlisten command ; this is the same as ; STX X in Bizcomp for transparent mode. :Delay:1 :SendString:' 1',0Dh ; continuation of unlisten command :IgnoreStringEndingWithCharacter:0Dh ; modem response with CR :Finish: [Wait_For_Call] :WaitNoStringReturn: ; starting point for waiting to be called ; as the modem will not response with any ; characters when connected, we have to use ; WaitNoStringReturn :OnLine: :Finish: [Make_A_Call] :SendString:0Eh,'D' :Delay:1 :SendString:' ',27h ; initiate dialing process by sending D :MapPhoneNumberAndDial:'A' ; maps telephone number and dial :SendString:27h :Delay:1 :SendString:0Dh ; ends with a CR to start dialing process :IgnoreStringEndingWithCharacter:0Dh ; ignore the first string that returns :SaveStringEndingWithCharacter:0Dh ; save the next string :CompareWithSavedString:'A',0Ah,0Dh ; compare with A,LF,CR :JumpIfCompareNotEqual:2 ; if not equal then is not connected ; so go to finish :Delay:2 :OnLine: ; delay for 2 seconds before going online :Finish: ; __________________________________________________ ; Codex: 2232 or 224 with ACU (Additional) ; __________________________________________________ {Codex} ; Codex 2232 or 224 with ACU ; Codex 2232 or 224 with ACU [Reset_Modem] :DropAndRaiseDTR:2 :SendString:05,0Dh ; sends CntlE CR to get attention :IgnoreStringEndingWithCharacter:'*' ; the following programs the needed options :SendString:'O 1 3',0Dh ; reset to factory options :IgnoreStringEndingWithCharacter:0Dh :IgnoreStringEndingWithCharacter:0Dh :IgnoreStringEndingWithCharacter:'*' :SendString:'O 1 2',0Dh ; enable option change :IgnoreStringEndingWithCharacter:0Dh :IgnoreStringEndingWithCharacter:0Dh :IgnoreStringEndingWithCharacter:'*' :SendString:'O 21 2',0Dh ; disable Local Copy :IgnoreStringEndingWithCharacter:0Dh :IgnoreStringEndingWithCharacter:0Dh :IgnoreStringEndingWithCharacter:'*' :SendString:'O 16 2',0Dh ; normal DCD :IgnoreStringEndingWithCharacter:0Dh :IgnoreStringEndingWithCharacter:0Dh :IgnoreStringEndingWithCharacter:'*' :SendString:'O 20 2',0Dh ; disable Local Copy :IgnoreStringEndingWithCharacter:0Dh :IgnoreStringEndingWithCharacter:0Dh :IgnoreStringEndingWithCharacter:'*' :SendString:'O 27 2',0Dh ; wait 4 seconds for dial tone :IgnoreStringEndingWithCharacter:0Dh :IgnoreStringEndingWithCharacter:0Dh :IgnoreStringEndingWithCharacter:'*' :SendString:'O 28 2',0Dh ; pause 6 seconds for Tandem dial tone :IgnoreStringEndingWithCharacter:0Dh :IgnoreStringEndingWithCharacter:0Dh :IgnoreStringEndingWithCharacter:'*' :SendString:'I',0Dh ; sends IDLE command to modem :IgnoreStringEndingWithCharacter:0Dh :IgnoreStringEndingWithCharacter:0Dh :IgnoreStringEndingWithCharacter:0Ah :Finish: [Wait_For_Call] :WaitNoStringReturn: :OnLine: :Finish: [Make_A_Call] :Delay:2 :SendString:05,0Dh ; sends CntlE, CR to get attention :IgnoreStringEndingWithCharacter:'*' :SendString:'D ' ; sends D to initiate dialing:SendStringIfToneDial:'T' :Delay:1 :MapPhoneNumberAndDial:'K','K' ; map phone number, pause character is K :Delay:1 :SendString:0Dh ; here we are just ignoring strings ; returned from modem :IgnoreStringEndingWithCharacter:0Ah :IgnoreStringEndingWithCharacter:0Ah :SaveStringEndingWithCharacter:0Ah :CompareWithSavedString:'LING',0Dh,0Ah ; expect 'DIALING' :JumpIfCompareEqual:1 :AbortWithErrorCode:'10552' :Delay:2 :SaveStringEndingWithCharacter:0Ah :CompareWithSavedString:'TONE',0Dh,0Ah ; expect 'ANSWER TONE' :JumpIfCompareEqual:1 :AbortWithErrorCode:'10551' ; No Answer :Delay:2 :SaveStringEndingWithCharacter:07h :CompareWithSavedString:'LINE',0Dh,0Ah ; finally we are going to compare with ; ONLINE CR,LF :JumpIfCompareNotEqual:3 ; if not equal then jumps 3 commands :Delay:2 :OnLine: :Finish: :IgnoreStringEndingWithCharacter:'*' ; here we have to make the modem IDLE again ; as the modem is not connected :SendString:'I',0Dh :IgnoreStringEndingWithCharacter:0Ah :IgnoreStringEndingWithCharacter:0Ah :Finish: ; __________________________________________________ ; Concord 224 (Answer only) (Additional) ; __________________________________________________ {Concord-Ans} ; Concord 224 (Answer only) [Reset_Modem] :DropAndRaiseDTR:2 ; drops DTR wait 2 seconds then raise DTR again :Finish: ; reset modem completed [Wait_For_Call] :WaitNoStringReturn: :OnLine: :Finish: [Make_A_Call] :AbortWithErrorCode:'10552' ; note no auto dial in this modem :Finish: ; __________________________________________________ ; Concord 224 (Autodial) (Additional) ; __________________________________________________ {Concord} ; Concord 224 (Autodial) [Reset_Modem] :DropAndRaiseDTR:2 ; drops DTR wait 2 sec then raise DTR again :SendString:0Dh :Delay:1 ; delay 1 second :SendString:0Dh :Delay:1 ; delay 1 second :IgnoreStringEndingWithCharacter:0Ah :IgnoreStringEndingWithCharacter:0Ah :IgnoreStringEndingWithCharacter:'>' ; return string CDS > :IgnoreStringEndingWithCharacter:' ' ; ends with a space :Finish: ; reset modem completed [Wait_For_Call] :SendString:'E' ; exit to wait for call :Delay:1 :SendString:0Dh :IgnoreStringEndingWithCharacter:0Ah :IgnoreStringEndingWithCharacter:0Ah :WaitNoStringReturn: :OnLine: :Finish: [Make_A_Call] :SendString:'D ' ; dial please :Delay:1 :SendString:'M' ; use as needed tone or pulse :MapPhoneNumberAndDial:'W' ; put out the number :Delay:1 :SendString:0Dh :IgnoreStringEndingWithCharacter:0Ah :IgnoreStringEndingWithCharacter:0Ah :Delay:3 :IgnoreStringEndingWithCharacter:07h ; gets the bell character :SaveStringEndingWithCharacter:0Ah :CompareWithSavedString:' ',0Dh,0Ah ; compare INITIATING :JumpIfCompareNotEqual:3 :IgnoreStringEndingWithCharacter:'>' ; return string CDS > :IgnoreStringEndingWithCharacter:' ' :AbortWithErrorCode:'10552' :Delay:8 :OnLine: :Finish: ;----------------------------------------------------------------------------- ;Dataplex DPX224 1200/2400 ; ;----------------------------------------------------------------------------- {DATAPLEX} ; ;{Hayes} Modified by Dave Miller/Steve Jacob - UNISYS Australia ; ; This script is written for 2400 bps. To use at 1200 see ; SPEED NOTE in Reset_Modem and ; change the three 'CONNECT 2400' strings to 'CONNECT 1200' in Make_A_Call ; [Reset_Modem] :DropAndRaiseDTR:3 ;Drop DTR, wait then raise DTR again :Delay:6 :SendString:'AT&FF5X6&D2&C1&P1&K0&V1S0=1S7=15S36=3&W'0Dh ;Load modem configuration ;SPEED NOTE: To run at 1200 bps change FF5X in above string to FF4X :IgnoreStringEndingWithCharacter:0Ah :SaveStringEndingWithCharacter:0Ah :CompareWithSavedString:'OK',0Dh,0Ah ;Config loaded OK :JumpIfCompareEqual:2 :IgnoreStringEndingWithCharacter:0Ah :IgnoreStringEndingWithCharacter:0Ah ;Ignore 'OK' ;Delay:4 :Finish: ; Reset Complete [Wait_For_call] :Delay:3 :WaitStringReturn: ; Wait for the phone to Ring :IgnoreStringEndingWithCharacter:0Ah :SaveStringEndingWithCharacter:0Ah :CompareWithSavedString:'RING',0Dh,0Ah ; 'RING' :JumpIfCompareNotEqual:5 :IgnoreStringEndingWithCharacter:0Ah :SaveStringEndingWithCharacter:0Ah :CompareWithSavedString:'00',0Dh,0Ah ; 'CONNECT xx00' :JumpIfCompareNotEqual:1 :Delay:10 :OnLine: :Finish: [Make_A_Call] :Delay:1 :SendString:'ATDU' ; Initiate Dialing (Modem will retry 3 times) :Delay:1 :MapPhoneNumberAndDial:',' ; The Comma is The Pause Character ; There is no Delay Character :SendString:0Dh ; Starts Dialing process :IgnoreStringEndingWithCharacter:0Ah :IgnoreStringEndingWithCharacter:0Ah :IgnoreStringEndingWithCharacter:0Ah :SaveStringEndingWithCharacter:0Ah :CompareWithSavedString:'CONNECT 2400',0Dh,0Ah ; 'CONNECT 2400' :JumpIfCompareEqual:16 ;Connect is successfull :IgnoreStringEndingWithCharacter:0Ah ;Modem trying again :IgnoreStringEndingWithCharacter:0Ah :IgnoreStringEndingWithCharacter:0Ah :IgnoreStringEndingWithCharacter:0Ah :IgnoreStringEndingWithCharacter:0Ah :SaveStringEndingWithCharacter:0Ah :CompareWithSavedString:'CONNECT 2400',0Dh,0Ah ; 'CONNECT 2400' :JumpIfCompareEqual:8 ;Connect is successfull :IgnoreStringEndingWithCharacter:0Ah ;Modem is trying again :IgnoreStringEndingWithCharacter:0Ah :IgnoreStringEndingWithCharacter:0Ah :IgnoreStringEndingWithCharacter:0Ah :IgnoreStringEndingWithCharacter:0Ah :SaveStringEndingWithCharacter:0Ah :CompareWithSavedString:'CONNECT 2400',0Dh,0Ah ; 'CONNECT 2400' :JumpIfCompareNotEqual:2 ;Connect is not successfull :Delay:1 :OnLine: ;We are online!!!! :Delay:1 :Finish: ; ; __________________________________________________ ; NEC N212BR (Additional) ; __________________________________________________ {NEC} ; NEC N212BR [Reset_Modem] :DropAndRaiseDTR:2 ; drops DTR wait 2 secs then raise DTR again :SendString:0Dh :Delay:2 ; delay 1 second :SendString:0Dh :Delay:1 ; delay 1 second :IgnoreStringEndingWithCharacter:'#' :Finish: ;reset modem completed [Wait_For_Call] :SendString:'Q' :Delay:1 :SendString:'Y' ; send Q for QUIT and response with Yes :IgnoreStringEndingWithCharacter:0Ah ; ignore string from modem :WaitNoStringReturn: :OnLine: :Finish: [Make_A_Call] :SendString:'K' ; sends K to initiate dialing :Delay:1 :IgnoreStringEndingWithCharacter:0Ah :MapPhoneNumberAndDial:'$','!' :SendString:0Dh ; starts dialing process :Delay:1 :IgnoreStringEndingWithCharacter:0Ah :SaveStringEndingWithCharacter:0Ah :CompareWithSavedString:'DIALING',0Dh,0Ah ; see if it is response string TONE/PULSE DIALNG :JumpIfCompareNotEqual:5 ; if not then this is an earlier version of NEC :SaveStringEndingWithCharacter:0Ah ; save string ending with LF :CompareWithSavedString:'$',0Dh,0Ah ; now we look and see phone number has pause ; character :JumpIfCompareNotEqual:2 ; if not equal then this string is result :IgnoreStringEndingWithCharacter:0Ah ; ignore second TONE/PULSE DIALING response :SaveStringEndingWithCharacter:0Ah ; and save again the result string from modem :CompareWithSavedString:'ABORTED',0Dh,0Ah :JumpIfCompareNotEqual:1 :AbortWithErrorCode:'10552' :Delay:2 :OnLine: :Finish: ; __________________________________________________ ; Okidata 1200 (Additional) ; __________________________________________________ {Okidata} ; Okidata 1200 modem [Reset_Modem] :DropAndRaiseDTR:2 ; drops DTR wait 2 sec then raise DTR again :SendString:'ATZ',0Dh :Delay:3 ; initializing takes some time :IgnoreStringEndingWithCharacter:0Ah :IgnoreStringEndingWithCharacter:0Ah ; ignore the 'OK' :SendString:'ATM0',0Dh ; set the speaker off :IgnoreStringEndingWithCharacter:0Ah :IgnoreStringEndingWithCharacter:0Ah ;ignore the 'OK' :SendString:'ATS2=128',0Dh ; Disable escape sequence so we can ; read data which might contain the ; escape sequence. :IgnoreStringEndingWithCharacter:0Ah :IgnoreStringEndingWithCharacter:0Ah ;ignore the 'OK' :SendString:'ATS0=1',0Dh ; Answer after 1 ring :IgnoreStringEndingWithCharacter:0Ah :IgnoreStringEndingWithCharacter:0Ah ;ignore the 'OK' :SendString:'ATS9=4',0Dh ; Set carrier detect delay to .4 sec :IgnoreStringEndingWithCharacter:0Ah :IgnoreStringEndingWithCharacter:0Ah ;ignore the 'OK' :SendString:'ATS7=60',0Dh ; Set wait for carrier detect delay to 6 sec :IgnoreStringEndingWithCharacter:0Ah :IgnoreStringEndingWithCharacter:0Ah ;ignore the 'OK' :SendString:'ATS10=50',0Dh ; Set carrier drop check for 5 sec :IgnoreStringEndingWithCharacter:0Ah :IgnoreStringEndingWithCharacter:0Ah ;ignore the 'OK' :SendString:'ATS7=60',0Dh ; wait time for carrier :IgnoreStringEndingWithCharacter:0Ah :IgnoreStringEndingWithCharacter:0Ah ;ignore the 'OK :Finish: ;reset modem completed [Wait_For_Call] :WaitStringReturn: ; WAIT FOR THE PHONE TO RING :IgnoreStringEndingWithCharacter:0Ah :IgnoreStringEndingWithCharacter:0Ah ; Ignore the first 'Ring' echo :Delay:3 :IgnoreStringEndingWithCharacter:0Ah :IgnoreStringEndingWithCharacter:0Ah ; Ignore the 'Connect' response :OnLine: :Finish: [Make_A_Call] :SendString:'ATDT' ; initiate dialing :Delay:1 :MapPhoneNumberAndDial:',' ; The comma is the pause character ; There is no delay character :Delay:1 :SendString:0Dh ; starts dialing process :Delay:2 :IgnoreStringEndingWithCharacter:0Ah :IgnoreStringEndingWithCharacter:0Ah ; Ignore the 'Connect' response :Delay:5 :OnLine: :Finish: ; __________________________________________________ ; Paradyne 2612 (Additional) ; __________________________________________________ {Paradyne} ; Paradyne 2612 [Reset_Modem] :DropAndRaiseDTR:2 ; drops DTR wait 2 sec then raise DTR again :SendString:'%I',0Dh :Delay:3 ; initializing takes some time :IgnoreStringEndingWithCharacter:0Ah :IgnoreStringEndingWithCharacter:0Ah :IgnoreStringEndingWithCharacter:0Ah :SendString:'%M',0Dh ; data mode :IgnoreStringEndingWithCharacter:0Ah :IgnoreStringEndingWithCharacter:0Ah :IgnoreStringEndingWithCharacter:0Ah :Finish: ;reset modem completed [Wait_For_Call] :WaitStringReturn: ; WAIT FOR THE PHONE TO RING :IgnoreStringEndingWithCharacter:0Ah :SaveStringEndingWithCharacter:0Ah ; SAVE RING IN :CompareWithSavedString:'%RING IN',0Dh,0Ah :JumpIfCompareNotEqual:8 :IgnoreStringEndingWithCharacter:0Ah :Delay:1 :SendString:'%a' ; answer the call :Delay:1 :SendString:',' :Delay:1 :SendString:'u 0',0Dh ; important ....here we don't send out ; in one chunk, as the modem cannot handle it ; same as %a,u 0 in one line :IgnoreStringEndingWithCharacter:0Ah :IgnoreStringEndingWithCharacter:0Ah :SaveStringEndingWithCharacter:0Ah ; SAVE THE CONNECT :CompareWithSavedString:'%CONNECT',0Dh,0Ah :JumpIfCompareNotEqual:2 :IgnoreStringEndingWithCharacter:0Ah ; DISREGARD :OnLine: :Finish: [Make_A_Call] :SendString:'%d ' ; sends D to initiate dialing :Delay:2 :MapPhoneNumberAndDial:'P','W' :Delay:1 :SendString:0Dh ; starts dialing process :Delay:2 :IgnoreStringEndingWithCharacter:0Ah :IgnoreStringEndingWithCharacter:0Ah ; ignore echo lines :SaveStringEndingWithCharacter:0Ah :CompareWithSavedString:'%RING',0Dh,0Ah :JumpIfCompareNotEqual:10 :SaveStringEndingWithCharacter:0Ah :CompareWithSavedString:'%RING',0Dh,0Ah :JumpIfCompareNotEqual:7 :SaveStringEndingWithCharacter:0Ah :CompareWithSavedString:'%RING',0Dh,0Ah :JumpIfCompareNotEqual:4 :SaveStringEndingWithCharacter:0Ah :CompareWithSavedString:'%RING',0Dh,0Ah :JumpIfCompareNotEqual:1 ; up to 4 rings :SaveStringEndingWithCharacter:0Ah :CompareWithSavedString:'%CONNECT',0Dh,0Ah :JumpIfCompareNotEqual:9 :IgnoreStringEndingWithCharacter:0Ah :SendString:'%u ' :Delay:2 :SendString:'0',0Dh :IgnoreStringEndingWithCharacter:0Ah :IgnoreStringEndingWithCharacter:0Ah :IgnoreStringEndingWithCharacter:0Ah :Delay:2 :OnLine: :Finish: ; __________________________________________________ ; RacalVadic 3451 (Additional) ; __________________________________________________ {Vadic3451} ; Racal-Vadic 3451 [Reset_Modem] :DropAndRaiseDTR:2 :SendString:05,0Dh ; sends CntrlE CR to get attention :Delay:1 :IgnoreStringEndingWithCharacter:0Ah :IgnoreStringEndingWithCharacter:'*' :SendString:'I',0Dh ; sends IDLE command to modem :SaveStringEndingWithCharacter:0Ah :CompareWithSavedString:'LE',0Dh,0Ah ; look for response (IDLECR,LF) :Finish: [Wait_For_Call] :WaitNoStringReturn: :OnLine: :Finish: [Make_A_Call] :Delay:2 :SendString:05,0Dh ; sends CntrlE, CR to get attention :Delay:1 :IgnoreStringEndingWithCharacter:0Ah :IgnoreStringEndingWithCharacter:'*' :SendString:'D',0Dh ; sends D to initiate dialing :IgnoreStringEndingWithCharacter:0Ah ; Ignore "NUMBER?" :MapPhoneNumberAndDial:'K' ; map telephone number ; pause character is K :SendString:0Dh :IgnoreStringEndingWithCharacter:0Ah ; ignore echoed telephone number :SendString:0Dh ; invoke echoed number :SaveStringEndingWithCharacter:0Ah ; save "DIALING: ON LINE" ; or "DIALING: FAILED CALL" :CompareWithSavedString:'LINE',0Dh,0Ah ; finally we are going to compare with ; ONLINE CR,LF :JumpIfCompareNotEqual:2 ; if not equal then skip 2 commands :Delay:2 :OnLine: :IgnoreStringEndingWithCharacter:'*' ; here we have to make the modem IDLE again ; as the modem is not connected :SendString:'I',0Dh :IgnoreStringEndingWithCharacter:0Ah :Finish: ; __________________________________________________ ; RacalVadic VI1222 (Additional) ; __________________________________________________ {VI-1222} ; Racal-Vadic VI1222 [Reset_Modem] :DropAndRaiseDTR:2 ; drops DTR wait 2 sec then raise DTR again :Delay:1 :Finish: ;reset modem completed [Wait_For_Call] :WaitNoStringReturn: ; WAIT FOR THE PHONE TO RING :OnLine: :Delay:1 :Finish: [Make_A_Call] :SendString:82h ; get dialer ready :Delay:2 :IgnoreStringEndingWithCharacter:0Ah :Delay:2 :MapPhoneNumberAndDial: ; there is no pause character :Delay:2 :SendString:83h ; starts dialing process :IgnoreStringEndingWithCharacter:03h ; ignore the 'Connect' response :Delay:2 :OnLine: :Finish: ; __________________________________________________ ; Rixon R212A (Additional) ; _________________________________________________ {Rixon} ; Rixon R212A [Reset_Modem] :DropAndRaiseDTR:2 ; drops DTR wait 2 sec then raise DTR again :SendString:'ATB10001000',0Dh ; reset the modem :IgnoreStringEndingWithCharacter:0Dh :Delay:2 :SendString:'ATZ',0Dh ; reset the modem :Delay:2 ; initializing takes some time :IgnoreStringEndingWithCharacter:0Dh ; ignore the 'OK' (0) :Delay:2 :SendString:'ATS2=128',0Dh ; disable escape sequence so we can ; read data which might contain the ; escape sequence :IgnoreStringEndingWithCharacter:0Dh ; ignore the 'OK' :SendString:'ATS0=1',0Dh ; answer after 1 ring :IgnoreStringEndingWithCharacter:0Dh :SendString:'ATF1',0Dh ; set no echo in data mode :Delay:1 ; initializing takes some time :IgnoreStringEndingWithCharacter:0Dh ; ignore the 'OK' (0) :Finish: ; reset modem completed [Wait_For_Call] :WaitStringReturn: ; WAIT FOR THE PHONE TO RING :IgnoreStringEndingWithCharacter:0Dh ; ignore the first 'Ring' echo :Delay:3 :IgnoreStringEndingWithCharacter:0Dh ; ignore the 'Connect' response :OnLine: :Finish: [Make_A_Call] :SendString:'ATDT' ; initiate dialing :Delay:1 :MapPhoneNumberAndDial:',' ; the comma is the pause character ; there is no delay character :Delay:1 :SendString:0Dh ; starts dialing process :Delay:2 :SaveStringEndingWithCharacter:0Dh ; ignore the 'Connect' response :CompareWithSavedString:'1',0Dh :JumpIfCompareNotEqual:2 :Delay:2 :OnLine: :Finish: ;--------------------------------------------------------------- ;------------------------------------------------------ ;**************************** MODEM PROFILE HEADER *************************; ;* *; ;* MODEM: TELiNDUS ASTER 3 *; ;* *; ;* CREATED: Kris Van Bogaert *; ;* UNISYS BELGIUM CSE SUPPORT *; ;* Zaventem May 04, 1992 *; ;* *; ;* *; ;* DESCRIPTION: *; ;* *; ;* TELiNDUS ASTER 3 modem with auto-dialler (Hayes commands) *; ;* *; ;* This script supports the following modem features: *; ;* *; ;* - automatic speed detection *; ;* - compression and error correction *; ;* - Callback with password exchange *; ;* *; ;* *; ;* WARNING *; ;* Configuring the modem to use error correction and data compression *; ;* protocols (both MNP and V.42) may cause problems when attempting to *; ;* to establish a link with modems not supporting these protocols. *; ;* *; ;* The Aster 3 modem does not support any AT-commands to disable *; ;* error correction and data compression temporarily. *; ;* *; ;* *; ;* If the modem has been setup for callback with password exchange and *; ;* you call a non Aster3/Aster4 modem you have to disable this feature *; ;* by appending a '?' to the number to dial. *; ;* *; ;* *; ;* *; ;* HISTORY: *; ;* *; ;* MM/DD/YY VVVV/MM PROGRAMMER / DESCRIPTION *; ;* *; ;* 07/26/93 5.2.07 K. Van Bogaert/ Include the above warning concerning *; ;* modems that do not support MNP and *; ;* V.42. *; ;* *; ;* 05/04/92 5.1.0500 K. Van Bogaert/ Add Telindus Aster 3 modem profile *; ;* *; ;* *; ;* *; ;*********************** END OF MODEM PROFILE HEADER ***********************; {Aster3} ; [Reset_Modem] :DropAndRaiseDTR:2 ; drops DTR wait 2 sec then raise DTR again :Delay:2 ;**************************************************************** ; ; Reset the modem: ; ; ATZ = AT E1 Q0 V1 X0 S3=13 S4=10 S5=8 ; ; AT E1 : Echo enabled ; AT Q0 : Enable result codes ; AT V1 : Long form result codes (verbose) ; AT X0 : Enable result codes 0 through 4 ; (OK, CONNECT, RING, NO CARRIER, ERROR) ; AT S3=13 : Carriage return character ; AT S4=10 : Line feed character ; AT S5=8 : Back space character ; ;**************************************************************** :SendString:'ATZ',0Dh :IgnoreStringEndingWithCharacter:0Ah :IgnoreStringEndingWithCharacter:0Ah ; Ignore the 'OK' ;**************************************************************** ; ; Enable result codes. ; (OK, CONNECT, RING, NO CARRIER, ERROR, CONNECT 1200, ; NO DIALTONE, BUSY, CONNECT 600, CONNECT 2400, ; CONNECT 4800, CONNECT 9600, CONNECT 19200, ; CONNECT 1200/75, CONNECT 75/1200) ; ;**************************************************************** :SendString:'ATX4',0Dh :IgnoreStringEndingWithCharacter:0Ah :IgnoreStringEndingWithCharacter:0Ah ; Ignore the 'OK' ;**************************************************************** ; ; Turn speaker on if placing a call and turn it off after ; detection of the 2100 Hz answering tone. ; ;**************************************************************** :SendString:'ATM1',0Dh :IgnoreStringEndingWithCharacter:0Ah :IgnoreStringEndingWithCharacter:0Ah ; Ignore the 'OK' ;**************************************************************** ; ; - Disable escape sequence so we can read data which might ; contain the escape sequence. (S2 = 128) ; ; - Answer after 1 ring. (S0 = 1) ; ; - Delay character (comma) causes a delay of 10 seconds. (S8 = 10) ; ; - Set loss of carrier delay to 10 seconds. (S10 = 100) ; ;**************************************************************** :SendString:'ATS2=128 S0=1 S8=10 S10=100',0Dh :IgnoreStringEndingWithCharacter:0Ah :IgnoreStringEndingWithCharacter:0Ah ; Ignore the 'OK' :SetLineControl:2 :Finish: ;reset modem completed [Wait_For_Call] :WaitForCarrier: :OnLine: :Finish: [Make_A_Call] :SendString:'ATD' ; initiate dialling :MapPhoneNumberAndDial:'@,' ; The @ is the pause character ; The comma is the delay character :SendString:0Dh ; starts dialling process :IgnoreStringEndingWithCharacter:0Ah :SaveStringEndingWithCharacter:0Ah ; Wait for modem response. ; If 'OK', then we will be called back by the remote modem. :CompareWithSavedString:'OK', 0Dh, 0Ah :JumpIfCompareNotEqual:2 ; WAIT FOR THE PHONE TO RING :IgnoreStringEndingWithCharacter:0Ah :SaveStringEndingWithCharacter:0Ah ; If no dial tone, abort with erc 11274 :CompareWithSavedString:'TONE', 0Dh, 0Ah :JumpIfCompareNotEqual:1 :AbortWithErrorCode:'11274' ; If busy response, abort with erc 10570 :CompareWithSavedString:'BUSY', 0Dh, 0Ah :JumpIfCompareNotEqual:1 :AbortWithErrorCode:'10570' ; Check for a 'CONNECT 1200, 2400, etc...' response :CompareWithSavedString:'00', 0Dh, 0Ah :JumpIfCompareEqual:1 :AbortWithErrorCode:'10572' :Delay:3 :OnLine: :Finish: ;------------------------------------------------------ ;**************************** MODEM PROFILE HEADER *************************; ;* *; ;* MODEM: TELiNDUS ASTER 4 *; ;* CONTROL FIRMWARE: rev T94000A05 *; ;* DSP FIRMWARE: rev *48 *; ;* *; ;* *; ;* CREATED: Kris Van Bogaert *; ;* UNISYS BELGIUM CSE SUPPORT *; ;* Zaventem May 18, 1992 *; ;* *; ;* *; ;* DESCRIPTION: *; ;* *; ;* TELiNDUS ASTER 4 modem with auto-dialler (Hayes commands) *; ;* *; ;* This script supports the following modem features: *; ;* *; ;* - automatic speed detection *; ;* - compression and error correction *; ;* *; ;* - By inserting AT commands before a phone number, the modem may be *; ;* forced to use a specific PSTN speed, no compression and/or no *; ;* error correction. This is very useful when certain connections *; ;* fail due to the error correction negotiation or when connecting *; ;* to a modem whose speed is not recognized. *; ;* *; ;* - Callback with password exchange *; ;* *; ;* *; ;* WARNING *; ;* Configuring the modem to use error correction and data compression *; ;* protocols (both MNP and V.42) may cause problems when attempting to *; ;* to establish a link with modems not supporting these protocols. *; ;* *; ;* The following guidelines will work with many older non MNP or V.42 *; ;* modems. *; ;* *; ;* When CALLING a modem known to not support these protocols: *; ;* Add the following before the number to dial *; ;* *; ;* \N0%C0D *; ;* *; ;* = backspace = 08h *; ;* *; ;* *; ;* Additionally, if the modem has been setup for callback with password *; ;* exchange you have to disable this feature by appending a '?' to the *; ;* number to dial. *; ;* *; ;* *; ;* *; ;* HISTORY: *; ;* *; ;* MM/DD/YY VVVV/MM PROGRAMMER / DESCRIPTION *; ;* *; ;* 07/26/93 5.2.07 K. Van Bogaert/ Include the above warning concerning *; ;* modems that do not support MNP and *; ;* V.42. *; ;* *; ;* 08/28/92 5.1.0500 K. Van Bogaert/ Upgraded from Control Firmware *; ;* rev T94000A03 to T94000A05. *; ;* *; ;* 05/18/92 5.1.0500 K. Van Bogaert/ Add Telindus Aster 4 modem profile *; ;* *; ;* *; ;* *; ;*********************** END OF MODEM PROFILE HEADER ***********************; {Aster4} ; ; [Reset_Modem] :DropAndRaiseDTR:2 ; drops DTR wait 2 sec then raise DTR again :Delay:2 ;**************************************************************** ; ; Select the current user profile ; ;**************************************************************** ; ; NOTES: - Below PROM level A05 the Aster 4 does not support the ATZ255 ; command (load the CURRENT USER PROFILE as setup thru the ; modem's keyboard). ; ; - Below PROM level A04 the Aster 4 does not reply with 'OK' after ; executing the ATZn command (where n is 1 or 2). ; ; Therefore, the lines below must match the PROM level being used. ; ; ; PROM rev T94000A03: ; ------------------ ; ; :SendString:'ATZ1',0Dh ; :Delay:5 ; ; initializing takes some time ; :IgnoreStringEndingWithCharacter:0Ah ; ; Ignore the 'OK' ; ; ; PROM rev T94000A04: ; ------------------ ; ; :SendString:'ATZ1',0Dh ; :IgnoreStringEndingWithCharacter:0Ah ; :IgnoreStringEndingWithCharacter:0Ah ; ; Ignore the 'OK' ; ; ; PROM rev T94000A05: ; ------------------ ; ; :SendString:'ATZ255',0Dh ; :IgnoreStringEndingWithCharacter:0Ah ; :IgnoreStringEndingWithCharacter:0Ah ; ; Ignore the 'OK' ; ;**************************************************************** :SendString:'ATZ255',0Dh :IgnoreStringEndingWithCharacter:0Ah :IgnoreStringEndingWithCharacter:0Ah ; Ignore the 'OK' ;**************************************************************** ; ; Reset the modem: ; ; ATZ = AT Q0 V1 W0 X0 E1 S3=13 S4=10 S5=8 S6=* S8=* S10=* ; ; AT Q0 : Enable result codes ; AT V1 : Long form result codes (verbose) ; AT W0 : Modem returns "CONNECT DTE speed" ; AT X0 : Enable result codes 0 through 4 ; (OK, CONNECT, RING, NO CARRIER, ERROR) ; AT E1 : Echo enabled ; AT S3=13 : Carriage return character ; AT S4=10 : Line feed character ; AT S5=8 : Back space character ; AT S6=* : 'Wait for dial tone before blind dialling' delay ; AT S8=* : Pause time for comma dial modifier ; AT S10=* : Carrier disconnect time ; ; ; (* = Country dependent) ; ;**************************************************************** :SendString:'ATZ',0Dh :IgnoreStringEndingWithCharacter:0Ah :IgnoreStringEndingWithCharacter:0Ah ; Ignore the 'OK' ;**************************************************************** ; ; - Enable result codes. ; (OK, CONNECT, RING, NO CARRIER, ERROR, CONNECT 1200, ; NO DIALTONE, BUSY, CONNECT 600, CONNECT 2400, ; CONNECT 4800, CONNECT 9600, CONNECT 19200, ; CONNECT 1200/75, CONNECT 75/1200) ; ; - Return 'CONNECT DCE speed' instead of 'CONNECT DTE speed' ; ;**************************************************************** :SendString:'ATX4 W2',0Dh :IgnoreStringEndingWithCharacter:0Ah :IgnoreStringEndingWithCharacter:0Ah ; Ignore the 'OK' ;**************************************************************** ; ; Turn speaker on if placing a call and turn it off after ; detection of the 2100 Hz answering tone. ; ;**************************************************************** :SendString:'ATM1',0Dh :IgnoreStringEndingWithCharacter:0Ah :IgnoreStringEndingWithCharacter:0Ah ; Ignore the 'OK' ;**************************************************************** ; ; - Disable escape sequence so we can read data which might ; contain the escape sequence. (S2 = 128) ; ; - Answer after 1 ring. (S0 = 1) ; ; - Delay character (comma) causes a delay of 10 seconds. (S8 = 10) ; ; - Set loss of carrier delay to 10 seconds. (S10 = 100) ; ;**************************************************************** :SendString:'ATS2=128 S0=1 S8=10 S10=100',0Dh :IgnoreStringEndingWithCharacter:0Ah :IgnoreStringEndingWithCharacter:0Ah ; Ignore the 'OK' :SetLineControl:2 :Finish: ;reset modem completed [Wait_For_Call] :WaitForCarrier: :OnLine: :Finish: [Make_A_Call] :SendString:'ATD' ; initiate dialling :MapPhoneNumberAndDial:'$,' ; The $ is the pause character ; The comma is the delay character :SendString:0Dh ; starts dialling process :IgnoreStringEndingWithCharacter:0Ah :SaveStringEndingWithCharacter:0Ah ; Wait for modem response. ; If no dial tone, abort with erc 11274 :CompareWithSavedString:'TONE', 0Dh, 0Ah :JumpIfCompareNotEqual:1 :AbortWithErrorCode:'11274' ; If busy response, abort with erc 10570 :CompareWithSavedString:'BUSY', 0Dh, 0Ah :JumpIfCompareNotEqual:1 :AbortWithErrorCode:'10570' ; If 'ERROR', we exchanged a bad or no password. So abort with erc 219 :CompareWithSavedString:'ERROR', 0Dh, 0Ah :JumpIfCompareNotEqual:1 :AbortWithErrorCode:'219' ; Check for a 'CONNECT 1200, 2400, etc...' response :CompareWithSavedString:'00', 0Dh, 0Ah :JumpIfCompareEqual:1 :AbortWithErrorCode:'10572' ; No anwser ; The DCE speed must be at least 1200 baud :CompareWithSavedString:'CONNECT 600', 0Dh, 0Ah :JumpIfCompareNotEqual:1 :AbortWithErrorCode:'10299' :Delay:3 :OnLine: :Finish: ;------------------------------------------------------ ; __________________________________________________ ; Universal Data Systems 212A/D (Additional) ; __________________________________________________ {UDS} ; Universal Data Systems 212-A/D [Reset_Modem] :DropAndRaiseDTR:2 ; drop DTR wait 2 seconds then raise DTR again :Delay:1 :SendString:'E','N' :IgnoreStringEndingWithCharacter:':' :Finish: ; reset modem completed [Wait_For_Call] :WaitNoStringReturn: ; WAIT FOR THE PHONE TO RING :OnLine: :Delay:1 :Finish: [Make_A_Call] :SendString:'D' ; get dialer ready :Delay:2 :IgnoreStringEndingWithCharacter:20h ;modem responds with space character :Delay:2 :MapPhoneNumberAndDial:'W','D' ;W is Tandem dialing character ;D is Delay character :Delay:2 :SendString:0Dh ; starts dialing process :IgnoreStringEndingWithCharacter:'' :IgnoreStringEndingWithCharacter:'' :IgnoreStringEndingWithCharacter:20h ;Ignore modem response :SaveStringEndingWithCharacter:0Ah :CompareWithSavedString:'C','O','M','P','L','E','T','E',0Dh,0Ah :JumpIfCompareNotEqual:2 :Delay:3 :Online: :Jump:1 :IgnoreStringEndingWithCharacter:':' :Delay:2 :Finish: ; __________________________________________________ ; VenTel MDC2123L (with WECO option) (Additional) ; __________________________________________________ {Ventel} ; Ven-Tel MDC2123L (with WECO option) [Reset_Modem] :DropAndRaiseDTR:2 :SendString:0Dh :Delay:1 :SendString:0Dh :Delay:1 :IgnoreStringEndingWithCharacter:'$' :Finish: [Wait_For_Call] :SendString:'Q' ; sends Q for QUIT :IgnoreStringEndingWithCharacter:'T' ; gets the response from modem back :WaitNoStringReturn: :OnLine: :Finish: [Make_A_Call] :SendString:'' ; dialing process by sending ; ; e.g. :IgnoreStringEndingWithCharacter:0Ah :IgnoreStringEndingWithCharacter:0Ah :IgnoreStringEndingWithCharacter:0Ah :IgnoreStringEndingWithCharacter:0Ah ; here we ignore response strings from ; the modem :SaveStringEndingWithCharacter:0Ah :CompareWithSavedString:'!',0Dh,0Ah ; now we compare with ONLINE ! :JumpIfCompareNotEqual:2 :Delay:2 :OnLine: :Finish: ; __________________________________________________ ; VenTel MD212 PLUS II (Additional) ; __________________________________________________ {Ventel+2} ; Ven-Tel MD212 Plus 2 [Reset_Modem] :DropAndRaiseDTR:2 :SendString:0Dh :Delay:1 :SendString:0Dh :Delay:1 :SendString:'Q',0Dh ; here we retrain the modem :DropAndRaiseDTR:2 :SendString:0Dh :Delay:1 :SendString:0Dh ; send CR,CR :IgnoreStringEndingWithCharacter:'$' :Finish: [Wait_For_Call] :SendString:'Q',0Dh :IgnoreStringEndingWithCharacter:'d' ; dialer terminated :WaitNoStringReturn: ; similar to cermetek :OnLine: :Finish: [Make_A_Call] :SendString:'K',0Dh :IgnoreStringEndingWithCharacter:0Ah :IgnoreStringEndingWithCharacter:0Ah :MapPhoneNumberAndDial:'&%' :SendString:0Dh ; sends phone number xxxx CR :IgnoreStringEndingWithCharacter:0Ah :IgnoreStringEndingWithCharacter:0Ah :SaveStringEndingWithCharacter:0Ah :CompareWithSavedString:07h,0Dh,0Ah ; compare bell,CR,LF :JumpIfCompareNotEqual:2 :Delay:2 :OnLine: :Finish: tEqual:1 :AbortWithErrorCode:'10570' ; If 'ERROR', we exchanged a bad or no password. So abort with erc 219 :CompareWithSavedString:'ERROR', 0Dh, 0Ah :JumpIfCompareNotEqual:1 :AbortWithErrorCode:'219' ; Check for a 'CONNECT 1200, 2400, etc...' response :CompareWithSavedString:'00', 0Dh, 0Ah :JumpIfCompareEqual:1 :AbortWithErrorCode:'10572' ; No anwser ; The DCE spee  UNISYS Emergency Maintenance Update CTOS Modem Service s5.3.06 May 31, 1995 Released Version: 5.3.0 Style ID: B25-MDM Library Reference Number: EC-057D DESCRIPTION This Emergency Maintenance Update (EMU) is provided on an as-needed basis only. It is not an official release nor is it available through Corporate Software and Publications Operations (CSPO). The information in this document is supplemental to the product's Software Release Announcement (SRA). Contact your Unisys support center for more information concerning this EMU. RESTRICTIONS There are no new restrictions added with this EMU. SOFTWARE FILES This EMU is a complete replacement package for the released product. INSTALLATION INSTRUCTIONS Use Installation Manager or Software Install to install the EMU on each system requiring the updated software. PROBLEMS CORRECTED PLEs fixed in s5.3.06 PLE 16422525 Modem Service does not work properly on SG hardware when both the comm ports are in use. PLE 16455571 Add/Release modem line get deadlocked. PLE 16431419 RS232 IOP crash with erc 80 in Modem Service on SG6000. PLEs fixed in s5.3.04 PLE 16240354 The Modem Script commands :SetParity: and :SetDataBits: no longer cause an invalid BSWA error if placed early in the RESET script. PLEs fixed in s5.3.03 PLE 16235083 DTR remains HIGH after failed outgoing DTRdial call. PLE 16236004 AddModemLine with nonexistant modem name caused deinstall. PLE 16235773 Random crashes apparently in comm byte stream. PLEs fixed in s5.3.01 PLE 16208531 DCI clients now have means to recover from 'bad' incoming calls. PLE 16208558 DCI clients now have proper handling of WaitForSignal and WaitForCarrier in the Make_A_Call scripts.2 Emergency Maintenance Update Page # of 2 DGH/!8"&'h*+h,57OlOljklmnD$!8"&'h*+h,jklmn  D@ 0_`abc DGH DG H DG H@ 0(_`abc DGH!"!@  F_`abcDGH!1!8"&'h*+h,567OlOljklmnDG H#  DGH"@ !_`abc DGH"&!8"&'h*+h,jklmnD)xyՄ)xGH'@GH&@x_`abcGH%GH$@_`abcG H# wxƷ %Ɣ*wӷD D%ӔDCGH+A@._`abc@_`abcH(@._`abcGH' چcy9;<f֚ևܝ'cy9@<†9;fGH,,&!8"&'h*+h,jklmnAGH'@  _`abcGH+$%*** GH,@@!_`abcGH,2>c! "HHH>/=HHH *Headline*@Headline*Section @)Section-^@@@@@@@@ @ @ @ @ @@@CourierTimes=Times,Times0 Helvetica8 Helvetica Helvetica% Helvetica! Helvetica Helvetica HelveticaTimes Helvetica HelveticaTimes TimesRpR))3R33.?33370???? vvVvV7v0vE77777777{#7070000RRRccZ~Zx,xxxZxZdddLx@TxdxxxdddxdHxxZ@xaxAxxhhh,-,,ddM7ddooop!  !!!!d!!! !!z!!oooo7o!Pd!!!!!d 00H! i<!   !   @k           @@[[@%u[@ [u@u[@%[@@@% k      kkk     [} @ @ u u%[    % bb%\ !!!mdYvmddd2cmdccd?iccc2<Udd2<<Fi2<22dddddddddd<<iiinxn2dnxxnxxxn<2<id2dndnd<nn22d2nnnnFd<ndddZF2Fi<<2dddnnnddddnd<<nZZ+Z<<dmmmEEEENbN]N]]mN]NN]]N]N]N]NNNm]mNm]]N]]C]]llllwCTCPrCPP]CPCCPPCPCPCPCCC]Px]C]PPCPPxx9xPP\\\\yocyooo8nyonnoFunnn8C_oo8CCNu8C88ooooooooooCCuuuzz8ozzzC8Cuo8ozozoCzz88o8zzzzNoCzooodN8NuCC8ooozzzoooozoCCzdd0dCCoyyyMMMMzmzzz=yzyyzMyyy=Ihzz=IIV=I==zzzzzzzzzzII=zI=Iz=zzzI==z=VzIzzznV>VII=zzzzzzzzIInn4nIIzTTTTyocyooo8nyonnkFunnn88Goo,CCNu8C88oooooooooo88uuuoz8dozz888^o,oodoo8oo,,d,ooooCd8oddddC4CuCC8oooozodooozoCCzCC&CCCoyyyMMMMxwxxx<xmT<PbxxPPPx<P<CxxxxxxxxxxCCkP]PCPqxPkxkxkPxxCCxCxxxxP]Cxxxxks0sPP<xkkxxxkkkkxxPPkkk+kPPx\\\\wCTCPrCPP]CPCCPPCPCPCPCCC]Px]C]PPCPPxx9xPP\\\\wCTCCU5PP]CPCCCCCxCCCq5xC55x5PxCxxxxP>PPPCxPPPP.PPP\\\\xwxxx<xmT<PbxxPPPx<P<CxxxxxxxxxxCCkP]PCPqxPkxkxkPxxCCxCxxxxP]Cxxxxks0sPP<xkkxxxkkkkxxPPkkk+kPPx\\\\ydcyddd2nydnnlFrnnn2CoddCCCdr2C28ddddddddddCCrrrdzNdzoC8CtdCdoYoYCdo8Co8odooYNCodddYO,OhCC2dddddoYYYYodCCddd8dCCdyyyMMMMG!( B= LaserWriter+3.058y CrashDump.sysRequest.Modem.Sysmdm.cmdsReleaseNotes.doc Install.jcl install.ctrl Fileheaders.sysMfd.sys SysImage.sysReleaseNotes.sub XEInstall.sub Install.subLog.sys BadBlk.sys hdinstall.subR@ B25MDM-1/1@ {`O=hOB @ D 4> . 89|P^Sys8  DataSheet Unisys 9|+Fileheaders.sysSys: `O`O?OhD hMfd.sysSys: `O`O?OB Log.sysSys< `O`OCO@  SysImage.sysSys: `OU+?O{ BadBlk.sysSys< `O`OCOqV CrashDump.sysSys8 `O`O9O@ %Request.Modem.SysSys8 gO+:O/0vmdm.cmdsSys8 gO+;O4M ReleaseNotes.docSys 8 gO+Ol ReleaseNotes.subSys : gOԄ+@O  XEInstall.subSys : gO؄+AOr$ Install.subSys: gOۄ+BO  hdinstall.subSys< gO+DO_Y1ModemService.runUnisys gO8+FO 1 Sys.ModemsUnisys gO?+GO%&JDModemServiceStatus.formUnisys gOB+GOGDeInstallModemService.runUnisys gOG+HO(*G~ ModemMsg.binUnisys gOI+IOr ModemService.ConfigUnisys gOL+PO qModemServiceStatus.runUnisys gOQ+QO1&RqLablModem.libUnisys gOS+ROZAdditional.modemsUnisys gOY+SOWPModemServ-s5.3.06.doc DataSheet gO\+EO<<a`_^]\ [ !Z!"Y"#X#$W$%V%&U&'T'(S()R)*Q*+P+, O,- N-. M./ L/0 K01J12I23|3ModemServ-s5.3.06.docModemService.run Sys.ModemsModemServiceStatus.formDeInstallModemService.run ModemMsg.binModemService.ConfigModemServiceStatus.runRqLablModem.libAdditional.modems