home *** CD-ROM | disk | FTP | other *** search
/ Programmer 7500 / MAX_PROGRAMMERS.iso / INFO / C / JAZLIB.ARC / JZPSHSCR.DMO < prev    next >
Encoding:
Text File  |  1986-07-24  |  804 b   |  54 lines
  1. #include <keys.h>
  2. #include <jzscreen.h>
  3. #include <gscreen.h>
  4. #include <jaz.h>
  5. #include <jzpshscr.h>
  6. main()
  7. {
  8.  
  9.   jzpshscr();
  10.   jzclreol(0,0,7);
  11.   jzclreol(24,0,7);
  12.   jzloccur(0,0);
  13.   jzscrprn("Press a key to stop scrolling",0,0,BLINK + RED);
  14.   jzbeep();
  15.   window(4,20,16,60);
  16.   color(DARKGRAY,LIGHTGRAY);
  17.   jzclrscr();
  18.   locate(0,0);
  19.  
  20.   do
  21.     jzwrite(" this is a test of the emergency broadcast system ");
  22.   while (!jzkeyprs());
  23.  
  24.   CLEARKBD;
  25.  
  26.   jzdelay(18);
  27.  
  28.   jzpshscr();
  29.  
  30.   window(10,50,15,75);
  31.   color(RED,BLUE);
  32.   jzclrscr();
  33.   locate(0,0);
  34.  
  35.   do
  36.     jzwrite("\nthis is a test of the emergency broadcast system");
  37.   while (!jzkeyprs());
  38.  
  39.   CLEARKBD;
  40.  
  41.   jzdelay(18);
  42.  
  43.   jzpopscr();
  44.  
  45.   jzdelay(18);
  46.  
  47.   jzpopscr();
  48.  
  49.   jzdelay(18);
  50.  
  51.   jzpopscr();
  52. }
  53.  
  54.