#include “seedybar.h”
#include “var_patron_gen.h”
#include “cash_patron_booze_interaction.h”
#include tim_defs.h
#include questionable_transsexual.cpp
//define local variables
float cash_In_wallet = “40.00”;
float current_BAL = “0.0”;
string current_persuasion=”stright”
bool has_penis = “true”
//define global variables
bool women_evil = “true”;
bool transsexuals_bad=”true”;
string murphy_law=”in effect”;
void main
(
//specaily patron object for this example
define obj Patron_Tim(cash_In_wallet ,current_BAL ,sexuality, has_penis );
//standard patron invocation, with questionable sexaul prefrences/reproductive organ status
define obj Preop_Trans_patient(11.42,.042,”questionable”,”true”);
//Bar object, as per header include… takes arguments: cash_in_till, //num_tenders,patron_count, num_seats_avail
define obj TheBar(1437.65,2,23,25)
loop AtTheBar(while transsexuals_bad=”true”);
//increase patron count at bar by 1
method_add_patron_to_bar( Preop_Trans_patient);
//1 seat left at the bar
//everyone looks around
cout >> Warning there are “TheBar(SeatsLeft)” seats left at the bar >> endl;
//i’ll have a rum and coke
set patronmode(Preop_Trans_patient,drinking,rum_coke,4.25);
//enter our hero… whew! only 1 seat open… hey she looks pretty good
method_add_patron_to_bar(Patron_Tim);
//everyone looks around
cout >> Warning there are “TheBar(SeatsLeft)” seats left at the bar >> endl;
//1 seat left at bar
//our hero’s journey truly begins
method_scope_out_bod(Patron_Tim, Preop_Trans_patient);
//begin flirting: hey baby, come here often?
void flirt(Patron_Tim, Preop_Trans_patient);
//if flitrter is less drunk than flirtee and flirter is more attractive than flirtee’s BAL
if flitrter_BAL > flitrtee_BAL
and
if flirtee_intrest > flitrter_BAL
then
//up the interest level, flirt back
flirtee_intrest++;
flirter_interest ++;
//give a random positive response
cout(randomresponse)
>> Warning there are “On occasion, how often do you come?” >> endl;
>> Warning there are “Why don’t you buy me a drink for the trouble of answering?” >> endl;
>> Warning there are “Your place or mine?” >> endl;
>> Warning there are “::purr:: only when the local meat is sizzling” >> endl;
>> Warning there are “The question isin’t if i’m here often, its who I’m leaving with that counts.” >> endl;
else
flirter_interest–;
flirtee_interest –;
//give a random negative response
cout(randomresponse)
>> Warning there are “Only when I’m waiting for my boyfreind to get off work.” >> endl;
>> Warning there are “Nah, I usually don’t like hanging out with people who like places like this.” >> endl;
>> Warning there are “You look just like my ex husband when you trried to pick me up just now!” >> endl;
>> Warning there are “Only when I want to get vomitously drunk.” >> endl;
>> Warning there are “Actually, I was getting ready to leave. Excuse me.” >> endl;
//our hero is gaining ground
if (bool lastflirt_wassucessful=”true”);
//it was
//i’ll have a dewars and pepsi(warm)
set patronmode(Patron_Tim,drinking,dewars_pepsi,5.25);
//and one for the lady
set patronmode(Preop_Trans_patient,drinking,rum_coke,4.25);
//run flirt/drink again until BAL/Interest relationship exceeds int copafeel_slap
if copafeel_slap>flirer_interest AND flirer_interest
//this is the 80’s and i’m down with the laadies…..
method_drunked_response( Preop_Trans_patient,Patron_Tim);
cout >> “I’m a transsexual!” >> endl;
//escape subroutine execution, takes argument time in seconds
void c_tim_run(2);
//2 seconds have passed
method_drunked_response(Patron_Tim,Preop_Trans_patient);
cout >> “Preop or Postop?” >> endl;
//the truth is out there
method_drunked_response( Preop_Trans_patient,Patron_Tim);
cout >> “Preop” >> endl;
//escape subroutine execution, continues to use CPU cycles until in threshold is exceeded
//also calls method to change status of threshold variable
void c_tim_stumble(current_BAL+.2,set patronmode(Patron_Tim,drinking,gimme_bottle,29.95));
//pause, while contemplating the bitersweet constant variables of life
set transsexuals_bad=”?”;
method_take_home_get_it_on(Patron_Tim, Preop_Trans_patient);
set Patron_Tim.current_persuasion=”???”;
//g’nite folks
);