Modify the program below so that it uses direct scaled index.

X WORD 4, 16, 100, -116, -68, -104 Y WORD lengthof X DUP (0) ;Address of x is ;Address of Y is ; ESI = ; EDI = MOV ESI, offset X MOV EDI, offset Y MOV EBP, O MOV cx, lengthof x ; ECX = Ll: ;AX = MOV AX, [ESI+2*EBP] MOV [EDI+2*EBP], AX INC EBP LOOP LI ; EBP i X WORD 4, 16, 100, -116, -68, -104 Y WORD lengthof X DUP (0) ;Address of x is ;Address of Y is ; ESI = ; EDI = MOV ESI, offset X MOV EDI, offset Y MOV EBP, O MOV cx, lengthof x ; ECX = Ll: ;AX = MOV AX, [ESI+2*EBP] MOV [EDI+2*EBP], AX INC EBP LOOP LI ; EBP