DATASSEGMENTXDB0DATASENDS;--------------------------------CODESSEGMENTASSUMECS:CODES,DS:DATASSTART:MOVAX,DATASMOVDS,AXI0:MOVAH,1INT21HCMPAL,0DHJZL1CMPAL,'0'JBI0CMPAL,'9'JAI0SUBAL,30HMOVX,ALI1:MOVAH,1INT21HCMPAL,0DHJZL1CMPAL,'0'JBI1CMPAL,'9'JAI1SUBAL,30HMOVBH,ALMOVAL,XMOVBL,10MULBLADDAL,BHMOVX,AL;--------------------L1:MOVDL,10MOVAH,2INT21HMOVDL,13INT21H;--------------------MOVAL,XMOVAH,0MOVBL,16DIVBLADDAL,30HMOVDL,ALPUSHAXMOVAH,2INT21HPOPAXCMPAH,10JBL3ADDAH,07HL3:ADDAH,30HMOVDL,AHMOVAH,2INT21HEXIT:MOVAH,4CHINT21HCODESENDSENDSTART