🚀 go-pugleaf

RetroBBS NetNews Server

Inspired by RockSolid Light RIP Retro Guy

Article View: pl.comp.lang.asm
Article #629

Problem z przesunięciem ekranu

#629
From: Johnny
Date: Wed, 13 Sep 2006 08:35
94 lines
2211 bytes
Mam drobny problem z przesunięciem ekranu. Otóż sam efekt przesunięcia
tekstu o 1 wiersz potrafię osiągnąć lecz po tym zabiegu nie są widoczne
dalsze wpisywane znaki (0-9). Prawdopodobnie niewłaściwie ustawiam
położenie wskaźnika przy pomocy int 10h i ah=2h. Próbowałem z różnymi
ustawieniami dh (wiersze) ale bezskutecznie. Mógłby ktoś rzucić na to
okiem? Dzięki z góry.

title 6_04
.model small
.stack 100h
.386
.code
;---------------------------------------------
; main
;---------------------------------------------
main proc
mov ax,@data		; inicjalizacja ds
mov ds,ax

mov ah,0h		; tryb video
mov al,3h
int 10h

; odczytanie położenia wskaźnika
mov ah,3h
int 10h

; odczyt znaku
odczytaj:
mov ah,10h
int 16h

; jeżeli wprowadzono ESC zakończ program
cmp ah,1h
je exit

; jeżeli wprowadzono znak z zakresu 0-9
; wyświetl go i przesuń wskaźnik
cmp ah,2h
jb odczytaj

cmp ah,0Bh
ja odczytaj

mov ah,0Ah		; wyświetl znak
mov cx,1h
int 10h

inc dl
cmp dl,4Fh
ja next_row
mov ah,2h
int 10h
jmp odczytaj

next_row:
inc dh
cmp dh,18h
ja move

mov ah,2h
mov dl,0h
int 10h

jmp odczytaj

move:
mov ah,3h
int 10h

mov ah,6h
mov al,1h
xor cx,cx
mov dl,5h
int 10h

mov ah,2h
mov dl,0h
inc dh
inc dh
int 10h

jmp odczytaj

exit:
mov ax,4C00h		; zakończenie procedury
int 21h
main endp

.data
end main

-- 
Johnny
Technical Details
Message-ID: <ee8g03$ia2$1@nemesis.news.tpi.pl>
Path: mbox-mo1.pugleaf.net!news-archive.icm.edu.pl!newsfeed.gazeta.pl!news.onet.pl!newsfeed.tpinternet.pl!atlantis.news.tpi.pl!news.tpi.pl!not-for-mail

Show Full Headers
Complete Article Headers
Path: mbox-mo1.pugleaf.net!news-archive.icm.edu.pl!newsfeed.gazeta.pl!news.onet.pl!newsfeed.tpinternet.pl!atlantis.news.tpi.pl!news.tpi.pl!not-for-mail
From: Johnny <johnny_bez_spamu_@klub.chip.pl>
Newsgroups: pl.comp.lang.asm
Subject: Problem z przesunięciem ekranu
Date: Wed, 13 Sep 2006 10:35:24 +0200
Organization: tp.internet - http://www.tpi.pl/
Lines: 94
Message-ID: <ee8g03$ia2$1@nemesis.news.tpi.pl>
NNTP-Posting-Host: nat-132.wasko.pl
Mime-Version: 1.0
X-Trace: nemesis.news.tpi.pl 1158136643 18754 193.178.240.132 (13 Sep 2006 08:37:23 GMT)
X-Complaints-To: usenet@tpi.pl
NNTP-Posting-Date: Wed, 13 Sep 2006 08:37:23 +0000 (UTC)
User-Agent: Thunderbird 1.5.0.5 (Windows/20060719)
Content-Type: text/plain; charset=UTF-8
Content-Transfer-Encoding: 8bit