home *** CD-ROM | disk | FTP | other *** search
/ Amiga Format 79 / af079sub.adf / Raystorm / ray.lzx / raystorm / arexx / chess.ray < prev    next >
Text File  |  1999-02-27  |  762b  |  38 lines
  1. /***************
  2.  * NAME:          chess.ray
  3.  * VERSION:       1.0 10.08.1995
  4.  * DESCRIPTION:   Chess scene
  5.  * AUTHORS:       Andreas Heumann
  6.  * BUGS:          none
  7.  * TO DO:         none
  8.  * HISTORY:       DATE     NAME  COMMENT
  9.  *                10.08.95  ah initial release
  10.  ***************/
  11.  
  12. OPTIONS RESULTS
  13.  
  14. IF ~SHOW('P','RAYSTORM') THEN DO  /* if not already running, start RayStorm */
  15.    ADDRESS COMMAND 'run >NIL: <NIL: /raystorm'
  16.    ADDRESS COMMAND WaitForPort RAYSTORM
  17. END  
  18.  
  19. ADDRESS RAYSTORM
  20.  
  21. TEXTUREPATH '/textures'
  22. OBJECTPATH '/objects'
  23.  
  24. SETSCREEN 160 128
  25. SETCAMERA '0 -250 -150  0 0 0  0 1 0  25 20'
  26. SETWORLD 0 0 0  20 20 20
  27. POINTLIGHT '80 -180 -160  255 255 255 SHADOW'
  28.  
  29. LOADOBJ 'chess.iob'
  30.  
  31. STARTRENDER QUICK
  32.  
  33. SAVEPIC 'chess.iff'
  34.  
  35. CLEANUP
  36.  
  37. exit 0
  38.