Edward Champion's Return of the Reluctant

Proposal Script .98b

If Candle(Unlit) RUN Sub (LightCandle) [sep]

RUN Test.Environmental.Factors
If Test.Environmental.Factors (X) = Test.Environmental.Factors (Planned), Then
Test.Environmental.Factors (true)

Pocket = Pocket(Ring)?
If Pocket Does Not = Pocket(Ring), Then

Either
RUN Sub (Panic) [sep]
Or
END Program

REM // Don't worry, man. App can be run again. But firmware's sensitive to multiple proposals, kid. So be careful //

If Pocket = Pocket (Ring), Then
Position=Position(Knees)

Prompt Computer Input "Mariachi Band?"
If Input "Y" = RUN Sub (Mariachi.Play) [sep]
Else Null

Prompt Computer Input "Hands?"
If Input "Y" Then
SO = SO(Hand)(Kiss)
And
SO(Hand)(Hold)

If SO=Shocked, Then
Pause = 200s

REM // Sorry, man. Like I said, I don't KNOW Mary. You'll have to write this part of the code. But if you need help, I'll give you URL to conversational script. //

Mouth(Closed) = Mouth(Open) Only If SO Does Not = SO(Ran For Her Life)
Speech(True)

SPEAK Will you marry me?

If SO(Answer) = SO(Answer)(Yes), Then
Kiss SO
Hug SO

PROGRAM END
Reference App(WeddingPlan)

Else
If SO(Answer) = SO(Answer)(No), Then
SPEAK Why not?

Or

If SO(Answer)(No), Then Computer(Slap from SO)

Or

If SO(Answer)(No), Then Silence(Sad)

Or

If SO(Answer)(No) And
If SO(Runaway), Then

Computer(Drink)
RUN Sub (Recuperation) [sep]
RUN App (Relationship)

If App(Relationship)(Results)=Lifemate (Potential), Then
GOTO Line 1

Posted by DrMabuse at March 22, 2004 11:08 AM