Как исправить ошибку?

[Gtnz8]

При компиляции этой простенькой программы выдает ошибку fatal error A1010:unmatched block nesting data1
masm из хатчевского пакета
.586
.model flat
option casemap:none
datal segment
src DB "Test String To Copy"
len EQU $-src
data1 ends
data2 segment public
dst DB len+1 DUP('+')
data2 ends
Как исправить чтобы заработало?
code segment
_seg_ex proc
assume CS:FLAT.DS:FLAT.SS:FLAT.ES:FLAT.FS: ERROR.GS:ERROR
mov ESI.offset data1
mov EDI.offset data2
cld
mov CX.len
rep movsb
mov EAX.offset data2
ret
_seg_ex endp
code ends
end

[Mikl___]

Gtnz8

.586
.model flat
option casemap:none
.code
start: mov ESI,offset src
         mov EDI,offset dst
         mov CX,len
         rep movsb
         mov EAX,offset dst
         retn
.data
src DB "Test String To Copy"
len EQU $-src
dst DB len+1 DUP('+')
end start

[Gtnz8]

Благодарю Mikl.

[Gtnz8]

Пример кода из учебника Крупника при компиляции почти в каждой строчке обнаружена ошибка, что здесь не так?

.386
.model flat.stdcall
includelib\masm32\lib\kernel32.lib
ExitProcess proto:DWORD
.code
start:
mov eax.2
add eax.3
invoke ExitProcess.0
end start

[Gtnz8]

Сам разобрался, для такого кода строчка includelib не нужна.
Я настырный всё равно докопаюсь.

[Mikl___]

Gtnz8
нужно быть не настырным, а внимательным, или сходить к окулисту -- и в первой, и во второй задаче у тебя стоят точки там, где должны быть запятые

[Gtnz8]

Да, вы правы с внимательностью прям беда, признаю за собою такой грех.
А зрение у меня 1.