UNIVERSIDAD AUTONOMA METROPOLITANA

~JNIDAD IZTAPALAPA

DEPARTAMENTO DE INQENERIA GECTRICA

REPORTE DE PROVECTO TERWAL I1

I,

*' kSARRoLL0 DE SOFTWARE CON INTERFAZ PARA

LA TARJETA TMS 34020."

ASESOR :

ALUMNO : ,.

MATRICULA :

DR. ADRIANO DE LUCA P.

QERMAN RICARD MARANON V

85330516

"c--_ If

1

'T'ab:la 1 .1

EL H1"T.F , - t , - . C. w e t rnina corno el $;DEI respnndera a los ciclos adel tus

~Ile l a Pi::" Los ,cinco h i t . ' s definido-:. Hl:NT'F'7 .- HINTF4, y HINTFCI d e l

at-irt-rc~ iiel ancho del t y k e scm cies arr i tos a cnrit.ini.raci6t-i :

7 6 5 4 3 2 1 o sdbrnb idbitrn ahadis hrst reser reser reser baor32k

7 6 5 4 3 2 1 a bae03Zk

Pot- lo S.ant.c,, esto es innecesar io para pt-iqt-arnar el HINTFCi, el cual.

e5t.a art- iba de Cet-ci al mnrnet-itm de encender ci t-esetear la rnáwrina.

4

E l bit. 14 ode la direccibri odelax; direccionen del hus de l.a PI:

&kerrnina íi el rnapa Pi 5, el mapa H er, usada. Accesarida la mitad

ba.ja del ttlaqi.te de rnemoria del tecrs ,de la FC: ocupado por el ShN iiz.arirlo el rnapa A, Y accesat-ido la rni t .ad a l t a i.rsando el rnapa H.

MAP (LSEO

7 6. 5 4 3

add6 add5 add4 addl add2 ad&

I"[(> i' ( E. :E< j

1 5 14 13 12 11

addi l addí3 odd2 a d d i addío add0

2

add0

10

adds

1 O

reser

9 8

add7

EL HSRECi pi.iede ser accesadn uni camerite ide inanera E< 1 i t-leada en

c:i tvt.e. S i el CDEc ea t - iahil i t .ado para t.ransferericias ,de :3 bit.'?,,

ent.oricer, es twicesa r i o que i.m i carnent.e i:.r an5 f er ent- i a s seric i 1 1 as ode un

31 -4

inddinidos

7 6 5 4 3 2 1 o HINT O O O VOA rat- 4biL sbit

7

üescripcion

FIegist.t-m de Mapeo A ? LSB

Regist.t-n de Mapro A, MCH

fie4ist.ro dr Mapeo B., LCR

ii4gist.t-o de Mapeo B.. McIiR

fieservado.

$)nH St.at.l.,s.

13ai;e Pa514 Poitit.er.

5DP Host Inerface Corit.ro1 Reg.

Heset-vado.

Reservado.

Reservado.

Fieservadu

&S*rVad,:,.

Fieservado.

fieae t- vado.

Reservarlo.

~~reccionarnier1t.o del Espacio &moria..

Ent.t-ada a l

sa 1 da de Res

de Mapeon.

st.t-ar Hit.'= de Direcciones

del Hers de la Pi' :3-1:3.

La 1-1 represerka 1.m hit. en e,l tus de direcciones de l a PI::.

La V repr-eserit.a un bit. en el i-egizt.t-n HHSEF.

La W es el bit. BA$ECIL'K en el regist.ro HINTF.

'3

La siguiente tabla rnuest-t-a e l mapa de rnernoria 1 o ~ a 1 del T'p'~~.~~.,+~"'':,lj L . . Estas scm direcciones re lat ivas del TMC340LO pet-cl nu scit-1

direcciones t-ela%.ivas del bus de l a PC:. Las dire4::cianes d e l a PI:::

scwi clitist.rcridws c o r n o ariter iorrnerke se rner-iciorio para farrnar- las

direccinne=. re la t ivas a l T'MS34Ci20 por e l apropiado cargado de

valar,res detit.t-o #de lets resistros ijr rnapeo.

Destino Espacio de VRAM.

Ezpacia de DRAM.

Di recciwies V/TtRAM.

tiegiztr-na de I/CI del TMS34Ci20.

fieqist.t-os de Direcciones del

F'a 1 ette . RAM #del C:olut- del P a l e t t e .

fie4iát.t-o de Mascara de Lectut-a

del Pi:wl. Di t-eccictr-les del Palette. ísnlo e s c r i t u r a ) . Res i 5%. t-os C:ub i ertac,.

Reservados.

liirecciortes del P a l e t t e .

í :lec%.ut'a de registros cubiertos) 1::~ i r ecc i ci tws de Res i s t. ros de 1

F'a1et.te.

Regist.t-os rle Espacio de Hardware.

i::~it-eccint-ies de 105 Resistrn-, del E z p a c i o de Hardware.

Vect.nt-ar, da Intet-rupción y TRAPS.

:1 1

DESARROLO E IHPLEMENTACION :

Ihda reg i s%.ro cot1st.a ,de una ayi.4da hastar1t.e arnpl i a ,qt.~e se

acit.iva a l rnwnent.o de presionar l a %.cela F 1 e inrnediat.arner1t.e

aparecerá l a ayuda r-eferent.e a l regist .rn adcmde se encuent.ra trien

i:.i ya e5t.a dent.t-n dei r e g i s t r o apat-ecera l a ayuda currespnndierite a

,cada hi t . de este r e g i s t r o para poder sahet- que valcires rnodificar.

Lac. ayi.rdas a s i c o m o 1 a s vent.anas y el rner1i.c sort desplegadas de i y.ia 1

forma ei-i l a rnernuria de v i d eo ode1 HCIST.

ma: l rnanrjo de SU ccic ios de escr i t .ura a rnernoria e5t.e responde

int-titiirtidose, y can el In l a int.et-ruF~riión d e l pracedirniertto en ejewci&i. C : o n e l accior iar de l a boc ina el i::~rcqrarna a l ,detectar e1

e r r o r i n cu r r i d o sirnp1irnertt.e t-m efec tua nada y r e g r e sa al. rnericr

p r i n c i p a l para qt~c el usuar io vuelva a irit.entar l a ejec-ctci&i.

/*t****t*************t***t*t*tttttltttt****

1 * * UNIVERCIWID WTmowA METROPOLITIWI * t IZTWALAPR 1

t PROVECTO TERMINAL I1 * * * * t

t * * ACES33 : AMIIWO DE LOCA P. * * lllUrw0 : TIRIwv3 RICARDO llARwoN VILLEGAS * * MTRICULA : 85330516 * ttt***t****ttt***lt**tt***tttttt*t*t*****t***/

#include (stdio.h) #include <string.h> tinclude <conio.h) tinclude <&s.h? #include <graphics.h> #include (math.h>. #include <ctvPe.h>

lkkfine ESC 27 #define ABIERTA 1 #&fine CEAPAüA O Xdefine N I W O Xdefine w o O Xdefine TRUE 1 Mefine FALSE O

#&fine A " W A " #&fine B 'MRB" #&fine S "SDBC" Rdefine P 'W" #define H "CDB-HICR"

Mefine IO-BASE OxBO #&fine PC-SEfi OxbOOO Xdefine HAL O #&fine WAPPM 1 #&fine WE 2 Xdefine WBU 3 Rdef in STATUS 5 #define BASEP 6 #define HINTF 7 Mefine ENABLE 0x80

unsisned short. far *hptr: visigned int base = OxFB:

t v W f struct w p r i n c ( int &Y; char tncrbreopc; int atroff,

char carselec: int. atrcarsel,

atron;

offset:

,~ - be... --.. : r. .. ?.!.r'̂n&,

atr-ihoff,

cimarca. ~ 4 , m y i ,nx2,rn~2, atrmarcot atrsubsei;

char subselec; struct opcprinc *sig,

*ant;

at,raubm,

MEW:

int arregldi I151 = ~6,0,0,0,0,0,0,0,0,0,0,0,0,6,6~; int arreglos 1151 : ~0,0,6,0,0,0,0,6,0,0,0,0,~,0,6:~: int arreglos I81 = í1,0,1,1,0,0,0,1~; int. arregloP is1 : iU,0,0,6,0,0,0,0); int arreglcA 181 = í0,0,0,0,0,0,0,6~;

t.ypnkf st.ruct. r i char car: m i m e d shcrt at.rib;

irlr

typedef rl reg;

reg cad19651;

visigned long apvitador-video = O:

MENU *DiswllenuO; void Pminfd i"ü **&,char *tepc,int x,int y,&r selec,int X I ,

void ManejallmiillEM **seleccim,MW **anterior,int *tacla,int *ven-); void ManejaVmh(KW *%I); void H e l p W r i n c l h i W *%I); void HelpMenPrincüusíllEW *sell: void Ventana16 IIIWU *%i,int colm,int *arreplo): void Ventana8 (RENU *sel,int coluna,int. *arreglo): void LeeDatPslóiint *arrlplo,int collu,IIWU *seli; void LscDaWiint *arreglo,int coh,KMI *sele): void AdualizalENü **sel,llEW **ant); void EstaE&h(liEW **sel,int *vent,int *tecla); MENU *obtemdoLpo; void Captufastring (short *Pscape,short *error,ctur *w,int ren,int collu); void Convierthero ídarble *val,short. *errw,short *escape,int ra,int colu): void CapturaLosOperandos (migned lmg *valorl,uisiaiad long *valor2,

void InsertFinWiEMJ **cabeza,lENU *nodo); int Ruscaracter (char car,char *cad); void setextíint r1,int c1,int r2,int c2); void putextiint r1,int c1,int r2,int c2); void putsrc iint r,int c,char *cad,int atrib); void put.car(int r,int c,char car,int. atrib); void wtint.(int r,int c,int car,int atrib); void clrboxiint wpr,int supc,int. infr,int infc,int atrib): void putboxiint supr,int supc,int infr,int infc,int atrib): void Iniciavideo (void) I void Barralnferior (void); void Llena4rreglosivoid); void ini-SDBivoid): void Pireccim-Mapa (unsigned long direccim) ; void Inserta-Campo (uisigned long direccion,visi& short tandato,

int y1,int x2,int y2);

m i m e d char *dat, short *escape):

/* llnidad we desarrcia la5 ambientaciones en imrnoria de videc~ ***,

#include "MEt4JS.C"

void IniciaVidm (void, i int GraphDriver,Graphlbde:

detectgraph (&rGrphDriver,&Gra#bdd ; if (GraphDriver == HERcm)Mo)

else

5UhXY ( I ,251 :

apultadwr-video Oxb0000000;

apuntador-videa = Oxb8000000:

>

void BarraInferior (void) !

putírci25,2," - A m -WIR -EJEMM putsrc(25,6, "Fl', 0x74) : putsrc125,23,"8",0~74); putsrcí25,38,uEE", 0x74) :

>

/*** Fuicion w e deacuerdo a1 teclazo que SB de, "deciden que hacer: si pasar de la actual mim a la siwiente del mew principal, si pisar de la actwl mim a l a mim anterior del uew principal, si abrir ma ventani de la actual opcion , ***/

void MinejlknuilENu **seleccim,lENU **antPrior,int *tecla,int *ventana) ¿

Actual iza iselaccim, anterior) : i f (*V€nbM =í Er@&M)

*tecla : toupWrigetch0); if iií *tecla !: 0 i I : i *ventana == ABIERTA 1) && (*tecla !: 13))

EstaE~iselecciai,v€ntuM,tecla): el% i if i *tecla == 01

switch (*tecla) *tecla = getchi):

i case 77: i*aeleccion) = i*seleccimi-kig;

break; case 751 i*selecciBn) : í*scleccion)-iant:

break! case SO: *ventana = ABIERTA:

*t.ecla = O;

case 13: 'ventana : ABIERTA: *tecla = O: brea¡ :

case 59: HelD~~riricUnn(*seieccion); break;

default: break: >

void LlemArreglor(voidi (

unsigned short byte i O;

byte imrtbiiO..ükSEtMEP); arregioPi01 : byte k 0x01; arr.gloFil1 5 byte & 0x02; arregloPiZi byte & 0x04; arregioPi31 : byte & 0x08: arregloPi41 : byte & 0x10; arresloPi51 = byte & 0x20; arreglpPi61 = byte & 0x40: arregioPi71 = byte k 0x80: byte = iipartbiIO-BIICEtHiNiF); arresloHi01 byte h 0x01: arregloHili : byte & 0x02; arregioHi21 = byte & 0x04; arregloHi31 = byte & 0x08: arregioHi41 = byte & 0x10; arregioHi51 = byte & 0x20; arregloHi61 = byte & 0x40: arregldii71 : byte & 0x80: byt.e = inporttiI4ükCEtCTATUC): arregloSi01 = byte & 0x01; arregloCili = byte & 0x02; arregloCl21 = byte & 0x04; arregioCi31 = byte h 0x08: arreglcSi41 : byte & 0x10: arregioCi51 E byte & 0x20: arreglBCi6l = byte & 0x40; arregloCi71 = byte & 0x80;

>

. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . .

void ini-CDBivoid) (

urnid short basem = 0;

/* Habilita La Tarjeta */

autpcrtbíIO..ü@6 t HINTF,ENABLE):

it 8mraaoC- -to DIRECCION = SE6 : OFFCET */

baseaux = ivirisned short) base <( 12; hptr = iunsigmd short far *i FP-SE6 ibaseruxi; nutportbíIO_EASE t BASEP, base):

>

void Direccion Mapa (unsigned Ions d i r e c c i m ) <

u n s i 4 short mapl, mapm, o f f s e t ;

~ p l = mapi, : i direcciwi >> 16 i : mapi mapi OxFF; mapm = BMPI :i 8; outportb IIO-BpiS€ t WAL,mapl); 0iit.wrt.b iIO_encE t W!%,MPB): nap1 mapl = mapl S OxFF; mapn = mapa ?i 8; outportb (IO_BIICE + W B L , u p l ) ; outportb !IO-&ICE t WBW,mapn):

/ * Haz Offset */ offset . ( u n s i 4 short) i ídirecc ian >> 31 k OxYFFI); i y t r : (unsigned short far *I FP-OFFIoffset):

mapfn : i (direction + 0x200001) ?> 16 1;

void I m e r t a - h n p a l m i d long direcciai,msigned short t a d a t o ,

i msiw lora dato)

Direccim-napa i d i r e c c i m ) ; w i t c h itandoto) (

case 8 : t i w i g n o d char *lNr = ivisigned char)dato; break;

case 16 : * N r = (unsigned short! dato: break:

c a s e 32 : *hptr++ = lumigned short)dato: dato = dato ?> 16; *Mtr = (unsigned shortidato; break;

void H;irRegresoPuerh (void) <.

short byte = O;

byte = iarregloPiO1 & 0x01); byte byte + l i rregloPiI1 & 0x02); byte : byte t iarreglcZPi2l k 0x04); byte byte t iarregloPI31 k 0x08); byta : byte + iiirreglcPi41 & 0x10); byte = byte + iarrwloPiS1 Ir 0x20); byta : byte + l irregicPi61 & 0x40); byte = byte + iarregloPi71 & 0x80); w t p o r t b l I O ~ B A C E + B , byte) ;

byte = íarregld(i0l & 0x01); byte = byte + IarregloHlll t 0x02); byte = byte t íarr~ploHi21 & 0x04); byte = byte + irrregldfl31 k 0x08): byte = byte + iarregloHl41 & 0x10): &t.e = byte + iarregldfi51 & 0x20); byte = byte t (arregloHl.51 di 0x40); byt.e = byt.e + IarregloHi71 & 0x80); outportblIO.BACE*HINTF, byte) ;

void CapturaCtring (short *escape,short *error,char *w, int ren, int colusi ( int car = O; Jwrt i = 0,hand = 0;

aotuxy (colm,reni; mile f l i (= 7) && !*error !: TRUE) && (taxape != TRUE) && fW != TRUE! !

car : toupperigetdiii!: if ( iisdigit (car!) / I (car >= 65 di& car <= 70) )

opelil = (char )car; putcar iren,colwa,car,Ox70); colm tt; gootow (colui,ren): itt;

j

eise if (car :: 27)

else *escape : TRüE:

if ((car =a 13) && ii > O ) !

else band = TRUE:

*error = TRUE; > opeíii = ' \ O ' ;

>

void LmvierteNmero f W l e ,*val,short *error,short *escapp, int ren,int colu)

< char cpel 101 : short i = O; double awl = 0,wxrru = I:

CapturaString (Kcape,error,ope,ren,colw!; if ((terror != TMiE) && (*escape != TRUE!!

while i

iuxl = strien it& - 1; ii < strlm iopei) kk (*error !: && (*escm !: m)

if i isdigit (cpelii! )

auxrna = opclil-48y *va¡ = *val t a u x m * wuil6,auxli: i

> else

witch fw iili i case 'A' : auxnun = 10;

*val = *val t auxnim * powi16,aultl~; hreak;

case '8' : auxnun = 11:

,"- "-. ,..-1-_;_ v -- *i':"*y-ff$;yr.b.:-r t mbI(!&.a,.jy!.!:

break;

*,ai : *va! + au:mum * poiví16,aiixli: nreak:

*val = *val t aUXlKim * pow!16~awli: break;

*val = *val t aiiirnum * wrll6,auxl): break;

*val : *val t auxmm * Wwil6,auxl): break:

case ' C ' : aiuxI1um = 12;

case 'D' : aumum l3;

case 'E' : awmm = 14;

case 'F' : au;mm = 15;

default : *error 2 TRUE: }:

awl--; itt;

> i

void CaptuaLosOpwuKbs lwsiqxd Ions *valorl,uisisned long *valor2, unsigned char *dat, &art *escape)

i double valor : O: &art. error = O;

putsrcl25,2," -%IR put.srcIZJ,5,"E~",Ox74); do ( putsrcll0,42," 'I, 0x70) ; error FALSE; ConviertdCmro íIrvalor,&srror,escape, 10,42); if í !error ) *valor1 : Iuisimd long )valor;

>nhile ((error :- TRUE) kb (*escape != TRUE)): i f Vexwe != TRUE) 4 do \

putsrcl12,42, " ", 0x70): error : FALCE: ConvicrteHwro (&valor, brror, escape, 12,42) ; if I !error i *valor2 : lumisned l w g )valor:

M i l e ílerror -: TRUE) && Vescape !: TRUE))! >

!

void ProcedeEjrnicion {void)

< u m i m long valor1 = O, valor2 = O, ap : O; umim char dit; short escape i- O:

clrbos 15,10,20,70,0x70); putbox 15,I0,2U,70,0x7F): Putsrc (6,%,"EJECUCIW,Ox74); putsrc ilO,l3,"Linite Inferior de Benoria : ",Ox70); put.src í12,137"Limit.e Superior de Meriria : ",0x70):

",Ox70);

.--" 1__-

-.na(c"j?!: Captura?osnf,erandoá íkva!orl, kva!nr?, Sdat, kezcapei :

i / I i f (escape !: I&€!

dato = twnsipied long )dat: for lap = valor1 : ap <= valor2 : apt+)

1nsert.aCampo iap,8,datoi j: *! clrhx t5,1ü,Z0.70.0.~1Oi: &oxy li,25);

1

void minivoid) i

MNlJ * a p m = U O ; MMU *seleccim, ranter ior; int tecta : 0,ventana = O:

Iniciavideo O:

LlenaArreglasO: */ apaeni = D i s e n a h O ; wleccion = aplff~l;

anterior = a m ; ImprilPeiseleccioni : da <

/ * ini-JDBO:

BarraInferior O: k-ejaiim I&seleccia, &anter ior ,&tecla, kventana) : if (tecla == 'E')

i* HazRegresoRiertosO; */ Praceddjecucimli ;

/* L l d r r e g l o n O ; * J ):

M i t e (tecla !: ' Q ' ) : cirbox (O, O,29,80,0xO7) :

>

/:::::tt::t:t*:t::t::::*::****::*:::::t:*:t*:*

t 1.

UNIVERCIMD IWT(PaIMA E T R O K L I T M * t IZTWALkPA : t : * PROYECTO TERMINAL I1 * t t

t * * : ADRIW DE LUUI P. : t kuw) : GERIUW AIWW b" VILLEW * : WTRICUL& : 85330516 t

*~:t::::t:::tt:tt:ttt:*t~t:t:::::*t:**::tt*tt/

/* UlIMD P M A EL PRO6RW DE ACCESO A REGISTROS Y llElDRIA QUE CONTIEMI EL MUUEJO DE TOM LA AMBIEN- TKION DEL PRCGRW PRINCIPL */

/tat Ftinciones qw insertan nuevos ncdo al final de una lista circular doblmte ligada ***ti

void ImertFiMílUJU :*cabeza,llW *nodo) i if (*cabeza := milo)< *cabeza = nodo: nodo->sig = mdo; nodo->ant=nodo; return:

3 nodo->ant = ikabezai->ant; ncdo->sig : *cabeza; ?cabeza)->ant = roda; nodc->ant->sig = nodB;

>

/*I* Fuicion que regresa cuantas posiciones hay desda el principio de tina c& hasta dpndc se ncuentra el caracter we recibe c m parawtro I**/

int Ruscaracter (char car,char *cad) ( int i*O;

whileicar != *cad)( iti; ticad;

:> returnii) ;

>

void wtextiint r1,int. ci,int r2,int c2i i int i, j; char far *ptrZ= (char far ti apuntador-video: int ptrl = O:

ptr2+= irl-l)*160 4 icl-li*Z: for íj=i:j ¿ irí!-rl!:tij!

for i i= l : i < ici-c!);ttii

*ptr?= cadlptr 11 .car: t tpt.r2; *ptr2= cedlptrll. at.rib: ttpt.r2; ttptrl:

I.

ptr2+=¡80 -c2tltcli *2: : i

void qetextiint r1,int c1,int r2,int c2i I int i,j: char far W r Z - ichar far *I apuntador-vidw; int ptrl 3 O:

ptr?ta irl-ii*l60 t icl-1)*2: for i j=l:j < ír2-rli;ttji i for ii4:i i íc2-cl);ttii

cidiptrll.car i Wr2: trptr2: cadIpt.rll.atrib = *ptrZ: ttptr?: ttptrl; j,

i

ptr2t=i86 -cZtltcIi*Z: j

>

/ *e * Fwim we dP5plmqa en pwtaila ma cadena por d i o de asimciones a1 buffer de vi& ****/

void putsrciint r,int c,char *cad,int atrib)

char far *ptr = (char far *)apuntador-vidro:

ptr +: ir-li*l6Otic-li*2: whileitcad != ' \ O ' ) i *ptr = *cad: tt ptr: *ptr = atrib; tt cad: tt ptr; >

:>

f*** Fwion qre despliega en pantalla un caracter por medio de saisnacioms a l buffer de vi& ****/

void putcsriint. r'int c,char car,int atrib) i char far *ptr 8 (char far *laantador-video;

ptr t: ir-lI*l60tic-l)*2: *ptr = car; ttptr: *pt.r = atrib:

/*** Funcion que despliega en pantalla un caracter por inedio de saisnaciones al buffer de video ****!

,void putintíint r,int c,int car,int atrib)

char far tptr unsigned short valor:

valor = imsigned short )car; valor = valor + 48; ptr t= ir-l!*160t(c-l)*2; cptr a valor: t4pt.r: *ptr : atrib;

(char far *)aputtador-video;

.:.

/*** F m i m que liwia lo que hay dentro de una ventana por media de asignaciones en el buffer de video ***I

void clrboxiint supr,int sw, int infr,int infc,int &rib1 (

int i,k; char far *ptr= (char far *) Wntador-vik,

ptr += isupr-l)*160 + ísupc-l)*2: for (i=l;i < iinfr-supr1;tti)

¿ for i k 4 ; k < (infc-u*ici;t+k)

¿ *ptr: ' '; ttptr; *ptrzatrib: ttptr:

> ptr t= ((80 - infcltl t wpci*2;

>

I*** Funcicm we dwliegi en pMtalla un mrco por #echo de asmaclones en el buffer de video I***/

void putboxíint wpr,int upc,int infr,int infc,int atrib) {

char far tptr: (char far * I apunhdor-video; char far tauxptr: (char far *lawnbdor-video; irk ap;

ptr += (wr-l1*160 + ísupc-l)*2; wxptr : ptr + IhR: *ptr = '[I:

wtr; *ptr = atrtb; ttptr;

for íap=l;ap < iinfc-u*icl-2;ttapl ( tptr' '-': ttpt.r: *ptr:atrib; ttptr:

3 ; *ppt,r = 1

ttptr: *ptr=at.rib; ptrt.159; for !ap=l;ap < iinfr-supri-2;ttap) : *ptr= ' I '; ttptr: 'ptrzatrib; ptr+=159:

3

Wtr: *pt.r : at.rib; for íap=l;ap < iinfr-supri-Z;t+api

*pt.r i 2 J ' :

(

*auxptr= ' 1 '; ttauxptr ; *auxptr=atrib; auxptrt=i59;

:> tauxptr = ' L' : ttauxptr; *auxptr=atr ib: t tauxptr I for (ap: I; ap < íinfc-aUlc) -2: +tap)

< *auxptr= I-':

ttauxptr ; *auwtr=atrib: ttauxptr ; ;

/*** Fwcim we va insertando ru1yo5 mdos en la lista dot~1eaent.e ligada donde cada mdo es w a opcion del m principal. Regresa la direccion dade eipiezi la lista ***/

KW *Disena)*nuO ( MENU *mew = NUO,*opcim;

n m = wion = obtenOdoaF.0: Pminfdlí~~im,A,7,2,'(1',7,4,26,23): ImertFinllí&mmi,opcioni: opcion = OhtanodoDpO; Poninfdí&wcion,B,23,2~'E',23,4,42,23); InsertFinM(knenu,opcinn) :

/*** Fumion ,qi.ie llem cada wo de los cawas del nada MM ***/

void PoninfoM iEM.1 **mdo,char *tclpo,int x,int y,char selec,int xl, int. y1,int x2,int y21

(

char *apnoi;

i*nado)->rmbreopc :(char *)aallocístrlenítenw) t 1): st.rcprí (*nodo) ->mnbreopc,tenw) ; í*n&)-,x = :x; (*nodp)->y : y; i*no&)-icarselec = selec; í*nodoI -?offset = aiscaracteri (*&)-?carsel~,tCIIPO); (*nodo)->simarco = 1: í*nodol ->atrcarsel = 0x741 i*nodoI-:>at.roff : 0x70; i*110do)->atrcm = 0x20; í*nodo)-?atrfondo : 0x70; (*nodo1 -:)atrsubiff= 0x70: i*MXk)->atrwbcn : 0x20; itnodo) ->atrsubsel = 0x74; í*nab)-:)atrmarco = 0x7F; clrboxí1,1,27,80,0~101; i*ncdo)->rxl = x i ; í*noda)->nyl = y l ; í*nodc)-?ax2 : x2; í*nodo)-:hw2 = y2;

>

/I** F w i m que a la u v a eleccion &a w i o n le cubia el atributo de seleccimda, Y a la mion anterior le caibia el atributo de no seleccionada en las opciones del m u principal. ***/

void ActualizaíEW **sel,lUKI **ant,) ¿ putsrc i ¡*anti -?Y, (*ant) ->x, í*antl->dreopc, (*ant)->atroff) ; putcari (*antI-?y, í i*ant)-)x 4 iíntl-)offset), (*ant)-karselec, ¡*ant)->atrcarsell : wtsrc í itsel) ->Y, Osel) ->x, itsel i ->nolbreopc, (*se1 I ->atronl ; *ant = %el;

>

!*** Funcion que despliega en pantalla las opciones da1 m u principal con el atributo de no seleccian ***/

putsrci2.2, "

p~.itboxi3,2,16,74, OXIF); aux ap-isig: dn ( putsrc iaux-.!?y, au$->x, aux->nabreopc, aux->atroff) ; putcar iaux-;y,aux->r + sux-?offset.,aux-karselec, aux->atrcarsel) :

?whileiaux !:ap-::.sig): aiix : aux-big;

:>

/*** Finciwi we verifica que si el ciracter que le llega por parametro es VI caricter de uleccion si In encuent.ra wsicioni el apwhidor de selecciwi en esa wsicion, si recibp el parawtro AEIERTA encendido lo que hara es act.ivar la ventana da esa wion ***/

void EstaEnihiEW **sel,int *vent,int *tecla) <

NEW taw: char quedoen:

aux í*seli->sig; if (*vent -5 CERRAM &k *tecla ! = 0 ) (

do <

M i l e iaux != (*sel)->sis && aux->carulec != *tecla); if iaux-karselec == *tecla)

am = wx-kig;

í*seli = aux:

i f (¡*vent == ABIERTA) kk (*tecla := 0)) (

ManejaVentana ( * ~ o l i : *vat : CERRRDA:

/*** Fumion we m j a los mviaiwhos de la ventana: mverse da la actual wcion a la siguiente moverse de la actual mion a la anterior en caso de ESC regresa la clava de la subowion en la que 5e que&. ****/

void NanejaVentatuiEhü %el) .(

putsrc ¡25,2, " -AVUM -SNM wtsrci25,6, 'Fl",Ox74); Putsrc (25,21, "ES", 0x74) : clrbox~sel->iyl ,sel-~nxl,~l->r~2,sel->Rx2,stl->atrfaido~ : &box isel->nyl, se1 ->nxl, sel->@y2, se1 -haxZ,sel->atrnarco) : switch isel-karrelec) (

case 65 : VPntana16íse1,9,arregloA); break;

",Ox70):

",0x70);

void LeeDato516íint. *arreglo,int. colm,wENU %el) i int arrauxll51: int cont = O.tecli = O,ren = h,i O;

do <

wt.oxy ícolum, reni : tecla = wtch0: if (tecla == U)

switch (tecla) tecla = wtch0:

i case 48 :

case 49 :

case 13 s

case 59 :

case 27 : default :

arrauxicontl : tecla-@: putint iren, colu, arrauxlcmtl, 0x701 : cmttt; rent+: break: arrauxlcmtl : tecla-48: putint iren, colum, arrauxlcmtl ,Ox70) : conttt: rntt:

break; arrauxlcmtl = arreglolcmtl: putint iren,colw,arrauxlcontl, 0x70) : cmttt; renti: break; HelplhruPrincDos Isel) : break: break: printf ("\Ti; break:

M i l e ¡(tecla != ESC)k&icmt <= 14)): arrauwlccntl = '\O': if lCGnt == 15) for ii = O;i <: 14:itti arregloiil = arrauxiil;

sot.ow í 1,25) : 1

void Ventana16 (IuLi *sel, irk colurra, int *arreglo) < putsrc(5,colula, "üit 0: reserv.",nei-)atrmboffi: putsrci6,colurma,"Bit I:",sel->atrwbPff): Putint (6, caluna+%arregloiOl ,Ox79); putsrc (7, colma, "Bi t 2: ",sei ->atrsuboff) : ~utint.í7.colu~~ia+8.arrerilalll.O~7Ii);

- . . ,...

w.:ts*rq. r?l!.ma; 8,

putin?.!Y,col,~natg. arre4lofiI o 0x771; put.srci9, columna. "Bit. 4: sei-?atrsuboffi : wtint.¡9,coli;mnar8. arregioi3l,Ow791: putsrc ! lO,columtia, "Bit. 5: ",:.el-?atrsutoffi : putint.ilQ,coIirnrnat~:i,arreglo!J) ,0x?9I; wt.src i ! 1, .columna, "Ri t 6: " , sei -:at.rsiutof f) : putint. !I 1, col itmnat8, arreglo í5II0x79) : putsrc i 12, colimna, "Bi t ?: ", sel->atrs!itoffj : putint~l2,cali.~tR,arreglo[61,0~?91; put.src í 13, columna, "Bit 8: 'I, sei ->atrsubff) : ~u%intíl3,cali.unat8,arreglol?l, Oxi9); put.src 114, coluna, "Bit 9: ",sei ->at.rsuhff) : putintil4,columat8, arreglofe1 ,0x79) : putsrr i 15, colum, "Bit 10: ", sel->at.rsubaff) : puiintil5,col~umnat8, arreglo191 ,Ox79 : wtsrcíl6, columna, "Bit 11: ", ~.el->atrsuboffi ; M i n t í16,colwnat8,arregloll0), 0x79): put.srcí17,calunvia,"Bit. 12:",sel->atrsubofft; Futint(f7,COlU~at8,irreglOll1 I, 0x79) : pvtsrc í 18, coiuma, "Bit 13: ", sel->at.rwhoff) ; putint (18,coluaatE,arrcgln1121,0x791: put.srcil9,coiuma, "Bit 14:",sel->atrwboff) : wtintil9,colwnat8,arrcglnI131 ,Ox79>: putsrc(20,coluna,"Bit 15: ",sel->atrsuhoff): ~utintí20,colunnat8,arregloIl41 ,Ox79): LeeDatoslá larreglo,colwna+8, se1 i :

?! 4: {e? -izt.ssihn'?i

I

void LeeRtBs8íint *arrcgia,int colu,wNu *sele)

int arrauxl91; int cmt. : 0,tecla = O,ren 5 , i = Q :

do (

gotow ícolu, rent: tecla = petchí): if (tecla == O)

switch (tecla) (

case 48 : arrauxlcdl : tecla-4& pvtintír%n,col~,arrauxIcontl, 0x70) ; cmttr: ren++; break;

case 49 : arrauxlcontl : tecla-48: putint íren, cala , arraux lcmtl ,Ox701 : contri; rent+; break:

case 13 : arrauxlcontl = arreglolcontl: rxtt.int iren,colw, arrauxlcmt I,Ox70) ; conttt; rent+; hreak:

case 59 : HelpMenuPrincDosisde): breaki

case 27 : break: default : printfi"\7"1:

break;

tecla : gatchi);

i f !<cent == li&&isele-?carselec == ' H ' I i

cant : 4; ren = 9;

:. . ' >

i f ((cent. -= 4)&Riseie-Xarselec := ' S ' i l i cent = 7; ren = 12:

,$ j

irhile i(t.ecla != E5C)licant (~7)): arrauxicantl = '\O': i f icont == 8) fur ii = 0;i <: 7;itt)

arregloiii irrauxiil: gotoxy (1,251 :

:>

void Ventana8 íIENu *sei,int colma, int 'arreglo) ( putsrc i J , c o i m , 'Bit O: ", sel-ktrsdxff) ; putint i5,coima+8,arregioiOl, 0x79) : if isel-karselec := 'H')

else <

putsrc(6,coluru, "Bit 1: reserv.',sel->atrsuboff);

~ u t s r c ( 6 , c o l ~ , "Bit 1: *,sel->atrsuboff): pt¡+.int (6, coim+8,arreglo i lI,Ox79) :

); i f isei-icarseiec E= OH')

else (

wtsrci7,coluna, "Bit 2: reserv. ",sel->atrs&offi;

putsrci7,columa, "Bit 2: ",seI->atrs&off): putint~7,colunat8,arreglol21,0~79~:

i: i f (sei-karselec == ' H ' )

else i

putsrc (8, colma, "Bi t 3: reserv. ", sei ->atrsubBff) :

putsrc (8, coiuri , 'Bit 3: ",sei->atrwboff) : putint 18,coiumu+8,arregioi31,0~79) : i: if ísei->carseiec =: IS')

else {

pvt.src(9,colwna,'Bit. 4: reserv. ",sei-iatrsubaff):

~Utsrc (9 , coima, 'Bit 4: *, sel->atrsciboff) : m i n t i9,coiu~at8,arr~iui41, 0x759 j

): i f isei->carseiec =: 5')

else < put.src(lO,coluni,"Eit 5: reserv. *,sei->atrsuboff) :

Putsrc(lO,coluna, "Bit 5: ",sel->itrsubBff) : ~Utint(lO,coluvlat8,arreslol51 ,Ox79):

2. . I >

i f (sei-karseiec -: '5')

else putsrc í 11, coima, "Bit 6: reserv. ",sei ->atrsuboff) ;

putsrcll 1 mima, "Bit. 6: ",sel-htrsuboffi : wtint (1 I,culu~na+8,arre~lol6i ~ 0x79) j

i > _.' -

i

putxcil?,caluim, "Bit, 7: ', sei->at.rcuboffi ; w!int !l?,cnlwRna+R, arregloi7l,Ox79) ; LeeDat.os8 iarreglo, ~olumnat8~ se1 i ;

>

void HeldknuPrimOno (MENU *sei) I

int tecla:

getext.il0,10,20,70) i clrhxil0,10,?0,70,0~70); puthxiin, 10,20,70,nx7f): switch isel-karselec) < case 65 : putsrcill,3Z,"AEGICTRO Wh",Ox74):

put.srcil3,12,"R~~irtro de we0 da 15 hits 9ue provee una seccim de",Ox70); putsrci14,12,"16K sobre el espacio local de =ria del T E 34020. ",Ox70); ~utsrci15,12,"Esta seccim mpaa dentro de la niitad baja del bloque ",Ox701; putsrcll6,12,"de 321: ocupado por el CDP en el espacio de -ria del',0x70i; ~utsrcil7,12,"BUC da la PC. ",Ox70); break;

case 66 : putsrclll,32,"REGICTRO WB",Ox74): ~utsrcí13,12,^Rqistro de we0 de 15 bits que provee una seccim deu,0x70t: ~utsrci14,12,"16K sobre el espacio local de moria del Tffi 34020. ",0x70); putsrcil5,12,"Estte seccion napea dentro de la mitad alta del b l w ",Ox70); putsrc(l6,12,*de 3 Z ocupado por el SDP en el espacio de m r i a del",üx70); putsrcil7,12,"BUS de la U. ",0x70); break:

case 83 : putsrci11,32,"REGISTRO CDUT",Ox74); putsrcil3,12,"Re9istro de estatus gue contiene l a confiwracion ac- ",nx70): ~utsrcil4,12,~tual de la tarjeta SDP. Los bits 0-6 son leidos de de-",Ox70); Putsrcil9,12,"racha a izquierda en el ewacio de registros del hard-",Ox701; ~utsr~i16,12,~nare. El bit 7 es leido corn el estado actual del pin ",0x70); ~utsrcll7,12,~HINT el cual actua c m los sisteus de interrwion. ",Ox7Q); hreak;

~utsrc(l3,12,"R~gistro que uapea el CDB dentro UI -to de memo- ",Ox70); putsrci14,12,'ria de softuare selecciwble en la m r i a del Buc de",üx70): ~utsrc115,12,"la PC. Los 8 hits del MEP Y el base32K permiten a l ',0x70); ~utsrci'l6,12,"SDP seleccionar Iwicamente para ser puestas en cual- ',0x70); putsrc(l7,12,"quier limite de 32K en el mapa de m r i a dc 16 i@yte.",üx70); break:

~utarc(13,12,"R~intro gue determina COM el SDP respMdP a los ci- n,n~70i: putsrcll4,12,"clos del BLIC de la PC.',Ox70): break;

default : break;

case 80 : putsrc(ll,32,"REGISTRO &X€P0,Ox741;

casc 72 : putsrc(11,32,"REfiICTRü HICR ',Ox74);

); do (

tecla = SctChO; M i l e (tecla !: 27); putext i10,10,20, 70) ;

!.

void HelMmiPrincDos MEW *%I) (

int. tecla:

ía5.e 65 : piitsrc~l~.i?,"REGICTRO WA~Ox74); p(rtsrcil3~12,"Bit O: Este es reservadc Y no tiene flujo alguno en ",Ox70); putsrc i14,12," la direccion.",Ox70); put.st-c!15,12,"Bit I: Le corresponde la direcclon O.",Ox?Oi: putsrcl16,12,"Rit 2: Le corresponde la direccion I.",Ox70); put.srcil?,!í,* . ",Ox701: putsrcil8,12," . ", 0x70): ptutsrci19,12,n . '",Ox70); putsrc<ZO.l?,"Bit 15: Le corresponde la direccion 14.",0~70); hreak:

putsrcí13,12,"Bit O: Este es reservado Y no tiene flujo al- en ",Ox70); putsrcil4,12, " la direccion.",Ox701; putsrcil5,12,"Bit I: Le correspnde la direccion O.",Ox70); p~.~.srcit6,12,"Bit 2: Le correspwdp la direccim I.",Ox70); putsrcil7,12,' . ",Ox70); FA&srci18,12, 'I . ", 0x70): putsrcil9,12," . O , 0x70): putsrci20,12,"Bit 15: Le corr- la direccim 14.",0~70); hreak:

pirtsrc(l4,12,'Bit O: (&it) un 1 indica el in& 8-bitlpixd.*,Ox70); putsrcíl5,12,"Eit I: í4bit) UI I indica el OOdB 4-bit/pixe1.",0~70): putsrci16,12,"Bit 2: irate) un 1 indica el Dodo M O x 48O.*,Ox?O); putsrcíl7,12," un O indica el noda 1024 x 768.",0~70); put.srcíl8,12,"8it 3: iVM) un 1 indica we el m b VE4 es ictivo.",Ox70); putsrcí19,12,%t 7: (HINT) un I indica we el GSP t i m asegurado ',Ox70): putsrci20,12," su pin de interrupcion.",0%70); hreak:

putsrcil4,l2,'Ci el SDB (5 puesto en un slot de 8 bits sin lineas day,0x701: putsrc(15,12,"direccion 23-20, los 4 bits altos del MSEP p w d a ser",Ox70); ~utsrci16,12,*prograudos a 1. Las cuatro direccim rm cmectadas ",Ox70): putsrcil7,t2,"son poleadas an alto sobre la tarjeta SDB cuanjo la ",Ox70); ~utsrc(l8,12,"tarjeta es imtairda an M slot de 8 hits.",Ox?O); hreak:

putsrcíll,12,"Bit O: iBACE32K) determina la respuesta ai s m t o &,Ox70): putsrcil2,12," m r i a en el B e . üefault O.",Ox70): ~utsrcíl3,12,"Bit 4: i W T ) si 1 limpia los registros HCREG, HIMF ",Ox70); putsrcil4,12," e inicializa el T E üefault O.",Ox70): putsrcíl5,12,"Bit 5: (studis) mascara de dcshrbilitacicm de acceso ',Ox70); putsrcil6,12, ' al palette. Dafault O.",Ox70): putsrci17,12,"Bit 6: (16- biteni si I permite accesos de lreawiade",Ox70): putsrcil8,12, u 8 bits.",Ox70ii putsrci18,27,"SDB No SOWRTA TRMEREKIhS DE 16 BITS.',Ox74): putsrci19,12," Default O.",Ox70); ~ut.srci20,12,"Bit 7: (CDBenb) la tarjeta no r-ra a n i m ac-",Ox70); putsrci21,12," ceso a moria hasta w e el bit sea puesto. ",Ox70); putsrci22,12," Default 0. 'I, 0x70) : hreak:

default : break;

case 66 : ~ritsrc110,32,~~GISTRO WB',Ox74):

case 83 : putsrci10,32,"REGISTRO SDBcTn,0x74);

case 80 : putsrcíl0,32,"REGICTRO MP',Ox74):

case 72 : putwcil0,32,"REGICTRO MICR ",Ox74);

}: do (

tecla = getchi): }while (tecla ! = 27); putextí9, IO,E,70):

;.