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
