|
|
captain mad mike // User Search
captain mad mike // User Search
Dec 21, 2000, 12:02am
LOL is it in GW basic or Q basic?
[View Quote]ananas <vha at oct31.de> wrote in message news:3A168EDC.CDA6AE45 at oct31.de...
> I found an old version of eep, it is a very old basic program.
>
computer connected to a teletype. Eliza is an artificial psychotherapist
which reponds to input by asking questions and providing feedback. Eliza's
reponses may appear to be intelligent, but the longer you converse with
Eliza, the less intelligent she appears!
>
> Doesn't that sound familiar?
> Maybe someone is interested in making his own eep, so here's the source
>
> =<cut here>========================================================
> 100 DIMS(38):DIMR(38):DIMN(38)
> 110 N1=38:N2=14:N3=115
> 120 RESTORE 4001
> 130 FORX=1TON1
> 140 READ S(X),L:R(X)=S(X):N(X)=S(X)+L-1
> 150 NEXT X
> 155 CLS
> 160 PRINT"HELLO! MAKE YOURSELF COMFORTABLE."
> 170 PRINT"NOW,WHAT'S YOUR PROBLEM?"
> 180 ' USER INPUT
> 200 LINE INPUT I$
> 201 I$=" "+I$+" "
> 210 'KILL APOSTROPHES
> 220 AP$="'":IF INSTR(1,I$,AP$)>0 THEN
> I$=LEFT$(I$,(INSTR(1,I$,AP$)-1))+RIGHT$(I$,LEN(I$)-INSTR(1,I$,AP$)):GOTO
> 220
> 250 IF I$=P$ THENPRINT"WHY DO YOU REPEAT YOURSELF?"
> 260 'FIND KEYWORD IN I$
> 290 RESTORE
> 300 FOR K=1 TO N1
> 310 READ K$
> 330 IF INSTR(1,I$,K$)>0 THEN F$=K$:L=INSTR(1,I$,K$):GOTO420
> 340 NEXT K
> 370 K=36:GOTO 590:'NO KEYWORDS
> 400 'CONJUGATE WORDS
> 420 RESTORE 2001
> 430 C$=" "+RIGHT$(I$,LEN(I$)-LEN(F$)-L+1)+" "
> 440 FOR X=1 TO N2/2
> 450 READ S$,R$
> 455 CC=1
> 460 IF INSTR(CC,C$,S$)>0 THEN 500
> 470 IF INSTR(CC,C$,R$)>0 THEN 510
> 480 GOTO 550
> 500
>
L=INSTR(1,C$,S$):C$=LEFT$(C$,L-1)+R$+RIGHT$(C$,LEN(C$)-L-LEN(S$)+1):CC=L+LEN
(R$):GOTO
> 460
> 510
>
L=INSTR(1,C$,R$):C$=LEFT$(C$,L-1)+S$+RIGHT$(C$,LEN(C$)-L-LEN(R$)+1):CC=L+LEN
(S$):GOTO
> 460
> 550 NEXT X
> 555 IF MID$(C$,2,1)=" "THEN C$=RIGHT$(C$,LEN(C$)-1):'ONE SPACE ONLY
> 557 IF INSTR(1,C$,"!")>0 THEN
> L=INSTR(1,C$,"!"):C$=LEFT$(C$,L-1)+RIGHT$(C$,LEN(C$)-L)
> 580 ' GET REPLY
> 590 RESTORE 3001
> 600 FOR X=1 TO R(K):READ F$:NEXT
> 610 R(K)=R(K)+1:IF R(K)>N(K) THEN R(K)=S(K)
> 620 IF RIGHT$(F$,1)<>"*" THEN PRINTF$:P$=I$:GOTO 200
> 630 PRINTLEFT$(F$,LEN(F$)-1);C$
> 640 P$=I$:GOTO 200
> 1000 'KEYWORDS
> 1001 DATA "CAN YOU","CAN I","YOU ARE","YOURE","I DONT","I FEEL"
> 1060 DATA "WHY DONT YOU","WHY CANT I","ARE YOU","I CANT","I AM"," IM "
> 1070 DATA "YOU ","I WANT","WHAT","HOW","WHO","WHERE","WHEN","WHY"
> 1080 DATA "NAME","CAUSE","SORRY","DREAM","HELLO"," HI ","MAYBE"
> 1090 DATA " NO ","YOUR","ALWAYS","THINK","ALIKE","YES "," FRIEND"
> 1100 DATA "COMPUTER","NOKEY","PHOOEY","OUCH"
> 2000 'CONJUGATIONS
> 2001 DATA " ARE "," AM "," WERE "," WAS "," YOU "," I "," YOUR "," MY "
> 2010 DATA " IVE "," YOUVE "," IM "," YOURE "
> 2020 DATA " ME "," !YOU "
> 3000 'REPLIES
> 3001 DATA"DON'T YOU BELIEVE THAT I CAN*"
> 3040 DATA"PERHAPS YOU WOULD LIKE TO BE ABLE TO*"
> 3050 DATA"YOU WANT ME TO BE ABLE TO*"
> 3060 DATA"PERHAPS YOU DON'T WANT TO*"
> 3070 DATA"DO YOU WANT TO BE ABLE TO*"
> 3080 DATA"WHAT MAKES YOU THINK I AM*"
> 3090 DATA"DOES IT PLEASE YOU TO BELIEVE I AM*"
> 3100 DATA"PERHAPS YOU WOULD LIKE TO BE*"
> 3400 DATA"DO YOU SOMETIMES WISH YOU WERE*"
> 3410 DATA"DON'T YOU REALLY*"
> 3420 DATA"WHY DON'T YOU*"
> 3430 DATA"DO YOU WISH T BE ABLE TO*"
> 3440 DATA"DOES THAT TROUBLE YOU?"
> 3450 DATA"TELL ME MORE ABOUT SUCH FEELINGS."
> 3460 DATA"DO YOU OFTEN FEEL*"
> 3470 DATA"DO YOU ENJOY FEELING*"
> 3480 DATA"DO YOU REALLY BELIEVE I DON'T*"
> 3490 DATA"PERHAPS IN GOOD TIME I WILL*"
> 3500 DATA"DO YOU WANT ME TO*"
> 3510 DATA"DO YOU THINK YOU SHOULD BE ABLE TO*"
> 3520 DATA"WHY CAN'T YOU*"
> 3530 DATA"WHY ARE YOU INTERESTED IN WHETHER OR NOT I AM *"
> 3540 DATA"WOULD YOU PREFER IF I WERE NOT*"
> 3550 DATA"PERHAPS IN YOUR FANTASIES I AM*"
> 3560 DATA"HOW DO YOU KNOW YOU CAN'T*"
> 3570 DATA"HAVE YOU TRIED?"
> 3580 DATA"PERHAPS YOU CAN NOW*"
> 3590 DATA"DID YOU COME TO ME BECAUSE YOU ARE*"
> 3600 DATA"HOW LONG HAVE YOU BEEN*"
> 3601 DATA"DO YOU BELIEVE IT IS NORMAL TO BE*"
> 3602 DATA"DO YOU ENJOY BEING*"
> 3603 DATA"WE WERE DISCUSSING YOU-NOT ME"
> 3604 DATA"OH I*"
> 3605 DATA"YOU'RE NOT REALLY TALKING ABOUT ME ARE YOU?"
> 3606 DATA"WHAT WOULD IT MEAN TO YOU IF YOU GOT*"
> 3607 DATA"WHY DO YOU WANT*"
> 3608 DATA"SUPPOSE YOU SOON GOT*"
> 3609 DATA"WHAT IF YOU NEVER GOT*"
> 3610 DATA"SOMETIMES I ALSO WANT*"
> 3611 DATA"WHY DO YOU ASK?"
> 3612 DATA"DOES THAT QUESTION INTEREST YOU?"
> 3613 DATA"WHAT ANSWER WOULD PLEASE YOU THE MOST?"
> 3614 DATA"WHAT DO YOU THINK?"
> 3615 DATA"ARE SUCH QUESTIONS ON YOUR MIND OFTEN?"
> 3616 DATA"WHAT IS IT THAT YOU REALLY WANT TO KNOW"
> 3617 DATA"HAVE YOU ASKED ANYONE ELSE?"
> 3618 DATA"HAVE YOU ASKED SUCH QUESTIONS BEFORE?"
> 3619 DATA"WHAT ELSE COMES TO MIND WHEN YOU ASK THAT?"
> 3620 DATA"NAMES DON'T INTEREST ME"
> 3621 DATA"I DON'T CARE ABOUT NAMES -PLEASE GO ON"
> 3622 DATA"IS THAT THE REAL REASON?"
> 3623 DATA"DON'T ANY OTHER REASONS COME TO MIND?"
> 3624 DATA"DOES THAT REASON EXPLAIN ANYTHING ELSE?"
> 3625 DATA"WHAT OTHER REASONS MIGHT THERE BE?"
> 3626 DATA"PLEASE DON'T APOLOGIZE!"
> 3627 DATA"APOLOGIES ARE NOT NECESSARY"
> 3628 DATA"WHAT FEELINGS DO YOU HAVE WHEN YOU APOLOGIZE?"
> 3629 DATA"DON'T BE SO DEFENSIVE!"
> 3630 DATA"WHAT DOES THAT DREAM SUGGEST TO YOU?"
> 3631 DATA"DO YOU DREAM OFTEN?"
> 3632 DATA"WHAT PERSONS APPEAR IN YOUR DREAMS?"
> 3633 DATA"ARE YOU DISTURBED BY YOUR DREAMS?"
> 3634 DATA"HOW DO YOU DO...PLEASE STATE YOUR PROBLEM."
> 3635 DATA"YOU DON'T SEEM QUITE CERTAIN"
> 3636 DATA"WHY THE UNCERTAIN TONE?"
> 3637 DATA"CAN'T YOU BE MORE POSITIVE?"
> 3638 DATA"YOU AREN'T SURE?"
> 3639 DATA"DON'T YOU KNOW?"
> 3640 DATA"WHAT'S YOUR FEELING ABOUT THAT?"
> 3641 DATA"YOU ARE BEING A BIT NEGATIVE"
> 3642 DATA"WHY NOT?"
> 3643 DATA"WHY ARE YOU CONCERNED ABOUT MY*"
> 3644 DATA"WHAT ABOUT YOUR OWN*"
> 3645 DATA"CAN YOU THINK OF A SPECIFIC EXAMPLE?"
> 3646 DATA"WHEN?"
> 3647 DATA"WHAT ARE YOU THINKING OF?"
> 3648 DATA"REALLY,ALWAYS?"
> 3649 DATA"DO YOU REALLY THINK SO?"
> 3650 DATA"BUT YOU ARE NOT SURE YOU*"
> 3651 DATA"DO YOU DOUBT YOU*"
> 3652 DATA"IN WHAT WAY?"
> 3653 DATA"WHAT RESEMBLANCE DO YOU SEE?"
> 3654 DATA"WHAT DOES THE SIMILARITY SUGGEST TO YOU?"
> 3655 DATA"WHAT OTHER CONNECTIONS DO YOU SEE?"
> 3656 DATA"COULD THERE REALLY BE SOME CONNECTION?"
> 3657 DATA"HOW?"
> 3658 DATA"YOU SEEM QUITE POSITIVE."
> 3659 DATA"ARE YOU SURE?"
> 3660 DATA"I SEE."
> 3661 DATA"I UNDERSTAND"
> 3662 DATA"WHY DO YOU BRING UP THE TOPIC OF FRIENDS?"
> 3663 DATA"DO YOUR FRIENDS WORRY YOU?"
> 3664 DATA"DO YOUR FRIENDS PICK ON YOU?"
> 3665 DATA"ARE YOU SURE YOU HAVE ANY FRIENDS?"
> 3666 DATA"DO YOU IMPOSE ON YOUR FRIENDS?"
> 3667 DATA"PERHAPS YOUR LOVE FOR FRIENDS WORRIES YOU."
> 3668 DATA"DO COMPUTERS WORRY YOU?"
> 3669 DATA"ARE YOU TALKING ABOUT ME IN PARTICULAR?"
> 3670 DATA"ARE YOU FRIGHTENED BY MACHINES?"
> 3671 DATA"WHY DO YOU MENTION COMPUTERS?"
> 3672 DATA"WHAT DO YOU THINK MACHINES HAVE TO DO WITH YOUR PROBLEM?"
> 3673 DATA"DON'T YOU THINK COMPUTERS CAN HELP PEOPLE?"
> 3674 DATA"WHAT IS IT ABOUT MACHINES THAT WORRIES YOU?"
> 3675 DATA"SAY,DO YOU HAVE ANY PSYCHOLOGICAL PROBLEMS?"
> 3676 DATA"WHAT DOES THAT SUGGEST TO YOU?"
> 3677 DATA"I SEE"
> 3678 DATA"I'M NOT SURE I UNDERSTAND YOU FULLY"
> 3679 DATA"GO ON, PLEASE."
> 3680 DATA"CAN YOU ELABORATE ON THAT?"
> 3681 DATA"THAT IS QUITE INTERESTING. TELL ME MORE."
> 3690 DATA"I'M LISTENING"
> 3700 DATA"YOU HAVE VERY STRONG FEELINGS ABOUT THIS."
> 3701 DATA"ARE YOU TRYING TO SHOCK ME WITH YOUR LANGUAGE?"
> 3702 DATA"YOU FEEL A NEED TO BE OBSCENE?"
> 3703 DATA"LOOK ASSHOLE, CUT THE CURSING CRAP!"
> 4000 '(REPLY#,#OF REPLIES)
> 4001 DATA1,3,4,2,6,4,6,4,10,4,14,3,17,3,20,2,22,3,25,3
> 4540 DATA28,4,28,4,32,3,35,5,40,9,40,9,40,9,40,9,40,9,40,9
> 4550 DATA49,2,51,4,55,4,59,4,63,1,63,1,64,5,69,3,72,2,74,4
> 4560 DATA78,3,81,6,87,4,91,6,97,8,105,7,112,4,112,4
> =<cut here>========================================================
>
> Weizenbaum, J., "ELIZA -- A computer program for the study of natural
> language communication between man and machine", Communications of the
> ACM 9(1):36-45, 1966.
|
Dec 21, 2000, 12:25am
Though really IMHO if that was supposed to be more like eep instead of
getting stupider it would cuss and lash out at the user a lot more as you
converse with it.
[View Quote]ananas <vha at oct31.de> wrote in message news:3A168EDC.CDA6AE45 at oct31.de...
> I found an old version of eep, it is a very old basic program.
>
computer connected to a teletype. Eliza is an artificial psychotherapist
which reponds to input by asking questions and providing feedback. Eliza's
reponses may appear to be intelligent, but the longer you converse with
Eliza, the less intelligent she appears!
>
> Doesn't that sound familiar?
> Maybe someone is interested in making his own eep, so here's the source
>
> =<cut here>========================================================
> 100 DIMS(38):DIMR(38):DIMN(38)
> 110 N1=38:N2=14:N3=115
> 120 RESTORE 4001
> 130 FORX=1TON1
> 140 READ S(X),L:R(X)=S(X):N(X)=S(X)+L-1
> 150 NEXT X
> 155 CLS
> 160 PRINT"HELLO! MAKE YOURSELF COMFORTABLE."
> 170 PRINT"NOW,WHAT'S YOUR PROBLEM?"
> 180 ' USER INPUT
> 200 LINE INPUT I$
> 201 I$=" "+I$+" "
> 210 'KILL APOSTROPHES
> 220 AP$="'":IF INSTR(1,I$,AP$)>0 THEN
> I$=LEFT$(I$,(INSTR(1,I$,AP$)-1))+RIGHT$(I$,LEN(I$)-INSTR(1,I$,AP$)):GOTO
> 220
> 250 IF I$=P$ THENPRINT"WHY DO YOU REPEAT YOURSELF?"
> 260 'FIND KEYWORD IN I$
> 290 RESTORE
> 300 FOR K=1 TO N1
> 310 READ K$
> 330 IF INSTR(1,I$,K$)>0 THEN F$=K$:L=INSTR(1,I$,K$):GOTO420
> 340 NEXT K
> 370 K=36:GOTO 590:'NO KEYWORDS
> 400 'CONJUGATE WORDS
> 420 RESTORE 2001
> 430 C$=" "+RIGHT$(I$,LEN(I$)-LEN(F$)-L+1)+" "
> 440 FOR X=1 TO N2/2
> 450 READ S$,R$
> 455 CC=1
> 460 IF INSTR(CC,C$,S$)>0 THEN 500
> 470 IF INSTR(CC,C$,R$)>0 THEN 510
> 480 GOTO 550
> 500
>
L=INSTR(1,C$,S$):C$=LEFT$(C$,L-1)+R$+RIGHT$(C$,LEN(C$)-L-LEN(S$)+1):CC=L+LEN
(R$):GOTO
> 460
> 510
>
L=INSTR(1,C$,R$):C$=LEFT$(C$,L-1)+S$+RIGHT$(C$,LEN(C$)-L-LEN(R$)+1):CC=L+LEN
(S$):GOTO
> 460
> 550 NEXT X
> 555 IF MID$(C$,2,1)=" "THEN C$=RIGHT$(C$,LEN(C$)-1):'ONE SPACE ONLY
> 557 IF INSTR(1,C$,"!")>0 THEN
> L=INSTR(1,C$,"!"):C$=LEFT$(C$,L-1)+RIGHT$(C$,LEN(C$)-L)
> 580 ' GET REPLY
> 590 RESTORE 3001
> 600 FOR X=1 TO R(K):READ F$:NEXT
> 610 R(K)=R(K)+1:IF R(K)>N(K) THEN R(K)=S(K)
> 620 IF RIGHT$(F$,1)<>"*" THEN PRINTF$:P$=I$:GOTO 200
> 630 PRINTLEFT$(F$,LEN(F$)-1);C$
> 640 P$=I$:GOTO 200
> 1000 'KEYWORDS
> 1001 DATA "CAN YOU","CAN I","YOU ARE","YOURE","I DONT","I FEEL"
> 1060 DATA "WHY DONT YOU","WHY CANT I","ARE YOU","I CANT","I AM"," IM "
> 1070 DATA "YOU ","I WANT","WHAT","HOW","WHO","WHERE","WHEN","WHY"
> 1080 DATA "NAME","CAUSE","SORRY","DREAM","HELLO"," HI ","MAYBE"
> 1090 DATA " NO ","YOUR","ALWAYS","THINK","ALIKE","YES "," FRIEND"
> 1100 DATA "COMPUTER","NOKEY","PHOOEY","OUCH"
> 2000 'CONJUGATIONS
> 2001 DATA " ARE "," AM "," WERE "," WAS "," YOU "," I "," YOUR "," MY "
> 2010 DATA " IVE "," YOUVE "," IM "," YOURE "
> 2020 DATA " ME "," !YOU "
> 3000 'REPLIES
> 3001 DATA"DON'T YOU BELIEVE THAT I CAN*"
> 3040 DATA"PERHAPS YOU WOULD LIKE TO BE ABLE TO*"
> 3050 DATA"YOU WANT ME TO BE ABLE TO*"
> 3060 DATA"PERHAPS YOU DON'T WANT TO*"
> 3070 DATA"DO YOU WANT TO BE ABLE TO*"
> 3080 DATA"WHAT MAKES YOU THINK I AM*"
> 3090 DATA"DOES IT PLEASE YOU TO BELIEVE I AM*"
> 3100 DATA"PERHAPS YOU WOULD LIKE TO BE*"
> 3400 DATA"DO YOU SOMETIMES WISH YOU WERE*"
> 3410 DATA"DON'T YOU REALLY*"
> 3420 DATA"WHY DON'T YOU*"
> 3430 DATA"DO YOU WISH T BE ABLE TO*"
> 3440 DATA"DOES THAT TROUBLE YOU?"
> 3450 DATA"TELL ME MORE ABOUT SUCH FEELINGS."
> 3460 DATA"DO YOU OFTEN FEEL*"
> 3470 DATA"DO YOU ENJOY FEELING*"
> 3480 DATA"DO YOU REALLY BELIEVE I DON'T*"
> 3490 DATA"PERHAPS IN GOOD TIME I WILL*"
> 3500 DATA"DO YOU WANT ME TO*"
> 3510 DATA"DO YOU THINK YOU SHOULD BE ABLE TO*"
> 3520 DATA"WHY CAN'T YOU*"
> 3530 DATA"WHY ARE YOU INTERESTED IN WHETHER OR NOT I AM *"
> 3540 DATA"WOULD YOU PREFER IF I WERE NOT*"
> 3550 DATA"PERHAPS IN YOUR FANTASIES I AM*"
> 3560 DATA"HOW DO YOU KNOW YOU CAN'T*"
> 3570 DATA"HAVE YOU TRIED?"
> 3580 DATA"PERHAPS YOU CAN NOW*"
> 3590 DATA"DID YOU COME TO ME BECAUSE YOU ARE*"
> 3600 DATA"HOW LONG HAVE YOU BEEN*"
> 3601 DATA"DO YOU BELIEVE IT IS NORMAL TO BE*"
> 3602 DATA"DO YOU ENJOY BEING*"
> 3603 DATA"WE WERE DISCUSSING YOU-NOT ME"
> 3604 DATA"OH I*"
> 3605 DATA"YOU'RE NOT REALLY TALKING ABOUT ME ARE YOU?"
> 3606 DATA"WHAT WOULD IT MEAN TO YOU IF YOU GOT*"
> 3607 DATA"WHY DO YOU WANT*"
> 3608 DATA"SUPPOSE YOU SOON GOT*"
> 3609 DATA"WHAT IF YOU NEVER GOT*"
> 3610 DATA"SOMETIMES I ALSO WANT*"
> 3611 DATA"WHY DO YOU ASK?"
> 3612 DATA"DOES THAT QUESTION INTEREST YOU?"
> 3613 DATA"WHAT ANSWER WOULD PLEASE YOU THE MOST?"
> 3614 DATA"WHAT DO YOU THINK?"
> 3615 DATA"ARE SUCH QUESTIONS ON YOUR MIND OFTEN?"
> 3616 DATA"WHAT IS IT THAT YOU REALLY WANT TO KNOW"
> 3617 DATA"HAVE YOU ASKED ANYONE ELSE?"
> 3618 DATA"HAVE YOU ASKED SUCH QUESTIONS BEFORE?"
> 3619 DATA"WHAT ELSE COMES TO MIND WHEN YOU ASK THAT?"
> 3620 DATA"NAMES DON'T INTEREST ME"
> 3621 DATA"I DON'T CARE ABOUT NAMES -PLEASE GO ON"
> 3622 DATA"IS THAT THE REAL REASON?"
> 3623 DATA"DON'T ANY OTHER REASONS COME TO MIND?"
> 3624 DATA"DOES THAT REASON EXPLAIN ANYTHING ELSE?"
> 3625 DATA"WHAT OTHER REASONS MIGHT THERE BE?"
> 3626 DATA"PLEASE DON'T APOLOGIZE!"
> 3627 DATA"APOLOGIES ARE NOT NECESSARY"
> 3628 DATA"WHAT FEELINGS DO YOU HAVE WHEN YOU APOLOGIZE?"
> 3629 DATA"DON'T BE SO DEFENSIVE!"
> 3630 DATA"WHAT DOES THAT DREAM SUGGEST TO YOU?"
> 3631 DATA"DO YOU DREAM OFTEN?"
> 3632 DATA"WHAT PERSONS APPEAR IN YOUR DREAMS?"
> 3633 DATA"ARE YOU DISTURBED BY YOUR DREAMS?"
> 3634 DATA"HOW DO YOU DO...PLEASE STATE YOUR PROBLEM."
> 3635 DATA"YOU DON'T SEEM QUITE CERTAIN"
> 3636 DATA"WHY THE UNCERTAIN TONE?"
> 3637 DATA"CAN'T YOU BE MORE POSITIVE?"
> 3638 DATA"YOU AREN'T SURE?"
> 3639 DATA"DON'T YOU KNOW?"
> 3640 DATA"WHAT'S YOUR FEELING ABOUT THAT?"
> 3641 DATA"YOU ARE BEING A BIT NEGATIVE"
> 3642 DATA"WHY NOT?"
> 3643 DATA"WHY ARE YOU CONCERNED ABOUT MY*"
> 3644 DATA"WHAT ABOUT YOUR OWN*"
> 3645 DATA"CAN YOU THINK OF A SPECIFIC EXAMPLE?"
> 3646 DATA"WHEN?"
> 3647 DATA"WHAT ARE YOU THINKING OF?"
> 3648 DATA"REALLY,ALWAYS?"
> 3649 DATA"DO YOU REALLY THINK SO?"
> 3650 DATA"BUT YOU ARE NOT SURE YOU*"
> 3651 DATA"DO YOU DOUBT YOU*"
> 3652 DATA"IN WHAT WAY?"
> 3653 DATA"WHAT RESEMBLANCE DO YOU SEE?"
> 3654 DATA"WHAT DOES THE SIMILARITY SUGGEST TO YOU?"
> 3655 DATA"WHAT OTHER CONNECTIONS DO YOU SEE?"
> 3656 DATA"COULD THERE REALLY BE SOME CONNECTION?"
> 3657 DATA"HOW?"
> 3658 DATA"YOU SEEM QUITE POSITIVE."
> 3659 DATA"ARE YOU SURE?"
> 3660 DATA"I SEE."
> 3661 DATA"I UNDERSTAND"
> 3662 DATA"WHY DO YOU BRING UP THE TOPIC OF FRIENDS?"
> 3663 DATA"DO YOUR FRIENDS WORRY YOU?"
> 3664 DATA"DO YOUR FRIENDS PICK ON YOU?"
> 3665 DATA"ARE YOU SURE YOU HAVE ANY FRIENDS?"
> 3666 DATA"DO YOU IMPOSE ON YOUR FRIENDS?"
> 3667 DATA"PERHAPS YOUR LOVE FOR FRIENDS WORRIES YOU."
> 3668 DATA"DO COMPUTERS WORRY YOU?"
> 3669 DATA"ARE YOU TALKING ABOUT ME IN PARTICULAR?"
> 3670 DATA"ARE YOU FRIGHTENED BY MACHINES?"
> 3671 DATA"WHY DO YOU MENTION COMPUTERS?"
> 3672 DATA"WHAT DO YOU THINK MACHINES HAVE TO DO WITH YOUR PROBLEM?"
> 3673 DATA"DON'T YOU THINK COMPUTERS CAN HELP PEOPLE?"
> 3674 DATA"WHAT IS IT ABOUT MACHINES THAT WORRIES YOU?"
> 3675 DATA"SAY,DO YOU HAVE ANY PSYCHOLOGICAL PROBLEMS?"
> 3676 DATA"WHAT DOES THAT SUGGEST TO YOU?"
> 3677 DATA"I SEE"
> 3678 DATA"I'M NOT SURE I UNDERSTAND YOU FULLY"
> 3679 DATA"GO ON, PLEASE."
> 3680 DATA"CAN YOU ELABORATE ON THAT?"
> 3681 DATA"THAT IS QUITE INTERESTING. TELL ME MORE."
> 3690 DATA"I'M LISTENING"
> 3700 DATA"YOU HAVE VERY STRONG FEELINGS ABOUT THIS."
> 3701 DATA"ARE YOU TRYING TO SHOCK ME WITH YOUR LANGUAGE?"
> 3702 DATA"YOU FEEL A NEED TO BE OBSCENE?"
> 3703 DATA"LOOK ASSHOLE, CUT THE CURSING CRAP!"
> 4000 '(REPLY#,#OF REPLIES)
> 4001 DATA1,3,4,2,6,4,6,4,10,4,14,3,17,3,20,2,22,3,25,3
> 4540 DATA28,4,28,4,32,3,35,5,40,9,40,9,40,9,40,9,40,9,40,9
> 4550 DATA49,2,51,4,55,4,59,4,63,1,63,1,64,5,69,3,72,2,74,4
> 4560 DATA78,3,81,6,87,4,91,6,97,8,105,7,112,4,112,4
> =<cut here>========================================================
>
> Weizenbaum, J., "ELIZA -- A computer program for the study of natural
> language communication between man and machine", Communications of the
> ACM 9(1):36-45, 1966.
|
Jan 14, 2001, 11:35pm
I wouldn't call that an insult, it says that syn likes to give FDA alot, and
from experience he's not gay so...
[View Quote]agent fox mulder <jarync at home.com> wrote in message
news:3a6243b3$1 at server1.Activeworlds.com...
>
> Ass Fucker
> --
> --------------------------------------------------------------------------
--
> ------------
> Yo welcome To Whever we Might Be Have Fun I guess
> "i know this signature is stupid"
> "syntax" <syntax at earthcorp.com> wrote in message
> news:3a62412d at server1.Activeworlds.com...
>
>
|
Apr 30, 2001, 11:05pm
I have a question...is there a certain programming language like VB or C++
that you need to use to make bots? I was going to try to find a programming
class for it because I'd like to learn to make my own bots instead of be
stuck to going through confusing scripting and figuring out how to work
hamfons and xellys. I know programming is confusing too but I think it would
help if I can use the language(s) bots can be made in so I'll better
understand how the scripts work and how the bots do too.
--
My two cents,
Captain MAD Mike
May 1, 2001, 7:44pm
Thanks for all the places. I've known that C++ and C were supported by the
SDK, though I have a friend who knows VB so he could help me if I got
that...but just wondering...since they're all different languages are any of
them harder than the other? I'm interested in Delphi too because I've heard
thats a good one...also I need to know how much the software is.
--
-CMM
[View Quote]"m a k a v e l i" <tupacisdabest at aol.com> wrote in message
news:3aeef70f$1 at server1.Activeworlds.com...
> Java SDK - ftp://www.mtn.org/pub/users/andrewes/
>
>
|
Feb 1, 2001, 8:07pm
I agree too. If tourists want to do serious building they should just
register. And besides, that way they can't have their serious building get
deleted by those mean citizens who come in and level the buildings or worse
(to me) add signs with vulgarities or even just rip chunks out of the build.
--
/ |\ /| |\ /|
/ | \ / | | \ / |
\ | \/ | | \/ |
\_ | | | |
Feb 1, 2001, 7:59pm
I think it could float, sorda. Basically it could use the same method as the
Vevo does. And if a Vevo map of a 36000x36000 world is 5GB, a Vevo map for a
world thats 100x100 max would be like 10MB-1GB (someone do the math, I'm
lazy :P )
--
/ |\ /| |\ /|
/ | \ / | | \ / |
\ | \/ | | \/ |
\_ | | | |
Feb 1, 2001, 7:57pm
I wish that we could have a trial run of rotate in AW and if it gets abused
then turn it off and work on a way to have it (AW browser) detect if the
object getting rotated will encroach. I just think that the best way to
prevent from being vandalized by rotate is the same way to prevent being
vandalized in general: cover your land! To me if someone sets up a spinning
balloon it will look the same as a wall of signs, just cover the land so
your buildings are unhurt. And besides, not many objects are really huge
(besides those not on the registry and z objects).
--
/ |\ /| |\ /|
/ | \ / | | \ / |
\ | \/ | | \/ |
\_ | | | |
Feb 4, 2001, 7:59pm
Which explains why I said "cover land." And besides, a lot of people build
in towns so unless the towns full of cracks you can't make anything rotate
into another person's build. And rotate is NOT like move in my opinion, move
allows you to send things to GZ, rotate barely moves them.
[View Quote]joeman <Joeman at bootdown.com> wrote in message
news:3a79e2bc at server1.Activeworlds.com...
> It still could be a problem, just like move. If you have a pp01.rwx right
> up next to someone elses build, and have create rotate 0 10 0 on it, it
will
> gone into their land/building... This could make some people very mad..
some
> not..
>
> ~Joeman
>
> "captain mad mike" <missioni64 at yahoo.com> wrote in message
> news:3a79dbc9$1 at server1.Activeworlds.com...
> abused
> spinning
>
>
|
Feb 4, 2001, 8:13pm
loook whoooos talking
[View Quote]lanezeri <Lanezeri at yahoo.com> wrote in message
news:3a7dcfb8 at server1.Activeworlds.com...
> from
hard.
>
> that is inacurate stupid.. that just proves you can do basic math.. god
you
> fucking idiots need help..
>
>
|
Feb 12, 2001, 9:04pm
Hmm... I was checking out the prices of a world. $10 yearly for a P-10 with
5 users isn't bad, but really another $50 to add 5 users to the world? I
think it should be $10 extra per 5 user limit increase. What makes them so
pricey anyways? AWCOM says most everything (rights, usage of software, etc.)
is covered by the one-time liscense fee. And the worlds not even hosted
either, its running of your comp (from what I heard) so really your paying
to have people come to your comp. I'm not a world owner but I know people
who own worlds.
Feb 14, 2001, 7:29pm
Yeah I agree with you all, they need to make money somehow. But I think if
they lowered the prices then a world would be in reach for a lot more people
thus producing more sales.
[View Quote]rolu <rolu.university at bigfoot.com> wrote in message
news:3a89126b$1 at server1.Activeworlds.com...
> "captain mad mike" <cmadmike at crosswinds.net> wrote in message
> news:3a886bec$1 at server1.Activeworlds.com...
> with
so
> etc.)
paying
people
>
> afaik, there is no real difference between a 50x50 world and one the size
of
> AW. It's just some numbers :-) Same goes for the user count. But they want
> to make money, so if you get a larger world, you pay more. It's quite
> expensive, though, indeed.
>
> rolu
>
>
|
Feb 14, 2001, 7:32pm
Yeah I'd like to either do that or be able to just turn off fading
[View Quote]xero <xero at darkvapor.com> wrote in message
news:3a89b31e at server1.Activeworlds.com...
> In aw3.1 when you get far away from a midi/mp3/wav it starts to fade out,
> maybe on 3.2 it would be cool if you could set this distance in the
command
> but it would be limited in world options of course, or if maxed out, could
> be used to play through the entire world. Such as create sound
> www.blahblah.com/blah.mp3 distance=20 or distance=world for the whole
world.
> Just a idea.
>
> --
> -Xero
> IM: o0 Xero
> xero at darkvapor.com
> http://www.darkvapor.com
>
>
|
Feb 14, 2001, 7:32pm
interesting, it may be hard for AWCOM's team of programmers to do so but
interesting.
[View Quote]35850 <!> wrote in message news:3a8acefd$1 at server1.Activeworlds.com...
> Well, I've been playing around with the new commands - expecially
> move/rotate, which is the topic of most of this message, really.
> While the commands in their current form have applications, and, with the
> help of some other commands (astart/adone, mostly - as you can see in
> objectd', or even the little looping truck animation I have in proxima
right
> now) can be quite useful, I'm hoping that future additions to them can be
> made.
>
> Basically, I'm looking for a way to chain together move/rotate commands
more
> efficiently than the current method of astart/adone and multiple instances
> of the same object. Perhaps some sort of 'wait' or 'then' command which
> would cause the parser to wait before continuing execution combined with
> more move/rotate options (like a 'stop' command which makes the object
halt
> at the end of a move before returning - basically infinate wait).
>
> I'm sure there's a better way to implement that if I really thought about
> it, but there needs to be a way to chain move and rotates. Motion path is
> also an EXCELLENT idea, which, I'm sure, could be implemented without too
> much difficulty (even if simply as a new command, perhaps with its own set
> of dividers). In fact, I think I like that idea so much I'm going to write
> up a detailed explaination of how it would work.
>
> Example: create mpath (move 10 time=2, rotate 10; move 0 0 -10 time=4;
> rotate 10 time=4)
> Allow me to explain.
> The first part, create mpath, is a simple command (on create, start a
motion
> path). Inside parenthesis are the details of the mpath - we do this since
> it's easier to use the dividers we know and love, comma and semicolon.
The
> first part in there, "move10 time=2, rotate 10" causes two things to
happen
> starting at the same time - the object moves 10 meters while rotating at
10
> rpms. It stops moving AND rotating after two seconds. Next we have "move 0
> 0 -10 time=4".... which we should all understand. The object moves 10
> meters, but in a different direction (NOTE: This is the critical part...
the
> object starts moving from where the first movement/rotation left it! It
does
> not return to its built origin!). Finally, "rotate 10 time=4", which is
also
> self-explainatory. Note how things that happen at the same time are
comma'd,
> while each event it separated by a semicolon.
>
> Basically, that command makes the object move while rotating, then just
> move, then rotate. It might not be the BEST way possible - but I'll bet
> Roland could do it in under an hour, and it'd still be rather easy for
> everyone to use.
>
> One last piece -- it wouldn't be a terrible idea for the mpath command to
> have a "use orientation" switch. That is to say, a simple on/off option
> telling the client if it should move the object just on the world coords,
or
> relative to the actual ANGLE of the object - so that rotating it effects
> what direction it travels in.
>
> 35850
>
>
|
Feb 16, 2001, 11:17pm
Maybe Microsoft's is buggy and full of security holes like Outlook?
[View Quote]lanezeri <lanezeri at free-1.com> wrote in message
news:3a8dc842$1 at server1.Activeworlds.com...
> Why pay to use a feature from a company not many know about.. when u could
> use Microsoft's?
>
>
>
|
Feb 22, 2001, 11:43pm
I like 2, 4, and 6.
[View Quote]sw comit <swcomit at swcity.net> wrote in message
news:3a94ca8f$1 at server1.Activeworlds.com...
> 1. I'd be nice if you could transfer ownership of objects easier. For
> example, log into someone ppw, then select your objects, replace the
> ownership field with the citnumber of the ppw your under...
>
> 2. Be able to work with your own objects while under a ppw, it's a major
> pain to swamp back and forth.
>
> 3. Be able to log into multiple ppw. Of course this would require some
work
> on the objects property window, and I looks like AW is never gonna tinker
> with that...
>
> 4. Be able to eject someone from your ppw. For example if you give
someone
> your ppw, and they start trashing your place, you should be able to kick
> them off your ppw. This is a major security issue AW should fix.
>
> 5. Have a drop down menu of ppws you know. For example, I know a lot of
> ppw, too many to remember. I'd be nice to have a drop down menu in the
ppw
> login window.
>
> 6. Be able to monitor who is logged into your ppw now.
>
> All these features, I think, would be awesome for major cities or
> organization (like comreg) who deal with ppw a lot.
>
> --
> SW Comit
> swcomit at swcity.net
> Mayor of SW City
> http://www.swcity.net
> President of Community Linkage Commission
> http://comlinkage.tripod.com
>
>
|
Feb 25, 2001, 7:12pm
yeah but what about us AWCOM-world-builders who can't have Eminent Domain
(hint, ED means something...else...)
--
-CMM
[View Quote]jeiden <tgrenier1 at mediaone.net> wrote in message
news:3a98126b$1 at server1.Activeworlds.com...
> If you have ED rights and the other person has Builder rights you can
> already do 1.
>
>
> "sw comit" <swcomit at swcity.net> wrote in message
> news:3a94ca8f$1 at server1.Activeworlds.com...
>
|
Feb 24, 2001, 2:08am
Yeah good idea, I don't think it would kill down performance or anything if
you've got a good enough video card (and most new computers have very good
cards in them, and there are always the cheap good ones for upgrading) and
for AW it would be just like a bot.
--
My two cents,
Captain MAD Mike
[View Quote]sw comit <swcomit at swcity.net> wrote in message
news:3a9715ac at server1.Activeworlds.com...
> Why do you say that? The image is still, except for avatar or
> moving/animated stuff. And you'd also need to be looking at the video.
>
> --
> SW Comit
> swcomit at swcity.net
> Mayor of SW City
> http://www.swcity.net
> President of Community Linkage Commission
> http://comlinkage.tripod.com
> "nova" <n at n.com> wrote in message
> news:3a9706cd$1 at server1.Activeworlds.com...
any
gets
> a
> the
^_^
>
>
|
Feb 24, 2001, 2:09am
But what if the new software took up too much of the budget and one had to
go?
--
My two cents,
Captain MAD Mike
[View Quote]wing <bathgate at prodigy.net> wrote in message
news:3a970334 at server1.Activeworlds.com...
> They'd still exist in the old software, which would continue being
operated
> and supported until it's no longer cost effective
>
> --
> Wing
> This little spot is dedicated to my girl, Jessie.
> AW Citizen 305004 "Wing"
> bathgate at prodigy.net
> eyemwing at teleport.com
> ICQ #101207433
> sw comit <swcomit at swcity.net> wrote in message
> news:3a96f6b0$1 at server1.Activeworlds.com...
> and
would
offered
> up,
be
> die
take
users
>
>
|
Feb 28, 2001, 10:53pm
If AW has to rewrite the database or anything then they should try backing
it up, you know, in case they figure out a way to change that so it works
with the "new" AW, that is if their hard drive can handle it (...mine can
handle AW and 3 copies of it and still be able to hold the stuff it has on
it now...) Though if they did I'd want to have like super changes to AW
(visible limbs in first person mode, maybe voice stuff, av noises, stuff
like that) because I wouldn't think of it being worth losing all of my
builds for more visibility or soemthing.
--
My two cents,
Captain MAD Mike
[View Quote]john viper <jviper at jtsoft.net> wrote in message
news:3a97ca31 at server1.Activeworlds.com...
> This is the only downside. I think it would be a worthy sacrifice,
however
> if AW thinks they can get away with it once, they might do it again.
>
> -John
>
> "sw comit" <swcomit at swcity.net> wrote in message
> news:3a96f6b0$1 at server1.Activeworlds.com...
> and
would
offered
> up,
be
> die
take
users
>
>
|
Mar 5, 2001, 11:34pm
whoops, big mistake, I heard in the gate that it was only like 5 GB or
something...heh no I wish I had 300GB, be nice but no...
[View Quote]wing <bathgate at prodigy.net> wrote in message
news:3a9da55b at server1.Activeworlds.com...
> Your hard drive can handle 3 copies of the AW database? Where'd you
suddenly
> come up with 300 gigs?
> "captain mad mike" <cmadmike at crosswinds.net> wrote in message
> news:3a9d9d7e at server1.Activeworlds.com...
backing
works
can
on
> done?
work
> =D
in
> software
> functioning.
> built
never
> to
> would
> to
> older
> for
>
>
|
Mar 8, 2001, 11:12pm
Hmmm....when you figure out how to make another 3d chat/VR peice of software
with the features of AW, and possibly beating them, let me know.
[View Quote]35850 <!> wrote in message news:3a9fcb16 at server1.Activeworlds.com...
> Argh. The amount of money AWCI is getting isn't the point either.
>
> The point is it won't be long before something else takes over, since AW
is
> such a stagnant, slowly-moving piece of antique software with absolutely
no
> vision.
>
> For those who don't know, I do believe AlphaWorld was originally intended
to
> be just that - an ALPHA. A test. A prototype which would be scrapped and
> redone once enough had been learned.
>
> Even if some other piece of software doesn't take over, AW will still
remain
> a good idea gone rancid. It's time for something new -- a massive leap of
> sorts. But obviously you people are far too narrow-minded to think of such
> things. Or else you just don't care. Either way, that is all I have to say
> on the matter.
>
> 35850
>
> "j b e l l" <jbell1983 at home.com> wrote in message
> news:3a9ef288 at server1.Activeworlds.com...
> money
700
> 300-700+
> money
> money
talk
> what
could
>
>
|
Feb 24, 2001, 2:05am
I think it would be nice if move wasn't allowed but only vertical move
(vmove) was. That way there are no encroaching problems and you can make
objects hover (more realistically). Then we could maybe make elevators and
vertically moving lights!
My two cents,
Captain MAD Mike
Feb 28, 2001, 10:42pm
from doing what?
[View Quote]sw comit <swcomit at swcity.net> wrote in message
news:3a973a2f at server1.Activeworlds.com...
> True...still, that's would require a good deal of work to keep people from
> doing that
>
> --
> SW Comit
> swcomit at swcity.net
> Mayor of SW City
> http://www.swcity.net
> President of Community Linkage Commission
> http://comlinkage.tripod.com
> "captain mad mike" <cmadmike at crosswinds.net> wrote in message
> news:3a973303$1 at server1.Activeworlds.com...
and
>
>
|
Feb 25, 2001, 7:13pm
LMAO "A giant toilet with toilet keepers to flush it every hour." Be sure to
add the sound effects too, and for realism some "smears."
--
-CMM
[View Quote]myrth <myrth at myrthco.com> wrote in message
news:3a994ce8 at server1.Activeworlds.com...
> Hi,
> We all know how AW likes to implement complex workarounds instead of
> getting straight to the problem, so I have though of the perfect complex
> work around for people who need "AFK, Bathroom, Dinner, etc" options.
AWCI
> simply needs to create a world called AFK, DINNER, and TOILET. Speech in
> AFK would be disabled to prevent it from becoming a popular meeting place.
> TOILET would be a giant toilet that everyone teleports in and falls in to.
> TK's (toilet keepers) could be placed on the seat of the toilet and act as
> lifeguards, also every hour they could "flush" the toilet. Everyone would
> drain (be ejected) to the sewers (AWGate). A world called BRB could be
> added too, when you enter a bot asks you how long you will be until you
> return, when that time limit is expired you will be teleported back to
where
> you came from. Of course, for this to work you would have to let people
see
> the world you are currently in, which shouldnt be too hard and would add
to
> the complexity. I think this would be the perfect workaround for status
> indicators.
>
> -Myrth
>
>
>
|
Feb 25, 2001, 7:09pm
AAaaah whats up with everyone hating the fog? They put it just short of the
maximum visibility (120m) so it can't really interfere with building, and if
it does, move closer.
[View Quote]wing <bathgate at prodigy.net> wrote in message
news:3a996d30 at server1.Activeworlds.com...
> See subject.
>
> --
> Wing
> This little spot is dedicated to my girl, Jessie.
> AW Citizen 305004 "Wing"
> bathgate at prodigy.net
> eyemwing at teleport.com
> ICQ #101207433
>
>
|
Feb 28, 2001, 10:45pm
well I guess the orange color of the fog is kinda disgusting...fog only
works well either white or at night so the fog is just to add effect.
--
-CMM
[View Quote]nova <n at n.com> wrote in message news:3a99b28b at server1.Activeworlds.com...
> looks like some one puked on every thing geeze thats horid
> "sw comit" <swcomit at swcity.net> wrote in message
> news:3a998202$1 at server1.Activeworlds.com...
>
>
|
Feb 25, 2001, 7:11pm
I think it would be cool if we could set our maximum visibility to whatever
we wanted (or if not whatever, a really high limit) because then we could
possibly see for half a mile instead of about 310 feet.
--
My two cents,
Captain MAD Mike
Mar 10, 2001, 12:26am
nhaaaaa...scratch the outgoing history, then when Windows updates Microsoft
could update their records of you to sell out to other companies O_O *looks
around*
--
CMM
"Crazy to the gluon!"
[View Quote]nova <n at n.com> wrote in message news:3a9f9fe8$1 at server1.Activeworlds.com...
> Now thats one hell of a idea a privacy feture for tgrams would be great as
> would a outgoing history.
> I dont know how many times ive had people tgram me thinking im the owner
of
> the world im always inand saying can i come in or for the out going im
sure
> ev ones done this sent a tgram got a reply and you sit their and wonder
what
> you said and have to ask the person who replyed what you said.
> "lanezeri" <lanezeri at free-1.com> wrote in message
> news:3a9f974c at server1.Activeworlds.com...
telegram
>
>
|
Mar 17, 2001, 3:17am
where?
[View Quote]
> I saw an object in a Universe thing Posiedon showed me.. it was a mirror..
> looked awesome
>
> --
> - = [ T e c h n o ] = -
> http://wt.s5.com
> - = [ S t u f f - X ] = -
> http://www.stuffx.com/aw
|
