1

(5 відповідей, залишених у Системне програмування)

      IDEAL
      MODEL  Small  
      STACK  256  
      DATASEG
      exCode DB 0
      Symb db '0'  
      Hand dw 0  
      Dir1 db 'e:\bp',0
      Text1 db 'FileName is: $' 
      Text2 db 0Ah,0Dh,'File not found!$'  
      Text3 db 0Ah,0Dh,'Number of tapes: $'
      FileNameCol db 120
      FileNameFakt db 0 
      FilenameStr db 130 dup(0)
      summa db '0'      
      CODESEG
      proc Nofile  
      mov dx,offset Text2
      mov ah,9
      int 21h  
      ret  
      endp  
Start:  
      mov ax,@data
      mov ds,ax
      mov es,ax  
      mov dx,offset Text1
      mov ah,9h
      int 21h                ;вивід запрошення  
      mov dx,offset FileNameCol ;початок буфера вводу  
      mov ah,0ah
      int 21h                   ;ввід стрічки з клавіатури  
      xor bx,bx                 ;bx=0  
      mov bl,[FileNameFakt]     ;bl=кількість букв в імені  
      mov si,offset FilenameStr ;початок тексту  
      mov [si+bx],0             ;обнуляємо останній байт 0D  
      mov dx,offset Dir1     ;початок назви каталогу  
      mov ah,3bh
      int 21h                ;встановка каталогу  
      jc Exit
      mov dx,offset FilenameStr ;початок назви файла  
      mov ah,3dh
      mov al,0
      int 21h                ;відкриття файла  
      jnc m3
      call NoFile
      jmp Exit  
m3:        
      mov [hand],ax          ;збереження номера файла  
lich:
      inc [summa]
m1:
      mov bx,[hand]          ;встановити номер файла  
      mov cx,1
      mov dx,offset Symb     ;початок буфера для тексту з файла  
      mov ah,3fh
      int 21h                ;читання з файла   
      jc m2
      cmp ax,0               ;до кінця файла ?  
      jz m2  
      mov ah,2                  
      mov dl,[symb]
      cmp dl,13
      je lich
      int 21h                ;друк зчитаного символа  
      jmp m1
m2:   
      mov bx,[hand]
      mov ah,3eh
      int 21h                ;закриття файла   

Код програми який уже є, потрібно дописати команди які будуть створювати файл і переписувати в нього дані з попереднього в зворотньому порядку.

2

(5 відповідей, залишених у Системне програмування)

ну я ж так не говорила.....і навіть не думала....це ваші...брудні фантазії....

3

(5 відповідей, залишених у Системне програмування)

Створити програму командами процесора І8086, для роботи з файлами. Зокрема переписати заданий текстовий файл в інший, виводячи стрічки в зворотному порядку.

4

(10 відповідей, залишених у Системне програмування)

ideal
model small
stack 256
dataseg
 strichka1 db 'Vvedite strichku1 =>$'
 strichka2 db 'Vvedite strichku2 =>$'
 rezult1 db 'vyhidna strichka1=>$'
 rezult2 db 'vyhidna strichka2=>$'
 lan db 40 dup(' '),'$'
 
codeseg
start:
 mov ax,@data
 mov ds,ax
mov ax,0600h
mov bh,07
mov cx,0000
mov dx,184fh
int 10h

 mov ah,02
 mov bh,00
 mov dx,0000h
 int 10h

 mov dx,offset strichka1      
 mov ah,9
 int 21h

 mov ah,0ah
 mov dx,offset lan       
 int 21h
jmp exit

e:  
mov ah,02
 mov bh,00
 mov dh,01
 mov dl,00
 int 10h

 mov dx,offset strichka2      
 mov ah,9
 int 21h

 mov ah,0ah
 mov dx,offset lan       
 int 21h
jmp ex

exit:
 mov ah,02
 mov bh,00
 mov dx,0300h
 int 10h

 mov dx,offset rezult1      
 mov ah,9
 int 21h

xor cx,cx
mov si,offset lan+1
mov cl,[si]
k:
inc si
mov dl,[si]
mov ah,2
int 21h
dec cx
cmp cx,0
jz e
jmp k

ex:
 mov ah,02
 mov bh,00
 mov dx,0400h
 int 10h

 mov dx,offset rezult2      
 mov ah,9
 int 21h

xor cx,cx
mov si,offset lan+1
mov cl,[si]
k1:
inc si
mov dl,[si]
mov ah,2
int 21h
dec cx
cmp cx,0
jz exit2
jmp k1

exit2:
 mov ah,7
 int 21h
  
 mov ah,4ch
 mov al,0
 int 21h
end

Код слід брати в тег [ code ]

5

(10 відповідей, залишених у Системне програмування)

під Windows

6

(10 відповідей, залишених у Системне програмування)

Допоможіть написати програму на мові Assembler, в якій потрібно ввести дві стрічки,а потім вивести їх у алфавітній послідовності.