/*****************

    Demo-Arexx-Script für IR-Master

    Verwendung:

    - Projekt "NewFeatures.irm" starten.
    - Shellfenster öffnen und eingeben:
       CD IR-Master_Registered:ARexx
       rx ARexxDemo.rexx

******************/

ADDRESS 'New_rexx'                /* Achtung: Groß-/Kleinschreibung beim
                                  Host-Namen beachten! */

/* Das Ziel der folgenden Kommandos ist jetzt durch den ADDRESS-Befehl
   fgestgelegt, d.h. jetzt kann man direkt Kommandos an den AREXX-Port
   des Projektes NewFeartures schicken: */

say
Say "Das Fenster wird nach 100,100 verschoben"
address command wait 2              /* shell-befehl "wait 2" ausführen -> 2 sec warten */
IR_MOVE 100 100                     /* Fenster nach 100,100 verschieben */

say
Say "Das Fenster wird geschlossen"
address command wait 2
IR_DISAPPEAR                        /* Fenster schlißen (Projekt bleibt aber aktiv) */

say
Say "Das Fenster wird wieder geöffnet"
address command wait 2
IR_APPEAR                           /* Fenster wieder öffnen */

say
Say "Tastendruck auf das Symbol »Start other Project«"
address command wait 2
IR_SEND '$Start other project'      /* Taste "drücken" */
address command wait 2

say
Say "Tastendruck auf das Symbol »Quit other Project«"
address command wait 2
IR_SEND '$Quit other project'   /* Wieder eine Taste "drücken" */

say
Say "New.irm wird jetzt beendet"
address command wait 2
IR_QUIT                             /* Projekt beenden */

exit