Получить ассемблерный листинг из кода на с++ - Assembler

Узнай цену своей работы

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

Здравствуйте! Требуется написать программу на ассемблере, которая бы занималась неким преобразованием текста. По условию не возбраняется получить ассемблерный код с помощью кода, написанного на любом высокоуровневом языке. Код должен запускаться каким-то образом. Также необходимо объяснить, что и почему сделал компилятор среды, в которой программа писалась. Помогите, пожалуйста. Пробовал получать ассемблерный листинг в visual studio 2010 и затем в этой же среде запускать, но ничего не вышло.
Листинг программы 
  1. #include <stdio.h>
  2.  
  3. int j=0;
  4.  
  5. int pravilo1(char* str) {
  6.     for (int i = 0; i<100; i++) if ((str[i]>64)&&(str[i]<91)) str[i]=65+25-(str[i]-65);  //здесь надо заменить каждую заглавную букву её симметричной из алфавита (A -> Z, B -> Y и т.д.)
  7.         printf("modified string = %s \n \n",str);
  8.         return 0;
  9. }
  10.  
  11. int pravilo2(const char* str) {
  12.     char buffer2[100];
  13.     for (int i = 0; i<100; i++) if (str[i]!=str[i-1]) { buffer2[j]=str[i]; j++;}  //а здесь, если попадаются подряд несколько одинаковых символов, то оставить один из них.
  14.         printf("modified string = %s \n \n",buffer2);
  15.         return 0;
  16. }
  17.  
  18. void main(void)
  19. {
  20.     char buffer[100];       //на вход с клавы идёт строка не более 100 символов
  21.     char c=0; // просто, чтобы пауза в конце была
  22.     int pravilo=0; //есть два правила, по которым строка будет преобразовываться
  23.  
  24.     for (int i = 0; i<100; i++) buffer[i]=0;
  25.     gets(buffer);           // прочитать строку
  26.     printf(" \n \nishodnaya stroka = %s \n \n",buffer);    // требуется вывести исходную строку сразу
  27.     for (int i = 0; i<100; i++) {if (buffer[i]==0) continue; if (((buffer[i]>47)&&(buffer[i]<58))||((buffer[i]>64)&&(buffer[i]<91))||((buffer[i]>96)&&(buffer[i]<123))) pravilo=1; else pravilo=2;}  //если текст включает в себя только цифры и латинские буквы, тогда применяется правило 1, если присутствуют иные символы, тогда правило 2
  28.     printf("pravilo = %d \n \n", pravilo); //необходимо сослаться на номер используемого правила
  29.     if (pravilo==1) pravilo1(buffer);
  30.     if (pravilo==2) pravilo2(buffer);
  31.     gets(&c);
  32. }
Листинг программы 
  1. ; Listing generated by Microsoft (R) Optimizing Compiler Version 16.00.30319.01 
  2.  
  3.     TITLE   C:\Users\Админ\Documents\Visual Studio 2010\Projects\2 ДЗ ПО ИНФЕ\2 ДЗ ПО ИНФЕ\дз по инфе.cpp
  4.     .686P
  5.     .XMM
  6.     include listing.inc
  7.     .model  flat
  8.  
  9. INCLUDELIB MSVCRTD
  10. INCLUDELIB OLDNAMES
  11.  
  12. PUBLIC  ?j@@3HA                     ; j
  13. _BSS    SEGMENT
  14. ?j@@3HA DD  01H DUP (?)             ; j
  15. _BSS    ENDS
  16. PUBLIC  ??_C@_0BJ@DPGPACEI@modified?5string?5?$DN?5?$CFs?5?6?5?6?$AA@ ; `string'
  17. PUBLIC  ?pravilo1@@YAHPAD@Z             ; pravilo1
  18. EXTRN   __imp__printf:PROC
  19. EXTRN   __RTC_CheckEsp:PROC
  20. EXTRN   __RTC_Shutdown:PROC
  21. EXTRN   __RTC_InitBase:PROC
  22. ;   COMDAT ??_C@_0BJ@DPGPACEI@modified?5string?5?$DN?5?$CFs?5?6?5?6?$AA@
  23. ; File c:\users\админ\documents\visual studio 2010\projects\2 дз по инфе\2 дз по инфе\дз по инфе.cpp
  24. CONST   SEGMENT
  25. ??_C@_0BJ@DPGPACEI@modified?5string?5?$DN?5?$CFs?5?6?5?6?$AA@ DB 'modifie'
  26.     DB  'd string = %s ', 0aH, ' ', 0aH, 00H        ; `string'
  27. CONST   ENDS
  28. ;   COMDAT rtc$TMZ
  29. rtc$TMZ SEGMENT
  30. __RTC_Shutdown.rtc$TMZ DD FLAT:__RTC_Shutdown
  31. rtc$TMZ ENDS
  32. ;   COMDAT rtc$IMZ
  33. rtc$IMZ SEGMENT
  34. __RTC_InitBase.rtc$IMZ DD FLAT:__RTC_InitBase
  35. ; Function compile flags: /Odtp /RTCsu /ZI
  36. rtc$IMZ ENDS
  37. ;   COMDAT ?pravilo1@@YAHPAD@Z
  38. _TEXT   SEGMENT
  39. _i$3853 = -8                        ; size = 4
  40. _str$ = 8                       ; size = 4
  41. ?pravilo1@@YAHPAD@Z PROC                ; pravilo1, COMDAT
  42. ; Line 5
  43.     push    ebp
  44.     mov ebp, esp
  45.     sub esp, 204                ; 000000ccH
  46.     push    ebx
  47.     push    esi
  48.     push    edi
  49.     lea edi, DWORD PTR [ebp-204]
  50.     mov ecx, 51                 ; 00000033H
  51.     mov eax, -858993460             ; ccccccccH
  52.     rep stosd
  53. ; Line 6
  54.     mov DWORD PTR _i$3853[ebp], 0
  55.     jmp SHORT $LN4@pravilo1
  56. $LN3@pravilo1:
  57.     mov eax, DWORD PTR _i$3853[ebp]
  58.     add eax, 1
  59.     mov DWORD PTR _i$3853[ebp], eax
  60. $LN4@pravilo1:
  61.     cmp DWORD PTR _i$3853[ebp], 100     ; 00000064H
  62.     jge SHORT $LN2@pravilo1
  63.     mov eax, DWORD PTR _str$[ebp]
  64.     add eax, DWORD PTR _i$3853[ebp]
  65.     movsx   ecx, BYTE PTR [eax]
  66.     cmp ecx, 64                 ; 00000040H
  67.     jle SHORT $LN1@pravilo1
  68.     mov eax, DWORD PTR _str$[ebp]
  69.     add eax, DWORD PTR _i$3853[ebp]
  70.     movsx   ecx, BYTE PTR [eax]
  71.     cmp ecx, 91                 ; 0000005bH
  72.     jge SHORT $LN1@pravilo1
  73.     mov eax, DWORD PTR _str$[ebp]
  74.     add eax, DWORD PTR _i$3853[ebp]
  75.     movsx   ecx, BYTE PTR [eax]
  76.     sub ecx, 65                 ; 00000041H
  77.     mov edx, 90                 ; 0000005aH
  78.     sub edx, ecx
  79.     mov eax, DWORD PTR _str$[ebp]
  80.     add eax, DWORD PTR _i$3853[ebp]
  81.     mov BYTE PTR [eax], dl
  82. $LN1@pravilo1:
  83. ; Line 7
  84.     jmp SHORT $LN3@pravilo1
  85. $LN2@pravilo1:
  86.     mov esi, esp
  87.     mov eax, DWORD PTR _str$[ebp]
  88.     push    eax
  89.     push    OFFSET ??_C@_0BJ@DPGPACEI@modified?5string?5?$DN?5?$CFs?5?6?5?6?$AA@
  90.     call    DWORD PTR __imp__printf
  91.     add esp, 8
  92.     cmp esi, esp
  93.     call    __RTC_CheckEsp
  94. ; Line 8
  95.     xor eax, eax
  96. ; Line 9
  97.     pop edi
  98.     pop esi
  99.     pop ebx
  100.     add esp, 204                ; 000000ccH
  101.     cmp ebp, esp
  102.     call    __RTC_CheckEsp
  103.     mov esp, ebp
  104.     pop ebp
  105.     ret 0
  106. ?pravilo1@@YAHPAD@Z ENDP                ; pravilo1
  107. _TEXT   ENDS
  108. PUBLIC  __$ArrayPad$
  109. PUBLIC  ?pravilo2@@YAHPBD@Z             ; pravilo2
  110. EXTRN   ___security_cookie:DWORD
  111. EXTRN   @__security_check_cookie@4:PROC
  112. EXTRN   @_RTC_CheckStackVars@8:PROC
  113. ; Function compile flags: /Odtp /RTCsu /ZI
  114. ;   COMDAT ?pravilo2@@YAHPBD@Z
  115. _TEXT   SEGMENT
  116. _i$3863 = -120                      ; size = 4
  117. _buffer2$ = -108                    ; size = 100
  118. __$ArrayPad$ = -4                   ; size = 4
  119. _str$ = 8                       ; size = 4
  120. ?pravilo2@@YAHPBD@Z PROC                ; pravilo2, COMDAT
  121. ; Line 12
  122.     push    ebp
  123.     mov ebp, esp
  124.     sub esp, 316                ; 0000013cH
  125.     push    ebx
  126.     push    esi
  127.     push    edi
  128.     lea edi, DWORD PTR [ebp-316]
  129.     mov ecx, 79                 ; 0000004fH
  130.     mov eax, -858993460             ; ccccccccH
  131.     rep stosd
  132.     mov eax, DWORD PTR ___security_cookie
  133.     xor eax, ebp
  134.     mov DWORD PTR __$ArrayPad$[ebp], eax
  135. ; Line 14
  136.     mov DWORD PTR _i$3863[ebp], 0
  137.     jmp SHORT $LN4@pravilo2
  138. $LN3@pravilo2:
  139.     mov eax, DWORD PTR _i$3863[ebp]
  140.     add eax, 1
  141.     mov DWORD PTR _i$3863[ebp], eax
  142. $LN4@pravilo2:
  143.     cmp DWORD PTR _i$3863[ebp], 100     ; 00000064H
  144.     jge SHORT $LN2@pravilo2
  145.     mov eax, DWORD PTR _str$[ebp]
  146.     add eax, DWORD PTR _i$3863[ebp]
  147.     movsx   ecx, BYTE PTR [eax]
  148.     mov edx, DWORD PTR _str$[ebp]
  149.     add edx, DWORD PTR _i$3863[ebp]
  150.     movsx   eax, BYTE PTR [edx-1]
  151.     cmp ecx, eax
  152.     je  SHORT $LN1@pravilo2
  153.     mov eax, DWORD PTR _str$[ebp]
  154.     add eax, DWORD PTR _i$3863[ebp]
  155.     mov ecx, DWORD PTR ?j@@3HA          ; j
  156.     mov dl, BYTE PTR [eax]
  157.     mov BYTE PTR _buffer2$[ebp+ecx], dl
  158.     mov eax, DWORD PTR ?j@@3HA          ; j
  159.     add eax, 1
  160.     mov DWORD PTR ?j@@3HA, eax          ; j
  161. $LN1@pravilo2:
  162.     jmp SHORT $LN3@pravilo2
  163. $LN2@pravilo2:
  164. ; Line 15
  165.     mov esi, esp
  166.     lea eax, DWORD PTR _buffer2$[ebp]
  167.     push    eax
  168.     push    OFFSET ??_C@_0BJ@DPGPACEI@modified?5string?5?$DN?5?$CFs?5?6?5?6?$AA@
  169.     call    DWORD PTR __imp__printf
  170.     add esp, 8
  171.     cmp esi, esp
  172.     call    __RTC_CheckEsp
  173. ; Line 16
  174.     xor eax, eax
  175. ; Line 17
  176.     push    edx
  177.     mov ecx, ebp
  178.     push    eax
  179.     lea edx, DWORD PTR $LN9@pravilo2
  180.     call    @_RTC_CheckStackVars@8
  181.     pop eax
  182.     pop edx
  183.     pop edi
  184.     pop esi
  185.     pop ebx
  186.     mov ecx, DWORD PTR __$ArrayPad$[ebp]
  187.     xor ecx, ebp
  188.     call    @__security_check_cookie@4
  189.     add esp, 316                ; 0000013cH
  190.     cmp ebp, esp
  191.     call    __RTC_CheckEsp
  192.     mov esp, ebp
  193.     pop ebp
  194.     ret 0
  195. $LN9@pravilo2:
  196.     DD  1
  197.     DD  $LN8@pravilo2
  198. $LN8@pravilo2:
  199.     DD  -108                    ; ffffff94H
  200.     DD  100                 ; 00000064H
  201.     DD  $LN7@pravilo2
  202. $LN7@pravilo2:
  203.     DB  98                  ; 00000062H
  204.     DB  117                 ; 00000075H
  205.     DB  102                 ; 00000066H
  206.     DB  102                 ; 00000066H
  207.     DB  101                 ; 00000065H
  208.     DB  114                 ; 00000072H
  209.     DB  50                  ; 00000032H
  210.     DB  0
  211. ?pravilo2@@YAHPBD@Z ENDP                ; pravilo2
  212. _TEXT   ENDS
  213. PUBLIC  ??_C@_0BB@IPHDNPAM@pravilo?5?$DN?5?$CFd?5?6?5?6?$AA@ ; `string'
  214. PUBLIC  ??_C@_0BO@FKFDJBJO@?5?6?5?6ishodnaya?5stroka?5?$DN?5?$CFs?5?6?5?6?$AA@ ; `string'
  215. PUBLIC  __$ArrayPad$
  216. PUBLIC  _main
  217. EXTRN   __imp__gets:PROC
  218. ;   COMDAT ??_C@_0BB@IPHDNPAM@pravilo?5?$DN?5?$CFd?5?6?5?6?$AA@
  219. CONST   SEGMENT
  220. ??_C@_0BB@IPHDNPAM@pravilo?5?$DN?5?$CFd?5?6?5?6?$AA@ DB 'pravilo = %d ', 0aH
  221.     DB  ' ', 0aH, 00H               ; `string'
  222. CONST   ENDS
  223. ;   COMDAT ??_C@_0BO@FKFDJBJO@?5?6?5?6ishodnaya?5stroka?5?$DN?5?$CFs?5?6?5?6?$AA@
  224. CONST   SEGMENT
  225. ??_C@_0BO@FKFDJBJO@?5?6?5?6ishodnaya?5stroka?5?$DN?5?$CFs?5?6?5?6?$AA@ DB ' '
  226.     DB  0aH, ' ', 0aH, 'ishodnaya stroka = %s ', 0aH, ' ', 0aH, 00H ; `string'
  227. ; Function compile flags: /Odtp /RTCsu /ZI
  228. CONST   ENDS
  229. ;   COMDAT _main
  230. _TEXT   SEGMENT
  231. _i$3879 = -156                      ; size = 4
  232. _i$3874 = -144                      ; size = 4
  233. _pravilo$ = -132                    ; size = 4
  234. _c$ = -117                      ; size = 1
  235. _buffer$ = -108                     ; size = 100
  236. __$ArrayPad$ = -4                   ; size = 4
  237. _main   PROC                        ; COMDAT
  238. ; Line 20
  239.     push    ebp
  240.     mov ebp, esp
  241.     sub esp, 352                ; 00000160H
  242.     push    ebx
  243.     push    esi
  244.     push    edi
  245.     lea edi, DWORD PTR [ebp-352]
  246.     mov ecx, 88                 ; 00000058H
  247.     mov eax, -858993460             ; ccccccccH
  248.     rep stosd
  249.     mov eax, DWORD PTR ___security_cookie
  250.     xor eax, ebp
  251.     mov DWORD PTR __$ArrayPad$[ebp], eax
  252. ; Line 22
  253.     mov BYTE PTR _c$[ebp], 0
  254. ; Line 23
  255.     mov DWORD PTR _pravilo$[ebp], 0
  256. ; Line 25
  257.     mov DWORD PTR _i$3874[ebp], 0
  258.     jmp SHORT $LN14@main
  259. $LN13@main:
  260.     mov eax, DWORD PTR _i$3874[ebp]
  261.     add eax, 1
  262.     mov DWORD PTR _i$3874[ebp], eax
  263. $LN14@main:
  264.     cmp DWORD PTR _i$3874[ebp], 100     ; 00000064H
  265.     jge SHORT $LN12@main
  266.     mov eax, DWORD PTR _i$3874[ebp]
  267.     mov BYTE PTR _buffer$[ebp+eax], 0
  268.     jmp SHORT $LN13@main
  269. $LN12@main:
  270. ; Line 26
  271.     mov esi, esp
  272.     lea eax, DWORD PTR _buffer$[ebp]
  273.     push    eax
  274.     call    DWORD PTR __imp__gets
  275.     add esp, 4
  276.     cmp esi, esp
  277.     call    __RTC_CheckEsp
  278. ; Line 27
  279.     mov esi, esp
  280.     lea eax, DWORD PTR _buffer$[ebp]
  281.     push    eax
  282.     push    OFFSET ??_C@_0BO@FKFDJBJO@?5?6?5?6ishodnaya?5stroka?5?$DN?5?$CFs?5?6?5?6?$AA@
  283.     call    DWORD PTR __imp__printf
  284.     add esp, 8
  285.     cmp esi, esp
  286.     call    __RTC_CheckEsp
  287. ; Line 28
  288.     mov DWORD PTR _i$3879[ebp], 0
  289.     jmp SHORT $LN11@main
  290. $LN10@main:
  291.     mov eax, DWORD PTR _i$3879[ebp]
  292.     add eax, 1
  293.     mov DWORD PTR _i$3879[ebp], eax
  294. $LN11@main:
  295.     cmp DWORD PTR _i$3879[ebp], 100     ; 00000064H
  296.     jge $LN9@main
  297.     mov eax, DWORD PTR _i$3879[ebp]
  298.     movsx   ecx, BYTE PTR _buffer$[ebp+eax]
  299.     test    ecx, ecx
  300.     jne SHORT $LN8@main
  301.     jmp SHORT $LN10@main
  302. $LN8@main:
  303.     mov eax, DWORD PTR _i$3879[ebp]
  304.     movsx   ecx, BYTE PTR _buffer$[ebp+eax]
  305.     cmp ecx, 47                 ; 0000002fH
  306.     jle SHORT $LN5@main
  307.     mov eax, DWORD PTR _i$3879[ebp]
  308.     movsx   ecx, BYTE PTR _buffer$[ebp+eax]
  309.     cmp ecx, 58                 ; 0000003aH
  310.     jl  SHORT $LN6@main
  311. $LN5@main:
  312.     mov eax, DWORD PTR _i$3879[ebp]
  313.     movsx   ecx, BYTE PTR _buffer$[ebp+eax]
  314.     cmp ecx, 64                 ; 00000040H
  315.     jle SHORT $LN4@main
  316.     mov eax, DWORD PTR _i$3879[ebp]
  317.     movsx   ecx, BYTE PTR _buffer$[ebp+eax]
  318.     cmp ecx, 91                 ; 0000005bH
  319.     jl  SHORT $LN6@main
  320. $LN4@main:
  321.     mov eax, DWORD PTR _i$3879[ebp]
  322.     movsx   ecx, BYTE PTR _buffer$[ebp+eax]
  323.     cmp ecx, 96                 ; 00000060H
  324.     jle SHORT $LN7@main
  325.     mov eax, DWORD PTR _i$3879[ebp]
  326.     movsx   ecx, BYTE PTR _buffer$[ebp+eax]
  327.     cmp ecx, 123                ; 0000007bH
  328.     jge SHORT $LN7@main
  329. $LN6@main:
  330.     mov DWORD PTR _pravilo$[ebp], 1
  331.     jmp SHORT $LN3@main
  332. $LN7@main:
  333.     mov DWORD PTR _pravilo$[ebp], 2
  334. $LN3@main:
  335.     jmp $LN10@main
  336. $LN9@main:
  337. ; Line 29
  338.     mov esi, esp
  339.     mov eax, DWORD PTR _pravilo$[ebp]
  340.     push    eax
  341.     push    OFFSET ??_C@_0BB@IPHDNPAM@pravilo?5?$DN?5?$CFd?5?6?5?6?$AA@
  342.     call    DWORD PTR __imp__printf
  343.     add esp, 8
  344.     cmp esi, esp
  345.     call    __RTC_CheckEsp
  346. ; Line 30
  347.     cmp DWORD PTR _pravilo$[ebp], 1
  348.     jne SHORT $LN2@main
  349.     lea eax, DWORD PTR _buffer$[ebp]
  350.     push    eax
  351.     call    ?pravilo1@@YAHPAD@Z         ; pravilo1
  352.     add esp, 4
  353. $LN2@main:
  354. ; Line 31
  355.     cmp DWORD PTR _pravilo$[ebp], 2
  356.     jne SHORT $LN1@main
  357.     lea eax, DWORD PTR _buffer$[ebp]
  358.     push    eax
  359.     call    ?pravilo2@@YAHPBD@Z         ; pravilo2
  360.     add esp, 4
  361. $LN1@main:
  362. ; Line 32
  363.     mov esi, esp
  364.     lea eax, DWORD PTR _c$[ebp]
  365.     push    eax
  366.     call    DWORD PTR __imp__gets
  367.     add esp, 4
  368.     cmp esi, esp
  369.     call    __RTC_CheckEsp
  370. ; Line 33
  371.     xor eax, eax
  372.     push    edx
  373.     mov ecx, ebp
  374.     push    eax
  375.     lea edx, DWORD PTR $LN20@main
  376.     call    @_RTC_CheckStackVars@8
  377.     pop eax
  378.     pop edx
  379.     pop edi
  380.     pop esi
  381.     pop ebx
  382.     mov ecx, DWORD PTR __$ArrayPad$[ebp]
  383.     xor ecx, ebp
  384.     call    @__security_check_cookie@4
  385.     add esp, 352                ; 00000160H
  386.     cmp ebp, esp
  387.     call    __RTC_CheckEsp
  388.     mov esp, ebp
  389.     pop ebp
  390.     ret 0
  391.     npad    1
  392. $LN20@main:
  393.     DD  2
  394.     DD  $LN19@main
  395. $LN19@main:
  396.     DD  -108                    ; ffffff94H
  397.     DD  100                 ; 00000064H
  398.     DD  $LN17@main
  399.     DD  -117                    ; ffffff8bH
  400.     DD  1
  401.     DD  $LN18@main
  402. $LN18@main:
  403.     DB  99                  ; 00000063H
  404.     DB  0
  405. $LN17@main:
  406.     DB  98                  ; 00000062H
  407.     DB  117                 ; 00000075H
  408.     DB  102                 ; 00000066H
  409.     DB  102                 ; 00000066H
  410.     DB  101                 ; 00000065H
  411.     DB  114                 ; 00000072H
  412.     DB  0
  413. _main   ENDP
  414. _TEXT   ENDS
  415. END
Под сишный код visual studio выдаёт такой вот ассемблерный листинг. Оптимизация вроде отключена (я старался её отключить, но не уверен что она всё-таки отключилась). Подскажите, пожалуйста, что нужно редактировать в ассемблерном коде, чтобы он потом запускался? Может, использовать не visual studio?
P.S. Операционная система windows 7 x64

Решение задачи: «Получить ассемблерный листинг из кода на с++»

textual
Листинг программы 
  1. org 100h
  2. jmp start
  3.  
  4. mess0   db  13,10,'Type string..: $'
  5. mess1   db  13,10,'Search signs.: $'
  6. mess2   db  13,10,'------------------------------------------'
  7.         db  13,10,'Result string: $'
  8. okey    db        'Found!',13
  9.         db  10,10,'Start Delete-duble proc..$'
  10. nSign   db        'No sign!',13
  11.         db  10,10,'Start Change-symbol proc..$'
  12.  
  13. buff    db  80
  14. len     db  0
  15. string  db  80 dup(0)
  16.  
  17. separ   db  '.,:;"/?[]{}`~!@#$%^&*()-+=\|',39
  18. sLen     =  $ - separ
  19.  
  20. start:
  21. ; Сохраняем строку юзверя ===================================//
  22.      mov   dx,mess0          ;
  23.      call  message           ;
  24.      mov   ah,0Ah            ; fn.(0Ah)
  25.      mov   dx,buff           ;
  26.      int   21h               ;
  27.  
  28. ; Ищем в ней знаки препинания ===============================//
  29.      mov   dx,mess1          ;
  30.      call  message           ;
  31.  
  32.      mov   si,separ          ; таблица символов для поиска
  33.      mov   dx,sLen           ; её длина
  34.      xor   cx,cx             ;
  35. find:                        ;
  36.      mov   di,string         ; адрес строки юзера
  37.      mov   cl,[len]          ; её длина
  38.      inc   cl                ;
  39.      lodsb                   ; AL = символ из таблицы
  40.      repne scasb             ; поиск указанного символа в DI
  41.      or    cx,cx             ; если поиск дал результаты,
  42.      jnz   ok                ;      ..то всё ОК!
  43.      dec   dx                ; иначе: уменьшаем длину таблицы
  44.      jnz   find              ; и на повтор, пока DX > 0
  45.  
  46. ; Выводим результат поиска на экран =========================//
  47.      mov   dx,nSign          ; здесь мы окажемся,
  48.      call  message           ;    ..если поиск не дал резутата
  49.      call  changeText        ; зовём функцию!
  50.      jmp   print             ;
  51. ok:                          ;
  52.      mov   dx,okey           ; поиск дал результат!
  53.      call  message           ;
  54.      call  deleteDuble       ;
  55.  
  56. ; Выводим на экран результат работы функций =================//
  57. print:
  58.      mov   dx,mess2          ; выводим изменённую строку юзера
  59.      call  message           ;
  60.      mov   si,string         ;
  61. @@:  lodsb                   ;
  62.      or    al,al             ;     ..пока не встретится нуль
  63.      jz    exit              ;
  64.      int   29h               ;           ..по-символьно.
  65.      loop  @b                ;
  66.  
  67. exit:
  68.      xor   ax,ax             ;
  69.      int   16h               ;
  70.      int   20h               ; выход!
  71.  
  72. ;eeeeeeeeeeeee{ П Р О Ц Е Д У Р Ы }eeeeeeeeeeeeeeeeeeeeeeeeeee
  73. message:                     ;
  74.      mov   ah,9              ;
  75.      int   21h               ;
  76. ret                          ;
  77. ;-------------------------------------------------------------
  78. deleteDuble:                 ; Удаляем повторные вхождения ===
  79.      mov   si,string         ; источник
  80.      mov   di,si             ; он-же приёмник
  81.      inc   si                ; первый элемент возьмёт DI
  82.      mov   cl,[len]          ; длина цикла
  83. @@:  lodsb                   ; AL = сл.элемент..
  84.      cmp   al,[di]           ;
  85.      jz    fuck              ; пропускаем если равны
  86.      inc   di                ;
  87.      xchg  al,[di]           ; иначе: ставим его предыдущим
  88. fuck:                        ;
  89.      loop  @b                ; на повтор..
  90.      xor   al,al             ; вставляем маркер конца строки
  91.      stosb                   ;
  92. ret                          ;
  93. ;-------------------------------------------------------------
  94. changeText:                  ; Меняем A->Z, B->Y, Z->A (гармошка)
  95.      mov   si,string         ;
  96.      mov   di,si             ;
  97.      mov   cl,[len]          ;
  98. @@:  lodsb                   ;
  99.      cmp   al,41h            ; фильтр заглавных
  100.      jb    mis               ;   ...
  101.      cmp   al,5Ah            ;     ...
  102.      ja    mis               ;        ...
  103.      shl   ax,8              ; отправляем символ в AH
  104.      sub   ah,41h            ; AH = его позиция от начала
  105.      mov   al,5Ah            ; AL = asc хвоста
  106.      sub   al,ah             ; вычисляем позицию от хвоста
  107. mis: stosb                   ; сохраняем изменения..
  108.      loop  @b                ;
  109.      xor   al,al             ; вставляем маркер конца строки.
  110.      stosb                   ;
  111. ret                          ;

ИИ поможет Вам:

  • решить любую задачу по программированию
  • объяснить код
  • расставить комментарии в коде
  • и т.д
Попробуйте бесплатно

Оцени полезность:

9   голосов , оценка 4.333 из 5

Нужна аналогичная работа?

Оформи быстрый заказ и узнай стоимость

Бесплатно
Оформите заказ и авторы начнут откликаться уже через 10 минут
Похожие ответы