Turbo C Context File   dd5 CLUBNR.CPGLIBPGT.LIBe= - *.CPP*.CC:\SFI5\*.*C:D:\BORLANDC\BIN\*.*w void *.c void *.cx case1617y16z*  *.OBJ*.H*.CPP*.C*.LIB{ |Y7  $,./15text1text2ipuf2pufplznamemnrzeichenpnergj} A2&$&$2&`"&`"(2q!q!4=R2&&D:\PROJEKT\CLUBNR.CPP   R2&&D:\PROJEKT\PGLIBPGL.H  R2}&&D:\PROJEKT\CLUBNR.CPPR2}&&D:\PROJEKT\PGLIBPGL.HR2}&&D:\PROJEKT\PGLIBPGL.HT2}&&D:\PROJEKT\PGLIBPGT.LIB##R2}&&D:\PROJEKT\PGLIBPGL.HQ2}& }& D:\TENPRO\TENPRO.CPP   P2x&`"x&`"D:\PROJEKT\CLUBNR.CQ2}&$&D:\TENPRO\TENPRO.CPP2&$&$&T2&$&D:\PROJEKT\PGLIBPGT.LIBT2&&D:\PROJEKT\PGLIBPGT.LIBM2}&&D:\PFB\IRINOUT.C J(P2&&D:\PROJEKT\CLUBNR.CuuT2&&D:\PROJEKT\NONAME00.CPP  2"- DIR -" far int copy(char text1[12], char text2[12]) { int i=0; for(; text1[i]!=0;) { text2[i]=text1[i]; i++; }; text2[i]=0; return(0); }; printf ("\n i=%d z=%d",i ,z); PlotSpiral() int x, y; int x1 = 0; int x2 = 239; int y1 = 0; int y2 = 63; for(j = 0; j < 30000; j++); /* save screen to disk as PGC file */ result = PG_Save("newportf.pgc", SCREEN); if(result != OK) { PG_GoText(); if(result == BADOPEN) puts("Error opening file"); else puts("Error writing file"); exit(1); } /* save buffer to disk as PGC file */ result = PG_Save("newfuji.pgc", (char far *)fuji); if(result != OK) { PG_GoText(); if(result == BADOPEN) puts("Error opening file"); else puts("Error writing file"); exit(1); } #include "pglibpgl.h" /*Includes .. */ #include #include #include #include #include #include #include #include #include #include /* defines ... */ #define breite 40; #define hoehe 8; #define MAXFILES 50 /* definieren der Tasten */ #define UARROW 0x48 #define DARROW 0x50 #define LARROW 0x4b #define RARROW 0x4d #define BS 0x0e #define DEL 0x53 #define RET 13 #define ESC 27 #define SPACE 32 #define TAB 0x09 /* Typen deklaration */ /* Boolean Type einfhren */ typedef enum { FALSE=0, TRUE=1 }boolean; /* Berechnung von den Clubmitgliednummern auf dem Pofo */ /* (R) Michael Schrder 1995 */ /*Includes .. */ #include #include #include #include #include #include #include #include #include #include /* defines ... */ #define breite 40; #define hoehe 8; #define MAXFILES 50 /* definieren der Tasten */ #define UARROW 0x48 #define DARROW 0x50 #define LARROW 0x4b #define RARROW 0x4d #define BS 0x0e #define DEL 0x53 #define RET 13 #define ESC 27 #define SPACE 32 #define TAB 0x09 /* Typen deklaration */ /* Boolean Type einfhren */ typedef enum { FALSE=0, TRUE=1 }boolean; for(j = 0; j < 30000; j++); for(j = 0; j < 30000; j++); /* Menu auf den Schirm und auf den Benutzerdruck warten */ clrscr(); gotoxy(1,1);printf("͹TenPro͹ Menue ͹ Ver.1.00 "); gotoxy(1,8);printf(""); gotoxy(8,2);printf("(N)eues Spiel beginnen"); gotoxy(8,3);printf("(L)aden eines Spieles"); gotoxy(8,4);printf("(D)irectory ansehen"); gotoxy(8,5);printf("(E)ingabe eines Spieles"); gotoxy(8,6);printf("(T)rainings Statistik"); gotoxy(8,7);printf("(ESC) TenPro beenden"); c=getch(); /* Menu auf den Schirm und auf den Benutzerdruck warten */ clrscr(); gotoxy(1,1);printf("͹ MNB ͹ Menue ͹ Ver.1.00 "); gotoxy(1,8);printf(""); clrscr(); gotoxy(1,1);printf("͹ MNB ͹ Neue ͹ Ver.1.00 "); gotoxy(1,8);printf(""); gotoxy(1,3);printf("Bitte Postleitzahl eingeben:"); gotoxy(1,4);printf(" _____"); gotoxy(29,3);scanf("%D",&plz); void neue(void) void neue(void) int berechnen (int plz, char name[30]) boolean vorspann(void); int i, j, result; char c=0; /* initialize the graphics routines */ result = PG_Init(); if(result == 0) { puts("This is not an Atari Portfolio!"); exit(1); } /* put Portfolio into graphics mode */ PG_GoGraphic(); /* Plot some pixels */ PlotSpiral(); /* load in a picture */ PG_Show("logo1.pgc"); warten; warten; warten; PG_Show("logo2.pgc"); c=getch(); if(c==27) { PG_ClearScreen(); PG_GoText(); exit(1); }; /* clear the screen */ PG_ClearScreen(); /* return to text mode */ PG_GoText(); char c=0; clrscr(); gotoxy(1,1);printf("͹ MNB ͹ Menue ͹ Ver.1.00 "); gotoxy(1,8);printf(""); gotoxy(8,3);printf("(N)eue Nummer errechnen"); gotoxy(8,4);printf("(K)orrektur einer Nummer"); gotoxy(8,5);printf("(I)nfo vom Programm"); gotoxy(8,7);printf("(ESC) MNB beenden"); gotoxy(1,2);printf("(N)eue Nummer errechnen"); gotoxy(1,3);printf("(K)orrektur einer Nummer"); gotoxy(1,4);printf("(I)nfo vom Programm"); gotoxy(1,5);printf("(ESC) MNB beenden"); gotoxy(1,1);printf("͹ MNB ͹ Menue ͹ Ver.1.00 "); gotoxy(1,8);printf(" weiter mit Space"); gotoxy(1,2);printf("MNB berechnet die Mitgliedsnummer eines"); gotoxy(1,3);printf("Mitglieds aus mindestens zwei Angaben:"); gotoxy(1,4);printf("Postleitzahl und Nachnamen. "); gotoxy(1,5);printf("Ebenso werden beim Zurckrechnen ent-"); gotoxy(1,6);printf("weder Postleidzahl und Mitgliedsnummer"); gotoxy(1,7);printf("oder Nachname und Mitgliednummer bentigt"); clrscr(); gotoxy(1,1);printf("͹ MNB ͹ Neue ͹ Ver.1.00 "); gotoxy(1,8);printf(""); gotoxy(1,3);printf("Bitte Postleitzahl eingeben:"); gotoxy(1,4);printf(" _____"); case 'A': case 'a': return(0); clrscr(); gotoxy(1,1);printf("͹ MNB ͹ Neue ͹ Ver.1.00 "); gotoxy(1,8);printf(" weiter mit Space "); gotoxy(1,3);printf(" Die neue Mitgliednummer lautet:"); gotoxy(1,6);printf(" __________"); gotoxy(1,5);printf(" %s",mnr); getch(); } const char sprintf(mnr[j],"%d",erg); gotoxy(1,3);printf("Bitte Postleitzahl eingeben:"); gotoxy(1,4);printf(" _____"); gotoxy(29,3);gets(plz); gotoxy(1,6);printf(" Postleitzahl bitt 5-Stellig eingeben! gotoxy(29,3);gets(plz); char name[30], plz[5], mnr[10]; /* Menu auf den Schirm und auf den Benutzerdruck warten */ clrscr(); gotoxy(1,1);printf("͹ MNB ͹ Neue ͹ Ver.1.00 "); gotoxy(1,8);printf(""); while(TRUE) { gotoxy(1,3);printf("Bitte Postleitzahl eingeben:"); gotoxy(1,4);printf(" _____"); gotoxy(29,3);gets(plz); if(strlen(plz)<5) { gotoxy(1,6);printf(" Postleitzahl bitte 5-Stellig eingeben!"); getch(); gotoxy(1,6);printf(" "); gotoxy(29,3);printf(" "); } else break; }; clrscr(); gotoxy(1,1);printf("͹ MNB ͹ Neue ͹ Ver.1.00 "); gotoxy(1,8);printf(""); gotoxy(1,3);printf("Bitte Nachnamen eingeben:"); gotoxy(1,4);printf(" ______________"); gotoxy(26,3);gets(name); if(berechnen(plz, name, mnr)) { clrscr(); gotoxy(1,1);printf("͹ MNB ͹ Neue ͹ Ver.1.00 "); gotoxy(1,8);printf(" weiter mit Space "); gotoxy(1,3);printf(" Die neue Mitgliedsnummer lautet:"); gotoxy(1,6);printf(" __________"); gotoxy(1,5);printf(" * %s *",mnr); getch(); } else { clrscr(); gotoxy(1,1);printf("͹ MNB ͹ Neue ͹ Ver.1.00 "); gotoxy(1,8);printf(" weiter mit Space "); gotoxy(1,4);printf("Es wurden ungltige Zeichen eingegeben!"); gotoxy(1,6);printf(" Bitte noch einmal Berechnen und auf "); gotoxy(1,7);printf(" die Eingaben achten!"); getch(); } }; gotoxy(1,4);printf("Es wurden ungltige Zeichen eingegeben!"); gotoxy(1,6);printf(" Bitte noch einmal Berechnen und auf "); gotoxy(1,7);printf(" die Eingaben achten!"); getch(); } clrscr(); gotoxy(1,1);printf("͹ MNB ͹ Prfen ͹ Ver.1.00 "); gotoxy(1,8);printf(" Taste "); gotoxy(1,3);printf("Bitte Postleitzahl eingeben:"); gotoxy(1,4);printf(" _____"); gotoxy(29,3);gets(plz); gotoxy(1,3);printf("Bitte Postleitzahl eingeben:"); gotoxy(1,4);printf(" _____"); gotoxy(29,3);gets(plz); gotoxy(1,1);printf("Postleitzahl:"); gotoxy(1,2);printf(" _____"); clrscr(); gotoxy(1,1);printf("͹ MNB ͹ Prfen ͹ Ver.1.00 "); gotoxy(1,8);printf(""); clrscr(); gotoxy(1,1);printf("͹ MNB ͹ Neue ͹ Ver.1.00 "); gotoxy(1,8);printf(""); gotoxy(1,3);printf("Bitte Nachnamen eingeben:"); gotoxy(1,4);printf(" ______________"); gotoxy(26,3);gets(name); if(berechnen(plz, name, mnr)) { clrscr(); gotoxy(1,1);printf("͹ MNB ͹ Neue ͹ Ver.1.00 "); gotoxy(1,8);printf(" weiter mit Space "); gotoxy(1,3);printf(" Die neue Mitgliedsnummer lautet:"); gotoxy(1,6);printf(" __________"); gotoxy(1,5);printf(" * %s *",mnr); getch(); } else { clrscr(); gotoxy(1,1);printf("͹ MNB ͹ Neue ͹ Ver.1.00 "); gotoxy(1,8);printf(" weiter mit Space "); gotoxy(1,4);printf("Es wurden ungltige Zeichen eingegeben!"); gotoxy(1,6);printf(" Bitte noch einmal Berechnen und auf "); gotoxy(1,7);printf(" die Eingaben achten!"); getch(); } }; gotoxy(1,7);printf("--> mit Return Feldwechsel <---"); { clrscr(); gotoxy(1,1);printf("͹ MNB ͹ Neue ͹ Ver.1.00 "); gotoxy(1,8);printf(" weiter mit Space "); gotoxy(1,3);printf(" Die neue Mitgliedsnummer lautet:"); gotoxy(1,6);printf(" __________"); gotoxy(1,5);printf(" * %s *",mnr); getch(); } else { clrscr(); gotoxy(1,1);printf("͹ MNB ͹ Neue ͹ Ver.1.00 "); gotoxy(1,8);printf(" weiter mit Space "); gotoxy(1,4);printf("Es wurden ungltige Zeichen eingegeben!"); gotoxy(1,6);printf(" Bitte noch einmal Berechnen und auf "); gotoxy(1,7);printf(" die Eingaben achten!"); getch(); } if(berechnen(plz, name, mnr)) ((strlen(mnr)==0)&&(strlen(name)==0)&&!(strlen(plz)==0)) (plz, name, mnr) gotoxy(1,6);printf("Postleitzahl: "); gotoxy(14,6);gets(plz); gotoxy(11,4);gets(name); gotoxy(17,2);gets(mnr); boolean berechnen (char plz[5], char name[30], char mnr[10]); boolean berechnen_plz(char plz[5], char name[30], char mnr[10]); boolean berechnen_name(char plz[5], char name[30], char mnr[10]); printf("%s",plz); gotoxy(1,8);printf(""); back=FALSE; }; int i,j=0,z1=0,z2=0; for(i=0;i<=5;i++) { /* Mitgiedsnummer auseinander nehmen */ z1=checkit(mnr[j])*10+checkit(mnr[j+1]); j+=2; z2=z1-checkit(name[i]); sprintf(plz+i,"%d",z2); }; plz[5]=0; return(TRUE); checkit(name[i]) (checkit(mnr[j])*10+checkit(mnr[j+1]))-checkit(name[i]) j+=2; for(i=0;i<=5;i++) { sprintf(plz+i,"%d",(checkit(mnr[j])*10+checkit(mnr[j+1]))-checkit(name[i])); j+=2; }; plz[5]=0; checkit(mnr[j])*10+checkit(mnr[j+1]) (checkit(mnr[j])*10+checkit(mnr[j+1]))-checkit(plz[i]) zeichen=toupper(zeichen); if((zeichen>=65)&&(zeichen<=90)|| (zeichen>=48)&&(zeichen<=57) ) if(zeichen>57) return(zeichen-65); else return(zeichen-48); else switch(zeichen) { case '': case '': return(26); case '': case '': return(27); case '': case '': return(28); case '': return(29); case ' ': return(32); default: return(99); }; }; zeichen=toupper(zeichen); (checkit(mnr[j])*10+checkit(mnr[j+1]))-checkit(plz[i]) j+=2; clrscr(); gotoxy(1,1);printf("͹ MNB ͹ Info ͹ Ver.1.00 "); gotoxy(1,8);printf(" weiter mit Space"); gotoxy(1,2);printf("MNB berechnet die Mitgliedsnummer eines"); gotoxy(1,3);printf("Mitglieds aus mindestens zwei Angaben:"); gotoxy(1,4);printf(" Postleitzahl und Nachnamen. "); gotoxy(1,5);printf("Ebenso werden beim Zurckrechnen ent-"); gotoxy(1,6);printf("weder Postleitzahl und Mitgliedsnummer"); gotoxy(1,7);printf("oder Nachname und Mitgliedsnummer -->"); getch(); clrscr(); den Portfolio Club Deutschland ") /* Cursor aus */ asm{ mov ah,1111b mov al, 1 mov bl, 0 int 61h } if(!vorspann()) { clrscr(); gotoxy(1,1);printf("͹ MNB ͹ PC-Ver.1.00 "); gotoxy(1,8);printf(""); gotoxy(1,3);printf(" Mitglieds Nummern Berechnung"); gotoxy(1,4);printf(" fr "); gotoxy(1,5);printf(" den Portfolio Club Deutschland "); gotoxy(1,6);printf(" von Michael Schrder in 'C'"); gotoxy(1,7);printf(" vom 21.11.1995"); getch(); }; /* Cursor aus */ asm{ mov ah,1111b mov al, 1 mov bl, 0 int 61h }