int menu(int t){
void choice(char );
void colorstring(char s[],int t);
if(t==0){
textbackground(BLACK);
textcolor(LIGHTBLUE);
cprintf("���������������������������"); textcolor(LIGHTGRAY); cprintf("�["); textcolor(DARKGRAY); cprintf("MAIN"); textcolor(LIGHTGRAY); cprintf("]�"); textcolor(BLUE); cprintf("���������������������������"); printf("\n");
choice('E');
colorstring("Enter the dome.",1); printf("\n");
choice('C');
colorstring("View Unit.",1); printf("\n");
choice('S');
colorstring("Send Messages.",1); printf("\n");
choice('R');
colorstring("Read Messages.",1); printf("\n");
choice('B');
colorstring("Bulletins.",1); printf("\n");
choice('V');
colorstring("View Scores.",1); printf("\n");
choice('P');
colorstring("Change User Settings.",1); printf("\n");
choice('I');
colorstring("Instructions",1); printf("\n");
choice('Q');
colorstring("Quit the game!",1); printf("\n");
textcolor(LIGHTBLUE);
cprintf("�������������������������������"); textcolor(BLUE); cprintf("�������������������������������"); printf("\n");
}
if(t==96){
textbackground(BLACK);
textcolor(LIGHTBLUE);
cprintf("���������������������������"); textcolor(LIGHTGRAY); cprintf("�[");
}
if(t==97){
textcolor(LIGHTGRAY); cprintf("]�"); textcolor(BLUE); cprintf("���������������������������"); printf("\n");
}
if(t==98){
textcolor(LIGHTBLUE);
cprintf("�������������������������������"); textcolor(BLUE); cprintf("�������������������������������"); printf("\n");
}
return 0;
}
void drvTK::show_text(const TextInfo & textinfo)
{
int condensedfont = (strstr(textinfo.currentFontName.value(), "Condensed") != NIL);
int narrowfont = (strstr(textinfo.currentFontName.value(), "Narrow") != NIL);
int boldfont = (strstr(textinfo.currentFontName.value(), "Bold") != NIL);
int italicfont = ((strstr(textinfo.currentFontName.value(), "Italic") != NIL)
|| (strstr(textinfo.currentFontName.value(), "Oblique") != NIL));
char* tempfontname = cppstrdup(textinfo.currentFontName.value()) ; // char tempfontname[1024];
char fonttype = 'r';
char *i;
int actualFontSize;
i = strchr(tempfontname, '-');
if (i != NIL) {
*i = '\0';
}
if (italicfont)
fonttype = 'i';
actualFontSize = int ((textinfo.currentFontSize / .95) * 10);
buffer << "set i [$Global(CurrentCanvas) create text "
<< textinfo.x + x_offset
<< " " << (currentDeviceHeight - textinfo.y + y_offset + actualFontSize / 7.2);
buffer << " -text \"";
outputEscapedText(textinfo.thetext.value());
buffer << endl << "\"";
buffer << " -font {-*-" << tempfontname << "-";
if (boldfont)
buffer << "bold";
else
buffer << "medium";
buffer << "-" << fonttype;
if (narrowfont)
buffer << "-narrow--*-";
else if (condensedfont)
buffer << "-condensed--*-";
else
buffer << "-*--*-";
buffer << actualFontSize
<< "-72-72-*-*-*-*"
<< "}" << " -anchor sw" << " -fill " << colorstring(currentR(), currentG(), currentB())
<< " -tags \"" << options->tagNames << "\" ]" << endl;
if (strcmp(options->tagNames.value.value(), "") && !(options->noImPress)) {
buffer << "set Group($Global(CurrentCanvas),$i) \"" << options->tagNames << "\"" << endl;
}
delete [] tempfontname;
}
void drvTK::show_path()
{
const int fillpat = (currentShowType() == drvbase::stroke) ? noFill : Fill;
if (isPolygon()) {
buffer << "set i [$Global(CurrentCanvas) create polygon ";
print_coords();
if (fillpat == 1) {
buffer << " -fill \"" << colorstring(currentR(), currentG(), currentB())
<< "\"";
} else {
buffer << " -fill \"\"";
}
buffer << " -outline \"" << colorstring(currentR(), currentG(), currentB())
<< "\"" << " -width " << (currentLineWidth()? currentLineWidth() : 1)
<< "p" << " -tags \"" << options->tagNames << "\" ]" << endl;
} else {
if (fillpat == 1) {
buffer << "set i [$Global(CurrentCanvas) create polygon ";
print_coords();
buffer << " -fill \"" << colorstring(currentR(), currentG(), currentB())
<< "\"";
buffer << " -outline \"" << colorstring(currentR(), currentG(), currentB())
<< "\"" << " -width " << (currentLineWidth()? currentLineWidth() : 1)
<< "p" << " -tags \"" << options->tagNames << "\" ]" << endl;
} else {
buffer << "set i [$Global(CurrentCanvas) create line ";
print_coords();
buffer << " -fill \"" << colorstring(currentR(), currentG(), currentB())
<< "\"" << " -width " << (currentLineWidth()? currentLineWidth() : 1)
<< "p" << " -tags \"" << options->tagNames << "\" ]" << endl;
}
}
if (strcmp(options->tagNames.value.value(), "") && !(options->noImPress)) {
buffer << "set Group($Global(CurrentCanvas),$i) \"" << options->tagNames << "\"" << endl;
}
}
void displayheader(WAVHDR hdr){
float duration;
char tems[100];
unsigned int i;
duration = (float) hdr.subchunk2Size/hdr.sampleRate/hdr.blockAlign;
gotoxy(1,1);
printf ("[");
colorstring ("Duration: ", GREEN, bg(BLACK));
sprintf(tems,"%.2f", duration);
colorstring(tems, YELLOW,bg(BLACK));
gotoxy(45,1);
printf("][");
colorstring ("Channel Number: ", GREEN, bg(BLACK));
sprintf(tems,"%.2d",hdr.numChan);
colorstring(tems, YELLOW,bg(BLACK));
gotoxy (90,1);
printf("]");
gotoxy (1,2);
printf ("[");
colorstring ("Sample Rate: ", GREEN, bg(BLACK));
sprintf(tems,"%d",hdr.sampleRate);
colorstring(tems, YELLOW,bg(BLACK));
gotoxy (45,2);
printf ("][");
colorstring ("Bits per sample: ", GREEN, bg(BLACK));
sprintf(tems,"%d",hdr.bitsPerSample);
colorstring(tems, YELLOW,bg(BLACK));
gotoxy (90,2);
printf ("]");
gotoxy (1,3);
for (i=0; i < 90; i++)
colorstring("_", RED, bg(BLACK));
}// end function
void main(void){
void choice(char );
void menu(int );
void colorstring(char s[],int t);
void prompt(int );
/* int x1,y1,x2,y2,x3,y3,x4,y4,x5,y5; */
int x6,y6,x7,y7,x8,y8,x9,y9,x10,y10,x11,y11,x12,y12,x13,y13,x14,y14,x15,y15;
/* int x16,y16; */
int i;
char encode(char );
int written,result;
int user;
char key;
char r[]="DARKNIGHT";
char r2[50];
/* int written2; */
printf("\nPsychotron Cybernetics (c) 11/08/93 by Alexey Zilber\nInstallation.\n");
getdate(&d);
game.day=d.da_day;
game.bbs_type=0x00;
game.registered=0x01;
game.pool=0x00;
game.wanted=0x00;
game.reward=0x00;
strcpy(game.bbs_name,"Cyber-Design");
strcpy(game.sys_name,"Alexey Zilber");
strcpy(game.game_dir,"C:\\");
strcpy(game.door_dir,"C:\\");
strcpy(game.proto_dir,"C:\\");
strcpy(r2,"000000000");
if(access("game.dat",0)==0){ if((evenmore=fopen("game.dat","rb"))==NULL){ printf("Error opening game.dat!\n"); exit(2); }
written=fread(&game,sizeof(struct gm),1,evenmore); fclose(evenmore); }
redraw:
;
clrscr();
menu(96); textcolor(LIGHTGRAY); cprintf("INSTALLATION"); menu(97);
choice('B'); colorstring("BBS Name: ",1); /* x1=wherex(); y1=wherey(); */ printf("%s\n",game.bbs_name);
choice('N'); colorstring("Sysop's Name: ",1); /* x2=wherex(); y2=wherey(); */ printf("%s\n",game.sys_name);
choice('D'); colorstring("GAME Directory [use trailing \\]:",1);
/* x3=wherex(); y3=wherey(); */ printf("\n"); printf("%s\n",game.game_dir);
choice('O'); colorstring("DROP FILE Directory [use trailing \\]:",1);
/* x4=wherex(); y4=wherey(); */ printf("\n"); printf("%s\n",game.door_dir);
choice('P'); colorstring("Protocols Directory (for Zmodem) [use trialing \\]:",1);
/* x5=wherex(); y5=wherey(); */ printf("\n"); printf("%s\n",game.proto_dir);
choice('R'); colorstring("Registration Code: ",1); /* x16=wherex(); y16=wherey(); */ printf("%s\n",r2);
colorstring("BBS Type:",1); printf("\n");
choice('1'); colorstring("Renegade. [ ]",1); x6=wherex(); y6=wherey(); if(game.bbs_type==0x01){ gotoxy(x6-3,y6); textcolor(LIGHTRED); cprintf("�"); gotoxy(x6,y6); }else{ gotoxy(x6-3,y6); cprintf(" "); gotoxy(x6,y6); } printf("\n");
choice('2'); colorstring("Searchlight. [ ]",1); x7=wherex(); y7=wherey(); if(game.bbs_type==0x02){ gotoxy(x7-3,y7); textcolor(LIGHTRED); cprintf("�"); gotoxy(x7,y7); }else{ gotoxy(x7-3,y7); cprintf(" "); gotoxy(x7,y7); } printf("\n");
choice('3'); colorstring("Celerity. [ ]",1); x8=wherex(); y8=wherey(); if(game.bbs_type==0x03){ gotoxy(x8-3,y8); textcolor(LIGHTRED); cprintf("�"); gotoxy(x8,y8); }else{ gotoxy(x8-3,y8); cprintf(" "); gotoxy(x8,y8); } printf("\n");
choice('4'); colorstring("Pc-board. [ ]",1); x9=wherex(); y9=wherey(); if(game.bbs_type==0x04){ gotoxy(x9-3,y9); textcolor(LIGHTRED); cprintf("�"); gotoxy(x9,y9); }else{ gotoxy(x9-3,y9); cprintf(" "); gotoxy(x9,y9); } printf("\n");
choice('5'); colorstring("Telegard. [ ]",1); x10=wherex(); y10=wherey(); if(game.bbs_type==0x05){ gotoxy(x10-3,y10); textcolor(LIGHTRED); cprintf("�"); gotoxy(x10,y10); }else{ gotoxy(x10-3,y10); cprintf(" "); gotoxy(x10,y10); } printf("\n");
choice('6'); colorstring("Wild-Cat. [ ]",1); x11=wherex(); y11=wherey(); if(game.bbs_type==0x06){ gotoxy(x11-3,y11); textcolor(LIGHTRED); cprintf("�"); gotoxy(x11,y11); }else{ gotoxy(x11-3,y11); cprintf(" "); gotoxy(x11,y11); } printf("\n");
choice('7'); colorstring("WWIV. [ ]",1); x12=wherex(); y12=wherey(); if(game.bbs_type==0x07){ gotoxy(x12-3,y12); textcolor(LIGHTRED); cprintf("�"); gotoxy(x12,y12); }else{ gotoxy(x12-3,y12); cprintf(" "); gotoxy(x12,y12); } printf("\n");
choice('8'); colorstring("Vision\\X. [ ]",1); x13=wherex(); y13=wherey(); if(game.bbs_type==0x08){ gotoxy(x13-3,y13); textcolor(LIGHTRED); cprintf("�"); gotoxy(x13,y13); }else{ gotoxy(x13-3,y13); cprintf(" "); gotoxy(x13,y13); } printf("\n");
choice('9'); colorstring("Oblivion. [ ]",1); x14=wherex(); y14=wherey(); if(game.bbs_type==0x09){ gotoxy(x14-3,y14); textcolor(LIGHTRED); cprintf("�"); gotoxy(x14,y14); }else{ gotoxy(x14-3,y14); cprintf(" "); gotoxy(x14,y14); } printf("\n");
choice('*'); colorstring("Other. [ ]",1); x15=wherex(); y15=wherey(); if(game.bbs_type==0x0A){ gotoxy(x15-3,y15); textcolor(LIGHTRED); cprintf("�"); gotoxy(x15,y15); }else{ gotoxy(x15-3,y15); cprintf(" "); gotoxy(x15,y15); } printf("\n");
choice('X'); colorstring("Exit WITHOUT Save.",3); printf("\n");
choice('Z'); colorstring("Save & Continue.",3); printf("\n");
menu(98);
prompt(1);
do{
key=getch();
}while(!strchr("bndorpxz123456789*", tolower(key)));
switch (key){
case 'b': printf("\n"); prompt(3); gets(game.bbs_name); break;
case 'n': printf("\n"); prompt(3); gets(game.sys_name); break;
case 'd': printf("\n"); prompt(3); gets(game.game_dir); break;
case 'o': printf("\n"); prompt(3); gets(game.door_dir); break;
case 'p': printf("\n"); prompt(3); gets(game.proto_dir); break;
case 'r': printf("\n"); prompt(3); gets(r2); if(strcmp(r,r2)==0) game.registered=encode(0x03); break;
case 'x': clrscr(); colorstring("Game NOT installed!",3); printf("\n"); exit(1);
case 'z': if(game.bbs_type==0x00){ colorstring("You must complete ALL fields to exit!",3); printf("\n"); prompt(2); getch(); break; }
else{ if((more=fopen("game.dat","wb"))==NULL){ printf("Error opening game.dat!"); exit(2); }
written=fwrite(&game, sizeof(struct gm),1,more);
fclose(more);
clrscr();
printf("Wrote %d units to file game.dat.\n\n",written);
result=spawnl(P_WAIT,"egen.exe",NULL);
if(result==15) printf("INSTALL SUCCESFULL!\n");
if(result!=15) printf("INSTALL FAILED! Result code=%d",result);
exit(0);
}
case '1': game.bbs_type=0x01; break;
case '2': game.bbs_type=0x02; break;
case '3': game.bbs_type=0x03; break;
case '4': game.bbs_type=0x04; break;
case '5': game.bbs_type=0x05; break;
case '6': game.bbs_type=0x06; break;
case '7': game.bbs_type=0x07; break;
case '8': game.bbs_type=0x08; break;
case '9': game.bbs_type=0x09; break;
case '*': game.bbs_type=0x0A; break;
}
goto redraw;
}
void prompt(int p){
if(p==1) colorstring("Cyber-Interface:[Choice]| ",2);
if(p==2) colorstring("Cyber-Interface:[Pause]| ",2);
if(p==3) colorstring("Cyber-Interface:[Input]| ",4);
}
void printdouble(int x,int y,double z)
{
char mystring[100];
double2decimalstring(z,mystring);
colorstring(x,y,mystring,0xffffff);
}
void string(int x,int y,char* p)
{
colorstring(x,y,p,0);
}
