SEGSEGMENT DATA1DB3 DATA2DB3,?,3DUP(?) ALFMONDB'???','$' MONTABDB'JAN','FEB','MAR','APR','MAY','JUN' DB'JUL','AUG','SEP','OCT','NOV','DEC' DSEGENDS ; SSEGSEGMENTSTACK'STACK' DB100DUP(?) SSEGENDS ; CSEGSEGMENT ASSUMECS:CSEG,DS:DSEG,ES:DSEG,SS:SSEG ; MAINPROCFAR START:MOV