Barni assembly 1

ADAT    SEGMENT
ASZAM   DW  325
ADAT    ENDS

CODE    SEGMENT
    ASSUME DS:ADAT, CS:CODE
START:  MOV AX, ADAT
    MOV DS, AX
    MOV CX, 16
    MOV BX, ASZAM
    MOV AH, 2
CIKL:   XOR DL, DL  ;kinullázom DL-t
    ROL BX, 1   ;kiveszem BX legfelső bitét
    ADC DL, '0' ;és hozzáadom DL-hez, ami így vagy ASCII 1 vagy ASCII 0.(ADC = op1+op2+carryflag)
    INT 21H     ;ki
    LOOP CIKL   ;16-szor. :P
    MOV AH, 4CH
    INT 21H
CODE    ENDS
END START