home *** CD-ROM | disk | FTP | other *** search
/ ST-Computer Leser-CD 1999 January / STC_CD_01_1999.iso / system / sysinfo / scripte / sys_ausg.sic < prev    next >
Text File  |  2000-01-08  |  1KB  |  42 lines
  1. // SysInfo Demo Script 2 (Ausgewählte Daten "An Ausgabe") (V0.02)
  2. // --------------------------------------------------------------
  3. // Urversion von Thorsten Bergner
  4. // Rahmentexte etc. von A. Schley
  5. //
  6. // Bisher ist dies nur eine Skizze der Möglichkeiten.
  7. // Vieles läßt sich in diesem Script noch professioneller und eleganter machen
  8. // Demnächst kommt sicher noch eine ausgefeiltere Version ;-)
  9.  
  10. print("Willkommen zum neuen SysInfo 4.40, das auch GEMScript unterstützt.");
  11. print();
  12. wait(400);
  13. print("Hier ein Script, welches ausgewählte Daten ins Clipboard schreibt");
  14. print();
  15. wait(400);
  16. print("Leider nur in der registrierten Version!");
  17. print();
  18. wait(400);
  19. print ("Viel Spaß!");
  20. print();
  21. wait(400);
  22. closewindow();
  23.  
  24. sysinfo.open( "Aus" );        // Ausgeben
  25. wait(200);
  26. kPlay.key( 0,  83, '', 118); // Delete
  27. kPlay.key( 8,  30,   0,  24); // ALT-'A'
  28. kPlay.key( 8,  47,   0, 175); // ALT-'V'
  29. kPlay.key( 8,  46,   0,  25); // ALT-'C'
  30. kPlay.key( 8,  45,   0, 145); // ALT-'X'
  31. kPlay.key( 8,  23,   0,  45); // ALT-'I'
  32. kPlay.key( 8,  24,   0,  53); // ALT-'O'
  33. kPlay.key( 0,  28,  13,   0); // Return/Enter
  34. wait(1000);
  35. sysinfo.quit( "" );           // Sysinfo beenden
  36.  
  37. print("und Tschüss...");
  38. wait(400);
  39. closewindow();
  40.  
  41. exit( 0 );                    // Script beenden
  42.