home *** CD-ROM | disk | FTP | other *** search
/ Fresh Fish 5 / FreshFish_July-August1994.bin / bbs / util / startup-menu-1.5.lha / Startup-Menu-1.5 / S / OMP_sminit.Rexx < prev    next >
Encoding:
OS/2 REXX Batch file  |  1992-09-02  |  1.5 KB  |  40 lines
  1. /* ARexx script for use with Startup-Menu. Starts up OctamedPlafer with
  2.    a random module. NOTE this script runs OctamedPlayer so that it is self
  3.    contained.
  4. */
  5.  
  6. /* Put in your own module names and paths here */
  7. Modules.1 = 'Apps:Data/GoodModsMeds/ACTONE.MED'
  8. Modules.2 = 'Apps:Data/GoodModsMeds/ACTTWO.MED'
  9. Modules.3 = 'Apps:Data/GoodModsMeds/LEGEND.med'
  10. Modules.4 = 'Apps:Data/GoodModsMeds/LIFE.med'
  11. Modules.5 = 'Apps:Data/GoodModsMeds/Lorraine.med'
  12. Modules.6 = 'Apps:Data/GoodModsMeds/Promise.med'
  13. Modules.7 = 'Apps:Data/GoodModsMeds/RavenTheme.med'
  14. Modules.8 = 'Apps:Data/GoodModsMeds/Say.med'
  15. Modules.9 = 'Apps:Data/GoodModsMeds/Song24.med'
  16. Modules.10 = 'Apps:Data/GoodModsMeds/TheBorder.med'
  17. Modules.11 = 'Apps:Data/GoodModsMeds/THISMUSTBEHEAVEN.med'
  18. Modules.12 = 'Apps:Data/GoodModsMeds/VisionOfLove.med'
  19. Modules.13 = 'Apps:Data/GoodModsMeds/WildAndLonely.med'
  20.  
  21. /* Get a random module. NOTE this random num is taken fromthe system clock.
  22.    Therefore if you don't have one the modules will be the same each time it
  23.    is launched from SM due to the system clock being approx. the same. */
  24. Randnum = random(1,13,time(s));
  25.  
  26. /* Get the corresponding module name */
  27. Selected = Modules.Randnum;
  28. CmdLine = 'Run >NIL: C:OctaMEDPlayer ' Selected
  29.  
  30. /* run it */
  31. ADDRESS COMMAND CmdLine;
  32.  
  33.  
  34. /* NOTE:
  35.     You could have run OctamedPlayer previous to this script and then used
  36.     loadmod Selected and play. But there is a problem with this OctamedPlayer 
  37.     requires a module to be given on the command line when it is started 
  38.     without a window :----<< */
  39.     
  40.