home *** CD-ROM | disk | FTP | other *** search
- # Mit diesem Script k÷nnen Sie Ihre Standard Logindaten Σndern
-
- if ![load $username]
- $username = "ppp-gast"
- end
- if ![username "Geben Sie bitte Ihren Usernamen ein:"]
- display "Setup abgebrochen."\n
- abort
- end
- if ![load $password]
- $password = ""
- end
- if [password "Geben Sie bitte Ihr Passwort ein:"]
- $A = $password
- $password = ""
- if [password "Geben Sie das Pa▀wort bitte nochmals ein:"]
- $B = $password
- if $A <> $B
- display "Das eingegebene Pa▀wort ist ungⁿltig."\n
- display "Daten wurden nicht gespeichert."\n
- abort
- end
- end
- end
- if ! [load $dialmode]
- $dialmode = "p"
- end
- if ![query $dialmode "WΣhlmodus: p (Impuls) oder t (Ton)"]
- display \n"Setup abgebrochen."\n
- abort
- end
- if $dialmode <> "p"
- if $dialmode <> "t"
- display "Unbekannter WΣhlmodus. Bitte nur t oder p eingeben."\n
- display "Daten wurden nicht gespeichert."\n
- abort
- end
- end
- save $dialmode
- save $password
- save $username
- display "Daten gespeichert!"\n
-