tr $CLEAR 
     tr "7--9== 1Squid's Automatic Internet Mailbox Setup Feature 9==7--" 
     if $EXTRA3 <> "" 
     tr 
     tr "5You've already received your Internet mailbox." 
     tr 
     tr "7You can receive Internet email at the following address:" 
     tr 
     $var1 = $EXTRA3 & $BLUE & "@2rushnet.com" 
     tr $RED $var1 
     tr 
     pause 
     go linenumber68
     endif 
     if $EXTRA2 = 255 
     tr 
     tr "You've requested an Internet mailbox already... If you've" 
     tr "waited more than a week since you applied then leave email" 
     tr "to " & $SYSOP & "and he will make an official query."
     tr 
     pause 
     go linenumber68
     endif 
     tr 
     tr "2With this feature, email to '5address@rushnet.com2' is sent" 
     tr "2automatically for you.   This sets up your Internet mailbox at" 
     tr "6rushnet.com2, so you can receive email via the Internet." 
     tr 
     tr "2You should receive a response back from the Address Mail Daemon in" 
     tr "2a day or two." 
     tr 
     tr 
     tr "6PLEASE NOTE1: This feature REQUIRES that you have the FSE (Full Screen" 
     tr "1Editor) enabled. It will not work correctly if the FSE is not on." 
     tr 
     tr 
     getyn $var2 "Do you wish to continue? " 
     IF $var2 = "N" THEN 
     go linenumber68
     ENDIF 
     if $ANSI = "OFF" then 
     tr 
     tr "You don't have ANSI.SYS loaded, so you can't have the FSE on." 
     tr "You cannnot use this feature without the Full Screen Editor." 
     tr "Either read your DOS manual about loading ANSI.SYS, or if you have a" 
     tr "Mac or Amiga or other non-DOS machine, leave Email to the SysOp asking" 
     tr "him to send your request for an Internet mailbox." 
     tr 
     pause 
     go linenumber68
     endif 
     tr "5This process will look weird, but it works <grin>..." 
     tr 
     tr "9Once we start this, I will write an Email for you..." 
     tr "9...DON'T Touch the keyboard after this next [CR]..." 
     tr "9Just watch until we return to the Email Menu." 
     tr 
     pause 
     $var3 = "E3address@rushnet.com" & $CR 
     $var4 = "Mailbox Request" & $CR 
     $var5 = "Sending Mailbox Request..." & $CR 
     $var6 = "/syq" 
     $var7 = $var3 & $var4 
     $var8 = $var7 & $var5 
     $var9 = $var8 & $var6 
     STACK $var9 
     setextra 2 255 
# linenumber68