Author Topic: picture popup IE Html information window  (Read 6455 times)

HeatherValentine

picture popup IE Html information window
« on: June 18, 2005, 04:53:28 PM »
hi

has anyone tried this script out
i got it from mikmoth
on the zaberware form


IT will show you an image of what you request
example what is gangster
what is mafia
what is cat
any questions you ask that are in th dictionary wil show you a picture of it on an external little 300 x 300 html window
like a picture of a cat if you say what is a cat




http://www.zabaware.com/forum/uploaded/mikmoth/200522032927_5gEnhancedBrainWNImages.uhp


Download Attachment: 5gEnhancedBrainWNImages.uhp
146.26 KB

you can stick that file right in ultrahals directory
without even using the below script
or you can make modifiacations to it
ths script actually works but you have to load it form brain editor






If WordToLookup = "" Then WordToLookup = HalBrain.SearchPattern(UserSentence, "WHO IS *", 1)

2 more questions
if id like to see more then one picture for example maybe 5 pics
lopoing from one to another like for example

1.say loading images
10 for x = 1 to 5 : next x
goto10

on the subject how woud that be asccomplished in the line without repeatng what is
go
also is there a way i can add a wav file effect for when the results of my search window pops up?







'*** WORDNET IMAGES ***
Set IE = CreateObject("InternetExplorer.Application")
cdc = "http://www.glice3d.com/cgi-bin/popup.pl?term=" + WordToLookup
IE.Navigate cdc
IE.AddressBar = False
IE.menubar = False
IE.ToolBar = False
IE.StatusBar = False
IE.width = 300
IE.height = 300
IE.resizable = False
IE.visible = True
'*** END WORDNET IMAGES ***

Where you place this script is VERY important. Find the end of Wordnet Dictionary function. You'll see 2 End Ifs at the end of the function:

*PLACE SCRIPT HERE*
End If
End If
*PLACE 2ND SCRIPT HERE*

If you want Hal to look up words that *aren't* in the dictionary place this 2nd script under the last End If. With it you'll be able to ask something like "What is Teenage Mutant Ninja Turtles?" You'll have to use "What is". Change it if you want.

'*** NON-WORDNET IMAGES ***
If InStr(1, UserSentence, "WHAT IS", 1) > 0 And WN.LookUpWord(WordToLookup) = False Then
lookup = Replace(UserSentence, "WHAT IS", "", 1, -1, vbTextCompare)
GetResponse = "I have no definition but here is an image."
Set IE = CreateObject("InternetExplorer.Application")
cdc = "http://www.glice3d.com/cgi-bin/popup.pl?term=" + lookup
IE.Navigate cdc
IE.AddressBar = False
IE.menubar = False
IE.ToolBar = False
IE.StatusBar = False
IE.width = 300
IE.height = 300
IE.resizable = False
IE.visible = True
End If
'*** END NON-WORDNET IMAGES ***

« Last Edit: June 18, 2005, 05:00:52 PM by HeatherValentine »

Freddy

  • *
  • Colossus
  • **********************
  • Posts: 5629
  • Mostly Harmless
Re: picture popup IE Html information window
« Reply #1 on: June 18, 2005, 09:18:38 PM »
Hi Heather, I'm still a bit busy on sorting the website out at the moment, but
I will have a look at this.  I had something running where hal issued multiple pictures from my
harddisk via my normal image viewer, but I'll need to look at this script a bit closer.

About the WAV files, that would probably mean you would have to shut down Text To Speech
at some point so the WAV can be played.

I'll see what I can do, I hope your in no hurry though!

HeatherValentine

Re: picture popup IE Html information window
« Reply #2 on: June 19, 2005, 04:52:51 PM »
no ot much of a hurry riow i missed my bus LMAO

 

Welcome

Please login or register.



Login with username, password and session length
My New Test Reallusion
by The King (Video)
Today at 12:43:57 AM
A.I script writer
by Freddy (General AI Discussion)
August 27, 2016, 11:55:48 PM
How to build rapport with the person you're talking to.
by The King (General Chat)
August 27, 2016, 09:34:41 PM
Art, Cupcakes, Eyes
by The King (General Chat)
August 27, 2016, 09:29:46 PM
Squishy 'Octobot' Moves Autonomously
by keghn (General Robotics Talk)
August 27, 2016, 04:48:40 PM
Hi There!
by ivan.moony (New Users Please Post Here)
August 27, 2016, 02:25:16 PM
Jim Earthworm Sick
by Art (General AI Discussion)
August 27, 2016, 12:22:25 PM
The Athena Project
by Art (General Project Discussion)
August 27, 2016, 12:11:10 PM
'Scoop' might be Samsung's itty-bitty Amazon Echo competitor - CNET
by Tyler (AI News )
August 24, 2016, 04:48:13 AM
Apple acquires AI medical start-up Gliimpse: report
by Tyler (AI News )
August 23, 2016, 04:51:22 PM
Microsoft acquires AI assistant start-up Genee
by Tyler (AI News )
August 23, 2016, 10:51:11 AM
Appliance Science: How Alexa learns about you - CNET
by Tyler (AI News )
August 23, 2016, 04:48:46 AM
AIs fight to the death in 'Doom' contest next month
by Tyler (AI News )
August 20, 2016, 04:48:11 AM
Amazon's Alexa Fund joins $35 million funding round for the makers of the Ecobee smart thermostat - CNET
by Tyler (AI News )
August 19, 2016, 10:51:17 PM
Intel's new Atom chips bring 4K video to VR headsets, robots
by Tyler (AI News )
August 19, 2016, 04:48:01 PM
Ready for the Internet of Robotic Things?
by Tyler (AI News )
August 19, 2016, 10:48:09 AM

Users Online

55 Guests, 2 Users
Users active in past 15 minutes:
kei10, The King
[Trusty Member]
[Starship Trooper]

Most Online Today: 80. Most Online Ever: 208 (August 27, 2008, 08:24:30 AM)

Articles