shrinking c.asm
[vtuts] / dos1 / c.asm
index fdba3c0..d7a228f 100644 (file)
@@ -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