home *** CD-ROM | disk | FTP | other *** search
/ Amiga ISO Collection / AmigaUtilCD1.iso / Fax / MULTIFAX3.0TKR.DMS / in.adf / Rexx / Beispiel.mfx next >
Encoding:
Text File  |  1992-09-21  |  1.3 KB  |  45 lines
  1. /* Beispiel für die Nutzung des ARexx-Port von MultiFax professional */
  2.     /* Adressieren des AmigaDOS */
  3. address command
  4.     /* Start des Desk-Moduls */
  5. 'Run Desk' "-rx"
  6.     /* Start des Arexx-Servers von MultiFax professional */
  7. 'Run MFRexx'
  8.     /* Wartezeit von 10 Sekunden */
  9. 'Wait' "10 secs"
  10.     /* Adressieren des MultiFax professional */
  11. address 'MultiFaxRexx'
  12.     /* ARexx-Result-Option einschalten */
  13. options results
  14.     /* Abfrage der Versionsnummer von MultiFax professional */
  15. 'version'
  16.     /* Ausgabe der Versionsnummer */
  17. say result
  18.     /* Hinzufügen der Datei "ARexx.dok" in die Liste im Desk-Modul */
  19. addfile "ARexx.dok"
  20.     /* Hinzufügen der Datei "Parameter/Fax.INF" in die Liste im Desk-Modul */
  21. addfile "Parameter/Fax.INF"
  22.     /* Setzen der Empfänger-Daten für den Versand */
  23. setphone "@Name@Vorname@Zusatz@Faxnummer@Strasse@PLZ/Ort@Anwender1@Anwender2@"
  24.     /* Versand auf "Anrufen" schalten */
  25. phonemode 0
  26.     /* Adressieren des AmigaDOS */
  27. address command
  28. 'Wait' "5 secs"
  29.     /* Adressieren des MultiFax professional */
  30. address 'MultiFaxRexx'
  31.     /* Dieses Fax dem Versand übergeben */
  32. sendfax
  33.     /* Liste im Desk-Modul löschen */
  34. clearlist
  35.     /* Adressieren des AmigaDOS */
  36. address command
  37. 'Wait' "10 secs"
  38.     /* Adressieren des MultiFax professional */
  39. address 'MultiFaxRexx'
  40. lastfaxfile
  41. say result
  42.     /* Alle Module des Multifax professional einschl. des */
  43.     /* ARexx-Servers schließen */
  44. exitall
  45.