     H2ASH      TASM: 

    FALSE	EQU  
    TRUE	EQU 1 
    NAMELEN	EOU 30 
    AODRLEN	EOU 30 
    CSZLEN	EQU 30 
    PHONELEN	EQU 13 

     H2ASH " "    : 

    typedef struct record { 
      union { 
        long numrecs; 
        long custnum; 
      } info; 
      char name[NAMELEN]; 
      char addr[ADDRLEN]; 
      char csz[CSZLEN]; 
      char phone[PHONELEN]; 
      double balance; 
   } Record; 

            H2ASH,   
   TASM: 

    tag$1UNION 
    numrecs	DD             ? 
    custnum	DD           ? 
    tag$1ENDS 

    record	STRUC 
    info tag$1 <>
    name DB 30 DUP ( ? ) 
    addr DB   30 DUP ( ? )
    csz DB     30 DUP ( ? )
    phoneDB  13 DUP ( ? )
    balance     DD   ?
    record	    ENDS 

         , ,  numrecs  
phone,  H2ASH    ,  tag$l.   
 ,       C++,    
  : 

    GLOBAL  CreateDB	:NEAR 
    GLOBAL  OpenDB	:NEAR 
    GLOBAL  ReadRecord	:NEAR 
    GLOBAL  WriteRecord	:NEAR 


       TASM 

      ,     . 
         Turbo Assembler. 
     TASM,       " ". 
      17.5   Timer()       
,     0000:046     
BIOS.     .    ,  
   Timer(). 

     17.5.  TESTTIME.CPP (  Tlmer())	

    1:   #include <conio.h> 
    2:   #include "timer.h" 
    3:
    4:  main() 
    5:  { 
    6:	while (!kbhit()) { 
    7:	  gotoxy( 1, wherey()); 
    8:	  cprintf("%ld" ,  Timer()); 
    9.  	} 
   10:  	getch(); //    
   11:	return 0; 
   12: }

         ,     
  Timer(),     .   2 
    ( 17.6). 


     17.    	449     
    15   C++4.5 
