.Model Small
.Stack
.Data s db 'Chao mung ban den voi forum CDT$'
.Code
Begin:
Mov ax,@data
Mov ds,ax
Mov ah,0 ;dat che do man hinh 80x25
Mov al,3
Int 10h
Mov bh,0 ;thiet lap so trang
Mov dl,0 ;dat cot
Mov dh,15 ;dat dong Lap:
Mov ah,02h ;dat vi tri con tro
Int 10h
push dx
Mov ah,2 ;xuat khoang trang
mov dl,32
int 21h
pop dx
inc dl
mov ah,2 ;dat lai vi tri con tro
int 10h
push dx
lea dx,s ;xuat chuoi s
Mov ah,9
Int 21h
call Delay
pop dx
cmp dl,72
jne k
mov dl,0 K:
mov ah,1
int 16h
jz Lap
Mov ah,4Ch ;thoat khoi chuong trinh tro ve DOS
Int 21h
Delay Proc
Push cx
Mov cx,0ffffh
for1:
Push cx
Mov cx,01ffh
for2:
loop for2
Pop cx
Loop for1
Pop cx
Ret
Delay EndP
End Begin
Tiêu đề: Cho chữ chạy ngang màn hình 
