Join Compuserve            `        B        @ AAAAAAAAAA  KE                               f    ; Join CompuServe Log on Script      Off      IfNString " Phone number " "" goto Number_Used   ErrorBeep   CRT You must enter your local CompuServe phone number in the    Directory of Services before you can join CompuServe.   Exit  	   
 Number_Used:   Send ^m     
 Start_Connect:   SetX 10      Connect_Wait:   WaitFor 10   WaitIf "Host Name:"goto Send_Host_Name   WaitIf "Password:"goto Send_Password   WaitIf "User ID:"goto Send_ID   WaitIf "Agreement #:" goto Send_Agree   WaitIf "Serial"goto Send_Serial   WaitIf "Disconnected" goto Disconnected   WaitEnd      DecX   IfXZero goto Logon_Fail   goto Send_CR      Disconnected:   CRT Check your User ID and Password.    Logon_Fail:  ! crt CompuServe logon failed  " exit  #   $ Send_CR:  % send ^m  & goto Start_Connect  '   ( Send_Host_Name:  ) send CIS^m  * crt Logging on to CompuServe  + goto Connect_Wait  ,   - Send_ID:  . send 2 User ID ^m  / goto Connect_Wait  0   1 Send_Password:  2 send  Password ^m  3 goto Connect_Wait  4   5 Send_Agree:  6 Send FALPULSEDA^m   goto Connect_Wait    Send_Serial:  Send 010496^m  goto Logon_Success    Logon_Success:  crt Connected  on 	 return 
 