Advertisement
GraionDilach

Füzi 4

Dec 30th, 2011
146
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
  1. ADAT SEGMENT
  2. TOMB    DW  3456, 23332, 55555, 667, 5587, 12, 56556, 4444, 7777, 9856 ; TÍZELEMŰ TÖMB
  3. ADAT ENDS
  4.  
  5. CODE SEGMENT
  6.     ASSUME CS:CODE, DS:ADAT
  7. START:  MOV AX, ADAT
  8.     MOV DS, AX
  9.     MOV AH, 2
  10.     LEA SI, TOMB
  11.     MOV CX, 10
  12. CIKL:   MOV BX, [SI]
  13.     PUSH CX
  14.     MOV CX, 7
  15.     SHR BX, CL ; BX = YYYY YYYX XYYY YYYY --> 0000 000Y YYYY YYXX
  16.     POP CX
  17.     AND BX, 3 ; BX = 0000 0000 0000 00XX
  18.     CMP BL, 3 ; 3 = 0000 0011, TEHÁT HA EGYENLŐEK, AKKOR A SZÁMOT KI KELL ÍRNI
  19.     JNZ NEMIR
  20.     MOV BX, [SI]
  21.     ;AZ NEM VILÁGOS, MILYEN FORMÁTUMBAN KÉNE KIÍRNI, KÖZVETLENT VÁLASZTOTTAM
  22.     MOV DL, BH
  23.     INT 21H
  24.     MOV DL, BL
  25.     INT 21H
  26.     MOV DL, ' ' ; SZÓKÖZT KI ELVÁLASZTÁSRA
  27.     INT 21H
  28. NEMIR:  INC SI
  29.     INC SI
  30.     LOOP CIKL
  31.     MOV AH, 4CH
  32.     INT 21H
  33. CODE ENDS
  34. END START
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement