home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Dr. CD ROM (Annual Premium Edition)
/
premium.zip
/
premium
/
DOSGRAPH
/
GIFDSK45.ZIP
/
SAMPLE.CMD
< prev
Wrap
OS/2 REXX Batch file
|
1992-11-21
|
2KB
|
58 lines
*
* GIFDESK command language
*
* These are comment lines (either '*' or ';' prefix comment lines in col. 1)
*
* AVAILABLE COMMANDS: (MUST START IN COLUMN 1)!
* (** = new command to this version)
* 1ARRANGE ; like F1, arrange in 1x1 format
* 2ARRANGE ; like F2, arrange in 2x2 format
* 3ARRANGE ; like F3, arrange in 3xn format
* 4ARRANGE ; like F4, arrange in smallest format
* BACK ; previous page of pictures
** CLOCK=n ; delay n seconds before doing next command
* DOWNRES ; down to next resolution 1024x768 -> 800x600 -> 640x480
* EXIT ; exit GIFDESK
* FIRST ; move to 1st screen of pictures
* GRAY ; toggles gray/color. Initial mode is color
** IFBEG lab ; if current screen is first set of pictures, goto label
** IFEND lab ; if current screen is last set of pictures, go to label
** JUMP lab ; jump to a label in the command file (label preceded by :)
** KEYWAIT ; wait for user to hit a key before doing next command
* LAST ; move to last screen of pictures
* NEXT ; next page of pictures
* PRINT ; prints screen to LaserJet on LPT1 (use REDRAW prior ro PRINT)
** QUIT ; "quit" to GIFDESK and allow use of all normal key functions
* ; (now user has full control of GIFDESK and must exit himself)
* REDRAW ; allow screen to paint. Use before WRITE or PRINT
* SKIP=n ; skips to files starting with n
* TOGGLE ; switch into next arrangement format
* UPRES ; up to next resolution 640x480 -> 800x600 -> 1024x768
* WRITE ; write screen out to GIF file GIFDSKnn.GIF (use REDRAW prior to WRITE)
;
; Sample file:
;
*** switch to 1x1 ***
1ARRANGE
*** go to last picture ***
LAST
*** draw last picture and display for 2 seconds ***
REDRAW
CLOCK=2
** label for looping to ***
:lb1
*** backup up one picture ***
BACK
*** draw it ***
REDRAW
*** if all done (at beginning) go to endit label ***
IFBEG endit
*** let it display for 2 seconds ***
CLOCK=2
*** go to lb1 label to continue ***
JUMP lb1
*** endit label to end at ***
:endit
*** exit back to DOS ***
ESC