eliza Q  5c$="":p$="":u(43+):v(43+):w(43+) F(n1=43+:n2=16:n3=121y P 2200 Z<x=1n1:u(x):l1:v(x)=u(x):w(x)=u(x)+l1-1:x x'x$="Hi,I'm Eliza,whats your problem?" 2240 a$ flag=0 :a$=""x$="Well,say something!!!":2240:150 'x$="/"+a$:a$=" "+a$+" ":9000(# @a$="shut up"x$="There is no need to be rude!!":2240: i$=a$  2140\ ^ h s=0 rk=1n1 |k$ s>0430 l=1̱i$-k$ )i$(ll+k$-1)=k$s=k:t=l:f$=k$ l k  s>0k=s:l=t:470 k=n1:3000  900 c$=" "+i$(l+f$) x=1n2/2 s$,r$ l=1̱c$ &l+s$>c$600X 0#c$(ll+s$-1)s$600X :!c$=c$(l-1)+r$+c$(l+s$) D l=l+r$ N 640 Xl+r$>c$640 b#c$(ll+r$-1)r$640 l!c$=c$(l-1)+s$+c$(l+r$) v l=l+s$ l x c$<2670 "c$(1)=" "c$=c$(2) 940+10 *v(k) f$ )v(k)=v(k)+1:v(k)>w(k)v(k)=u(k) f$(f$)="*"740 x$=f$ {flag=0k20(k<20k=21k=31k=32 k=33!k=36$k>40()kn1p$=p$+""+i$  130 c$=""746 -c$(c$)=" "c$=c$(̱c$-1):741 -c$(1)=" "c$=c$(2):742 x$=f$(̱f$-1)+" "+c$ &x$(1)="?"x$=x$(2)+"?"  2240 {flag=0k20(k<20k=21k=31k=32 k=33!k=36$k>40()kn1p$=p$+""+i$  150  w" sex"," bloody "," damn "," hell "," shit "," fucked "," fuck ","can you","can i","you are","your","i dont","i feel" 4<"why dont you","why cant i","are you","i cant","i am","im" >:" you ","i want","what","how","who","where","when","why" H6"name","cause","sorry","dream","hello","hi ","maybe" RN" no","your","always","think","alike","yes","friend","computer","nokeyfound" " are "," am "," were "," was "," you "," i "," your "," my "," ive "," youve "," im "," youre "," me "," me "," you "," yourself "," myself " "?Dont you believe I can*" *"?Perhaps you would like to be able to*" "?You want me to be able to*" "?Perhaps you dont want to*" "?Do you want to be able to*" "?What makes you think I am*" ("?Does it please you to believe I am*" ""?Perhaps you would like to be*" )"?Perhaps you sometimes wish you were*" "?Dont you really*" "?Why dont you*" $""?Maybe you wish to be able to*" ."Does that trouble you?" 8$"Tell me more about your feelings" B"?Do you often feel*" L"?Do you enjoy feeling*" V""?Do you really believe I dont*" ` "Perhaps in good time I will*" j"?Perhaps you want me to*" t+"?Maybe you think you should be able to*" ~"?Why cant you*" 3"?Why are you interested in whether or not I am*" '"?Would you prefer it if I were not*" $"?Perhaps in your fantasies I am*" "?How do you know you cant*" "?Have you tried*" "Perhaps you can now*" ("?Did you come to me because you are*" "?How long have you been*" '"?Do you believe it is normal to be*" "?Do you enjoy being*" !"We were discussing you,not me"  "Oh,I*" -"Your not really talking about me,are you?"  *"?What would it mean to you if you got*" "?Why do you want*" "?Suppose you soon got*" ("?What if you never got*" 2"I sometimes also want*" <"Why do you ask?" F$"Does that question interest you?" P*"What answer would please you the most?" Z"What do you think?" d*"Are such questions on your mind often?" n,"What is it that you really want to know?" x)"Have you asked such questions before?" "Have you asked anyone else?" ."What else comes to mind when you ask that?" "Names dont interest me" )"I dont care about names--please go on" "Is that the real reason?" ("Dont any other reasons come to mind?" +"Does that reason explain anything else?" &"What other reasons might there be?" "Please dont apologise" "Apologies are not necessary" 1"What feelings do you have when you apologise?" "Dont be so defensive" ("What does that dream suggest to you?" !"Tell me more about your dream" '"What persons appear in your dreams?" %"Are you disturbed by your dreams?" ","How do you do--please state your problem" ,$"You dont seem to be very certain" 6"Why the uncertain tonr?" @"Can you be more positive?" J"Arent you sure?" T"Dont you know?" ^*"Are you saying no just to be negative?" h "You are being a bit negative" r "Why not?" |"Why are you so sure?"  "Why no?" $"?Why are you concerned about my*" "?What about your own*" ("Can you think of a specific example?"  "When?" "What are you thinking of?" "Really,always?" "Do you really think so?" "But you are not sure you*" "?Do you doubt you*" "In what way?"  "What resemblance do you see?" ,"What does the similarity suggest to you?" &"What other connections do you see?" *"Could there really be some connection?" "How?" &"You seem quite positive" 0"Why are you so sure?" : "I see" D"I understand" N-"Why do you bring up the topic of friends?" X#"Perhaps your friends worry you?" b#"Maybe your friends pick on you?" l%"What sort of friends do you have?" v""Do you impose on your friends?" ."Perhaps your love for friends worries you?" "Maybe computers worry you?" +"Are you talking about me in particular?" #"Are you frightened by machines?" !"Why do you mention computers?" <"What do you think machines have to do with your problem?" -"Dont you think computers can help people?" /"What is it about machines that worries you?" /"Say,do you have any psychological problems?" ""What does that suggest to you?"  "I see" ("I am not sure I understand you fully" &"Come,come,elucidate your thoughts!" "Can you elaborate on that?"  "That is quite interesting" "Why do you mention sex?"  ""Is your sex life satisfactory?" *'"Do you feel like sex at the moment?" 44"Please dont swear,there is a lady present(me!!!)" >"There is no need to swear!" H""swearing will not help anybody" R$"Please dont BLOODY WELL SWEAR!!!" \""There is no need to be obscene" f"Dont be so disgusting!!!" .113q,3,116t,4,116t,4,116t,4,116t,4,120x,2,120x,2,1,3,4,2,6,4,6,4,10 ,4,14,3,17,3,20,2,22,3,25,3,28 4,28,4,32 ,3,35#,5,40(,9 ,40(,9 ,40(,9 ,40(,9 ,40(,9 ,40(,9 ,491 2,513,4,557,4,59;,4,63?,1,63?,1,64@,5,69E,5,74J,2,76L,4,80P _3,83S,7,90Z,3,93],6,99c,7,106j,6 @flag1=0:x$(1)="/"flag1=1:x$=x$(2) 023692\,255:21,31;" " flag1;21,0;x$ $ p$=""700 pos=p$ *p$(pos)""pos=pos-1:3010 i$=p$(pos+1) p$=p$(pos-1) flag=1:350^ .x$(1)=" "x$=x$(2):4000 .x$(x$)=" "x$=x$(̱x$-1):4010 p=1̱x$-2 .x$(pp+2)=" i "x$(pp+2)=" I " p+3>x$4050 0x$(pp+3)=" im "x$(pp+3)=" Im " p  #(p=1̱a$ #-p>a$90179# #2f(a$(p)<"A"a$(p)>" ")(a$(p)>"Z"a$(p)<"a")a$(p)>"z"a$=a$(p-1)+a$(p+1):p=p-1 #7p #9p=1̱a$ #