org 256

	mov ah,0fh
	int 10h
	cbw
	push ax
	mov al,13h
	int 10h

	xor ax,ax
	xor bx,bx
	xor cx,cx
	mov dx,1800h
	mov si,164
	mov di,1010h
color	push cx
	mov cl,ah
	xchg ax,di
	int 10h
	pop cx
	xchg ax,di
	add ax,si
	add cx,byte 64
	add dx,byte 28h
	dec si
	inc bl
	jnz color

	cld
	mov ax,0a000h
	mov ds,ax
	mov es,ax
	mov cx,320*199
	mov di,320
	mov si,di
fill	mov dx,11
	mul dx
	add al,ah
	and al,127
	xchg ax,bx
	sub al,63
	add al,bl
	add al,[di-320]
	rcr al,1
	stosb
	xchg ax,bx
	loop fill

	mov cx,320*200
pie	dec di
	mov ax,di
	xor dx,dx
	div si
	push ax
	push dx
	mul al
	xchg ax,dx
	shr ax,1
	mul al
	sub ax,dx
	and ah,40h
	pop dx
	pop ax
	jnz skip
	xor al,dl
	mov [di],al
skip	loop pie

	mov ah,8
	int 21h
	pop ax
	int 10h
	ret