SCREEN.GIF
K0100:
MOV SI,0 ;;rest values
MOV DI,0
MOV AX,0
MOV BX,0
MOV CX,0
MOV DX,0
MOV BP,0
K0115:
CLC
INC AX ;;add 1
CMP AX,0
JNZ K0150
INC BX ;;add ax's carry
CMP AX,0
JNZ K0150
CMP BX,+0
JNZ K0150
INC CX ;;add bx's carry
CMP AX,0
JNZ K0150
CMP BX,+0
JNZ K0150
CMP CX,+0
JNZ K0150
INC DX ;;add cx's carry
CMP AX,0
JNZ K0150
CMP BX,+0
JNZ K0150
CMP CX,+0
JNZ K0150
CMP DX,+0
JNZ K0150
INC BP ;;add dx's carry
NOP
NOP
NOP
K0150:
PUSH AX ;;store all registers
PUSH BX
PUSH CX
PUSH DX
PUSH BP
PUSH AX ;;prepare for printing
PUSH BX
PUSH CX
PUSH DX
PUSH BP
MOV CH,05 ;;5x16=80 char
K015C:
POP BX ;;pop a register for printing
MOV CL,10 ;;print 16bits
K015F:
MOV DL,30
CLC
SHL BX,1 ;;each bit
ADC DL,00
MOV AH,02 ;;print binary
INT 21
DEC CL
JNZ K015F ;;loop bits
DEC CH
JNZ K015C ;;loop registers
POP BP
POP DX
POP CX
POP BX
POP AX
JMP K0115 ;non stop
;;let us know how long it takes to reach your screen/s capacity