Starucky Pascal - skrytie textoveho kurzora?

• Citovať príspevok

Príspevok od používateľa Mek » 26 nov 2006, 14:07

Naprogramoval som si take inteligentnejsie menu, ze mam pekne polozky vypisane pod sebou a ked hybem kurzorovymi klavesami, tak sa pekne oznacuju a odznacuju... proste klasika.
Len mi tam trochu vadi ten kurzor (_), ktory tam blika a defakto ukazuje, kde skoncil vypis. Potreboval by som ho nejako vypnut, a potom podla potreby zas zapnut.
Hrabal som sa v pascalovskom helpe a tam nic nie je (alebo neviem podla coho to mam hladat) a google nasiel akurat nejake adresy systemovych preruseni, to ale zas ja neviem, ako s tym v Pascale narabat. Nasiel som to na viacerych miestach, ale len na jednom bol uz rovno Pascalovsky kod. Skusal som ho, no nefungoval.

Kód: Vybrať všetko

uses dos;
const 
 startline=4;
 endline=8;
var
Reg:registers;

to bolo v deklaraciach a potom som dal hned po hlavnom begine:

Kód: Vybrať všetko

Reg.AH := $01;
       Reg.CH := startline;
       Reg.CL := endline;
       Intr ( $10, Reg );

Toz skusal som aj tie konstanty startline a endline dat na 0 aj na rozne hodnoty a stale nic, akoby som tam ten kod ani nemal.
Pls pomoc, ak je tu niekto, kto sa do tych preruseni trosku vyzna

• Citovať príspevok

Príspevok od používateľa audiotrack » 27 nov 2006, 0:29

• Citovať príspevok

Príspevok od používateľa Mek » 03 dec 2006, 17:16

to je presne ono, funguje to, dakujem
(KaPlus)

Re: Starucky Pascal - skrytie textoveho kurzora?

• Citovať príspevok

Príspevok od používateľa pishta007 » 15 júl 2012, 21:15

Chlapi potrebujem presne to isté, ale link je už mŕtvy. Pomôžete?

Re: Starucky Pascal - skrytie textoveho kurzora?

• Citovať príspevok

Príspevok od používateľa Mek » 15 júl 2012, 21:26

procedure kurzor(b: boolean);
begin    { na poziadanie mozeme skryt a odokryt blikajuci kurzor }
  case b of true: begin
                    asm
                      mov ah, 1
                      mov ch, 6
                      mov cl, 7
                      int $10
                    end;
                  end;
           false: begin
                    asm
                      mov ah, 1
                      mov cx, 1400h
                      int 10h
                    end;
                  end;
  end;
end;

Re: Starucky Pascal - skrytie textoveho kurzora?

• Citovať príspevok

Príspevok od používateľa pishta007 » 15 júl 2012, 21:47

Ďakujem pekne, za rýchlu odpoveď. Ak dobre rozumiem, je to pomocou assempleru.
Ja som našiel niečo takéto, ale ani podľa toho to nejde Nevieš poradiť?

Kód: Vybrať všetko

http://www.google.sk/url?sa=t&rct=j&q=&esrc=s&source=web&cd=1&ved=0CFUQFjAA&url=http%3A%2F%2Fwww.enigmaczech.cz%2Fdownload%2F477&ei=shkDUL7hAajZ4QT2vuSzCA&usg=AFQjCNFdTXM6OAV1s32J0ndgU6D4fqQ52Q&sig2=zhXwzUbXlFYXV3sTy2C5hg

Re: Starucky Pascal - skrytie textoveho kurzora?

• Citovať príspevok

Príspevok od používateľa Mek » 15 júl 2012, 22:19

No ano je to pomocou assembleru, inak sa to IMHO ani neda. Preco nemozes pouzit procedurku, ktoru som vyssie poskytol? Vsak zarucene funguje

Re: Starucky Pascal - skrytie textoveho kurzora?

• Citovať príspevok

Príspevok od používateľa pishta007 » 15 júl 2012, 23:30

Lebo nevidím celý kód aby som vedel kde a ako deklarovať premennú mov. Neviem čo je tých 1400h a tak Kebyže vidím celý kód, tak sa nejak z toho vymocem a viem čo to robí.

Re: Starucky Pascal - skrytie textoveho kurzora?

• Citovať príspevok

Príspevok od používateľa Numline1 » 16 júl 2012, 0:11

Re: Starucky Pascal - skrytie textoveho kurzora?

• Citovať príspevok

Príspevok od používateľa dykeer » 16 júl 2012, 9:55

Re: Starucky Pascal - skrytie textoveho kurzora?

• Citovať príspevok

Príspevok od používateľa pishta007 » 16 júl 2012, 23:15

Re: Starucky Pascal - skrytie textoveho kurzora?

• Citovať príspevok

Príspevok od používateľa BX » 17 júl 2012, 8:46

Re: Starucky Pascal - skrytie textoveho kurzora?

• Citovať príspevok

Príspevok od používateľa pishta007 » 18 júl 2012, 21:04

uses crt, dos;

Re: Starucky Pascal - skrytie textoveho kurzora?

• Citovať príspevok

Príspevok od používateľa BX » 19 júl 2012, 9:02

Re: Starucky Pascal - skrytie textoveho kurzora?

• Citovať príspevok

Príspevok od používateľa pishta007 » 20 júl 2012, 23:25

Re: Starucky Pascal - skrytie textoveho kurzora?

• Citovať príspevok

Príspevok od používateľa Mek » 21 júl 2012, 8:06

Re: Starucky Pascal - skrytie textoveho kurzora?

• Citovať príspevok

Príspevok od používateľa pishta007 » 21 júl 2012, 11:45

Re: Starucky Pascal - skrytie textoveho kurzora?

• Citovať príspevok

Príspevok od používateľa Mek » 21 júl 2012, 11:50

Prílohy

Semestr.zip

(5.96 KiB) 24 stiahnutí

Re: Starucky Pascal - skrytie textoveho kurzora?

• Citovať príspevok

Príspevok od používateľa pishta007 » 21 júl 2012, 23:53

NEJDE! Ty tam dokonca ani uses dos nemáš, neviem prečo. No keď dám skompilovať, zase vyhodí tie isté errory typu: "Unknown identifier "AH"", ...

Re: Starucky Pascal - skrytie textoveho kurzora?

• Citovať príspevok

Príspevok od používateľa metthal » 22 júl 2012, 0:29