0 / 0 / 3
Регистрация: 13.04.2011
Сообщений: 91
Записей в блоге: 1
1

блок схемы

11.07.2011, 01:26. Показов 1502. Ответов 4
Метки нет (Все метки)

Подскажите пожалуйста через какую программу можно быстренько по исходному коду Masm32 построить блок-схему? а то запарки с гостами частенько бывают(( вот может знает кто какая есть прога чтобы сама рисовала по коду? или помогите составить блок схемы.. ниже исходники:

Assembler
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
msg macro   str     
    lea dx,str
    mov ah,9
    int 21h
    endm
d_seg   segment
str1    db  '‚ўҐ¤ЁвҐ бва®Єг',10,13,'$'
str2    db  10,13,'ЏҐаҐбл«Є* бва®ЄЁ ўлЇ®«*Ґ**',10,13,'$'
strdest db  80 dup (0),'$'
strsour db  80 dup (0),'$'
long    dw  0
length1 dw  0
scanpos dw  0
d_seg   ends
 
c_seg   segment
assume  ds:d_seg,cs:c_seg
start:  mov ax,d_seg
    mov ds,ax
    mov es,ax           
    mov al,0
    msg str1
    mov bx,0         
    mov cx,80
    lea dx,strsour
    mov ah,3fh
    int 21h
    mov length1,ax
    cld          
    lea di,strdest
    lea si,strsour
    mov cx,length1
    rep movsb
    msg str2
    msg strdest
 
 
exit:   mov ah,8
    int 21h
    mov ah,4ch
    int 21h
c_seg   ends
    end start
Assembler
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
msg macro str
    mov ah, 9
    lea dx, str
    int 21h
endm
 
d_seg segment
    string    db    80 dup(0),'$'
        strlen    dw    0
    msg1      db    10,13,'‘Ё¬ў®« ЇаЁ**¤«Ґ¦Ёв бва®ЄҐ',10,13,'$'
    msg2      db    10,13,'‘Ё¬ў®« *Ґ ЇаЁ**¤«Ґ¦Ёв бва®ЄҐ',10,13,'$'
    inp1      db    10,13,'‚ўҐ¤ЁвҐ бва®Єг ',10,13,'$'
    inp2      db    10,13,'‚ўҐ¤ЁвҐ бЁ¬ў®« ',10,13,'$'
d_seg ends
 
c_seg segment
    assume cs:c_seg, ds:d_seg
    start:  
        mov ax, d_seg
        mov ds, ax
        mov es, ax
        msg inp1
        mov bx,0         
        mov cx,80
        lea dx,string
        mov ah,3fh
        int 21h
        mov strlen,ax
        msg inp2
        cld
        mov ah,1
        int 21h
        mov bl,al
        mov ah,1
        int 21h
        mov al,bl
        mov cx, strlen
        lea di, string
    r:  repne scasb
        jnz next
        msg msg1
        jmp quit
    next:   msg msg2
    quit:   mov ah,8
        int 21h
        mov ah, 4ch
        int 21h
c_seg ends
end start
Assembler
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
mes macro str  
    lea dx,str
    mov ah,9
    int 21h
endm
 
d_seg segment
    probel  db ' ','$'
    enter   db 10,13,'$'
    str  db 80 dup (0) ,'$'
    str1 db 1 dup (0),'$'
    msg1 db '‚ўҐ¤ЁвҐ бва®Єг',10,13,'$'
    msg2 db '‚ўҐ¤ЁвҐ бЁ¬ў®«',10,13,'$'
    net db  '‘Ё¬ў®« *Ґ **©¤Ґ*',10,13,'$'
    msg3 db 'Љ®«ЁзҐбвў® **©¤Ґ**ле бЁ¬ў®«®ў = ','$'
    a dw 0
d_seg ends
c_seg segment
assume cs:c_seg,ds:d_seg,es:d_seg
 
start:      mov ax,d_seg
            mov ds,ax
            mov es,ax 
    mes msg1
    mov bx,0
    mov cx,80
    lea dx,str
    mov ah,3fh
    int 21h
        mes msg2
    mov ah,1
    int 21h
    mov bl,al
    mov ah,1
    int 21h
    mov al,bl
    cld
    lea di,str
    mov cx,80
cikl:
    repne scas str
    jcxz k1
    inc a
    jmp cikl
k1: 
    mes enter
    cmp a,0
    je k2
    mes msg3
    mov ah,2
    mov dx,a
    add dx,48
    int 21h
    jmp vse
k2:     
      mes net
vse:  mov ah,1
    int 21h
    mov ah,4ch
    int 21h
c_seg ends
end start
Assembler
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
message macro param ;максрос выводит строку на экран 
        mov ah,9 
        lea dx,param 
        int 21h 
endm 
 
izobr macro ;макрос выводит символы конца строки на экран 
        mov ah, 2 
        mov dl, 10 
        int 21h 
 
        mov ah, 2 
        mov dl, 13 
        int 21h 
endm 
 
dseg segment 
        error db 10,13,'ERROR',10,13,'$' 
        finish db 10,13,'==END of catalog',10,13,'$' 
        mess db 10,13,'file of shablon not 
detected',10,13,'$' 
        fewpar db 10,13,'Error! Empty command 
string!',10,13,'$' 
        dta db 2Ch dup ('$') 
        file db 14 dup (0) 
dseg ends 
 
cseg segment para public 'CODE' 
        assume cs:cseg, ds:dseg 
        start: mov ax, dseg 
                        mov ds, ax 
 
                        mov al, byte ptr es:[80h] ;забираем параметр 
командной строки - шаблон поиска 
                        cmp al, 0h 
                        je malo ;если шаблон не задан - уходим 
                        mov si, 2h 
                        mov di, 0h 
 
readcom: mov al, byte ptr es:[80h+si] ;считываем шаблон 
                        cmp al, 13 
                        je da_next ;как только строка заканчивается - 
переходим к след шагу 
 
                        mov file[di], al ;в переменную file пишем шаблон 
                        inc si 
                        inc di 
 
                        jmp readcom ;этот цикл побайтно считывает шаблон 
поиска 
                        jmp da_next ;лишняя строка 
 
malo: message fewpar ;если нет шаблона - уходим 
                        jmp exit 
 
da_next: mov ah, 1ah ;функция изменяет местоположение DTA(Data 
Tranfer Area) 
                        lea dx, dta ;тут место, где будет находиться dta 
                        int 21h 
 
                        mov ah, 4eh ;ищем первый файл 
                        lea dx, file ;шаблон 
                        mov cx, 11111111b ;атрибуты 
                        int 21h ;вперед 
 
                        jc err1 ;флаг CF указывает на ошибку - 
совпадений нет, значит уходим 
                        message dta[1eh] ;выводим имя найденного файла 
                        izobr ;перейти на новую строку 
 
prec: ;тут начинается просмотр остальных файлов, если они есть 
 
 
                        mov ah, 4fh ;эта функция ищет остальные файлы 
                        lea dx, file 
 
                        int 21h ;вперед 
 
                        jc cheke ;если CF=1, то возникла ошибка 
                        message dta[1eh] ;иначе выводим имя найденного 
файла 
                        izobr ;переход на новую строку 
                        jmp prec ;ищем дальше 
 
cheke: cmp ax, 18 ;если возникла ошибка, то проверяется 
стандартный выход - то бишь - все файлы найдены 
                        je da_last ;и если это так - уходим 
                        message error ;иначе сообщаем, что возникла 
какая-то ошибка 
                        izobr ;переходи 
                        jmp exit ;выодим 
 
da_last: message finish 
                        izobr 
                        jmp exit 
 
err1: message mess ;сообщение об ошибке 
 
exit: mov ah, 4ch 
                        int 21h 
 
cseg ends 
end start
буду очень благодарен за блок-схемы

Добавлено через 1 час 46 минут
очень нужно.. помогите кто чем сможет(( у меня завтра отчет
0

Помощь в написании контрольных, курсовых и дипломных работ здесь.

Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
11.07.2011, 01:26
Ответы с готовыми решениями:

Программа для генерации блок-схемы по коду
Здравствуйте. Подскажите пожалуйста, какие есть программы, которые код программы преобразуют в...

Помог бы вам чем-то дизассемблер, который умеет строить блок схемы?
Ещё один вопрос того же сорта: А дизассемблеры, они код разгадывают линейно или проходят по всем...

Блок-схемы ассемблерных программ
Как их делают и на что они похожи? Нету примерчика?

Составление блок-схемы к коду
Пожалуйста, сделайте блок-схему к программе и обьясните значение строчек. .model small Stack...

4
232 / 102 / 6
Регистрация: 18.04.2010
Сообщений: 294
11.07.2011, 01:52 2
Могу Вам дать совет - начинайте рисовать прямо сейчас. В поисках легкого пути Вы лишь потратите и так дорогое время. У меня всегда было так, что пока я искал что-то простое, уже десять раз мог вручную сделать.
0
0 / 0 / 3
Регистрация: 13.04.2011
Сообщений: 91
Записей в блоге: 1
11.07.2011, 02:09  [ТС] 3
Цитата Сообщение от 6a6ka Посмотреть сообщение
Могу Вам дать совет - начинайте рисовать прямо сейчас. В поисках легкого пути Вы лишь потратите и так дорогое время. У меня всегда было так, что пока я искал что-то простое, уже десять раз мог вручную сделать.
Пробую, но не особо получается(( пока то рисую, а там если кто поможет то будет хорошо и заодно себя проверю
0
232 / 102 / 6
Регистрация: 18.04.2010
Сообщений: 294
11.07.2011, 02:12 4
Я бы рад помочь, но ни разу не рисовал блок-схемы...
0
0 / 0 / 3
Регистрация: 13.04.2011
Сообщений: 91
Записей в блоге: 1
11.07.2011, 07:04  [ТС] 5
ясненько((
0
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
11.07.2011, 07:04

Составление блок-схемы по тексту программы
Имеется "программа", и нужно составить по ней блок-схему, но не понимаю как это делается. Прошу...

Программа для генерации блок-схемы по коду
Скажите, пожалуйста, какие есть программы для генерации блок схем по коду?

Нужны различные блок-схемы, функциональные схемы жестких дисков и их работы.
Срочно нужны различные блок-схемы, функциональные схемы жестких дисков и их работы. Заранее большое...

блок схемы
кто готов по готовому коду си шарп сделать мне блок схемы


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
5
Ответ Создать тему
Опции темы

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2021, vBulletin Solutions, Inc.