Dotaz: free pascal a přístup na obrazovku

[Míra]

Rád bych přenesl svůj program v Borland Pascalu z DOSu do Linuxu ve Free pascalu. Pro práci s obrazovkou jsem používal přímý přístup k obrazovce - zápis a čtení přímo z Video RAM. Nevíte někdo, jak toto provést ve Free pascalu pod Linuxem? Potřebuji například zjistit znak a jeho atributy na pozici XY. Případně změnit atributy znaku na pozici XY. Nebo úschovu a obnovení obsahu celé obrazovky. Dík za radu, Míra

Odpovědi

[unchallenger]

Na přímé čtení a zápis do videoRAM raději rovnou zapomeň. Linux je na rozdíl od DOSu multitaskingový a multiuživatelský. Navíc tvůj program nakonec stejně asi nepoběží v opravdovém znakovém VGA módu, ale spíš v terminálu spuštěném z úplně jiného počítače, v X spuštěných z ještě úplně jiného počítače, etc. Přinejmenším by mělo být možné ho tak spustit... Máš k disposici standardní CRT unit, a s tím by sis snad měl vystačit.

[Míra]

No to taky vím, že mi to přímej přístup neumožní, ale nějaká unita by to třeba mohla mít vyřešený. CRT neumožňuje výše zmíněný požadavky. Netrvám na přímým přístupu, ale proceduře, která mi to nahradí.

[unchallenger]

Mh, já sice fp už dávno nepoužívám, ale co VIDEO unit? Obávám se, že zjistit, co předtím na terminál napsaly ostatní programy, bude potíž... můžeš si leda kontrolovat, co tam píšeš ty. Pokud jde o uložení a obnovení obsahu terminálu, tak některé to prostě nepodporují. Pokud to podporují, tak to funguje přes te a ti (viz info terminfo) a InitVideo to snad dělá samo. A když nedělá, tak by se ty správně kontrolní sekvence asi musely nějak napůl ručně vzít z termcapu (nevím, jestli má fp nějaký přímý přístup k terminfo, curses a podobným věcem), ale nemusí to být úplně triviální, protože si s těmi fp knihovnami polezete navzájem do zelí...

[Míra]

No, prošel jsem tu VIDEO unitu, ale asi to není použitelný. Přitom v MC klávesy CTRL-O uloží/vrátí obsah obrazovky, což bych vlastně chtěl. Asi budu muset zkusit Kylix, i když mi taky moc nesedí... Taková klasická DOSovská aplikace, bez grafiky-rychlá a nenáročná na HW a knihovny... ale díky za snahu pomoct.

[unchallenger]

Nechápu... Jak jsem se tak díval, máš v fp k disposici interface k ncurses, FVision (reimplementace TurboVision), TextVideo, interface ke Gtk, ... a N dalších unitů. Jeden z nás dvou fakt neví, co chceš ;-)

[Míra]

No, chyba je určitě na mý straně, teď jsem nerozuměl ani slovu... Můžu dostat odpověď na kettis@volny,cz?

[unchallenger]

V Pascalu jsem sice programoval sedm let, ale podařilo se mi se z toho vyléčit ;-) takže detaily ode mne moc nečekej. Ta slova, kterým jsi nerozuměl, jsou nejspíše jména věcí, které ti umožní udělat textový nebo jiný interface, aniž by ses musel uchylovat rovnou ke Kylixu. Projdi si, jaké unity jsou pro fp k disposici...

[nemo]

Zkus nejaky Pascal binding ke knihovne ncurses. Primy pristup do pameti nelze. Kylix prelozi konzolovou aplikaci bez grafiky v pohode.