А вдруг кому надо (треугольник Серпинского)

[Vladson]

Sergey, не, вот тут мимо, демки должны быть или "супер" или "никак", так как по превому я не умею, лучше буду делать их по второму...

Я кстати и под x86 её переписал, так что если кому интересно...

.model	tiny
.code
.startup
.8086
start:
	mov	ax,0013h
	int	10h
	mov	ax,0A000h
	mov	es,ax
	mov	ax,0001h
	mov	bx,0003h
	mov	cx,0000h
	mov	dx,0000h
rand_ax_bx:
	add	ax,bx
	rol	ax,01h
	add	bx,ax
	rol	bx,01h
go_sub:
	push	ax
	and	ax,3
	cmp	ax,1
	je	sub1
	cmp	ax,2
	je	sub2
	cmp	ax,3
	je	sub3
	pop	ax
	jmp	rand_ax_bx
sub1:
	add	dx,00A0h
	shr	dx,01h
	shr	cx,01h
	jmp	draw
sub2:
	add	dx,0140h
	shr	dx,01h
	add	cx,00C8h
	shr	cx,01h
	jmp	draw
sub3:
	shr	dx,01h
	add	cx,00C8h
	shr	cx,01h
draw:
	push	dx
	mov	ax,0140h
	mov	di,cx
	mul	di
	mov	di,ax
	pop	dx
	add	di,dx
	pop	ax
	mov	es:[di],ah
	jmp	rand_ax_bx
.data
end