Форум программистов [Powered by Invision Power Board]

Код

           MOV          SI, A (1000)                //адрес начала строки
          MOV          BL, N      (9)        // длина строки
           MOV          DI, 0                // кол-во букв кириллицы
           MOV          BX, B  (1100)            // адрес B для хранения Y/N
                     M1:
           MOV          AX, [SI]           // прочитаем первую букву строки
           CMP          AX,80               //сравниваю первый элемент и ASCII код буквы А
                     N2:
           inc            DI                    //  если AX больше переходим по метке
           NOP                                // конец n2
                      N1: 
          CMP          AX,AF             // сравниваю элемент и ASCII код буквы п
           JBE             N2                  //   если AX меньше то переходим по метке
           NOP                                  // конец n1
           JAE            N1                    //  если AX >= 80     переходим по метке N1 если нет идем дальше
           INC             SI                      //  переходим к следующему элементу строки
           DEC            bl                   //  уменьшаем BL на 1
          CMP           bl, 0             // сравниваем BL с 0
           loop           M1                // если число в BL  превышает  0 то прыгаем на метку
                      M2:                     //метка 
          MOV           [BX], DI   
           INC              BX                 // перейдем к следующему элементу
          MOV          [BX], 4E        // выведем в BX значение 4E (N)    
          NOP                              // конец метки M2
                       M3:
          MOV           [BX], DI   
          INC              BX                 // перейдем к следующему элементу
          MOV          [BX], 59         // выведем в BX значение  59 (Y)
            NOP                               // конец M3
           CMP           DI,0               //  проверяем есть ли кирилица
           JE                M2               // если DI равно 0 то перейдем по метке m2  если нет идем дальше
           JA               M3                 // если Di не равно 0 то переходим по m3
          RET
         NOP