          .586
          .MODEL  flat
		  
A         STRUCT
  S       BYTE    256 DUP (?)
A         ENDS

	  .CODE
	  public   CopyS
          externdef    Print:near
CopyS     proc
          push     EBP
          mov      EBP,ESP
          sub      ESP,256
          push     ESI
          push     EDI
		  
  	  mov      ESI,[EBP+12]
  	  lea      EDI,A.S[EBP-256]
          xor      EAX,EAX
  	  lodsb
   	  stosb
 	  mov      ECX,EAX
  	  cld
      rep movsb

  	  lea      ESI,A.S[EBP-256]
  	  mov      EDI,[EBP+8]
   	  lodsb
  	  stosb
  	  mov      ECX,EAX
      rep movsb

          pop      EDI
          pop      ESI

          push     EAX
          call     Print

          mov      ESP,EBP
          pop      EBP
          ret      8

CopyS     endp
          end		  