ronald
20 de Febrero del 2005

me da error al darle a run y en clase me va se ve q en mi casa los directorios no estan puestos o estan mal ayudarme es muy urgente para antes de este viernes mi email es [email protected] quien sepa del c q me agrege y me ayude porfavor gracias de antemano el programa es este

#include "dos.h" /* COLOR2.C */
#include "bios.h" /* Control manual de la tarjeta Centronics */
#include <conio.h>
#include <stdio.h>

main()
{
int n,x,salida;
int a1,a2,a3,a4,a5,a6,a7,a8;
char y;
textmode(C80);
clrscr();
x=1;
n=0;
a1=0,a2=0,a3=0,a4=0,a5=0,a6=0;a6=0,a7=0,a8=0;
salida=0;
textbackground(WHITE);
for(n=1;n<26;n++)
{
gotoxy(x,n);
cprintf(" ");
}
textcolor(RED);
gotoxy(11,4);
cprintf(" DEPARTAMENTO DE ELECTRONICA CURSO 2002/2003 ");
gotoxy(13,6);
cprintf(" Asignatura ......... T‚cnicas de Programaci¢n ");
textcolor(BLUE);
gotoxy(16,9);
cprintf(" CONTROL MANUAL DE LA TARJETA CENTRONICS ");
gotoxy(16,10);
cprintf(" --------------------------------------- ");
gotoxy(17,12);
cprintf(" TECLAS [8] [7] [6] [5] [4] [3] [2] [1] ");
gotoxy(17,15);
cprintf(" STOP [0] Salir [s] ");
gotoxy(17,16);
cprintf(" [ ] ");
barra();

for(;;)
{
gotoxy(38,16);
y=getche();
if(y=='1')
{
gotoxy(54,21);
cprintf("°"); /* ALT 176 */
if(a1==0){
salida=salida+1;
outportb(0x378,salida);
a1=1;
continue;
}
if(a1==1){
salida=salida-1;
outportb(0x378,salida);
gotoxy(54,21);
cprintf(" ");
a1=0;
continue;
}

}
if(y=='2')
{
gotoxy(50,21);
cprintf("°");
if(a2==0){
salida=salida+2;
outportb(0x378,salida);
a2=1;
continue;
}
if(a2==1){
salida=salida-2;
outportb(0x378,salida);
gotoxy(50,21);
cprintf(" ");
a2=0;
continue;
}

}

if(y=='3')
{
gotoxy(46,21);
cprintf("°");
if(a3==0){
salida=salida+4;
outportb(0x378,salida);
a3=1;
continue;
}
if(a3==1){
salida=salida-4;
outportb(0x378,salida);
gotoxy(46,21);
cprintf(" ");
a3=0;
continue;
}


}

if(y=='4')
{
gotoxy(42,21);
cprintf("°");
if(a4==0){
salida=salida+8;
outportb(0x378,salida);
a4=1;
continue;
}
if(a4==1){
salida=salida-8;
outportb(0x378,salida);
gotoxy(42,21);
cprintf(" ");
a4=0;
continue;
}

}

if(y=='5')
{
gotoxy(38,21);
cprintf("°");
if(a5==0){
salida=salida+16;
outportb(0x378,salida);
a5=1;
continue;
}
if(a5==1){
salida=salida-16;
outportb(0x378,salida);
gotoxy(38,21);
cprintf(" ");
a5=0;
continue;
}

}

if(y=='6')
{
gotoxy(34,21);
cprintf("°");
if(a6==0){
salida=salida+32;
outportb(0x378,salida);
a6=1;
continue;
}
if(a6==1){
salida=salida-32;
outportb(0x378,salida);
gotoxy(34,21);
cprintf(" ");
a6=0;
continue;
}

}

if(y=='7')
{
gotoxy(30,21);
cprintf("°");
if(a7==0){
salida=salida+64;
outportb(0x378,salida);
a7=1;
continue;
}
if(a7==1){
salida=salida-64;
outportb(0x378,salida);
gotoxy(30,21);
cprintf(" ");
a7=0;
continue;
}
}

if(y=='8')
{
gotoxy(26,21);
cprintf("°");
if(a8==0){
salida=salida+128;
outportb(0x378,salida);
a8=1;
continue;
}
if(a8==1){
salida=salida-128;
outportb(0x378,salida);
gotoxy(26,21);
cprintf(" ");
a8=0;
continue;
}
}

if(y=='0')
{
outportb(0x378,0);
gotoxy(54,21);
cprintf(" ");
gotoxy(50,21);
cprintf(" ");
gotoxy(46,21);
cprintf(" ");
gotoxy(42,21);
cprintf(" ");
gotoxy(38,21);
cprintf(" ");
gotoxy(34,21);
cprintf(" ");
gotoxy(30,21);
cprintf(" ");
gotoxy(26,21);
cprintf(" ");
salida=0;
a1=a2=a3=a4=a5=a6=a7=a8=0;
continue;
}
if(y=='s')break;
}
}


barra()
{
int a,b,c,d,i;
a=17;
b=20;
c=55;
d=22;
textcolor(GREEN);
for(i=a;i<=c;i++)
{
gotoxy(i,b);
cprintf("Í");
gotoxy(i,d);
cprintf("Í"); /* ALT 205 */
}
for(i=b+1;i<d;i++)
{
gotoxy(a-1,i);
cprintf("º");
gotoxy(c+1,i);
cprintf("º"); /* ALT 186 */
}
gotoxy(56,20);
cprintf("»"); /* ALT 187 */
gotoxy(56,22);
cprintf("¼"); /* ALT 188 */
gotoxy(16,22);
cprintf("È"); /* ALT 200 */
gotoxy(16,20);
cprintf("É"); /* ALT 201 */
gotoxy(18,21);
cprintf(" ³ ³ ³ ³ ³ ³ ³ ³ "); /* ALT 179 */
gotoxy(24,22);
cprintf("Ï"); /* ALT 207 */
gotoxy(24,20);
cprintf("Ñ"); /* ALT 209 */
gotoxy(28,22);
cprintf("Ï"); /* ALT 207 */
gotoxy(28,20);
cprintf("Ñ"); /* ALT 209 */
gotoxy(32,22);
cprintf("Ï"); /* ALT 207 */
gotoxy(32,20);
cprintf("Ñ"); /* ALT 209 */
gotoxy(36,22);
cprintf("Ï"); /* ALT 207 */
gotoxy(36,20);
cprintf("Ñ"); /* ALT 209 */
gotoxy(40,22);
cprintf("Ï"); /* ALT 207 */
gotoxy(40,20);
cprintf("Ñ"); /* ALT 209 */
gotoxy(44,22);
cprintf("Ï"); /* ALT 207 */
gotoxy(44,20);
cprintf("Ñ"); /* ALT 209 */
gotoxy(48,22);
cprintf("Ï"); /* ALT 207 */
gotoxy(48,20);
cprintf("Ñ"); /* ALT 209 */
gotoxy(52,22);
cprintf("Ï"); /* ALT 207 */
gotoxy(52,20);
cprintf("Ñ"); /* ALT 209 */
gotoxy(17,21);
textcolor(RED);
cprintf("Cargas");
}

ROF
20 de Febrero del 2005

El programa funciona (aunque todavía no se que hace). ¿Sabes qué te faltó? Cuando te enteres, te matás.

barra();

main()
...
.....
....


No puedes llamar una función que esté escrita debajo del main() si no la declaras o la usas arriba. Es un tema de la "caída de un programa".

data
20 de Febrero del 2005

Lo unico que puedo decirte es que creo que se puede hacer un poco mas sencillo usando algun switch y distribuyendo un poco en funciones que sino no hay quien lo dijiera