Assembler



         

- 10


0060 88 05 MOV [DI], AL
0062 81 C7 2000 ADD DI, 2000H ;
0066 D2 E8 SHR AL, CL ;
0068 88 05 MOV [DI], AL
006A 81 EF 1FB0 SUB DI, 2000H-80 ;
006E D2 E8 SHR AL, CL
0070 88 05 MOV [DI], AL
0072 81 C7 2000 ADD DI, 2000H ;
0076 D2 E8 SHR AL, CL
0078 88 05 MOV [DI], AL
007A 81 EF 1FAF SUB DI, 2000H-81 ; ,
007E FE CB DEC BL ;
0080 75 DC JNZ DOT_LOOP
 
;----- 80*25
 
0082 B8 0002 MOV AX, 2
0085 CD 10 INT 10H
0087 CB RET
0088 COLOR_GRAPHICS ENDP
0088 CODE ENDS
END
 
. 8.12 ()
 
-
. - 03D8H.

. , 5
"0" 16 ,
5 "1" 7- .
, ,