Найти ошибки в коде - Assembler

Формулировка задачи:

.model TINY
.code
.286
org 100H
StarsT:
; ВЄГЂЕЅ‚…ГЂГЏ…Е’ Е*?Е*ЕЅ‰ ГЂЕЅГ†…ГЃГЃЕЅГЂ - …ГЃ‹Гђ ГЃГ‚?ГЂ*… 286, Г‚ЕЅ ‡?ГѓГЃЕ*?…Е’ГЃГЏ
 push sp
 pop DX
 cmp DX,SP
 jz Is286
 
;§ГЃ‹Гђ …Г‚, Г‚ЕЅ ‚Г‹„?…Е’ ГЃЕЅЕЅГ‰…Гђ… Гђ ‚Г‹Г…ЕЅ„ГђЕ’
 lea DX, PCN
 jmp LastHi
;ВЄГЂЕЅ‚…ГЂГЏ…Е’ ГЂ…†ГђЕ’ VGA - …ГЃ‹Гђ … ЕЅ„„…ГЂ†Гђ‚?…Г‚ГЃГЏ, Г‚ЕЅ ‚Г‹Г…ЕЅ„ГђЕ’
Is286: mov AX, 01A00h
 int 10h
 cmp AL, 01Ah
 jne Bye
 lea DI, Starss
 mov CX, 600
 xor AL, AL
 rep stosw
;ГµГЃГ‚??‚‹Гђ‚?…Е’ ГЂ…†ГђЕ’ 13h
 mov AX, 0013h
 int 10h
 lea SI, Starss
;¤Г‹‡Г‹‚?…Е’ ЕЅ„ГЂЕЅЖ’ГЂ?Е’Е’Гѓ, Е*ЕЅГ‚ЕЅГЂ?ГЏ ‡?Ж’ГЂГѓ†?…Г‚ ЕЅ‚ГѓГЋ ?‹ГђГ‚ГЂГѓ Г†‚…Г‚ЕЅ‚
 call LoadP
 mov AX, 0A000h
 mov ES, AX
Hiding: call AdvS
 dec CS: Numbers
 jnz Hiding
 mov AH, 2
;ВЄЕЅЕ’…Г‰?…Е’ Е*ГѓГЂГЃЕЅ‚ ? ГЃ…ГЂ…„ГђГѓ ГЌЕ*ГЂ??
 xor BH, BH
 mov DX, 080Eh
 int 10h
 lea SI, World
 mov CX, 16
UUsTa: mov AH, 0Eh
 mov BL, 7
 lodsb
 int 10h
 dex CS:Tot
 loop UusTa
 lea SI, Colore
;©?Ж’ГЂГѓ†?…Е’ ?*Гѓ ?‹ГђГ‚ГЂГѓ Г†‚…Г‚ЕЅ‚
 call LoadP
;¦‹ГЏ ‹?‚ЕЅГЃГ‚Гђ ‡ЕЅ„? „…‹?…Е’ ‡?„…ГЂ†Е*Гѓ ‚ 1000 Г†ГђЕ*‹ЕЅ‚
Vell: mov CX, 1000
Ikka: call WaitV
 loop Ikka
 mov AX, 0f000h
 mov DS, AX
mov SI, 0fA6Eh
;¤Г‹‡Г‹‚?…Е’ ЕЅ„ГЂЕЅЖ’ГЂ?Е’Е’Гѓ ГЃЕ*ГЂЕЅ‹‹ГђЖ’?
 call Scroll
 call AdvS
 mov AH, 1
;ВЄГЂЕЅ‚…ГЂГЏ…Е’, ?†?Г‚? ‹Гђ Е*?Е*?ГЏ-ГђГѓ„ГЊ Е*‹?‚Гђ*?
 int 16h
 jz Veel
 xor AH, AH
 int 16h
;¤ЕЅ‡‚ГЂ?Г‰?…Е’ГЃГЏ ‚ Г‚…Е*ГЃГ‚ЕЅ‚Г‹‰ ГЂ…†ГђЕ’
 mov AX, 003h
 int 10h
Bye: push CS
 pop DS
ret
LastHi: mov AH, 9
 int 21h
 ret
; ВЄЕЅ„ГЂЕЅЖ’ГЂ?Е’Е’? ЕЅЕ*?‡? ‡‚…‡„
Advs: xor SI, SI
NextS: mov DI, CS:Starss.OldDi+SI
 mov AL, CS:Starss.OldC+SI
 mov ES:[DI], AL
 mov DI, CS:Starss.X+SI
 cmp CS:Starss.X+SI, 320
 jg SOut
 cmp CS:Starss.X+SI, 0
 jne GoodS
SOut: mov CX, 190
;¤Г‹‡Г‹‚?…Е’ ЕЅ„ГЂЕЅЖ’ГЂ?Е’Е’Гѓ Ж’……ГЂ?Г†ГђГђ ГЃ‹ГѓГ‡?‰ЕЅЖ’ЕЅ Г‡ГђГЃ‹?
 call Random
;Y - ГЃ‹ГѓГ‡?‰ЕЅ… Г‡ГђГЃ‹ЕЅ ‚ „Гђ??‡ЕЅ… 0...190
 mov CS:Starss.Y+SI, DX
 mov CX, 5
;¤Г‹‡Г‹‚?…Е’ Г‚Гѓ †… ЕЅ„ГЂЕЅЖ’ГЂ?Е’Е’Гѓ, ЕЅ „‹ГЏ ГЃЕ*ЕЅГЂЕЅГЃГ‚Гђ (0...5)
 call Random
 inc DL
 mov CS:Starss.Speed+SI, DL
 mov CS:Starss.X+SI, 1
mov DI, CS:Starss.X+SI
 
GoodS: mov BX, CS:Starss.Y+SI
 mov AX, 320
 mul BX
 add DI, AX
 mov BL, CS:Starss. Speed+SI
 xor BH, BH
 add CS:Starss.X+SI, BX
 add DI, BX
 mov AL, byte ptr [ES:DI]
 cmp AL, 7
 je Red 
 mov CS:Starss.OldC+SI, 0
 jmp NotOK
Red: mov CS:Starss.OldC+SI, AL
NotOK: mov byte ptr ES:[DI], BL
 mov CS:Starss.OldDI+SI, DI
 add SI, size Stars
 cmp SI, 400
 jg Alld
 jmp NextS
Alld: ret
;ГіЕЅ‡„?Гђ… ГЃ‹ГѓГ‡?‰ЕЅЖ’ЕЅ Г‡ГђГЃ‹?
;¤Г…ЕЅ„: CX - „Гђ??‡ЕЅ, ‚ Е*ЕЅГ‚ЕЅГЂЕЅЕ’ ГЃЕЅ‡„?…Г‚ГЃГЏ Г‡ГђГЃ‹ЕЅ
;¤Г‹Г…ЕЅ„: DX - ГЃ‹ГѓГ‡?‰ЕЅ… Г‡ГђГЃ‹ЕЅ
Random: push BX
 mov AX, CS:Seed
 mov BX, 9821
 imul BX
 inc AX
 ror AL, 1
 add AX, 8191
 rol AH, 1
 mov CS:Seed, AX
 xor DX, DX
 div CX
 pop BX
 ret
WaitV: mov DX, 3dah
@@1: in AL, DX
 test AL, 8
 jnz @@1
@@2: in AL, DX
 test AL, 9
 jz @@2
 ret
; ВЄГЂЕЅЖ’ГЂ?Е’Е’? ‡?Ж’ГЂГѓ‡Е*Гђ ?‹ГђГ‚ГЂГ‹ 
LoadP: mov DX, 3c8h
 mov AL, 1
 out DX, AL
 inc DX
 mov CX, 7*3
 rep outsb
 ret
Nexton: lodsb
 mov BL, 1
 shl BL, CL
 and AL, BL
 jz NoPix
 mov byte ptr ES:[DI], 7
NoPix: add DI, 320
 dec DL
 jnz Nexton
 dec CS:Reid
 cmp CS:Reid, 0
 jne Edasi
 mov CS:Reid, 8
 inc CS:Tot
 cmp CS:[Tot], 330
 jne Edasi
 mov CS:[Tot], 0
Edasi: ret
 
;ВЄЕЅ„ГЂЕЅЖ’ГЂ?Е’Е’? ГЃЕ*ГЂЕЅ‹‹ГђЖ’?
Scrool: cld
 push Es
 pop DS
 mov BL, 8
 mov SI, 61442
 mov DI, 61441
UUsrid: mov CX, 319
 rep movsb
 inc SI
 inc DI
 dec BL
 jnz Uusrid
 ret
;ВЄ…ГЂ…Е’…Г‹…
World db 'Welcom by Intro$'
Tot dw 14
Reid db 8
Seed dw 9821
StrN db 0
Numbers db 255
Colore db 20, 20, 20
       db 30, 30, 30
       db 35, 35, 35
       db 40, 40, 40
       db 50, 50, 50
       db 63, 63, 63
       db 63, 0,  0
PCN db 'Izvinite, no y vas slabui kompyter...', 10, 13, '$'
Stars STRUC
 X dw ?
 Y dw ?
 OldDI dw ?
 OldC db ?
 Speed db ?
Stars ENDS
Starss Stars 1 dup (?)
END StarsT

вот текст программы, переписывал с примера пишу tasm name.asm и вот выводит ошибки но в примере точь в точь так, в чем же ошибка то ?

Решение задачи: «Найти ошибки в коде»

textual
                            Листинг программы 
                        

                            ; masm dos com #
.model TINY
.code
.286
org 100H
StarsT: push sp
    pop DX
    cmp DX,SP
    jz Is286
    lea DX, PCN
    jmp LastHi
Is286:  mov AX, 1A00h
    int 10h
    cmp AL,1Ah
    jne Bye
    lea DI, Starss
    mov CX, 600
    xor AL, AL
    rep stosw
    mov AX,13h
    int 10h
    lea SI, Starss
    call LoadP
    mov AX,0A000h
    mov ES, AX
Hiding: call AdvS
    dec  Numbers
    jnz Hiding
    mov AH, 2
    xor BH, BH
    mov DX, 80Eh
    int 10h
    lea SI, World
    mov CX, 16
UUsTa:  mov AH, 0Eh
    mov BL, 7
    lodsb
    int 10h
    dec Tot
    loop UusTa
    lea SI, Colore
    call LoadP
Vell:   mov CX, 1000
Ikka:   call WaitV
    loop Ikka
    mov AX, 0f000h
    mov DS, AX
    mov SI, 0fA6Eh
    call Scrool
    call AdvS
    mov AH, 1
    int 16h
    jz Vell
    xor AH, AH
    int 16h
    mov AX,3
    int 10h
Bye:    ret
LastHi: mov AH, 9
 int 21h
 ret
Advs: xor SI, SI
NextS:  mov DI,[Starss.OldDi+SI]
 mov AL,[Starss.OldC+SI]
 mov ES:[DI], AL
 mov DI,[Starss.X+SI]
 cmp [Starss.X+SI], 320
 jg SOut
 cmp [Starss.X+SI], 0
 jne GoodS
SOut: mov CX, 190
 call Random
 mov [Starss.Y+SI],DX
 mov CX, 5
 call Random
 inc DL
 mov [Starss.Speed+SI], DL
 mov [Starss.X+SI], 1
mov DI,[Starss.X+SI]
 
GoodS: mov BX, [Starss.Y+SI]
 mov AX, 320
 mul BX
 add DI, AX
 mov BL, [Starss. Speed+SI]
 xor BH, BH
 add [Starss.X+SI], BX
 add DI, BX
    mov AL,byte ptr ES:[DI]
    cmp AL, 7
 je Red 
 mov [Starss.OldC+SI], 0
 jmp NotOK
Red:    mov [Starss.OldC+SI], AL
NotOK:  mov byte ptr ES:[DI], BL
    mov [Starss.OldDI+SI], DI
    add SI, size Stars
    cmp SI, 400
    jng NextS
Alld: ret
Random: push BX
 mov AX, Seed
 mov BX, 9821
 imul BX
 inc AX
 ror AL, 1
 add AX, 8191
 rol AH, 1
 mov Seed, AX
 xor DX, DX
 div CX
 pop BX
 ret
WaitV: mov DX, 3dah
@@1: in AL, DX
 test AL, 8
 jnz @@1
@@2: in AL, DX
 test AL, 9
 jz @@2
 ret
LoadP: mov DX, 3c8h
 mov AL, 1
 out DX, AL
 inc DX
 mov CX, 7*3
 rep outsb
 ret
Nexton: lodsb
 mov BL, 1
 shl BL, CL
 and AL, BL
 jz NoPix
 mov byte ptr ES:[DI], 7
NoPix: add DI, 320
 dec DL
 jnz Nexton
 dec Reid
 cmp Reid, 0
 jne Edasi
 mov Reid, 8
 inc Tot
 cmp [Tot], 330
 jne Edasi
 mov [Tot], 0
Edasi: ret
 
Scrool: cld
 push Es
 pop DS
 mov BL, 8
 mov SI, 61442
 mov DI, 61441
UUsrid: mov CX, 319
 rep movsb
 inc SI
 inc DI
 dec BL
 jnz Uusrid
 ret
World db 'Welcom by Intro$'
Tot dw 14
Reid db 8
Seed dw 9821
StrN db 0
Numbers db 255
Colore db 20, 20, 20
       db 30, 30, 30
       db 35, 35, 35
       db 40, 40, 40
       db 50, 50, 50
       db 63, 63, 63
       db 63, 0,  0
PCN db 'Izvinite, no y vas slabui kompyter...', 10, 13, '$'
Stars STRUC
 X dw ?
 Y dw ?
 OldDI dw ?
 OldC db ?
 Speed db ?
Stars ENDS
Starss Stars <!--?-->
END StarsT
                        