X-Git-Url: http://git.mutantstargoat.com/user/nuclear/?p=vtuts;a=blobdiff_plain;f=dos1%2Fc.asm;fp=dos1%2Fc.asm;h=d7a228f272c5d1f6a30da9cc08dd4859d53199a6;hp=fdba3c0d1681d78c67ed143517e3c6b0fbc0b7a1;hb=e410cee4738a4343308be88295af0abca8c9f1a2;hpb=8e0a308b85272b28b59e7db0079472a81f0fc2dc diff --git a/dos1/c.asm b/dos1/c.asm index fdba3c0..d7a228f 100644 --- a/dos1/c.asm +++ b/dos1/c.asm @@ -1,4 +1,4 @@ -; Lowest yet: 312 +; Lowest yet: 277 bits 16 %ifdef BOOTSECT @@ -16,10 +16,6 @@ RANDVAL equ code_end + 4 %macro WAIT_VBLANK 0 mov dx, 3dah -.inblank: - in al, dx - and al, 8 - jnz .inblank ; loop while vblank bit is 1 (in vblank) .notblank: in al, dx and al, 8 @@ -49,39 +45,20 @@ start: ; - bg color (0) ; - shadow color (1) ; - fractal color (2) - mov dx, 0x3c8 - xor al, al - out dx, al - inc dx - mov al, 10 ; 0: 40, 40, 80 - out dx, al - out dx, al - shl al, 1 - out dx, al - mov al, 4 ; 1: 16, 16, 32 - out dx, al - out dx, al - shl al, 1 - out dx, al - mov al, 18h ; 2: 96, 192, 96 - out dx, al - mov al, 48 - out dx, al - mov al, 18h - out dx, al + mainloop: call animate ; clear the framebuffer - xor al, al + mov al, 128 mov cx, 64000 xor di, di rep stosb ; draw shadow mov si, 5 - mov byte [setcol + 1], 1 ; shadow color + mov byte [setcol + 1], 199 ; shadow color call drawsierp ; draw fractal xor si, si