home *** CD-ROM | disk | FTP | other *** search
/ Crawly Crypt Collection 1 / crawlyvol1.bin / utility / misc / gloss_it / hello.asc < prev    next >
Text File  |  1987-04-21  |  746b  |  47 lines
  1. #include <VDI.H>
  2. #include <AES.H>
  3.  
  4. int    contrl[12];
  5. int    intin[128];
  6. int    ptsin[128];
  7. int    intout[128];
  8. int    ptsout[128];
  9. int    work_in[11];
  10. int    work_out[57];
  11. int    SwApplId;
  12. int    SwVdi;
  13.  
  14.  
  15. /*--------------------------------------
  16.  * alert
  17.  */
  18. void alert()
  19.  {
  20.  form_alert(1,"[3][| Hello world ][ OK ]"); 
  21.  }
  22.  
  23. /*--------------------------------------
  24.  * main 
  25.  */
  26. main()
  27.  {
  28.  int swX, swY, swW, swH;
  29.  char ub;
  30.  
  31.  if ((SwApplId = appl_init()) == -1) {
  32.   return (0);
  33.   }
  34.  SwVdi = graf_handle(&swX, &swY, &swW, &swH);
  35.  for (ub = 0; ub < 10; ub++)work_in[ub] = 1;
  36.  work_in[10] = 2;
  37.  v_opnvwk(work_in, &SwVdi, work_out);
  38.  if (SwVdi) { 
  39.   
  40.   alert();
  41.  
  42.   }
  43.  v_clsvwk(SwVdi);
  44.  appl_exit();
  45.  }
  46.  
  47.