IPB
ЛогинПароль:

> ПРАВИЛА РАЗДЕЛА!!!

1. Заголовок или название темы должно быть информативным
2. Все тексты программ должны помещаться в теги [CODE=asm] [/CODE]
3. Прежде чем задавать вопрос, см. "FAQ",если там не нашли ответа, воспользуйтесь ПОИСКОМ, возможно, такую задачу уже решали!
4. Не предлагайте свои решения на других языках, кроме Ассемблера. Исключение только с согласия модератора.
5. НЕ используйте форум для личного общения! Все, что не относиться к обсуждению темы - на PM!
6. Проверяйте программы перед тем, как выложить их на форум!!

> помогите с курсором...
bigglewood
сообщение 10.04.2007 18:59
Сообщение #1


Пионер
**

Группа: Пользователи
Сообщений: 55
Пол: Мужской

Репутация: -  0  +


вот я написал прогу.
 
my_stack segment stack                                    
dw     32 dup(?)                                             
my_stack ends                                         
oursg     segment                         
     assume     cs:oursg, ds:oursg,ss:my_stack     
                
symb     db          168 dup('*')                             
begin:
     mov     ax, oursg         
     mov     ds, ax          
     mov      cx, 7                  
     mov      al,  51                    
     mov      si, 0                         
m0:                
       push     cx                                       
       mov      cx, 12          
m:                                  
       mov      [symb+si], al                                  
       inc si 
       mov     [symb+si], 09h                                                               
       inc        al
       inc        si                                              
loop m
pop cx
loop m0              
     mov     ah,40h 
     mov     cx,168
     mov     bx,1        
     mov     dx, offset symb  
     int     21h 
     mov     ax, 4C00h          
     int     21h
oursg     ends
     end     begin




она выдает результат в виде(строк):

Код

3        4       5       6       7       8       9       :      ;       <
=       >       ?       @       A       B       C       D       E       F
G       H       I       J       K       L       M       N       O       P
Q       R       S       T       U       V       W       X       Y       Z
[       \       ]       ^       _       `       a       b       c       d
e       f       g       h       i       j       k       l       m       n
o       p       q       r       s       t       u       v       w       x
y       z       {       |       }       ~       ⌂        А       Б       В
  Г       Д       Е       Ж

а мне нужен вывод ввиде столбцов. т.е результат должен быть таким
Код

3 = G Q
4 > H R
5 ? I  S
6 @ J T
7 A K    и так далее.
8 B L
9 C M
: D  N
; E O
< F P

не могу понять как это сделать. спасибо.
 Оффлайн  Профиль  PM 
 К началу страницы 
+ Ответить 
 
 Ответить  Открыть новую тему 
Ответов(1 - 1)
bigglewood
сообщение 12.04.2007 17:39
Сообщение #2


Пионер
**

Группа: Пользователи
Сообщений: 55
Пол: Мужской

Репутация: -  0  +


Уже решил сам. всем спасибо. кому интересно вот:

 my_stack segment stack
dw 32 dup(?)
my_stack ends
oursg segment
assume cs:oursg, ds:oursg
begin:
symb db 168 dup('*') 
mov     ax, oursg          
mov     ds, ax 
mov ax,51
mov cx,12
mov si,0
LOOP_A1: 
push cx
push ax
mov cx,14
mov [symb+si],0ah
inc si
LOOP_B1: 
mov [symb+si],al
inc si
add al,12
loop LOOP_B1
pop ax
inc ax
pop cx
loop LOOP_A1 


mov	ah, 40h		
	mov	cx, 168	
	mov	bx, 1		
	mov	dx, offset symb	
	int	21h		
	mov	ax, 4C00h		
	int	21h
oursg	ends
	end	begin
 Оффлайн  Профиль  PM 
 К началу страницы 
+ Ответить 

 Ответить  Открыть новую тему 
1 чел. читают эту тему (гостей: 1, скрытых пользователей: 0)
Пользователей: 0

 

- Текстовая версия 26.07.2025 7:34
Хостинг предоставлен компанией "Веб Сервис Центр" при поддержке компании "ДокЛаб"