pascal ustawianie kursora

[blost]

Witam
W jaki sposób mogę napisać procedure która będzie mi przesówać kursor na początek ekrany tj do punku 1,1
niestety mam dziure w programi, latka nie mam pojecia jak podszyc totez nie moge uzywac zadnych bibliotek typu crt

[N4RQ5]

jeśli nie działa Ci crt to całe twoje programowanie w Pascalu nie ma IMO racji byty. Istnieje procedura gotoXY(x,y:byte); przesuwająca kursor ale o ile dobrze pamiętam to jest to procedura z modułu CRT.

Jeśli nie działa Ci poprawnie biblioteka to może zmień kompilator na FreePascala i używaj procedr bibliotecznych.

[blost]

o to wlasnie chodzi... nie moge zmienic kompilatora ;/
wiem ze istnieje gotoxy ale ona wlasnie na crt chodzi, wiec zastanawiam sie nad tym jak napisac ta procedure sam

[klaustrofob]

pod jakim systemem ma działać program? jeżeli pod dosem, można ustawiać kursor za pomocą procedur biosu, poszukaj w sieci. inne rozwiązanie to pisanie bezpośrednio do pamięci ekranu. nie wiem jak praca z biosem wygląda pod windą - może to zależeć od tego, czy program ma działać w oknie, czy nie. w trybie pełnoekranowym powinno działać jedno i drugie.

[spajder]

mówisz o tym błędzie, co wywala error 200 na szybkich kompach?
na to są łatki i to, o ile pamiętam, w dwóch formatach:
1. nowa (tzn. poprawiona) biblioteka crt, po prostu zastępujesz w katalogu
2. program do edycji execów - nie pamiętam nazwa, ale jak to jest coś w stylu patch to używasz tak:

Kod: Zaznacz cały

patch nazwa_pliku.exe

przy czym tego drugiego używasz tylko, jeśli nie masz kodu źródłowego

Możesz zawsze walnąć taką procedurkę:

Kod: Zaznacz cały

procedure GotoXY(X : byte, Y : byte); assembler;
asm
    mov ah, 02h
    xor bh, bh
    mov dh, x
    mov dl, y
    int 10h
end;

procedury nie wklepywałem w kompilator, ale chyba błędów nie ma