Из model small в model tiny

@Deemk0 · Регистрация: 01.11.2011

Студворк — интернет-сервис помощи студентам

Доброго времени суток .
Помогите переделать программу из model small в tiny при помощи функций 3Fh и 40h, 21h прерывания

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
.model small                                                                   
 
.stack 100                                            
.data                        
maxLength               db          11  
 currentLength      db          ?              
S1                  db                 11 dup(?)       
S2                  db          4 dup(?)    
 newLine                db          10,13,'$'                                                                                                                                                           
 
.code                               
 assume     ss:@stack,ds:@data,cs:@code    
.startup                                                           
   push     ds          
    push        0
            
    mov     ax,@data    
    mov     ds,ax   
                        
    mov     ah, 0ah
    mov     dx, offset maxLength                   
    int         21h     
       mov          ah,9
    mov         dx,offset newLine   
    int         21h                                       
    mov         bh, 0
    mov         bl, currentLength
    mov         S1[bx], byte ptr '$'
 
            
    mov         ah,9
    mov         dx,offset S1
    int         21h         
    mov         ah,9
    mov         dx,offset newLine
    int         21h
    mov         bl, S1[0]                       
    mov         S2[0], bl
    mov         bl, S1[1]
                                                                                                 
    mov         S2[1], bl
            
    mov         bl, S1[2]
                                                                                                  
    mov         S2[2], bl
            
    mov         S2[3], '$'
                        
    mov         ah,9
    mov         dx,offset S2                                                           
    int         21h
    mov         ah,4ch                                         
                                             
    int         21h
        
                
    end

@Goodwin98 · 21.11.2011, 20:10

Меяем тип, убираем сегмент стека, убираем инициаллизацию сегмента данных. какие проблемы ?

@Deemk0 · 21.11.2011, 20:15 **[ТС]**

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
.model tiny                                                                   
 
.code                                                
org 100h  
assume                          ds:@code
start:
jmp begin                      
maxLength                       db                      11      
 currentLength          db                      ?                  
S1                              db                         11 dup(?)       
S2                              db                      4 dup(?)        
 newLine                        db                      10,13,'$'                                                                                                                                                                                               
begin :
                                              
   push         ds              
        push            0
                        
        mov             ax,@data        
        mov             ds,ax   
                                                
        mov             ah, 3Fh
        mov             dx, offset maxLength                   
        int                     21h             
       mov                      ah,40h
        mov                     dx,offset newLine       
        int                     21h                                       
        mov                     bh, 0
        mov                     bl, currentLength
        mov                     S1[bx], byte ptr '$'
 
                        
        mov                     ah,40h
        mov                     dx,offset S1
        int                     21h                     
        mov                     ah,40h
        mov                     dx,offset newLine
        int                     21h
        mov                     bl, S1[0]                       
        mov                     S2[0], bl
        mov                     bl, S1[1]
                                                                                                 
        mov                     S2[1], bl
                        
        mov                     bl, S1[2]
                                                                                                  
        mov                     S2[2], bl
                        
        mov                     S2[3], '$'
                                                
        mov                     ah,40h
        mov                     dx,offset S2                                                           
        int                     21h
        mov                     ah,4ch                                             
                                                 
        int                     21h
                
                                
        end                     start

проблема в том, что он выдает ошибку : segment-relocatable items present

Добавлено через 3 минуты
что я тут не так сделал?

@Goodwin98 · 21.11.2011, 20:50

Deemk0, уберите assume и

Сообщение от Goodwin98

инициаллизацию сегмента данных

@Deemk0 · 21.11.2011, 21:05 **[ТС]**

Goodwin98 , хорошо, теперь при выводе ответа он выводит какие-то непонятные символы :

https://www.cyberforum.ru/atta... 1321895054

@Deemk0 · 21.11.2011, 22:55 **[ТС]**

все разобрался, спасибо, заменил функции 40h и 3Fh на 9 и 0ah и все заработало. Думал что и их можно использовать в свободном виде

Новые блоги и статьи Все статьи Все блоги /
Модульный подход на примере F# DevAlt 06.03.2026 В блоге дяди Боба наткнулся на такое определение: В этой книге («Подход, основанный на вариантах использования») Ивар утверждает, что архитектура программного обеспечения — это структуры,. . .	Управление камерой с помощью скрипта OrbitControls.js на Three.js: Вращение, зум и панорамирование 8Observer8 05.03.2026 Содержание блога Финальная демка в браузере работает на Desktop и мобильных браузерах. Итоговый код: orbit-controls-threejs-js. zip. Сканируйте QR-код на мобильном. Вращайте камеру одним пальцем,. . .	SDL3 для Web (WebAssembly): Синхронизация спрайтов SDL3 и тел Box2D 8Observer8 04.03.2026 Содержание блога Финальная демка в браузере. Итоговый код: finish-sync-physics-sprites-sdl3-c. zip На первой гифке отладочные линии отключены, а на второй включены:. . .	SDL3 для Web (WebAssembly): Идентификация объектов на Box2D v3 - использование userData и событий коллизий 8Observer8 02.03.2026 Содержание блога Финальная демка в браузере. Итоговый код: finish-collision-events-sdl3-c. zip Сканируйте QR-код на мобильном и вы увидите, что появится джойстик для управления главным героем. . . .
Реалии Hrethgir 01.03.2026 Нет, я не закончил до сих пор симулятор. Эта задача сложнее. Не получилось уйти в плавсостав, но оно и к лучшему, возможно. Точнее получалось - но сварщиком в палубную команду, а это значит, в моём. . .	Ритм жизни kumehtar 27.02.2026 Иногда приходится жить в ритме, где дел становится всё больше, а вовлечения в происходящее — всё меньше. Плотный график не даёт вниманию закрепиться ни на одном событии. Утро начинается с быстрых,. . .	SDL3 для Web (WebAssembly): Сборка библиотек: SDL3, Box2D, FreeType, SDL3_ttf, SDL3_mixer и SDL3_image из исходников с помощью CMake и Emscripten 8Observer8 27.02.2026 Недавно вышла версия 3. 4. 2 библиотеки SDL3. На странице официальной релиза доступны исходники, готовые DLL (для x86, x64, arm64), а также библиотеки для разработки под Android, MinGW и Visual Studio. . . .	SDL3 для Web (WebAssembly): Реализация движения на Box2D v3 - трение и коллизии с повёрнутыми стенами 8Observer8 20.02.2026 Содержание блога Box2D позволяет легко создать главного героя, который не проходит сквозь стены и перемещается с заданным трением о препятствия, которые можно располагать под углом, как верхнее. . .

@Goodwin98 2537 / 833 / 10 Регистрация: 31.05.2009 Сообщений: 1,668
	21.11.2011, 20:10
	Меяем тип, убираем сегмент стека, убираем инициаллизацию сегмента данных. какие проблемы ? 0

@Deemk0 0 / 0 / 1 Регистрация: 01.11.2011 Сообщений: 18
	21.11.2011, 21:05 [ТС]
	Goodwin98 , хорошо, теперь при выводе ответа он выводит какие-то непонятные символы : https://www.cyberforum.ru/atta... 1321895054 Миниатюры 0

@Deemk0 0 / 0 / 1 Регистрация: 01.11.2011 Сообщений: 18
	21.11.2011, 22:55 [ТС]
	все разобрался, спасибо, заменил функции 40h и 3Fh на 9 и 0ah и все заработало. Думал что и их можно использовать в свободном виде 0