home *** CD-ROM | disk | FTP | other *** search
/ PC World Komputer 1996 September / PCWK996.iso / demo / wgelectr / pk51demo / files.2 / EXAMPLES / MEASURE / STATUS.INC < prev   
Encoding:
Text File  |  1995-06-08  |  543 b   |  16 lines
  1. /****************************/
  2. /* CREATE A STATUS FUNCTION */
  3. /****************************/
  4.  
  5. FUNC void status()  {
  6.   printf ("save_record[0].port5=%02XH\n", save_record[0].port5);
  7.   printf ("DPTR=%04XH, ACC=%02XH, B=%02XH\n", dptr,acc,b);
  8.   printf ("R0=%02XH(%d), R1=%02XH(%d)\n", r0,r0,r1,r1);
  9.   printf ("Analog-Input-0:  %f\n", ain0);
  10.   printf ("Register-Bank:   %d\n", (psw & 0x18) >> 3);
  11.   printf ("Program Counter: %04XH\n", $);
  12.   printf ("ACTUAL XDATA-MAPPING:\n");
  13.   exec ("MAP");
  14. }
  15. /* END OF INCLUDE-FILE STATUS.INC */
  16.