dal 2015 - visita n. 557
TpuModeX
TpuModeX

 

TpuModeX

Le Procedure/Funzioni TPUMODEX per TurboPASCAL (4.0÷7.0) aggiungono delle efficaci primitive orientate alla grafica VGA in modalità X-Mode. Le TPUMODEX sono caratterizzate dalla iniziale X (eXtended).
Queste procedure vengono costruite tramite la unit TPUMODEX.PAS.

Sezioni Esterne in Pascal  Sezioni Esterne in Assembly  
  • Nessuna
  • Nessuna


Documentazione


Procedure XMSetMode(Mode: Word);
Attiva una delle 8 modalità VGA X-Mode.
0 = 320 x 200, 4 Pagine, Fattore di forma 1.2:1
1 = 320 x 400, 2 Pagine, Fattore di forma 2.4:1
2 = 360 x 200, 3 Pagine, Fattore di forma 1.35:1
3 = 360 x 400, 1 Pagina, Fattore di forma 2.7:1
4 = 320 x 240, 3 Pagine, Fattore di forma 1:1
5 = 320 x 480, 1 Pagina, Fattore di forma 2:1
6 = 360 x 240, 3 Pagine, Fattore di forma 1.125:1
7 = 360 x 480, 1 Pagina, Fattore di forma 2.25:1
Es.: XMSetMode(3);

Procedure XMSetModeVga(Mode,MaxX,MaxY,Pages: Word);
Attiva una delle 8 modalità VGA X-Mode fissandone i parametri ausiliari.
Vedi XMSetMode.
Es.: XMSetModeVga(3);

Procedure XMSetPix(X,Y,C: Word);
Traccia un Pixel in X,Y, di colore C.
Es.: XMSetPix(100,100,35);

Procedure XMClrScr(C: Word);
Colora lo schermo in C.
Es.: XMClrScr(4);

Function XMGetPix(X,Y: Word): Byte;
Legge il colore del pixel in X,Y.
Es.: XMGetPix(100,100);

Procedure XMBoxFilled(X1,Y1,X2,Y2,C: Word);
Es.:

Procedure XMLine(X1,Y1,X2,Y2,C: Word);
Es.:

Procedure XMSetActivePage(PageNo: Word);
Es.:

Function XMGetActivePage: Word;
Es.:

Procedure XMSetDisplayPage(PageNo: Word);
Es.:

Function XMGetDisplayPage: Word;
Es.:

Procedure XMSetDacReg(Register,Red,Green,Blue: Word);
Es.:

Procedure XMGetDacReg(Register: Word; Var Red,Green,Blue: Word);
Es.:

Procedure XMReadDac(NF: String);
Es.:

Procedure XMSetWindow(X,Y: Word);
Es.:

Procedure XMBox(X1,Y1,X2,Y2,C: Word);
Es.:

Procedure XMWriteCh(PChar: Char; X,Y,C: Word);
Es.:

Procedure XMWriteSt(St: String; X,Y,C: Word);
Es.:

Procedure XMFrame(X1,Y1,X2,Y2,C,S: Word);
Es.:

Procedure XMFrame4(X1,Y1,X2,Y2,C,S: Word);
Es.:

Procedure XMShowCut(NF: String; X0,Y0: Word);
Es.:

Procedure XMMakeCut(NF: String; X1,Y1,X2,Y2: Word);
Es.:

Procedure XMGetBlock(X1,Y1,X2,Y2: Word; Var M);
Es.:

Procedure XMPutBlock(X0,Y0: Word; Var M);
Es.:

Procedure XMFixGray;
Fissa i 4 colori che meglio approssimano il Nero, Grigio scuro,
Grigio cgiaro, Bianco.
Da chiamare dopo avere impostato una immagine tramite XMShowXut o
avere impostato un DAC tramite XMReadDac.

Procedure XMFont(FN: String; N: Byte);
Imposta un nuovo font. Se FN esiste (di tipo .CHF) viene caricato
il font in esso contenuto, altrimenti viene impostato uno dei 3
font standard a seconda del valore di N (0,1,2).

Procedure XMShowDac;
Visualizza un quadro sinottico con i 256 colori DAC.


TpuBase
TpuBit
TpuCrono
TpuFile
TpuModeX
TpuStr



Ogni cosa a suo tempo.
Proverbio italiano

Valid CSS!
pagina generata in 0.001 secondi