Assembler äëÿ íà÷èíàþùèõ
Àäàïòåð ìîíîõðîìíîãî äèñïëåÿ è ïðèíòåðà - ÷àñòü 3
Ôèã. 8.8 Ãîðèçîíòàëüíûé ñäâèã âïðàâî Page 1-1
PAGE ,132
TITLE Ôèã. 8.8 Ãîðèçîíòàëüíûé ñäâèã âïðàâî
0000 STACK SEGMENT STACK
0000 0040[ DW 64 DUP (?)
????
]
0080 STACK ENDS
0000 DISPLAY SEGMENT AT 0B800H
0000 DISPLAY_START LABEL WORD
0FA0 ORG 4000
0FA0 DISPLAY_END LABEL WORD
0FA0 DISPLAY ENDS
0000 CODE SEGMENT
ASSUME CS:CODE
0000 SIDE_SCROLL PROC FAR
0000 1E PUSH DS
0001 B8 0000 MOV AX, 0
0004 50 PUSH AX
0005 B8 ---- R MOV AX, DISPLAY
0008 8E D8 MOV DS, AX
000A 8E C0 MOV ES, AX
ASSUME DS:DISPLAY, ES:DISPLAY
;----- Çàïîëíåíèå ñòîëáöà 79 ïðîáåëàìè
Ôèã. 8.8 Ãîðèçîíòàëüíûé ñäâèã âïðàâî
000C B9 0019 MOV CX, 25
000F 8D 3E 004E R LEA DI, DISPLAY_START+78
0013 B8 0720 MOV AX, 720H
0016 BLANK:
0016 89 05 MOV [DI], AX
0018 81 C7 00A0 ADD DI, 160
001C E2 F8 LOOP BLANK
;----- Ñäâèã âïðàâî
