Thread View: pl.comp.lang.pascal
9 messages
9 total messages
Started by Artur Jedlinski
Thu, 10 Dec 1998 11:59
WItam
Author: Artur Jedlinski
Date: Thu, 10 Dec 1998 11:59
Date: Thu, 10 Dec 1998 11:59
16 lines
1405 bytes
1405 bytes
No to ja jestem pierwszy na tej grupie (wow!). I tak sobie mysle, co
tu mozna robic. Na poczatek pare slow powiem, ze programuje sobie w
najukochanszym jezyku juz kilka latek. Obecnie bawie sie troche w grafike,
pisze unicik bedacy zintegrowanym interfejsem graficznym (prawie Win :)
Mam tez jakies tam proste unity do myszki itd. Poszukuje jakichs
unitkow do grafiki, dzwieku (czyli multimedialnych :) Szczegolnie interesuje
mnie jakowac procedurka do odtwarzania WAVow na Sound Blastera 2.0 zrobiona
na przerwaniach. Ew. jesli ktos ma jakas dokumentacje do SB 2.0 pod katem
Pascala to tez bym prosil...
A i mam pytanko... Jak ukryc kursor w trybie tekstowym (numer i opis
przerwania)...
Nataniel <nataniel@rpg.pl>
editor of "Nowe WIZJE"
"Co to za czasy, ze byle chlystek moze mowic NI do starej kobiety"
Re: WItam
Author: Jaroslaw Dziubek
Date: Fri, 11 Dec 1998 10:03
Date: Fri, 11 Dec 1998 10:03
23 lines
1946 bytes
1946 bytes
Artur Jedlinski <nataniel@infeco.pb.bialystok.pl> wrote: > No to ja jestem pierwszy na tej grupie (wow!). I tak sobie mysle, co A ja pewnie piąty (hehehehe ;-))) Pascala uczylem sie w wersji 3.0 na Elwro 800 Junior, potem byl PC XT (nadal wersja 3.0), a potem to sie potoczylo 5, 5.5 (obiektowe) i 7. W pascalu brakuje mi jednego - porzadnej obiektowosci... Szkoda. Nie lubie C, wole juz obiektowe C++. Pascal jest (IMHO) jezykiem bardzie ulozonym - mniejsza mozliosc mieszania, ale wieksza przezroczystosc kodu. Ma swoje wady, ale kto(co) ich nie ma? > A i mam pytanko... Jak ukryc kursor w trybie tekstowym (numer i opis > przerwania)... Mam taki maly unicik do tego - po niedzieli wrzuce go na WuWuWu i dam URL'a ;))) pozdrawiam Yaro -- Jarosław Dziubek <yaro@univ.gda.pl> | "Niewiele jest rzeczy, których Ośr. Inform. Uniwersytetu Gdańskiego| nie dało by się załatwić Ul. Wita Stwosza 57, 80-952 Gdańsk | przy pomocy odpowiedniej tel. (0-58)5529276, (0-58)5529046 | dawki materiałów wybuchowych" Odcisk klucza PGP: 72 08 2A E8 B0 0F 22 81 93 56 68 6E D4 9A E2 D3
Re: WItam
Author: Piotr Bochaczyk
Date: Fri, 11 Dec 1998 18:46
Date: Fri, 11 Dec 1998 18:46
20 lines
1650 bytes
1650 bytes
> Pascala to tez bym prosil...
> A i mam pytanko... Jak ukryc kursor w trybie tekstowym (numer i opis
> przerwania)...
Jesli chodzi o kursor myszy, to przerwanie 33h(chyba, pisze z pamieci),
a jesli o kursor tekstowy, to 10h(100%), funkcja bodajze 10h(nie jestem
pewien).
W tym drugim przypadku chodzi o podanie takiej wysokosci kursora, zeby
karta nie mogla go wyswietlic. Mozna tez sprobowac przeniesc kursor za
ekran, ale w czasie pisania Write(ln) lub funkcjami 10h (nie pamietam
ktorymi byly trzy) bedzie widoczny i trzeba go bedzie znow ukrywac.
Najlepszy jest sposob ze zmiena jego rozmiaru. Dziala na 100% na kazdej
karcie.
--
'
__ Piotr Bochaczyk \\
,@@ \\`----------------------------------------- :
& U neevor@teamos2.org.pl neevor@asua.org.pl |
`--... | |----------------------------------// /
// / Hiroshima-45 Czarnobyl-87 \\ \
='==' Windows-95 = ==
Re: WItam
Author: Artur Jedlinski
Date: Sat, 12 Dec 1998 11:14
Date: Sat, 12 Dec 1998 11:14
19 lines
1392 bytes
1392 bytes
Piotr Bochaczyk <piotrb@mops.uci.agh.edu.pl> wrote:
:> A i mam pytanko... Jak ukryc kursor w trybie tekstowym (numer i opis
:> przerwania)...
: Jesli chodzi o kursor myszy, to przerwanie 33h(chyba, pisze z pamieci),
<SPLAT>
: Najlepszy jest sposob ze zmiena jego rozmiaru. Dziala na 100% na kazdej
: karcie.
<SPLAT>
Chodzi mi o kursor textowy, tzn ten standardowy, ktory siem pokazuje
obok napisanej ostatnio literki i ktorego mozna sobie przeniosic za pomoca
GotoXY, a nie o kursor myszy.
Swoja droga sposob na kursor myszy tez mi sie przyda, thnx :)
Nataniel <nataniel@rpg.pl>
editor of "Nowe WIZJE"
"Co to za czasy, ze byle chlystek moze mowic NI do starej kobiety"
Re: WItam
Author: Jaroslaw Rafa
Date: Sat, 12 Dec 1998 16:55
Date: Sat, 12 Dec 1998 16:55
13 lines
1248 bytes
1248 bytes
Artur Jedlinski <nataniel@infeco.pb.bialystok.pl> wrote: > Mam tez jakies tam proste unity do myszki itd. Poszukuje jakichs > unitkow do grafiki, dzwieku (czyli multimedialnych :) Szczegolnie interesuje > mnie jakowac procedurka do odtwarzania WAVow na Sound Blastera 2.0 zrobiona > na przerwaniach. Ew. jesli ktos ma jakas dokumentacje do SB 2.0 pod katem > Pascala to tez bym prosil... > A i mam pytanko... Jak ukryc kursor w trybie tekstowym (numer i opis > przerwania)... A zagladales na Simtela do katalogu 'turbopas'? Tam jest masa takich rzeczy... :-))) Pozdrowienia, Jaroslaw Rafa raj@inf.wsp.krakow.pl
Re: WItam
Author: Rafal Peisert
Date: Sun, 13 Dec 1998 01:22
Date: Sun, 13 Dec 1998 01:22
89 lines
4511 bytes
4511 bytes
Artur Jedlinski napisał(a) w wiadomości:
<74od27$l54$1@zeus.polsl.gliwice.pl>...
<ciach>
Witam!
Ktory jestem nie wiem, ale ciesze sie bardzo ze ta grupa powstala.
Programuje
raczej dorywczo od kilku lat (edytory SaveGame'ow, proste prog.
obliczeniowe),
niemniej zamierzam sie wciagnac w Pascala troche mocniej.
>unitkow do grafiki, dzwieku (czyli multimedialnych :) Szczegolnie
interesuje
>mnie jakowac procedurka do odtwarzania WAVow na Sound Blastera 2.0 zrobiona
>na przerwaniach. Ew. jesli ktos ma jakas dokumentacje do SB 2.0 pod katem
>Pascala to tez bym prosil...
Pozwalam sobie zalaczyc email ktory do mnie przylazl. Moze Cie zaciekawi (i
nie
tylko Ciebie :-)
> A i mam pytanko... Jak ukryc kursor w trybie tekstowym (numer i opis
>przerwania)...
Ukrycie kursora:
asm
mov ah, 1
mov cx, 2000h
int 10h
end;
Wlaczenie kursora (kursor typu "line"):
asm
mov ah, 1
mov cx, 0607h
int 10h
end;
Wlaczenie kursora (typu "block":
asm
mov ah, 1
mov cx, 0607h
int 10h
end;
Pozdrowka
Rafal 'Rav' Peisert
rufusp@friko5.onet.pl
begin 666 programowanie.txt
M3V0Z(%=E8B!0<F]M;W1I;VX@/&%D:6M <F5W+G=A=RYP;#X-"D1O.B!5;F1I
M<V-L;W-E9"Y296-I<&EE;G1S0&=R:7IZ;'DN<F5W+G=A=RYP;" \56YD:7-C
M;&]S960N4F5C:7!I96YT<T!G<FEZ>FQY+G)E=RYW87<N<&P^#0I496UA=#H@
M4%)/1U)!34]704Y)10T*1&%T83H@,3,@9W)U9&YI82 Q.3DX(# P.C0U#0H-
M"DYI92!M=7-I<WH@:G5Z(&=O9'II;F%M:2!P<GIE<WIU:VEW86,@>F%S;V)O
M=R!);G1E<FYE='4L('IR;V)I;&ES;7D@=&\@>F$-"D-I96)I92$-"@T*3V9E
M<G5J96UY('!L>71E($-$+"!N82!K=&]R96H@:V%Z9'DL('IA:FUU:F%C>2!L
M=6(@8VAC86-Y('IA:F%C('-I90T*<')O9W)A;6]W86YI96TL('IN86ID>FEE
M(&-O<R!D;&$@<VEE8FEE+B!7>6)R86QI<VUY(&1W82!N86IP;W!U;&%R;FEE
M:G-Z90T*:F5Z>6MI("T@5'5R8F\@4&%S8V%L+"!J86MO('!O9'-T87=O=WD@
M:F5Z>6L@=WEK;&%D86YY('<@<WIK;VQE('-R961N:65J(&YA#0IZ86IE8VEA
M8V@@>B!I;F9O<FUA='EK:2P@=6UO>FQI=VEA:F%C>2!W(&1O<V,@<')O<W1Y
M('-P;W-O8B!N875K92!T<G5D;F5J#0IS>G1U:VD@<')O9W)A;6]W86YI82P@
M;W)A>B!B87IU:F%C>2!N82!E;&5M96YT86-H('!A<V-A;&$L('IO<FEE;G1O
M=V%N>0T*;V)I96MT;W=O+"!U;6]Z;&EW:6%J86-Y('1W;W)Z96YI92!A<&QI
M:V%C:FD@,S(@8FET;W=Y8V@@<&]D(&MO;G1R;VQA#0I7:6YD;W=S.34L(&IE
M>GEK($)O<FQA;F0@1&5L<&AI+@T*3F$@<&QY8VEE('IN86ID=6IE('-I92!W
M:65L92!P<F]C961U<BP@9G5N:V-J:2P@;6]D=6QO=R!F<F5E=V%R92]S:&%R
M97=A<F4L#0IP;VUO8VYY8V@@=R!T=V]R>F5N:74@=R!4=7)B;R]";W)L86YD
M(%!A<V-A;'4@-BXP+S<N,"!W;&%S;GEC:"!A<&QI:V%C:FDN#0I0<GIY:VQA
M9&]W;RP@<')O8V5D=7)Y(&1O('!A<V-A;&$@=6UO>FQI=VEA:F$@=V4@=VQA
M<VYY8V@@<')O9W)A;6%C:#H-"BT@;V1C>GET('!L:6MO=R!G<F%F:6-Z;GEC
M:"!"35 L(%!#6"P@1TE�HM(&]D='=A<GIA;FEE('<@=&QE('!L:6MO=R!M
M=7IY8WIN>6-H($U/1"P@5T%6+"!63T,L(%--4 T*+2!O9'1W87)Z86YI92!A
M;FEM86-J:2!&3$D-"BT@<&5L;F$@;V)S;'5G92!T<GEB;W<@4U9'02!B97H@
M8F%Z;W=A;FEA(&YA(&UO9'5L92!'<F%P: T*+2!T=V]R>F5N:64@9&]W;VQN
M>6-H(')O>FUI87)O=RP@=VEE;&]K;VQO<F]W>6-H('=S:V%Z;FEK;W<@;7ES
M>GD-"BT@='=O<GIE;FEE('-C:&5M871O=R!D>G=I96MO=WEC:"!B87IU:F%C
M>6-H(&YA(')E:F5S=')A8V@@:V%R='D@;75Z>6-Z;F5J+ T*;V1T=V%R>F%N
M>6-H('<@=&QE#0H-"D1L82!O<V]B(&-H8V%C>6-H('!O>FYA8R!J97IY:R!$
M96QP:&D@>F%M:65S>F-Z;VYO(&YA('!L>6-I92 S,"UD;FEO=V$-"G=E<G-J
M92!$96QP:&D@,BXP+"!A(&1L82!T>6-H+"!K=&]R>GD@=R!T>6T@:F5Z>6MU
M(&IU>B!T=V]R>F$@87!L:6MA8VIE+ T*;F%P97=N;R!L86MO;7EM(&MA<VMI
M96T@8F5D>FEE(%]K:6QK87-E=%\@9G)E97=A<F]W>6-H('!R;VIE:W1O=RP@
M:V%Z9'D@>@T*;W!I<V5M(&D@:V]D96T@>G)O9&QO=WEM+"!O<F%Z(&MI;&MA
M9'II97-I870@<')O9W)A;6]W(&YA<GIE9'II;W=Y8V@L#0IP;V1Z:65L;VYY
M8V@@=R!Z86QE>FYO<V-I(&]D('=E<G-J:2!K;VUP:6QA=&]R82!$96QP:&DN
M(%IA;6EE<WIC>F]N;R!R;W=N:65Z#0IO<&ES("AW(&IE>GEK=2!P;VQS:VEM
M*2!T=V]R>F5N:6$@<&QI:W4@<&]M;V-Y("(J+DA,4"(N#0H-"E!L>71A(&1O
M(&MO;F-A('1E9V\@<F]K=2!D;R!N86)Y8VEA+"!Z82!Z86QI8WIE;FEE;2!P
M;V-Z=&]W>6TL('IA(&MW;W1E#0HR-RPU,'IL("AW;&EC>F]N92!K;W-Z='D@
M=WES>6QK:2DN#0H-"EIA;6]W:65N:6$@<')O<VEM>2!P<GIE<WEL86,@;F$@
M861R97,Z(&UA:6QE<D!F<FEK;RYO;F5T+G!L('H@=&5M871E;0T*4%)/1U)!
-34]704Y)10T*#0H-"@``
`
end
Re: WItam
Author: P.O.S.
Date: Tue, 22 Dec 1998 00:26
Date: Tue, 22 Dec 1998 00:26
37 lines
1588 bytes
1588 bytes
Artur Jedlinski wrote: > > Piotr Bochaczyk <piotrb@mops.uci.agh.edu.pl> wrote: > :> A i mam pytanko... Jak ukryc kursor w trybie tekstowym (numer i opis > :> przerwania)... > > <SPLAT> > > Chodzi mi o kursor textowy, tzn ten standardowy, ktory siem pokazuje > obok napisanej ostatnio literki i ktorego mozna sobie przeniosic za pomoca > GotoXY, a nie o kursor myszy. > Swoja droga sposob na kursor myszy tez mi sie przyda, thnx :) > > Nataniel <nataniel@rpg.pl> > editor of "Nowe WIZJE" > > "Co to za czasy, ze byle chlystek moze mowic NI do starej kobiety" Sorry że tak póÝno... ...ale dopiero od niedawna subskrybuję tą grupkę mylślę że chodzi Ci o taki kursor "_" jesli tak to to zalatwi sprawe: asm mov ah,01h mov ch,20h int 10h end; -- POSdrawiam P.O.S. Bartłomiej Molawka poside@friko4.onet.pl ICQ#: 15695665
Re: WItam
Author: P.O.S.
Date: Tue, 22 Dec 1998 17:04
Date: Tue, 22 Dec 1998 17:04
37 lines
1588 bytes
1588 bytes
Artur Jedlinski wrote: > > Piotr Bochaczyk <piotrb@mops.uci.agh.edu.pl> wrote: > :> A i mam pytanko... Jak ukryc kursor w trybie tekstowym (numer i opis > :> przerwania)... > > <SPLAT> > > Chodzi mi o kursor textowy, tzn ten standardowy, ktory siem pokazuje > obok napisanej ostatnio literki i ktorego mozna sobie przeniosic za pomoca > GotoXY, a nie o kursor myszy. > Swoja XX-Mozilla-Status: 0009myszy tez mi sie przyda, thnx :) > > Nataniel <nataniel@rpg.pl> > editor of "Nowe WIZJE" > > "Co to za czasy, ze byle chlystek moze mowic NI do starej kobiety" Sorry że tak póÝno... ...ale dopiero od niedawna subskrybuję tą grupkę mylślę że chodzi Ci o taki kursor "_" jesli tak to to zalatwi sprawe: asm mov ah,01h mov ch,20h int 10h end; -- POSdrawiam P.O.S. Bartłomiej Molawka poside@friko4.onet.pl ICQ#: 15695665
Re: WItam
Author: Piotr ,,Neevor'' Bochaczyk
Date: Wed, 23 Dec 1998 13:08
Date: Wed, 23 Dec 1998 13:08
20 lines
1440 bytes
1440 bytes
> Sorry że tak póÝno...
> ...ale dopiero od niedawna subskrybuję tą grupkę
>
> mylślę że chodzi Ci o taki kursor "_"
> jesli tak to to zalatwi sprawe:
>
> asm
> mov ah,01h
> mov ch,20h
> int 10h
> end;
Widze, ze nie tylko od niedawna czytasz grupe, ale do tego czytasz ja
niedokladnie. Powodzenia.
__ Piotr ,,Neevor'' Bochaczyk
___ ___ __ ___ member of Team OS/2 Poland
_ _ _ __ _ _ & Asu'a Programmers Group
_ _ __ __ _
_ _ _ __ _ neevor@teamos2.org.pl
___ ___ __ ______
__ Uroda x Rozum = const
Thread Navigation
This is a paginated view of messages in the thread with full content displayed inline.
Messages are displayed in chronological order, with the original post highlighted in green.
Use pagination controls to navigate through all messages in large threads.
Back to All Threads