256字节大赛__3EM

.MODEL TINY.486.CODEORG 100hstart: mov al,13h int 10hstart2: push ax mov al,255pcol: mov dx,3c8h out dx,al inc dx xchg ax,bx out dx,al xchg ax,bx out dx,al out dx,al dec ax jnz pcol mov ax,cs add ax,1000h mov es,ax mov fs,ax mov al,1fh mov cx,32000 rep stosw mov bp,1000Aloop: mov cx,3000 call vsyncpyrandloop: call Random add di,ax and ax,0Fh add ax,0fh mov fs:[di],al loop randloop call smooth dec bp jnz Aloop dec clBloop: call vsyncpy mov bx,320rdline: call random and al,3Fh mov fs:[bx+64000-320],al dec bx jnz rdline call smooth loop Bloop pop ax cmp ax,13h jne finito xor ax,ax mov word ptr [offset notbx],9090h jmp start2 finito: mov ax,13h int 10h mov bl,80ltv2: call vsyncpy dec cxltv1: call Random add di,ax and al,0fh add al,0fh mov fs:[di],al loop ltv1 dec bx jnz ltv2

exit: mov ax,03h int 10h; mov ax, 4c00h; int 21h retRandom PROC push bx mov bx,[rnd1] mov ax,[rnd2] add ax,bx ror ax,1 mov [rnd1],ax mov [rnd2],bx pop bx retRandom ENDPSmooth PROC pusha mov bx,64000 xor cx,cxbukle: mov bp,bxnotbx: not bx add bx,64000 xor ax,ax xor dx,dx mov al,fs:[bx-1] mov dl,fs:[bx] add ax,dx mov cl,fs:[bx+1] mov dl,fs:[bx+320] add dx,cx add ax,dx shr ax,2 mov fs:[bx-640],al mov bx,bp dec bx jnz bukle popa retsmooth endpvsyncpy proc pusha mov dx,3DAhwvr: in al,dxtest al,8 jz wvr push 0a000h xor di,di xor si,si pop es mov ax,fs mov ds,ax mov cx,16000 rep movsd push cs pop ds popa retvsyncpy endprnd1 DW 3224hrnd2 DW 7F3AhEND start

.MODEL TINY.486.CODEORG 100hstart: mov al,13h int 10hstart2: push ax mov al,255pcol: mov dx,3c8h out dx,al inc dx xchg ax,bx out dx,al xchg ax,bx out dx,al out dx,al dec ax jnz pcol mov ax,cs add ax,1000h mov es,ax mov fs,ax mov al,1fh mov cx,32000 rep stosw mov bp,1000Aloop: mov cx,3000 call vsyncpyrandloop: call Random add di,ax and ax,0Fh add ax,0fh mov fs:[di],al loop randloop call smooth dec bp jnz Aloop dec clBloop: call vsyncpy mov bx,320rdline: call random and al,3Fh mov fs:[bx+64000-320],al dec bx jnz rdline call smooth loop Bloop pop ax cmp ax,13h jne finito xor ax,ax mov word ptr [offset notbx],9090h jmp start2 finito: mov ax,13h int 10h mov bl,80ltv2: call vsyncpy dec cxltv1: call Random add di,ax and al,0fh add al,0fh mov fs:[di],al loop ltv1 dec bx jnz ltv2exit: mov ax,03h int 10h; mov ax, 4c00h; int 21h retRandom PROC push bx mov bx,[rnd1] mov ax,[rnd2] add ax,bx ror ax,1 mov [rnd1],ax mov [rnd2],bx pop bx retRandom ENDPSmooth PROC pusha mov bx,64000 xor cx,cxbukle: mov bp,bxnotbx: not bx add bx,64000 xor ax,ax xor dx,dx mov al,fs:[bx-1] mov dl,fs:[bx] add ax,dx mov cl,fs:[bx+1] mov dl,fs:[bx+320] add dx,cx add ax,dx shr ax,2 mov fs:[bx-640],al mov bx,bp dec bx jnz bukle popa retsmooth endpvsyncpy proc pusha mov dx,3DAhwvr: in al,dxtest al,8 jz wvr push 0a000h xor di,di xor si,si pop es mov ax,fs mov ds,ax mov cx,16000 rep movsd push cs pop ds popa retvsyncpy endprnd1 DW 3224hrnd2 DW 7F3AhEND start