ERROR PROGRAM 68000

j ai essayé d ecrire un programme qui calcule le nombre de chaque caractere dans le texte, mais j ai pas mal d erreur de prog et j arrive pas a les trouver


ORG  $2000
 DC.B 'le texte à compresser est celui que vous lisez actuellement'
 DC.B    'il ne comportera que des lettres minuscules,'
 DC.B 'un minimum de ponctuation et des espaces'.

 ORG $5000
 LEA $0000,A1
 
 LEA $2000,A0 

 
TAILLE CMP (A0),#0
 BNE     T1
 BEQ DEBUT

T1      ADD.L   #1,D0
ADD.L   #$1,A0 
 JMP     TAILLE
 
DEBUT   LEA     $2000,A0
   

COMP    TEST    D0
 BE      Then
 MOVE.B  (A0),D1
 ADD.B   #$1,A0 
 CMP.B (A1),#0
 BEQ K1
 BNE NON K1
      

Voila la fin

K1 MOVE.B D1,(A1)
 LEA     $2000,A1
 SUB.L   #1,D0
 JMP     COMP

NON K1  CMP     D1,(A1)
 BNE     NON K2
 BEQ     K2

NON K2  ADD.L   #$2,A1
 JMP     COMP

K2      ADD.L   #$1,A1
 SUM.L   #1,(A1)
 SUB.L   #1,D0   
 JMP     COMP
Then    BRA   FIN