home *** CD-ROM | disk | FTP | other *** search
- ; Script fⁿr den TOL-Zugang mit Win95 4.7.96
- ; ==========================================
-
- ; Ihre persoenlichen Benutzerangaben muessen an allen Stellen
- ; vorgenommen werden, die mit !!! gekennzeichnet sind.
- ; Das Passwort taucht hier aus Sicherheitsgrⁿnden nicht auf.
- ; Man gibt es stattdessen per Hand im Anwahlfenster des DF▄-Netztwerks ein.
- ; Es wird dann automatisch ⁿber die Variable $PASSWORD in dieses
- ; Script ⁿbernommen
-
- proc main
-
- ; VT 100 mit der Zeichenfolge "." und [Return] aktivieren.
- ; --------------------------------------------------------
- ; Die Zeile "transmit ".^M" kann bei ISDN-Terminaladaptern entfallen,
- ; aber hier muss der VT-100-Modus per AT-Befehl in der erweiterten Modem-
- ; Konfiguration eingetragen werden.
- ; Bei ELSA ISDN TL,TD mit "\N8" und bei Elinks mit "&B53" (neueres EPROM noetig!)
-
- delay 1
- transmit ".^M"
-
- ; Kennung senden
- ; --------------
-
- delay 1
-
- ; !!! In die folgende Zeile die 12-stellige Benutzerkennung eintragen
-
- transmit "............"
-
- ; Datex-J-Nummer
- ; --------------
-
- waitfor "[?25h"
-
- ; !!! Nur wenn Sie die Anschlussfreizuegigkeit eingeschaltet haben,
- ; kommt in die folgende Zeile die gewünschte Datex-J-Nummer gefolgt
- ; von einem "^M" fuer [Return] zum Abschluss der Feldeingabe.
- ; Bei normalen Anschlusseinstellungen kann das Feld leer bleiben.
-
- transmit ""
-
- ; Mitbenutzernummer senden
- ; ------------------------
-
- ; !!! Aendern Sie die folgende Zeile, wenn Sie sich unter einer
- ; anderen Mitbenutzer-Nummer als der Nummer 0001 des Hauptbenutzers
- ; eines T-Online/Datex-J-Anschlusses einloggen wollen.
-
- transmit "0001"
-
- ; Passwort senden
- ; ---------------
-
- ; hier gibt es nichts einzutragen, weil sich das Skript das Passwort
- ; aus dem Feld "Kennwort" des Zugangsfensters einer DFUe-Netzwerk-Verbindung
- ; holt. Geben Sie dort Ihr Passwort fuer T-Online ein.
-
- waitfor "[?25h"
- transmit $PASSWORD
- transmit "^M"
-
- ; HDT ausschalten
- waitfor "[?25h"
- delay 1
- transmit "*53#"
- ; Gateway-Seite aufrufen
- waitfor "[?25h"
- delay 2
- transmit "*190144100#"
- waitfor "ER-Verb"
- transmit "19"
- ; IP-Adresse abfragen
- delay 1
- waitfor "STATUS OK"
- transmit "LIN^M"
- transmit "OK^M"
- waitfor "YOURIP"
- set ipaddr getip
-
- endproc