.model small
            .stack
            .data
            .code
;set video mode, define es
            mov ax,9ff0h
            mov es,ax
            mov ah,0
            mov al,13h
            int 10h
            
            mov ax,0c0ch    ;bright red as starting colour
            
;draw first line
first_line: mov cx,160
            rep stosw       ;draw with bright red

;draw sides            
            mov cx,198      ;for the next 198 lines
sides:      stosw           ;draw left side
            add di,316      ;jump to right side
            stosw           ;draw right side
            loop sides      ;next line

;draw last line            
last_line:  mov cx,160
            rep stosw       ;draw with bright red
            jmp kb          ;jump to keyboard event
            
kb:         mov ah,08h
            int 21h
            cmp al,71h      ;exit with q, otherwise loop
            jne kb

            .exit 0
            end