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

Last change on this file since 9 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
RevLine 
[2]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.