Relay-Version: version B 2.10 5/3/83; site utzoo.UUCP Path: utzoo!watmath!clyde!burl!ulysses!allegra!bellcore!decvax!cca!ima!pbear!peterb From: peterb@pbear.UUCP Newsgroups: net.singles Subject: Re: Asking for a date... Message-ID: <83@pbear.UUCP> Date: Wed, 6-Mar-85 02:41:07 EST Article-I.D.: pbear.83 Posted: Wed Mar 6 02:41:07 1985 Date-Received: Fri, 8-Mar-85 03:56:05 EST Lines: 70 Nf-ID: #N:pbear:27400007:000:1454 Nf-From: pbear!peterb Mar 4 13:12:00 1985 About asking for a date... I don't know what is best, I just know what I am most comfortable with. When I meet a lady whose company I enjoy, I pretty much follow the following C fragment: ask_for_date() { char *question[]= { "Care for a drink sometime?" , "Then how about dinner?" }; char *p, *p1; short flag=0; p1=question[0]; top_level: ask_for_date(p1); switch(get_response()) { NO_RESPONSE: if((p=get_explanation())==NULL) exit(CURIOUS); if(!flag && good_explanation(p) && explanation(p)==NON_DRINKER) { p1=question[1]; flag ++; goto Top_level; } if(good_explanation(p)) exit(NORMAL) else exit(ANNOYED); break; YES_RESPONSE: flag = 0; try_again: ask(suggest_place_time(random(place),random(time))); get_response(p); if (good_response(p)) confirm_date(); exit(HAPPY); if (!flag && negative_response(p)) { flag++; goto try_again; } if (negative_response(p)) { ask("You have any ideas?"); if (get_response(p)==YES_RESPONSE) { confirm_date(); exit(HAPPY); } state("Let's try this again"); flag=0; goto try_again; break; default: exit(BEWILDERED); break; } } I know it is not complete(if you have ideas, mail them to me, I will summarize to the net), but this fragment covers a lot of the groundwork. Peter Barada ima!pbear!peterb "These opinions are mine and were forced upon my employer at gunpoint."