mov ax, 9ch
mov ss, ax
mov sp, 4096d
mov ax, 7c0h
mov ds, ax
y_Pos: db 5    ;Cursor Y pos
x_Pos: db 5    ;Cursor X pos
Charecter db ' '
MainLoop:
mov ah, 02h
mov dh, [y_Pos]
mov dl, [x_Pos]
int 10h    ; Move the cursor
mov ah, 09h ; bl has the color already
mov al, byte[Charecter]
mov cx, 1d
int 10h   ;Draw the color at cursor
call Get_User_Input
cmp al, 'w'
je Up_Cursor
cmp al, 's'
je Down_Cursor
cmp al, 'a'
je Left_Cursor
cmp al, 'd'
je Right_Cursor
cmp al, 'c'
je Change_Color
cmp al, 'r'
je Change_Draw_Unit
jmp MainLoop
Up_Cursor:
cmp byte[y_Pos], 0
je MainLoop
dec byte [y_Pos]
jmp MainLoop
Down_Cursor:
cmp byte [y_Pos], 24
je MainLoop
inc byte [y_Pos]
jmp MainLoop
Left_Cursor:
cmp byte[x_Pos], 0
je MainLoop
dec byte[x_Pos]
jmp MainLoop
Right_Cursor:
cmp byte[x_Pos],79
je MainLoop
inc byte[x_Pos]
jmp MainLoop
Change_Color:
call Get_User_Input
cmp al, '1'
je BLU
cmp al, '2'
je BLA
cmp al, '3'
je GRE
cmp al, '4'
je AK
cmp al, '5'
je RED
cmp al, '6'
je PUR
cmp al, '7'
je YEL
cmp al, '8'
je WHI
BLU:
mov bl, 19d
jmp MainLoop
BLA:
mov bl, 08d
jmp MainLoop
GRE:
mov bl, 2ah
jmp MainLoop
AK:
mov bl, 3bh
jmp MainLoop
RED:
mov bl, 4ch
jmp MainLoop
PUR:
mov bl, 5dh
jmp MainLoop
YEL:
mov bl, 6eh
jmp MainLoop
WHI:
mov bl, 7fh
jmp MainLoop
Change_Draw_Unit:
call Get_User_Input
mov byte[Charecter],al
jmp MainLoop
Get_User_Input:
mov ah,00h
int 16h   ;Get user input
ret
times 510-($-$$) db 0
dw 0xAA55