home *** CD-ROM | disk | FTP | other *** search
/ Boink! 1995 May/June / Image.bin / df_ / mailbox / point / xp300_1.exe / SCRIPTS.EXE / MAUS.SCR < prev    next >
Text File  |  1993-12-05  |  904b  |  25 lines
  1. # MAUS.SCR: kombiniertes Netcall- und Online-Script für MAUS-Boxen
  2.  
  3.           on      relogin goto relogin
  4. start:    read
  5.           on      "mausnet laeuft" goto abbruch
  6.           on      "werdaauchimmerhieranruft" goto abbruch
  7.           on      "(j/n)" goto login         # .. eingetragener Benutzer (j/n)
  8.           goto    start
  9.  
  10. abbruch:  delay   1
  11.           end     fail
  12.  
  13. login:    on      online send "J"            # .. eingetragener Benutzer: Ja
  14.           on      netcall send "MausTausch"  # MausTausch-Login
  15.           send    $USER cr
  16.           send    $PASSWORD cr               # Tausch-PW = Online-PW!
  17.           on      online end
  18.           goto    netcall
  19.  
  20. relogin:  send    "T"                        # Hauptmenüpunkt "Tausch"
  21.           delay   1
  22. netcall:  flush
  23.           send    $PROTOCOL                  # Protokoll-Kennung
  24.           waitfor "protokoll startet"
  25.