home *** CD-ROM | disk | FTP | other *** search
/ PC Online 1996 June / PCO6_96.ISO / filesbbs / support / aolnet.ccl < prev    next >
Encoding:
Text File  |  1996-06-30  |  15.5 KB  |  449 lines
  1. !----------------------------------------------------------------------
  2. !   AOLNET.CCL
  3. !----------------------------------------------------------------------
  4.  
  5. Title           "AOLnet"
  6. ID              4
  7. DriverType      1
  8.  
  9. -Label 0                { Label 0 } 
  10. IfConnects 2 1
  11. Revision 1                      { Set the Revision Level }
  12. DsplyMsg Step 1: Initializing modem ...
  13. CanBtn   41                     { If cancel button - just exit }
  14. SetTries 0                      { Initialize Tries to 0 }
  15. ChrDelay 2                      { Initialize Character Delay }
  16. SerReset ~BAUD 0 8 1            { Set the Baud Rate }
  17. HSReset  0 0 17 19              { Reset }
  18. DsplyPic 1                      { Display Picture 1 }
  19. MdmSetup                        { Send out user's premodem init string }
  20.  
  21. MatchStr 1 2   ~CMDOK           { Look for "OK" }
  22. MatchStr 2 49  ~CMDERR          { Look for "ERROR" }
  23.  
  24. wait 400
  25. Jump 2
  26.  
  27. -Label 1                { Label 0 } 
  28. Revision 1                      { Set the Revision Level }
  29. DsplyMsg ~ERCD, trying second number
  30. wait 500                        { Display first try error message }
  31. DsplyMsg Step 1: Initializing modem ...
  32. CanBtn   41                     { If cancel button - just exit }
  33. SetTries 0                      { Initialize Tries to 0 }
  34. ChrDelay 2                      { Initialize Character Delay }
  35. SerReset ~BAUD 0 8 1            { Set the Baud Rate }
  36. HSReset  0 0 17 19              { Reset }
  37. DsplyPic 1                      { Display Picture 1 }
  38. MdmSetup                        { Send out user's premodem init string }
  39.  
  40. MatchStr 1 2   ~CMDOK           { Look for "OK" }
  41. MatchStr 2 49  ~CMDERR          { Look for "ERROR" }
  42.  
  43. wait 400
  44.  
  45.  
  46. -Label 2                { Label 1 }
  47. Flush                           { Clear the Inbound/Outbound Buffers }
  48. MatchStr 1 3 ~CMDESC            { Look for "+++" }
  49. MatchStr 2 3 ~CMDOK             { Look for "OK" }
  50.  
  51. MdmEsc                          { Get the modems attention }
  52. Wait 200                        { Pause for 2 seconds, minimum gap required }
  53.                                 { The Wait will then look at the MatchStr(s) }
  54.  
  55. -Label 3                { Label 2 }
  56. MatchStr 1 4   ~CMDOK           { Look for "OK" }
  57. MatchStr 2 53  ~CMDERR          { Look for "ERROR" }
  58.  
  59. MdmDisc                         { Disconnect }
  60.                                 { Jump to label #3 if we see 'OK' go by }
  61. Wait 200                        { wait for 'OK' from modem }
  62. Jump 53                         { Exit stage left...time out error on modem }
  63.  
  64. -Label 4                { Label 3 }
  65. DsplyMsg Step 2: Dialing ~PRFX~CLWT~FONE ...
  66.  
  67. MatchStr 1  53  ~CMDERR         { ALWAYS look for "ERROR"      }
  68. MatchStr 2  57  ~NCTIMEOUT      { ALWAYS look for "TIMEOUT"    }
  69. MatchStr 3  25   CARRIER        { Look for "CARRIER"           }
  70. MatchStr 4  5    CONNECT 300    { Look for "CONNECT 300"       }
  71. MatchStr 5  6    CONNECT 1200   { Look for "CONNECT 1200"      }
  72. MatchStr 6  7    CONNECT 2400   { Look for "CONNECT 2400"      }
  73. MatchStr 7  8    CONNECT 4800   { Look for "CONNECT 4800"      }
  74. MatchStr 8  9    CONNECT 7200   { Look for "CONNECT 7200"      }
  75. MatchStr 9  10   CONNECT 9600   { Look for "CONNECT 9600"      }
  76. MatchStr 10 11   CONNECT 12000  { Look for "CONNECT 12000"     }
  77. MatchStr 11 12   CONNECT 14400  { Look for "CONNECT 14400"     }
  78. MatchStr 12 13   CONNECT 16800  { Look for "CONNECT 16800"     }
  79. MatchStr 13 14   CONNECT 19200  { Look for "CONNECT 19200"     }
  80. MatchStr 14 15   CONNECT 21600  { Look for "CONNECT 21600"     }
  81. MatchStr 15 16   CONNECT 24000  { Look for "CONNECT 24000"     }
  82. MatchStr 16 17   CONNECT 26400  { Look for "CONNECT 26400"     }
  83. MatchStr 17 18   CONNECT 28800  { Look for "CONNECT 28800"     }
  84. MatchStr 18 19   CONNECT 31200  { Look for "CONNECT 31200"     }
  85. MatchStr 19 20   CONNECT 33600  { Look for "CONNECT 33600"     }
  86. MatchStr 20 58  ~NCDIALTONE     { Look for "NO DIALTONE"       }
  87. MatchStr 21 51  ~NCANSWER       { Look for "NO ANSWER"         }
  88. MatchStr 22 54  ~NCVOICE        { Look for "VOICE"             }
  89. MatchStr 23 50  ~NCBUSY         { Look for "BUSY"              }
  90. MatchStr 24 55  ~NCCARRIER      { ALWAYS look for "NO CARRIER" }
  91.  
  92. SetTries 0                      { Initialize Tries to 0 }
  93. CanBtn   40                     { If cancel button hit, Jump to Label 40 }
  94. MdmDial ~TONE ~PRFX~CLWT~FONE   { Dial the Number }
  95.                        
  96.                                 { Don't forget that the Wait searches the }
  97.                                 { MatchStr(s) just defined above. }
  98. Wait 4800                       { Wait for CONNECT msg from modem }
  99. Jump 52                         { Else hang up phone & exit }
  100.  
  101.  
  102. -Label 5                { Label 5 }
  103. DsplyPic 2                      { Display Picture 2 }
  104. DsplyMsg Step 3: Connecting at 300 bps ...
  105. BaudSet 300
  106. Jump 26
  107.  
  108. -Label 6                { Label 6 }
  109. DsplyPic 2                      { Display Picture 2 }
  110. DsplyMsg Step 3: Connecting at 1200 bps ...
  111. BaudSet 1200
  112. Jump 26
  113.  
  114. -Label 7                { Label 7 }
  115. DsplyPic 2                      { Display Picture 2 }
  116. DsplyMsg Step 3: Connecting at 2400 bps ...
  117. BaudSet 2400
  118. Jump 26
  119.  
  120. -Label 8                { Label 8 }
  121. DsplyPic 2                      { Display Picture 2 }
  122. DsplyMsg Step 3: Connecting at 4800 bps ...
  123. BaudSet 4800
  124. Jump 26
  125.  
  126. -Label 9                { Label 9 }
  127. DsplyPic 2                      { Display Picture 2 }
  128. DsplyMsg Step 3: Connecting at 7200 bps ...
  129. BaudSet 7200
  130. Jump 26
  131.  
  132. -Label 10                { Label 10 }
  133. DsplyPic 2                      { Display Picture 2 }
  134. DsplyMsg Step 3: Connecting at 9600 bps ...
  135. BaudSet 9600
  136. Jump 26
  137.  
  138. -Label 11                { Label 11 }
  139. DsplyPic 2                      { Display Picture 2 }
  140. DsplyMsg Step 3: Connecting at 12000 bps ...
  141. BaudSet 12000
  142. Jump 26
  143.  
  144. -Label 12                { Label 12 }
  145. DsplyPic 2                      { Display Picture 2 }
  146. DsplyMsg Step 3: Connecting at 14400 bps ...
  147. BaudSet 14400
  148. Jump 26
  149.  
  150. -Label 13                { Label 13 }
  151. DsplyPic 2                      { Display Picture 2 }
  152. DsplyMsg Step 3: Connecting at 16800 bps ...
  153. BaudSet 16800
  154. Jump 26
  155.  
  156. -Label 14                { Label 14 }
  157. DsplyPic 2                      { Display Picture 2 }
  158. DsplyMsg Step 3: Connecting at 19200 bps ...
  159. BaudSet 19200
  160. Jump 26
  161.  
  162. -Label 15                { Label 15 }
  163. DsplyPic 2                      { Display Picture 2 }
  164. DsplyMsg Step 3: Connecting at 21600 bps ...
  165. BaudSet 21600
  166. Jump 26
  167.  
  168. -Label 16                { Label 16 }
  169. DsplyPic 2                      { Display Picture 2 }
  170. DsplyMsg Step 3: Connecting at 24000 bps ...
  171. BaudSet 24000
  172. Jump 26
  173.  
  174. -Label 17                { Label 17 }
  175. DsplyPic 2                      { Display Picture 2 }
  176. DsplyMsg Step 3: Connecting at 26400 bps ...
  177. BaudSet 26400
  178. Jump 26
  179.  
  180. -Label 18                { Label 18 }
  181. DsplyPic 2                      { Display Picture 2 }
  182. DsplyMsg Step 3: Connecting at 28800 bps ...
  183. BaudSet 28800
  184. Jump 26
  185.  
  186. -Label 19                { Label 19 }
  187. DsplyPic 2                      { Display Picture 2 }
  188. DsplyMsg Step 3: Connecting at 31200 bps ...
  189. BaudSet 28800
  190. Jump 26
  191.  
  192. -Label 20                { Label 20 }
  193. DsplyPic 2                      { Display Picture 2 }
  194. DsplyMsg Step 3: Connecting at 33600 bps ...
  195. BaudSet 28800
  196. Jump 26
  197.  
  198. -Label 25               { Label 25 }
  199. DsplyPic 2                      { Display Picture 2 }
  200. DsplyMsg Step 3: Connecting at ~BAUD bps ...
  201.  
  202.  
  203. -Label 26               { Label 26 }
  204. MatchStr 3 56  ~NCCARRIER      { ALWAYS look for "NO CARRIER" }
  205. MatchStr 4 27  UQKT1
  206. MatchStr 5 33  UQKT2
  207. MatchStr 6 27  ANSNET@@LOGIN
  208. MatchStr 7 30  UU.NET@@LOGIN
  209. MatchStr 8 30  SATURN.BBN@@LOGIN
  210. MatchStr 9 33  SPRINT-IP@@USERNAME
  211.  
  212. Wait 4800                       { Wait for MatchStr to find Hit }       
  213. Jump 52                         { Jump Out }    
  214.  
  215. -Label 27               { Label 27 }
  216. DsplyMsg Step 4: Requesting network attention ...
  217. Xmit aol\13                     { Send out AOL<CR> }
  218. DsplyMsg Step 5: Talking to network ...
  219. Jump 35
  220.  
  221. -Label 30               { Label 30 }
  222. DsplyMsg Step 4: Requesting network attention ...
  223. MatchStr 4  31  PASSWORD        { Look for "PASSWORD" }
  224. Xmit aolnet\13                  { Send out AOLNET<CR> }
  225.  
  226. wait 4800                       { Wait for the PASSWORD String }
  227. Jump 52                         { Could not find "PASSWORD", jump to 52 }
  228.  
  229. -Label 31
  230. DsplyMsg Step 5: Talking to network ...
  231. Xmit A0L2aNet\13
  232.  
  233. Jump 35
  234.  
  235. -Label 33
  236. DsplyMsg Step 4: Requesting network attention ...
  237. MatchStr 4  34  PASSWORD        { Look for "PASSWORD" }
  238. Xmit aol\13                     { Send out AOL<CR>    }
  239.  
  240. wait 4800                       { Wait for the PASSWORD String }
  241. Jump 52                         { Could not find "PASSWORD", jump to 52 }
  242.  
  243. -Label 34
  244. DsplyMsg Step 5: Talking to network ...
  245. Xmit aol\13
  246.  
  247. -Label 35               { Label 35 }  
  248. DsplyMsg Step 6: Connecting to America Online ...
  249. DsplyPic 3                      { Display Picture 3 }
  250.     
  251. MatchStr  4  36  CONNECTED       { ALWAYS look for "CONNECTED" }
  252. MatchStr  5  36  OPEN            { ALWAYS look for "OPEN" }
  253. MatchStr  6  60  UNAVAILABLE     { If the server could not connect to AOL }
  254. MatchStr  7  60  CONNECT FAILED  { If the server could not connect to AOL }
  255. MatchStr  8  60  NOT AVAILABLE   { If the server could not connect to AOL }
  256. MatchStr  9  60  UNREACHABLE     { If the server could not connect to AOL }
  257. MatchStr 10  60  NO CONNECTION   { If the server could not connect to AOL }
  258. MatchStr 11  59  BAD PASSWORD    { Glich - we're out of sync }
  259. MatchStr 12  59  LOGIN INVALID   { Glich - we're out of sync }
  260. Wait 4800
  261.  
  262. Jump 52                         { Could not find "CONNECTED", jump to 52 }
  263.  
  264. -Label 36               { Label 36 }
  265. DsplyMsg Checking Password...   { Display Message }
  266. Exit 0                          { Success }
  267.  
  268.  
  269. -Label 40               { Label 40 }
  270. Hangup                          { Hangup }
  271. Exit -111                       { Exit out and return -111 }
  272.  
  273. -Label 41               { Label 41 }
  274. Exit -111                       { Exit out and return -111 }    
  275.  
  276. -Label 42
  277. Exit 0                          { Exit out and return 0 }               
  278.  
  279.  
  280. !----------------------------------------------------------------------
  281. !                       Error Messages 
  282. !----------------------------------------------------------------------
  283.  
  284. -Label 49               { Label 49 }
  285. Talert Your modem is not accepting our commands. 
  286. Talert
  287. Talert Please Click on Setup, then Setup Modem, and select
  288. Talert your modem type from the list. If your modem type  
  289. Talert is not in the list, please select:
  290. Talert
  291. Talert "Not Listed, Basic Hayes Compatible"
  292. Talert
  293. Talert For more information, select Contents from the Help 
  294. Talert menu, and click on Help with Error Messages. 
  295. ErrorSet 12
  296. Jump 61
  297.  
  298. -Label 50               { Label 50 }      
  299. Talert The number dialed is busy. Please try again later. 
  300. Talert 
  301. Talert To find another local access number, select 
  302. Talert New Local # from the Screen Name box, and 
  303. Talert click on Sign On. 
  304. Talert 
  305. Talert For more information, select Contents from the 
  306. Talert Help menu, and click on Help with Error Messages. 
  307. ErrorSet 1
  308. Jump 61                         
  309.  
  310. -Label 51               { Label 51 }
  311. Talert The number dialed is not answering. Please try again later.  
  312. Talert 
  313. Talert To find another local access number, select 
  314. Talert New Local # from the Screen Name box, and 
  315. Talert click on Sign On. 
  316. Talert 
  317. Talert For more information, select Contents from the 
  318. Talert Help menu, and click on Help with Error Messages. 
  319. ErrorSet 2
  320. Jump 61                         
  321.  
  322. -Label 52               { Label 52 }
  323. Talert The access company failed to respond.  Please try again later.
  324. Talert 
  325. Talert To find another local access number, select 
  326. Talert New Local # from the Screen Name box, and 
  327. Talert click on Sign On. 
  328. Talert 
  329. Talert For more information, select Contents from the 
  330. Talert Help menu, and click on Help with Error Messages. 
  331. ErrorSet 3
  332. Jump 61
  333.  
  334. -Label 53               { Label 53 }
  335. Talert America Online was unable to initialize your modem.
  336. Talert 
  337. Talert 1. Turn your modem off, then back on.
  338. Talert 2. Check your modem cable connections. 
  339. Talert 3. Click on Setup, then Setup Modem, and verify 
  340. Talert your modem selection. 
  341. Talert 
  342. Talert For more information, select Contents from the 
  343. Talert Help menu, and click on Help with Error Messages. 
  344. ErrorSet 8
  345. Jump 61 
  346.  
  347. -Label 54               { Label 54 }
  348. Talert The number dialed did not connect to the access company. 
  349. Talert 
  350. Talert Verify the local access number by selecting 
  351. Talert New Local # from the Screen Name box, then 
  352. Talert clicking on Sign On. 
  353. Talert 
  354. Talert For more information, select Contents from the 
  355. Talert Help menu, and click on Help with Error Messages.
  356. ErrorSet 9
  357. Jump 61
  358.  
  359. -Label 55               { Label 55 }
  360. Talert The modem was unable to get a carrier signal. 
  361. Talert 
  362. Talert 1. Check all phone line and cable connections.
  363. Talert 2. Verify your setup information by clicking on 
  364. Talert    Setup, then Edit Location. 
  365. Talert  
  366. Talert For more information, select Contents from the 
  367. Talert Help menu, and click on Help with Error Messages. 
  368. ErrorSet 6
  369. Jump 61
  370.  
  371. -Label 56               { Label 56 }
  372. Talert The modem has lost carrier signal.  Please try signing on again.
  373. ErrorSet 6
  374. Jump 61
  375.  
  376. -Label 57               { Label 57 }
  377. Talert It has taken too long to process the connection.  
  378. Talert
  379. Talert 1. Test your modem with another communications 
  380. Talert    program. 
  381. Talert 2. Verify the local access number by selecting 
  382. Talert New Local # from the Screen Name box, then 
  383. Talert clicking on Sign On. 
  384. Talert 
  385. Talert For more information, select Contents from the 
  386. Talert Help menu, and click on Help with Error Messages. 
  387. ErrorSet 7
  388. Jump 61
  389.  
  390. -Label 58               { Label 58 }
  391. Talert The modem has reported no dial tone. 
  392. Talert 
  393. Talert 1. Check the phone line connections. 
  394. Talert 2. Make sure the line from the wall is connected
  395. Talert to the jack labeled Line, Telco, Wall or Jack.  
  396. Talert 3. Use a telephone to check for a dial tone. 
  397. Talert 
  398. Talert For more information, select Contents from the 
  399. Talert Help menu, and click on Help with Error Messages. 
  400. ErrorSet 5
  401. Jump 61
  402.  
  403. -Label 59               { Label 59 }
  404. Talert An error has occurred in the connection process.  Please try again.  
  405. Talert 
  406. Talert For more information, select Contents from the 
  407. Talert Help menu, and click on Help with Error Messages.
  408. ErrorSet 4
  409. Jump 61
  410.  
  411. -Label 60               { Label 60 }
  412. Talert The final connection step to ~APPL did not complete.  Please try again later. 
  413. Talert 
  414. Talert For more information, select Contents from the 
  415. Talert Help menu, and click on Help with Error Messages.
  416. ErrorSet 4
  417. Jump 61
  418.  
  419.  
  420. -Label 61               { Label 61 }
  421. Alert 62 \13
  422. Exit -1
  423.  
  424. -Label 62               { Label 62 }
  425. Exit -1
  426.  
  427.  
  428. !----------------------------------------------------------------------
  429. !                       Hangup Sequence 
  430. !----------------------------------------------------------------------
  431.  
  432. *-Label 0               { Label 0 }
  433. *CanBtn 2                       { Cancel Button }
  434.  
  435. *Flush                          { Flush }
  436. *Pause 100                      { Wait for at least 1.5 sec }
  437.  
  438. *MdmEsc                         { Get the Modems attention  }
  439. *Pause 100                      { Wait for at least 1.5 sec }
  440.  
  441. *MdmDisc                        { Disconnect }
  442. *Pause 100                      { Pause ... }
  443.  
  444. *MdmRestore                     { Modem Restore }
  445. *Exit 0                         { Exit out and return 0 }       
  446.  
  447. ###                             { End of File Marker }
  448.  
  449.