home *** CD-ROM | disk | FTP | other *** search
/ Black Box 4 / BlackBox.cdr / ibm1 / do101j2.arj / CLOCK.SCR < prev    next >
Encoding:
Text File  |  1991-12-21  |  1.4 KB  |  42 lines
  1. /STOP CLOCKSTOP
  2. .pg wi full clr cy
  3.     COMMAND NAME»gray«: »%t« SetClock »ye«
  4.  
  5.     /CLOCK {ON|OFF} [{Row} {Column}|STD]
  6. /cw
  7.     »%t«SetClock»#« displays a »ma«digital clock»#« on the screen.
  8.     This command will put one in this square -> »ye«┌────────────┐»#«
  9.     Press »bo«<enter>»#« to display the clock.        »ye« │            │
  10.                                                 └────────────┘»#«
  11. |/CLOCK ON 7 52
  12. .pa 3 go 1 2
  13. "    The »cy«{Row}»#« and »cy«{Column}»#« are »re«absolute»wh« for    "
  14.     the screen»#« and are »re«not»#« affected by any
  15.     »ye«Windows»#« currently in place.
  16.  
  17.     If »cy«{row}»#« and »cy«{column}»#« have never been entered,
  18.     the clock will be displayed at row »ye«1»#« column »ye«70»#«.
  19.     The parameter »cy«STD»#« will reset the display to row »ma«1»#« column »ma«70»#« and
  20.     display the clock.
  21. .pg wi 1 10 80 25 clr
  22.  
  23.     Let's move the clock to its standard position at row »cy«1»#« column »cy«70»#«
  24.     using the STD parameter. Press »bo«<enter>»#« to execute the command.
  25.  
  26. |/CLOCK STD
  27.  
  28.     And set it back . . .
  29.  
  30. |/CLOCK ON 7 52
  31.  
  32.     The clock will continue to run until a »%t«/CLOCK OFF»#« command
  33.     is encountered.  Press »bo«<enter>»#« to execute the command.
  34.  
  35. |/CLOCK OFF
  36. .pa 2 wh
  37.     Notice that the clock was »re«not»wh« erased, merely turned off.»#«
  38. :ClockStop
  39. * Assure that the clock is turned off is user aborts script
  40. /CLOCK OFF
  41. /ENDEXEC CLEAR
  42.