Assembler äëÿ íà÷èíàþùèõ
Óñòàíîâêà DS íà ñåãìåíò
0000 01 INPUT FCB <1,'FIG6-14','INP'>
0001 464947362D313420
0009 494E50
000C 0000
000E 0080
0010 00000000
0014 0000
0016 000A[
??
]
0020 00
0021 00000000
0025 02 OUTPUT FCB <2,'EXAMPLE','TST'>
0026 4558414D504C4520
002E 545354
0031 0000
0033 0080
0035 00000000
0039 0000
003B 000A[
??
]
0045 00
0046 00000000
004A STRUCTURES PROC FAR
004A 1E PUSH DS ; Óñòàíîâêà àäðåñà âîçâðàòà
004B B8 0000 MOV AX,0
004E 50 PUSH AX
004F 0E PUSH CS ; Óñòàíîâêà DS íà ñåãìåíò CODE
0050 1F POP DS
ASSUME DS:CODE
0051 8D 16 0000 R LEA DX,INPUT ; Îòêðûòèå ââîäèìîãî ôàéë
Ôèã. 6.14 Ñòðóêòóðû (ïðîäîëæåíèå)
0055 B4 0F MOV AH,0FH
0057 CD 21 INT 21H
0059 8D 16 0025 R LEA DX,OUTPUT ; Ñîçäàíèå âûâîäèìîãî ôàéëà
005D B4 16 MOV AH,16H
005F CD 21 INT 21H
0061 8D 1E 0000 R LEA BX,INPUT
0065 C7 47 0E 0010 MOV [BX].RECORD_SIZE,16 ; Óñòàíîâêà ðàçìåðà çàïèñè äëÿ ââîäà
006A C6 47 20 01 MOV [BX].SEQ_NUMBER,1 ; Ïðîïóñê ïåðâîé çàïèñè
