here is my assembly code i just want step 7(checking for three similar letters and coloring)

simple code for university students

1- The box should be in the middle of the screen 2- A blinking cursor appears in the corner of the box 3- Players control the cursor position using keyboard arrows ( ) 4- The cursor cannot go outside the 55 box 5- Ever time "enter" key is pressed, letter (A or B) is displayed 6- Player A and player B take turns 7- Once three similar letters are adjacent (vertically or horizontally), the letter are colored RED, and a message denoting which player won appears) - data var1 db b var2 db b saveL5c db 25 array db 25 dup(b) index1 db b index2 db -code mou ax, eda mou ds, ax mou d1, 36 mou dh,9 mou ah, 2h int 10h mou ah, 2 mou d1,201 int 21h nou cx,5 L1: mov ah, 2 mou dl.205 int 21h^ loop L1 nou ah, 2 mou dip 187 mou ah,2 mou d1,200 int 21h mou cxn 5 L3: mou ah, 2 mou di, 205 int 21h loop 13 mou ah, 2 mou d1, 188 int 21h L4: mov d 1,42 mou dh.bl mou ah, D2h int 10h nou ah,2 nou d1, 186 int 21h inc b 1 loop 14 now d1,3? nou dh. 10 mou ah, b2h int 10h nou uar1.3? nov var2, 10 mov cx, 25 mou si,g L5 : mou ah, 0 int 16h cmp ax, 4d00h je checkright cap ax,4b0h je checkleft cnp ax, 4800h je checkup cnp ax. 5000h je checkdoun cmp ax, 1CDh je checkprint 100p L5 checkright: nou b1, war1 cnp b1,41 jae L5. jnp moveright moveright: inc var1 nou d , var1 nou dh, var2 nou ah,b2h int 10h jnp L5 checkleft: now b1, war1 cnp b1, 3 ? jnp noveleft moveleft: dec uar1 mou d1, uar1 mov dh, uar2 mou ah, 2h int 1h jmp L5 checkup : mou b1, var2 cmp b 1.10 jbe L5 jnp moveup moveup: dec var2 mov d1,var1 mou dh, var2 nou ah, 02h int 10h jnp L5 checkdown : mou b 1,var2 cmp b1. jae L5 jnp novedown movedown : inc var2 nou d , var1 nou dh, var2 nou ah, b2h int 10h jnp L5 checkprint: mou b1, Uar1 cinp b1,42 jmp printlet printlet: mou b1, var1 mou index1;bl sub index1.25h mou bh, b mou bl, indext mou b1, var2 mou index2,bl sub index2, Bah mov ah, b mou a 1, index2 mou si,ax nou cx,bx cmpcx, je exit L6: add si,5 100pL6 exit: mou bl. saveL5c and bl. 01H jp player1: mou ah, 2 nou dl', B ' int 21h mou array[si],2 inc var1 dec bl mou saveL5c,bl nou ch, b nou c l. saveL5c jmp L5 player1: mov ah,2 mou d1, A ' int 21 h mou array[si], 1 inc uar1 dec bl mou saueL5c,bl mou ch. mou c1, saveL5c jmp L5