source: liacs/da/fibo_queue/communiceer.cc@ 365

Last change on this file since 365 was 2, checked in by Rick van der Zwet, 15 years ago

Initial import of data of old repository ('data') worth keeping (e.g. tracking
means of URL access statistics)

  • Property svn:executable set to *
File size: 1.4 KB
Line 
1#include "communiceer.h"
2void sf23(ofstream&sv66,int sv67,char*sv68,char*sv69){sv66<<sv67;
3sv66<<sv68<<sv69;sv66<<EOL;}int sf28(bool sv14,
4ifstream&sv42,ofstream&sv41,ofstream&sv412,char*sv60,char sv71,char*sv70){int N;
5do{cout<<EOL;cout<<sv60<<" ("<<sv71<<"): ";if(sv14)cin>>N;else{sv42>>N;
6sf22(sv42);cout<<N<<EOL;sf23(sv41,N,"","");}if(N<0){cout<<EOL;
7cout<<sv71<<" mag niet negatief zijn.\n";}}while(N<0);return N;}
8int sf21(bool sv14,ifstream&sv42,ofstream&sv41,ofstream&sv412,
9char*sv60,char sv71,int sv72,int sv100,char*sv70){int N,sv29,sv73;do{cout<<EOL;
10cout<<sv60;sv29=strlen(sv60);if(sv71!=Spatie){cout<<" ("<<sv71<<")";sv29+=4;}
11cout<<",";sv29++;sv73=4+GetalLengte(sv72)+7+GetalLengte(sv100)+3+
12GrootsteGetal(GetalLengte(sv72),GetalLengte(sv100));if(sv29+sv73>80)cout<<EOL;
13cout<<" >= "<<sv72<<" en <= "<<sv100<<" : ";if(sv14)cin>>N;else{sv42>>N;
14sf22(sv42);cout<<N<<EOL;sf23(sv41,N,"","");}if((N<sv72)||(N>sv100)){cout<<EOL;
15cout<<"Verkeerde waarde.\n";}}while((N<sv72)||(N>sv100));return N;}
16int sf29(char c){if(HoofdLetter(c)=='J')return 1;else if(HoofdLetter(c)=='N')
17return 0;else return-1;}char sf30(bool sv14,
18ifstream&sv42,ofstream&sv41,ofstream&sv412,bool sv114,char*sv60){char sv61;do
19{cout<<sv60<<", j/n: ";if(sv14)cin>>sv61;else{sv42>>sv61;sf22(sv42);
20cout<<sv61<<EOL;sf23(sv41,sf29(sv61),"","");}sv61=HoofdLetter(sv61);
21if((sv61!='J')&&(sv61!='N')){cout<<"Verkeerd antwoord.\n";cout<<EOL;}
22}while((sv61!='J')&&(sv61!='N'));return sv61;}
Note: See TracBrowser for help on using the repository browser.