STACKS  SEGMENT  STACK
        DW    100 DUP(?)
		TOP   LABEL WORD
		STACKS ENDS
		
DATAS   SEGMENT
		NUM1 DW 9,9,8,7,4,5,6,7,8,9
		NUM2 DW 6,4,5,6,7,8,9          ；定義兩個數字，首位存放num的長度，這兩個數字將用於做乘法運算
		S    DW  300H DUP(0)           ；s用於存放結果
		DATAS ENDS
		
CODES   SEGMENT
        ASSUME  CS:CODES,DS:DATAS,SS:STACKS
		MAIN  PROC FAR
		          MOV  AX,STACKS
			  MOV  SS,AX
			  LEA  SP,TOP
			  MOV  AX,DATAS
			  MOV  DS,AX
			  
		          LEA   SI,NUM1
			  LEA   DI,NUM2
			  LEA   BX,S
			  ADD   SI,2			  
			  ADD   DI,2         ；加2的原因是因為第一位是數字的個數，從第二個數字開始才是真正的數，因為是DW的所以需要+2
			  
			  MOV   CX,NUM1
		JIN1:     PUSH  [SI]
			  ADD   SI,2
   			  LOOP  JIN1
			  
			  LEA   SI,NUM1
			  ADD   SI,2
			  MOV   CX,NUM1
		CHU1:     POP   [SI]
		          ADD   SI,2
			  LOOP  CHU1          ；進棧出棧的目的是為了倒置該字串用於乘法運算
			  
		          MOV   CX,NUM2
		JIN2:     PUSH  [DI]
			  ADD   DI,2
   			  LOOP  JIN2
			  
			  LEA   DI,NUM2
			  ADD   DI,2
			  MOV   CX,NUM2
		CHU2:     POP   [DI]
		          ADD   DI,2
			  LOOP  CHU2          ；同上
			  
			   
		          LEA   SI,NUM1
			  LEA   DI,NUM2
			  LEA   BX,S
			  ADD   SI,2			  
			  ADD   DI,2
			  
		      MOV   CX,NUM1	     ；二重迴圈，把每個數都相乘，並存在s的對應位置，如果該位置裡有值，則加上該值
        L1:	      PUSH  CX	
		      MOV   CX,NUM2
        	      PUSH  BX
			  PUSH  DI
		L2:	  MOV   DX,[SI]
			  MOV   AX,[DI]
			  MUL   DX
			  ADD   DI,2
			  ADD   AX,[BX]
			  MOV   [BX],AX
			  ADD   BX,2
			
			  LOOP L2
			  POP  DI
			  POP  BX
			  ADD  BX,2
			  POP  CX
			  ADD  SI,2
			  LOOP L1
			
		     XOR   DX,DX         
		     LEA    BX,S
		     MOV    CX,NUM1
		     ADD    CX,NUM2          ；將s中每一個數除以10，餘數放回原位，商作為進位
 

                L4:      MOV    AX,[BX]

		         ADD    AX,DX
			 MOV    DL,10
			 DIV    DL
			 MOV    DL,AH
			 MOV    [BX],DX
			 MOV    DL,AL
			 
			 ADD    BX,2
			 LOOP L4 
		
		     
			 MOV    CX,NUM1
			 ADD    CX,NUM2
			 
			
		L5:  SUB    BX,2                ；逆序，輸出結果
		     MOV    DX,[BX]
			 ADD    DX,30H
			 MOV    AH,2
			 INT    21H
			 
			 LOOP L5
			  
		L10:  MOV   AH,4CH
			  INT   21H
			  MAIN  ENDP
			  CODES ENDS
			        END MAIN